pic32mx795f512l.pp 3.6 MB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595145961459714598145991460014601146021460314604146051460614607146081460914610146111461214613146141461514616146171461814619146201462114622146231462414625146261462714628146291463014631146321463314634146351463614637146381463914640146411464214643146441464514646146471464814649146501465114652146531465414655146561465714658146591466014661146621466314664146651466614667146681466914670146711467214673146741467514676146771467814679146801468114682146831468414685146861468714688146891469014691146921469314694146951469614697146981469914700147011470214703147041470514706147071470814709147101471114712147131471414715147161471714718147191472014721147221472314724147251472614727147281472914730147311473214733147341473514736147371473814739147401474114742147431474414745147461474714748147491475014751147521475314754147551475614757147581475914760147611476214763147641476514766147671476814769147701477114772147731477414775147761477714778147791478014781147821478314784147851478614787147881478914790147911479214793147941479514796147971479814799148001480114802148031480414805148061480714808148091481014811148121481314814148151481614817148181481914820148211482214823148241482514826148271482814829148301483114832148331483414835148361483714838148391484014841148421484314844148451484614847148481484914850148511485214853148541485514856148571485814859148601486114862148631486414865148661486714868148691487014871148721487314874148751487614877148781487914880148811488214883148841488514886148871488814889148901489114892148931489414895148961489714898148991490014901149021490314904149051490614907149081490914910149111491214913149141491514916149171491814919149201492114922149231492414925149261492714928149291493014931149321493314934149351493614937149381493914940149411494214943149441494514946149471494814949149501495114952149531495414955149561495714958149591496014961149621496314964149651496614967149681496914970149711497214973149741497514976149771497814979149801498114982149831498414985149861498714988149891499014991149921499314994149951499614997149981499915000150011500215003150041500515006150071500815009150101501115012150131501415015150161501715018150191502015021150221502315024150251502615027150281502915030150311503215033150341503515036150371503815039150401504115042150431504415045150461504715048150491505015051150521505315054150551505615057150581505915060150611506215063150641506515066150671506815069150701507115072150731507415075150761507715078150791508015081150821508315084150851508615087150881508915090150911509215093150941509515096150971509815099151001510115102151031510415105151061510715108151091511015111151121511315114151151511615117151181511915120151211512215123151241512515126151271512815129151301513115132151331513415135151361513715138151391514015141151421514315144151451514615147151481514915150151511515215153151541515515156151571515815159151601516115162151631516415165151661516715168151691517015171151721517315174151751517615177151781517915180151811518215183151841518515186151871518815189151901519115192151931519415195151961519715198151991520015201152021520315204152051520615207152081520915210152111521215213152141521515216152171521815219152201522115222152231522415225152261522715228152291523015231152321523315234152351523615237152381523915240152411524215243152441524515246152471524815249152501525115252152531525415255152561525715258152591526015261152621526315264152651526615267152681526915270152711527215273152741527515276152771527815279152801528115282152831528415285152861528715288152891529015291152921529315294152951529615297152981529915300153011530215303153041530515306153071530815309153101531115312153131531415315153161531715318153191532015321153221532315324153251532615327153281532915330153311533215333153341533515336153371533815339153401534115342153431534415345153461534715348153491535015351153521535315354153551535615357153581535915360153611536215363153641536515366153671536815369153701537115372153731537415375153761537715378153791538015381153821538315384153851538615387153881538915390153911539215393153941539515396153971539815399154001540115402154031540415405154061540715408154091541015411154121541315414154151541615417154181541915420154211542215423154241542515426154271542815429154301543115432154331543415435154361543715438154391544015441154421544315444154451544615447154481544915450154511545215453154541545515456154571545815459154601546115462154631546415465154661546715468154691547015471154721547315474154751547615477154781547915480154811548215483154841548515486154871548815489154901549115492154931549415495154961549715498154991550015501155021550315504155051550615507155081550915510155111551215513155141551515516155171551815519155201552115522155231552415525155261552715528155291553015531155321553315534155351553615537155381553915540155411554215543155441554515546155471554815549155501555115552155531555415555155561555715558155591556015561155621556315564155651556615567155681556915570155711557215573155741557515576155771557815579155801558115582155831558415585155861558715588155891559015591155921559315594155951559615597155981559915600156011560215603156041560515606156071560815609156101561115612156131561415615156161561715618156191562015621156221562315624156251562615627156281562915630156311563215633156341563515636156371563815639156401564115642156431564415645156461564715648156491565015651156521565315654156551565615657156581565915660156611566215663156641566515666156671566815669156701567115672156731567415675156761567715678156791568015681156821568315684156851568615687156881568915690156911569215693156941569515696156971569815699157001570115702157031570415705157061570715708157091571015711157121571315714157151571615717157181571915720157211572215723157241572515726157271572815729157301573115732157331573415735157361573715738157391574015741157421574315744157451574615747157481574915750157511575215753157541575515756157571575815759157601576115762157631576415765157661576715768157691577015771157721577315774157751577615777157781577915780157811578215783157841578515786157871578815789157901579115792157931579415795157961579715798157991580015801158021580315804158051580615807158081580915810158111581215813158141581515816158171581815819158201582115822158231582415825158261582715828158291583015831158321583315834158351583615837158381583915840158411584215843158441584515846158471584815849158501585115852158531585415855158561585715858158591586015861158621586315864158651586615867158681586915870158711587215873158741587515876158771587815879158801588115882158831588415885158861588715888158891589015891158921589315894158951589615897158981589915900159011590215903159041590515906159071590815909159101591115912159131591415915159161591715918159191592015921159221592315924159251592615927159281592915930159311593215933159341593515936159371593815939159401594115942159431594415945159461594715948159491595015951159521595315954159551595615957159581595915960159611596215963159641596515966159671596815969159701597115972159731597415975159761597715978159791598015981159821598315984159851598615987159881598915990159911599215993159941599515996159971599815999160001600116002160031600416005160061600716008160091601016011160121601316014160151601616017160181601916020160211602216023160241602516026160271602816029160301603116032160331603416035160361603716038160391604016041160421604316044160451604616047160481604916050160511605216053160541605516056160571605816059160601606116062160631606416065160661606716068160691607016071160721607316074160751607616077160781607916080160811608216083160841608516086160871608816089160901609116092160931609416095160961609716098160991610016101161021610316104161051610616107161081610916110161111611216113161141611516116161171611816119161201612116122161231612416125161261612716128161291613016131161321613316134161351613616137161381613916140161411614216143161441614516146161471614816149161501615116152161531615416155161561615716158161591616016161161621616316164161651616616167161681616916170161711617216173161741617516176161771617816179161801618116182161831618416185161861618716188161891619016191161921619316194161951619616197161981619916200162011620216203162041620516206162071620816209162101621116212162131621416215162161621716218162191622016221162221622316224162251622616227162281622916230162311623216233162341623516236162371623816239162401624116242162431624416245162461624716248162491625016251162521625316254162551625616257162581625916260162611626216263162641626516266162671626816269162701627116272162731627416275162761627716278162791628016281162821628316284162851628616287162881628916290162911629216293162941629516296162971629816299163001630116302163031630416305163061630716308163091631016311163121631316314163151631616317163181631916320163211632216323163241632516326163271632816329163301633116332163331633416335163361633716338163391634016341163421634316344163451634616347163481634916350163511635216353163541635516356163571635816359163601636116362163631636416365163661636716368163691637016371163721637316374163751637616377163781637916380163811638216383163841638516386163871638816389163901639116392163931639416395163961639716398163991640016401164021640316404164051640616407164081640916410164111641216413164141641516416164171641816419164201642116422164231642416425164261642716428164291643016431164321643316434164351643616437164381643916440164411644216443164441644516446164471644816449164501645116452164531645416455164561645716458164591646016461164621646316464164651646616467164681646916470164711647216473164741647516476164771647816479164801648116482164831648416485164861648716488164891649016491164921649316494164951649616497164981649916500165011650216503165041650516506165071650816509165101651116512165131651416515165161651716518165191652016521165221652316524165251652616527165281652916530165311653216533165341653516536165371653816539165401654116542165431654416545165461654716548165491655016551165521655316554165551655616557165581655916560165611656216563165641656516566165671656816569165701657116572165731657416575165761657716578165791658016581165821658316584165851658616587165881658916590165911659216593165941659516596165971659816599166001660116602166031660416605166061660716608166091661016611166121661316614166151661616617166181661916620166211662216623166241662516626166271662816629166301663116632166331663416635166361663716638166391664016641166421664316644166451664616647166481664916650166511665216653166541665516656166571665816659166601666116662166631666416665166661666716668166691667016671166721667316674166751667616677166781667916680166811668216683166841668516686166871668816689166901669116692166931669416695166961669716698166991670016701167021670316704167051670616707167081670916710167111671216713167141671516716167171671816719167201672116722167231672416725167261672716728167291673016731167321673316734167351673616737167381673916740167411674216743167441674516746167471674816749167501675116752167531675416755167561675716758167591676016761167621676316764167651676616767167681676916770167711677216773167741677516776167771677816779167801678116782167831678416785167861678716788167891679016791167921679316794167951679616797167981679916800168011680216803168041680516806168071680816809168101681116812168131681416815168161681716818168191682016821168221682316824168251682616827168281682916830168311683216833168341683516836168371683816839168401684116842168431684416845168461684716848168491685016851168521685316854168551685616857168581685916860168611686216863168641686516866168671686816869168701687116872168731687416875168761687716878168791688016881168821688316884168851688616887168881688916890168911689216893168941689516896168971689816899169001690116902169031690416905169061690716908169091691016911169121691316914169151691616917169181691916920169211692216923169241692516926169271692816929169301693116932169331693416935169361693716938169391694016941169421694316944169451694616947169481694916950169511695216953169541695516956169571695816959169601696116962169631696416965169661696716968169691697016971169721697316974169751697616977169781697916980169811698216983169841698516986169871698816989169901699116992169931699416995169961699716998169991700017001170021700317004170051700617007170081700917010170111701217013170141701517016170171701817019170201702117022170231702417025170261702717028170291703017031170321703317034170351703617037170381703917040170411704217043170441704517046170471704817049170501705117052170531705417055170561705717058170591706017061170621706317064170651706617067170681706917070170711707217073170741707517076170771707817079170801708117082170831708417085170861708717088170891709017091170921709317094170951709617097170981709917100171011710217103171041710517106171071710817109171101711117112171131711417115171161711717118171191712017121171221712317124171251712617127171281712917130171311713217133171341713517136171371713817139171401714117142171431714417145171461714717148171491715017151171521715317154171551715617157171581715917160171611716217163171641716517166171671716817169171701717117172171731717417175171761717717178171791718017181171821718317184171851718617187171881718917190171911719217193171941719517196171971719817199172001720117202172031720417205172061720717208172091721017211172121721317214172151721617217172181721917220172211722217223172241722517226172271722817229172301723117232172331723417235172361723717238172391724017241172421724317244172451724617247172481724917250172511725217253172541725517256172571725817259172601726117262172631726417265172661726717268172691727017271172721727317274172751727617277172781727917280172811728217283172841728517286172871728817289172901729117292172931729417295172961729717298172991730017301173021730317304173051730617307173081730917310173111731217313173141731517316173171731817319173201732117322173231732417325173261732717328173291733017331173321733317334173351733617337173381733917340173411734217343173441734517346173471734817349173501735117352173531735417355173561735717358173591736017361173621736317364173651736617367173681736917370173711737217373173741737517376173771737817379173801738117382173831738417385173861738717388173891739017391173921739317394173951739617397173981739917400174011740217403174041740517406174071740817409174101741117412174131741417415174161741717418174191742017421174221742317424174251742617427174281742917430174311743217433174341743517436174371743817439174401744117442174431744417445174461744717448174491745017451174521745317454174551745617457174581745917460174611746217463174641746517466174671746817469174701747117472174731747417475174761747717478174791748017481174821748317484174851748617487174881748917490174911749217493174941749517496174971749817499175001750117502175031750417505175061750717508175091751017511175121751317514175151751617517175181751917520175211752217523175241752517526175271752817529175301753117532175331753417535175361753717538175391754017541175421754317544175451754617547175481754917550175511755217553175541755517556175571755817559175601756117562175631756417565175661756717568175691757017571175721757317574175751757617577175781757917580175811758217583175841758517586175871758817589175901759117592175931759417595175961759717598175991760017601176021760317604176051760617607176081760917610176111761217613176141761517616176171761817619176201762117622176231762417625176261762717628176291763017631176321763317634176351763617637176381763917640176411764217643176441764517646176471764817649176501765117652176531765417655176561765717658176591766017661176621766317664176651766617667176681766917670176711767217673176741767517676176771767817679176801768117682176831768417685176861768717688176891769017691176921769317694176951769617697176981769917700177011770217703177041770517706177071770817709177101771117712177131771417715177161771717718177191772017721177221772317724177251772617727177281772917730177311773217733177341773517736177371773817739177401774117742177431774417745177461774717748177491775017751177521775317754177551775617757177581775917760177611776217763177641776517766177671776817769177701777117772177731777417775177761777717778177791778017781177821778317784177851778617787177881778917790177911779217793177941779517796177971779817799178001780117802178031780417805178061780717808178091781017811178121781317814178151781617817178181781917820178211782217823178241782517826178271782817829178301783117832178331783417835178361783717838178391784017841178421784317844178451784617847178481784917850178511785217853178541785517856178571785817859178601786117862178631786417865178661786717868178691787017871178721787317874178751787617877178781787917880178811788217883178841788517886178871788817889178901789117892178931789417895178961789717898178991790017901179021790317904179051790617907179081790917910179111791217913179141791517916179171791817919179201792117922179231792417925179261792717928179291793017931179321793317934179351793617937179381793917940179411794217943179441794517946179471794817949179501795117952179531795417955179561795717958179591796017961179621796317964179651796617967179681796917970179711797217973179741797517976179771797817979179801798117982179831798417985179861798717988179891799017991179921799317994179951799617997179981799918000180011800218003180041800518006180071800818009180101801118012180131801418015180161801718018180191802018021180221802318024180251802618027180281802918030180311803218033180341803518036180371803818039180401804118042180431804418045180461804718048180491805018051180521805318054180551805618057180581805918060180611806218063180641806518066180671806818069180701807118072180731807418075180761807718078180791808018081180821808318084180851808618087180881808918090180911809218093180941809518096180971809818099181001810118102181031810418105181061810718108181091811018111181121811318114181151811618117181181811918120181211812218123181241812518126181271812818129181301813118132181331813418135181361813718138181391814018141181421814318144181451814618147181481814918150181511815218153181541815518156181571815818159181601816118162181631816418165181661816718168181691817018171181721817318174181751817618177181781817918180181811818218183181841818518186181871818818189181901819118192181931819418195181961819718198181991820018201182021820318204182051820618207182081820918210182111821218213182141821518216182171821818219182201822118222182231822418225182261822718228182291823018231182321823318234182351823618237182381823918240182411824218243182441824518246182471824818249182501825118252182531825418255182561825718258182591826018261182621826318264182651826618267182681826918270182711827218273182741827518276182771827818279182801828118282182831828418285182861828718288182891829018291182921829318294182951829618297182981829918300183011830218303183041830518306183071830818309183101831118312183131831418315183161831718318183191832018321183221832318324183251832618327183281832918330183311833218333183341833518336183371833818339183401834118342183431834418345183461834718348183491835018351183521835318354183551835618357183581835918360183611836218363183641836518366183671836818369183701837118372183731837418375183761837718378183791838018381183821838318384183851838618387183881838918390183911839218393183941839518396183971839818399184001840118402184031840418405184061840718408184091841018411184121841318414184151841618417184181841918420184211842218423184241842518426184271842818429184301843118432184331843418435184361843718438184391844018441184421844318444184451844618447184481844918450184511845218453184541845518456184571845818459184601846118462184631846418465184661846718468184691847018471184721847318474184751847618477184781847918480184811848218483184841848518486184871848818489184901849118492184931849418495184961849718498184991850018501185021850318504185051850618507185081850918510185111851218513185141851518516185171851818519185201852118522185231852418525185261852718528185291853018531185321853318534185351853618537185381853918540185411854218543185441854518546185471854818549185501855118552185531855418555185561855718558185591856018561185621856318564185651856618567185681856918570185711857218573185741857518576185771857818579185801858118582185831858418585185861858718588185891859018591185921859318594185951859618597185981859918600186011860218603186041860518606186071860818609186101861118612186131861418615186161861718618186191862018621186221862318624186251862618627186281862918630186311863218633186341863518636186371863818639186401864118642186431864418645186461864718648186491865018651186521865318654186551865618657186581865918660186611866218663186641866518666186671866818669186701867118672186731867418675186761867718678186791868018681186821868318684186851868618687186881868918690186911869218693186941869518696186971869818699187001870118702187031870418705187061870718708187091871018711187121871318714187151871618717187181871918720187211872218723187241872518726187271872818729187301873118732187331873418735187361873718738187391874018741187421874318744187451874618747187481874918750187511875218753187541875518756187571875818759187601876118762187631876418765187661876718768187691877018771187721877318774187751877618777187781877918780187811878218783187841878518786187871878818789187901879118792187931879418795187961879718798187991880018801188021880318804188051880618807188081880918810188111881218813188141881518816188171881818819188201882118822188231882418825188261882718828188291883018831188321883318834188351883618837188381883918840188411884218843188441884518846188471884818849188501885118852188531885418855188561885718858188591886018861188621886318864188651886618867188681886918870188711887218873188741887518876188771887818879188801888118882188831888418885188861888718888188891889018891188921889318894188951889618897188981889918900189011890218903189041890518906189071890818909189101891118912189131891418915189161891718918189191892018921189221892318924189251892618927189281892918930189311893218933189341893518936189371893818939189401894118942189431894418945189461894718948189491895018951189521895318954189551895618957189581895918960189611896218963189641896518966189671896818969189701897118972189731897418975189761897718978189791898018981189821898318984189851898618987189881898918990189911899218993189941899518996189971899818999190001900119002190031900419005190061900719008190091901019011190121901319014190151901619017190181901919020190211902219023190241902519026190271902819029190301903119032190331903419035190361903719038190391904019041190421904319044190451904619047190481904919050190511905219053190541905519056190571905819059190601906119062190631906419065190661906719068190691907019071190721907319074190751907619077190781907919080190811908219083190841908519086190871908819089190901909119092190931909419095190961909719098190991910019101191021910319104191051910619107191081910919110191111911219113191141911519116191171911819119191201912119122191231912419125191261912719128191291913019131191321913319134191351913619137191381913919140191411914219143191441914519146191471914819149191501915119152191531915419155191561915719158191591916019161191621916319164191651916619167191681916919170191711917219173191741917519176191771917819179191801918119182191831918419185191861918719188191891919019191191921919319194191951919619197191981919919200192011920219203192041920519206192071920819209192101921119212192131921419215192161921719218192191922019221192221922319224192251922619227192281922919230192311923219233192341923519236192371923819239192401924119242192431924419245192461924719248192491925019251192521925319254192551925619257192581925919260192611926219263192641926519266192671926819269192701927119272192731927419275192761927719278192791928019281192821928319284192851928619287192881928919290192911929219293192941929519296192971929819299193001930119302193031930419305193061930719308193091931019311193121931319314193151931619317193181931919320193211932219323193241932519326193271932819329193301933119332193331933419335193361933719338193391934019341193421934319344193451934619347193481934919350193511935219353193541935519356193571935819359193601936119362193631936419365193661936719368193691937019371193721937319374193751937619377193781937919380193811938219383193841938519386193871938819389193901939119392193931939419395193961939719398193991940019401194021940319404194051940619407194081940919410194111941219413194141941519416194171941819419194201942119422194231942419425194261942719428194291943019431194321943319434194351943619437194381943919440194411944219443194441944519446194471944819449194501945119452194531945419455194561945719458194591946019461194621946319464194651946619467194681946919470194711947219473194741947519476194771947819479194801948119482194831948419485194861948719488194891949019491194921949319494194951949619497194981949919500195011950219503195041950519506195071950819509195101951119512195131951419515195161951719518195191952019521195221952319524195251952619527195281952919530195311953219533195341953519536195371953819539195401954119542195431954419545195461954719548195491955019551195521955319554195551955619557195581955919560195611956219563195641956519566195671956819569195701957119572195731957419575195761957719578195791958019581195821958319584195851958619587195881958919590195911959219593195941959519596195971959819599196001960119602196031960419605196061960719608196091961019611196121961319614196151961619617196181961919620196211962219623196241962519626196271962819629196301963119632196331963419635196361963719638196391964019641196421964319644196451964619647196481964919650196511965219653196541965519656196571965819659196601966119662196631966419665196661966719668196691967019671196721967319674196751967619677196781967919680196811968219683196841968519686196871968819689196901969119692196931969419695196961969719698196991970019701197021970319704197051970619707197081970919710197111971219713197141971519716197171971819719197201972119722197231972419725197261972719728197291973019731197321973319734197351973619737197381973919740197411974219743197441974519746197471974819749197501975119752197531975419755197561975719758197591976019761197621976319764197651976619767197681976919770197711977219773197741977519776197771977819779197801978119782197831978419785197861978719788197891979019791197921979319794197951979619797197981979919800198011980219803198041980519806198071980819809198101981119812198131981419815198161981719818198191982019821198221982319824198251982619827198281982919830198311983219833198341983519836198371983819839198401984119842198431984419845198461984719848198491985019851198521985319854198551985619857198581985919860198611986219863198641986519866198671986819869198701987119872198731987419875198761987719878198791988019881198821988319884198851988619887198881988919890198911989219893198941989519896198971989819899199001990119902199031990419905199061990719908199091991019911199121991319914199151991619917199181991919920199211992219923199241992519926199271992819929199301993119932199331993419935199361993719938199391994019941199421994319944199451994619947199481994919950199511995219953199541995519956199571995819959199601996119962199631996419965199661996719968199691997019971199721997319974199751997619977199781997919980199811998219983199841998519986199871998819989199901999119992199931999419995199961999719998199992000020001200022000320004200052000620007200082000920010200112001220013200142001520016200172001820019200202002120022200232002420025200262002720028200292003020031200322003320034200352003620037200382003920040200412004220043200442004520046200472004820049200502005120052200532005420055200562005720058200592006020061200622006320064200652006620067200682006920070200712007220073200742007520076200772007820079200802008120082200832008420085200862008720088200892009020091200922009320094200952009620097200982009920100201012010220103201042010520106201072010820109201102011120112201132011420115201162011720118201192012020121201222012320124201252012620127201282012920130201312013220133201342013520136201372013820139201402014120142201432014420145201462014720148201492015020151201522015320154201552015620157201582015920160201612016220163201642016520166201672016820169201702017120172201732017420175201762017720178201792018020181201822018320184201852018620187201882018920190201912019220193201942019520196201972019820199202002020120202202032020420205202062020720208202092021020211202122021320214202152021620217202182021920220202212022220223202242022520226202272022820229202302023120232202332023420235202362023720238202392024020241202422024320244202452024620247202482024920250202512025220253202542025520256202572025820259202602026120262202632026420265202662026720268202692027020271202722027320274202752027620277202782027920280202812028220283202842028520286202872028820289202902029120292202932029420295202962029720298202992030020301203022030320304203052030620307203082030920310203112031220313203142031520316203172031820319203202032120322203232032420325203262032720328203292033020331203322033320334203352033620337203382033920340203412034220343203442034520346203472034820349203502035120352203532035420355203562035720358203592036020361203622036320364203652036620367203682036920370203712037220373203742037520376203772037820379203802038120382203832038420385203862038720388203892039020391203922039320394203952039620397203982039920400204012040220403204042040520406204072040820409204102041120412204132041420415204162041720418204192042020421204222042320424204252042620427204282042920430204312043220433204342043520436204372043820439204402044120442204432044420445204462044720448204492045020451204522045320454204552045620457204582045920460204612046220463204642046520466204672046820469204702047120472204732047420475204762047720478204792048020481204822048320484204852048620487204882048920490204912049220493204942049520496204972049820499205002050120502205032050420505205062050720508205092051020511205122051320514205152051620517205182051920520205212052220523205242052520526205272052820529205302053120532205332053420535205362053720538205392054020541205422054320544205452054620547205482054920550205512055220553205542055520556205572055820559205602056120562205632056420565205662056720568205692057020571205722057320574205752057620577205782057920580205812058220583205842058520586205872058820589205902059120592205932059420595205962059720598205992060020601206022060320604206052060620607206082060920610206112061220613206142061520616206172061820619206202062120622206232062420625206262062720628206292063020631206322063320634206352063620637206382063920640206412064220643206442064520646206472064820649206502065120652206532065420655206562065720658206592066020661206622066320664206652066620667206682066920670206712067220673206742067520676206772067820679206802068120682206832068420685206862068720688206892069020691206922069320694206952069620697206982069920700207012070220703207042070520706207072070820709207102071120712207132071420715207162071720718207192072020721207222072320724207252072620727207282072920730207312073220733207342073520736207372073820739207402074120742207432074420745207462074720748207492075020751207522075320754207552075620757207582075920760207612076220763207642076520766207672076820769207702077120772207732077420775207762077720778207792078020781207822078320784207852078620787207882078920790207912079220793207942079520796207972079820799208002080120802208032080420805208062080720808208092081020811208122081320814208152081620817208182081920820208212082220823208242082520826208272082820829208302083120832208332083420835208362083720838208392084020841208422084320844208452084620847208482084920850208512085220853208542085520856208572085820859208602086120862208632086420865208662086720868208692087020871208722087320874208752087620877208782087920880208812088220883208842088520886208872088820889208902089120892208932089420895208962089720898208992090020901209022090320904209052090620907209082090920910209112091220913209142091520916209172091820919209202092120922209232092420925209262092720928209292093020931209322093320934209352093620937209382093920940209412094220943209442094520946209472094820949209502095120952209532095420955209562095720958209592096020961209622096320964209652096620967209682096920970209712097220973209742097520976209772097820979209802098120982209832098420985209862098720988209892099020991209922099320994209952099620997209982099921000210012100221003210042100521006210072100821009210102101121012210132101421015210162101721018210192102021021210222102321024210252102621027210282102921030210312103221033210342103521036210372103821039210402104121042210432104421045210462104721048210492105021051210522105321054210552105621057210582105921060210612106221063210642106521066210672106821069210702107121072210732107421075210762107721078210792108021081210822108321084210852108621087210882108921090210912109221093210942109521096210972109821099211002110121102211032110421105211062110721108211092111021111211122111321114211152111621117211182111921120211212112221123211242112521126211272112821129211302113121132211332113421135211362113721138211392114021141211422114321144211452114621147211482114921150211512115221153211542115521156211572115821159211602116121162211632116421165211662116721168211692117021171211722117321174211752117621177211782117921180211812118221183211842118521186211872118821189211902119121192211932119421195211962119721198211992120021201212022120321204212052120621207212082120921210212112121221213212142121521216212172121821219212202122121222212232122421225212262122721228212292123021231212322123321234212352123621237212382123921240212412124221243212442124521246212472124821249212502125121252212532125421255212562125721258212592126021261212622126321264212652126621267212682126921270212712127221273212742127521276212772127821279212802128121282212832128421285212862128721288212892129021291212922129321294212952129621297212982129921300213012130221303213042130521306213072130821309213102131121312213132131421315213162131721318213192132021321213222132321324213252132621327213282132921330213312133221333213342133521336213372133821339213402134121342213432134421345213462134721348213492135021351213522135321354213552135621357213582135921360213612136221363213642136521366213672136821369213702137121372213732137421375213762137721378213792138021381213822138321384213852138621387213882138921390213912139221393213942139521396213972139821399214002140121402214032140421405214062140721408214092141021411214122141321414214152141621417214182141921420214212142221423214242142521426214272142821429214302143121432214332143421435214362143721438214392144021441214422144321444214452144621447214482144921450214512145221453214542145521456214572145821459214602146121462214632146421465214662146721468214692147021471214722147321474214752147621477214782147921480214812148221483214842148521486214872148821489214902149121492214932149421495214962149721498214992150021501215022150321504215052150621507215082150921510215112151221513215142151521516215172151821519215202152121522215232152421525215262152721528215292153021531215322153321534215352153621537215382153921540215412154221543215442154521546215472154821549215502155121552215532155421555215562155721558215592156021561215622156321564215652156621567215682156921570215712157221573215742157521576215772157821579215802158121582215832158421585215862158721588215892159021591215922159321594215952159621597215982159921600216012160221603216042160521606216072160821609216102161121612216132161421615216162161721618216192162021621216222162321624216252162621627216282162921630216312163221633216342163521636216372163821639216402164121642216432164421645216462164721648216492165021651216522165321654216552165621657216582165921660216612166221663216642166521666216672166821669216702167121672216732167421675216762167721678216792168021681216822168321684216852168621687216882168921690216912169221693216942169521696216972169821699217002170121702217032170421705217062170721708217092171021711217122171321714217152171621717217182171921720217212172221723217242172521726217272172821729217302173121732217332173421735217362173721738217392174021741217422174321744217452174621747217482174921750217512175221753217542175521756217572175821759217602176121762217632176421765217662176721768217692177021771217722177321774217752177621777217782177921780217812178221783217842178521786217872178821789217902179121792217932179421795217962179721798217992180021801218022180321804218052180621807218082180921810218112181221813218142181521816218172181821819218202182121822218232182421825218262182721828218292183021831218322183321834218352183621837218382183921840218412184221843218442184521846218472184821849218502185121852218532185421855218562185721858218592186021861218622186321864218652186621867218682186921870218712187221873218742187521876218772187821879218802188121882218832188421885218862188721888218892189021891218922189321894218952189621897218982189921900219012190221903219042190521906219072190821909219102191121912219132191421915219162191721918219192192021921219222192321924219252192621927219282192921930219312193221933219342193521936219372193821939219402194121942219432194421945219462194721948219492195021951219522195321954219552195621957219582195921960219612196221963219642196521966219672196821969219702197121972219732197421975219762197721978219792198021981219822198321984219852198621987219882198921990219912199221993219942199521996219972199821999220002200122002220032200422005220062200722008220092201022011220122201322014220152201622017220182201922020220212202222023220242202522026220272202822029220302203122032220332203422035220362203722038220392204022041220422204322044220452204622047220482204922050220512205222053220542205522056220572205822059220602206122062220632206422065220662206722068220692207022071220722207322074220752207622077220782207922080220812208222083220842208522086220872208822089220902209122092220932209422095220962209722098220992210022101221022210322104221052210622107221082210922110221112211222113221142211522116221172211822119221202212122122221232212422125221262212722128221292213022131221322213322134221352213622137221382213922140221412214222143221442214522146221472214822149221502215122152221532215422155221562215722158221592216022161221622216322164221652216622167221682216922170221712217222173221742217522176221772217822179221802218122182221832218422185221862218722188221892219022191221922219322194221952219622197221982219922200222012220222203222042220522206222072220822209222102221122212222132221422215222162221722218222192222022221222222222322224222252222622227222282222922230222312223222233222342223522236222372223822239222402224122242222432224422245222462224722248222492225022251222522225322254222552225622257222582225922260222612226222263222642226522266222672226822269222702227122272222732227422275222762227722278222792228022281222822228322284222852228622287222882228922290222912229222293222942229522296222972229822299223002230122302223032230422305223062230722308223092231022311223122231322314223152231622317223182231922320223212232222323223242232522326223272232822329223302233122332223332233422335223362233722338223392234022341223422234322344223452234622347223482234922350223512235222353223542235522356223572235822359223602236122362223632236422365223662236722368223692237022371223722237322374223752237622377223782237922380223812238222383223842238522386223872238822389223902239122392223932239422395223962239722398223992240022401224022240322404224052240622407224082240922410224112241222413224142241522416224172241822419224202242122422224232242422425224262242722428224292243022431224322243322434224352243622437224382243922440224412244222443224442244522446224472244822449224502245122452224532245422455224562245722458224592246022461224622246322464224652246622467224682246922470224712247222473224742247522476224772247822479224802248122482224832248422485224862248722488224892249022491224922249322494224952249622497224982249922500225012250222503225042250522506225072250822509225102251122512225132251422515225162251722518225192252022521225222252322524225252252622527225282252922530225312253222533225342253522536225372253822539225402254122542225432254422545225462254722548225492255022551225522255322554225552255622557225582255922560225612256222563225642256522566225672256822569225702257122572225732257422575225762257722578225792258022581225822258322584225852258622587225882258922590225912259222593225942259522596225972259822599226002260122602226032260422605226062260722608226092261022611226122261322614226152261622617226182261922620226212262222623226242262522626226272262822629226302263122632226332263422635226362263722638226392264022641226422264322644226452264622647226482264922650226512265222653226542265522656226572265822659226602266122662226632266422665226662266722668226692267022671226722267322674226752267622677226782267922680226812268222683226842268522686226872268822689226902269122692226932269422695226962269722698226992270022701227022270322704227052270622707227082270922710227112271222713227142271522716227172271822719227202272122722227232272422725227262272722728227292273022731227322273322734227352273622737227382273922740227412274222743227442274522746227472274822749227502275122752227532275422755227562275722758227592276022761227622276322764227652276622767227682276922770227712277222773227742277522776227772277822779227802278122782227832278422785227862278722788227892279022791227922279322794227952279622797227982279922800228012280222803228042280522806228072280822809228102281122812228132281422815228162281722818228192282022821228222282322824228252282622827228282282922830228312283222833228342283522836228372283822839228402284122842228432284422845228462284722848228492285022851228522285322854228552285622857228582285922860228612286222863228642286522866228672286822869228702287122872228732287422875228762287722878228792288022881228822288322884228852288622887228882288922890228912289222893228942289522896228972289822899229002290122902229032290422905229062290722908229092291022911229122291322914229152291622917229182291922920229212292222923229242292522926229272292822929229302293122932229332293422935229362293722938229392294022941229422294322944229452294622947229482294922950229512295222953229542295522956229572295822959229602296122962229632296422965229662296722968229692297022971229722297322974229752297622977229782297922980229812298222983229842298522986229872298822989229902299122992229932299422995229962299722998229992300023001230022300323004230052300623007230082300923010230112301223013230142301523016230172301823019230202302123022230232302423025230262302723028230292303023031230322303323034230352303623037230382303923040230412304223043230442304523046230472304823049230502305123052230532305423055230562305723058230592306023061230622306323064230652306623067230682306923070230712307223073230742307523076230772307823079230802308123082230832308423085230862308723088230892309023091230922309323094230952309623097230982309923100231012310223103231042310523106231072310823109231102311123112231132311423115231162311723118231192312023121231222312323124231252312623127231282312923130231312313223133231342313523136231372313823139231402314123142231432314423145231462314723148231492315023151231522315323154231552315623157231582315923160231612316223163231642316523166231672316823169231702317123172231732317423175231762317723178231792318023181231822318323184231852318623187231882318923190231912319223193231942319523196231972319823199232002320123202232032320423205232062320723208232092321023211232122321323214232152321623217232182321923220232212322223223232242322523226232272322823229232302323123232232332323423235232362323723238232392324023241232422324323244232452324623247232482324923250232512325223253232542325523256232572325823259232602326123262232632326423265232662326723268232692327023271232722327323274232752327623277232782327923280232812328223283232842328523286232872328823289232902329123292232932329423295232962329723298232992330023301233022330323304233052330623307233082330923310233112331223313233142331523316233172331823319233202332123322233232332423325233262332723328233292333023331233322333323334233352333623337233382333923340233412334223343233442334523346233472334823349233502335123352233532335423355233562335723358233592336023361233622336323364233652336623367233682336923370233712337223373233742337523376233772337823379233802338123382233832338423385233862338723388233892339023391233922339323394233952339623397233982339923400234012340223403234042340523406234072340823409234102341123412234132341423415234162341723418234192342023421234222342323424234252342623427234282342923430234312343223433234342343523436234372343823439234402344123442234432344423445234462344723448234492345023451234522345323454234552345623457234582345923460234612346223463234642346523466234672346823469234702347123472234732347423475234762347723478234792348023481234822348323484234852348623487234882348923490234912349223493234942349523496234972349823499235002350123502235032350423505235062350723508235092351023511235122351323514235152351623517235182351923520235212352223523235242352523526235272352823529235302353123532235332353423535235362353723538235392354023541235422354323544235452354623547235482354923550235512355223553235542355523556235572355823559235602356123562235632356423565235662356723568235692357023571235722357323574235752357623577235782357923580235812358223583235842358523586235872358823589235902359123592235932359423595235962359723598235992360023601236022360323604236052360623607236082360923610236112361223613236142361523616236172361823619236202362123622236232362423625236262362723628236292363023631236322363323634236352363623637236382363923640236412364223643236442364523646236472364823649236502365123652236532365423655236562365723658236592366023661236622366323664236652366623667236682366923670236712367223673236742367523676236772367823679236802368123682236832368423685236862368723688236892369023691236922369323694236952369623697236982369923700237012370223703237042370523706237072370823709237102371123712237132371423715237162371723718237192372023721237222372323724237252372623727237282372923730237312373223733237342373523736237372373823739237402374123742237432374423745237462374723748237492375023751237522375323754237552375623757237582375923760237612376223763237642376523766237672376823769237702377123772237732377423775237762377723778237792378023781237822378323784237852378623787237882378923790237912379223793237942379523796237972379823799238002380123802238032380423805238062380723808238092381023811238122381323814238152381623817238182381923820238212382223823238242382523826238272382823829238302383123832238332383423835238362383723838238392384023841238422384323844238452384623847238482384923850238512385223853238542385523856238572385823859238602386123862238632386423865238662386723868238692387023871238722387323874238752387623877238782387923880238812388223883238842388523886238872388823889238902389123892238932389423895238962389723898238992390023901239022390323904239052390623907239082390923910239112391223913239142391523916239172391823919239202392123922239232392423925239262392723928239292393023931239322393323934239352393623937239382393923940239412394223943239442394523946239472394823949239502395123952239532395423955239562395723958239592396023961239622396323964239652396623967239682396923970239712397223973239742397523976239772397823979239802398123982239832398423985239862398723988239892399023991239922399323994239952399623997239982399924000240012400224003240042400524006240072400824009240102401124012240132401424015240162401724018240192402024021240222402324024240252402624027240282402924030240312403224033240342403524036240372403824039240402404124042240432404424045240462404724048240492405024051240522405324054240552405624057240582405924060240612406224063240642406524066240672406824069240702407124072240732407424075240762407724078240792408024081240822408324084240852408624087240882408924090240912409224093240942409524096240972409824099241002410124102241032410424105241062410724108241092411024111241122411324114241152411624117241182411924120241212412224123241242412524126241272412824129241302413124132241332413424135241362413724138241392414024141241422414324144241452414624147241482414924150241512415224153241542415524156241572415824159241602416124162241632416424165241662416724168241692417024171241722417324174241752417624177241782417924180241812418224183241842418524186241872418824189241902419124192241932419424195241962419724198241992420024201242022420324204242052420624207242082420924210242112421224213242142421524216242172421824219242202422124222242232422424225242262422724228242292423024231242322423324234242352423624237242382423924240242412424224243242442424524246242472424824249242502425124252242532425424255242562425724258242592426024261242622426324264242652426624267242682426924270242712427224273242742427524276242772427824279242802428124282242832428424285242862428724288242892429024291242922429324294242952429624297242982429924300243012430224303243042430524306243072430824309243102431124312243132431424315243162431724318243192432024321243222432324324243252432624327243282432924330243312433224333243342433524336243372433824339243402434124342243432434424345243462434724348243492435024351243522435324354243552435624357243582435924360243612436224363243642436524366243672436824369243702437124372243732437424375243762437724378243792438024381243822438324384243852438624387243882438924390243912439224393243942439524396243972439824399244002440124402244032440424405244062440724408244092441024411244122441324414244152441624417244182441924420244212442224423244242442524426244272442824429244302443124432244332443424435244362443724438244392444024441244422444324444244452444624447244482444924450244512445224453244542445524456244572445824459244602446124462244632446424465244662446724468244692447024471244722447324474244752447624477244782447924480244812448224483244842448524486244872448824489244902449124492244932449424495244962449724498244992450024501245022450324504245052450624507245082450924510245112451224513245142451524516245172451824519245202452124522245232452424525245262452724528245292453024531245322453324534245352453624537245382453924540245412454224543245442454524546245472454824549245502455124552245532455424555245562455724558245592456024561245622456324564245652456624567245682456924570245712457224573245742457524576245772457824579245802458124582245832458424585245862458724588245892459024591245922459324594245952459624597245982459924600246012460224603246042460524606246072460824609246102461124612246132461424615246162461724618246192462024621246222462324624246252462624627246282462924630246312463224633246342463524636246372463824639246402464124642246432464424645246462464724648246492465024651246522465324654246552465624657246582465924660246612466224663246642466524666246672466824669246702467124672246732467424675246762467724678246792468024681246822468324684246852468624687246882468924690246912469224693246942469524696246972469824699247002470124702247032470424705247062470724708247092471024711247122471324714247152471624717247182471924720247212472224723247242472524726247272472824729247302473124732247332473424735247362473724738247392474024741247422474324744247452474624747247482474924750247512475224753247542475524756247572475824759247602476124762247632476424765247662476724768247692477024771247722477324774247752477624777247782477924780247812478224783247842478524786247872478824789247902479124792247932479424795247962479724798247992480024801248022480324804248052480624807248082480924810248112481224813248142481524816248172481824819248202482124822248232482424825248262482724828248292483024831248322483324834248352483624837248382483924840248412484224843248442484524846248472484824849248502485124852248532485424855248562485724858248592486024861248622486324864248652486624867248682486924870248712487224873248742487524876248772487824879248802488124882248832488424885248862488724888248892489024891248922489324894248952489624897248982489924900249012490224903249042490524906249072490824909249102491124912249132491424915249162491724918249192492024921249222492324924249252492624927249282492924930249312493224933249342493524936249372493824939249402494124942249432494424945249462494724948249492495024951249522495324954249552495624957249582495924960249612496224963249642496524966249672496824969249702497124972249732497424975249762497724978249792498024981249822498324984249852498624987249882498924990249912499224993249942499524996249972499824999250002500125002250032500425005250062500725008250092501025011250122501325014250152501625017250182501925020250212502225023250242502525026250272502825029250302503125032250332503425035250362503725038250392504025041250422504325044250452504625047250482504925050250512505225053250542505525056250572505825059250602506125062250632506425065250662506725068250692507025071250722507325074250752507625077250782507925080250812508225083250842508525086250872508825089250902509125092250932509425095250962509725098250992510025101251022510325104251052510625107251082510925110251112511225113251142511525116251172511825119251202512125122251232512425125251262512725128251292513025131251322513325134251352513625137251382513925140251412514225143251442514525146251472514825149251502515125152251532515425155251562515725158251592516025161251622516325164251652516625167251682516925170251712517225173251742517525176251772517825179251802518125182251832518425185251862518725188251892519025191251922519325194251952519625197251982519925200252012520225203252042520525206252072520825209252102521125212252132521425215252162521725218252192522025221252222522325224252252522625227252282522925230252312523225233252342523525236252372523825239252402524125242252432524425245252462524725248252492525025251252522525325254252552525625257252582525925260252612526225263252642526525266252672526825269252702527125272252732527425275252762527725278252792528025281252822528325284252852528625287252882528925290252912529225293252942529525296252972529825299253002530125302253032530425305253062530725308253092531025311253122531325314253152531625317253182531925320253212532225323253242532525326253272532825329253302533125332253332533425335253362533725338253392534025341253422534325344253452534625347253482534925350253512535225353253542535525356253572535825359253602536125362253632536425365253662536725368253692537025371253722537325374253752537625377253782537925380253812538225383253842538525386253872538825389253902539125392253932539425395253962539725398253992540025401254022540325404254052540625407254082540925410254112541225413254142541525416254172541825419254202542125422254232542425425254262542725428254292543025431254322543325434254352543625437254382543925440254412544225443254442544525446254472544825449254502545125452254532545425455254562545725458254592546025461254622546325464254652546625467254682546925470254712547225473254742547525476254772547825479254802548125482254832548425485254862548725488254892549025491254922549325494254952549625497254982549925500255012550225503255042550525506255072550825509255102551125512255132551425515255162551725518255192552025521255222552325524255252552625527255282552925530255312553225533255342553525536255372553825539255402554125542255432554425545255462554725548255492555025551255522555325554255552555625557255582555925560255612556225563255642556525566255672556825569255702557125572255732557425575255762557725578255792558025581255822558325584255852558625587255882558925590255912559225593255942559525596255972559825599256002560125602256032560425605256062560725608256092561025611256122561325614256152561625617256182561925620256212562225623256242562525626256272562825629256302563125632256332563425635256362563725638256392564025641256422564325644256452564625647256482564925650256512565225653256542565525656256572565825659256602566125662256632566425665256662566725668256692567025671256722567325674256752567625677256782567925680256812568225683256842568525686256872568825689256902569125692256932569425695256962569725698256992570025701257022570325704257052570625707257082570925710257112571225713257142571525716257172571825719257202572125722257232572425725257262572725728257292573025731257322573325734257352573625737257382573925740257412574225743257442574525746257472574825749257502575125752257532575425755257562575725758257592576025761257622576325764257652576625767257682576925770257712577225773257742577525776257772577825779257802578125782257832578425785257862578725788257892579025791257922579325794257952579625797257982579925800258012580225803258042580525806258072580825809258102581125812258132581425815258162581725818258192582025821258222582325824258252582625827258282582925830258312583225833258342583525836258372583825839258402584125842258432584425845258462584725848258492585025851258522585325854258552585625857258582585925860258612586225863258642586525866258672586825869258702587125872258732587425875258762587725878258792588025881258822588325884258852588625887258882588925890258912589225893258942589525896258972589825899259002590125902259032590425905259062590725908259092591025911259122591325914259152591625917259182591925920259212592225923259242592525926259272592825929259302593125932259332593425935259362593725938259392594025941259422594325944259452594625947259482594925950259512595225953259542595525956259572595825959259602596125962259632596425965259662596725968259692597025971259722597325974259752597625977259782597925980259812598225983259842598525986259872598825989259902599125992259932599425995259962599725998259992600026001260022600326004260052600626007260082600926010260112601226013260142601526016260172601826019260202602126022260232602426025260262602726028260292603026031260322603326034260352603626037260382603926040260412604226043260442604526046260472604826049260502605126052260532605426055260562605726058260592606026061260622606326064260652606626067260682606926070260712607226073260742607526076260772607826079260802608126082260832608426085260862608726088260892609026091260922609326094260952609626097260982609926100261012610226103261042610526106261072610826109261102611126112261132611426115261162611726118261192612026121261222612326124261252612626127261282612926130261312613226133261342613526136261372613826139261402614126142261432614426145261462614726148261492615026151261522615326154261552615626157261582615926160261612616226163261642616526166261672616826169261702617126172261732617426175261762617726178261792618026181261822618326184261852618626187261882618926190261912619226193261942619526196261972619826199262002620126202262032620426205262062620726208262092621026211262122621326214262152621626217262182621926220262212622226223262242622526226262272622826229262302623126232262332623426235262362623726238262392624026241262422624326244262452624626247262482624926250262512625226253262542625526256262572625826259262602626126262262632626426265262662626726268262692627026271262722627326274262752627626277262782627926280262812628226283262842628526286262872628826289262902629126292262932629426295262962629726298262992630026301263022630326304263052630626307263082630926310263112631226313263142631526316263172631826319263202632126322263232632426325263262632726328263292633026331263322633326334263352633626337263382633926340263412634226343263442634526346263472634826349263502635126352263532635426355263562635726358263592636026361263622636326364263652636626367263682636926370263712637226373263742637526376263772637826379263802638126382263832638426385263862638726388263892639026391263922639326394263952639626397263982639926400264012640226403264042640526406264072640826409264102641126412264132641426415264162641726418264192642026421264222642326424264252642626427264282642926430264312643226433264342643526436264372643826439264402644126442264432644426445264462644726448264492645026451264522645326454264552645626457264582645926460264612646226463264642646526466264672646826469264702647126472264732647426475264762647726478264792648026481264822648326484264852648626487264882648926490264912649226493264942649526496264972649826499265002650126502265032650426505265062650726508265092651026511265122651326514265152651626517265182651926520265212652226523265242652526526265272652826529265302653126532265332653426535265362653726538265392654026541265422654326544265452654626547265482654926550265512655226553265542655526556265572655826559265602656126562265632656426565265662656726568265692657026571265722657326574265752657626577265782657926580265812658226583265842658526586265872658826589265902659126592265932659426595265962659726598265992660026601266022660326604266052660626607266082660926610266112661226613266142661526616266172661826619266202662126622266232662426625266262662726628266292663026631266322663326634266352663626637266382663926640266412664226643266442664526646266472664826649266502665126652266532665426655266562665726658266592666026661266622666326664266652666626667266682666926670266712667226673266742667526676266772667826679266802668126682266832668426685266862668726688266892669026691266922669326694266952669626697266982669926700267012670226703267042670526706267072670826709267102671126712267132671426715267162671726718267192672026721267222672326724267252672626727267282672926730267312673226733267342673526736267372673826739267402674126742267432674426745267462674726748267492675026751267522675326754267552675626757267582675926760267612676226763267642676526766267672676826769267702677126772267732677426775267762677726778267792678026781267822678326784267852678626787267882678926790267912679226793267942679526796267972679826799268002680126802268032680426805268062680726808268092681026811268122681326814268152681626817268182681926820268212682226823268242682526826268272682826829268302683126832268332683426835268362683726838268392684026841268422684326844268452684626847268482684926850268512685226853268542685526856268572685826859268602686126862268632686426865268662686726868268692687026871268722687326874268752687626877268782687926880268812688226883268842688526886268872688826889268902689126892268932689426895268962689726898268992690026901269022690326904269052690626907269082690926910269112691226913269142691526916269172691826919269202692126922269232692426925269262692726928269292693026931269322693326934269352693626937269382693926940269412694226943269442694526946269472694826949269502695126952269532695426955269562695726958269592696026961269622696326964269652696626967269682696926970269712697226973269742697526976269772697826979269802698126982269832698426985269862698726988269892699026991269922699326994269952699626997269982699927000270012700227003270042700527006270072700827009270102701127012270132701427015270162701727018270192702027021270222702327024270252702627027270282702927030270312703227033270342703527036270372703827039270402704127042270432704427045270462704727048270492705027051270522705327054270552705627057270582705927060270612706227063270642706527066270672706827069270702707127072270732707427075270762707727078270792708027081270822708327084270852708627087270882708927090270912709227093270942709527096270972709827099271002710127102271032710427105271062710727108271092711027111271122711327114271152711627117271182711927120271212712227123271242712527126271272712827129271302713127132271332713427135271362713727138271392714027141271422714327144271452714627147271482714927150271512715227153271542715527156271572715827159271602716127162271632716427165271662716727168271692717027171271722717327174271752717627177271782717927180271812718227183271842718527186271872718827189271902719127192271932719427195271962719727198271992720027201272022720327204272052720627207272082720927210272112721227213272142721527216272172721827219272202722127222272232722427225272262722727228272292723027231272322723327234272352723627237272382723927240272412724227243272442724527246272472724827249272502725127252272532725427255272562725727258272592726027261272622726327264272652726627267272682726927270272712727227273272742727527276272772727827279272802728127282272832728427285272862728727288272892729027291272922729327294272952729627297272982729927300273012730227303273042730527306273072730827309273102731127312273132731427315273162731727318273192732027321273222732327324273252732627327273282732927330273312733227333273342733527336273372733827339273402734127342273432734427345273462734727348273492735027351273522735327354273552735627357273582735927360273612736227363273642736527366273672736827369273702737127372273732737427375273762737727378273792738027381273822738327384273852738627387273882738927390273912739227393273942739527396273972739827399274002740127402274032740427405274062740727408274092741027411274122741327414274152741627417274182741927420274212742227423274242742527426274272742827429274302743127432274332743427435274362743727438274392744027441274422744327444274452744627447274482744927450274512745227453274542745527456274572745827459274602746127462274632746427465274662746727468274692747027471274722747327474274752747627477274782747927480274812748227483274842748527486274872748827489274902749127492274932749427495274962749727498274992750027501275022750327504275052750627507275082750927510275112751227513275142751527516275172751827519275202752127522275232752427525275262752727528275292753027531275322753327534275352753627537275382753927540275412754227543275442754527546275472754827549275502755127552275532755427555275562755727558275592756027561275622756327564275652756627567275682756927570275712757227573275742757527576275772757827579275802758127582275832758427585275862758727588275892759027591275922759327594275952759627597275982759927600276012760227603276042760527606276072760827609276102761127612276132761427615276162761727618276192762027621276222762327624276252762627627276282762927630276312763227633276342763527636276372763827639276402764127642276432764427645276462764727648276492765027651276522765327654276552765627657276582765927660276612766227663276642766527666276672766827669276702767127672276732767427675276762767727678276792768027681276822768327684276852768627687276882768927690276912769227693276942769527696276972769827699277002770127702277032770427705277062770727708277092771027711277122771327714277152771627717277182771927720277212772227723277242772527726277272772827729277302773127732277332773427735277362773727738277392774027741277422774327744277452774627747277482774927750277512775227753277542775527756277572775827759277602776127762277632776427765277662776727768277692777027771277722777327774277752777627777277782777927780277812778227783277842778527786277872778827789277902779127792277932779427795277962779727798277992780027801278022780327804278052780627807278082780927810278112781227813278142781527816278172781827819278202782127822278232782427825278262782727828278292783027831278322783327834278352783627837278382783927840278412784227843278442784527846278472784827849278502785127852278532785427855278562785727858278592786027861278622786327864278652786627867278682786927870278712787227873278742787527876278772787827879278802788127882278832788427885278862788727888278892789027891278922789327894278952789627897278982789927900279012790227903279042790527906279072790827909279102791127912279132791427915279162791727918279192792027921279222792327924279252792627927279282792927930279312793227933279342793527936279372793827939279402794127942279432794427945279462794727948279492795027951279522795327954279552795627957279582795927960279612796227963279642796527966279672796827969279702797127972279732797427975279762797727978279792798027981279822798327984279852798627987279882798927990279912799227993279942799527996279972799827999280002800128002280032800428005280062800728008280092801028011280122801328014280152801628017280182801928020280212802228023280242802528026280272802828029280302803128032280332803428035280362803728038280392804028041280422804328044280452804628047280482804928050280512805228053280542805528056280572805828059280602806128062280632806428065280662806728068280692807028071280722807328074280752807628077280782807928080280812808228083280842808528086280872808828089280902809128092280932809428095280962809728098280992810028101281022810328104281052810628107281082810928110281112811228113281142811528116281172811828119281202812128122281232812428125281262812728128281292813028131281322813328134281352813628137281382813928140281412814228143281442814528146281472814828149281502815128152281532815428155281562815728158281592816028161281622816328164281652816628167281682816928170281712817228173281742817528176281772817828179281802818128182281832818428185281862818728188281892819028191281922819328194281952819628197281982819928200282012820228203282042820528206282072820828209282102821128212282132821428215282162821728218282192822028221282222822328224282252822628227282282822928230282312823228233282342823528236282372823828239282402824128242282432824428245282462824728248282492825028251282522825328254282552825628257282582825928260282612826228263282642826528266282672826828269282702827128272282732827428275282762827728278282792828028281282822828328284282852828628287282882828928290282912829228293282942829528296282972829828299283002830128302283032830428305283062830728308283092831028311283122831328314283152831628317283182831928320283212832228323283242832528326283272832828329283302833128332283332833428335283362833728338283392834028341283422834328344283452834628347283482834928350283512835228353283542835528356283572835828359283602836128362283632836428365283662836728368283692837028371283722837328374283752837628377283782837928380283812838228383283842838528386283872838828389283902839128392283932839428395283962839728398283992840028401284022840328404284052840628407284082840928410284112841228413284142841528416284172841828419284202842128422284232842428425284262842728428284292843028431284322843328434284352843628437284382843928440284412844228443284442844528446284472844828449284502845128452284532845428455284562845728458284592846028461284622846328464284652846628467284682846928470284712847228473284742847528476284772847828479284802848128482284832848428485284862848728488284892849028491284922849328494284952849628497284982849928500285012850228503285042850528506285072850828509285102851128512285132851428515285162851728518285192852028521285222852328524285252852628527285282852928530285312853228533285342853528536285372853828539285402854128542285432854428545285462854728548285492855028551285522855328554285552855628557285582855928560285612856228563285642856528566285672856828569285702857128572285732857428575285762857728578285792858028581285822858328584285852858628587285882858928590285912859228593285942859528596285972859828599286002860128602286032860428605286062860728608286092861028611286122861328614286152861628617286182861928620286212862228623286242862528626286272862828629286302863128632286332863428635286362863728638286392864028641286422864328644286452864628647286482864928650286512865228653286542865528656286572865828659286602866128662286632866428665286662866728668286692867028671286722867328674286752867628677286782867928680286812868228683286842868528686286872868828689286902869128692286932869428695286962869728698286992870028701287022870328704287052870628707287082870928710287112871228713287142871528716287172871828719287202872128722287232872428725287262872728728287292873028731287322873328734287352873628737287382873928740287412874228743287442874528746287472874828749287502875128752287532875428755287562875728758287592876028761287622876328764287652876628767287682876928770287712877228773287742877528776287772877828779287802878128782287832878428785287862878728788287892879028791287922879328794287952879628797287982879928800288012880228803288042880528806288072880828809288102881128812288132881428815288162881728818288192882028821288222882328824288252882628827288282882928830288312883228833288342883528836288372883828839288402884128842288432884428845288462884728848288492885028851288522885328854288552885628857288582885928860288612886228863288642886528866288672886828869288702887128872288732887428875288762887728878288792888028881288822888328884288852888628887288882888928890288912889228893288942889528896288972889828899289002890128902289032890428905289062890728908289092891028911289122891328914289152891628917289182891928920289212892228923289242892528926289272892828929289302893128932289332893428935289362893728938289392894028941289422894328944289452894628947289482894928950289512895228953289542895528956289572895828959289602896128962289632896428965289662896728968289692897028971289722897328974289752897628977289782897928980289812898228983289842898528986289872898828989289902899128992289932899428995289962899728998289992900029001290022900329004290052900629007290082900929010290112901229013290142901529016290172901829019290202902129022290232902429025290262902729028290292903029031290322903329034290352903629037290382903929040290412904229043290442904529046290472904829049290502905129052290532905429055290562905729058290592906029061290622906329064290652906629067290682906929070290712907229073290742907529076290772907829079290802908129082290832908429085290862908729088290892909029091290922909329094290952909629097290982909929100291012910229103291042910529106291072910829109291102911129112291132911429115291162911729118291192912029121291222912329124291252912629127291282912929130291312913229133291342913529136291372913829139291402914129142291432914429145291462914729148291492915029151291522915329154291552915629157291582915929160291612916229163291642916529166291672916829169291702917129172291732917429175291762917729178291792918029181291822918329184291852918629187291882918929190291912919229193291942919529196291972919829199292002920129202292032920429205292062920729208292092921029211292122921329214292152921629217292182921929220292212922229223292242922529226292272922829229292302923129232292332923429235292362923729238292392924029241292422924329244292452924629247292482924929250292512925229253292542925529256292572925829259292602926129262292632926429265292662926729268292692927029271292722927329274292752927629277292782927929280292812928229283292842928529286292872928829289292902929129292292932929429295292962929729298292992930029301293022930329304293052930629307293082930929310293112931229313293142931529316293172931829319293202932129322293232932429325293262932729328293292933029331293322933329334293352933629337293382933929340293412934229343293442934529346293472934829349293502935129352293532935429355293562935729358293592936029361293622936329364293652936629367293682936929370293712937229373293742937529376293772937829379293802938129382293832938429385293862938729388293892939029391293922939329394293952939629397293982939929400294012940229403294042940529406294072940829409294102941129412294132941429415294162941729418294192942029421294222942329424294252942629427294282942929430294312943229433294342943529436294372943829439294402944129442294432944429445294462944729448294492945029451294522945329454294552945629457294582945929460294612946229463294642946529466294672946829469294702947129472294732947429475294762947729478294792948029481294822948329484294852948629487294882948929490294912949229493294942949529496294972949829499295002950129502295032950429505295062950729508295092951029511295122951329514295152951629517295182951929520295212952229523295242952529526295272952829529295302953129532295332953429535295362953729538295392954029541295422954329544295452954629547295482954929550295512955229553295542955529556295572955829559295602956129562295632956429565295662956729568295692957029571295722957329574295752957629577295782957929580295812958229583295842958529586295872958829589295902959129592295932959429595295962959729598295992960029601296022960329604296052960629607296082960929610296112961229613296142961529616296172961829619296202962129622296232962429625296262962729628296292963029631296322963329634296352963629637296382963929640296412964229643296442964529646296472964829649296502965129652296532965429655296562965729658296592966029661296622966329664296652966629667296682966929670296712967229673296742967529676296772967829679296802968129682296832968429685296862968729688296892969029691296922969329694296952969629697296982969929700297012970229703297042970529706297072970829709297102971129712297132971429715297162971729718297192972029721297222972329724297252972629727297282972929730297312973229733297342973529736297372973829739297402974129742297432974429745297462974729748297492975029751297522975329754297552975629757297582975929760297612976229763297642976529766297672976829769297702977129772297732977429775297762977729778297792978029781297822978329784297852978629787297882978929790297912979229793297942979529796297972979829799298002980129802298032980429805298062980729808298092981029811298122981329814298152981629817298182981929820298212982229823298242982529826298272982829829298302983129832298332983429835298362983729838298392984029841298422984329844298452984629847298482984929850298512985229853298542985529856298572985829859298602986129862298632986429865298662986729868298692987029871298722987329874298752987629877298782987929880298812988229883298842988529886298872988829889298902989129892298932989429895298962989729898298992990029901299022990329904299052990629907299082990929910299112991229913299142991529916299172991829919299202992129922299232992429925299262992729928299292993029931299322993329934299352993629937299382993929940299412994229943299442994529946299472994829949299502995129952299532995429955299562995729958299592996029961299622996329964299652996629967299682996929970299712997229973299742997529976299772997829979299802998129982299832998429985299862998729988299892999029991299922999329994299952999629997299982999930000300013000230003300043000530006300073000830009300103001130012300133001430015300163001730018300193002030021300223002330024300253002630027300283002930030300313003230033300343003530036300373003830039300403004130042300433004430045300463004730048300493005030051300523005330054300553005630057300583005930060300613006230063300643006530066300673006830069300703007130072300733007430075300763007730078300793008030081300823008330084300853008630087300883008930090300913009230093300943009530096300973009830099301003010130102301033010430105301063010730108301093011030111301123011330114301153011630117301183011930120301213012230123301243012530126301273012830129301303013130132301333013430135301363013730138301393014030141301423014330144301453014630147301483014930150301513015230153301543015530156301573015830159301603016130162301633016430165301663016730168301693017030171301723017330174301753017630177301783017930180301813018230183301843018530186301873018830189301903019130192301933019430195301963019730198301993020030201302023020330204302053020630207302083020930210302113021230213302143021530216302173021830219302203022130222302233022430225302263022730228302293023030231302323023330234302353023630237302383023930240302413024230243302443024530246302473024830249302503025130252302533025430255302563025730258302593026030261302623026330264302653026630267302683026930270302713027230273302743027530276302773027830279302803028130282302833028430285302863028730288302893029030291302923029330294302953029630297302983029930300303013030230303303043030530306303073030830309303103031130312303133031430315303163031730318303193032030321303223032330324303253032630327303283032930330303313033230333303343033530336303373033830339303403034130342303433034430345303463034730348303493035030351303523035330354303553035630357303583035930360303613036230363303643036530366303673036830369303703037130372303733037430375303763037730378303793038030381303823038330384303853038630387303883038930390303913039230393303943039530396303973039830399304003040130402304033040430405304063040730408304093041030411304123041330414304153041630417304183041930420304213042230423304243042530426304273042830429304303043130432304333043430435304363043730438304393044030441304423044330444304453044630447304483044930450304513045230453304543045530456304573045830459304603046130462304633046430465304663046730468304693047030471304723047330474304753047630477304783047930480304813048230483304843048530486304873048830489304903049130492304933049430495304963049730498304993050030501305023050330504305053050630507305083050930510305113051230513305143051530516305173051830519305203052130522305233052430525305263052730528305293053030531305323053330534305353053630537305383053930540305413054230543305443054530546305473054830549305503055130552305533055430555305563055730558305593056030561305623056330564305653056630567305683056930570305713057230573305743057530576305773057830579305803058130582305833058430585305863058730588305893059030591305923059330594305953059630597305983059930600306013060230603306043060530606306073060830609306103061130612306133061430615306163061730618306193062030621306223062330624306253062630627306283062930630306313063230633306343063530636306373063830639306403064130642306433064430645306463064730648306493065030651306523065330654306553065630657306583065930660306613066230663306643066530666306673066830669306703067130672306733067430675306763067730678306793068030681306823068330684306853068630687306883068930690306913069230693306943069530696306973069830699307003070130702307033070430705307063070730708307093071030711307123071330714307153071630717307183071930720307213072230723307243072530726307273072830729307303073130732307333073430735307363073730738307393074030741307423074330744307453074630747307483074930750307513075230753307543075530756307573075830759307603076130762307633076430765307663076730768307693077030771307723077330774307753077630777307783077930780307813078230783307843078530786307873078830789307903079130792307933079430795307963079730798307993080030801308023080330804308053080630807308083080930810308113081230813308143081530816308173081830819308203082130822308233082430825308263082730828308293083030831308323083330834308353083630837308383083930840308413084230843308443084530846308473084830849308503085130852308533085430855308563085730858308593086030861308623086330864308653086630867308683086930870308713087230873308743087530876308773087830879308803088130882308833088430885308863088730888308893089030891308923089330894308953089630897308983089930900309013090230903309043090530906309073090830909309103091130912309133091430915309163091730918309193092030921309223092330924309253092630927309283092930930309313093230933309343093530936309373093830939309403094130942309433094430945309463094730948309493095030951309523095330954309553095630957309583095930960309613096230963309643096530966309673096830969309703097130972309733097430975309763097730978309793098030981309823098330984309853098630987309883098930990309913099230993309943099530996309973099830999310003100131002310033100431005310063100731008310093101031011310123101331014310153101631017310183101931020310213102231023310243102531026310273102831029310303103131032310333103431035310363103731038310393104031041310423104331044310453104631047310483104931050310513105231053310543105531056310573105831059310603106131062310633106431065310663106731068310693107031071310723107331074310753107631077310783107931080310813108231083310843108531086310873108831089310903109131092310933109431095310963109731098310993110031101311023110331104311053110631107311083110931110311113111231113311143111531116311173111831119311203112131122311233112431125311263112731128311293113031131311323113331134311353113631137311383113931140311413114231143311443114531146311473114831149311503115131152311533115431155311563115731158311593116031161311623116331164311653116631167311683116931170311713117231173311743117531176311773117831179311803118131182311833118431185311863118731188311893119031191311923119331194311953119631197311983119931200312013120231203312043120531206312073120831209312103121131212312133121431215312163121731218312193122031221312223122331224312253122631227312283122931230312313123231233312343123531236312373123831239312403124131242312433124431245312463124731248312493125031251312523125331254312553125631257312583125931260312613126231263312643126531266312673126831269312703127131272312733127431275312763127731278312793128031281312823128331284312853128631287312883128931290312913129231293312943129531296312973129831299313003130131302313033130431305313063130731308313093131031311313123131331314313153131631317313183131931320313213132231323313243132531326313273132831329313303133131332313333133431335313363133731338313393134031341313423134331344313453134631347313483134931350313513135231353313543135531356313573135831359313603136131362313633136431365313663136731368313693137031371313723137331374313753137631377313783137931380313813138231383313843138531386313873138831389313903139131392313933139431395313963139731398313993140031401314023140331404314053140631407314083140931410314113141231413314143141531416314173141831419314203142131422314233142431425314263142731428314293143031431314323143331434314353143631437314383143931440314413144231443314443144531446314473144831449314503145131452314533145431455314563145731458314593146031461314623146331464314653146631467314683146931470314713147231473314743147531476314773147831479314803148131482314833148431485314863148731488314893149031491314923149331494314953149631497314983149931500315013150231503315043150531506315073150831509315103151131512315133151431515315163151731518315193152031521315223152331524315253152631527315283152931530315313153231533315343153531536315373153831539315403154131542315433154431545315463154731548315493155031551315523155331554315553155631557315583155931560315613156231563315643156531566315673156831569315703157131572315733157431575315763157731578315793158031581315823158331584315853158631587315883158931590315913159231593315943159531596315973159831599316003160131602316033160431605316063160731608316093161031611316123161331614316153161631617316183161931620316213162231623316243162531626316273162831629316303163131632316333163431635316363163731638316393164031641316423164331644316453164631647316483164931650316513165231653316543165531656316573165831659316603166131662316633166431665316663166731668316693167031671316723167331674316753167631677316783167931680316813168231683316843168531686316873168831689316903169131692316933169431695316963169731698316993170031701317023170331704317053170631707317083170931710317113171231713317143171531716317173171831719317203172131722317233172431725317263172731728317293173031731317323173331734317353173631737317383173931740317413174231743317443174531746317473174831749317503175131752317533175431755317563175731758317593176031761317623176331764317653176631767317683176931770317713177231773317743177531776317773177831779317803178131782317833178431785317863178731788317893179031791317923179331794317953179631797317983179931800318013180231803318043180531806318073180831809318103181131812318133181431815318163181731818318193182031821318223182331824318253182631827318283182931830318313183231833318343183531836318373183831839318403184131842318433184431845318463184731848318493185031851318523185331854318553185631857318583185931860318613186231863318643186531866318673186831869318703187131872318733187431875318763187731878318793188031881318823188331884318853188631887318883188931890318913189231893318943189531896318973189831899319003190131902319033190431905319063190731908319093191031911319123191331914319153191631917319183191931920319213192231923319243192531926319273192831929319303193131932319333193431935319363193731938319393194031941319423194331944319453194631947319483194931950319513195231953319543195531956319573195831959319603196131962319633196431965319663196731968319693197031971319723197331974319753197631977319783197931980319813198231983319843198531986319873198831989319903199131992319933199431995319963199731998319993200032001320023200332004320053200632007320083200932010320113201232013320143201532016320173201832019320203202132022320233202432025320263202732028320293203032031320323203332034320353203632037320383203932040320413204232043320443204532046320473204832049320503205132052320533205432055320563205732058320593206032061320623206332064320653206632067320683206932070320713207232073320743207532076320773207832079320803208132082320833208432085320863208732088320893209032091320923209332094320953209632097320983209932100321013210232103321043210532106321073210832109321103211132112321133211432115321163211732118321193212032121321223212332124321253212632127321283212932130321313213232133321343213532136321373213832139321403214132142321433214432145321463214732148321493215032151321523215332154321553215632157321583215932160321613216232163321643216532166321673216832169321703217132172321733217432175321763217732178321793218032181321823218332184321853218632187321883218932190321913219232193321943219532196321973219832199322003220132202322033220432205322063220732208322093221032211322123221332214322153221632217322183221932220322213222232223322243222532226322273222832229322303223132232322333223432235322363223732238322393224032241322423224332244322453224632247322483224932250322513225232253322543225532256322573225832259322603226132262322633226432265322663226732268322693227032271322723227332274322753227632277322783227932280322813228232283322843228532286322873228832289322903229132292322933229432295322963229732298322993230032301323023230332304323053230632307323083230932310323113231232313323143231532316323173231832319323203232132322323233232432325323263232732328323293233032331323323233332334323353233632337323383233932340323413234232343323443234532346323473234832349323503235132352323533235432355323563235732358323593236032361323623236332364323653236632367323683236932370323713237232373323743237532376323773237832379323803238132382323833238432385323863238732388323893239032391323923239332394323953239632397323983239932400324013240232403324043240532406324073240832409324103241132412324133241432415324163241732418324193242032421324223242332424324253242632427324283242932430324313243232433324343243532436324373243832439324403244132442324433244432445324463244732448324493245032451324523245332454324553245632457324583245932460324613246232463324643246532466324673246832469324703247132472324733247432475324763247732478324793248032481324823248332484324853248632487324883248932490324913249232493324943249532496324973249832499325003250132502325033250432505325063250732508325093251032511325123251332514325153251632517325183251932520325213252232523325243252532526325273252832529325303253132532325333253432535325363253732538325393254032541325423254332544325453254632547325483254932550325513255232553325543255532556325573255832559325603256132562325633256432565325663256732568325693257032571325723257332574325753257632577325783257932580325813258232583325843258532586325873258832589325903259132592325933259432595325963259732598325993260032601326023260332604326053260632607326083260932610326113261232613326143261532616326173261832619326203262132622326233262432625326263262732628326293263032631326323263332634326353263632637326383263932640326413264232643326443264532646326473264832649326503265132652326533265432655326563265732658326593266032661326623266332664326653266632667326683266932670326713267232673326743267532676326773267832679326803268132682326833268432685326863268732688326893269032691326923269332694326953269632697326983269932700327013270232703327043270532706327073270832709327103271132712327133271432715327163271732718327193272032721327223272332724327253272632727327283272932730327313273232733327343273532736327373273832739327403274132742327433274432745327463274732748327493275032751327523275332754327553275632757327583275932760327613276232763327643276532766327673276832769327703277132772327733277432775327763277732778327793278032781327823278332784327853278632787327883278932790327913279232793327943279532796327973279832799328003280132802328033280432805328063280732808328093281032811328123281332814328153281632817328183281932820328213282232823328243282532826328273282832829328303283132832328333283432835328363283732838328393284032841328423284332844328453284632847328483284932850328513285232853328543285532856328573285832859328603286132862328633286432865328663286732868328693287032871328723287332874328753287632877328783287932880328813288232883328843288532886328873288832889328903289132892328933289432895328963289732898328993290032901329023290332904329053290632907329083290932910329113291232913329143291532916329173291832919329203292132922329233292432925329263292732928329293293032931329323293332934329353293632937329383293932940329413294232943329443294532946329473294832949329503295132952329533295432955329563295732958329593296032961329623296332964329653296632967329683296932970329713297232973329743297532976329773297832979329803298132982329833298432985329863298732988329893299032991329923299332994329953299632997329983299933000330013300233003330043300533006330073300833009330103301133012330133301433015330163301733018330193302033021330223302333024330253302633027330283302933030330313303233033330343303533036330373303833039330403304133042330433304433045330463304733048330493305033051330523305333054330553305633057330583305933060330613306233063330643306533066330673306833069330703307133072330733307433075330763307733078330793308033081330823308333084330853308633087330883308933090330913309233093330943309533096330973309833099331003310133102331033310433105331063310733108331093311033111331123311333114331153311633117331183311933120331213312233123331243312533126331273312833129331303313133132331333313433135331363313733138331393314033141331423314333144331453314633147331483314933150331513315233153331543315533156331573315833159331603316133162331633316433165331663316733168331693317033171331723317333174331753317633177331783317933180331813318233183331843318533186331873318833189331903319133192331933319433195331963319733198331993320033201332023320333204332053320633207332083320933210332113321233213332143321533216332173321833219332203322133222332233322433225332263322733228332293323033231332323323333234332353323633237332383323933240332413324233243332443324533246332473324833249332503325133252332533325433255332563325733258332593326033261332623326333264332653326633267332683326933270332713327233273332743327533276332773327833279332803328133282332833328433285332863328733288332893329033291332923329333294332953329633297332983329933300333013330233303333043330533306333073330833309333103331133312333133331433315333163331733318333193332033321333223332333324333253332633327333283332933330333313333233333333343333533336333373333833339333403334133342333433334433345333463334733348333493335033351333523335333354333553335633357333583335933360333613336233363333643336533366333673336833369333703337133372333733337433375333763337733378333793338033381333823338333384333853338633387333883338933390333913339233393333943339533396333973339833399334003340133402334033340433405334063340733408334093341033411334123341333414334153341633417334183341933420334213342233423334243342533426334273342833429334303343133432334333343433435334363343733438334393344033441334423344333444334453344633447334483344933450334513345233453334543345533456334573345833459334603346133462334633346433465334663346733468334693347033471334723347333474334753347633477334783347933480334813348233483334843348533486334873348833489334903349133492334933349433495334963349733498334993350033501335023350333504335053350633507335083350933510335113351233513335143351533516335173351833519335203352133522335233352433525335263352733528335293353033531335323353333534335353353633537335383353933540335413354233543335443354533546335473354833549335503355133552335533355433555335563355733558335593356033561335623356333564335653356633567335683356933570335713357233573335743357533576335773357833579335803358133582335833358433585335863358733588335893359033591335923359333594335953359633597335983359933600336013360233603336043360533606336073360833609336103361133612336133361433615336163361733618336193362033621336223362333624336253362633627336283362933630336313363233633336343363533636336373363833639336403364133642336433364433645336463364733648336493365033651336523365333654336553365633657336583365933660336613366233663336643366533666336673366833669336703367133672336733367433675336763367733678336793368033681336823368333684336853368633687336883368933690336913369233693336943369533696336973369833699337003370133702337033370433705337063370733708337093371033711337123371333714337153371633717337183371933720337213372233723337243372533726337273372833729337303373133732337333373433735337363373733738337393374033741337423374333744337453374633747337483374933750337513375233753337543375533756337573375833759337603376133762337633376433765337663376733768337693377033771337723377333774337753377633777337783377933780337813378233783337843378533786337873378833789337903379133792337933379433795337963379733798337993380033801338023380333804338053380633807338083380933810338113381233813338143381533816338173381833819338203382133822338233382433825338263382733828338293383033831338323383333834338353383633837338383383933840338413384233843338443384533846338473384833849338503385133852338533385433855338563385733858338593386033861338623386333864338653386633867338683386933870338713387233873338743387533876338773387833879338803388133882338833388433885338863388733888338893389033891338923389333894338953389633897338983389933900339013390233903339043390533906339073390833909339103391133912339133391433915339163391733918339193392033921339223392333924339253392633927339283392933930339313393233933339343393533936339373393833939339403394133942339433394433945339463394733948339493395033951339523395333954339553395633957339583395933960339613396233963339643396533966339673396833969339703397133972339733397433975339763397733978339793398033981339823398333984339853398633987339883398933990339913399233993339943399533996339973399833999340003400134002340033400434005340063400734008340093401034011340123401334014340153401634017340183401934020340213402234023340243402534026340273402834029340303403134032340333403434035340363403734038340393404034041340423404334044340453404634047340483404934050340513405234053340543405534056340573405834059340603406134062340633406434065340663406734068340693407034071340723407334074340753407634077340783407934080340813408234083340843408534086340873408834089340903409134092340933409434095340963409734098340993410034101341023410334104341053410634107341083410934110341113411234113341143411534116341173411834119341203412134122341233412434125341263412734128341293413034131341323413334134341353413634137341383413934140341413414234143341443414534146341473414834149341503415134152341533415434155341563415734158341593416034161341623416334164341653416634167341683416934170341713417234173341743417534176341773417834179341803418134182341833418434185341863418734188341893419034191341923419334194341953419634197341983419934200342013420234203342043420534206342073420834209342103421134212342133421434215342163421734218342193422034221342223422334224342253422634227342283422934230342313423234233342343423534236342373423834239342403424134242342433424434245342463424734248342493425034251342523425334254342553425634257342583425934260342613426234263342643426534266342673426834269342703427134272342733427434275342763427734278342793428034281342823428334284342853428634287342883428934290342913429234293342943429534296342973429834299343003430134302343033430434305343063430734308343093431034311343123431334314343153431634317343183431934320343213432234323343243432534326343273432834329343303433134332343333433434335343363433734338343393434034341343423434334344343453434634347343483434934350343513435234353343543435534356343573435834359343603436134362343633436434365343663436734368343693437034371343723437334374343753437634377343783437934380343813438234383343843438534386343873438834389343903439134392343933439434395343963439734398343993440034401344023440334404344053440634407344083440934410344113441234413344143441534416344173441834419344203442134422344233442434425344263442734428344293443034431344323443334434344353443634437344383443934440344413444234443344443444534446344473444834449344503445134452344533445434455344563445734458344593446034461344623446334464344653446634467344683446934470344713447234473344743447534476344773447834479344803448134482344833448434485344863448734488344893449034491344923449334494344953449634497344983449934500345013450234503345043450534506345073450834509345103451134512345133451434515345163451734518345193452034521345223452334524345253452634527345283452934530345313453234533345343453534536345373453834539345403454134542345433454434545345463454734548345493455034551345523455334554345553455634557345583455934560345613456234563345643456534566345673456834569345703457134572345733457434575345763457734578345793458034581345823458334584345853458634587345883458934590345913459234593345943459534596345973459834599346003460134602346033460434605346063460734608346093461034611346123461334614346153461634617346183461934620346213462234623346243462534626346273462834629346303463134632346333463434635346363463734638346393464034641346423464334644346453464634647346483464934650346513465234653346543465534656346573465834659346603466134662346633466434665346663466734668346693467034671346723467334674346753467634677346783467934680346813468234683346843468534686346873468834689346903469134692346933469434695346963469734698346993470034701347023470334704347053470634707347083470934710347113471234713347143471534716347173471834719347203472134722347233472434725347263472734728347293473034731347323473334734347353473634737347383473934740347413474234743347443474534746347473474834749347503475134752347533475434755347563475734758347593476034761347623476334764347653476634767347683476934770347713477234773347743477534776347773477834779347803478134782347833478434785347863478734788347893479034791347923479334794347953479634797347983479934800348013480234803348043480534806348073480834809348103481134812348133481434815348163481734818348193482034821348223482334824348253482634827348283482934830348313483234833348343483534836348373483834839348403484134842348433484434845348463484734848348493485034851348523485334854348553485634857348583485934860348613486234863348643486534866348673486834869348703487134872348733487434875348763487734878348793488034881348823488334884348853488634887348883488934890348913489234893348943489534896348973489834899349003490134902349033490434905349063490734908349093491034911349123491334914349153491634917349183491934920349213492234923349243492534926349273492834929349303493134932349333493434935349363493734938349393494034941349423494334944349453494634947349483494934950349513495234953349543495534956349573495834959349603496134962349633496434965349663496734968349693497034971349723497334974349753497634977349783497934980349813498234983349843498534986349873498834989349903499134992349933499434995349963499734998349993500035001350023500335004350053500635007350083500935010350113501235013350143501535016350173501835019350203502135022350233502435025350263502735028350293503035031350323503335034350353503635037350383503935040350413504235043350443504535046350473504835049350503505135052350533505435055350563505735058350593506035061350623506335064350653506635067350683506935070350713507235073350743507535076350773507835079350803508135082350833508435085350863508735088350893509035091350923509335094350953509635097350983509935100351013510235103351043510535106351073510835109351103511135112351133511435115351163511735118351193512035121351223512335124351253512635127351283512935130351313513235133351343513535136351373513835139351403514135142351433514435145351463514735148351493515035151351523515335154351553515635157351583515935160351613516235163351643516535166351673516835169351703517135172351733517435175351763517735178351793518035181351823518335184351853518635187351883518935190351913519235193351943519535196351973519835199352003520135202352033520435205352063520735208352093521035211352123521335214352153521635217352183521935220352213522235223352243522535226352273522835229352303523135232352333523435235352363523735238352393524035241352423524335244352453524635247352483524935250352513525235253352543525535256352573525835259352603526135262352633526435265352663526735268352693527035271352723527335274352753527635277352783527935280352813528235283352843528535286352873528835289352903529135292352933529435295352963529735298352993530035301353023530335304353053530635307353083530935310353113531235313353143531535316353173531835319353203532135322353233532435325353263532735328353293533035331353323533335334353353533635337353383533935340353413534235343353443534535346353473534835349353503535135352353533535435355353563535735358353593536035361353623536335364353653536635367353683536935370353713537235373353743537535376353773537835379353803538135382353833538435385353863538735388353893539035391353923539335394353953539635397353983539935400354013540235403354043540535406354073540835409354103541135412354133541435415354163541735418354193542035421354223542335424354253542635427354283542935430354313543235433354343543535436354373543835439354403544135442354433544435445354463544735448354493545035451354523545335454354553545635457354583545935460354613546235463354643546535466354673546835469354703547135472354733547435475354763547735478354793548035481354823548335484354853548635487354883548935490354913549235493354943549535496354973549835499355003550135502355033550435505355063550735508355093551035511355123551335514355153551635517355183551935520355213552235523355243552535526355273552835529355303553135532355333553435535355363553735538355393554035541355423554335544355453554635547355483554935550355513555235553355543555535556355573555835559355603556135562355633556435565355663556735568355693557035571355723557335574355753557635577355783557935580355813558235583355843558535586355873558835589355903559135592355933559435595355963559735598355993560035601356023560335604356053560635607356083560935610356113561235613356143561535616356173561835619356203562135622356233562435625356263562735628356293563035631356323563335634356353563635637356383563935640356413564235643356443564535646356473564835649356503565135652356533565435655356563565735658356593566035661356623566335664356653566635667356683566935670356713567235673356743567535676356773567835679356803568135682356833568435685356863568735688356893569035691356923569335694356953569635697356983569935700357013570235703357043570535706357073570835709357103571135712357133571435715357163571735718357193572035721357223572335724357253572635727357283572935730357313573235733357343573535736357373573835739357403574135742357433574435745357463574735748357493575035751357523575335754357553575635757357583575935760357613576235763357643576535766357673576835769357703577135772357733577435775357763577735778357793578035781357823578335784357853578635787357883578935790357913579235793357943579535796357973579835799358003580135802358033580435805358063580735808358093581035811358123581335814358153581635817358183581935820358213582235823358243582535826358273582835829358303583135832358333583435835358363583735838358393584035841358423584335844358453584635847358483584935850358513585235853358543585535856358573585835859358603586135862358633586435865358663586735868358693587035871358723587335874358753587635877358783587935880358813588235883358843588535886358873588835889358903589135892358933589435895358963589735898358993590035901359023590335904359053590635907359083590935910359113591235913359143591535916359173591835919359203592135922359233592435925359263592735928359293593035931359323593335934359353593635937359383593935940359413594235943359443594535946359473594835949359503595135952359533595435955359563595735958359593596035961359623596335964359653596635967359683596935970359713597235973359743597535976359773597835979359803598135982359833598435985359863598735988359893599035991359923599335994359953599635997359983599936000360013600236003360043600536006360073600836009360103601136012360133601436015360163601736018360193602036021360223602336024360253602636027360283602936030360313603236033360343603536036360373603836039360403604136042360433604436045360463604736048360493605036051360523605336054360553605636057360583605936060360613606236063360643606536066360673606836069360703607136072360733607436075360763607736078360793608036081360823608336084360853608636087360883608936090360913609236093360943609536096360973609836099361003610136102361033610436105361063610736108361093611036111361123611336114361153611636117361183611936120361213612236123361243612536126361273612836129361303613136132361333613436135361363613736138361393614036141361423614336144361453614636147361483614936150361513615236153361543615536156361573615836159361603616136162361633616436165361663616736168361693617036171361723617336174361753617636177361783617936180361813618236183361843618536186361873618836189361903619136192361933619436195361963619736198361993620036201362023620336204362053620636207362083620936210362113621236213362143621536216362173621836219362203622136222362233622436225362263622736228362293623036231362323623336234362353623636237362383623936240362413624236243362443624536246362473624836249362503625136252362533625436255362563625736258362593626036261362623626336264362653626636267362683626936270362713627236273362743627536276362773627836279362803628136282362833628436285362863628736288362893629036291362923629336294362953629636297362983629936300363013630236303363043630536306363073630836309363103631136312363133631436315363163631736318363193632036321363223632336324363253632636327363283632936330363313633236333363343633536336363373633836339363403634136342363433634436345363463634736348363493635036351363523635336354363553635636357363583635936360363613636236363363643636536366363673636836369363703637136372363733637436375363763637736378363793638036381363823638336384363853638636387363883638936390363913639236393363943639536396363973639836399364003640136402364033640436405364063640736408364093641036411364123641336414364153641636417364183641936420364213642236423364243642536426364273642836429364303643136432364333643436435364363643736438364393644036441364423644336444364453644636447364483644936450364513645236453364543645536456364573645836459364603646136462364633646436465364663646736468364693647036471364723647336474364753647636477364783647936480364813648236483364843648536486364873648836489364903649136492364933649436495364963649736498364993650036501365023650336504365053650636507365083650936510365113651236513365143651536516365173651836519365203652136522365233652436525365263652736528365293653036531365323653336534365353653636537365383653936540365413654236543365443654536546365473654836549365503655136552365533655436555365563655736558365593656036561365623656336564365653656636567365683656936570365713657236573365743657536576365773657836579365803658136582365833658436585365863658736588365893659036591365923659336594365953659636597365983659936600366013660236603366043660536606366073660836609366103661136612366133661436615366163661736618366193662036621366223662336624366253662636627366283662936630366313663236633366343663536636366373663836639366403664136642366433664436645366463664736648366493665036651366523665336654366553665636657366583665936660366613666236663366643666536666366673666836669366703667136672366733667436675366763667736678366793668036681366823668336684366853668636687366883668936690366913669236693366943669536696366973669836699367003670136702367033670436705367063670736708367093671036711367123671336714367153671636717367183671936720367213672236723367243672536726367273672836729367303673136732367333673436735367363673736738367393674036741367423674336744367453674636747367483674936750367513675236753367543675536756367573675836759367603676136762367633676436765367663676736768367693677036771367723677336774367753677636777367783677936780367813678236783367843678536786367873678836789367903679136792367933679436795367963679736798367993680036801368023680336804368053680636807368083680936810368113681236813368143681536816368173681836819368203682136822368233682436825368263682736828368293683036831368323683336834368353683636837368383683936840368413684236843368443684536846368473684836849368503685136852368533685436855368563685736858368593686036861368623686336864368653686636867368683686936870368713687236873368743687536876368773687836879368803688136882368833688436885368863688736888368893689036891368923689336894368953689636897368983689936900369013690236903369043690536906369073690836909369103691136912369133691436915369163691736918369193692036921369223692336924369253692636927369283692936930369313693236933369343693536936369373693836939369403694136942369433694436945369463694736948369493695036951369523695336954369553695636957369583695936960369613696236963369643696536966369673696836969369703697136972369733697436975369763697736978369793698036981369823698336984369853698636987369883698936990369913699236993369943699536996369973699836999370003700137002370033700437005370063700737008370093701037011370123701337014370153701637017370183701937020370213702237023370243702537026370273702837029370303703137032370333703437035370363703737038370393704037041370423704337044370453704637047370483704937050370513705237053370543705537056370573705837059370603706137062370633706437065370663706737068370693707037071370723707337074370753707637077370783707937080370813708237083370843708537086370873708837089370903709137092370933709437095370963709737098370993710037101371023710337104371053710637107371083710937110371113711237113371143711537116371173711837119371203712137122371233712437125371263712737128371293713037131371323713337134371353713637137371383713937140371413714237143371443714537146371473714837149371503715137152371533715437155371563715737158371593716037161371623716337164371653716637167371683716937170371713717237173371743717537176371773717837179371803718137182371833718437185371863718737188371893719037191371923719337194371953719637197371983719937200372013720237203372043720537206372073720837209372103721137212372133721437215372163721737218372193722037221372223722337224372253722637227372283722937230372313723237233372343723537236372373723837239372403724137242372433724437245372463724737248372493725037251372523725337254372553725637257372583725937260372613726237263372643726537266372673726837269372703727137272372733727437275372763727737278372793728037281372823728337284372853728637287372883728937290372913729237293372943729537296372973729837299373003730137302373033730437305373063730737308373093731037311373123731337314373153731637317373183731937320373213732237323373243732537326373273732837329373303733137332373333733437335373363733737338373393734037341373423734337344373453734637347373483734937350373513735237353373543735537356373573735837359373603736137362373633736437365373663736737368373693737037371373723737337374373753737637377373783737937380373813738237383373843738537386373873738837389373903739137392373933739437395373963739737398373993740037401374023740337404374053740637407374083740937410374113741237413374143741537416374173741837419374203742137422374233742437425374263742737428374293743037431374323743337434374353743637437374383743937440374413744237443374443744537446374473744837449374503745137452374533745437455374563745737458374593746037461374623746337464374653746637467374683746937470374713747237473374743747537476374773747837479374803748137482374833748437485374863748737488374893749037491374923749337494374953749637497374983749937500375013750237503375043750537506375073750837509375103751137512375133751437515375163751737518375193752037521375223752337524375253752637527375283752937530375313753237533375343753537536375373753837539375403754137542375433754437545375463754737548375493755037551375523755337554375553755637557375583755937560375613756237563375643756537566375673756837569375703757137572375733757437575375763757737578375793758037581375823758337584375853758637587375883758937590375913759237593375943759537596375973759837599376003760137602376033760437605376063760737608376093761037611376123761337614376153761637617376183761937620376213762237623376243762537626376273762837629376303763137632376333763437635376363763737638376393764037641376423764337644376453764637647376483764937650376513765237653376543765537656376573765837659376603766137662376633766437665376663766737668376693767037671376723767337674376753767637677376783767937680376813768237683376843768537686376873768837689376903769137692376933769437695376963769737698376993770037701377023770337704377053770637707377083770937710377113771237713377143771537716377173771837719377203772137722377233772437725377263772737728377293773037731377323773337734377353773637737377383773937740377413774237743377443774537746377473774837749377503775137752377533775437755377563775737758377593776037761377623776337764377653776637767377683776937770377713777237773377743777537776377773777837779377803778137782377833778437785377863778737788377893779037791377923779337794377953779637797377983779937800378013780237803378043780537806378073780837809378103781137812378133781437815378163781737818378193782037821378223782337824378253782637827378283782937830378313783237833378343783537836378373783837839378403784137842378433784437845378463784737848378493785037851378523785337854378553785637857378583785937860378613786237863378643786537866378673786837869378703787137872378733787437875378763787737878378793788037881378823788337884378853788637887378883788937890378913789237893378943789537896378973789837899379003790137902379033790437905379063790737908379093791037911379123791337914379153791637917379183791937920379213792237923379243792537926379273792837929379303793137932379333793437935379363793737938379393794037941379423794337944379453794637947379483794937950379513795237953379543795537956379573795837959379603796137962379633796437965379663796737968379693797037971379723797337974379753797637977379783797937980379813798237983379843798537986379873798837989379903799137992379933799437995379963799737998379993800038001380023800338004380053800638007380083800938010380113801238013380143801538016380173801838019380203802138022380233802438025380263802738028380293803038031380323803338034380353803638037380383803938040380413804238043380443804538046380473804838049380503805138052380533805438055380563805738058380593806038061380623806338064380653806638067380683806938070380713807238073380743807538076380773807838079380803808138082380833808438085380863808738088380893809038091380923809338094380953809638097380983809938100381013810238103381043810538106381073810838109381103811138112381133811438115381163811738118381193812038121381223812338124381253812638127381283812938130381313813238133381343813538136381373813838139381403814138142381433814438145381463814738148381493815038151381523815338154381553815638157381583815938160381613816238163381643816538166381673816838169381703817138172381733817438175381763817738178381793818038181381823818338184381853818638187381883818938190381913819238193381943819538196381973819838199382003820138202382033820438205382063820738208382093821038211382123821338214382153821638217382183821938220382213822238223382243822538226382273822838229382303823138232382333823438235382363823738238382393824038241382423824338244382453824638247382483824938250382513825238253382543825538256382573825838259382603826138262382633826438265382663826738268382693827038271382723827338274382753827638277382783827938280382813828238283382843828538286382873828838289382903829138292382933829438295382963829738298382993830038301383023830338304383053830638307383083830938310383113831238313383143831538316383173831838319383203832138322383233832438325383263832738328383293833038331383323833338334383353833638337383383833938340383413834238343383443834538346383473834838349383503835138352383533835438355383563835738358383593836038361383623836338364383653836638367383683836938370383713837238373383743837538376383773837838379383803838138382383833838438385383863838738388383893839038391383923839338394383953839638397383983839938400384013840238403384043840538406384073840838409384103841138412384133841438415384163841738418384193842038421384223842338424384253842638427384283842938430384313843238433384343843538436384373843838439384403844138442384433844438445384463844738448384493845038451384523845338454384553845638457384583845938460384613846238463384643846538466384673846838469384703847138472384733847438475384763847738478384793848038481384823848338484384853848638487384883848938490384913849238493384943849538496384973849838499385003850138502385033850438505385063850738508385093851038511385123851338514385153851638517385183851938520385213852238523385243852538526385273852838529385303853138532385333853438535385363853738538385393854038541385423854338544385453854638547385483854938550385513855238553385543855538556385573855838559385603856138562385633856438565385663856738568385693857038571385723857338574385753857638577385783857938580385813858238583385843858538586385873858838589385903859138592385933859438595385963859738598385993860038601386023860338604386053860638607386083860938610386113861238613386143861538616386173861838619386203862138622386233862438625386263862738628386293863038631386323863338634386353863638637386383863938640386413864238643386443864538646386473864838649386503865138652386533865438655386563865738658386593866038661386623866338664386653866638667386683866938670386713867238673386743867538676386773867838679386803868138682386833868438685386863868738688386893869038691386923869338694386953869638697386983869938700387013870238703387043870538706387073870838709387103871138712387133871438715387163871738718387193872038721387223872338724387253872638727387283872938730387313873238733387343873538736387373873838739387403874138742387433874438745387463874738748387493875038751387523875338754387553875638757387583875938760387613876238763387643876538766387673876838769387703877138772387733877438775387763877738778387793878038781387823878338784387853878638787387883878938790387913879238793387943879538796387973879838799388003880138802388033880438805388063880738808388093881038811388123881338814388153881638817388183881938820388213882238823388243882538826388273882838829388303883138832388333883438835388363883738838388393884038841388423884338844388453884638847388483884938850388513885238853388543885538856388573885838859388603886138862388633886438865388663886738868388693887038871388723887338874388753887638877388783887938880388813888238883388843888538886388873888838889388903889138892388933889438895388963889738898388993890038901389023890338904389053890638907389083890938910389113891238913389143891538916389173891838919389203892138922389233892438925389263892738928389293893038931389323893338934389353893638937389383893938940389413894238943389443894538946389473894838949389503895138952389533895438955389563895738958389593896038961389623896338964389653896638967389683896938970389713897238973389743897538976389773897838979389803898138982389833898438985389863898738988389893899038991389923899338994389953899638997389983899939000390013900239003390043900539006390073900839009390103901139012390133901439015390163901739018390193902039021390223902339024390253902639027390283902939030390313903239033390343903539036390373903839039390403904139042390433904439045390463904739048390493905039051390523905339054390553905639057390583905939060390613906239063390643906539066390673906839069390703907139072390733907439075390763907739078390793908039081390823908339084390853908639087390883908939090390913909239093390943909539096390973909839099391003910139102391033910439105391063910739108391093911039111391123911339114391153911639117391183911939120391213912239123391243912539126391273912839129391303913139132391333913439135391363913739138391393914039141391423914339144391453914639147391483914939150391513915239153391543915539156391573915839159391603916139162391633916439165391663916739168391693917039171391723917339174391753917639177391783917939180391813918239183391843918539186391873918839189391903919139192391933919439195391963919739198391993920039201392023920339204392053920639207392083920939210392113921239213392143921539216392173921839219392203922139222392233922439225392263922739228392293923039231392323923339234392353923639237392383923939240392413924239243392443924539246392473924839249392503925139252392533925439255392563925739258392593926039261392623926339264392653926639267392683926939270392713927239273392743927539276392773927839279392803928139282392833928439285392863928739288392893929039291392923929339294392953929639297392983929939300393013930239303393043930539306393073930839309393103931139312393133931439315393163931739318393193932039321393223932339324393253932639327393283932939330393313933239333393343933539336393373933839339393403934139342393433934439345393463934739348393493935039351393523935339354393553935639357393583935939360393613936239363393643936539366393673936839369393703937139372393733937439375393763937739378393793938039381393823938339384393853938639387393883938939390393913939239393393943939539396393973939839399394003940139402394033940439405394063940739408394093941039411394123941339414394153941639417394183941939420394213942239423394243942539426394273942839429394303943139432394333943439435394363943739438394393944039441394423944339444394453944639447394483944939450394513945239453394543945539456394573945839459394603946139462394633946439465394663946739468394693947039471394723947339474394753947639477394783947939480394813948239483394843948539486394873948839489394903949139492394933949439495394963949739498394993950039501395023950339504395053950639507395083950939510395113951239513395143951539516395173951839519395203952139522395233952439525395263952739528395293953039531395323953339534395353953639537395383953939540395413954239543395443954539546395473954839549395503955139552395533955439555395563955739558395593956039561395623956339564395653956639567395683956939570395713957239573395743957539576395773957839579395803958139582395833958439585395863958739588395893959039591395923959339594395953959639597395983959939600396013960239603396043960539606396073960839609396103961139612396133961439615396163961739618396193962039621396223962339624396253962639627396283962939630396313963239633396343963539636396373963839639396403964139642396433964439645396463964739648396493965039651396523965339654396553965639657396583965939660396613966239663396643966539666396673966839669396703967139672396733967439675396763967739678396793968039681396823968339684396853968639687396883968939690396913969239693396943969539696396973969839699397003970139702397033970439705397063970739708397093971039711397123971339714397153971639717397183971939720397213972239723397243972539726397273972839729397303973139732397333973439735397363973739738397393974039741397423974339744397453974639747397483974939750397513975239753397543975539756397573975839759397603976139762397633976439765397663976739768397693977039771397723977339774397753977639777397783977939780397813978239783397843978539786397873978839789397903979139792397933979439795397963979739798397993980039801398023980339804398053980639807398083980939810398113981239813398143981539816398173981839819398203982139822398233982439825398263982739828398293983039831398323983339834398353983639837398383983939840398413984239843398443984539846398473984839849398503985139852398533985439855398563985739858398593986039861398623986339864398653986639867398683986939870398713987239873398743987539876398773987839879398803988139882398833988439885398863988739888398893989039891398923989339894398953989639897398983989939900399013990239903399043990539906399073990839909399103991139912399133991439915399163991739918399193992039921399223992339924399253992639927399283992939930399313993239933399343993539936399373993839939399403994139942399433994439945399463994739948399493995039951399523995339954399553995639957399583995939960399613996239963399643996539966399673996839969399703997139972399733997439975399763997739978399793998039981399823998339984399853998639987399883998939990399913999239993399943999539996399973999839999400004000140002400034000440005400064000740008400094001040011400124001340014400154001640017400184001940020400214002240023400244002540026400274002840029400304003140032400334003440035400364003740038400394004040041400424004340044400454004640047400484004940050400514005240053400544005540056400574005840059400604006140062400634006440065400664006740068400694007040071400724007340074400754007640077400784007940080400814008240083400844008540086400874008840089400904009140092400934009440095400964009740098400994010040101401024010340104401054010640107401084010940110401114011240113401144011540116401174011840119401204012140122401234012440125401264012740128401294013040131401324013340134401354013640137401384013940140401414014240143401444014540146401474014840149401504015140152401534015440155401564015740158401594016040161401624016340164401654016640167401684016940170401714017240173401744017540176401774017840179401804018140182401834018440185401864018740188401894019040191401924019340194401954019640197401984019940200402014020240203402044020540206402074020840209402104021140212402134021440215402164021740218402194022040221402224022340224402254022640227402284022940230402314023240233402344023540236402374023840239402404024140242402434024440245402464024740248402494025040251402524025340254402554025640257402584025940260402614026240263402644026540266402674026840269402704027140272402734027440275402764027740278402794028040281402824028340284402854028640287402884028940290402914029240293402944029540296402974029840299403004030140302403034030440305403064030740308403094031040311403124031340314403154031640317403184031940320403214032240323403244032540326403274032840329403304033140332403334033440335403364033740338403394034040341403424034340344403454034640347403484034940350403514035240353403544035540356403574035840359403604036140362403634036440365403664036740368403694037040371403724037340374403754037640377403784037940380403814038240383403844038540386403874038840389403904039140392403934039440395403964039740398403994040040401404024040340404404054040640407404084040940410404114041240413404144041540416404174041840419404204042140422404234042440425404264042740428404294043040431404324043340434404354043640437404384043940440404414044240443404444044540446404474044840449404504045140452404534045440455404564045740458404594046040461404624046340464404654046640467404684046940470404714047240473404744047540476404774047840479404804048140482404834048440485404864048740488404894049040491404924049340494404954049640497404984049940500405014050240503405044050540506405074050840509405104051140512405134051440515405164051740518405194052040521405224052340524405254052640527405284052940530405314053240533405344053540536405374053840539405404054140542405434054440545405464054740548405494055040551405524055340554405554055640557405584055940560405614056240563405644056540566405674056840569405704057140572405734057440575405764057740578405794058040581405824058340584405854058640587405884058940590405914059240593405944059540596405974059840599406004060140602406034060440605406064060740608406094061040611406124061340614406154061640617406184061940620406214062240623406244062540626406274062840629406304063140632406334063440635406364063740638406394064040641406424064340644406454064640647406484064940650406514065240653406544065540656406574065840659406604066140662406634066440665406664066740668406694067040671406724067340674406754067640677406784067940680406814068240683406844068540686406874068840689406904069140692406934069440695406964069740698406994070040701407024070340704407054070640707407084070940710407114071240713407144071540716407174071840719407204072140722407234072440725407264072740728407294073040731407324073340734407354073640737407384073940740407414074240743407444074540746407474074840749407504075140752407534075440755407564075740758407594076040761407624076340764407654076640767407684076940770407714077240773407744077540776407774077840779407804078140782407834078440785407864078740788407894079040791407924079340794407954079640797407984079940800408014080240803408044080540806408074080840809408104081140812408134081440815408164081740818408194082040821408224082340824408254082640827408284082940830408314083240833408344083540836408374083840839408404084140842408434084440845408464084740848408494085040851408524085340854408554085640857408584085940860408614086240863408644086540866408674086840869408704087140872408734087440875408764087740878408794088040881408824088340884408854088640887408884088940890408914089240893408944089540896408974089840899409004090140902409034090440905409064090740908409094091040911409124091340914409154091640917409184091940920409214092240923409244092540926409274092840929409304093140932409334093440935409364093740938409394094040941409424094340944409454094640947409484094940950409514095240953409544095540956409574095840959409604096140962409634096440965409664096740968409694097040971409724097340974409754097640977409784097940980409814098240983409844098540986409874098840989409904099140992409934099440995409964099740998409994100041001410024100341004410054100641007410084100941010410114101241013410144101541016410174101841019410204102141022410234102441025410264102741028410294103041031410324103341034410354103641037410384103941040410414104241043410444104541046410474104841049410504105141052410534105441055410564105741058410594106041061410624106341064410654106641067410684106941070410714107241073410744107541076410774107841079410804108141082410834108441085410864108741088410894109041091410924109341094410954109641097410984109941100411014110241103411044110541106411074110841109411104111141112411134111441115411164111741118411194112041121411224112341124411254112641127411284112941130411314113241133411344113541136411374113841139411404114141142411434114441145411464114741148411494115041151411524115341154411554115641157411584115941160411614116241163411644116541166411674116841169411704117141172411734117441175411764117741178411794118041181411824118341184411854118641187411884118941190411914119241193411944119541196411974119841199412004120141202412034120441205412064120741208412094121041211412124121341214412154121641217412184121941220412214122241223412244122541226412274122841229412304123141232412334123441235412364123741238412394124041241412424124341244412454124641247412484124941250412514125241253412544125541256412574125841259412604126141262412634126441265412664126741268412694127041271412724127341274412754127641277412784127941280412814128241283412844128541286412874128841289412904129141292412934129441295412964129741298412994130041301413024130341304413054130641307413084130941310413114131241313413144131541316413174131841319413204132141322413234132441325413264132741328413294133041331413324133341334413354133641337413384133941340413414134241343413444134541346413474134841349413504135141352413534135441355413564135741358413594136041361413624136341364413654136641367413684136941370413714137241373413744137541376413774137841379413804138141382413834138441385413864138741388413894139041391413924139341394413954139641397413984139941400414014140241403414044140541406414074140841409414104141141412414134141441415414164141741418414194142041421414224142341424414254142641427414284142941430414314143241433414344143541436414374143841439414404144141442414434144441445414464144741448414494145041451414524145341454414554145641457414584145941460414614146241463414644146541466414674146841469414704147141472414734147441475414764147741478414794148041481414824148341484414854148641487414884148941490414914149241493414944149541496414974149841499415004150141502415034150441505415064150741508415094151041511415124151341514415154151641517415184151941520415214152241523415244152541526415274152841529415304153141532415334153441535415364153741538415394154041541415424154341544415454154641547415484154941550415514155241553415544155541556415574155841559415604156141562415634156441565415664156741568415694157041571415724157341574415754157641577415784157941580415814158241583415844158541586415874158841589415904159141592415934159441595415964159741598415994160041601416024160341604416054160641607416084160941610416114161241613416144161541616416174161841619416204162141622416234162441625416264162741628416294163041631416324163341634416354163641637416384163941640416414164241643416444164541646416474164841649416504165141652416534165441655416564165741658416594166041661416624166341664416654166641667416684166941670416714167241673416744167541676416774167841679416804168141682416834168441685416864168741688416894169041691416924169341694416954169641697416984169941700417014170241703417044170541706417074170841709417104171141712417134171441715417164171741718417194172041721417224172341724417254172641727417284172941730417314173241733417344173541736417374173841739417404174141742417434174441745417464174741748417494175041751417524175341754417554175641757417584175941760417614176241763417644176541766417674176841769417704177141772417734177441775417764177741778417794178041781417824178341784417854178641787417884178941790417914179241793417944179541796417974179841799418004180141802418034180441805418064180741808418094181041811418124181341814418154181641817418184181941820418214182241823418244182541826418274182841829418304183141832418334183441835418364183741838418394184041841418424184341844418454184641847418484184941850418514185241853418544185541856418574185841859418604186141862418634186441865418664186741868418694187041871418724187341874418754187641877418784187941880418814188241883418844188541886418874188841889418904189141892418934189441895418964189741898418994190041901419024190341904419054190641907419084190941910419114191241913419144191541916419174191841919419204192141922419234192441925419264192741928419294193041931419324193341934419354193641937419384193941940419414194241943419444194541946419474194841949419504195141952419534195441955419564195741958419594196041961419624196341964419654196641967419684196941970419714197241973419744197541976419774197841979419804198141982419834198441985419864198741988419894199041991419924199341994419954199641997419984199942000420014200242003420044200542006420074200842009420104201142012420134201442015420164201742018420194202042021420224202342024420254202642027420284202942030420314203242033420344203542036420374203842039420404204142042420434204442045420464204742048420494205042051420524205342054420554205642057420584205942060420614206242063420644206542066420674206842069420704207142072420734207442075420764207742078420794208042081420824208342084420854208642087420884208942090420914209242093420944209542096420974209842099421004210142102421034210442105421064210742108421094211042111421124211342114421154211642117421184211942120421214212242123421244212542126421274212842129421304213142132421334213442135421364213742138421394214042141421424214342144421454214642147421484214942150421514215242153421544215542156421574215842159421604216142162421634216442165421664216742168421694217042171421724217342174421754217642177421784217942180421814218242183421844218542186421874218842189421904219142192421934219442195421964219742198421994220042201422024220342204422054220642207422084220942210422114221242213422144221542216422174221842219422204222142222422234222442225422264222742228422294223042231422324223342234422354223642237422384223942240422414224242243422444224542246422474224842249422504225142252422534225442255422564225742258422594226042261422624226342264422654226642267422684226942270422714227242273422744227542276422774227842279422804228142282422834228442285422864228742288422894229042291422924229342294422954229642297422984229942300423014230242303423044230542306423074230842309423104231142312423134231442315423164231742318423194232042321423224232342324423254232642327423284232942330423314233242333423344233542336423374233842339423404234142342423434234442345423464234742348423494235042351423524235342354423554235642357423584235942360423614236242363423644236542366423674236842369423704237142372423734237442375423764237742378423794238042381423824238342384423854238642387423884238942390423914239242393423944239542396423974239842399424004240142402424034240442405424064240742408424094241042411424124241342414424154241642417424184241942420424214242242423424244242542426424274242842429424304243142432424334243442435424364243742438424394244042441424424244342444424454244642447424484244942450424514245242453424544245542456424574245842459424604246142462424634246442465424664246742468424694247042471424724247342474424754247642477424784247942480424814248242483424844248542486424874248842489424904249142492424934249442495424964249742498424994250042501425024250342504425054250642507425084250942510425114251242513425144251542516425174251842519425204252142522425234252442525425264252742528425294253042531425324253342534425354253642537425384253942540425414254242543425444254542546425474254842549425504255142552425534255442555425564255742558425594256042561425624256342564425654256642567425684256942570425714257242573425744257542576425774257842579425804258142582425834258442585425864258742588425894259042591425924259342594425954259642597425984259942600426014260242603426044260542606426074260842609426104261142612426134261442615426164261742618426194262042621426224262342624426254262642627426284262942630426314263242633426344263542636426374263842639426404264142642426434264442645426464264742648426494265042651426524265342654426554265642657426584265942660426614266242663426644266542666426674266842669426704267142672426734267442675426764267742678426794268042681426824268342684426854268642687426884268942690426914269242693426944269542696426974269842699427004270142702427034270442705427064270742708427094271042711427124271342714427154271642717427184271942720427214272242723427244272542726427274272842729427304273142732427334273442735427364273742738427394274042741427424274342744427454274642747427484274942750427514275242753427544275542756427574275842759427604276142762427634276442765427664276742768427694277042771427724277342774427754277642777427784277942780427814278242783427844278542786427874278842789427904279142792427934279442795427964279742798427994280042801428024280342804428054280642807428084280942810428114281242813428144281542816428174281842819428204282142822428234282442825428264282742828428294283042831428324283342834428354283642837428384283942840428414284242843428444284542846428474284842849428504285142852428534285442855428564285742858428594286042861428624286342864428654286642867428684286942870428714287242873428744287542876428774287842879428804288142882428834288442885428864288742888428894289042891428924289342894428954289642897428984289942900429014290242903429044290542906429074290842909429104291142912429134291442915429164291742918429194292042921429224292342924429254292642927429284292942930429314293242933429344293542936429374293842939429404294142942429434294442945429464294742948429494295042951429524295342954429554295642957429584295942960429614296242963429644296542966429674296842969429704297142972429734297442975429764297742978429794298042981429824298342984429854298642987429884298942990429914299242993429944299542996429974299842999430004300143002430034300443005430064300743008430094301043011430124301343014430154301643017430184301943020430214302243023430244302543026430274302843029430304303143032430334303443035430364303743038430394304043041430424304343044430454304643047430484304943050430514305243053430544305543056430574305843059430604306143062430634306443065430664306743068430694307043071430724307343074430754307643077430784307943080430814308243083430844308543086430874308843089430904309143092430934309443095430964309743098430994310043101431024310343104431054310643107431084310943110431114311243113431144311543116431174311843119431204312143122431234312443125431264312743128431294313043131431324313343134431354313643137431384313943140431414314243143431444314543146431474314843149431504315143152431534315443155431564315743158431594316043161431624316343164431654316643167431684316943170431714317243173431744317543176431774317843179431804318143182431834318443185431864318743188431894319043191431924319343194431954319643197431984319943200432014320243203432044320543206432074320843209432104321143212432134321443215432164321743218432194322043221432224322343224432254322643227432284322943230432314323243233432344323543236432374323843239432404324143242432434324443245432464324743248432494325043251432524325343254432554325643257432584325943260432614326243263432644326543266432674326843269432704327143272432734327443275432764327743278432794328043281432824328343284432854328643287432884328943290432914329243293432944329543296432974329843299433004330143302433034330443305433064330743308433094331043311433124331343314433154331643317433184331943320433214332243323433244332543326433274332843329433304333143332433334333443335433364333743338433394334043341433424334343344433454334643347433484334943350433514335243353433544335543356433574335843359433604336143362433634336443365433664336743368433694337043371433724337343374433754337643377433784337943380433814338243383433844338543386433874338843389433904339143392433934339443395433964339743398433994340043401434024340343404434054340643407434084340943410434114341243413434144341543416434174341843419434204342143422434234342443425434264342743428434294343043431434324343343434434354343643437434384343943440434414344243443434444344543446434474344843449434504345143452434534345443455434564345743458434594346043461434624346343464434654346643467434684346943470434714347243473434744347543476434774347843479434804348143482434834348443485434864348743488434894349043491434924349343494434954349643497434984349943500435014350243503435044350543506435074350843509435104351143512435134351443515435164351743518435194352043521435224352343524435254352643527435284352943530435314353243533435344353543536435374353843539435404354143542435434354443545435464354743548435494355043551435524355343554435554355643557435584355943560435614356243563435644356543566435674356843569435704357143572435734357443575435764357743578435794358043581435824358343584435854358643587435884358943590435914359243593435944359543596435974359843599436004360143602436034360443605436064360743608436094361043611436124361343614436154361643617436184361943620436214362243623436244362543626436274362843629436304363143632436334363443635436364363743638436394364043641436424364343644436454364643647436484364943650436514365243653436544365543656436574365843659436604366143662436634366443665436664366743668436694367043671436724367343674436754367643677436784367943680436814368243683436844368543686436874368843689436904369143692436934369443695436964369743698436994370043701437024370343704437054370643707437084370943710437114371243713437144371543716437174371843719437204372143722437234372443725437264372743728437294373043731437324373343734437354373643737437384373943740437414374243743437444374543746437474374843749437504375143752437534375443755437564375743758437594376043761437624376343764437654376643767437684376943770437714377243773437744377543776437774377843779437804378143782437834378443785437864378743788437894379043791437924379343794437954379643797437984379943800438014380243803438044380543806438074380843809438104381143812438134381443815438164381743818438194382043821438224382343824438254382643827438284382943830438314383243833438344383543836438374383843839438404384143842438434384443845438464384743848438494385043851438524385343854438554385643857438584385943860438614386243863438644386543866438674386843869438704387143872438734387443875438764387743878438794388043881438824388343884438854388643887438884388943890438914389243893438944389543896438974389843899439004390143902439034390443905439064390743908439094391043911439124391343914439154391643917439184391943920439214392243923439244392543926439274392843929439304393143932439334393443935439364393743938439394394043941439424394343944439454394643947439484394943950439514395243953439544395543956439574395843959439604396143962439634396443965439664396743968439694397043971439724397343974439754397643977439784397943980439814398243983439844398543986439874398843989439904399143992439934399443995439964399743998439994400044001440024400344004440054400644007440084400944010440114401244013440144401544016440174401844019440204402144022440234402444025440264402744028440294403044031440324403344034440354403644037440384403944040440414404244043440444404544046440474404844049440504405144052440534405444055440564405744058440594406044061440624406344064440654406644067440684406944070440714407244073440744407544076440774407844079440804408144082440834408444085440864408744088440894409044091440924409344094440954409644097440984409944100441014410244103441044410544106441074410844109441104411144112441134411444115441164411744118441194412044121441224412344124441254412644127441284412944130441314413244133441344413544136441374413844139441404414144142441434414444145441464414744148441494415044151441524415344154441554415644157441584415944160441614416244163441644416544166441674416844169441704417144172441734417444175441764417744178441794418044181441824418344184441854418644187441884418944190441914419244193441944419544196441974419844199442004420144202442034420444205442064420744208442094421044211442124421344214442154421644217442184421944220442214422244223442244422544226442274422844229442304423144232442334423444235442364423744238442394424044241442424424344244442454424644247442484424944250442514425244253442544425544256442574425844259442604426144262442634426444265442664426744268442694427044271442724427344274442754427644277442784427944280442814428244283442844428544286442874428844289442904429144292442934429444295442964429744298442994430044301443024430344304443054430644307443084430944310443114431244313443144431544316443174431844319443204432144322443234432444325443264432744328443294433044331443324433344334443354433644337443384433944340443414434244343443444434544346443474434844349443504435144352443534435444355443564435744358443594436044361443624436344364443654436644367443684436944370443714437244373443744437544376443774437844379443804438144382443834438444385443864438744388443894439044391443924439344394443954439644397443984439944400444014440244403444044440544406444074440844409444104441144412444134441444415444164441744418444194442044421444224442344424444254442644427444284442944430444314443244433444344443544436444374443844439444404444144442444434444444445444464444744448444494445044451444524445344454444554445644457444584445944460444614446244463444644446544466444674446844469444704447144472444734447444475444764447744478444794448044481444824448344484444854448644487444884448944490444914449244493444944449544496444974449844499445004450144502445034450444505445064450744508445094451044511445124451344514445154451644517445184451944520445214452244523445244452544526445274452844529445304453144532445334453444535445364453744538445394454044541445424454344544445454454644547445484454944550445514455244553445544455544556445574455844559445604456144562445634456444565445664456744568445694457044571445724457344574445754457644577445784457944580445814458244583445844458544586445874458844589445904459144592445934459444595445964459744598445994460044601446024460344604446054460644607446084460944610446114461244613446144461544616446174461844619446204462144622446234462444625446264462744628446294463044631446324463344634446354463644637446384463944640446414464244643446444464544646446474464844649446504465144652446534465444655446564465744658446594466044661446624466344664446654466644667446684466944670446714467244673446744467544676446774467844679446804468144682446834468444685446864468744688446894469044691446924469344694446954469644697446984469944700447014470244703447044470544706447074470844709447104471144712447134471444715447164471744718447194472044721447224472344724447254472644727447284472944730447314473244733447344473544736447374473844739447404474144742447434474444745447464474744748447494475044751447524475344754447554475644757447584475944760447614476244763447644476544766447674476844769447704477144772447734477444775447764477744778447794478044781447824478344784447854478644787447884478944790447914479244793447944479544796447974479844799448004480144802448034480444805448064480744808448094481044811448124481344814448154481644817448184481944820448214482244823448244482544826448274482844829448304483144832448334483444835448364483744838448394484044841448424484344844448454484644847448484484944850448514485244853448544485544856448574485844859448604486144862448634486444865448664486744868448694487044871448724487344874448754487644877448784487944880448814488244883448844488544886448874488844889448904489144892448934489444895448964489744898448994490044901449024490344904449054490644907449084490944910449114491244913449144491544916449174491844919449204492144922449234492444925449264492744928449294493044931449324493344934449354493644937449384493944940449414494244943449444494544946449474494844949449504495144952449534495444955449564495744958449594496044961449624496344964449654496644967449684496944970449714497244973449744497544976449774497844979449804498144982449834498444985449864498744988449894499044991449924499344994449954499644997449984499945000450014500245003450044500545006450074500845009450104501145012450134501445015450164501745018450194502045021450224502345024450254502645027450284502945030450314503245033450344503545036450374503845039450404504145042450434504445045450464504745048450494505045051450524505345054450554505645057450584505945060450614506245063450644506545066450674506845069450704507145072450734507445075450764507745078450794508045081450824508345084450854508645087450884508945090450914509245093450944509545096450974509845099451004510145102451034510445105451064510745108451094511045111451124511345114451154511645117451184511945120451214512245123451244512545126451274512845129451304513145132451334513445135451364513745138451394514045141451424514345144451454514645147451484514945150451514515245153451544515545156451574515845159451604516145162451634516445165451664516745168451694517045171451724517345174451754517645177451784517945180451814518245183451844518545186451874518845189451904519145192451934519445195451964519745198451994520045201452024520345204452054520645207452084520945210452114521245213452144521545216452174521845219452204522145222452234522445225452264522745228452294523045231452324523345234452354523645237452384523945240452414524245243452444524545246452474524845249452504525145252452534525445255452564525745258452594526045261452624526345264452654526645267452684526945270452714527245273452744527545276452774527845279452804528145282452834528445285452864528745288452894529045291452924529345294452954529645297452984529945300453014530245303453044530545306453074530845309453104531145312453134531445315453164531745318453194532045321453224532345324453254532645327453284532945330453314533245333453344533545336453374533845339453404534145342453434534445345453464534745348453494535045351453524535345354453554535645357453584535945360453614536245363453644536545366453674536845369453704537145372453734537445375453764537745378453794538045381453824538345384453854538645387453884538945390453914539245393453944539545396453974539845399454004540145402454034540445405454064540745408454094541045411454124541345414454154541645417454184541945420454214542245423454244542545426454274542845429454304543145432454334543445435454364543745438454394544045441454424544345444454454544645447454484544945450454514545245453454544545545456454574545845459454604546145462454634546445465454664546745468454694547045471454724547345474454754547645477454784547945480454814548245483454844548545486454874548845489454904549145492454934549445495454964549745498454994550045501455024550345504455054550645507455084550945510455114551245513455144551545516455174551845519455204552145522455234552445525455264552745528455294553045531455324553345534455354553645537455384553945540455414554245543455444554545546455474554845549455504555145552455534555445555455564555745558455594556045561455624556345564455654556645567455684556945570455714557245573455744557545576455774557845579455804558145582455834558445585455864558745588455894559045591455924559345594455954559645597455984559945600456014560245603456044560545606456074560845609456104561145612456134561445615456164561745618456194562045621456224562345624456254562645627456284562945630456314563245633456344563545636456374563845639456404564145642456434564445645456464564745648456494565045651456524565345654456554565645657456584565945660456614566245663456644566545666456674566845669456704567145672456734567445675456764567745678456794568045681456824568345684456854568645687456884568945690456914569245693456944569545696456974569845699457004570145702457034570445705457064570745708457094571045711457124571345714457154571645717457184571945720457214572245723457244572545726457274572845729457304573145732457334573445735457364573745738457394574045741457424574345744457454574645747457484574945750457514575245753457544575545756457574575845759457604576145762457634576445765457664576745768457694577045771457724577345774457754577645777457784577945780457814578245783457844578545786457874578845789457904579145792457934579445795457964579745798457994580045801458024580345804458054580645807458084580945810458114581245813458144581545816458174581845819458204582145822458234582445825458264582745828458294583045831458324583345834458354583645837458384583945840458414584245843458444584545846458474584845849458504585145852458534585445855458564585745858458594586045861458624586345864458654586645867458684586945870458714587245873458744587545876458774587845879458804588145882458834588445885458864588745888458894589045891458924589345894458954589645897458984589945900459014590245903459044590545906459074590845909459104591145912459134591445915459164591745918459194592045921459224592345924459254592645927459284592945930459314593245933459344593545936459374593845939459404594145942459434594445945459464594745948459494595045951459524595345954459554595645957459584595945960459614596245963459644596545966459674596845969459704597145972459734597445975459764597745978459794598045981459824598345984459854598645987459884598945990459914599245993459944599545996459974599845999460004600146002460034600446005460064600746008460094601046011460124601346014460154601646017460184601946020460214602246023460244602546026460274602846029460304603146032460334603446035460364603746038460394604046041460424604346044460454604646047460484604946050460514605246053460544605546056460574605846059460604606146062460634606446065460664606746068460694607046071460724607346074460754607646077460784607946080460814608246083460844608546086460874608846089460904609146092460934609446095460964609746098460994610046101461024610346104461054610646107461084610946110461114611246113461144611546116461174611846119461204612146122461234612446125461264612746128461294613046131461324613346134461354613646137461384613946140461414614246143461444614546146461474614846149461504615146152461534615446155461564615746158461594616046161461624616346164461654616646167461684616946170461714617246173461744617546176461774617846179461804618146182461834618446185461864618746188461894619046191461924619346194461954619646197461984619946200462014620246203462044620546206462074620846209462104621146212462134621446215462164621746218462194622046221462224622346224462254622646227462284622946230462314623246233462344623546236462374623846239462404624146242462434624446245462464624746248462494625046251462524625346254462554625646257462584625946260462614626246263462644626546266462674626846269462704627146272462734627446275462764627746278462794628046281462824628346284462854628646287462884628946290462914629246293462944629546296462974629846299463004630146302463034630446305463064630746308463094631046311463124631346314463154631646317463184631946320463214632246323463244632546326463274632846329463304633146332463334633446335463364633746338463394634046341463424634346344463454634646347463484634946350463514635246353463544635546356463574635846359463604636146362463634636446365463664636746368463694637046371463724637346374463754637646377463784637946380463814638246383463844638546386463874638846389463904639146392463934639446395463964639746398463994640046401464024640346404464054640646407464084640946410464114641246413464144641546416464174641846419464204642146422464234642446425464264642746428464294643046431464324643346434464354643646437464384643946440464414644246443464444644546446464474644846449464504645146452464534645446455464564645746458464594646046461464624646346464464654646646467464684646946470464714647246473464744647546476464774647846479464804648146482464834648446485464864648746488464894649046491464924649346494464954649646497464984649946500465014650246503465044650546506465074650846509465104651146512465134651446515465164651746518465194652046521465224652346524465254652646527465284652946530465314653246533465344653546536465374653846539465404654146542465434654446545465464654746548465494655046551465524655346554465554655646557465584655946560465614656246563465644656546566465674656846569465704657146572465734657446575465764657746578465794658046581465824658346584465854658646587465884658946590465914659246593465944659546596465974659846599466004660146602466034660446605466064660746608466094661046611466124661346614466154661646617466184661946620466214662246623466244662546626466274662846629466304663146632466334663446635466364663746638466394664046641466424664346644466454664646647466484664946650466514665246653466544665546656466574665846659466604666146662466634666446665466664666746668466694667046671466724667346674466754667646677466784667946680466814668246683466844668546686466874668846689466904669146692466934669446695466964669746698466994670046701467024670346704467054670646707467084670946710467114671246713467144671546716467174671846719467204672146722467234672446725467264672746728467294673046731467324673346734467354673646737467384673946740467414674246743467444674546746467474674846749467504675146752467534675446755467564675746758467594676046761467624676346764467654676646767467684676946770467714677246773467744677546776467774677846779467804678146782467834678446785467864678746788467894679046791467924679346794467954679646797467984679946800468014680246803468044680546806468074680846809468104681146812468134681446815468164681746818468194682046821468224682346824468254682646827468284682946830468314683246833468344683546836468374683846839468404684146842468434684446845468464684746848468494685046851468524685346854468554685646857468584685946860468614686246863468644686546866468674686846869468704687146872468734687446875468764687746878468794688046881468824688346884468854688646887468884688946890468914689246893468944689546896468974689846899469004690146902469034690446905469064690746908469094691046911469124691346914469154691646917469184691946920469214692246923469244692546926469274692846929469304693146932469334693446935469364693746938469394694046941469424694346944469454694646947469484694946950469514695246953469544695546956469574695846959469604696146962469634696446965469664696746968469694697046971469724697346974469754697646977469784697946980469814698246983469844698546986469874698846989469904699146992469934699446995469964699746998469994700047001470024700347004470054700647007470084700947010470114701247013470144701547016470174701847019470204702147022470234702447025470264702747028470294703047031470324703347034470354703647037470384703947040470414704247043470444704547046470474704847049470504705147052470534705447055470564705747058470594706047061470624706347064470654706647067470684706947070470714707247073470744707547076470774707847079470804708147082470834708447085470864708747088470894709047091470924709347094470954709647097470984709947100471014710247103471044710547106471074710847109471104711147112471134711447115471164711747118471194712047121471224712347124471254712647127471284712947130471314713247133471344713547136471374713847139471404714147142471434714447145471464714747148471494715047151471524715347154471554715647157471584715947160471614716247163471644716547166471674716847169471704717147172471734717447175471764717747178471794718047181471824718347184471854718647187471884718947190471914719247193471944719547196471974719847199472004720147202472034720447205472064720747208472094721047211472124721347214472154721647217472184721947220472214722247223472244722547226472274722847229472304723147232472334723447235472364723747238472394724047241472424724347244472454724647247472484724947250472514725247253472544725547256472574725847259472604726147262472634726447265472664726747268472694727047271472724727347274472754727647277472784727947280472814728247283472844728547286472874728847289472904729147292472934729447295472964729747298472994730047301473024730347304473054730647307473084730947310473114731247313473144731547316473174731847319473204732147322473234732447325473264732747328473294733047331473324733347334473354733647337473384733947340473414734247343473444734547346473474734847349473504735147352473534735447355473564735747358473594736047361473624736347364473654736647367473684736947370473714737247373473744737547376473774737847379473804738147382473834738447385473864738747388473894739047391473924739347394473954739647397473984739947400474014740247403474044740547406474074740847409474104741147412474134741447415474164741747418474194742047421474224742347424474254742647427474284742947430474314743247433474344743547436474374743847439474404744147442474434744447445474464744747448474494745047451474524745347454474554745647457474584745947460474614746247463474644746547466474674746847469474704747147472474734747447475474764747747478474794748047481474824748347484474854748647487474884748947490474914749247493474944749547496474974749847499475004750147502475034750447505475064750747508475094751047511475124751347514475154751647517475184751947520475214752247523475244752547526475274752847529475304753147532475334753447535475364753747538475394754047541475424754347544475454754647547475484754947550475514755247553475544755547556475574755847559475604756147562475634756447565475664756747568475694757047571475724757347574475754757647577475784757947580475814758247583475844758547586475874758847589475904759147592475934759447595475964759747598475994760047601476024760347604476054760647607476084760947610476114761247613476144761547616476174761847619476204762147622476234762447625476264762747628476294763047631476324763347634476354763647637476384763947640476414764247643476444764547646476474764847649476504765147652476534765447655476564765747658476594766047661476624766347664476654766647667476684766947670476714767247673476744767547676476774767847679476804768147682476834768447685476864768747688476894769047691476924769347694476954769647697476984769947700477014770247703477044770547706477074770847709477104771147712477134771447715477164771747718477194772047721477224772347724477254772647727477284772947730477314773247733477344773547736477374773847739477404774147742477434774447745477464774747748477494775047751477524775347754477554775647757477584775947760477614776247763477644776547766477674776847769477704777147772477734777447775477764777747778477794778047781477824778347784477854778647787477884778947790477914779247793477944779547796477974779847799478004780147802478034780447805478064780747808478094781047811478124781347814478154781647817478184781947820478214782247823478244782547826478274782847829478304783147832478334783447835478364783747838478394784047841478424784347844478454784647847478484784947850478514785247853478544785547856478574785847859478604786147862478634786447865478664786747868478694787047871478724787347874478754787647877478784787947880478814788247883478844788547886478874788847889478904789147892478934789447895478964789747898478994790047901479024790347904479054790647907479084790947910479114791247913479144791547916479174791847919479204792147922479234792447925479264792747928479294793047931479324793347934479354793647937479384793947940479414794247943479444794547946479474794847949479504795147952479534795447955479564795747958479594796047961479624796347964479654796647967479684796947970479714797247973479744797547976479774797847979479804798147982479834798447985479864798747988479894799047991479924799347994479954799647997479984799948000480014800248003480044800548006480074800848009480104801148012480134801448015480164801748018480194802048021480224802348024480254802648027480284802948030480314803248033480344803548036480374803848039480404804148042480434804448045480464804748048480494805048051480524805348054480554805648057480584805948060480614806248063480644806548066480674806848069480704807148072480734807448075480764807748078480794808048081480824808348084480854808648087480884808948090480914809248093480944809548096480974809848099481004810148102481034810448105481064810748108481094811048111481124811348114481154811648117481184811948120481214812248123481244812548126481274812848129481304813148132481334813448135481364813748138481394814048141481424814348144481454814648147481484814948150481514815248153481544815548156481574815848159481604816148162481634816448165481664816748168481694817048171481724817348174481754817648177481784817948180481814818248183481844818548186481874818848189481904819148192481934819448195481964819748198481994820048201482024820348204482054820648207482084820948210482114821248213482144821548216482174821848219482204822148222482234822448225482264822748228482294823048231482324823348234482354823648237482384823948240482414824248243482444824548246482474824848249482504825148252482534825448255482564825748258482594826048261482624826348264482654826648267482684826948270482714827248273482744827548276482774827848279482804828148282482834828448285482864828748288482894829048291482924829348294482954829648297482984829948300483014830248303483044830548306483074830848309483104831148312483134831448315483164831748318483194832048321483224832348324483254832648327483284832948330483314833248333483344833548336483374833848339483404834148342483434834448345483464834748348483494835048351483524835348354483554835648357483584835948360483614836248363483644836548366483674836848369483704837148372483734837448375483764837748378483794838048381483824838348384483854838648387483884838948390483914839248393483944839548396483974839848399484004840148402484034840448405484064840748408484094841048411484124841348414484154841648417484184841948420484214842248423484244842548426484274842848429484304843148432484334843448435484364843748438484394844048441484424844348444484454844648447484484844948450484514845248453484544845548456484574845848459484604846148462484634846448465484664846748468484694847048471484724847348474484754847648477484784847948480484814848248483484844848548486484874848848489484904849148492484934849448495484964849748498484994850048501485024850348504485054850648507485084850948510485114851248513485144851548516485174851848519485204852148522485234852448525485264852748528485294853048531485324853348534485354853648537485384853948540485414854248543485444854548546485474854848549485504855148552485534855448555485564855748558485594856048561485624856348564485654856648567485684856948570485714857248573485744857548576485774857848579485804858148582485834858448585485864858748588485894859048591485924859348594485954859648597485984859948600486014860248603486044860548606486074860848609486104861148612486134861448615486164861748618486194862048621486224862348624486254862648627486284862948630486314863248633486344863548636486374863848639486404864148642486434864448645486464864748648486494865048651486524865348654486554865648657486584865948660486614866248663486644866548666486674866848669486704867148672486734867448675486764867748678486794868048681486824868348684486854868648687486884868948690486914869248693486944869548696486974869848699487004870148702487034870448705487064870748708487094871048711487124871348714487154871648717487184871948720487214872248723487244872548726487274872848729487304873148732487334873448735487364873748738487394874048741487424874348744487454874648747487484874948750487514875248753487544875548756487574875848759487604876148762487634876448765487664876748768487694877048771487724877348774487754877648777487784877948780487814878248783487844878548786487874878848789487904879148792487934879448795487964879748798487994880048801488024880348804488054880648807488084880948810488114881248813488144881548816488174881848819488204882148822488234882448825488264882748828488294883048831488324883348834488354883648837488384883948840488414884248843488444884548846488474884848849488504885148852488534885448855488564885748858488594886048861488624886348864488654886648867488684886948870488714887248873488744887548876488774887848879488804888148882488834888448885488864888748888488894889048891488924889348894488954889648897488984889948900489014890248903489044890548906489074890848909489104891148912489134891448915489164891748918489194892048921489224892348924489254892648927489284892948930489314893248933489344893548936489374893848939489404894148942489434894448945489464894748948489494895048951489524895348954489554895648957489584895948960489614896248963489644896548966489674896848969489704897148972489734897448975489764897748978489794898048981489824898348984489854898648987489884898948990489914899248993489944899548996489974899848999490004900149002490034900449005490064900749008490094901049011490124901349014490154901649017490184901949020490214902249023490244902549026490274902849029490304903149032490334903449035490364903749038490394904049041490424904349044490454904649047490484904949050490514905249053490544905549056490574905849059490604906149062490634906449065490664906749068490694907049071490724907349074490754907649077490784907949080490814908249083490844908549086490874908849089490904909149092490934909449095490964909749098490994910049101491024910349104491054910649107491084910949110491114911249113491144911549116491174911849119491204912149122491234912449125491264912749128491294913049131491324913349134491354913649137491384913949140491414914249143491444914549146491474914849149491504915149152491534915449155491564915749158491594916049161491624916349164491654916649167491684916949170491714917249173491744917549176491774917849179491804918149182491834918449185491864918749188491894919049191491924919349194491954919649197491984919949200492014920249203492044920549206492074920849209492104921149212492134921449215492164921749218492194922049221492224922349224492254922649227492284922949230492314923249233492344923549236492374923849239492404924149242492434924449245492464924749248492494925049251492524925349254492554925649257492584925949260492614926249263492644926549266492674926849269492704927149272492734927449275492764927749278492794928049281492824928349284492854928649287492884928949290492914929249293492944929549296492974929849299493004930149302493034930449305493064930749308493094931049311493124931349314493154931649317493184931949320493214932249323493244932549326493274932849329493304933149332493334933449335493364933749338493394934049341493424934349344493454934649347493484934949350493514935249353493544935549356493574935849359493604936149362493634936449365493664936749368493694937049371493724937349374493754937649377493784937949380493814938249383493844938549386493874938849389493904939149392493934939449395493964939749398493994940049401494024940349404494054940649407494084940949410494114941249413494144941549416494174941849419494204942149422494234942449425494264942749428494294943049431494324943349434494354943649437494384943949440494414944249443494444944549446494474944849449494504945149452494534945449455494564945749458494594946049461494624946349464494654946649467494684946949470494714947249473494744947549476494774947849479494804948149482494834948449485494864948749488494894949049491494924949349494494954949649497494984949949500495014950249503495044950549506495074950849509495104951149512495134951449515495164951749518495194952049521495224952349524495254952649527495284952949530495314953249533495344953549536495374953849539495404954149542495434954449545495464954749548495494955049551495524955349554495554955649557495584955949560495614956249563495644956549566495674956849569495704957149572495734957449575495764957749578495794958049581495824958349584495854958649587495884958949590495914959249593495944959549596495974959849599496004960149602496034960449605496064960749608496094961049611496124961349614496154961649617496184961949620496214962249623496244962549626496274962849629496304963149632496334963449635496364963749638496394964049641496424964349644496454964649647496484964949650496514965249653496544965549656496574965849659496604966149662496634966449665496664966749668496694967049671496724967349674496754967649677496784967949680496814968249683496844968549686496874968849689496904969149692496934969449695496964969749698496994970049701497024970349704497054970649707497084970949710497114971249713497144971549716497174971849719497204972149722497234972449725497264972749728497294973049731497324973349734497354973649737497384973949740497414974249743497444974549746497474974849749497504975149752497534975449755497564975749758497594976049761497624976349764497654976649767497684976949770497714977249773497744977549776497774977849779497804978149782497834978449785497864978749788497894979049791497924979349794497954979649797497984979949800498014980249803498044980549806498074980849809498104981149812498134981449815498164981749818498194982049821498224982349824498254982649827498284982949830498314983249833498344983549836498374983849839498404984149842498434984449845498464984749848498494985049851498524985349854498554985649857498584985949860498614986249863498644986549866498674986849869498704987149872498734987449875498764987749878498794988049881498824988349884498854988649887498884988949890498914989249893498944989549896498974989849899499004990149902499034990449905499064990749908499094991049911499124991349914499154991649917499184991949920499214992249923499244992549926499274992849929499304993149932499334993449935499364993749938499394994049941499424994349944499454994649947499484994949950499514995249953499544995549956499574995849959499604996149962499634996449965499664996749968499694997049971499724997349974499754997649977499784997949980499814998249983499844998549986499874998849989499904999149992499934999449995499964999749998499995000050001500025000350004500055000650007500085000950010500115001250013500145001550016500175001850019500205002150022500235002450025500265002750028500295003050031500325003350034500355003650037500385003950040500415004250043500445004550046500475004850049500505005150052500535005450055500565005750058500595006050061500625006350064500655006650067500685006950070500715007250073500745007550076500775007850079500805008150082500835008450085500865008750088500895009050091500925009350094500955009650097500985009950100501015010250103501045010550106501075010850109501105011150112501135011450115501165011750118501195012050121501225012350124501255012650127501285012950130501315013250133501345013550136501375013850139501405014150142501435014450145501465014750148501495015050151501525015350154501555015650157501585015950160501615016250163501645016550166501675016850169501705017150172501735017450175501765017750178501795018050181501825018350184501855018650187501885018950190501915019250193501945019550196501975019850199502005020150202502035020450205502065020750208502095021050211502125021350214502155021650217502185021950220502215022250223502245022550226502275022850229502305023150232502335023450235502365023750238502395024050241502425024350244502455024650247502485024950250502515025250253502545025550256502575025850259502605026150262502635026450265502665026750268502695027050271502725027350274502755027650277502785027950280502815028250283502845028550286502875028850289502905029150292502935029450295502965029750298502995030050301503025030350304503055030650307503085030950310503115031250313503145031550316503175031850319503205032150322503235032450325503265032750328503295033050331503325033350334503355033650337503385033950340503415034250343503445034550346503475034850349503505035150352503535035450355503565035750358503595036050361503625036350364503655036650367503685036950370503715037250373503745037550376503775037850379503805038150382503835038450385503865038750388503895039050391503925039350394503955039650397503985039950400504015040250403504045040550406504075040850409504105041150412504135041450415504165041750418504195042050421504225042350424504255042650427504285042950430504315043250433504345043550436504375043850439504405044150442504435044450445504465044750448504495045050451504525045350454504555045650457504585045950460504615046250463504645046550466504675046850469504705047150472504735047450475504765047750478504795048050481504825048350484504855048650487504885048950490504915049250493504945049550496504975049850499505005050150502505035050450505505065050750508505095051050511505125051350514505155051650517505185051950520505215052250523505245052550526505275052850529505305053150532505335053450535505365053750538505395054050541505425054350544505455054650547505485054950550505515055250553505545055550556505575055850559505605056150562505635056450565505665056750568505695057050571505725057350574505755057650577505785057950580505815058250583505845058550586505875058850589505905059150592505935059450595505965059750598505995060050601506025060350604506055060650607506085060950610506115061250613506145061550616506175061850619506205062150622506235062450625506265062750628506295063050631506325063350634506355063650637506385063950640506415064250643506445064550646506475064850649506505065150652506535065450655506565065750658506595066050661506625066350664506655066650667506685066950670506715067250673506745067550676506775067850679506805068150682506835068450685506865068750688506895069050691506925069350694506955069650697506985069950700507015070250703507045070550706507075070850709507105071150712507135071450715507165071750718507195072050721507225072350724507255072650727507285072950730507315073250733507345073550736507375073850739507405074150742507435074450745507465074750748507495075050751507525075350754507555075650757507585075950760507615076250763507645076550766507675076850769507705077150772507735077450775507765077750778507795078050781507825078350784507855078650787507885078950790507915079250793507945079550796507975079850799508005080150802508035080450805508065080750808508095081050811508125081350814508155081650817508185081950820508215082250823508245082550826508275082850829508305083150832508335083450835508365083750838508395084050841508425084350844508455084650847508485084950850508515085250853508545085550856508575085850859508605086150862508635086450865508665086750868508695087050871508725087350874508755087650877508785087950880508815088250883508845088550886508875088850889508905089150892508935089450895508965089750898508995090050901509025090350904509055090650907509085090950910509115091250913509145091550916509175091850919509205092150922509235092450925509265092750928509295093050931509325093350934509355093650937509385093950940509415094250943509445094550946509475094850949509505095150952509535095450955509565095750958509595096050961509625096350964509655096650967509685096950970509715097250973509745097550976509775097850979509805098150982509835098450985509865098750988509895099050991509925099350994509955099650997509985099951000510015100251003510045100551006510075100851009510105101151012510135101451015510165101751018510195102051021510225102351024510255102651027510285102951030510315103251033510345103551036510375103851039510405104151042510435104451045510465104751048510495105051051510525105351054510555105651057510585105951060510615106251063510645106551066510675106851069510705107151072510735107451075510765107751078510795108051081510825108351084510855108651087510885108951090510915109251093510945109551096510975109851099511005110151102511035110451105511065110751108511095111051111511125111351114511155111651117511185111951120511215112251123511245112551126511275112851129511305113151132511335113451135511365113751138511395114051141511425114351144511455114651147511485114951150511515115251153511545115551156511575115851159511605116151162511635116451165511665116751168511695117051171511725117351174511755117651177511785117951180511815118251183511845118551186511875118851189511905119151192511935119451195511965119751198511995120051201512025120351204512055120651207512085120951210512115121251213512145121551216512175121851219512205122151222512235122451225512265122751228512295123051231512325123351234512355123651237512385123951240512415124251243512445124551246512475124851249512505125151252512535125451255512565125751258512595126051261512625126351264512655126651267512685126951270512715127251273512745127551276512775127851279512805128151282512835128451285512865128751288512895129051291512925129351294512955129651297512985129951300513015130251303513045130551306513075130851309513105131151312513135131451315513165131751318513195132051321513225132351324513255132651327513285132951330513315133251333513345133551336513375133851339513405134151342513435134451345513465134751348513495135051351513525135351354513555135651357513585135951360513615136251363513645136551366513675136851369513705137151372513735137451375513765137751378513795138051381513825138351384513855138651387513885138951390513915139251393513945139551396513975139851399514005140151402514035140451405514065140751408514095141051411514125141351414514155141651417514185141951420514215142251423514245142551426514275142851429514305143151432514335143451435514365143751438514395144051441514425144351444514455144651447514485144951450514515145251453514545145551456514575145851459514605146151462514635146451465514665146751468514695147051471514725147351474514755147651477514785147951480514815148251483514845148551486514875148851489514905149151492514935149451495514965149751498514995150051501515025150351504515055150651507515085150951510515115151251513515145151551516515175151851519515205152151522515235152451525515265152751528515295153051531515325153351534515355153651537515385153951540515415154251543515445154551546515475154851549515505155151552515535155451555515565155751558515595156051561515625156351564515655156651567515685156951570515715157251573515745157551576515775157851579515805158151582515835158451585515865158751588515895159051591515925159351594515955159651597515985159951600516015160251603516045160551606516075160851609516105161151612516135161451615516165161751618516195162051621516225162351624516255162651627516285162951630516315163251633516345163551636516375163851639516405164151642516435164451645516465164751648516495165051651516525165351654516555165651657516585165951660516615166251663516645166551666516675166851669516705167151672516735167451675516765167751678516795168051681516825168351684516855168651687516885168951690516915169251693516945169551696516975169851699517005170151702517035170451705517065170751708517095171051711517125171351714517155171651717517185171951720517215172251723517245172551726517275172851729517305173151732517335173451735517365173751738517395174051741517425174351744517455174651747517485174951750517515175251753517545175551756517575175851759517605176151762517635176451765517665176751768517695177051771517725177351774517755177651777517785177951780517815178251783517845178551786517875178851789517905179151792517935179451795517965179751798517995180051801518025180351804518055180651807518085180951810518115181251813518145181551816518175181851819518205182151822518235182451825518265182751828518295183051831518325183351834518355183651837518385183951840518415184251843518445184551846518475184851849518505185151852518535185451855518565185751858518595186051861518625186351864518655186651867518685186951870518715187251873518745187551876518775187851879518805188151882518835188451885518865188751888518895189051891518925189351894518955189651897518985189951900519015190251903519045190551906519075190851909519105191151912519135191451915519165191751918519195192051921519225192351924519255192651927519285192951930519315193251933519345193551936519375193851939519405194151942519435194451945519465194751948519495195051951519525195351954519555195651957519585195951960519615196251963519645196551966519675196851969519705197151972519735197451975519765197751978519795198051981519825198351984519855198651987519885198951990519915199251993519945199551996519975199851999520005200152002520035200452005520065200752008520095201052011520125201352014520155201652017520185201952020520215202252023520245202552026520275202852029520305203152032520335203452035520365203752038520395204052041520425204352044520455204652047520485204952050520515205252053520545205552056520575205852059520605206152062520635206452065520665206752068520695207052071520725207352074520755207652077520785207952080520815208252083520845208552086520875208852089520905209152092520935209452095520965209752098520995210052101521025210352104521055210652107521085210952110521115211252113521145211552116521175211852119521205212152122521235212452125521265212752128521295213052131521325213352134521355213652137521385213952140521415214252143521445214552146521475214852149521505215152152521535215452155521565215752158521595216052161521625216352164521655216652167521685216952170521715217252173521745217552176521775217852179521805218152182521835218452185521865218752188521895219052191521925219352194521955219652197521985219952200522015220252203522045220552206522075220852209522105221152212522135221452215522165221752218522195222052221522225222352224522255222652227522285222952230522315223252233522345223552236522375223852239522405224152242522435224452245522465224752248522495225052251522525225352254522555225652257522585225952260522615226252263522645226552266522675226852269522705227152272522735227452275522765227752278522795228052281522825228352284522855228652287522885228952290522915229252293522945229552296522975229852299523005230152302523035230452305523065230752308523095231052311523125231352314523155231652317523185231952320523215232252323523245232552326523275232852329523305233152332523335233452335523365233752338523395234052341523425234352344523455234652347523485234952350523515235252353523545235552356523575235852359523605236152362523635236452365523665236752368523695237052371523725237352374523755237652377523785237952380523815238252383523845238552386523875238852389523905239152392523935239452395523965239752398523995240052401524025240352404524055240652407524085240952410524115241252413524145241552416524175241852419524205242152422524235242452425524265242752428524295243052431524325243352434524355243652437524385243952440524415244252443524445244552446524475244852449524505245152452524535245452455524565245752458524595246052461524625246352464524655246652467524685246952470524715247252473524745247552476524775247852479524805248152482524835248452485524865248752488524895249052491524925249352494524955249652497524985249952500525015250252503525045250552506525075250852509525105251152512525135251452515525165251752518525195252052521525225252352524525255252652527525285252952530525315253252533525345253552536525375253852539525405254152542525435254452545525465254752548525495255052551525525255352554525555255652557525585255952560525615256252563525645256552566525675256852569525705257152572525735257452575525765257752578525795258052581525825258352584525855258652587525885258952590525915259252593525945259552596525975259852599526005260152602526035260452605526065260752608526095261052611526125261352614526155261652617526185261952620526215262252623526245262552626526275262852629526305263152632526335263452635526365263752638526395264052641526425264352644526455264652647526485264952650526515265252653526545265552656526575265852659526605266152662526635266452665526665266752668526695267052671526725267352674526755267652677526785267952680526815268252683526845268552686526875268852689526905269152692526935269452695526965269752698526995270052701527025270352704527055270652707527085270952710527115271252713527145271552716527175271852719527205272152722527235272452725527265272752728527295273052731527325273352734527355273652737527385273952740527415274252743527445274552746527475274852749527505275152752527535275452755527565275752758527595276052761527625276352764527655276652767527685276952770527715277252773527745277552776527775277852779527805278152782527835278452785527865278752788527895279052791527925279352794527955279652797527985279952800528015280252803528045280552806528075280852809528105281152812528135281452815528165281752818528195282052821528225282352824528255282652827528285282952830528315283252833528345283552836528375283852839528405284152842528435284452845528465284752848528495285052851528525285352854528555285652857528585285952860528615286252863528645286552866528675286852869528705287152872528735287452875528765287752878528795288052881528825288352884528855288652887528885288952890528915289252893528945289552896528975289852899529005290152902529035290452905529065290752908529095291052911529125291352914529155291652917529185291952920529215292252923529245292552926529275292852929529305293152932529335293452935529365293752938529395294052941529425294352944529455294652947529485294952950529515295252953529545295552956529575295852959529605296152962529635296452965529665296752968529695297052971529725297352974529755297652977529785297952980529815298252983529845298552986529875298852989529905299152992529935299452995529965299752998529995300053001530025300353004530055300653007530085300953010530115301253013530145301553016530175301853019530205302153022530235302453025530265302753028530295303053031530325303353034530355303653037530385303953040530415304253043530445304553046530475304853049530505305153052530535305453055530565305753058530595306053061530625306353064530655306653067530685306953070530715307253073530745307553076530775307853079530805308153082530835308453085530865308753088530895309053091530925309353094530955309653097530985309953100531015310253103531045310553106531075310853109531105311153112531135311453115531165311753118531195312053121531225312353124531255312653127531285312953130531315313253133531345313553136531375313853139531405314153142531435314453145531465314753148531495315053151531525315353154531555315653157531585315953160531615316253163531645316553166531675316853169531705317153172531735317453175531765317753178531795318053181531825318353184531855318653187531885318953190531915319253193531945319553196531975319853199532005320153202532035320453205532065320753208532095321053211532125321353214532155321653217532185321953220532215322253223532245322553226532275322853229532305323153232532335323453235532365323753238532395324053241532425324353244532455324653247532485324953250532515325253253532545325553256532575325853259532605326153262532635326453265532665326753268532695327053271532725327353274532755327653277532785327953280532815328253283532845328553286532875328853289532905329153292532935329453295532965329753298532995330053301533025330353304533055330653307533085330953310533115331253313533145331553316533175331853319533205332153322533235332453325533265332753328533295333053331533325333353334533355333653337533385333953340533415334253343533445334553346533475334853349533505335153352533535335453355533565335753358533595336053361533625336353364533655336653367533685336953370533715337253373533745337553376533775337853379533805338153382533835338453385533865338753388533895339053391533925339353394533955339653397533985339953400534015340253403534045340553406534075340853409534105341153412534135341453415534165341753418534195342053421534225342353424534255342653427534285342953430534315343253433534345343553436534375343853439534405344153442534435344453445534465344753448534495345053451534525345353454534555345653457534585345953460534615346253463534645346553466534675346853469534705347153472534735347453475534765347753478534795348053481534825348353484534855348653487534885348953490534915349253493534945349553496534975349853499535005350153502535035350453505535065350753508535095351053511535125351353514535155351653517535185351953520535215352253523535245352553526535275352853529535305353153532535335353453535535365353753538535395354053541535425354353544535455354653547535485354953550535515355253553535545355553556535575355853559535605356153562535635356453565535665356753568535695357053571535725357353574535755357653577535785357953580535815358253583535845358553586535875358853589535905359153592535935359453595535965359753598535995360053601536025360353604536055360653607536085360953610536115361253613536145361553616536175361853619536205362153622536235362453625536265362753628536295363053631536325363353634536355363653637536385363953640536415364253643536445364553646536475364853649536505365153652536535365453655536565365753658536595366053661536625366353664536655366653667536685366953670536715367253673536745367553676536775367853679536805368153682536835368453685536865368753688536895369053691536925369353694536955369653697536985369953700537015370253703537045370553706537075370853709537105371153712537135371453715537165371753718537195372053721537225372353724537255372653727537285372953730537315373253733537345373553736537375373853739537405374153742537435374453745537465374753748537495375053751537525375353754537555375653757537585375953760537615376253763537645376553766537675376853769537705377153772537735377453775537765377753778537795378053781537825378353784537855378653787537885378953790537915379253793537945379553796537975379853799538005380153802538035380453805538065380753808538095381053811538125381353814538155381653817538185381953820538215382253823538245382553826538275382853829538305383153832538335383453835538365383753838538395384053841538425384353844538455384653847538485384953850538515385253853538545385553856538575385853859538605386153862538635386453865538665386753868538695387053871538725387353874538755387653877538785387953880538815388253883538845388553886538875388853889538905389153892538935389453895538965389753898538995390053901539025390353904539055390653907539085390953910539115391253913539145391553916539175391853919539205392153922539235392453925539265392753928539295393053931539325393353934539355393653937539385393953940539415394253943539445394553946539475394853949539505395153952539535395453955539565395753958539595396053961539625396353964539655396653967539685396953970539715397253973539745397553976539775397853979539805398153982539835398453985539865398753988539895399053991539925399353994539955399653997539985399954000540015400254003540045400554006540075400854009540105401154012540135401454015540165401754018540195402054021540225402354024540255402654027540285402954030540315403254033540345403554036540375403854039540405404154042540435404454045540465404754048540495405054051540525405354054540555405654057540585405954060540615406254063540645406554066540675406854069540705407154072540735407454075540765407754078540795408054081540825408354084540855408654087540885408954090540915409254093540945409554096540975409854099541005410154102541035410454105541065410754108541095411054111541125411354114541155411654117541185411954120541215412254123541245412554126541275412854129541305413154132541335413454135541365413754138541395414054141541425414354144541455414654147541485414954150541515415254153541545415554156541575415854159541605416154162541635416454165541665416754168541695417054171541725417354174541755417654177541785417954180541815418254183541845418554186541875418854189541905419154192541935419454195541965419754198541995420054201542025420354204542055420654207542085420954210542115421254213542145421554216542175421854219542205422154222542235422454225542265422754228542295423054231542325423354234542355423654237542385423954240542415424254243542445424554246542475424854249542505425154252542535425454255542565425754258542595426054261542625426354264542655426654267542685426954270542715427254273542745427554276542775427854279542805428154282542835428454285542865428754288542895429054291542925429354294542955429654297542985429954300543015430254303543045430554306543075430854309543105431154312543135431454315543165431754318543195432054321543225432354324543255432654327543285432954330543315433254333543345433554336543375433854339543405434154342543435434454345543465434754348543495435054351543525435354354543555435654357543585435954360543615436254363543645436554366543675436854369543705437154372543735437454375543765437754378543795438054381543825438354384543855438654387543885438954390543915439254393543945439554396543975439854399544005440154402544035440454405544065440754408544095441054411544125441354414544155441654417544185441954420544215442254423544245442554426544275442854429544305443154432544335443454435544365443754438544395444054441544425444354444544455444654447544485444954450544515445254453544545445554456544575445854459544605446154462544635446454465544665446754468544695447054471544725447354474544755447654477544785447954480544815448254483544845448554486544875448854489544905449154492544935449454495544965449754498544995450054501545025450354504545055450654507545085450954510545115451254513545145451554516545175451854519545205452154522545235452454525545265452754528545295453054531545325453354534545355453654537545385453954540545415454254543545445454554546545475454854549545505455154552545535455454555545565455754558545595456054561545625456354564545655456654567545685456954570545715457254573545745457554576545775457854579545805458154582545835458454585545865458754588545895459054591545925459354594545955459654597545985459954600546015460254603546045460554606546075460854609546105461154612546135461454615546165461754618546195462054621546225462354624546255462654627546285462954630546315463254633546345463554636546375463854639546405464154642546435464454645546465464754648546495465054651546525465354654546555465654657546585465954660546615466254663546645466554666546675466854669546705467154672546735467454675546765467754678546795468054681546825468354684546855468654687546885468954690546915469254693546945469554696546975469854699547005470154702547035470454705547065470754708547095471054711547125471354714547155471654717547185471954720547215472254723547245472554726547275472854729547305473154732547335473454735547365473754738547395474054741547425474354744547455474654747547485474954750547515475254753547545475554756547575475854759547605476154762547635476454765547665476754768547695477054771547725477354774547755477654777547785477954780547815478254783547845478554786547875478854789547905479154792547935479454795547965479754798547995480054801548025480354804548055480654807548085480954810548115481254813548145481554816548175481854819548205482154822548235482454825548265482754828548295483054831548325483354834548355483654837548385483954840548415484254843548445484554846548475484854849548505485154852548535485454855548565485754858548595486054861548625486354864548655486654867548685486954870548715487254873548745487554876548775487854879548805488154882548835488454885548865488754888548895489054891548925489354894548955489654897548985489954900549015490254903549045490554906549075490854909549105491154912549135491454915549165491754918549195492054921549225492354924549255492654927549285492954930549315493254933549345493554936549375493854939549405494154942549435494454945549465494754948549495495054951549525495354954549555495654957549585495954960549615496254963549645496554966549675496854969549705497154972549735497454975549765497754978549795498054981549825498354984549855498654987549885498954990549915499254993549945499554996549975499854999550005500155002550035500455005550065500755008550095501055011550125501355014550155501655017550185501955020550215502255023550245502555026550275502855029550305503155032550335503455035550365503755038550395504055041550425504355044550455504655047550485504955050550515505255053550545505555056550575505855059550605506155062550635506455065550665506755068550695507055071550725507355074550755507655077550785507955080550815508255083550845508555086550875508855089550905509155092550935509455095550965509755098550995510055101551025510355104551055510655107551085510955110551115511255113551145511555116551175511855119551205512155122551235512455125551265512755128551295513055131551325513355134551355513655137551385513955140551415514255143551445514555146551475514855149551505515155152551535515455155551565515755158551595516055161551625516355164551655516655167551685516955170551715517255173551745517555176551775517855179551805518155182551835518455185551865518755188551895519055191551925519355194551955519655197551985519955200552015520255203552045520555206552075520855209552105521155212552135521455215552165521755218552195522055221552225522355224552255522655227552285522955230552315523255233552345523555236552375523855239552405524155242552435524455245552465524755248552495525055251552525525355254552555525655257552585525955260552615526255263552645526555266552675526855269552705527155272552735527455275552765527755278552795528055281552825528355284552855528655287552885528955290552915529255293552945529555296552975529855299553005530155302553035530455305553065530755308553095531055311553125531355314553155531655317553185531955320553215532255323553245532555326553275532855329553305533155332553335533455335553365533755338553395534055341553425534355344553455534655347553485534955350553515535255353553545535555356553575535855359553605536155362553635536455365553665536755368553695537055371553725537355374553755537655377553785537955380553815538255383553845538555386553875538855389553905539155392553935539455395553965539755398553995540055401554025540355404554055540655407554085540955410554115541255413554145541555416554175541855419554205542155422554235542455425554265542755428554295543055431554325543355434554355543655437554385543955440554415544255443554445544555446554475544855449554505545155452554535545455455554565545755458554595546055461554625546355464554655546655467554685546955470554715547255473554745547555476554775547855479554805548155482554835548455485554865548755488554895549055491554925549355494554955549655497554985549955500555015550255503555045550555506555075550855509555105551155512555135551455515555165551755518555195552055521555225552355524555255552655527555285552955530555315553255533555345553555536555375553855539555405554155542555435554455545555465554755548555495555055551555525555355554555555555655557555585555955560555615556255563555645556555566555675556855569555705557155572555735557455575555765557755578555795558055581555825558355584555855558655587555885558955590555915559255593555945559555596555975559855599556005560155602556035560455605556065560755608556095561055611556125561355614556155561655617556185561955620556215562255623556245562555626556275562855629556305563155632556335563455635556365563755638556395564055641556425564355644556455564655647556485564955650556515565255653556545565555656556575565855659556605566155662556635566455665556665566755668556695567055671556725567355674556755567655677556785567955680556815568255683556845568555686556875568855689556905569155692556935569455695556965569755698556995570055701557025570355704557055570655707557085570955710557115571255713557145571555716557175571855719557205572155722557235572455725557265572755728557295573055731557325573355734557355573655737557385573955740557415574255743557445574555746557475574855749557505575155752557535575455755557565575755758557595576055761557625576355764557655576655767557685576955770557715577255773557745577555776557775577855779557805578155782557835578455785557865578755788557895579055791557925579355794557955579655797557985579955800558015580255803558045580555806558075580855809558105581155812558135581455815558165581755818558195582055821558225582355824558255582655827558285582955830558315583255833558345583555836558375583855839558405584155842558435584455845558465584755848558495585055851558525585355854558555585655857558585585955860558615586255863558645586555866558675586855869558705587155872558735587455875558765587755878558795588055881558825588355884558855588655887558885588955890558915589255893558945589555896558975589855899559005590155902559035590455905559065590755908559095591055911559125591355914559155591655917559185591955920559215592255923559245592555926559275592855929559305593155932559335593455935559365593755938559395594055941559425594355944559455594655947559485594955950559515595255953559545595555956559575595855959559605596155962559635596455965559665596755968559695597055971559725597355974559755597655977559785597955980559815598255983559845598555986559875598855989559905599155992559935599455995559965599755998559995600056001560025600356004560055600656007560085600956010560115601256013560145601556016560175601856019560205602156022560235602456025560265602756028560295603056031560325603356034560355603656037560385603956040560415604256043560445604556046560475604856049560505605156052560535605456055560565605756058560595606056061560625606356064560655606656067560685606956070560715607256073560745607556076560775607856079560805608156082560835608456085560865608756088560895609056091560925609356094560955609656097560985609956100561015610256103561045610556106561075610856109561105611156112561135611456115561165611756118561195612056121561225612356124561255612656127561285612956130561315613256133561345613556136561375613856139561405614156142561435614456145561465614756148561495615056151561525615356154561555615656157561585615956160561615616256163561645616556166561675616856169561705617156172561735617456175561765617756178561795618056181561825618356184561855618656187561885618956190561915619256193561945619556196561975619856199562005620156202562035620456205562065620756208562095621056211562125621356214562155621656217562185621956220562215622256223562245622556226562275622856229562305623156232562335623456235562365623756238562395624056241562425624356244562455624656247562485624956250562515625256253562545625556256562575625856259562605626156262562635626456265562665626756268562695627056271562725627356274562755627656277562785627956280562815628256283562845628556286562875628856289562905629156292562935629456295562965629756298562995630056301563025630356304563055630656307563085630956310563115631256313563145631556316563175631856319563205632156322563235632456325563265632756328563295633056331563325633356334563355633656337563385633956340563415634256343563445634556346563475634856349563505635156352563535635456355563565635756358563595636056361563625636356364563655636656367563685636956370563715637256373563745637556376563775637856379563805638156382563835638456385563865638756388563895639056391563925639356394563955639656397563985639956400564015640256403564045640556406564075640856409564105641156412564135641456415564165641756418564195642056421564225642356424564255642656427564285642956430564315643256433564345643556436564375643856439564405644156442564435644456445564465644756448564495645056451564525645356454564555645656457564585645956460564615646256463564645646556466564675646856469564705647156472564735647456475564765647756478564795648056481564825648356484564855648656487564885648956490564915649256493564945649556496564975649856499565005650156502565035650456505565065650756508565095651056511565125651356514565155651656517565185651956520565215652256523565245652556526565275652856529565305653156532565335653456535565365653756538565395654056541565425654356544565455654656547565485654956550565515655256553565545655556556565575655856559565605656156562565635656456565565665656756568565695657056571565725657356574565755657656577565785657956580565815658256583565845658556586565875658856589565905659156592565935659456595565965659756598565995660056601566025660356604566055660656607566085660956610566115661256613566145661556616566175661856619566205662156622566235662456625566265662756628566295663056631566325663356634566355663656637566385663956640566415664256643566445664556646566475664856649566505665156652566535665456655566565665756658566595666056661566625666356664566655666656667566685666956670566715667256673566745667556676566775667856679566805668156682566835668456685566865668756688566895669056691566925669356694566955669656697566985669956700567015670256703567045670556706567075670856709567105671156712567135671456715567165671756718567195672056721567225672356724567255672656727567285672956730567315673256733567345673556736567375673856739567405674156742567435674456745567465674756748567495675056751567525675356754567555675656757567585675956760567615676256763567645676556766567675676856769567705677156772567735677456775567765677756778567795678056781567825678356784567855678656787567885678956790567915679256793567945679556796567975679856799568005680156802568035680456805568065680756808568095681056811568125681356814568155681656817568185681956820568215682256823568245682556826568275682856829568305683156832568335683456835568365683756838568395684056841568425684356844568455684656847568485684956850568515685256853568545685556856568575685856859568605686156862568635686456865568665686756868568695687056871568725687356874568755687656877568785687956880568815688256883568845688556886568875688856889568905689156892568935689456895568965689756898568995690056901569025690356904569055690656907569085690956910569115691256913569145691556916569175691856919569205692156922569235692456925569265692756928569295693056931569325693356934569355693656937569385693956940569415694256943569445694556946569475694856949569505695156952569535695456955569565695756958569595696056961569625696356964569655696656967569685696956970569715697256973569745697556976569775697856979569805698156982569835698456985569865698756988569895699056991569925699356994569955699656997569985699957000570015700257003570045700557006570075700857009570105701157012570135701457015570165701757018570195702057021570225702357024570255702657027570285702957030570315703257033570345703557036570375703857039570405704157042570435704457045570465704757048570495705057051570525705357054570555705657057570585705957060570615706257063570645706557066570675706857069570705707157072570735707457075570765707757078570795708057081570825708357084570855708657087570885708957090570915709257093570945709557096570975709857099571005710157102571035710457105571065710757108571095711057111571125711357114571155711657117571185711957120571215712257123571245712557126571275712857129571305713157132571335713457135571365713757138571395714057141571425714357144571455714657147571485714957150571515715257153571545715557156571575715857159571605716157162571635716457165571665716757168571695717057171571725717357174571755717657177571785717957180571815718257183571845718557186571875718857189571905719157192571935719457195571965719757198571995720057201572025720357204572055720657207572085720957210572115721257213572145721557216572175721857219572205722157222572235722457225572265722757228572295723057231572325723357234572355723657237572385723957240572415724257243572445724557246572475724857249572505725157252572535725457255572565725757258572595726057261572625726357264572655726657267572685726957270572715727257273572745727557276572775727857279572805728157282572835728457285572865728757288572895729057291572925729357294572955729657297572985729957300573015730257303573045730557306573075730857309573105731157312573135731457315573165731757318573195732057321573225732357324573255732657327573285732957330573315733257333573345733557336573375733857339573405734157342573435734457345573465734757348573495735057351573525735357354573555735657357573585735957360573615736257363573645736557366573675736857369573705737157372573735737457375573765737757378573795738057381573825738357384573855738657387573885738957390573915739257393573945739557396573975739857399574005740157402574035740457405574065740757408574095741057411574125741357414574155741657417574185741957420574215742257423574245742557426574275742857429574305743157432574335743457435574365743757438574395744057441574425744357444574455744657447574485744957450574515745257453574545745557456574575745857459574605746157462574635746457465574665746757468574695747057471574725747357474574755747657477574785747957480574815748257483574845748557486574875748857489574905749157492574935749457495574965749757498574995750057501575025750357504575055750657507575085750957510575115751257513575145751557516575175751857519575205752157522575235752457525575265752757528575295753057531575325753357534575355753657537575385753957540575415754257543575445754557546575475754857549575505755157552575535755457555575565755757558575595756057561575625756357564575655756657567575685756957570575715757257573575745757557576575775757857579575805758157582575835758457585575865758757588575895759057591575925759357594575955759657597575985759957600576015760257603576045760557606576075760857609576105761157612576135761457615576165761757618576195762057621576225762357624576255762657627576285762957630576315763257633576345763557636576375763857639576405764157642576435764457645576465764757648576495765057651576525765357654576555765657657576585765957660576615766257663576645766557666576675766857669576705767157672576735767457675576765767757678576795768057681576825768357684576855768657687576885768957690576915769257693576945769557696576975769857699577005770157702577035770457705577065770757708577095771057711577125771357714577155771657717577185771957720577215772257723577245772557726577275772857729577305773157732577335773457735577365773757738577395774057741577425774357744577455774657747577485774957750577515775257753577545775557756577575775857759577605776157762577635776457765577665776757768577695777057771577725777357774577755777657777577785777957780577815778257783577845778557786577875778857789577905779157792577935779457795577965779757798577995780057801578025780357804578055780657807578085780957810578115781257813578145781557816578175781857819578205782157822578235782457825578265782757828578295783057831578325783357834578355783657837578385783957840578415784257843578445784557846578475784857849578505785157852578535785457855578565785757858578595786057861578625786357864578655786657867578685786957870578715787257873578745787557876578775787857879578805788157882578835788457885578865788757888578895789057891578925789357894578955789657897578985789957900579015790257903579045790557906579075790857909579105791157912579135791457915579165791757918579195792057921579225792357924579255792657927579285792957930579315793257933579345793557936579375793857939579405794157942579435794457945579465794757948579495795057951579525795357954579555795657957579585795957960579615796257963579645796557966579675796857969579705797157972579735797457975579765797757978579795798057981579825798357984579855798657987579885798957990579915799257993579945799557996579975799857999580005800158002580035800458005580065800758008580095801058011580125801358014580155801658017580185801958020580215802258023580245802558026580275802858029580305803158032580335803458035580365803758038580395804058041580425804358044580455804658047580485804958050580515805258053580545805558056580575805858059580605806158062580635806458065580665806758068580695807058071580725807358074580755807658077580785807958080580815808258083580845808558086580875808858089580905809158092580935809458095580965809758098580995810058101581025810358104581055810658107581085810958110581115811258113581145811558116581175811858119581205812158122581235812458125581265812758128581295813058131581325813358134581355813658137581385813958140581415814258143581445814558146581475814858149581505815158152581535815458155581565815758158581595816058161581625816358164581655816658167581685816958170581715817258173581745817558176581775817858179581805818158182581835818458185581865818758188581895819058191581925819358194581955819658197581985819958200582015820258203582045820558206582075820858209582105821158212582135821458215582165821758218582195822058221582225822358224582255822658227582285822958230582315823258233582345823558236582375823858239582405824158242582435824458245582465824758248582495825058251582525825358254582555825658257582585825958260582615826258263582645826558266582675826858269582705827158272582735827458275582765827758278582795828058281582825828358284582855828658287582885828958290582915829258293582945829558296582975829858299583005830158302583035830458305583065830758308583095831058311583125831358314583155831658317583185831958320583215832258323583245832558326583275832858329583305833158332583335833458335583365833758338583395834058341583425834358344583455834658347583485834958350583515835258353583545835558356583575835858359583605836158362583635836458365583665836758368583695837058371583725837358374583755837658377583785837958380583815838258383583845838558386583875838858389583905839158392583935839458395583965839758398583995840058401584025840358404584055840658407584085840958410584115841258413584145841558416584175841858419584205842158422584235842458425584265842758428584295843058431584325843358434584355843658437584385843958440584415844258443584445844558446584475844858449584505845158452584535845458455584565845758458584595846058461584625846358464584655846658467584685846958470584715847258473584745847558476584775847858479584805848158482584835848458485584865848758488584895849058491584925849358494584955849658497584985849958500585015850258503585045850558506585075850858509585105851158512585135851458515585165851758518585195852058521585225852358524585255852658527585285852958530585315853258533585345853558536585375853858539585405854158542585435854458545585465854758548585495855058551585525855358554585555855658557585585855958560585615856258563585645856558566585675856858569585705857158572585735857458575585765857758578585795858058581585825858358584585855858658587585885858958590585915859258593585945859558596585975859858599586005860158602586035860458605586065860758608586095861058611586125861358614586155861658617586185861958620586215862258623586245862558626586275862858629586305863158632586335863458635586365863758638586395864058641586425864358644586455864658647586485864958650586515865258653586545865558656586575865858659586605866158662586635866458665586665866758668586695867058671586725867358674586755867658677586785867958680586815868258683586845868558686586875868858689586905869158692586935869458695586965869758698586995870058701587025870358704587055870658707587085870958710587115871258713587145871558716587175871858719587205872158722587235872458725587265872758728587295873058731587325873358734587355873658737587385873958740587415874258743587445874558746587475874858749587505875158752587535875458755587565875758758587595876058761587625876358764587655876658767587685876958770587715877258773587745877558776587775877858779587805878158782587835878458785587865878758788587895879058791587925879358794587955879658797587985879958800588015880258803588045880558806588075880858809588105881158812588135881458815588165881758818588195882058821588225882358824588255882658827588285882958830588315883258833588345883558836588375883858839588405884158842588435884458845588465884758848588495885058851588525885358854588555885658857588585885958860588615886258863588645886558866588675886858869588705887158872588735887458875588765887758878588795888058881588825888358884588855888658887588885888958890588915889258893588945889558896588975889858899589005890158902589035890458905589065890758908589095891058911589125891358914589155891658917589185891958920589215892258923589245892558926589275892858929589305893158932589335893458935589365893758938589395894058941589425894358944589455894658947589485894958950589515895258953589545895558956589575895858959589605896158962589635896458965589665896758968589695897058971589725897358974589755897658977589785897958980589815898258983589845898558986589875898858989589905899158992589935899458995589965899758998589995900059001590025900359004590055900659007590085900959010590115901259013590145901559016590175901859019590205902159022590235902459025590265902759028590295903059031590325903359034590355903659037590385903959040590415904259043590445904559046590475904859049590505905159052590535905459055590565905759058590595906059061590625906359064590655906659067590685906959070590715907259073590745907559076590775907859079590805908159082590835908459085590865908759088590895909059091590925909359094590955909659097590985909959100591015910259103591045910559106591075910859109591105911159112591135911459115591165911759118591195912059121591225912359124591255912659127591285912959130591315913259133591345913559136591375913859139591405914159142591435914459145591465914759148591495915059151591525915359154591555915659157591585915959160591615916259163591645916559166591675916859169591705917159172591735917459175591765917759178591795918059181591825918359184591855918659187591885918959190591915919259193591945919559196591975919859199592005920159202592035920459205592065920759208592095921059211592125921359214592155921659217592185921959220592215922259223592245922559226592275922859229592305923159232592335923459235592365923759238592395924059241592425924359244592455924659247592485924959250592515925259253592545925559256592575925859259592605926159262592635926459265592665926759268592695927059271592725927359274592755927659277592785927959280592815928259283592845928559286592875928859289592905929159292592935929459295592965929759298592995930059301593025930359304593055930659307593085930959310593115931259313593145931559316593175931859319593205932159322593235932459325593265932759328593295933059331593325933359334593355933659337593385933959340593415934259343593445934559346593475934859349593505935159352593535935459355593565935759358593595936059361593625936359364593655936659367593685936959370593715937259373593745937559376593775937859379593805938159382593835938459385593865938759388593895939059391593925939359394593955939659397593985939959400594015940259403594045940559406594075940859409594105941159412594135941459415594165941759418594195942059421594225942359424594255942659427594285942959430594315943259433594345943559436594375943859439594405944159442594435944459445594465944759448594495945059451594525945359454594555945659457594585945959460594615946259463594645946559466594675946859469594705947159472594735947459475594765947759478594795948059481594825948359484594855948659487594885948959490594915949259493594945949559496594975949859499595005950159502595035950459505595065950759508595095951059511595125951359514595155951659517595185951959520595215952259523595245952559526595275952859529595305953159532595335953459535595365953759538595395954059541595425954359544595455954659547595485954959550595515955259553595545955559556595575955859559595605956159562595635956459565595665956759568595695957059571595725957359574595755957659577595785957959580595815958259583595845958559586595875958859589595905959159592595935959459595595965959759598595995960059601596025960359604596055960659607596085960959610596115961259613596145961559616596175961859619596205962159622596235962459625596265962759628596295963059631596325963359634596355963659637596385963959640596415964259643596445964559646596475964859649596505965159652596535965459655596565965759658596595966059661596625966359664596655966659667596685966959670596715967259673596745967559676596775967859679596805968159682596835968459685596865968759688596895969059691596925969359694596955969659697596985969959700597015970259703597045970559706597075970859709597105971159712597135971459715597165971759718597195972059721597225972359724597255972659727597285972959730597315973259733597345973559736597375973859739597405974159742597435974459745597465974759748597495975059751597525975359754597555975659757597585975959760597615976259763597645976559766597675976859769597705977159772597735977459775597765977759778597795978059781597825978359784597855978659787597885978959790597915979259793597945979559796597975979859799598005980159802598035980459805598065980759808598095981059811598125981359814598155981659817598185981959820598215982259823598245982559826598275982859829598305983159832598335983459835598365983759838598395984059841598425984359844598455984659847598485984959850598515985259853598545985559856598575985859859598605986159862598635986459865598665986759868598695987059871598725987359874598755987659877598785987959880598815988259883598845988559886598875988859889598905989159892598935989459895598965989759898598995990059901599025990359904599055990659907599085990959910599115991259913599145991559916599175991859919599205992159922599235992459925599265992759928599295993059931599325993359934599355993659937599385993959940599415994259943599445994559946599475994859949599505995159952599535995459955599565995759958599595996059961599625996359964599655996659967599685996959970599715997259973599745997559976599775997859979599805998159982599835998459985599865998759988599895999059991599925999359994599955999659997599985999960000600016000260003600046000560006600076000860009600106001160012600136001460015600166001760018600196002060021600226002360024600256002660027600286002960030600316003260033600346003560036600376003860039600406004160042600436004460045600466004760048600496005060051600526005360054600556005660057600586005960060600616006260063600646006560066600676006860069600706007160072600736007460075600766007760078600796008060081600826008360084600856008660087600886008960090600916009260093600946009560096600976009860099601006010160102601036010460105601066010760108601096011060111601126011360114601156011660117601186011960120601216012260123601246012560126601276012860129601306013160132601336013460135601366013760138601396014060141601426014360144601456014660147601486014960150601516015260153601546015560156601576015860159601606016160162601636016460165601666016760168601696017060171601726017360174601756017660177601786017960180601816018260183601846018560186601876018860189601906019160192601936019460195601966019760198601996020060201602026020360204602056020660207602086020960210602116021260213602146021560216602176021860219602206022160222602236022460225602266022760228602296023060231602326023360234602356023660237602386023960240602416024260243602446024560246602476024860249602506025160252602536025460255602566025760258602596026060261602626026360264602656026660267602686026960270602716027260273602746027560276602776027860279602806028160282602836028460285602866028760288602896029060291602926029360294602956029660297602986029960300603016030260303603046030560306603076030860309603106031160312603136031460315603166031760318603196032060321603226032360324603256032660327603286032960330603316033260333603346033560336603376033860339603406034160342603436034460345603466034760348603496035060351603526035360354603556035660357603586035960360603616036260363603646036560366603676036860369603706037160372603736037460375603766037760378603796038060381603826038360384603856038660387603886038960390603916039260393603946039560396603976039860399604006040160402604036040460405604066040760408604096041060411604126041360414604156041660417604186041960420604216042260423604246042560426604276042860429604306043160432604336043460435604366043760438604396044060441604426044360444604456044660447604486044960450604516045260453604546045560456604576045860459604606046160462604636046460465604666046760468604696047060471604726047360474604756047660477604786047960480604816048260483604846048560486604876048860489604906049160492604936049460495604966049760498604996050060501605026050360504605056050660507605086050960510605116051260513605146051560516605176051860519605206052160522605236052460525605266052760528605296053060531605326053360534605356053660537605386053960540605416054260543605446054560546605476054860549605506055160552605536055460555605566055760558605596056060561605626056360564605656056660567605686056960570605716057260573605746057560576605776057860579605806058160582605836058460585605866058760588605896059060591605926059360594605956059660597605986059960600606016060260603606046060560606606076060860609606106061160612606136061460615606166061760618606196062060621606226062360624606256062660627606286062960630606316063260633606346063560636606376063860639606406064160642606436064460645606466064760648606496065060651606526065360654606556065660657606586065960660606616066260663606646066560666606676066860669606706067160672606736067460675606766067760678606796068060681606826068360684606856068660687606886068960690606916069260693606946069560696606976069860699607006070160702607036070460705607066070760708607096071060711607126071360714607156071660717607186071960720607216072260723607246072560726607276072860729607306073160732607336073460735607366073760738607396074060741607426074360744607456074660747607486074960750607516075260753607546075560756607576075860759607606076160762607636076460765607666076760768607696077060771607726077360774607756077660777607786077960780607816078260783607846078560786607876078860789607906079160792607936079460795607966079760798607996080060801608026080360804608056080660807608086080960810608116081260813608146081560816608176081860819608206082160822608236082460825608266082760828608296083060831608326083360834608356083660837608386083960840608416084260843608446084560846608476084860849608506085160852608536085460855608566085760858608596086060861608626086360864608656086660867608686086960870608716087260873608746087560876608776087860879608806088160882608836088460885608866088760888608896089060891608926089360894608956089660897608986089960900609016090260903609046090560906609076090860909609106091160912609136091460915609166091760918609196092060921609226092360924609256092660927609286092960930609316093260933609346093560936609376093860939609406094160942609436094460945609466094760948609496095060951609526095360954609556095660957609586095960960609616096260963609646096560966609676096860969609706097160972609736097460975609766097760978609796098060981609826098360984609856098660987609886098960990609916099260993609946099560996609976099860999610006100161002610036100461005610066100761008610096101061011610126101361014610156101661017610186101961020610216102261023610246102561026610276102861029610306103161032610336103461035610366103761038610396104061041610426104361044610456104661047610486104961050610516105261053610546105561056610576105861059610606106161062610636106461065610666106761068610696107061071610726107361074610756107661077610786107961080610816108261083610846108561086610876108861089610906109161092610936109461095610966109761098610996110061101611026110361104611056110661107611086110961110611116111261113611146111561116611176111861119611206112161122611236112461125611266112761128611296113061131611326113361134611356113661137611386113961140611416114261143611446114561146611476114861149611506115161152611536115461155611566115761158611596116061161611626116361164611656116661167611686116961170611716117261173611746117561176611776117861179611806118161182611836118461185611866118761188611896119061191611926119361194611956119661197611986119961200612016120261203612046120561206612076120861209612106121161212612136121461215612166121761218612196122061221612226122361224612256122661227612286122961230612316123261233612346123561236612376123861239612406124161242612436124461245612466124761248612496125061251612526125361254612556125661257612586125961260612616126261263612646126561266612676126861269612706127161272612736127461275612766127761278612796128061281612826128361284612856128661287612886128961290612916129261293612946129561296612976129861299613006130161302613036130461305613066130761308613096131061311613126131361314613156131661317613186131961320613216132261323613246132561326613276132861329613306133161332613336133461335613366133761338613396134061341613426134361344613456134661347613486134961350613516135261353613546135561356613576135861359613606136161362613636136461365613666136761368613696137061371613726137361374613756137661377613786137961380613816138261383613846138561386613876138861389613906139161392613936139461395613966139761398613996140061401614026140361404614056140661407614086140961410614116141261413614146141561416614176141861419614206142161422614236142461425614266142761428614296143061431614326143361434614356143661437614386143961440614416144261443614446144561446614476144861449614506145161452614536145461455614566145761458614596146061461614626146361464614656146661467614686146961470614716147261473614746147561476614776147861479614806148161482614836148461485614866148761488614896149061491614926149361494614956149661497614986149961500615016150261503615046150561506615076150861509615106151161512615136151461515615166151761518615196152061521615226152361524615256152661527615286152961530615316153261533615346153561536615376153861539615406154161542615436154461545615466154761548615496155061551615526155361554615556155661557615586155961560615616156261563615646156561566615676156861569615706157161572615736157461575615766157761578615796158061581615826158361584615856158661587615886158961590615916159261593615946159561596615976159861599616006160161602616036160461605616066160761608616096161061611616126161361614616156161661617616186161961620616216162261623616246162561626616276162861629616306163161632616336163461635616366163761638616396164061641616426164361644616456164661647616486164961650616516165261653616546165561656616576165861659616606166161662616636166461665616666166761668616696167061671616726167361674616756167661677616786167961680616816168261683616846168561686616876168861689616906169161692616936169461695616966169761698616996170061701617026170361704617056170661707617086170961710617116171261713617146171561716617176171861719617206172161722617236172461725617266172761728617296173061731617326173361734617356173661737617386173961740617416174261743617446174561746617476174861749617506175161752617536175461755617566175761758617596176061761617626176361764617656176661767617686176961770617716177261773617746177561776617776177861779617806178161782617836178461785617866178761788617896179061791617926179361794617956179661797617986179961800618016180261803618046180561806618076180861809618106181161812618136181461815618166181761818618196182061821618226182361824618256182661827618286182961830618316183261833618346183561836618376183861839618406184161842618436184461845618466184761848618496185061851618526185361854618556185661857618586185961860618616186261863618646186561866618676186861869618706187161872618736187461875618766187761878618796188061881618826188361884618856188661887618886188961890618916189261893618946189561896618976189861899619006190161902619036190461905619066190761908619096191061911619126191361914619156191661917619186191961920619216192261923619246192561926619276192861929619306193161932619336193461935619366193761938619396194061941619426194361944619456194661947619486194961950619516195261953619546195561956619576195861959619606196161962619636196461965619666196761968619696197061971619726197361974619756197661977619786197961980619816198261983619846198561986619876198861989619906199161992619936199461995619966199761998619996200062001620026200362004620056200662007620086200962010620116201262013620146201562016620176201862019620206202162022620236202462025620266202762028620296203062031620326203362034620356203662037620386203962040620416204262043620446204562046620476204862049620506205162052620536205462055620566205762058620596206062061620626206362064620656206662067620686206962070620716207262073620746207562076620776207862079620806208162082620836208462085620866208762088620896209062091620926209362094620956209662097620986209962100621016210262103621046210562106621076210862109621106211162112621136211462115621166211762118621196212062121621226212362124621256212662127621286212962130621316213262133621346213562136621376213862139621406214162142621436214462145621466214762148621496215062151621526215362154621556215662157621586215962160621616216262163621646216562166621676216862169621706217162172621736217462175621766217762178621796218062181621826218362184621856218662187621886218962190621916219262193621946219562196621976219862199622006220162202622036220462205622066220762208622096221062211622126221362214622156221662217622186221962220622216222262223622246222562226622276222862229622306223162232622336223462235622366223762238622396224062241622426224362244622456224662247622486224962250622516225262253622546225562256622576225862259622606226162262622636226462265622666226762268622696227062271622726227362274622756227662277622786227962280622816228262283622846228562286622876228862289622906229162292622936229462295622966229762298622996230062301623026230362304623056230662307623086230962310623116231262313623146231562316623176231862319623206232162322623236232462325623266232762328623296233062331623326233362334623356233662337623386233962340623416234262343623446234562346623476234862349623506235162352623536235462355623566235762358623596236062361623626236362364623656236662367623686236962370623716237262373623746237562376623776237862379623806238162382623836238462385623866238762388623896239062391623926239362394623956239662397623986239962400624016240262403624046240562406624076240862409624106241162412624136241462415624166241762418624196242062421624226242362424624256242662427624286242962430624316243262433624346243562436624376243862439624406244162442624436244462445624466244762448624496245062451624526245362454624556245662457624586245962460624616246262463624646246562466624676246862469624706247162472624736247462475624766247762478624796248062481624826248362484624856248662487624886248962490624916249262493624946249562496624976249862499625006250162502625036250462505625066250762508625096251062511625126251362514625156251662517625186251962520625216252262523625246252562526625276252862529625306253162532625336253462535625366253762538625396254062541625426254362544625456254662547625486254962550625516255262553625546255562556625576255862559625606256162562625636256462565625666256762568625696257062571625726257362574625756257662577625786257962580625816258262583625846258562586625876258862589625906259162592625936259462595625966259762598625996260062601626026260362604626056260662607626086260962610626116261262613626146261562616626176261862619626206262162622626236262462625626266262762628626296263062631626326263362634626356263662637626386263962640626416264262643626446264562646626476264862649626506265162652626536265462655626566265762658626596266062661626626266362664626656266662667626686266962670626716267262673626746267562676626776267862679626806268162682626836268462685626866268762688626896269062691626926269362694626956269662697626986269962700627016270262703627046270562706627076270862709627106271162712627136271462715627166271762718627196272062721627226272362724627256272662727627286272962730627316273262733627346273562736627376273862739627406274162742627436274462745627466274762748627496275062751627526275362754627556275662757627586275962760627616276262763627646276562766627676276862769627706277162772627736277462775627766277762778627796278062781627826278362784627856278662787627886278962790627916279262793627946279562796627976279862799628006280162802628036280462805628066280762808628096281062811628126281362814628156281662817628186281962820628216282262823628246282562826628276282862829628306283162832628336283462835628366283762838628396284062841628426284362844628456284662847628486284962850628516285262853628546285562856628576285862859628606286162862628636286462865628666286762868628696287062871628726287362874628756287662877628786287962880628816288262883628846288562886628876288862889628906289162892628936289462895628966289762898628996290062901629026290362904629056290662907629086290962910629116291262913629146291562916629176291862919629206292162922629236292462925629266292762928629296293062931629326293362934629356293662937629386293962940629416294262943629446294562946629476294862949629506295162952629536295462955629566295762958629596296062961629626296362964629656296662967629686296962970629716297262973629746297562976629776297862979629806298162982629836298462985629866298762988629896299062991629926299362994629956299662997629986299963000630016300263003630046300563006630076300863009630106301163012630136301463015630166301763018630196302063021630226302363024630256302663027630286302963030630316303263033630346303563036630376303863039630406304163042630436304463045630466304763048630496305063051630526305363054630556305663057630586305963060630616306263063630646306563066630676306863069630706307163072630736307463075630766307763078630796308063081630826308363084630856308663087630886308963090630916309263093630946309563096630976309863099631006310163102631036310463105631066310763108631096311063111631126311363114631156311663117631186311963120631216312263123631246312563126631276312863129631306313163132631336313463135631366313763138631396314063141631426314363144631456314663147631486314963150631516315263153631546315563156631576315863159631606316163162631636316463165631666316763168631696317063171631726317363174631756317663177631786317963180631816318263183631846318563186631876318863189631906319163192631936319463195631966319763198631996320063201632026320363204632056320663207632086320963210632116321263213632146321563216632176321863219632206322163222632236322463225632266322763228632296323063231632326323363234632356323663237632386323963240632416324263243632446324563246632476324863249632506325163252632536325463255632566325763258632596326063261632626326363264632656326663267632686326963270632716327263273632746327563276632776327863279632806328163282632836328463285632866328763288632896329063291632926329363294632956329663297632986329963300633016330263303633046330563306633076330863309633106331163312633136331463315633166331763318633196332063321633226332363324633256332663327633286332963330633316333263333633346333563336633376333863339633406334163342633436334463345633466334763348633496335063351633526335363354633556335663357633586335963360633616336263363633646336563366633676336863369633706337163372633736337463375633766337763378633796338063381633826338363384633856338663387633886338963390633916339263393633946339563396633976339863399634006340163402634036340463405634066340763408634096341063411634126341363414634156341663417634186341963420634216342263423634246342563426634276342863429634306343163432634336343463435634366343763438634396344063441634426344363444634456344663447634486344963450634516345263453634546345563456634576345863459634606346163462634636346463465634666346763468634696347063471634726347363474634756347663477634786347963480634816348263483634846348563486634876348863489634906349163492634936349463495634966349763498634996350063501635026350363504635056350663507635086350963510635116351263513635146351563516635176351863519635206352163522635236352463525635266352763528635296353063531635326353363534635356353663537635386353963540635416354263543635446354563546635476354863549635506355163552635536355463555635566355763558635596356063561635626356363564635656356663567635686356963570635716357263573635746357563576635776357863579635806358163582635836358463585635866358763588635896359063591635926359363594635956359663597635986359963600636016360263603636046360563606636076360863609636106361163612636136361463615636166361763618636196362063621636226362363624636256362663627636286362963630636316363263633636346363563636636376363863639636406364163642636436364463645636466364763648636496365063651636526365363654636556365663657636586365963660636616366263663636646366563666636676366863669636706367163672636736367463675636766367763678636796368063681636826368363684636856368663687636886368963690636916369263693636946369563696636976369863699637006370163702637036370463705637066370763708637096371063711637126371363714637156371663717637186371963720637216372263723637246372563726637276372863729637306373163732637336373463735637366373763738637396374063741637426374363744637456374663747637486374963750637516375263753637546375563756637576375863759637606376163762637636376463765637666376763768637696377063771637726377363774637756377663777637786377963780637816378263783637846378563786637876378863789637906379163792637936379463795637966379763798637996380063801638026380363804638056380663807638086380963810638116381263813638146381563816638176381863819638206382163822638236382463825638266382763828638296383063831638326383363834638356383663837638386383963840638416384263843638446384563846638476384863849638506385163852638536385463855638566385763858638596386063861638626386363864638656386663867638686386963870638716387263873638746387563876638776387863879638806388163882638836388463885638866388763888638896389063891638926389363894638956389663897638986389963900639016390263903639046390563906639076390863909639106391163912639136391463915639166391763918639196392063921639226392363924639256392663927639286392963930639316393263933639346393563936639376393863939639406394163942639436394463945639466394763948639496395063951639526395363954639556395663957639586395963960639616396263963639646396563966639676396863969639706397163972639736397463975639766397763978639796398063981639826398363984639856398663987639886398963990639916399263993639946399563996639976399863999640006400164002640036400464005640066400764008640096401064011640126401364014640156401664017640186401964020640216402264023640246402564026640276402864029640306403164032640336403464035640366403764038640396404064041640426404364044640456404664047640486404964050640516405264053640546405564056640576405864059640606406164062640636406464065640666406764068640696407064071640726407364074640756407664077640786407964080640816408264083640846408564086640876408864089640906409164092640936409464095640966409764098640996410064101641026410364104641056410664107641086410964110641116411264113641146411564116641176411864119641206412164122641236412464125641266412764128641296413064131641326413364134641356413664137641386413964140641416414264143641446414564146641476414864149641506415164152641536415464155641566415764158641596416064161641626416364164641656416664167641686416964170641716417264173641746417564176641776417864179641806418164182641836418464185641866418764188641896419064191641926419364194641956419664197641986419964200642016420264203642046420564206642076420864209642106421164212642136421464215642166421764218642196422064221642226422364224642256422664227642286422964230642316423264233642346423564236642376423864239642406424164242642436424464245642466424764248642496425064251642526425364254642556425664257642586425964260642616426264263642646426564266642676426864269642706427164272642736427464275642766427764278642796428064281642826428364284642856428664287642886428964290642916429264293642946429564296642976429864299643006430164302643036430464305643066430764308643096431064311643126431364314643156431664317643186431964320643216432264323643246432564326643276432864329643306433164332643336433464335643366433764338643396434064341643426434364344643456434664347643486434964350643516435264353643546435564356643576435864359643606436164362643636436464365643666436764368643696437064371643726437364374643756437664377643786437964380643816438264383643846438564386643876438864389643906439164392643936439464395643966439764398643996440064401644026440364404644056440664407644086440964410644116441264413644146441564416644176441864419644206442164422644236442464425644266442764428644296443064431644326443364434644356443664437644386443964440644416444264443644446444564446644476444864449644506445164452644536445464455644566445764458644596446064461644626446364464644656446664467644686446964470644716447264473644746447564476644776447864479644806448164482644836448464485644866448764488644896449064491644926449364494644956449664497644986449964500645016450264503645046450564506645076450864509645106451164512645136451464515645166451764518645196452064521645226452364524645256452664527645286452964530645316453264533645346453564536645376453864539645406454164542645436454464545645466454764548645496455064551645526455364554645556455664557645586455964560645616456264563645646456564566645676456864569645706457164572645736457464575645766457764578645796458064581645826458364584645856458664587645886458964590645916459264593645946459564596645976459864599646006460164602646036460464605646066460764608646096461064611646126461364614646156461664617646186461964620646216462264623646246462564626646276462864629646306463164632646336463464635646366463764638646396464064641646426464364644646456464664647646486464964650646516465264653646546465564656646576465864659646606466164662646636466464665646666466764668646696467064671646726467364674646756467664677646786467964680646816468264683646846468564686646876468864689646906469164692646936469464695646966469764698646996470064701647026470364704647056470664707647086470964710647116471264713647146471564716647176471864719647206472164722647236472464725647266472764728647296473064731647326473364734647356473664737647386473964740647416474264743647446474564746647476474864749647506475164752647536475464755647566475764758647596476064761647626476364764647656476664767647686476964770647716477264773647746477564776647776477864779647806478164782647836478464785647866478764788647896479064791647926479364794647956479664797647986479964800648016480264803648046480564806648076480864809648106481164812648136481464815648166481764818648196482064821648226482364824648256482664827648286482964830648316483264833648346483564836648376483864839648406484164842648436484464845648466484764848648496485064851648526485364854648556485664857648586485964860648616486264863648646486564866648676486864869648706487164872648736487464875648766487764878648796488064881648826488364884648856488664887648886488964890648916489264893648946489564896648976489864899649006490164902649036490464905649066490764908649096491064911649126491364914649156491664917649186491964920649216492264923649246492564926649276492864929649306493164932649336493464935649366493764938649396494064941649426494364944649456494664947649486494964950649516495264953649546495564956649576495864959649606496164962649636496464965649666496764968649696497064971649726497364974649756497664977649786497964980649816498264983649846498564986649876498864989649906499164992649936499464995649966499764998649996500065001650026500365004650056500665007650086500965010650116501265013650146501565016650176501865019650206502165022650236502465025650266502765028650296503065031650326503365034650356503665037650386503965040650416504265043650446504565046650476504865049650506505165052650536505465055650566505765058650596506065061650626506365064650656506665067650686506965070650716507265073650746507565076650776507865079650806508165082650836508465085650866508765088650896509065091650926509365094650956509665097650986509965100651016510265103651046510565106651076510865109651106511165112651136511465115651166511765118651196512065121651226512365124651256512665127651286512965130651316513265133651346513565136651376513865139651406514165142651436514465145651466514765148651496515065151651526515365154651556515665157651586515965160651616516265163651646516565166651676516865169651706517165172651736517465175651766517765178651796518065181651826518365184651856518665187651886518965190651916519265193651946519565196651976519865199652006520165202652036520465205652066520765208652096521065211652126521365214652156521665217652186521965220652216522265223652246522565226652276522865229652306523165232652336523465235652366523765238652396524065241652426524365244652456524665247652486524965250652516525265253652546525565256652576525865259652606526165262652636526465265652666526765268652696527065271652726527365274652756527665277652786527965280652816528265283652846528565286652876528865289652906529165292652936529465295652966529765298652996530065301653026530365304653056530665307653086530965310653116531265313653146531565316653176531865319653206532165322653236532465325653266532765328653296533065331653326533365334653356533665337653386533965340653416534265343653446534565346653476534865349653506535165352653536535465355653566535765358653596536065361653626536365364653656536665367653686536965370653716537265373653746537565376653776537865379653806538165382653836538465385653866538765388653896539065391653926539365394653956539665397653986539965400654016540265403654046540565406654076540865409654106541165412654136541465415654166541765418654196542065421654226542365424654256542665427654286542965430654316543265433654346543565436654376543865439654406544165442654436544465445654466544765448654496545065451654526545365454654556545665457654586545965460654616546265463654646546565466654676546865469654706547165472654736547465475654766547765478654796548065481654826548365484654856548665487654886548965490654916549265493654946549565496654976549865499655006550165502655036550465505655066550765508655096551065511655126551365514655156551665517655186551965520655216552265523655246552565526655276552865529655306553165532655336553465535655366553765538655396554065541655426554365544655456554665547655486554965550655516555265553655546555565556655576555865559655606556165562655636556465565655666556765568655696557065571655726557365574655756557665577655786557965580655816558265583655846558565586655876558865589655906559165592655936559465595655966559765598655996560065601656026560365604656056560665607656086560965610656116561265613656146561565616656176561865619656206562165622656236562465625656266562765628656296563065631656326563365634656356563665637656386563965640656416564265643656446564565646656476564865649656506565165652656536565465655656566565765658656596566065661656626566365664656656566665667656686566965670656716567265673656746567565676656776567865679656806568165682656836568465685656866568765688656896569065691656926569365694656956569665697656986569965700657016570265703657046570565706657076570865709657106571165712657136571465715657166571765718657196572065721657226572365724657256572665727657286572965730657316573265733657346573565736657376573865739657406574165742657436574465745657466574765748657496575065751657526575365754657556575665757657586575965760657616576265763657646576565766657676576865769657706577165772657736577465775657766577765778657796578065781657826578365784657856578665787657886578965790657916579265793657946579565796657976579865799658006580165802658036580465805658066580765808658096581065811658126581365814658156581665817658186581965820658216582265823658246582565826658276582865829658306583165832658336583465835658366583765838658396584065841658426584365844658456584665847658486584965850658516585265853658546585565856658576585865859658606586165862658636586465865658666586765868658696587065871658726587365874658756587665877658786587965880658816588265883658846588565886658876588865889658906589165892658936589465895658966589765898658996590065901659026590365904659056590665907659086590965910659116591265913659146591565916659176591865919659206592165922659236592465925659266592765928659296593065931659326593365934659356593665937659386593965940659416594265943659446594565946659476594865949659506595165952659536595465955659566595765958659596596065961659626596365964659656596665967659686596965970659716597265973659746597565976659776597865979659806598165982659836598465985659866598765988659896599065991659926599365994659956599665997659986599966000660016600266003660046600566006660076600866009660106601166012660136601466015660166601766018660196602066021660226602366024660256602666027660286602966030660316603266033660346603566036660376603866039660406604166042660436604466045660466604766048660496605066051660526605366054660556605666057660586605966060660616606266063660646606566066660676606866069660706607166072660736607466075660766607766078660796608066081660826608366084660856608666087660886608966090660916609266093660946609566096660976609866099661006610166102661036610466105661066610766108661096611066111661126611366114661156611666117661186611966120661216612266123661246612566126661276612866129661306613166132661336613466135661366613766138661396614066141661426614366144661456614666147661486614966150661516615266153661546615566156661576615866159661606616166162661636616466165661666616766168661696617066171661726617366174661756617666177661786617966180661816618266183661846618566186661876618866189661906619166192661936619466195661966619766198661996620066201662026620366204662056620666207662086620966210662116621266213662146621566216662176621866219662206622166222662236622466225662266622766228662296623066231662326623366234662356623666237662386623966240662416624266243662446624566246662476624866249662506625166252662536625466255662566625766258662596626066261662626626366264662656626666267662686626966270662716627266273662746627566276662776627866279662806628166282662836628466285662866628766288662896629066291662926629366294662956629666297662986629966300663016630266303663046630566306663076630866309663106631166312663136631466315663166631766318663196632066321663226632366324663256632666327663286632966330663316633266333663346633566336663376633866339663406634166342663436634466345663466634766348663496635066351663526635366354663556635666357663586635966360663616636266363663646636566366663676636866369663706637166372663736637466375663766637766378663796638066381663826638366384663856638666387663886638966390663916639266393663946639566396663976639866399664006640166402664036640466405664066640766408664096641066411664126641366414664156641666417664186641966420664216642266423664246642566426664276642866429664306643166432664336643466435664366643766438664396644066441664426644366444664456644666447664486644966450664516645266453664546645566456664576645866459664606646166462664636646466465664666646766468664696647066471664726647366474664756647666477664786647966480664816648266483664846648566486664876648866489664906649166492664936649466495664966649766498664996650066501665026650366504665056650666507665086650966510665116651266513665146651566516665176651866519665206652166522665236652466525665266652766528665296653066531665326653366534665356653666537665386653966540665416654266543665446654566546665476654866549665506655166552665536655466555665566655766558665596656066561665626656366564665656656666567665686656966570665716657266573665746657566576665776657866579665806658166582665836658466585665866658766588665896659066591665926659366594665956659666597665986659966600666016660266603666046660566606666076660866609666106661166612666136661466615666166661766618666196662066621666226662366624666256662666627666286662966630666316663266633666346663566636666376663866639666406664166642666436664466645666466664766648666496665066651666526665366654666556665666657666586665966660666616666266663666646666566666666676666866669666706667166672666736667466675666766667766678666796668066681666826668366684666856668666687666886668966690666916669266693666946669566696666976669866699667006670166702667036670466705667066670766708667096671066711667126671366714667156671666717667186671966720667216672266723667246672566726667276672866729667306673166732667336673466735667366673766738667396674066741667426674366744667456674666747667486674966750667516675266753667546675566756667576675866759667606676166762667636676466765667666676766768667696677066771667726677366774667756677666777667786677966780667816678266783667846678566786667876678866789667906679166792667936679466795667966679766798667996680066801668026680366804668056680666807668086680966810668116681266813668146681566816668176681866819668206682166822668236682466825668266682766828668296683066831668326683366834668356683666837668386683966840668416684266843668446684566846668476684866849668506685166852668536685466855668566685766858668596686066861668626686366864668656686666867668686686966870668716687266873668746687566876668776687866879668806688166882668836688466885668866688766888668896689066891668926689366894668956689666897668986689966900669016690266903669046690566906669076690866909669106691166912669136691466915669166691766918669196692066921669226692366924669256692666927669286692966930669316693266933669346693566936669376693866939669406694166942669436694466945669466694766948669496695066951669526695366954669556695666957669586695966960669616696266963669646696566966669676696866969669706697166972669736697466975669766697766978669796698066981669826698366984669856698666987669886698966990669916699266993669946699566996669976699866999670006700167002670036700467005670066700767008670096701067011670126701367014670156701667017670186701967020670216702267023670246702567026670276702867029670306703167032670336703467035670366703767038670396704067041670426704367044670456704667047670486704967050670516705267053670546705567056670576705867059670606706167062670636706467065670666706767068670696707067071670726707367074670756707667077670786707967080670816708267083670846708567086670876708867089670906709167092670936709467095670966709767098670996710067101671026710367104671056710667107671086710967110671116711267113671146711567116671176711867119671206712167122671236712467125671266712767128671296713067131671326713367134671356713667137671386713967140671416714267143671446714567146671476714867149671506715167152671536715467155671566715767158671596716067161671626716367164671656716667167671686716967170671716717267173671746717567176671776717867179671806718167182671836718467185671866718767188671896719067191671926719367194671956719667197671986719967200672016720267203672046720567206672076720867209672106721167212672136721467215672166721767218672196722067221672226722367224672256722667227672286722967230672316723267233672346723567236672376723867239672406724167242672436724467245672466724767248672496725067251672526725367254672556725667257672586725967260672616726267263672646726567266672676726867269672706727167272672736727467275672766727767278672796728067281672826728367284672856728667287672886728967290672916729267293672946729567296672976729867299673006730167302673036730467305673066730767308673096731067311673126731367314673156731667317673186731967320673216732267323673246732567326673276732867329673306733167332673336733467335673366733767338673396734067341673426734367344673456734667347673486734967350673516735267353673546735567356673576735867359673606736167362673636736467365673666736767368673696737067371673726737367374673756737667377673786737967380673816738267383673846738567386673876738867389673906739167392673936739467395673966739767398673996740067401674026740367404674056740667407674086740967410674116741267413674146741567416674176741867419674206742167422674236742467425674266742767428674296743067431674326743367434674356743667437674386743967440674416744267443674446744567446674476744867449674506745167452674536745467455674566745767458674596746067461674626746367464674656746667467674686746967470674716747267473674746747567476674776747867479674806748167482674836748467485674866748767488674896749067491674926749367494674956749667497674986749967500675016750267503675046750567506675076750867509675106751167512675136751467515675166751767518675196752067521675226752367524675256752667527675286752967530675316753267533675346753567536675376753867539675406754167542675436754467545675466754767548675496755067551675526755367554675556755667557675586755967560675616756267563675646756567566675676756867569675706757167572675736757467575675766757767578675796758067581675826758367584675856758667587675886758967590675916759267593675946759567596675976759867599676006760167602676036760467605676066760767608676096761067611676126761367614676156761667617676186761967620676216762267623676246762567626676276762867629676306763167632676336763467635676366763767638676396764067641676426764367644676456764667647676486764967650676516765267653676546765567656676576765867659676606766167662676636766467665676666766767668676696767067671676726767367674676756767667677676786767967680676816768267683676846768567686676876768867689676906769167692676936769467695676966769767698676996770067701677026770367704677056770667707677086770967710677116771267713677146771567716677176771867719677206772167722677236772467725677266772767728677296773067731677326773367734677356773667737677386773967740677416774267743677446774567746677476774867749677506775167752677536775467755677566775767758677596776067761677626776367764677656776667767677686776967770677716777267773677746777567776677776777867779677806778167782677836778467785677866778767788677896779067791677926779367794677956779667797677986779967800678016780267803678046780567806678076780867809678106781167812678136781467815678166781767818678196782067821678226782367824678256782667827678286782967830678316783267833678346783567836678376783867839678406784167842678436784467845678466784767848678496785067851678526785367854678556785667857678586785967860678616786267863678646786567866678676786867869678706787167872678736787467875678766787767878678796788067881678826788367884678856788667887678886788967890678916789267893678946789567896678976789867899679006790167902679036790467905679066790767908679096791067911679126791367914679156791667917679186791967920679216792267923679246792567926679276792867929679306793167932679336793467935679366793767938679396794067941679426794367944679456794667947679486794967950679516795267953679546795567956679576795867959679606796167962679636796467965679666796767968679696797067971679726797367974679756797667977679786797967980679816798267983679846798567986679876798867989679906799167992679936799467995679966799767998679996800068001680026800368004680056800668007680086800968010680116801268013680146801568016680176801868019680206802168022680236802468025680266802768028680296803068031680326803368034680356803668037680386803968040680416804268043680446804568046680476804868049680506805168052680536805468055680566805768058680596806068061680626806368064680656806668067680686806968070680716807268073680746807568076680776807868079680806808168082680836808468085680866808768088680896809068091680926809368094680956809668097680986809968100681016810268103681046810568106681076810868109681106811168112681136811468115681166811768118681196812068121681226812368124681256812668127681286812968130681316813268133681346813568136681376813868139681406814168142681436814468145681466814768148681496815068151681526815368154681556815668157681586815968160681616816268163681646816568166681676816868169681706817168172681736817468175681766817768178681796818068181681826818368184681856818668187681886818968190681916819268193681946819568196681976819868199682006820168202682036820468205682066820768208682096821068211682126821368214682156821668217682186821968220682216822268223682246822568226682276822868229682306823168232682336823468235682366823768238682396824068241682426824368244682456824668247682486824968250682516825268253682546825568256682576825868259682606826168262682636826468265682666826768268682696827068271682726827368274682756827668277682786827968280682816828268283682846828568286682876828868289682906829168292682936829468295682966829768298682996830068301683026830368304683056830668307683086830968310683116831268313683146831568316683176831868319683206832168322683236832468325683266832768328683296833068331683326833368334683356833668337683386833968340683416834268343683446834568346683476834868349683506835168352683536835468355683566835768358683596836068361683626836368364683656836668367683686836968370683716837268373683746837568376683776837868379683806838168382683836838468385683866838768388683896839068391683926839368394683956839668397683986839968400684016840268403684046840568406684076840868409684106841168412684136841468415684166841768418684196842068421684226842368424684256842668427684286842968430684316843268433684346843568436684376843868439684406844168442684436844468445684466844768448684496845068451684526845368454684556845668457684586845968460684616846268463684646846568466684676846868469684706847168472684736847468475684766847768478684796848068481684826848368484684856848668487684886848968490684916849268493684946849568496684976849868499685006850168502685036850468505685066850768508685096851068511685126851368514685156851668517685186851968520685216852268523685246852568526685276852868529685306853168532685336853468535685366853768538685396854068541685426854368544685456854668547685486854968550685516855268553685546855568556685576855868559685606856168562685636856468565685666856768568685696857068571685726857368574685756857668577685786857968580685816858268583685846858568586685876858868589685906859168592685936859468595685966859768598685996860068601686026860368604686056860668607686086860968610686116861268613686146861568616686176861868619686206862168622686236862468625686266862768628686296863068631686326863368634686356863668637686386863968640686416864268643686446864568646686476864868649686506865168652686536865468655686566865768658686596866068661686626866368664686656866668667686686866968670686716867268673686746867568676686776867868679686806868168682686836868468685686866868768688686896869068691686926869368694686956869668697686986869968700687016870268703687046870568706687076870868709687106871168712687136871468715687166871768718687196872068721687226872368724687256872668727687286872968730687316873268733687346873568736687376873868739687406874168742687436874468745687466874768748687496875068751687526875368754687556875668757687586875968760687616876268763687646876568766687676876868769687706877168772687736877468775687766877768778687796878068781687826878368784687856878668787687886878968790687916879268793687946879568796687976879868799688006880168802688036880468805688066880768808688096881068811688126881368814688156881668817688186881968820688216882268823688246882568826688276882868829688306883168832688336883468835688366883768838688396884068841688426884368844688456884668847688486884968850688516885268853688546885568856688576885868859688606886168862688636886468865688666886768868688696887068871688726887368874688756887668877688786887968880688816888268883688846888568886688876888868889688906889168892688936889468895688966889768898688996890068901689026890368904689056890668907689086890968910689116891268913689146891568916689176891868919689206892168922689236892468925689266892768928689296893068931689326893368934689356893668937689386893968940689416894268943689446894568946689476894868949689506895168952689536895468955689566895768958689596896068961689626896368964689656896668967689686896968970689716897268973689746897568976689776897868979689806898168982689836898468985689866898768988689896899068991689926899368994689956899668997689986899969000690016900269003690046900569006690076900869009690106901169012690136901469015690166901769018690196902069021690226902369024690256902669027690286902969030690316903269033690346903569036690376903869039690406904169042690436904469045690466904769048690496905069051690526905369054690556905669057690586905969060690616906269063690646906569066690676906869069690706907169072690736907469075690766907769078690796908069081690826908369084690856908669087690886908969090690916909269093690946909569096690976909869099691006910169102691036910469105691066910769108691096911069111691126911369114691156911669117691186911969120691216912269123691246912569126691276912869129691306913169132691336913469135691366913769138691396914069141691426914369144691456914669147691486914969150691516915269153691546915569156691576915869159691606916169162691636916469165691666916769168691696917069171691726917369174691756917669177691786917969180691816918269183691846918569186691876918869189691906919169192691936919469195691966919769198691996920069201692026920369204692056920669207692086920969210692116921269213692146921569216692176921869219692206922169222692236922469225692266922769228692296923069231692326923369234692356923669237692386923969240692416924269243692446924569246692476924869249692506925169252692536925469255692566925769258692596926069261692626926369264692656926669267692686926969270692716927269273692746927569276692776927869279692806928169282692836928469285692866928769288692896929069291692926929369294692956929669297692986929969300693016930269303693046930569306693076930869309693106931169312693136931469315693166931769318693196932069321693226932369324693256932669327693286932969330693316933269333693346933569336693376933869339693406934169342693436934469345693466934769348693496935069351693526935369354693556935669357693586935969360693616936269363693646936569366693676936869369693706937169372693736937469375693766937769378693796938069381693826938369384693856938669387693886938969390693916939269393693946939569396693976939869399694006940169402694036940469405694066940769408694096941069411694126941369414694156941669417694186941969420694216942269423694246942569426694276942869429694306943169432694336943469435694366943769438694396944069441694426944369444694456944669447694486944969450694516945269453694546945569456694576945869459694606946169462694636946469465694666946769468694696947069471694726947369474694756947669477694786947969480694816948269483694846948569486694876948869489694906949169492694936949469495694966949769498694996950069501695026950369504695056950669507695086950969510695116951269513695146951569516695176951869519695206952169522695236952469525695266952769528695296953069531695326953369534695356953669537695386953969540695416954269543695446954569546695476954869549695506955169552695536955469555695566955769558695596956069561695626956369564695656956669567695686956969570695716957269573695746957569576695776957869579695806958169582695836958469585695866958769588695896959069591695926959369594695956959669597695986959969600696016960269603696046960569606696076960869609696106961169612696136961469615696166961769618696196962069621696226962369624696256962669627696286962969630696316963269633696346963569636696376963869639696406964169642696436964469645696466964769648696496965069651696526965369654696556965669657696586965969660696616966269663696646966569666696676966869669696706967169672696736967469675696766967769678696796968069681696826968369684696856968669687696886968969690696916969269693696946969569696696976969869699697006970169702697036970469705697066970769708697096971069711697126971369714697156971669717697186971969720697216972269723697246972569726697276972869729697306973169732697336973469735697366973769738697396974069741697426974369744697456974669747697486974969750697516975269753697546975569756697576975869759697606976169762697636976469765697666976769768697696977069771697726977369774697756977669777697786977969780697816978269783697846978569786697876978869789697906979169792697936979469795697966979769798697996980069801698026980369804698056980669807698086980969810698116981269813698146981569816698176981869819698206982169822698236982469825698266982769828698296983069831698326983369834698356983669837698386983969840698416984269843698446984569846698476984869849698506985169852698536985469855698566985769858698596986069861698626986369864698656986669867698686986969870698716987269873698746987569876698776987869879698806988169882698836988469885698866988769888698896989069891698926989369894698956989669897698986989969900699016990269903699046990569906699076990869909699106991169912699136991469915699166991769918699196992069921699226992369924699256992669927699286992969930699316993269933699346993569936699376993869939699406994169942699436994469945699466994769948699496995069951699526995369954699556995669957699586995969960699616996269963699646996569966699676996869969699706997169972699736997469975699766997769978699796998069981699826998369984699856998669987699886998969990699916999269993699946999569996699976999869999700007000170002700037000470005700067000770008700097001070011700127001370014700157001670017700187001970020700217002270023700247002570026700277002870029700307003170032700337003470035700367003770038700397004070041700427004370044700457004670047700487004970050700517005270053700547005570056700577005870059700607006170062700637006470065700667006770068700697007070071700727007370074700757007670077700787007970080700817008270083700847008570086700877008870089700907009170092700937009470095700967009770098700997010070101701027010370104701057010670107701087010970110701117011270113701147011570116701177011870119701207012170122701237012470125701267012770128701297013070131701327013370134701357013670137701387013970140701417014270143701447014570146701477014870149701507015170152701537015470155701567015770158701597016070161701627016370164701657016670167701687016970170701717017270173701747017570176701777017870179701807018170182701837018470185701867018770188701897019070191701927019370194701957019670197701987019970200702017020270203702047020570206702077020870209702107021170212702137021470215702167021770218702197022070221702227022370224702257022670227702287022970230702317023270233702347023570236702377023870239702407024170242702437024470245702467024770248702497025070251702527025370254702557025670257702587025970260702617026270263702647026570266702677026870269702707027170272702737027470275702767027770278702797028070281702827028370284702857028670287702887028970290702917029270293702947029570296702977029870299703007030170302703037030470305703067030770308703097031070311703127031370314703157031670317703187031970320703217032270323703247032570326703277032870329703307033170332703337033470335703367033770338703397034070341703427034370344703457034670347703487034970350703517035270353703547035570356703577035870359703607036170362703637036470365703667036770368703697037070371703727037370374703757037670377703787037970380703817038270383703847038570386703877038870389703907039170392703937039470395703967039770398703997040070401704027040370404704057040670407704087040970410704117041270413704147041570416704177041870419704207042170422704237042470425704267042770428704297043070431704327043370434704357043670437704387043970440704417044270443704447044570446704477044870449704507045170452704537045470455704567045770458704597046070461704627046370464704657046670467704687046970470704717047270473704747047570476704777047870479704807048170482704837048470485704867048770488704897049070491704927049370494704957049670497704987049970500705017050270503705047050570506705077050870509705107051170512705137051470515705167051770518705197052070521705227052370524705257052670527705287052970530705317053270533705347053570536705377053870539705407054170542705437054470545705467054770548705497055070551705527055370554705557055670557705587055970560705617056270563705647056570566705677056870569705707057170572705737057470575705767057770578705797058070581705827058370584705857058670587705887058970590705917059270593705947059570596705977059870599706007060170602706037060470605706067060770608706097061070611706127061370614706157061670617706187061970620706217062270623706247062570626706277062870629706307063170632706337063470635706367063770638706397064070641706427064370644706457064670647706487064970650706517065270653706547065570656706577065870659706607066170662706637066470665706667066770668706697067070671706727067370674706757067670677706787067970680706817068270683706847068570686706877068870689706907069170692706937069470695706967069770698706997070070701707027070370704707057070670707707087070970710707117071270713707147071570716707177071870719707207072170722707237072470725707267072770728707297073070731707327073370734707357073670737707387073970740707417074270743707447074570746707477074870749707507075170752707537075470755707567075770758707597076070761707627076370764707657076670767707687076970770707717077270773707747077570776707777077870779707807078170782707837078470785707867078770788707897079070791707927079370794707957079670797707987079970800708017080270803708047080570806708077080870809708107081170812708137081470815708167081770818708197082070821708227082370824708257082670827708287082970830708317083270833708347083570836708377083870839708407084170842708437084470845708467084770848708497085070851708527085370854708557085670857708587085970860708617086270863708647086570866708677086870869708707087170872708737087470875708767087770878708797088070881708827088370884708857088670887708887088970890708917089270893708947089570896708977089870899709007090170902709037090470905709067090770908709097091070911709127091370914709157091670917709187091970920709217092270923709247092570926709277092870929709307093170932709337093470935709367093770938709397094070941709427094370944709457094670947709487094970950709517095270953709547095570956709577095870959709607096170962709637096470965709667096770968709697097070971709727097370974709757097670977709787097970980709817098270983709847098570986709877098870989709907099170992709937099470995709967099770998709997100071001710027100371004710057100671007710087100971010710117101271013710147101571016710177101871019710207102171022710237102471025710267102771028710297103071031710327103371034710357103671037710387103971040710417104271043710447104571046710477104871049710507105171052710537105471055710567105771058710597106071061710627106371064710657106671067710687106971070710717107271073710747107571076710777107871079710807108171082710837108471085710867108771088710897109071091710927109371094710957109671097710987109971100711017110271103711047110571106711077110871109711107111171112711137111471115711167111771118711197112071121711227112371124711257112671127711287112971130711317113271133711347113571136711377113871139711407114171142711437114471145711467114771148711497115071151711527115371154711557115671157711587115971160711617116271163711647116571166711677116871169711707117171172711737117471175711767117771178711797118071181711827118371184711857118671187711887118971190711917119271193711947119571196711977119871199712007120171202712037120471205712067120771208712097121071211712127121371214712157121671217712187121971220712217122271223712247122571226712277122871229712307123171232712337123471235712367123771238712397124071241712427124371244712457124671247712487124971250712517125271253712547125571256712577125871259712607126171262712637126471265712667126771268712697127071271712727127371274712757127671277712787127971280712817128271283712847128571286712877128871289712907129171292712937129471295712967129771298712997130071301713027130371304713057130671307713087130971310713117131271313713147131571316713177131871319713207132171322713237132471325713267132771328713297133071331713327133371334713357133671337713387133971340713417134271343713447134571346713477134871349713507135171352713537135471355713567135771358713597136071361713627136371364713657136671367713687136971370713717137271373713747137571376713777137871379713807138171382713837138471385713867138771388713897139071391713927139371394713957139671397713987139971400714017140271403714047140571406714077140871409714107141171412714137141471415714167141771418714197142071421714227142371424714257142671427714287142971430714317143271433714347143571436714377143871439714407144171442714437144471445714467144771448714497145071451714527145371454714557145671457714587145971460714617146271463714647146571466714677146871469714707147171472714737147471475714767147771478714797148071481714827148371484714857148671487714887148971490714917149271493714947149571496714977149871499715007150171502715037150471505715067150771508715097151071511715127151371514715157151671517715187151971520715217152271523715247152571526715277152871529715307153171532715337153471535715367153771538715397154071541715427154371544715457154671547715487154971550715517155271553715547155571556715577155871559715607156171562715637156471565715667156771568715697157071571715727157371574715757157671577715787157971580715817158271583715847158571586715877158871589715907159171592715937159471595715967159771598715997160071601716027160371604716057160671607716087160971610716117161271613716147161571616716177161871619716207162171622716237162471625716267162771628716297163071631716327163371634716357163671637716387163971640716417164271643716447164571646716477164871649716507165171652716537165471655716567165771658716597166071661716627166371664716657166671667716687166971670716717167271673716747167571676716777167871679716807168171682716837168471685716867168771688716897169071691716927169371694716957169671697716987169971700717017170271703717047170571706717077170871709717107171171712717137171471715717167171771718717197172071721717227172371724717257172671727717287172971730717317173271733717347173571736717377173871739717407174171742717437174471745717467174771748717497175071751717527175371754717557175671757717587175971760717617176271763717647176571766717677176871769717707177171772717737177471775717767177771778717797178071781717827178371784717857178671787717887178971790717917179271793717947179571796717977179871799718007180171802718037180471805718067180771808718097181071811718127181371814718157181671817718187181971820718217182271823718247182571826718277182871829718307183171832718337183471835718367183771838718397184071841718427184371844718457184671847718487184971850718517185271853718547185571856718577185871859718607186171862718637186471865718667186771868718697187071871718727187371874718757187671877718787187971880718817188271883718847188571886718877188871889718907189171892718937189471895718967189771898718997190071901719027190371904719057190671907719087190971910719117191271913719147191571916719177191871919719207192171922719237192471925719267192771928719297193071931719327193371934719357193671937719387193971940719417194271943719447194571946719477194871949719507195171952719537195471955719567195771958719597196071961719627196371964719657196671967719687196971970719717197271973719747197571976719777197871979719807198171982719837198471985719867198771988719897199071991719927199371994719957199671997719987199972000720017200272003720047200572006720077200872009720107201172012720137201472015720167201772018720197202072021720227202372024720257202672027720287202972030720317203272033720347203572036720377203872039720407204172042720437204472045720467204772048720497205072051720527205372054720557205672057720587205972060720617206272063720647206572066720677206872069720707207172072720737207472075720767207772078720797208072081720827208372084720857208672087720887208972090720917209272093720947209572096720977209872099721007210172102721037210472105721067210772108721097211072111721127211372114721157211672117721187211972120721217212272123721247212572126721277212872129721307213172132721337213472135721367213772138721397214072141721427214372144721457214672147721487214972150721517215272153721547215572156721577215872159721607216172162721637216472165721667216772168721697217072171721727217372174721757217672177721787217972180721817218272183721847218572186721877218872189721907219172192721937219472195721967219772198721997220072201722027220372204722057220672207722087220972210722117221272213722147221572216722177221872219722207222172222722237222472225722267222772228722297223072231722327223372234722357223672237722387223972240722417224272243722447224572246722477224872249722507225172252722537225472255722567225772258722597226072261722627226372264722657226672267722687226972270722717227272273722747227572276722777227872279722807228172282722837228472285722867228772288722897229072291722927229372294722957229672297722987229972300723017230272303723047230572306723077230872309723107231172312723137231472315723167231772318723197232072321723227232372324723257232672327723287232972330723317233272333723347233572336723377233872339723407234172342723437234472345723467234772348723497235072351723527235372354723557235672357723587235972360723617236272363723647236572366723677236872369723707237172372723737237472375723767237772378723797238072381723827238372384723857238672387723887238972390723917239272393723947239572396723977239872399724007240172402724037240472405724067240772408724097241072411724127241372414724157241672417724187241972420724217242272423724247242572426724277242872429724307243172432724337243472435724367243772438724397244072441724427244372444724457244672447724487244972450724517245272453724547245572456724577245872459724607246172462724637246472465724667246772468724697247072471724727247372474724757247672477724787247972480724817248272483724847248572486724877248872489724907249172492724937249472495724967249772498724997250072501725027250372504725057250672507725087250972510725117251272513725147251572516725177251872519725207252172522725237252472525725267252772528725297253072531725327253372534725357253672537725387253972540725417254272543725447254572546725477254872549725507255172552725537255472555725567255772558725597256072561725627256372564725657256672567725687256972570725717257272573725747257572576725777257872579725807258172582725837258472585725867258772588725897259072591725927259372594725957259672597725987259972600726017260272603726047260572606726077260872609726107261172612726137261472615726167261772618726197262072621726227262372624726257262672627726287262972630726317263272633726347263572636726377263872639726407264172642726437264472645726467264772648726497265072651726527265372654726557265672657726587265972660726617266272663726647266572666726677266872669726707267172672726737267472675726767267772678726797268072681726827268372684726857268672687726887268972690726917269272693726947269572696726977269872699727007270172702727037270472705727067270772708727097271072711727127271372714727157271672717727187271972720727217272272723727247272572726727277272872729727307273172732727337273472735727367273772738727397274072741727427274372744727457274672747727487274972750727517275272753727547275572756727577275872759727607276172762727637276472765727667276772768727697277072771727727277372774727757277672777727787277972780727817278272783727847278572786727877278872789727907279172792727937279472795727967279772798727997280072801728027280372804728057280672807728087280972810728117281272813728147281572816728177281872819728207282172822728237282472825728267282772828728297283072831728327283372834728357283672837728387283972840728417284272843728447284572846728477284872849728507285172852728537285472855728567285772858728597286072861728627286372864728657286672867728687286972870728717287272873728747287572876728777287872879728807288172882728837288472885728867288772888728897289072891728927289372894728957289672897728987289972900729017290272903729047290572906729077290872909729107291172912729137291472915729167291772918729197292072921729227292372924729257292672927729287292972930729317293272933729347293572936729377293872939729407294172942729437294472945729467294772948729497295072951729527295372954729557295672957729587295972960729617296272963729647296572966729677296872969729707297172972729737297472975729767297772978729797298072981729827298372984729857298672987729887298972990729917299272993729947299572996729977299872999730007300173002730037300473005730067300773008730097301073011730127301373014730157301673017730187301973020730217302273023730247302573026730277302873029730307303173032730337303473035730367303773038730397304073041730427304373044730457304673047730487304973050730517305273053730547305573056730577305873059730607306173062730637306473065730667306773068730697307073071730727307373074730757307673077730787307973080730817308273083730847308573086730877308873089730907309173092730937309473095730967309773098730997310073101731027310373104731057310673107731087310973110731117311273113731147311573116731177311873119731207312173122731237312473125731267312773128731297313073131731327313373134731357313673137731387313973140731417314273143731447314573146731477314873149731507315173152731537315473155731567315773158731597316073161731627316373164731657316673167731687316973170731717317273173731747317573176731777317873179731807318173182731837318473185731867318773188731897319073191731927319373194731957319673197731987319973200732017320273203732047320573206732077320873209732107321173212732137321473215732167321773218732197322073221732227322373224732257322673227732287322973230732317323273233732347323573236732377323873239732407324173242732437324473245732467324773248732497325073251732527325373254732557325673257732587325973260732617326273263732647326573266732677326873269732707327173272732737327473275732767327773278732797328073281732827328373284732857328673287732887328973290732917329273293732947329573296732977329873299733007330173302733037330473305733067330773308733097331073311733127331373314733157331673317733187331973320733217332273323733247332573326733277332873329733307333173332733337333473335733367333773338733397334073341733427334373344733457334673347733487334973350733517335273353733547335573356733577335873359733607336173362733637336473365733667336773368733697337073371733727337373374733757337673377733787337973380733817338273383733847338573386733877338873389733907339173392733937339473395733967339773398733997340073401734027340373404734057340673407734087340973410734117341273413734147341573416734177341873419734207342173422734237342473425734267342773428734297343073431734327343373434734357343673437734387343973440734417344273443734447344573446734477344873449734507345173452734537345473455734567345773458734597346073461734627346373464734657346673467734687346973470734717347273473734747347573476734777347873479734807348173482734837348473485734867348773488734897349073491734927349373494734957349673497734987349973500735017350273503735047350573506735077350873509735107351173512735137351473515735167351773518735197352073521735227352373524735257352673527735287352973530735317353273533735347353573536735377353873539735407354173542735437354473545735467354773548735497355073551735527355373554735557355673557735587355973560735617356273563735647356573566735677356873569735707357173572735737357473575735767357773578735797358073581735827358373584735857358673587735887358973590735917359273593735947359573596735977359873599736007360173602736037360473605736067360773608736097361073611736127361373614736157361673617736187361973620736217362273623736247362573626736277362873629736307363173632736337363473635736367363773638736397364073641736427364373644736457364673647736487364973650736517365273653736547365573656736577365873659736607366173662736637366473665736667366773668736697367073671736727367373674736757367673677736787367973680736817368273683736847368573686736877368873689736907369173692736937369473695736967369773698736997370073701737027370373704737057370673707737087370973710737117371273713737147371573716737177371873719737207372173722737237372473725737267372773728737297373073731737327373373734737357373673737737387373973740737417374273743737447374573746737477374873749737507375173752737537375473755737567375773758737597376073761737627376373764737657376673767737687376973770737717377273773737747377573776737777377873779737807378173782737837378473785737867378773788737897379073791737927379373794737957379673797737987379973800738017380273803738047380573806738077380873809738107381173812738137381473815738167381773818738197382073821738227382373824738257382673827738287382973830738317383273833738347383573836738377383873839738407384173842738437384473845738467384773848738497385073851738527385373854738557385673857738587385973860738617386273863738647386573866738677386873869738707387173872738737387473875738767387773878738797388073881738827388373884738857388673887738887388973890738917389273893738947389573896738977389873899739007390173902739037390473905739067390773908739097391073911739127391373914739157391673917739187391973920739217392273923739247392573926739277392873929739307393173932739337393473935739367393773938739397394073941739427394373944739457394673947739487394973950739517395273953739547395573956739577395873959739607396173962739637396473965739667396773968739697397073971739727397373974739757397673977739787397973980739817398273983739847398573986739877398873989739907399173992739937399473995739967399773998739997400074001740027400374004740057400674007740087400974010740117401274013740147401574016740177401874019740207402174022740237402474025740267402774028740297403074031740327403374034740357403674037740387403974040740417404274043740447404574046740477404874049740507405174052740537405474055740567405774058740597406074061740627406374064740657406674067740687406974070740717407274073740747407574076740777407874079740807408174082740837408474085740867408774088740897409074091740927409374094740957409674097740987409974100741017410274103741047410574106741077410874109741107411174112741137411474115741167411774118741197412074121741227412374124741257412674127741287412974130741317413274133741347413574136741377413874139741407414174142741437414474145741467414774148741497415074151741527415374154741557415674157741587415974160741617416274163741647416574166741677416874169741707417174172741737417474175741767417774178741797418074181741827418374184741857418674187741887418974190741917419274193741947419574196741977419874199742007420174202742037420474205742067420774208742097421074211742127421374214742157421674217742187421974220742217422274223742247422574226742277422874229742307423174232742337423474235742367423774238742397424074241742427424374244742457424674247742487424974250742517425274253742547425574256742577425874259742607426174262742637426474265742667426774268742697427074271742727427374274742757427674277742787427974280742817428274283742847428574286742877428874289742907429174292742937429474295742967429774298742997430074301743027430374304743057430674307743087430974310743117431274313743147431574316743177431874319743207432174322743237432474325743267432774328743297433074331743327433374334743357433674337743387433974340743417434274343743447434574346743477434874349743507435174352743537435474355743567435774358743597436074361743627436374364743657436674367743687436974370743717437274373743747437574376743777437874379743807438174382743837438474385743867438774388743897439074391743927439374394743957439674397743987439974400744017440274403744047440574406744077440874409744107441174412744137441474415744167441774418744197442074421744227442374424744257442674427744287442974430744317443274433744347443574436744377443874439744407444174442744437444474445744467444774448744497445074451744527445374454744557445674457744587445974460744617446274463744647446574466744677446874469744707447174472744737447474475744767447774478744797448074481744827448374484744857448674487744887448974490744917449274493744947449574496744977449874499745007450174502745037450474505745067450774508745097451074511745127451374514745157451674517745187451974520745217452274523745247452574526745277452874529745307453174532745337453474535745367453774538745397454074541745427454374544745457454674547745487454974550745517455274553745547455574556745577455874559745607456174562745637456474565745667456774568745697457074571745727457374574745757457674577745787457974580745817458274583745847458574586745877458874589745907459174592745937459474595745967459774598745997460074601746027460374604746057460674607746087460974610746117461274613746147461574616746177461874619746207462174622746237462474625746267462774628746297463074631746327463374634746357463674637746387463974640746417464274643746447464574646746477464874649746507465174652746537465474655746567465774658746597466074661746627466374664746657466674667746687466974670746717467274673746747467574676746777467874679746807468174682746837468474685746867468774688746897469074691746927469374694746957469674697746987469974700747017470274703747047470574706747077470874709747107471174712747137471474715747167471774718747197472074721747227472374724747257472674727747287472974730747317473274733747347473574736747377473874739747407474174742747437474474745747467474774748747497475074751747527475374754747557475674757747587475974760747617476274763747647476574766747677476874769747707477174772747737477474775747767477774778747797478074781747827478374784747857478674787747887478974790747917479274793747947479574796747977479874799748007480174802748037480474805748067480774808748097481074811748127481374814748157481674817748187481974820748217482274823748247482574826748277482874829748307483174832748337483474835748367483774838748397484074841748427484374844748457484674847748487484974850748517485274853748547485574856748577485874859748607486174862748637486474865748667486774868748697487074871748727487374874748757487674877748787487974880748817488274883748847488574886748877488874889748907489174892748937489474895748967489774898748997490074901749027490374904749057490674907749087490974910749117491274913749147491574916749177491874919749207492174922749237492474925749267492774928749297493074931749327493374934749357493674937749387493974940749417494274943749447494574946749477494874949749507495174952749537495474955749567495774958749597496074961749627496374964749657496674967749687496974970749717497274973749747497574976749777497874979749807498174982749837498474985749867498774988749897499074991749927499374994749957499674997749987499975000750017500275003750047500575006750077500875009750107501175012750137501475015750167501775018750197502075021750227502375024750257502675027750287502975030750317503275033750347503575036750377503875039750407504175042750437504475045750467504775048750497505075051750527505375054750557505675057750587505975060750617506275063750647506575066750677506875069750707507175072750737507475075750767507775078750797508075081750827508375084750857508675087750887508975090750917509275093750947509575096750977509875099751007510175102751037510475105751067510775108751097511075111751127511375114751157511675117751187511975120751217512275123751247512575126751277512875129751307513175132751337513475135751367513775138751397514075141751427514375144751457514675147751487514975150751517515275153751547515575156751577515875159751607516175162751637516475165751667516775168751697517075171751727517375174751757517675177751787517975180751817518275183751847518575186751877518875189751907519175192751937519475195751967519775198751997520075201752027520375204752057520675207752087520975210752117521275213752147521575216752177521875219752207522175222752237522475225752267522775228752297523075231752327523375234752357523675237752387523975240752417524275243752447524575246752477524875249752507525175252752537525475255752567525775258752597526075261752627526375264752657526675267752687526975270752717527275273752747527575276752777527875279752807528175282752837528475285752867528775288752897529075291752927529375294752957529675297752987529975300753017530275303753047530575306753077530875309753107531175312753137531475315753167531775318753197532075321753227532375324753257532675327753287532975330753317533275333753347533575336753377533875339753407534175342753437534475345753467534775348753497535075351753527535375354753557535675357753587535975360753617536275363753647536575366753677536875369753707537175372753737537475375753767537775378753797538075381753827538375384753857538675387753887538975390753917539275393753947539575396753977539875399754007540175402754037540475405754067540775408754097541075411754127541375414754157541675417754187541975420754217542275423754247542575426754277542875429754307543175432754337543475435754367543775438754397544075441754427544375444754457544675447754487544975450754517545275453754547545575456754577545875459754607546175462754637546475465754667546775468754697547075471754727547375474754757547675477754787547975480754817548275483754847548575486754877548875489754907549175492754937549475495754967549775498754997550075501755027550375504755057550675507755087550975510755117551275513755147551575516755177551875519755207552175522755237552475525755267552775528755297553075531755327553375534755357553675537755387553975540755417554275543755447554575546755477554875549755507555175552755537555475555755567555775558755597556075561755627556375564755657556675567755687556975570755717557275573755747557575576755777557875579755807558175582755837558475585755867558775588755897559075591755927559375594755957559675597755987559975600756017560275603756047560575606756077560875609756107561175612756137561475615756167561775618756197562075621756227562375624756257562675627756287562975630756317563275633756347563575636756377563875639756407564175642756437564475645756467564775648756497565075651756527565375654756557565675657756587565975660756617566275663756647566575666756677566875669756707567175672756737567475675756767567775678756797568075681756827568375684756857568675687756887568975690756917569275693756947569575696756977569875699757007570175702757037570475705757067570775708757097571075711757127571375714757157571675717757187571975720757217572275723757247572575726757277572875729757307573175732757337573475735757367573775738757397574075741757427574375744757457574675747757487574975750757517575275753757547575575756757577575875759757607576175762757637576475765757667576775768757697577075771757727577375774757757577675777757787577975780757817578275783757847578575786757877578875789757907579175792757937579475795757967579775798757997580075801758027580375804758057580675807758087580975810758117581275813758147581575816758177581875819758207582175822758237582475825758267582775828758297583075831758327583375834758357583675837758387583975840758417584275843758447584575846758477584875849758507585175852758537585475855758567585775858758597586075861758627586375864758657586675867758687586975870758717587275873758747587575876758777587875879758807588175882758837588475885758867588775888758897589075891758927589375894758957589675897758987589975900759017590275903759047590575906759077590875909759107591175912759137591475915759167591775918759197592075921759227592375924759257592675927759287592975930759317593275933759347593575936759377593875939759407594175942759437594475945759467594775948759497595075951759527595375954759557595675957759587595975960759617596275963759647596575966759677596875969759707597175972759737597475975759767597775978759797598075981759827598375984759857598675987759887598975990759917599275993759947599575996759977599875999760007600176002760037600476005760067600776008760097601076011760127601376014760157601676017760187601976020760217602276023760247602576026760277602876029760307603176032760337603476035760367603776038760397604076041760427604376044760457604676047760487604976050760517605276053760547605576056760577605876059760607606176062760637606476065760667606776068760697607076071760727607376074760757607676077760787607976080760817608276083760847608576086760877608876089760907609176092760937609476095760967609776098760997610076101761027610376104761057610676107761087610976110761117611276113761147611576116761177611876119761207612176122761237612476125761267612776128761297613076131761327613376134761357613676137761387613976140761417614276143761447614576146761477614876149761507615176152761537615476155761567615776158761597616076161761627616376164761657616676167761687616976170761717617276173761747617576176761777617876179761807618176182761837618476185761867618776188761897619076191761927619376194761957619676197761987619976200762017620276203762047620576206762077620876209762107621176212762137621476215762167621776218762197622076221762227622376224762257622676227762287622976230762317623276233762347623576236762377623876239762407624176242762437624476245762467624776248762497625076251762527625376254762557625676257762587625976260762617626276263762647626576266762677626876269762707627176272762737627476275762767627776278762797628076281762827628376284762857628676287762887628976290762917629276293762947629576296762977629876299763007630176302763037630476305763067630776308763097631076311763127631376314763157631676317763187631976320763217632276323763247632576326763277632876329763307633176332763337633476335763367633776338763397634076341763427634376344763457634676347763487634976350763517635276353763547635576356763577635876359763607636176362763637636476365763667636776368763697637076371763727637376374763757637676377763787637976380763817638276383763847638576386763877638876389763907639176392763937639476395763967639776398763997640076401764027640376404764057640676407764087640976410764117641276413764147641576416764177641876419764207642176422764237642476425764267642776428764297643076431764327643376434764357643676437764387643976440764417644276443764447644576446764477644876449764507645176452764537645476455764567645776458764597646076461764627646376464764657646676467764687646976470764717647276473764747647576476764777647876479764807648176482764837648476485764867648776488764897649076491764927649376494764957649676497764987649976500765017650276503765047650576506765077650876509765107651176512765137651476515765167651776518765197652076521765227652376524765257652676527765287652976530765317653276533765347653576536765377653876539765407654176542765437654476545765467654776548765497655076551765527655376554765557655676557765587655976560765617656276563765647656576566765677656876569765707657176572765737657476575765767657776578765797658076581765827658376584765857658676587765887658976590765917659276593765947659576596765977659876599766007660176602766037660476605766067660776608766097661076611766127661376614766157661676617766187661976620766217662276623766247662576626766277662876629766307663176632766337663476635766367663776638766397664076641766427664376644766457664676647766487664976650766517665276653766547665576656766577665876659766607666176662766637666476665766667666776668766697667076671766727667376674766757667676677766787667976680766817668276683766847668576686766877668876689766907669176692766937669476695766967669776698766997670076701767027670376704767057670676707767087670976710767117671276713767147671576716767177671876719767207672176722767237672476725767267672776728767297673076731767327673376734767357673676737767387673976740767417674276743767447674576746767477674876749767507675176752767537675476755767567675776758767597676076761767627676376764767657676676767767687676976770767717677276773767747677576776767777677876779767807678176782767837678476785767867678776788767897679076791767927679376794767957679676797767987679976800768017680276803768047680576806768077680876809768107681176812768137681476815768167681776818768197682076821768227682376824768257682676827768287682976830768317683276833768347683576836768377683876839768407684176842768437684476845768467684776848768497685076851768527685376854768557685676857768587685976860768617686276863768647686576866768677686876869768707687176872768737687476875768767687776878768797688076881768827688376884768857688676887768887688976890768917689276893768947689576896768977689876899769007690176902769037690476905769067690776908769097691076911769127691376914769157691676917769187691976920769217692276923769247692576926769277692876929769307693176932769337693476935769367693776938769397694076941769427694376944769457694676947769487694976950769517695276953769547695576956769577695876959769607696176962769637696476965769667696776968769697697076971769727697376974769757697676977769787697976980769817698276983769847698576986769877698876989769907699176992769937699476995769967699776998769997700077001770027700377004770057700677007770087700977010770117701277013770147701577016770177701877019770207702177022770237702477025770267702777028770297703077031770327703377034770357703677037770387703977040770417704277043770447704577046770477704877049770507705177052770537705477055770567705777058770597706077061770627706377064770657706677067770687706977070770717707277073770747707577076770777707877079770807708177082770837708477085770867708777088770897709077091770927709377094770957709677097770987709977100771017710277103771047710577106771077710877109771107711177112771137711477115771167711777118771197712077121771227712377124771257712677127771287712977130771317713277133771347713577136771377713877139771407714177142771437714477145771467714777148771497715077151771527715377154771557715677157771587715977160771617716277163771647716577166771677716877169771707717177172771737717477175771767717777178771797718077181771827718377184771857718677187771887718977190771917719277193771947719577196771977719877199772007720177202772037720477205772067720777208772097721077211772127721377214772157721677217772187721977220772217722277223772247722577226772277722877229772307723177232772337723477235772367723777238772397724077241772427724377244772457724677247772487724977250772517725277253772547725577256772577725877259772607726177262772637726477265772667726777268772697727077271772727727377274772757727677277772787727977280772817728277283772847728577286772877728877289772907729177292772937729477295772967729777298772997730077301773027730377304773057730677307773087730977310773117731277313773147731577316773177731877319773207732177322773237732477325773267732777328773297733077331773327733377334773357733677337773387733977340773417734277343773447734577346773477734877349773507735177352773537735477355773567735777358773597736077361773627736377364773657736677367773687736977370773717737277373773747737577376773777737877379773807738177382773837738477385773867738777388773897739077391773927739377394773957739677397773987739977400774017740277403774047740577406774077740877409774107741177412774137741477415774167741777418774197742077421774227742377424774257742677427774287742977430774317743277433774347743577436774377743877439774407744177442774437744477445774467744777448774497745077451774527745377454774557745677457774587745977460774617746277463774647746577466774677746877469774707747177472774737747477475774767747777478774797748077481774827748377484774857748677487774887748977490774917749277493774947749577496774977749877499775007750177502775037750477505775067750777508775097751077511775127751377514775157751677517775187751977520775217752277523775247752577526775277752877529775307753177532775337753477535775367753777538775397754077541775427754377544775457754677547775487754977550775517755277553775547755577556775577755877559775607756177562775637756477565775667756777568775697757077571775727757377574775757757677577775787757977580775817758277583775847758577586775877758877589775907759177592775937759477595775967759777598775997760077601776027760377604776057760677607776087760977610776117761277613776147761577616776177761877619776207762177622776237762477625776267762777628776297763077631776327763377634776357763677637776387763977640776417764277643776447764577646776477764877649776507765177652776537765477655776567765777658776597766077661776627766377664776657766677667776687766977670776717767277673776747767577676776777767877679776807768177682776837768477685776867768777688776897769077691776927769377694776957769677697776987769977700777017770277703777047770577706777077770877709777107771177712777137771477715777167771777718777197772077721777227772377724777257772677727777287772977730777317773277733777347773577736777377773877739777407774177742777437774477745777467774777748777497775077751777527775377754777557775677757777587775977760777617776277763777647776577766777677776877769777707777177772777737777477775777767777777778777797778077781777827778377784777857778677787777887778977790777917779277793777947779577796777977779877799778007780177802778037780477805778067780777808778097781077811778127781377814778157781677817778187781977820778217782277823778247782577826778277782877829778307783177832778337783477835778367783777838778397784077841778427784377844778457784677847778487784977850778517785277853778547785577856778577785877859778607786177862778637786477865778667786777868778697787077871778727787377874778757787677877778787787977880778817788277883778847788577886778877788877889778907789177892778937789477895778967789777898778997790077901779027790377904779057790677907779087790977910779117791277913779147791577916779177791877919779207792177922779237792477925779267792777928779297793077931779327793377934779357793677937779387793977940779417794277943779447794577946779477794877949779507795177952779537795477955779567795777958779597796077961779627796377964779657796677967779687796977970779717797277973779747797577976779777797877979779807798177982779837798477985779867798777988779897799077991779927799377994779957799677997779987799978000780017800278003780047800578006780077800878009780107801178012780137801478015780167801778018780197802078021780227802378024780257802678027780287802978030780317803278033780347803578036780377803878039780407804178042780437804478045780467804778048780497805078051780527805378054780557805678057780587805978060780617806278063780647806578066780677806878069780707807178072780737807478075780767807778078780797808078081780827808378084780857808678087780887808978090780917809278093780947809578096780977809878099781007810178102781037810478105781067810778108781097811078111781127811378114781157811678117781187811978120781217812278123781247812578126781277812878129781307813178132781337813478135781367813778138781397814078141781427814378144781457814678147781487814978150781517815278153781547815578156781577815878159781607816178162781637816478165781667816778168781697817078171781727817378174781757817678177781787817978180781817818278183781847818578186781877818878189781907819178192781937819478195781967819778198781997820078201782027820378204782057820678207782087820978210782117821278213782147821578216782177821878219782207822178222782237822478225782267822778228782297823078231782327823378234782357823678237782387823978240782417824278243782447824578246782477824878249782507825178252782537825478255782567825778258782597826078261782627826378264782657826678267782687826978270782717827278273782747827578276782777827878279782807828178282782837828478285782867828778288782897829078291782927829378294782957829678297782987829978300783017830278303783047830578306783077830878309783107831178312783137831478315783167831778318783197832078321783227832378324783257832678327783287832978330783317833278333783347833578336783377833878339783407834178342783437834478345783467834778348783497835078351783527835378354783557835678357783587835978360783617836278363783647836578366783677836878369783707837178372783737837478375783767837778378783797838078381783827838378384783857838678387783887838978390783917839278393783947839578396783977839878399784007840178402784037840478405784067840778408784097841078411784127841378414784157841678417784187841978420784217842278423784247842578426784277842878429784307843178432784337843478435784367843778438784397844078441784427844378444784457844678447784487844978450784517845278453784547845578456784577845878459784607846178462784637846478465784667846778468784697847078471784727847378474784757847678477784787847978480784817848278483784847848578486784877848878489784907849178492784937849478495784967849778498784997850078501785027850378504785057850678507785087850978510785117851278513785147851578516785177851878519785207852178522785237852478525785267852778528785297853078531785327853378534785357853678537785387853978540785417854278543785447854578546785477854878549785507855178552785537855478555785567855778558785597856078561785627856378564785657856678567785687856978570785717857278573785747857578576785777857878579785807858178582785837858478585785867858778588785897859078591785927859378594785957859678597785987859978600786017860278603786047860578606786077860878609786107861178612786137861478615786167861778618786197862078621786227862378624786257862678627786287862978630786317863278633786347863578636786377863878639786407864178642786437864478645786467864778648786497865078651786527865378654786557865678657786587865978660786617866278663786647866578666786677866878669786707867178672786737867478675786767867778678786797868078681786827868378684786857868678687786887868978690786917869278693786947869578696786977869878699787007870178702787037870478705787067870778708787097871078711787127871378714787157871678717787187871978720787217872278723787247872578726787277872878729787307873178732787337873478735787367873778738787397874078741787427874378744787457874678747787487874978750787517875278753787547875578756787577875878759787607876178762787637876478765787667876778768787697877078771787727877378774787757877678777787787877978780787817878278783787847878578786787877878878789787907879178792787937879478795787967879778798787997880078801788027880378804788057880678807788087880978810788117881278813788147881578816788177881878819788207882178822788237882478825788267882778828788297883078831788327883378834788357883678837788387883978840788417884278843788447884578846788477884878849788507885178852788537885478855788567885778858788597886078861788627886378864788657886678867788687886978870788717887278873788747887578876788777887878879788807888178882788837888478885788867888778888788897889078891788927889378894788957889678897788987889978900789017890278903789047890578906789077890878909789107891178912789137891478915789167891778918789197892078921789227892378924789257892678927789287892978930789317893278933789347893578936789377893878939789407894178942789437894478945789467894778948789497895078951789527895378954789557895678957789587895978960789617896278963789647896578966789677896878969789707897178972789737897478975789767897778978789797898078981789827898378984789857898678987789887898978990789917899278993789947899578996789977899878999790007900179002790037900479005790067900779008790097901079011790127901379014790157901679017790187901979020790217902279023790247902579026790277902879029790307903179032790337903479035790367903779038790397904079041790427904379044790457904679047790487904979050790517905279053790547905579056790577905879059790607906179062790637906479065790667906779068790697907079071790727907379074790757907679077790787907979080790817908279083790847908579086790877908879089790907909179092790937909479095790967909779098790997910079101791027910379104791057910679107791087910979110791117911279113791147911579116791177911879119791207912179122791237912479125791267912779128791297913079131791327913379134791357913679137791387913979140791417914279143791447914579146791477914879149791507915179152791537915479155791567915779158791597916079161791627916379164791657916679167791687916979170791717917279173791747917579176791777917879179791807918179182791837918479185791867918779188791897919079191791927919379194791957919679197791987919979200792017920279203792047920579206792077920879209792107921179212792137921479215792167921779218792197922079221792227922379224792257922679227792287922979230792317923279233792347923579236792377923879239792407924179242792437924479245792467924779248792497925079251792527925379254792557925679257792587925979260792617926279263792647926579266792677926879269792707927179272792737927479275792767927779278792797928079281792827928379284792857928679287792887928979290792917929279293792947929579296792977929879299793007930179302793037930479305793067930779308793097931079311793127931379314793157931679317793187931979320793217932279323793247932579326793277932879329793307933179332793337933479335793367933779338793397934079341793427934379344793457934679347793487934979350793517935279353793547935579356793577935879359793607936179362793637936479365793667936779368793697937079371793727937379374793757937679377793787937979380793817938279383793847938579386793877938879389793907939179392793937939479395793967939779398793997940079401794027940379404794057940679407794087940979410794117941279413794147941579416794177941879419794207942179422794237942479425794267942779428794297943079431794327943379434794357943679437794387943979440794417944279443794447944579446794477944879449794507945179452794537945479455794567945779458794597946079461794627946379464794657946679467794687946979470794717947279473794747947579476794777947879479794807948179482794837948479485794867948779488794897949079491794927949379494794957949679497794987949979500795017950279503795047950579506795077950879509795107951179512795137951479515795167951779518795197952079521795227952379524795257952679527795287952979530795317953279533795347953579536795377953879539795407954179542795437954479545795467954779548795497955079551795527955379554795557955679557795587955979560795617956279563795647956579566795677956879569795707957179572795737957479575795767957779578795797958079581795827958379584795857958679587795887958979590795917959279593795947959579596795977959879599796007960179602796037960479605796067960779608796097961079611796127961379614796157961679617796187961979620796217962279623796247962579626796277962879629796307963179632796337963479635796367963779638796397964079641796427964379644796457964679647796487964979650796517965279653796547965579656796577965879659796607966179662796637966479665796667966779668796697967079671796727967379674796757967679677796787967979680796817968279683796847968579686796877968879689796907969179692796937969479695796967969779698796997970079701797027970379704797057970679707797087970979710797117971279713797147971579716797177971879719797207972179722797237972479725797267972779728797297973079731797327973379734797357973679737797387973979740797417974279743797447974579746797477974879749797507975179752797537975479755797567975779758797597976079761797627976379764797657976679767797687976979770797717977279773797747977579776797777977879779797807978179782797837978479785797867978779788797897979079791797927979379794797957979679797797987979979800798017980279803798047980579806798077980879809798107981179812798137981479815798167981779818798197982079821798227982379824798257982679827798287982979830798317983279833798347983579836798377983879839798407984179842798437984479845798467984779848798497985079851798527985379854798557985679857798587985979860798617986279863798647986579866798677986879869798707987179872798737987479875798767987779878798797988079881798827988379884798857988679887798887988979890798917989279893798947989579896798977989879899799007990179902799037990479905799067990779908799097991079911799127991379914799157991679917799187991979920799217992279923799247992579926799277992879929799307993179932799337993479935799367993779938799397994079941799427994379944799457994679947799487994979950799517995279953799547995579956799577995879959799607996179962799637996479965799667996779968799697997079971799727997379974799757997679977799787997979980799817998279983799847998579986799877998879989799907999179992799937999479995799967999779998799998000080001800028000380004800058000680007800088000980010800118001280013800148001580016800178001880019800208002180022800238002480025800268002780028800298003080031800328003380034800358003680037800388003980040800418004280043800448004580046800478004880049800508005180052800538005480055800568005780058800598006080061800628006380064800658006680067800688006980070800718007280073800748007580076800778007880079800808008180082800838008480085800868008780088800898009080091800928009380094800958009680097800988009980100801018010280103801048010580106801078010880109801108011180112801138011480115801168011780118801198012080121801228012380124801258012680127801288012980130801318013280133801348013580136801378013880139801408014180142801438014480145801468014780148801498015080151801528015380154801558015680157801588015980160801618016280163801648016580166801678016880169801708017180172801738017480175801768017780178801798018080181801828018380184801858018680187801888018980190801918019280193801948019580196801978019880199802008020180202802038020480205802068020780208802098021080211802128021380214802158021680217802188021980220802218022280223802248022580226802278022880229802308023180232802338023480235802368023780238802398024080241802428024380244802458024680247802488024980250802518025280253802548025580256802578025880259802608026180262802638026480265802668026780268802698027080271802728027380274802758027680277802788027980280802818028280283802848028580286802878028880289802908029180292802938029480295802968029780298802998030080301803028030380304803058030680307803088030980310803118031280313803148031580316803178031880319803208032180322803238032480325803268032780328803298033080331803328033380334803358033680337803388033980340803418034280343803448034580346803478034880349803508035180352803538035480355803568035780358803598036080361803628036380364803658036680367803688036980370803718037280373803748037580376803778037880379803808038180382803838038480385803868038780388803898039080391803928039380394803958039680397803988039980400804018040280403804048040580406804078040880409804108041180412804138041480415804168041780418804198042080421804228042380424804258042680427804288042980430804318043280433804348043580436804378043880439804408044180442804438044480445804468044780448804498045080451804528045380454804558045680457804588045980460804618046280463804648046580466804678046880469804708047180472804738047480475804768047780478804798048080481804828048380484804858048680487804888048980490804918049280493804948049580496804978049880499805008050180502805038050480505805068050780508805098051080511805128051380514805158051680517805188051980520805218052280523805248052580526805278052880529805308053180532805338053480535805368053780538805398054080541805428054380544805458054680547805488054980550805518055280553805548055580556805578055880559805608056180562805638056480565805668056780568805698057080571805728057380574805758057680577805788057980580805818058280583805848058580586805878058880589805908059180592805938059480595805968059780598805998060080601806028060380604806058060680607806088060980610806118061280613806148061580616806178061880619806208062180622806238062480625806268062780628806298063080631806328063380634806358063680637806388063980640806418064280643806448064580646806478064880649806508065180652806538065480655806568065780658806598066080661806628066380664806658066680667806688066980670806718067280673806748067580676806778067880679806808068180682806838068480685806868068780688806898069080691806928069380694806958069680697806988069980700807018070280703807048070580706807078070880709807108071180712807138071480715807168071780718807198072080721807228072380724807258072680727807288072980730807318073280733807348073580736807378073880739807408074180742807438074480745807468074780748807498075080751807528075380754807558075680757807588075980760807618076280763807648076580766807678076880769807708077180772807738077480775807768077780778807798078080781807828078380784807858078680787807888078980790807918079280793807948079580796807978079880799808008080180802808038080480805808068080780808808098081080811808128081380814808158081680817808188081980820808218082280823808248082580826808278082880829808308083180832808338083480835808368083780838808398084080841808428084380844808458084680847808488084980850808518085280853808548085580856808578085880859808608086180862808638086480865808668086780868808698087080871808728087380874808758087680877808788087980880808818088280883808848088580886808878088880889808908089180892808938089480895808968089780898808998090080901809028090380904809058090680907809088090980910809118091280913809148091580916809178091880919809208092180922809238092480925809268092780928809298093080931809328093380934809358093680937809388093980940809418094280943809448094580946809478094880949809508095180952809538095480955809568095780958809598096080961809628096380964809658096680967809688096980970809718097280973809748097580976809778097880979809808098180982809838098480985809868098780988809898099080991809928099380994809958099680997809988099981000810018100281003810048100581006810078100881009810108101181012810138101481015810168101781018810198102081021810228102381024810258102681027810288102981030810318103281033810348103581036810378103881039810408104181042810438104481045810468104781048810498105081051810528105381054810558105681057810588105981060810618106281063810648106581066810678106881069810708107181072810738107481075810768107781078810798108081081810828108381084810858108681087810888108981090810918109281093810948109581096810978109881099811008110181102811038110481105811068110781108811098111081111811128111381114811158111681117811188111981120811218112281123811248112581126811278112881129811308113181132811338113481135811368113781138811398114081141811428114381144811458114681147811488114981150811518115281153811548115581156811578115881159811608116181162811638116481165811668116781168811698117081171811728117381174811758117681177811788117981180811818118281183811848118581186811878118881189811908119181192811938119481195811968119781198811998120081201812028120381204812058120681207812088120981210812118121281213812148121581216812178121881219812208122181222812238122481225812268122781228812298123081231812328123381234812358123681237812388123981240812418124281243812448124581246812478124881249812508125181252812538125481255812568125781258812598126081261812628126381264812658126681267812688126981270812718127281273812748127581276812778127881279812808128181282812838128481285812868128781288812898129081291812928129381294812958129681297812988129981300813018130281303813048130581306813078130881309813108131181312813138131481315813168131781318813198132081321813228132381324813258132681327813288132981330813318133281333813348133581336813378133881339813408134181342813438134481345813468134781348813498135081351813528135381354813558135681357813588135981360813618136281363813648136581366813678136881369813708137181372813738137481375813768137781378813798138081381813828138381384813858138681387813888138981390813918139281393813948139581396813978139881399814008140181402814038140481405814068140781408814098141081411814128141381414814158141681417814188141981420814218142281423814248142581426814278142881429814308143181432814338143481435814368143781438814398144081441814428144381444814458144681447814488144981450814518145281453814548145581456814578145881459814608146181462814638146481465814668146781468814698147081471814728147381474814758147681477814788147981480814818148281483814848148581486814878148881489814908149181492814938149481495814968149781498814998150081501815028150381504815058150681507815088150981510815118151281513815148151581516815178151881519815208152181522815238152481525815268152781528815298153081531815328153381534815358153681537815388153981540815418154281543815448154581546815478154881549815508155181552815538155481555815568155781558815598156081561815628156381564815658156681567815688156981570815718157281573815748157581576815778157881579815808158181582815838158481585815868158781588815898159081591815928159381594815958159681597815988159981600816018160281603816048160581606816078160881609816108161181612816138161481615816168161781618816198162081621816228162381624816258162681627816288162981630816318163281633816348163581636816378163881639816408164181642816438164481645816468164781648816498165081651816528165381654816558165681657816588165981660816618166281663816648166581666816678166881669816708167181672816738167481675816768167781678816798168081681816828168381684816858168681687816888168981690816918169281693816948169581696816978169881699817008170181702817038170481705817068170781708817098171081711817128171381714817158171681717817188171981720817218172281723817248172581726817278172881729817308173181732817338173481735817368173781738817398174081741817428174381744817458174681747817488174981750817518175281753817548175581756817578175881759817608176181762817638176481765817668176781768817698177081771817728177381774817758177681777817788177981780817818178281783817848178581786817878178881789817908179181792817938179481795817968179781798817998180081801818028180381804818058180681807818088180981810818118181281813818148181581816818178181881819818208182181822818238182481825818268182781828818298183081831818328183381834818358183681837818388183981840818418184281843818448184581846818478184881849818508185181852818538185481855818568185781858818598186081861818628186381864818658186681867818688186981870818718187281873818748187581876818778187881879818808188181882818838188481885818868188781888818898189081891818928189381894818958189681897818988189981900819018190281903819048190581906819078190881909819108191181912819138191481915819168191781918819198192081921819228192381924819258192681927819288192981930819318193281933819348193581936819378193881939819408194181942819438194481945819468194781948819498195081951819528195381954819558195681957819588195981960819618196281963819648196581966819678196881969819708197181972819738197481975819768197781978819798198081981819828198381984819858198681987819888198981990819918199281993819948199581996819978199881999820008200182002820038200482005820068200782008820098201082011820128201382014820158201682017820188201982020820218202282023820248202582026820278202882029820308203182032820338203482035820368203782038820398204082041820428204382044820458204682047820488204982050820518205282053820548205582056820578205882059820608206182062820638206482065820668206782068820698207082071820728207382074820758207682077820788207982080820818208282083820848208582086820878208882089820908209182092820938209482095820968209782098820998210082101821028210382104821058210682107821088210982110821118211282113821148211582116821178211882119821208212182122821238212482125821268212782128821298213082131821328213382134821358213682137821388213982140821418214282143821448214582146821478214882149821508215182152821538215482155821568215782158821598216082161821628216382164821658216682167821688216982170821718217282173821748217582176821778217882179821808218182182821838218482185821868218782188821898219082191821928219382194821958219682197821988219982200822018220282203822048220582206822078220882209822108221182212822138221482215822168221782218822198222082221822228222382224822258222682227822288222982230822318223282233822348223582236822378223882239822408224182242822438224482245822468224782248822498225082251822528225382254822558225682257822588225982260822618226282263822648226582266822678226882269822708227182272822738227482275822768227782278822798228082281822828228382284822858228682287822888228982290822918229282293822948229582296822978229882299823008230182302823038230482305823068230782308823098231082311823128231382314823158231682317823188231982320823218232282323823248232582326823278232882329823308233182332823338233482335823368233782338823398234082341823428234382344823458234682347823488234982350823518235282353823548235582356823578235882359823608236182362823638236482365823668236782368823698237082371823728237382374823758237682377823788237982380823818238282383823848238582386823878238882389823908239182392823938239482395823968239782398823998240082401824028240382404824058240682407824088240982410824118241282413824148241582416824178241882419824208242182422824238242482425824268242782428824298243082431824328243382434824358243682437824388243982440824418244282443824448244582446824478244882449824508245182452824538245482455824568245782458824598246082461824628246382464824658246682467824688246982470824718247282473824748247582476824778247882479824808248182482824838248482485824868248782488824898249082491824928249382494824958249682497824988249982500825018250282503825048250582506825078250882509825108251182512825138251482515825168251782518825198252082521825228252382524825258252682527825288252982530825318253282533825348253582536825378253882539825408254182542825438254482545825468254782548825498255082551825528255382554825558255682557825588255982560825618256282563825648256582566825678256882569825708257182572825738257482575825768257782578825798258082581825828258382584825858258682587825888258982590825918259282593825948259582596825978259882599826008260182602826038260482605826068260782608826098261082611826128261382614826158261682617826188261982620826218262282623826248262582626826278262882629826308263182632826338263482635826368263782638826398264082641826428264382644826458264682647826488264982650826518265282653826548265582656826578265882659826608266182662826638266482665826668266782668826698267082671826728267382674826758267682677826788267982680826818268282683826848268582686826878268882689826908269182692826938269482695826968269782698826998270082701827028270382704827058270682707827088270982710827118271282713827148271582716827178271882719827208272182722827238272482725827268272782728827298273082731827328273382734827358273682737827388273982740827418274282743827448274582746827478274882749827508275182752827538275482755827568275782758827598276082761827628276382764827658276682767827688276982770827718277282773827748277582776827778277882779827808278182782827838278482785827868278782788827898279082791827928279382794827958279682797827988279982800828018280282803828048280582806828078280882809828108281182812828138281482815828168281782818828198282082821828228282382824828258282682827828288282982830828318283282833828348283582836828378283882839828408284182842828438284482845828468284782848828498285082851828528285382854828558285682857828588285982860828618286282863828648286582866828678286882869828708287182872828738287482875828768287782878828798288082881828828288382884828858288682887828888288982890828918289282893828948289582896828978289882899829008290182902829038290482905829068290782908829098291082911829128291382914829158291682917829188291982920829218292282923829248292582926829278292882929829308293182932829338293482935829368293782938829398294082941829428294382944829458294682947829488294982950829518295282953829548295582956829578295882959829608296182962829638296482965829668296782968829698297082971829728297382974829758297682977829788297982980829818298282983829848298582986829878298882989829908299182992829938299482995829968299782998829998300083001830028300383004830058300683007830088300983010830118301283013830148301583016830178301883019830208302183022830238302483025830268302783028830298303083031830328303383034830358303683037830388303983040830418304283043830448304583046830478304883049830508305183052830538305483055830568305783058830598306083061830628306383064830658306683067830688306983070830718307283073830748307583076830778307883079830808308183082830838308483085830868308783088830898309083091830928309383094830958309683097830988309983100831018310283103831048310583106831078310883109831108311183112831138311483115831168311783118831198312083121831228312383124831258312683127831288312983130831318313283133831348313583136831378313883139831408314183142831438314483145831468314783148831498315083151831528315383154831558315683157831588315983160831618316283163831648316583166831678316883169831708317183172831738317483175831768317783178831798318083181831828318383184831858318683187831888318983190831918319283193831948319583196831978319883199832008320183202832038320483205832068320783208832098321083211832128321383214832158321683217832188321983220832218322283223832248322583226832278322883229832308323183232832338323483235832368323783238832398324083241832428324383244832458324683247832488324983250832518325283253832548325583256832578325883259832608326183262832638326483265832668326783268832698327083271832728327383274832758327683277832788327983280832818328283283832848328583286832878328883289832908329183292832938329483295832968329783298832998330083301833028330383304833058330683307833088330983310833118331283313833148331583316833178331883319833208332183322833238332483325833268332783328833298333083331833328333383334833358333683337833388333983340833418334283343833448334583346833478334883349833508335183352833538335483355833568335783358833598336083361833628336383364833658336683367833688336983370833718337283373833748337583376833778337883379833808338183382833838338483385833868338783388833898339083391833928339383394833958339683397833988339983400834018340283403834048340583406834078340883409834108341183412834138341483415834168341783418834198342083421834228342383424834258342683427834288342983430834318343283433834348343583436834378343883439834408344183442834438344483445834468344783448834498345083451834528345383454834558345683457834588345983460834618346283463834648346583466834678346883469834708347183472834738347483475834768347783478834798348083481834828348383484834858348683487834888348983490834918349283493834948349583496834978349883499835008350183502835038350483505835068350783508835098351083511835128351383514835158351683517835188351983520835218352283523835248352583526835278352883529835308353183532835338353483535835368353783538835398354083541835428354383544835458354683547835488354983550835518355283553835548355583556835578355883559835608356183562835638356483565835668356783568835698357083571835728357383574835758357683577835788357983580835818358283583835848358583586835878358883589835908359183592835938359483595835968359783598835998360083601836028360383604836058360683607836088360983610836118361283613836148361583616836178361883619836208362183622836238362483625836268362783628836298363083631836328363383634836358363683637836388363983640836418364283643836448364583646836478364883649836508365183652836538365483655836568365783658836598366083661836628366383664836658366683667836688366983670836718367283673836748367583676836778367883679836808368183682836838368483685836868368783688836898369083691836928369383694836958369683697836988369983700837018370283703837048370583706837078370883709837108371183712837138371483715837168371783718837198372083721837228372383724837258372683727837288372983730837318373283733837348373583736837378373883739837408374183742837438374483745837468374783748837498375083751837528375383754837558375683757837588375983760837618376283763837648376583766837678376883769837708377183772837738377483775837768377783778837798378083781837828378383784837858378683787837888378983790837918379283793837948379583796837978379883799838008380183802838038380483805838068380783808838098381083811838128381383814838158381683817838188381983820838218382283823838248382583826838278382883829838308383183832838338383483835838368383783838838398384083841838428384383844838458384683847838488384983850838518385283853838548385583856838578385883859838608386183862838638386483865838668386783868838698387083871838728387383874838758387683877838788387983880838818388283883838848388583886838878388883889838908389183892838938389483895838968389783898838998390083901839028390383904839058390683907839088390983910839118391283913839148391583916839178391883919839208392183922839238392483925839268392783928839298393083931839328393383934839358393683937839388393983940839418394283943839448394583946839478394883949839508395183952839538395483955839568395783958839598396083961839628396383964839658396683967839688396983970839718397283973839748397583976839778397883979839808398183982839838398483985839868398783988839898399083991839928399383994839958399683997839988399984000840018400284003840048400584006840078400884009840108401184012840138401484015840168401784018840198402084021840228402384024840258402684027840288402984030840318403284033840348403584036840378403884039840408404184042840438404484045840468404784048840498405084051840528405384054840558405684057840588405984060840618406284063840648406584066840678406884069840708407184072840738407484075840768407784078840798408084081840828408384084840858408684087840888408984090840918409284093840948409584096840978409884099841008410184102841038410484105841068410784108841098411084111841128411384114841158411684117841188411984120841218412284123841248412584126841278412884129841308413184132841338413484135841368413784138841398414084141841428414384144841458414684147841488414984150841518415284153841548415584156841578415884159841608416184162841638416484165841668416784168841698417084171841728417384174841758417684177841788417984180841818418284183841848418584186841878418884189841908419184192841938419484195841968419784198841998420084201842028420384204842058420684207842088420984210842118421284213842148421584216842178421884219842208422184222842238422484225842268422784228842298423084231842328423384234842358423684237842388423984240842418424284243842448424584246842478424884249842508425184252842538425484255842568425784258842598426084261842628426384264842658426684267842688426984270842718427284273842748427584276842778427884279842808428184282842838428484285842868428784288842898429084291842928429384294842958429684297842988429984300843018430284303843048430584306843078430884309843108431184312843138431484315843168431784318843198432084321843228432384324843258432684327843288432984330843318433284333843348433584336843378433884339843408434184342843438434484345843468434784348843498435084351843528435384354843558435684357843588435984360843618436284363843648436584366843678436884369843708437184372843738437484375843768437784378843798438084381843828438384384843858438684387843888438984390843918439284393843948439584396843978439884399844008440184402844038440484405844068440784408844098441084411844128441384414844158441684417844188441984420844218442284423844248442584426844278442884429844308443184432844338443484435844368443784438844398444084441844428444384444844458444684447844488444984450844518445284453844548445584456844578445884459844608446184462844638446484465844668446784468844698447084471844728447384474844758447684477844788447984480844818448284483844848448584486844878448884489844908449184492844938449484495844968449784498844998450084501845028450384504845058450684507845088450984510845118451284513845148451584516845178451884519845208452184522845238452484525845268452784528845298453084531845328453384534845358453684537845388453984540845418454284543845448454584546845478454884549845508455184552845538455484555845568455784558845598456084561845628456384564845658456684567845688456984570845718457284573845748457584576845778457884579845808458184582845838458484585845868458784588845898459084591845928459384594845958459684597845988459984600846018460284603846048460584606846078460884609846108461184612846138461484615846168461784618846198462084621846228462384624846258462684627846288462984630846318463284633846348463584636846378463884639846408464184642846438464484645846468464784648846498465084651846528465384654846558465684657846588465984660846618466284663846648466584666846678466884669846708467184672846738467484675846768467784678846798468084681846828468384684846858468684687846888468984690846918469284693846948469584696846978469884699847008470184702847038470484705847068470784708847098471084711847128471384714847158471684717847188471984720847218472284723847248472584726847278472884729847308473184732847338473484735847368473784738847398474084741847428474384744847458474684747847488474984750847518475284753847548475584756847578475884759847608476184762847638476484765847668476784768847698477084771847728477384774847758477684777847788477984780847818478284783847848478584786847878478884789847908479184792847938479484795847968479784798847998480084801848028480384804848058480684807848088480984810848118481284813848148481584816848178481884819848208482184822848238482484825848268482784828848298483084831848328483384834848358483684837848388483984840848418484284843848448484584846848478484884849848508485184852848538485484855848568485784858848598486084861848628486384864848658486684867848688486984870848718487284873848748487584876848778487884879848808488184882848838488484885848868488784888848898489084891848928489384894848958489684897848988489984900849018490284903849048490584906849078490884909849108491184912849138491484915849168491784918849198492084921849228492384924849258492684927849288492984930849318493284933849348493584936849378493884939849408494184942849438494484945849468494784948849498495084951849528495384954849558495684957849588495984960849618496284963849648496584966849678496884969849708497184972849738497484975849768497784978849798498084981849828498384984849858498684987849888498984990849918499284993849948499584996849978499884999850008500185002850038500485005850068500785008850098501085011850128501385014850158501685017850188501985020850218502285023850248502585026850278502885029850308503185032850338503485035850368503785038850398504085041850428504385044850458504685047850488504985050850518505285053850548505585056850578505885059850608506185062850638506485065850668506785068850698507085071850728507385074850758507685077850788507985080850818508285083850848508585086850878508885089850908509185092850938509485095850968509785098850998510085101851028510385104851058510685107851088510985110851118511285113851148511585116851178511885119851208512185122851238512485125851268512785128851298513085131851328513385134851358513685137851388513985140851418514285143851448514585146851478514885149851508515185152851538515485155851568515785158851598516085161851628516385164851658516685167851688516985170851718517285173851748517585176851778517885179851808518185182851838518485185851868518785188851898519085191851928519385194851958519685197851988519985200852018520285203852048520585206852078520885209852108521185212852138521485215852168521785218852198522085221852228522385224852258522685227852288522985230852318523285233852348523585236852378523885239852408524185242852438524485245852468524785248852498525085251852528525385254852558525685257852588525985260852618526285263852648526585266852678526885269852708527185272852738527485275852768527785278852798528085281852828528385284852858528685287852888528985290852918529285293852948529585296852978529885299853008530185302853038530485305853068530785308853098531085311853128531385314853158531685317853188531985320853218532285323853248532585326853278532885329853308533185332853338533485335853368533785338853398534085341853428534385344853458534685347853488534985350853518535285353853548535585356853578535885359853608536185362853638536485365853668536785368853698537085371853728537385374853758537685377853788537985380853818538285383853848538585386853878538885389853908539185392853938539485395853968539785398853998540085401854028540385404854058540685407854088540985410854118541285413854148541585416854178541885419854208542185422854238542485425854268542785428854298543085431854328543385434854358543685437854388543985440854418544285443854448544585446854478544885449854508545185452854538545485455854568545785458854598546085461854628546385464854658546685467854688546985470854718547285473854748547585476854778547885479854808548185482854838548485485854868548785488854898549085491854928549385494854958549685497854988549985500855018550285503855048550585506855078550885509855108551185512855138551485515855168551785518855198552085521855228552385524855258552685527855288552985530855318553285533855348553585536855378553885539855408554185542855438554485545855468554785548855498555085551855528555385554855558555685557855588555985560855618556285563855648556585566855678556885569855708557185572855738557485575855768557785578855798558085581855828558385584855858558685587855888558985590855918559285593855948559585596855978559885599856008560185602856038560485605856068560785608856098561085611856128561385614856158561685617856188561985620856218562285623856248562585626856278562885629856308563185632856338563485635856368563785638856398564085641856428564385644856458564685647856488564985650856518565285653856548565585656856578565885659856608566185662856638566485665856668566785668856698567085671856728567385674856758567685677856788567985680856818568285683856848568585686856878568885689856908569185692856938569485695856968569785698856998570085701857028570385704857058570685707857088570985710857118571285713857148571585716857178571885719857208572185722857238572485725857268572785728857298573085731857328573385734857358573685737857388573985740857418574285743857448574585746857478574885749857508575185752857538575485755857568575785758857598576085761857628576385764857658576685767857688576985770857718577285773857748577585776857778577885779857808578185782857838578485785857868578785788857898579085791857928579385794857958579685797857988579985800858018580285803858048580585806858078580885809858108581185812858138581485815858168581785818858198582085821858228582385824858258582685827858288582985830858318583285833858348583585836858378583885839858408584185842858438584485845858468584785848858498585085851858528585385854858558585685857858588585985860858618586285863858648586585866858678586885869858708587185872858738587485875858768587785878858798588085881858828588385884858858588685887858888588985890858918589285893858948589585896858978589885899859008590185902859038590485905859068590785908859098591085911859128591385914859158591685917859188591985920859218592285923859248592585926859278592885929859308593185932859338593485935859368593785938859398594085941859428594385944859458594685947859488594985950859518595285953859548595585956859578595885959859608596185962859638596485965859668596785968859698597085971859728597385974859758597685977859788597985980859818598285983859848598585986859878598885989859908599185992859938599485995859968599785998859998600086001860028600386004860058600686007860088600986010860118601286013860148601586016860178601886019860208602186022860238602486025860268602786028860298603086031860328603386034860358603686037860388603986040860418604286043860448604586046860478604886049860508605186052860538605486055860568605786058860598606086061860628606386064860658606686067860688606986070860718607286073860748607586076860778607886079860808608186082860838608486085860868608786088860898609086091860928609386094860958609686097860988609986100861018610286103861048610586106861078610886109861108611186112861138611486115861168611786118861198612086121861228612386124861258612686127861288612986130861318613286133861348613586136861378613886139861408614186142861438614486145861468614786148861498615086151861528615386154861558615686157861588615986160861618616286163861648616586166861678616886169861708617186172861738617486175861768617786178861798618086181861828618386184861858618686187861888618986190861918619286193861948619586196861978619886199862008620186202862038620486205862068620786208862098621086211862128621386214862158621686217862188621986220862218622286223862248622586226862278622886229862308623186232862338623486235862368623786238862398624086241862428624386244862458624686247862488624986250862518625286253862548625586256862578625886259862608626186262862638626486265862668626786268862698627086271862728627386274862758627686277862788627986280862818628286283862848628586286862878628886289862908629186292862938629486295862968629786298862998630086301863028630386304863058630686307863088630986310863118631286313863148631586316863178631886319863208632186322863238632486325863268632786328863298633086331863328633386334863358633686337863388633986340863418634286343863448634586346863478634886349863508635186352863538635486355863568635786358863598636086361863628636386364863658636686367863688636986370863718637286373863748637586376863778637886379863808638186382863838638486385863868638786388863898639086391863928639386394863958639686397863988639986400864018640286403864048640586406864078640886409864108641186412864138641486415864168641786418864198642086421864228642386424864258642686427864288642986430864318643286433864348643586436864378643886439864408644186442864438644486445864468644786448864498645086451864528645386454864558645686457864588645986460864618646286463864648646586466864678646886469864708647186472864738647486475864768647786478864798648086481864828648386484864858648686487864888648986490864918649286493864948649586496864978649886499865008650186502865038650486505865068650786508865098651086511865128651386514865158651686517865188651986520865218652286523865248652586526865278652886529865308653186532865338653486535865368653786538865398654086541865428654386544865458654686547865488654986550865518655286553865548655586556865578655886559865608656186562865638656486565865668656786568865698657086571865728657386574865758657686577865788657986580865818658286583865848658586586865878658886589865908659186592865938659486595865968659786598865998660086601866028660386604866058660686607866088660986610866118661286613866148661586616866178661886619866208662186622866238662486625866268662786628866298663086631866328663386634866358663686637866388663986640866418664286643866448664586646866478664886649866508665186652866538665486655866568665786658866598666086661866628666386664866658666686667866688666986670866718667286673866748667586676866778667886679866808668186682866838668486685866868668786688866898669086691866928669386694866958669686697866988669986700867018670286703867048670586706867078670886709867108671186712867138671486715867168671786718867198672086721867228672386724867258672686727867288672986730867318673286733867348673586736867378673886739867408674186742867438674486745867468674786748867498675086751867528675386754867558675686757867588675986760867618676286763867648676586766867678676886769867708677186772867738677486775867768677786778867798678086781867828678386784867858678686787867888678986790867918679286793867948679586796867978679886799868008680186802868038680486805868068680786808868098681086811868128681386814868158681686817868188681986820868218682286823868248682586826868278682886829868308683186832868338683486835868368683786838868398684086841868428684386844868458684686847868488684986850868518685286853868548685586856868578685886859868608686186862868638686486865868668686786868868698687086871868728687386874868758687686877868788687986880868818688286883868848688586886868878688886889868908689186892868938689486895868968689786898868998690086901869028690386904869058690686907869088690986910869118691286913869148691586916869178691886919869208692186922869238692486925869268692786928869298693086931869328693386934869358693686937869388693986940869418694286943869448694586946869478694886949869508695186952869538695486955869568695786958869598696086961869628696386964869658696686967869688696986970869718697286973869748697586976869778697886979869808698186982869838698486985869868698786988869898699086991869928699386994869958699686997869988699987000870018700287003870048700587006870078700887009870108701187012870138701487015870168701787018870198702087021870228702387024870258702687027870288702987030870318703287033870348703587036870378703887039870408704187042870438704487045870468704787048870498705087051870528705387054870558705687057870588705987060870618706287063870648706587066870678706887069870708707187072870738707487075870768707787078870798708087081870828708387084870858708687087870888708987090870918709287093870948709587096870978709887099871008710187102871038710487105871068710787108871098711087111871128711387114871158711687117871188711987120871218712287123871248712587126871278712887129871308713187132871338713487135871368713787138871398714087141871428714387144871458714687147871488714987150871518715287153871548715587156871578715887159871608716187162871638716487165871668716787168871698717087171871728717387174871758717687177871788717987180871818718287183871848718587186871878718887189871908719187192871938719487195871968719787198871998720087201872028720387204872058720687207872088720987210872118721287213872148721587216872178721887219872208722187222872238722487225872268722787228872298723087231872328723387234872358723687237872388723987240872418724287243872448724587246872478724887249872508725187252872538725487255872568725787258872598726087261872628726387264872658726687267872688726987270872718727287273872748727587276872778727887279872808728187282872838728487285872868728787288872898729087291872928729387294872958729687297872988729987300873018730287303873048730587306873078730887309873108731187312873138731487315873168731787318873198732087321873228732387324873258732687327873288732987330873318733287333873348733587336873378733887339873408734187342873438734487345873468734787348873498735087351873528735387354873558735687357873588735987360873618736287363873648736587366873678736887369873708737187372873738737487375873768737787378873798738087381873828738387384873858738687387873888738987390873918739287393873948739587396873978739887399874008740187402874038740487405874068740787408874098741087411874128741387414874158741687417874188741987420874218742287423874248742587426874278742887429874308743187432874338743487435874368743787438874398744087441874428744387444874458744687447874488744987450874518745287453874548745587456874578745887459874608746187462874638746487465874668746787468874698747087471874728747387474874758747687477874788747987480874818748287483874848748587486874878748887489874908749187492874938749487495874968749787498874998750087501875028750387504875058750687507875088750987510875118751287513875148751587516875178751887519875208752187522875238752487525875268752787528875298753087531875328753387534875358753687537875388753987540875418754287543875448754587546875478754887549875508755187552875538755487555875568755787558875598756087561875628756387564875658756687567875688756987570875718757287573875748757587576875778757887579875808758187582875838758487585875868758787588875898759087591875928759387594875958759687597875988759987600876018760287603876048760587606876078760887609876108761187612876138761487615876168761787618876198762087621876228762387624876258762687627876288762987630876318763287633876348763587636876378763887639876408764187642876438764487645876468764787648876498765087651876528765387654876558765687657876588765987660876618766287663876648766587666876678766887669876708767187672876738767487675876768767787678876798768087681876828768387684876858768687687876888768987690876918769287693876948769587696876978769887699877008770187702877038770487705877068770787708877098771087711877128771387714877158771687717877188771987720877218772287723877248772587726877278772887729877308773187732877338773487735877368773787738877398774087741877428774387744877458774687747877488774987750877518775287753877548775587756877578775887759877608776187762877638776487765877668776787768877698777087771877728777387774877758777687777877788777987780877818778287783877848778587786877878778887789877908779187792877938779487795877968779787798877998780087801878028780387804878058780687807878088780987810878118781287813878148781587816878178781887819878208782187822878238782487825878268782787828878298783087831878328783387834878358783687837878388783987840878418784287843878448784587846878478784887849878508785187852878538785487855878568785787858878598786087861878628786387864878658786687867878688786987870878718787287873878748787587876878778787887879878808788187882878838788487885878868788787888878898789087891878928789387894878958789687897878988789987900879018790287903879048790587906879078790887909879108791187912879138791487915879168791787918879198792087921879228792387924879258792687927879288792987930879318793287933879348793587936879378793887939879408794187942879438794487945879468794787948879498795087951879528795387954879558795687957879588795987960879618796287963879648796587966879678796887969879708797187972879738797487975879768797787978879798798087981879828798387984879858798687987879888798987990879918799287993879948799587996879978799887999880008800188002880038800488005880068800788008880098801088011880128801388014880158801688017880188801988020880218802288023880248802588026880278802888029880308803188032880338803488035880368803788038880398804088041880428804388044880458804688047880488804988050880518805288053880548805588056880578805888059880608806188062880638806488065880668806788068880698807088071880728807388074880758807688077880788807988080880818808288083880848808588086880878808888089880908809188092880938809488095880968809788098880998810088101881028810388104881058810688107881088810988110881118811288113881148811588116881178811888119881208812188122881238812488125881268812788128881298813088131881328813388134881358813688137881388813988140881418814288143881448814588146881478814888149881508815188152881538815488155881568815788158881598816088161881628816388164881658816688167881688816988170881718817288173881748817588176881778817888179881808818188182881838818488185881868818788188881898819088191881928819388194881958819688197881988819988200882018820288203882048820588206882078820888209882108821188212882138821488215882168821788218882198822088221882228822388224882258822688227882288822988230882318823288233882348823588236882378823888239882408824188242882438824488245882468824788248882498825088251882528825388254882558825688257882588825988260882618826288263882648826588266882678826888269882708827188272882738827488275882768827788278882798828088281882828828388284882858828688287882888828988290882918829288293882948829588296882978829888299883008830188302883038830488305883068830788308883098831088311883128831388314883158831688317883188831988320883218832288323883248832588326883278832888329883308833188332883338833488335883368833788338883398834088341883428834388344883458834688347883488834988350883518835288353883548835588356883578835888359883608836188362883638836488365883668836788368883698837088371883728837388374883758837688377883788837988380883818838288383883848838588386883878838888389883908839188392883938839488395883968839788398883998840088401884028840388404884058840688407884088840988410884118841288413884148841588416884178841888419884208842188422884238842488425884268842788428884298843088431884328843388434884358843688437884388843988440884418844288443884448844588446884478844888449884508845188452884538845488455884568845788458884598846088461884628846388464884658846688467884688846988470884718847288473884748847588476884778847888479884808848188482884838848488485884868848788488884898849088491884928849388494884958849688497884988849988500885018850288503885048850588506885078850888509885108851188512885138851488515885168851788518885198852088521885228852388524885258852688527885288852988530885318853288533885348853588536885378853888539885408854188542885438854488545885468854788548885498855088551885528855388554885558855688557885588855988560885618856288563885648856588566885678856888569885708857188572885738857488575885768857788578885798858088581885828858388584885858858688587885888858988590885918859288593885948859588596885978859888599886008860188602886038860488605886068860788608886098861088611886128861388614886158861688617886188861988620886218862288623886248862588626886278862888629886308863188632886338863488635886368863788638886398864088641886428864388644886458864688647886488864988650886518865288653886548865588656886578865888659886608866188662886638866488665886668866788668886698867088671886728867388674886758867688677886788867988680886818868288683886848868588686886878868888689886908869188692886938869488695886968869788698886998870088701887028870388704887058870688707887088870988710887118871288713887148871588716887178871888719887208872188722887238872488725887268872788728887298873088731887328873388734887358873688737887388873988740887418874288743887448874588746887478874888749887508875188752887538875488755887568875788758887598876088761887628876388764887658876688767887688876988770887718877288773887748877588776887778877888779887808878188782887838878488785887868878788788887898879088791887928879388794887958879688797887988879988800888018880288803888048880588806888078880888809888108881188812888138881488815888168881788818888198882088821888228882388824888258882688827888288882988830888318883288833888348883588836888378883888839888408884188842888438884488845888468884788848888498885088851888528885388854888558885688857888588885988860888618886288863888648886588866888678886888869888708887188872888738887488875888768887788878888798888088881888828888388884888858888688887888888888988890888918889288893888948889588896888978889888899889008890188902889038890488905889068890788908889098891088911889128891388914889158891688917889188891988920889218892288923889248892588926889278892888929889308893188932889338893488935889368893788938889398894088941889428894388944889458894688947889488894988950889518895288953889548895588956889578895888959889608896188962889638896488965889668896788968889698897088971889728897388974889758897688977889788897988980889818898288983889848898588986889878898888989889908899188992889938899488995889968899788998889998900089001890028900389004890058900689007890088900989010890118901289013890148901589016890178901889019890208902189022890238902489025890268902789028890298903089031890328903389034890358903689037890388903989040890418904289043890448904589046890478904889049890508905189052890538905489055890568905789058890598906089061890628906389064890658906689067890688906989070890718907289073890748907589076890778907889079890808908189082890838908489085890868908789088890898909089091890928909389094890958909689097890988909989100891018910289103891048910589106891078910889109891108911189112891138911489115891168911789118891198912089121891228912389124891258912689127891288912989130891318913289133891348913589136891378913889139891408914189142891438914489145891468914789148891498915089151891528915389154891558915689157891588915989160891618916289163891648916589166891678916889169891708917189172891738917489175891768917789178891798918089181891828918389184891858918689187891888918989190891918919289193891948919589196891978919889199892008920189202892038920489205892068920789208892098921089211892128921389214892158921689217892188921989220892218922289223892248922589226892278922889229892308923189232892338923489235892368923789238892398924089241892428924389244892458924689247892488924989250892518925289253892548925589256892578925889259892608926189262892638926489265892668926789268892698927089271892728927389274892758927689277892788927989280892818928289283892848928589286892878928889289892908929189292892938929489295892968929789298892998930089301893028930389304893058930689307893088930989310893118931289313893148931589316893178931889319893208932189322893238932489325893268932789328893298933089331893328933389334893358933689337893388933989340893418934289343893448934589346893478934889349893508935189352893538935489355893568935789358893598936089361893628936389364893658936689367893688936989370893718937289373893748937589376893778937889379893808938189382893838938489385893868938789388893898939089391893928939389394893958939689397893988939989400894018940289403894048940589406894078940889409894108941189412894138941489415894168941789418894198942089421894228942389424894258942689427894288942989430894318943289433894348943589436894378943889439894408944189442894438944489445894468944789448894498945089451894528945389454894558945689457894588945989460894618946289463894648946589466894678946889469894708947189472894738947489475894768947789478894798948089481894828948389484894858948689487894888948989490894918949289493894948949589496894978949889499895008950189502895038950489505895068950789508895098951089511895128951389514895158951689517895188951989520895218952289523895248952589526895278952889529895308953189532895338953489535895368953789538895398954089541895428954389544895458954689547895488954989550895518955289553895548955589556895578955889559895608956189562895638956489565895668956789568895698957089571895728957389574895758957689577895788957989580895818958289583895848958589586895878958889589895908959189592895938959489595895968959789598895998960089601896028960389604896058960689607896088960989610896118961289613896148961589616896178961889619896208962189622896238962489625896268962789628896298963089631896328963389634896358963689637896388963989640896418964289643896448964589646896478964889649896508965189652896538965489655896568965789658896598966089661896628966389664896658966689667896688966989670896718967289673896748967589676896778967889679896808968189682896838968489685896868968789688896898969089691896928969389694896958969689697896988969989700897018970289703897048970589706897078970889709897108971189712897138971489715897168971789718897198972089721897228972389724897258972689727897288972989730897318973289733897348973589736897378973889739897408974189742897438974489745897468974789748897498975089751897528975389754897558975689757897588975989760897618976289763897648976589766897678976889769897708977189772897738977489775897768977789778897798978089781897828978389784897858978689787897888978989790897918979289793897948979589796897978979889799898008980189802898038980489805898068980789808898098981089811898128981389814898158981689817898188981989820898218982289823898248982589826898278982889829898308983189832898338983489835898368983789838898398984089841898428984389844898458984689847898488984989850898518985289853898548985589856898578985889859898608986189862898638986489865898668986789868898698987089871898728987389874898758987689877898788987989880898818988289883898848988589886898878988889889898908989189892898938989489895898968989789898898998990089901899028990389904899058990689907899088990989910899118991289913899148991589916899178991889919899208992189922899238992489925899268992789928899298993089931899328993389934899358993689937899388993989940899418994289943899448994589946899478994889949899508995189952899538995489955899568995789958899598996089961899628996389964899658996689967899688996989970899718997289973899748997589976899778997889979899808998189982899838998489985899868998789988899898999089991899928999389994899958999689997899988999990000900019000290003900049000590006900079000890009900109001190012900139001490015900169001790018900199002090021900229002390024900259002690027900289002990030900319003290033900349003590036900379003890039900409004190042900439004490045900469004790048900499005090051900529005390054900559005690057900589005990060900619006290063900649006590066900679006890069900709007190072900739007490075900769007790078900799008090081900829008390084900859008690087900889008990090900919009290093900949009590096900979009890099901009010190102901039010490105901069010790108901099011090111901129011390114901159011690117901189011990120901219012290123901249012590126901279012890129901309013190132901339013490135901369013790138901399014090141901429014390144901459014690147901489014990150901519015290153901549015590156901579015890159901609016190162901639016490165901669016790168901699017090171901729017390174901759017690177901789017990180901819018290183901849018590186901879018890189901909019190192901939019490195901969019790198901999020090201902029020390204902059020690207902089020990210902119021290213902149021590216902179021890219902209022190222902239022490225902269022790228902299023090231902329023390234902359023690237902389023990240902419024290243902449024590246902479024890249902509025190252902539025490255902569025790258902599026090261902629026390264902659026690267902689026990270902719027290273902749027590276902779027890279902809028190282902839028490285902869028790288902899029090291902929029390294902959029690297902989029990300903019030290303903049030590306903079030890309903109031190312903139031490315903169031790318903199032090321903229032390324903259032690327903289032990330903319033290333903349033590336903379033890339903409034190342903439034490345903469034790348903499035090351903529035390354903559035690357903589035990360903619036290363903649036590366903679036890369903709037190372903739037490375903769037790378903799038090381903829038390384903859038690387903889038990390903919039290393903949039590396903979039890399904009040190402904039040490405904069040790408904099041090411904129041390414904159041690417904189041990420904219042290423904249042590426904279042890429904309043190432904339043490435904369043790438904399044090441904429044390444904459044690447904489044990450904519045290453904549045590456904579045890459904609046190462904639046490465904669046790468904699047090471904729047390474904759047690477904789047990480904819048290483904849048590486904879048890489904909049190492904939049490495904969049790498904999050090501905029050390504905059050690507905089050990510905119051290513905149051590516905179051890519905209052190522905239052490525905269052790528905299053090531905329053390534905359053690537905389053990540905419054290543905449054590546905479054890549905509055190552905539055490555905569055790558905599056090561905629056390564905659056690567905689056990570905719057290573905749057590576905779057890579905809058190582905839058490585905869058790588905899059090591905929059390594905959059690597905989059990600906019060290603906049060590606906079060890609906109061190612906139061490615906169061790618906199062090621906229062390624906259062690627906289062990630906319063290633906349063590636906379063890639906409064190642906439064490645906469064790648906499065090651906529065390654906559065690657906589065990660906619066290663906649066590666906679066890669906709067190672906739067490675906769067790678906799068090681906829068390684906859068690687906889068990690906919069290693906949069590696906979069890699907009070190702907039070490705907069070790708907099071090711907129071390714907159071690717907189071990720907219072290723907249072590726907279072890729907309073190732907339073490735907369073790738907399074090741907429074390744907459074690747907489074990750907519075290753907549075590756907579075890759907609076190762907639076490765907669076790768907699077090771907729077390774907759077690777907789077990780907819078290783907849078590786907879078890789907909079190792907939079490795907969079790798907999080090801908029080390804908059080690807908089080990810908119081290813908149081590816908179081890819908209082190822908239082490825908269082790828908299083090831908329083390834908359083690837908389083990840908419084290843908449084590846908479084890849908509085190852908539085490855908569085790858908599086090861908629086390864908659086690867908689086990870908719087290873908749087590876908779087890879908809088190882908839088490885908869088790888908899089090891908929089390894908959089690897908989089990900909019090290903909049090590906909079090890909909109091190912909139091490915909169091790918909199092090921909229092390924909259092690927909289092990930909319093290933909349093590936909379093890939909409094190942909439094490945909469094790948909499095090951909529095390954909559095690957909589095990960909619096290963909649096590966909679096890969909709097190972909739097490975909769097790978909799098090981909829098390984909859098690987909889098990990909919099290993909949099590996909979099890999910009100191002910039100491005910069100791008910099101091011910129101391014910159101691017910189101991020910219102291023910249102591026910279102891029910309103191032910339103491035910369103791038910399104091041910429104391044910459104691047910489104991050910519105291053910549105591056910579105891059910609106191062910639106491065910669106791068910699107091071910729107391074910759107691077910789107991080910819108291083910849108591086910879108891089910909109191092910939109491095910969109791098910999110091101911029110391104911059110691107911089110991110911119111291113911149111591116911179111891119911209112191122911239112491125911269112791128911299113091131911329113391134911359113691137911389113991140911419114291143911449114591146911479114891149911509115191152911539115491155911569115791158911599116091161911629116391164911659116691167911689116991170911719117291173911749117591176911779117891179911809118191182911839118491185911869118791188911899119091191911929119391194911959119691197911989119991200912019120291203912049120591206912079120891209912109121191212912139121491215912169121791218912199122091221912229122391224912259122691227912289122991230912319123291233912349123591236912379123891239912409124191242912439124491245912469124791248912499125091251912529125391254912559125691257912589125991260912619126291263912649126591266912679126891269912709127191272912739127491275912769127791278912799128091281912829128391284912859128691287912889128991290912919129291293912949129591296912979129891299913009130191302913039130491305913069130791308913099131091311913129131391314913159131691317913189131991320913219132291323913249132591326913279132891329913309133191332913339133491335913369133791338913399134091341913429134391344913459134691347913489134991350913519135291353913549135591356913579135891359913609136191362913639136491365913669136791368913699137091371913729137391374913759137691377913789137991380913819138291383913849138591386913879138891389913909139191392913939139491395913969139791398913999140091401914029140391404914059140691407914089140991410914119141291413914149141591416914179141891419914209142191422914239142491425914269142791428914299143091431914329143391434914359143691437914389143991440914419144291443914449144591446914479144891449914509145191452914539145491455914569145791458914599146091461914629146391464914659146691467914689146991470914719147291473914749147591476914779147891479914809148191482914839148491485914869148791488914899149091491914929149391494914959149691497914989149991500915019150291503915049150591506915079150891509915109151191512915139151491515915169151791518915199152091521915229152391524915259152691527915289152991530915319153291533915349153591536915379153891539915409154191542915439154491545915469154791548915499155091551915529155391554915559155691557915589155991560915619156291563915649156591566915679156891569915709157191572915739157491575915769157791578915799158091581915829158391584915859158691587915889158991590915919159291593915949159591596915979159891599916009160191602916039160491605916069160791608916099161091611916129161391614916159161691617916189161991620916219162291623916249162591626916279162891629916309163191632916339163491635916369163791638916399164091641916429164391644916459164691647916489164991650916519165291653916549165591656916579165891659916609166191662916639166491665916669166791668916699167091671916729167391674916759167691677916789167991680916819168291683916849168591686916879168891689916909169191692916939169491695916969169791698916999170091701917029170391704917059170691707917089170991710917119171291713917149171591716917179171891719917209172191722917239172491725917269172791728917299173091731917329173391734917359173691737917389173991740917419174291743917449174591746917479174891749917509175191752917539175491755917569175791758917599176091761917629176391764917659176691767917689176991770917719177291773917749177591776917779177891779917809178191782917839178491785917869178791788917899179091791917929179391794917959179691797917989179991800918019180291803918049180591806918079180891809918109181191812918139181491815918169181791818918199182091821918229182391824918259182691827918289182991830918319183291833918349183591836918379183891839918409184191842918439184491845918469184791848918499185091851918529185391854918559185691857918589185991860918619186291863918649186591866918679186891869918709187191872918739187491875918769187791878918799188091881918829188391884918859188691887918889188991890918919189291893918949189591896918979189891899919009190191902919039190491905919069190791908919099191091911919129191391914919159191691917919189191991920919219192291923919249192591926919279192891929919309193191932919339193491935919369193791938919399194091941919429194391944919459194691947919489194991950919519195291953919549195591956919579195891959919609196191962919639196491965919669196791968919699197091971919729197391974919759197691977919789197991980919819198291983919849198591986919879198891989919909199191992919939199491995919969199791998919999200092001920029200392004920059200692007920089200992010920119201292013920149201592016920179201892019920209202192022920239202492025920269202792028920299203092031920329203392034920359203692037920389203992040920419204292043920449204592046920479204892049920509205192052920539205492055920569205792058920599206092061920629206392064920659206692067920689206992070920719207292073920749207592076920779207892079920809208192082920839208492085920869208792088920899209092091920929209392094920959209692097920989209992100921019210292103921049210592106921079210892109921109211192112921139211492115921169211792118921199212092121921229212392124921259212692127921289212992130921319213292133921349213592136921379213892139921409214192142921439214492145921469214792148921499215092151921529215392154921559215692157921589215992160921619216292163921649216592166921679216892169921709217192172921739217492175921769217792178921799218092181921829218392184921859218692187921889218992190921919219292193921949219592196921979219892199922009220192202922039220492205922069220792208922099221092211922129221392214922159221692217922189221992220922219222292223922249222592226922279222892229922309223192232922339223492235922369223792238922399224092241922429224392244922459224692247922489224992250922519225292253922549225592256922579225892259922609226192262922639226492265922669226792268922699227092271922729227392274922759227692277922789227992280922819228292283922849228592286922879228892289922909229192292922939229492295922969229792298922999230092301923029230392304923059230692307923089230992310923119231292313923149231592316923179231892319923209232192322923239232492325923269232792328923299233092331923329233392334923359233692337923389233992340923419234292343923449234592346923479234892349923509235192352923539235492355923569235792358923599236092361923629236392364923659236692367923689236992370923719237292373923749237592376923779237892379923809238192382923839238492385923869238792388923899239092391923929239392394923959239692397923989239992400924019240292403924049240592406924079240892409924109241192412924139241492415924169241792418924199242092421924229242392424924259242692427924289242992430924319243292433924349243592436924379243892439924409244192442924439244492445924469244792448924499245092451924529245392454924559245692457924589245992460924619246292463924649246592466924679246892469924709247192472924739247492475924769247792478924799248092481924829248392484924859248692487924889248992490924919249292493924949249592496924979249892499925009250192502925039250492505925069250792508925099251092511925129251392514925159251692517925189251992520925219252292523925249252592526925279252892529925309253192532925339253492535925369253792538925399254092541925429254392544925459254692547925489254992550925519255292553925549255592556925579255892559925609256192562925639256492565925669256792568925699257092571925729257392574925759257692577925789257992580925819258292583925849258592586925879258892589925909259192592925939259492595925969259792598925999260092601926029260392604926059260692607926089260992610926119261292613926149261592616926179261892619926209262192622926239262492625926269262792628926299263092631926329263392634926359263692637926389263992640926419264292643926449264592646926479264892649926509265192652926539265492655926569265792658926599266092661926629266392664926659266692667926689266992670926719267292673926749267592676926779267892679926809268192682926839268492685926869268792688926899269092691926929269392694926959269692697926989269992700927019270292703927049270592706927079270892709927109271192712927139271492715927169271792718927199272092721927229272392724927259272692727927289272992730927319273292733927349273592736927379273892739927409274192742927439274492745927469274792748927499275092751927529275392754927559275692757927589275992760927619276292763927649276592766927679276892769927709277192772927739277492775927769277792778927799278092781927829278392784927859278692787927889278992790927919279292793927949279592796927979279892799928009280192802928039280492805928069280792808928099281092811928129281392814928159281692817928189281992820928219282292823928249282592826928279282892829928309283192832928339283492835928369283792838928399284092841928429284392844928459284692847928489284992850928519285292853928549285592856928579285892859928609286192862928639286492865928669286792868928699287092871928729287392874928759287692877928789287992880928819288292883928849288592886928879288892889928909289192892928939289492895928969289792898928999290092901929029290392904929059290692907929089290992910929119291292913929149291592916929179291892919929209292192922929239292492925929269292792928929299293092931929329293392934929359293692937929389293992940929419294292943929449294592946929479294892949929509295192952929539295492955929569295792958929599296092961929629296392964929659296692967929689296992970929719297292973929749297592976929779297892979929809298192982929839298492985929869298792988929899299092991929929299392994929959299692997929989299993000930019300293003930049300593006930079300893009930109301193012930139301493015930169301793018930199302093021930229302393024930259302693027930289302993030930319303293033930349303593036930379303893039930409304193042930439304493045930469304793048930499305093051930529305393054930559305693057930589305993060930619306293063930649306593066930679306893069930709307193072930739307493075930769307793078930799308093081930829308393084930859308693087930889308993090930919309293093930949309593096930979309893099931009310193102931039310493105931069310793108931099311093111931129311393114931159311693117931189311993120931219312293123931249312593126931279312893129931309313193132931339313493135931369313793138931399314093141931429314393144931459314693147931489314993150931519315293153931549315593156931579315893159931609316193162931639316493165931669316793168931699317093171931729317393174931759317693177931789317993180931819318293183931849318593186931879318893189931909319193192931939319493195931969319793198931999320093201932029320393204932059320693207932089320993210932119321293213932149321593216932179321893219932209322193222932239322493225932269322793228932299323093231932329323393234932359323693237932389323993240932419324293243932449324593246932479324893249932509325193252932539325493255932569325793258932599326093261932629326393264932659326693267932689326993270932719327293273932749327593276932779327893279932809328193282932839328493285932869328793288932899329093291932929329393294932959329693297932989329993300933019330293303933049330593306933079330893309933109331193312933139331493315933169331793318933199332093321933229332393324933259332693327933289332993330933319333293333933349333593336933379333893339933409334193342933439334493345933469334793348933499335093351933529335393354933559335693357933589335993360933619336293363933649336593366933679336893369933709337193372933739337493375933769337793378933799338093381933829338393384933859338693387933889338993390933919339293393933949339593396933979339893399934009340193402934039340493405934069340793408934099341093411934129341393414934159341693417934189341993420934219342293423934249342593426934279342893429934309343193432934339343493435934369343793438934399344093441934429344393444934459344693447934489344993450934519345293453934549345593456934579345893459934609346193462934639346493465934669346793468934699347093471934729347393474934759347693477934789347993480934819348293483934849348593486934879348893489934909349193492934939349493495934969349793498934999350093501935029350393504935059350693507935089350993510935119351293513935149351593516935179351893519935209352193522935239352493525935269352793528935299353093531935329353393534935359353693537935389353993540935419354293543935449354593546935479354893549935509355193552935539355493555935569355793558935599356093561935629356393564935659356693567935689356993570935719357293573935749357593576935779357893579935809358193582935839358493585935869358793588935899359093591935929359393594935959359693597935989359993600936019360293603936049360593606936079360893609936109361193612936139361493615936169361793618936199362093621936229362393624936259362693627936289362993630936319363293633936349363593636936379363893639936409364193642936439364493645936469364793648936499365093651936529365393654936559365693657936589365993660936619366293663936649366593666936679366893669936709367193672936739367493675936769367793678936799368093681936829368393684936859368693687936889368993690936919369293693936949369593696936979369893699937009370193702937039370493705937069370793708937099371093711937129371393714937159371693717937189371993720937219372293723937249372593726937279372893729937309373193732937339373493735937369373793738937399374093741937429374393744937459374693747937489374993750937519375293753937549375593756937579375893759937609376193762937639376493765937669376793768937699377093771937729377393774937759377693777937789377993780937819378293783937849378593786937879378893789937909379193792937939379493795937969379793798937999380093801938029380393804938059380693807938089380993810938119381293813938149381593816938179381893819938209382193822938239382493825938269382793828938299383093831938329383393834938359383693837938389383993840938419384293843938449384593846938479384893849938509385193852938539385493855938569385793858938599386093861938629386393864938659386693867938689386993870938719387293873938749387593876938779387893879938809388193882938839388493885938869388793888938899389093891938929389393894938959389693897938989389993900939019390293903939049390593906939079390893909939109391193912939139391493915939169391793918939199392093921939229392393924939259392693927939289392993930939319393293933939349393593936939379393893939939409394193942939439394493945939469394793948939499395093951939529395393954939559395693957939589395993960939619396293963939649396593966939679396893969939709397193972939739397493975939769397793978939799398093981939829398393984939859398693987939889398993990939919399293993939949399593996939979399893999940009400194002940039400494005940069400794008940099401094011940129401394014940159401694017940189401994020940219402294023940249402594026940279402894029940309403194032940339403494035940369403794038940399404094041940429404394044940459404694047940489404994050940519405294053940549405594056940579405894059940609406194062940639406494065940669406794068940699407094071940729407394074940759407694077940789407994080940819408294083940849408594086940879408894089940909409194092940939409494095940969409794098940999410094101941029410394104941059410694107941089410994110941119411294113941149411594116941179411894119941209412194122941239412494125941269412794128941299413094131941329413394134941359413694137941389413994140941419414294143941449414594146941479414894149941509415194152941539415494155941569415794158941599416094161941629416394164941659416694167941689416994170941719417294173941749417594176941779417894179941809418194182941839418494185941869418794188941899419094191941929419394194941959419694197941989419994200942019420294203942049420594206942079420894209942109421194212942139421494215942169421794218942199422094221942229422394224942259422694227942289422994230942319423294233942349423594236942379423894239942409424194242942439424494245942469424794248942499425094251942529425394254942559425694257942589425994260942619426294263942649426594266942679426894269942709427194272942739427494275942769427794278942799428094281942829428394284942859428694287942889428994290942919429294293942949429594296942979429894299943009430194302943039430494305943069430794308943099431094311943129431394314943159431694317943189431994320943219432294323943249432594326943279432894329943309433194332943339433494335943369433794338943399434094341943429434394344943459434694347943489434994350943519435294353943549435594356943579435894359943609436194362943639436494365943669436794368943699437094371943729437394374943759437694377943789437994380943819438294383943849438594386943879438894389943909439194392943939439494395943969439794398943999440094401944029440394404944059440694407944089440994410944119441294413944149441594416944179441894419944209442194422944239442494425944269442794428944299443094431944329443394434944359443694437944389443994440944419444294443944449444594446944479444894449944509445194452944539445494455944569445794458944599446094461944629446394464944659446694467944689446994470944719447294473944749447594476944779447894479944809448194482944839448494485944869448794488944899449094491944929449394494944959449694497944989449994500945019450294503945049450594506945079450894509945109451194512945139451494515945169451794518945199452094521945229452394524945259452694527945289452994530945319453294533945349453594536945379453894539945409454194542945439454494545945469454794548945499455094551945529455394554945559455694557945589455994560945619456294563945649456594566945679456894569945709457194572945739457494575945769457794578945799458094581945829458394584945859458694587945889458994590945919459294593945949459594596945979459894599946009460194602946039460494605946069460794608946099461094611946129461394614946159461694617946189461994620946219462294623946249462594626946279462894629946309463194632946339463494635946369463794638946399464094641946429464394644946459464694647946489464994650946519465294653946549465594656946579465894659946609466194662946639466494665946669466794668946699467094671946729467394674946759467694677946789467994680946819468294683946849468594686946879468894689946909469194692946939469494695946969469794698946999470094701947029470394704947059470694707947089470994710947119471294713947149471594716947179471894719947209472194722947239472494725947269472794728947299473094731947329473394734947359473694737947389473994740947419474294743947449474594746947479474894749947509475194752947539475494755947569475794758947599476094761947629476394764947659476694767947689476994770947719477294773947749477594776947779477894779947809478194782947839478494785947869478794788947899479094791947929479394794947959479694797947989479994800948019480294803948049480594806948079480894809948109481194812948139481494815948169481794818948199482094821948229482394824948259482694827948289482994830948319483294833948349483594836948379483894839948409484194842948439484494845948469484794848948499485094851948529485394854948559485694857948589485994860948619486294863948649486594866948679486894869948709487194872948739487494875948769487794878948799488094881948829488394884948859488694887948889488994890948919489294893948949489594896948979489894899949009490194902949039490494905949069490794908949099491094911949129491394914949159491694917949189491994920949219492294923949249492594926949279492894929949309493194932949339493494935949369493794938949399494094941949429494394944949459494694947949489494994950949519495294953949549495594956949579495894959949609496194962949639496494965949669496794968949699497094971949729497394974949759497694977949789497994980949819498294983949849498594986949879498894989949909499194992949939499494995949969499794998949999500095001950029500395004950059500695007950089500995010950119501295013950149501595016950179501895019950209502195022950239502495025950269502795028950299503095031950329503395034950359503695037950389503995040950419504295043950449504595046950479504895049950509505195052950539505495055950569505795058950599506095061950629506395064950659506695067950689506995070950719507295073950749507595076950779507895079950809508195082950839508495085950869508795088950899509095091950929509395094950959509695097950989509995100951019510295103951049510595106951079510895109951109511195112951139511495115951169511795118951199512095121951229512395124951259512695127951289512995130951319513295133951349513595136951379513895139951409514195142951439514495145951469514795148951499515095151951529515395154951559515695157951589515995160951619516295163951649516595166951679516895169951709517195172951739517495175951769517795178951799518095181951829518395184951859518695187951889518995190951919519295193951949519595196951979519895199952009520195202952039520495205952069520795208952099521095211952129521395214952159521695217952189521995220952219522295223952249522595226952279522895229952309523195232952339523495235952369523795238952399524095241952429524395244952459524695247952489524995250952519525295253952549525595256952579525895259952609526195262952639526495265952669526795268952699527095271952729527395274952759527695277952789527995280952819528295283952849528595286952879528895289952909529195292952939529495295952969529795298952999530095301953029530395304953059530695307953089530995310953119531295313953149531595316953179531895319953209532195322953239532495325953269532795328953299533095331953329533395334953359533695337953389533995340953419534295343953449534595346953479534895349953509535195352953539535495355953569535795358953599536095361953629536395364953659536695367953689536995370953719537295373953749537595376953779537895379953809538195382953839538495385953869538795388953899539095391953929539395394953959539695397953989539995400954019540295403954049540595406954079540895409954109541195412954139541495415954169541795418954199542095421954229542395424954259542695427954289542995430954319543295433954349543595436954379543895439954409544195442954439544495445954469544795448954499545095451954529545395454954559545695457954589545995460954619546295463954649546595466954679546895469954709547195472954739547495475954769547795478954799548095481954829548395484954859548695487954889548995490954919549295493954949549595496954979549895499955009550195502955039550495505955069550795508955099551095511955129551395514955159551695517955189551995520955219552295523955249552595526955279552895529955309553195532955339553495535955369553795538955399554095541955429554395544955459554695547955489554995550955519555295553955549555595556955579555895559955609556195562955639556495565955669556795568955699557095571955729557395574955759557695577955789557995580955819558295583955849558595586955879558895589955909559195592955939559495595955969559795598955999560095601956029560395604956059560695607956089560995610956119561295613956149561595616956179561895619956209562195622956239562495625956269562795628956299563095631956329563395634956359563695637956389563995640956419564295643956449564595646956479564895649956509565195652956539565495655956569565795658956599566095661956629566395664956659566695667956689566995670956719567295673956749567595676956779567895679956809568195682956839568495685956869568795688956899569095691956929569395694956959569695697956989569995700957019570295703957049570595706957079570895709957109571195712957139571495715957169571795718957199572095721957229572395724957259572695727957289572995730957319573295733957349573595736957379573895739957409574195742957439574495745957469574795748957499575095751957529575395754957559575695757957589575995760957619576295763957649576595766957679576895769957709577195772957739577495775957769577795778957799578095781957829578395784957859578695787957889578995790957919579295793957949579595796957979579895799958009580195802958039580495805958069580795808958099581095811958129581395814958159581695817958189581995820958219582295823958249582595826958279582895829958309583195832958339583495835958369583795838958399584095841958429584395844958459584695847958489584995850958519585295853958549585595856958579585895859958609586195862958639586495865958669586795868958699587095871958729587395874958759587695877958789587995880958819588295883958849588595886958879588895889958909589195892958939589495895958969589795898958999590095901959029590395904959059590695907959089590995910959119591295913959149591595916959179591895919959209592195922959239592495925959269592795928959299593095931959329593395934959359593695937959389593995940959419594295943959449594595946959479594895949959509595195952959539595495955959569595795958959599596095961959629596395964959659596695967959689596995970959719597295973959749597595976959779597895979959809598195982959839598495985959869598795988959899599095991959929599395994959959599695997959989599996000960019600296003960049600596006960079600896009960109601196012960139601496015960169601796018960199602096021960229602396024960259602696027960289602996030960319603296033960349603596036960379603896039960409604196042960439604496045960469604796048960499605096051960529605396054960559605696057960589605996060960619606296063960649606596066960679606896069960709607196072960739607496075960769607796078960799608096081960829608396084960859608696087960889608996090960919609296093960949609596096960979609896099961009610196102961039610496105961069610796108961099611096111961129611396114961159611696117961189611996120961219612296123961249612596126961279612896129961309613196132961339613496135961369613796138961399614096141961429614396144961459614696147961489614996150961519615296153961549615596156961579615896159961609616196162961639616496165961669616796168961699617096171961729617396174961759617696177961789617996180961819618296183961849618596186961879618896189961909619196192961939619496195961969619796198961999620096201962029620396204962059620696207962089620996210962119621296213962149621596216962179621896219962209622196222962239622496225962269622796228962299623096231962329623396234962359623696237962389623996240962419624296243962449624596246962479624896249962509625196252962539625496255962569625796258962599626096261962629626396264962659626696267962689626996270962719627296273962749627596276962779627896279962809628196282962839628496285962869628796288962899629096291962929629396294962959629696297962989629996300963019630296303963049630596306963079630896309963109631196312963139631496315963169631796318963199632096321963229632396324963259632696327963289632996330963319633296333963349633596336963379633896339963409634196342963439634496345963469634796348963499635096351963529635396354963559635696357963589635996360963619636296363963649636596366963679636896369963709637196372963739637496375963769637796378963799638096381963829638396384963859638696387963889638996390963919639296393963949639596396963979639896399964009640196402964039640496405964069640796408964099641096411964129641396414964159641696417964189641996420964219642296423964249642596426964279642896429964309643196432964339643496435964369643796438964399644096441964429644396444964459644696447964489644996450964519645296453964549645596456964579645896459964609646196462964639646496465964669646796468964699647096471964729647396474964759647696477964789647996480964819648296483964849648596486964879648896489964909649196492964939649496495964969649796498964999650096501965029650396504965059650696507965089650996510965119651296513965149651596516965179651896519965209652196522965239652496525965269652796528965299653096531965329653396534965359653696537965389653996540965419654296543965449654596546965479654896549965509655196552965539655496555965569655796558965599656096561965629656396564965659656696567965689656996570965719657296573965749657596576965779657896579965809658196582965839658496585965869658796588965899659096591965929659396594965959659696597965989659996600966019660296603966049660596606966079660896609966109661196612966139661496615966169661796618966199662096621966229662396624966259662696627966289662996630966319663296633966349663596636966379663896639966409664196642966439664496645966469664796648966499665096651966529665396654966559665696657966589665996660966619666296663966649666596666966679666896669966709667196672966739667496675966769667796678966799668096681966829668396684966859668696687966889668996690966919669296693966949669596696966979669896699967009670196702967039670496705967069670796708967099671096711967129671396714967159671696717967189671996720967219672296723967249672596726967279672896729967309673196732967339673496735967369673796738967399674096741967429674396744967459674696747967489674996750967519675296753967549675596756967579675896759967609676196762967639676496765967669676796768967699677096771967729677396774967759677696777967789677996780967819678296783967849678596786967879678896789967909679196792967939679496795967969679796798967999680096801968029680396804968059680696807968089680996810968119681296813968149681596816968179681896819968209682196822968239682496825968269682796828968299683096831968329683396834968359683696837968389683996840968419684296843968449684596846968479684896849968509685196852968539685496855968569685796858968599686096861968629686396864968659686696867968689686996870968719687296873968749687596876968779687896879968809688196882968839688496885968869688796888968899689096891968929689396894968959689696897968989689996900969019690296903969049690596906969079690896909969109691196912969139691496915969169691796918969199692096921969229692396924969259692696927969289692996930969319693296933969349693596936969379693896939969409694196942969439694496945969469694796948969499695096951969529695396954969559695696957969589695996960969619696296963969649696596966969679696896969969709697196972969739697496975969769697796978969799698096981969829698396984969859698696987969889698996990969919699296993969949699596996969979699896999970009700197002970039700497005970069700797008970099701097011970129701397014970159701697017970189701997020970219702297023970249702597026970279702897029970309703197032970339703497035970369703797038970399704097041970429704397044970459704697047970489704997050970519705297053970549705597056970579705897059970609706197062970639706497065970669706797068970699707097071970729707397074970759707697077970789707997080970819708297083970849708597086970879708897089970909709197092970939709497095970969709797098970999710097101971029710397104971059710697107971089710997110971119711297113971149711597116971179711897119971209712197122971239712497125971269712797128971299713097131971329713397134971359713697137971389713997140971419714297143971449714597146971479714897149971509715197152971539715497155971569715797158971599716097161971629716397164971659716697167971689716997170971719717297173971749717597176971779717897179971809718197182971839718497185971869718797188971899719097191971929719397194971959719697197971989719997200972019720297203972049720597206972079720897209972109721197212972139721497215972169721797218972199722097221972229722397224972259722697227972289722997230972319723297233972349723597236972379723897239972409724197242972439724497245972469724797248972499725097251972529725397254972559725697257972589725997260972619726297263972649726597266972679726897269972709727197272972739727497275972769727797278972799728097281972829728397284972859728697287972889728997290972919729297293972949729597296972979729897299973009730197302973039730497305973069730797308973099731097311973129731397314973159731697317973189731997320973219732297323973249732597326973279732897329973309733197332973339733497335973369733797338973399734097341973429734397344973459734697347973489734997350973519735297353973549735597356973579735897359973609736197362973639736497365973669736797368973699737097371973729737397374973759737697377973789737997380973819738297383973849738597386973879738897389973909739197392973939739497395973969739797398973999740097401974029740397404974059740697407974089740997410974119741297413974149741597416974179741897419974209742197422974239742497425974269742797428974299743097431974329743397434974359743697437974389743997440974419744297443974449744597446974479744897449974509745197452974539745497455974569745797458974599746097461974629746397464974659746697467974689746997470974719747297473974749747597476974779747897479974809748197482974839748497485974869748797488974899749097491974929749397494974959749697497974989749997500975019750297503975049750597506975079750897509975109751197512975139751497515975169751797518975199752097521975229752397524975259752697527975289752997530975319753297533975349753597536975379753897539975409754197542975439754497545975469754797548975499755097551975529755397554975559755697557975589755997560975619756297563975649756597566975679756897569975709757197572975739757497575975769757797578975799758097581975829758397584975859758697587975889758997590975919759297593975949759597596975979759897599976009760197602976039760497605976069760797608976099761097611976129761397614976159761697617976189761997620976219762297623976249762597626976279762897629976309763197632976339763497635976369763797638976399764097641976429764397644976459764697647976489764997650976519765297653976549765597656976579765897659976609766197662976639766497665976669766797668976699767097671976729767397674976759767697677976789767997680976819768297683976849768597686976879768897689976909769197692976939769497695976969769797698976999770097701977029770397704977059770697707977089770997710977119771297713977149771597716977179771897719977209772197722977239772497725977269772797728977299773097731977329773397734977359773697737977389773997740977419774297743977449774597746977479774897749977509775197752977539775497755977569775797758977599776097761977629776397764977659776697767977689776997770977719777297773977749777597776977779777897779977809778197782977839778497785977869778797788977899779097791977929779397794977959779697797977989779997800978019780297803978049780597806978079780897809978109781197812978139781497815978169781797818978199782097821978229782397824978259782697827978289782997830978319783297833978349783597836978379783897839978409784197842978439784497845978469784797848978499785097851978529785397854978559785697857978589785997860978619786297863978649786597866978679786897869978709787197872978739787497875978769787797878978799788097881978829788397884978859788697887978889788997890978919789297893978949789597896978979789897899979009790197902979039790497905979069790797908979099791097911979129791397914979159791697917979189791997920979219792297923979249792597926979279792897929979309793197932979339793497935979369793797938979399794097941979429794397944979459794697947979489794997950979519795297953979549795597956979579795897959979609796197962979639796497965979669796797968979699797097971979729797397974979759797697977979789797997980979819798297983979849798597986979879798897989979909799197992979939799497995979969799797998979999800098001980029800398004980059800698007980089800998010980119801298013980149801598016980179801898019980209802198022980239802498025980269802798028980299803098031980329803398034980359803698037980389803998040980419804298043980449804598046980479804898049980509805198052980539805498055980569805798058980599806098061980629806398064980659806698067980689806998070980719807298073980749807598076980779807898079980809808198082980839808498085980869808798088980899809098091980929809398094980959809698097980989809998100981019810298103981049810598106981079810898109981109811198112981139811498115981169811798118981199812098121981229812398124981259812698127981289812998130981319813298133981349813598136981379813898139981409814198142981439814498145981469814798148981499815098151981529815398154981559815698157981589815998160981619816298163981649816598166981679816898169981709817198172981739817498175981769817798178981799818098181981829818398184981859818698187981889818998190981919819298193981949819598196981979819898199982009820198202982039820498205982069820798208982099821098211982129821398214982159821698217982189821998220982219822298223982249822598226982279822898229982309823198232982339823498235982369823798238982399824098241982429824398244982459824698247982489824998250982519825298253982549825598256982579825898259982609826198262982639826498265982669826798268982699827098271982729827398274982759827698277982789827998280982819828298283982849828598286982879828898289982909829198292982939829498295982969829798298982999830098301983029830398304983059830698307983089830998310983119831298313983149831598316983179831898319983209832198322983239832498325983269832798328983299833098331983329833398334983359833698337983389833998340983419834298343983449834598346983479834898349983509835198352983539835498355983569835798358983599836098361983629836398364983659836698367983689836998370983719837298373983749837598376983779837898379983809838198382983839838498385983869838798388983899839098391983929839398394983959839698397983989839998400984019840298403984049840598406984079840898409984109841198412984139841498415984169841798418984199842098421984229842398424984259842698427984289842998430984319843298433984349843598436984379843898439984409844198442984439844498445984469844798448984499845098451984529845398454984559845698457984589845998460984619846298463984649846598466984679846898469984709847198472984739847498475984769847798478984799848098481984829848398484984859848698487984889848998490984919849298493984949849598496984979849898499985009850198502985039850498505985069850798508985099851098511985129851398514985159851698517985189851998520985219852298523985249852598526985279852898529985309853198532985339853498535985369853798538985399854098541985429854398544985459854698547985489854998550985519855298553985549855598556985579855898559985609856198562985639856498565985669856798568985699857098571985729857398574985759857698577985789857998580985819858298583985849858598586985879858898589985909859198592985939859498595985969859798598985999860098601986029860398604986059860698607986089860998610986119861298613986149861598616986179861898619986209862198622986239862498625986269862798628986299863098631986329863398634986359863698637986389863998640986419864298643986449864598646986479864898649986509865198652986539865498655986569865798658986599866098661986629866398664986659866698667986689866998670986719867298673986749867598676986779867898679986809868198682986839868498685986869868798688986899869098691986929869398694986959869698697986989869998700987019870298703987049870598706987079870898709987109871198712987139871498715987169871798718987199872098721987229872398724987259872698727987289872998730987319873298733987349873598736987379873898739987409874198742987439874498745987469874798748987499875098751987529875398754987559875698757987589875998760987619876298763987649876598766987679876898769987709877198772987739877498775987769877798778987799878098781987829878398784987859878698787987889878998790987919879298793987949879598796987979879898799988009880198802988039880498805988069880798808988099881098811988129881398814988159881698817988189881998820988219882298823988249882598826988279882898829988309883198832988339883498835988369883798838988399884098841988429884398844988459884698847988489884998850988519885298853988549885598856988579885898859988609886198862988639886498865988669886798868988699887098871988729887398874988759887698877988789887998880988819888298883988849888598886988879888898889988909889198892988939889498895988969889798898988999890098901989029890398904989059890698907989089890998910989119891298913989149891598916989179891898919989209892198922989239892498925989269892798928989299893098931989329893398934989359893698937989389893998940989419894298943989449894598946989479894898949989509895198952989539895498955989569895798958989599896098961989629896398964989659896698967989689896998970989719897298973989749897598976989779897898979989809898198982989839898498985989869898798988989899899098991989929899398994989959899698997989989899999000990019900299003990049900599006990079900899009990109901199012990139901499015990169901799018990199902099021990229902399024990259902699027990289902999030990319903299033990349903599036990379903899039990409904199042990439904499045990469904799048990499905099051990529905399054990559905699057990589905999060990619906299063990649906599066990679906899069990709907199072990739907499075990769907799078990799908099081990829908399084990859908699087990889908999090990919909299093990949909599096990979909899099991009910199102991039910499105991069910799108991099911099111991129911399114991159911699117991189911999120991219912299123991249912599126991279912899129991309913199132991339913499135991369913799138991399914099141991429914399144991459914699147991489914999150991519915299153991549915599156991579915899159991609916199162991639916499165991669916799168991699917099171991729917399174991759917699177991789917999180991819918299183991849918599186991879918899189991909919199192991939919499195991969919799198991999920099201992029920399204992059920699207992089920999210992119921299213992149921599216992179921899219992209922199222992239922499225992269922799228992299923099231992329923399234992359923699237992389923999240992419924299243992449924599246992479924899249992509925199252992539925499255992569925799258992599926099261992629926399264992659926699267992689926999270992719927299273992749927599276992779927899279992809928199282992839928499285992869928799288992899929099291992929929399294992959929699297992989929999300993019930299303993049930599306993079930899309993109931199312993139931499315993169931799318993199932099321993229932399324993259932699327993289932999330993319933299333993349933599336993379933899339993409934199342993439934499345993469934799348993499935099351993529935399354993559935699357993589935999360993619936299363993649936599366993679936899369993709937199372993739937499375993769937799378993799938099381993829938399384993859938699387993889938999390993919939299393993949939599396993979939899399994009940199402994039940499405994069940799408994099941099411994129941399414994159941699417994189941999420994219942299423994249942599426994279942899429994309943199432994339943499435994369943799438994399944099441994429944399444994459944699447994489944999450994519945299453994549945599456994579945899459994609946199462994639946499465994669946799468994699947099471994729947399474994759947699477994789947999480994819948299483994849948599486994879948899489994909949199492994939949499495994969949799498994999950099501995029950399504995059950699507995089950999510995119951299513995149951599516995179951899519995209952199522995239952499525995269952799528995299953099531995329953399534995359953699537995389953999540995419954299543995449954599546995479954899549995509955199552995539955499555995569955799558995599956099561995629956399564995659956699567995689956999570995719957299573995749957599576995779957899579995809958199582995839958499585995869958799588995899959099591995929959399594995959959699597995989959999600996019960299603996049960599606996079960899609996109961199612996139961499615996169961799618996199962099621996229962399624996259962699627996289962999630996319963299633996349963599636996379963899639996409964199642996439964499645996469964799648996499965099651996529965399654996559965699657996589965999660996619966299663996649966599666996679966899669996709967199672996739967499675996769967799678996799968099681996829968399684996859968699687996889968999690996919969299693996949969599696996979969899699997009970199702997039970499705997069970799708997099971099711997129971399714997159971699717997189971999720997219972299723997249972599726997279972899729997309973199732997339973499735997369973799738997399974099741997429974399744997459974699747997489974999750997519975299753997549975599756997579975899759997609976199762997639976499765997669976799768997699977099771997729977399774997759977699777997789977999780997819978299783997849978599786997879978899789997909979199792997939979499795997969979799798997999980099801998029980399804998059980699807998089980999810998119981299813998149981599816998179981899819998209982199822998239982499825998269982799828998299983099831998329983399834998359983699837998389983999840998419984299843998449984599846998479984899849998509985199852998539985499855998569985799858998599986099861998629986399864998659986699867998689986999870998719987299873998749987599876998779987899879998809988199882998839988499885998869988799888998899989099891998929989399894998959989699897998989989999900999019990299903999049990599906999079990899909999109991199912999139991499915999169991799918999199992099921999229992399924999259992699927999289992999930999319993299933999349993599936999379993899939999409994199942999439994499945999469994799948999499995099951999529995399954999559995699957999589995999960999619996299963999649996599966999679996899969999709997199972999739997499975999769997799978999799998099981999829998399984999859998699987999889998999990999919999299993999949999599996999979999899999100000100001100002100003100004100005100006100007100008100009100010100011100012100013100014100015100016100017100018100019100020100021100022100023100024100025100026100027100028100029100030100031100032100033100034100035100036100037100038100039100040100041100042100043100044100045100046100047100048100049100050100051100052100053100054100055100056100057100058100059100060100061100062100063100064100065100066100067100068100069100070100071100072100073100074100075100076100077100078100079100080100081100082100083100084100085100086100087100088100089100090100091100092100093100094100095100096100097100098100099100100100101100102100103100104100105100106100107100108100109100110100111100112100113100114100115100116100117100118100119100120100121100122100123100124100125100126100127100128100129100130100131100132100133100134100135100136100137100138100139100140100141100142100143100144100145100146100147100148100149100150100151100152100153100154100155100156100157100158100159100160100161100162100163100164100165100166100167100168100169100170100171100172100173100174100175100176100177100178100179100180100181100182100183100184100185100186100187100188100189100190100191100192100193100194100195100196100197100198100199100200100201100202100203100204100205100206100207100208100209100210100211100212100213100214100215100216100217100218100219100220100221100222100223100224100225100226100227100228100229100230100231100232100233100234100235100236100237100238100239100240100241100242100243100244100245100246100247100248100249100250100251100252100253100254100255100256100257100258100259100260100261100262100263100264100265100266100267100268100269100270100271100272100273100274100275100276100277100278100279100280100281100282100283100284100285100286100287100288100289100290100291100292100293100294100295100296100297100298100299100300100301100302100303100304100305100306100307100308100309100310100311100312100313100314100315100316100317100318100319100320100321100322100323100324100325100326100327100328100329100330100331100332100333100334100335100336100337100338100339100340100341100342100343100344100345100346100347100348100349100350100351100352100353100354100355100356100357100358100359100360100361100362100363100364100365100366100367100368100369100370100371100372100373100374100375100376100377100378100379100380100381100382100383100384100385100386100387100388100389100390100391100392100393100394100395100396100397100398100399100400100401100402100403100404100405100406100407100408100409100410100411100412100413100414100415100416100417100418100419100420100421100422100423100424100425100426100427100428100429100430100431100432100433100434100435100436100437100438100439100440100441100442100443100444100445100446100447100448100449100450100451100452100453100454100455100456100457100458100459100460100461100462100463100464100465100466100467100468100469100470100471100472100473100474100475100476100477100478100479100480100481100482100483100484100485100486100487100488100489100490100491100492100493100494100495100496100497100498100499100500100501100502100503100504100505100506100507100508100509100510100511100512100513100514100515100516100517100518100519100520100521100522100523100524100525100526100527100528100529100530100531100532100533100534100535100536100537100538100539100540100541100542100543100544100545100546100547100548100549100550100551100552100553100554100555100556100557100558100559100560100561100562100563100564100565100566100567100568100569100570100571100572100573100574100575100576100577100578100579100580100581100582100583100584100585100586100587100588100589100590100591100592100593100594100595100596100597100598100599100600100601100602100603100604100605100606100607100608100609100610100611100612100613100614100615100616100617100618100619100620100621100622100623100624100625100626100627100628100629100630100631100632100633100634100635100636100637100638100639100640100641100642100643100644100645100646100647100648100649100650100651100652100653100654100655100656100657100658100659100660100661100662100663100664100665100666100667100668100669100670100671100672100673100674100675100676100677100678100679100680100681100682100683100684100685100686100687100688100689100690100691100692100693100694100695100696100697100698100699100700100701100702100703100704100705100706100707100708100709100710100711100712100713100714100715100716100717100718100719100720100721100722100723100724100725100726100727100728100729100730100731100732100733100734100735100736100737100738100739100740100741100742100743100744100745100746100747100748100749100750100751100752100753100754100755100756100757100758100759100760100761100762100763100764100765100766100767100768100769100770100771100772100773100774100775100776100777100778100779100780100781100782100783100784100785100786100787100788100789100790100791100792100793100794100795100796100797100798100799100800100801100802100803100804100805100806100807100808100809100810100811100812100813100814100815100816100817100818100819100820100821100822100823100824100825100826100827100828100829100830100831100832100833100834100835100836100837100838100839100840100841100842100843100844100845100846100847100848100849100850100851100852100853100854100855100856100857100858100859100860100861100862100863100864100865100866100867100868100869100870100871100872100873100874100875100876100877100878100879100880100881100882100883100884100885100886100887100888100889100890100891100892100893100894100895100896100897100898100899100900100901100902100903100904100905100906100907100908100909100910100911100912100913100914100915100916100917100918100919100920100921100922100923100924100925100926100927100928100929100930100931100932100933100934100935100936100937100938100939100940100941100942100943100944100945100946100947100948100949100950100951100952100953100954100955100956100957100958100959100960100961100962100963100964100965100966100967100968100969100970100971100972100973100974100975100976100977100978100979100980100981100982100983100984100985100986100987100988100989100990100991100992100993100994100995100996100997100998100999101000101001101002101003101004101005101006101007101008101009101010101011101012101013101014101015101016101017101018101019101020101021101022101023101024101025101026101027101028101029101030101031101032101033101034101035101036101037101038101039101040101041101042101043101044101045101046101047101048101049101050101051101052101053101054101055101056101057101058101059101060101061101062101063101064101065101066101067101068101069101070101071101072101073101074101075101076101077101078101079101080101081101082101083101084101085101086101087101088101089101090101091101092101093101094101095101096101097101098101099101100101101101102101103101104101105101106101107101108101109101110101111101112101113101114101115101116101117101118101119101120101121101122101123101124101125101126101127101128101129101130101131101132101133101134101135101136101137101138101139101140101141101142101143101144101145101146101147101148101149101150101151101152101153101154101155101156101157101158101159101160101161101162101163101164101165101166101167101168101169101170101171101172101173101174101175101176101177101178101179101180101181101182101183101184101185101186101187101188101189101190101191101192101193101194101195101196101197101198101199101200101201101202101203101204101205101206101207101208101209101210101211101212101213101214101215101216101217101218101219101220101221101222101223101224101225101226101227101228101229101230101231101232101233101234101235101236101237101238101239101240101241101242101243101244101245101246101247101248101249101250101251101252101253101254101255101256101257101258101259101260101261101262101263101264101265101266101267101268101269101270101271101272101273101274101275101276101277101278101279101280101281101282101283101284101285101286101287101288101289101290101291101292101293101294101295101296101297101298101299101300101301101302101303101304101305101306101307101308101309101310101311101312101313101314101315101316101317101318101319101320101321101322101323101324101325101326101327101328101329101330101331101332101333101334101335101336101337101338101339101340101341101342101343101344101345101346101347101348101349101350101351101352101353101354101355101356101357101358101359101360101361101362101363101364101365101366101367101368101369101370101371101372101373101374101375101376101377101378101379101380101381101382101383101384101385101386101387101388101389101390101391101392101393101394101395101396101397101398101399101400101401101402101403101404101405101406101407101408101409101410101411101412101413101414101415101416101417101418101419101420101421101422101423101424101425101426101427101428101429101430101431101432101433101434101435101436101437101438101439101440101441101442101443101444101445101446101447101448101449101450101451101452101453101454101455101456101457101458101459101460101461101462101463101464101465101466101467101468101469101470101471101472101473101474101475101476101477101478101479101480101481101482101483101484101485101486101487101488101489101490101491101492101493101494101495101496101497101498101499101500101501101502101503101504101505101506101507101508101509101510101511101512101513101514101515101516101517101518101519101520101521101522101523101524101525101526101527101528101529101530101531101532101533101534101535101536101537101538101539101540101541101542101543101544101545101546101547101548101549101550101551101552101553101554101555101556101557101558101559101560101561101562101563101564101565101566101567101568101569101570101571101572101573101574101575101576101577101578101579101580101581101582101583101584101585101586101587101588101589101590101591101592101593101594101595101596101597101598101599101600101601101602101603101604101605101606101607101608101609101610101611101612101613101614101615101616101617101618101619101620101621101622101623101624101625101626101627101628101629101630101631101632101633101634101635101636101637101638101639101640101641101642101643101644101645101646101647101648101649101650101651101652101653101654101655101656101657101658101659101660101661101662101663101664101665101666101667101668101669101670101671101672101673101674101675101676101677101678101679101680101681101682101683101684101685101686101687101688101689101690101691101692101693101694101695101696101697101698101699101700101701101702101703101704101705101706101707101708101709101710101711101712101713101714101715101716101717101718101719101720101721101722101723101724101725101726101727101728101729101730101731101732101733101734101735101736101737101738101739101740101741101742101743101744101745101746101747101748101749101750101751101752101753101754101755101756101757101758101759101760101761101762101763101764101765101766101767101768101769101770101771101772101773101774101775101776101777101778101779101780101781101782101783101784101785101786101787101788101789101790101791101792101793101794101795101796101797101798101799101800101801101802101803101804101805101806101807101808101809101810101811101812101813101814101815101816101817101818101819101820101821101822101823101824101825101826101827101828101829101830101831101832101833101834101835101836101837101838101839101840101841101842101843101844101845101846101847101848101849101850101851101852101853101854101855101856101857101858101859101860101861101862101863101864101865101866101867101868101869101870101871101872101873101874101875101876101877101878101879101880101881101882101883101884101885101886101887101888101889101890101891101892101893101894101895101896101897101898101899101900101901101902101903101904101905101906101907101908101909101910101911101912101913101914101915101916101917101918101919101920101921101922101923101924101925101926101927101928101929101930101931101932101933101934101935101936101937101938101939101940101941101942101943101944101945101946101947101948101949101950101951101952101953101954101955101956101957101958101959101960101961101962101963101964101965101966101967101968101969101970101971101972101973101974101975101976101977101978101979101980101981101982101983101984101985101986101987101988101989101990101991101992101993101994101995101996101997101998101999102000102001102002102003102004102005102006102007102008102009102010102011102012102013102014102015102016102017102018102019102020102021102022102023102024102025102026102027102028102029102030102031102032102033102034102035102036102037102038102039102040102041102042102043102044102045102046102047102048102049102050102051102052102053102054102055102056102057102058102059102060102061102062102063102064102065102066102067102068102069102070102071102072102073102074102075102076102077102078102079102080102081102082102083102084102085102086102087102088102089102090102091102092102093102094102095102096102097102098102099102100102101102102102103102104102105102106102107102108102109102110102111102112102113102114102115102116102117102118102119102120102121102122102123102124102125102126102127102128102129102130102131102132102133102134102135102136102137102138102139102140102141102142102143102144102145102146102147102148102149102150102151102152102153102154102155102156102157102158102159102160102161102162102163102164102165102166102167102168102169102170102171102172102173102174102175102176102177102178102179102180102181102182102183102184102185102186102187102188102189102190102191102192102193102194102195102196102197102198102199102200102201102202102203102204102205102206102207102208102209102210102211102212102213102214102215102216102217102218102219102220102221102222102223102224102225102226102227102228102229102230102231102232102233102234102235102236102237102238102239102240102241102242102243102244102245102246102247102248102249102250102251102252102253102254102255102256102257102258102259102260102261102262102263102264102265102266102267102268102269102270102271102272102273102274102275102276102277102278102279102280102281102282102283102284102285102286102287102288102289102290102291102292102293102294102295102296102297102298102299102300102301102302102303102304102305102306102307102308102309102310102311102312102313102314102315102316102317102318102319102320102321102322102323102324102325102326102327102328102329102330102331102332102333102334102335102336102337102338102339102340102341102342102343102344102345102346102347102348102349102350102351102352102353102354102355102356102357102358102359102360102361102362102363102364102365102366102367102368102369102370102371102372102373102374102375102376102377102378102379102380102381102382102383102384102385102386102387102388102389102390102391102392102393102394102395102396102397102398102399102400102401102402102403102404102405102406102407102408102409102410102411102412102413102414102415102416102417102418102419102420102421102422102423102424102425102426102427102428102429102430102431102432102433102434102435102436102437102438102439102440102441102442102443102444102445102446102447102448102449102450102451102452102453102454102455102456102457102458102459102460102461102462102463102464102465102466102467102468102469102470102471102472102473102474102475102476102477102478102479102480102481102482102483102484102485102486102487102488102489102490102491102492102493102494102495102496102497102498102499102500102501102502102503102504102505102506102507102508102509102510102511102512102513102514102515102516102517102518102519102520102521102522102523102524102525102526102527102528102529102530102531102532102533102534102535102536102537102538102539102540102541102542102543102544102545102546102547102548102549102550102551102552102553102554102555102556102557102558102559102560102561102562102563102564102565102566102567102568102569102570102571102572102573102574102575102576102577102578102579102580102581102582102583102584102585102586102587102588102589102590102591102592102593102594102595102596102597102598102599102600102601102602102603102604102605102606102607102608102609102610102611102612102613102614102615102616102617102618102619102620102621102622102623102624102625102626102627102628102629102630102631102632102633102634102635102636102637102638102639102640102641102642102643102644102645102646102647102648102649102650102651102652102653102654102655102656102657102658102659102660102661102662102663102664102665102666102667102668102669102670102671102672102673102674102675102676102677102678102679102680102681102682102683102684102685102686102687102688102689102690102691102692102693102694102695102696102697102698102699102700102701102702102703102704102705102706102707102708102709102710102711102712102713102714102715102716102717102718102719102720102721102722102723102724102725102726102727102728102729102730102731102732102733102734102735102736102737102738102739102740102741102742102743102744102745102746102747102748102749102750102751102752102753102754102755102756102757102758102759102760102761102762102763102764102765102766102767102768102769102770102771102772102773102774102775102776102777102778102779102780102781102782102783102784102785102786102787102788102789102790102791102792102793102794102795102796102797102798102799102800102801102802102803102804102805102806102807102808102809102810102811102812102813102814102815102816102817102818102819102820102821102822102823102824102825102826102827102828102829102830102831102832102833102834102835102836102837102838102839102840102841102842102843102844102845102846102847102848102849102850102851102852102853102854102855102856102857102858102859102860102861102862102863102864102865102866102867102868102869102870102871102872102873102874102875102876102877102878102879102880102881102882102883102884102885102886102887102888102889102890102891102892102893102894102895102896102897102898102899102900102901102902102903102904102905102906102907102908102909102910102911102912102913102914102915102916102917102918102919102920102921102922102923102924102925102926102927102928102929102930102931102932102933102934102935102936102937102938102939102940102941102942102943102944102945102946102947102948102949102950102951102952102953102954102955102956102957102958102959102960102961102962102963102964102965102966102967102968102969102970102971102972102973102974102975102976102977102978102979102980102981102982102983102984102985102986102987102988102989102990102991102992102993102994102995102996102997102998102999103000103001103002103003103004103005103006103007103008103009103010103011103012103013103014103015103016103017103018103019103020103021103022103023103024103025103026103027103028103029103030103031103032103033103034103035103036103037103038103039103040103041103042103043103044103045103046103047103048103049103050103051103052103053103054103055103056103057103058103059103060103061103062103063103064103065103066103067103068103069103070103071103072103073103074103075103076103077103078103079103080103081103082103083103084103085103086103087103088103089103090103091103092103093103094103095103096103097103098103099103100103101103102103103103104103105103106103107103108103109103110103111103112103113103114103115103116103117103118103119103120103121103122103123103124103125103126103127103128103129103130103131103132103133103134103135103136103137103138103139103140103141103142103143103144103145103146103147103148103149103150103151103152103153103154103155103156103157103158103159103160103161103162103163103164103165103166103167103168103169103170103171103172103173103174103175103176103177103178103179103180103181103182103183103184103185103186103187103188103189103190103191103192103193103194103195103196103197103198103199103200103201103202103203103204103205103206103207103208103209103210103211103212103213103214103215103216103217103218103219103220103221103222103223103224103225103226103227103228103229103230103231103232103233103234103235103236103237103238103239103240103241103242103243103244103245103246103247103248103249103250103251103252103253103254103255103256103257103258103259103260103261103262103263103264103265103266103267103268103269103270103271103272103273103274103275103276103277103278103279103280103281103282103283103284103285103286103287103288103289103290103291103292103293103294103295103296103297103298103299103300103301103302103303103304103305103306103307103308103309103310103311103312103313103314103315103316103317103318103319103320103321103322103323103324103325103326103327103328103329103330103331103332103333103334103335103336103337103338103339103340103341103342103343103344103345103346103347103348103349103350103351103352103353103354103355103356103357103358103359103360103361103362103363103364103365103366103367103368103369103370103371103372103373103374103375103376103377103378103379103380103381103382103383103384103385103386103387103388103389103390103391103392103393103394103395103396103397103398103399103400103401103402103403103404103405103406103407103408103409103410103411103412103413103414103415103416103417103418103419103420103421103422103423103424103425103426103427103428103429103430103431103432103433103434103435103436103437103438103439103440103441103442103443103444103445103446103447103448103449103450103451103452103453103454103455103456103457103458103459103460103461103462103463103464103465103466103467103468103469103470103471103472103473103474103475103476103477103478103479103480103481103482103483103484103485103486103487103488103489103490103491103492103493103494103495103496103497103498103499103500103501103502103503103504103505103506103507103508103509103510103511103512103513103514103515103516103517103518103519103520103521103522103523103524103525103526103527103528103529103530103531103532103533103534103535103536103537103538103539103540103541103542103543103544103545103546103547103548103549103550103551103552103553103554103555103556103557103558103559103560103561103562103563103564103565103566103567103568103569103570103571103572103573103574103575103576103577103578103579103580103581103582103583103584103585103586103587103588103589103590103591103592103593103594103595103596103597103598103599103600103601103602103603103604103605103606103607103608103609103610103611103612103613103614103615103616103617103618103619103620103621103622103623103624103625103626103627103628103629103630103631103632103633103634103635103636103637103638103639103640103641103642103643103644103645103646103647103648103649103650103651103652103653103654103655103656103657103658103659103660103661103662103663103664103665103666103667103668103669103670103671103672103673103674103675103676103677103678103679103680103681103682103683103684103685103686103687103688103689103690103691103692103693103694103695103696103697103698103699103700103701103702103703103704103705103706103707103708103709103710103711103712103713103714103715103716103717103718103719103720103721103722103723103724103725103726103727103728103729103730103731103732103733103734103735103736103737103738103739103740103741103742103743103744103745103746103747103748103749103750103751103752103753103754103755103756103757103758103759103760103761103762103763103764103765103766103767103768103769103770103771103772103773103774103775103776103777103778103779103780103781103782103783103784103785103786103787103788103789103790103791103792103793103794103795103796103797103798103799103800103801103802103803103804103805103806103807103808103809103810103811103812103813103814103815103816103817103818103819103820103821103822103823103824103825103826103827103828103829103830103831103832103833103834103835103836103837103838103839103840103841103842103843103844103845103846103847103848103849103850103851103852103853103854103855103856103857103858103859103860103861103862103863103864103865103866103867103868103869103870103871103872103873103874103875103876103877103878103879103880103881103882103883103884103885103886103887103888103889103890103891103892103893103894103895103896103897103898103899103900103901103902103903103904103905103906103907103908103909103910103911103912103913103914103915103916103917103918103919103920103921103922103923103924103925103926103927103928103929103930103931103932103933103934103935103936103937103938103939103940103941103942103943103944103945103946103947103948103949103950103951103952103953103954103955103956103957103958103959103960103961103962103963103964103965103966103967103968103969103970103971103972103973103974103975103976103977103978103979103980103981103982103983103984103985103986103987103988103989103990103991103992103993103994103995103996103997103998103999104000104001104002104003104004104005104006104007104008104009104010104011104012104013104014104015104016104017104018104019104020104021104022104023104024104025104026104027104028104029104030104031104032104033104034104035104036104037104038104039104040104041104042104043104044104045104046104047104048104049104050104051104052104053104054104055104056104057104058104059104060104061104062104063104064104065104066104067104068104069104070104071104072104073104074104075104076104077104078104079104080104081104082104083104084104085104086104087104088104089104090104091104092104093104094104095104096104097104098104099104100104101104102104103104104104105104106104107104108104109104110104111104112104113104114104115104116104117104118104119104120104121104122104123104124104125104126104127104128104129104130104131104132104133104134104135104136104137104138104139104140104141104142104143104144104145104146104147104148104149104150104151104152104153104154104155104156104157104158104159104160104161104162104163104164104165104166104167104168104169104170104171104172104173104174104175104176104177104178104179104180104181104182104183104184104185104186104187104188104189104190104191104192104193104194104195104196104197104198104199104200104201104202104203104204104205104206104207104208104209104210104211104212104213104214104215104216104217104218104219104220104221104222104223104224104225104226104227104228104229104230104231104232104233104234104235104236104237104238104239104240104241104242104243104244104245104246104247104248104249104250104251104252104253104254104255104256104257104258104259104260104261104262104263104264104265104266104267104268104269104270104271104272104273104274104275104276104277104278104279104280104281104282104283104284104285104286104287104288104289104290104291104292104293104294104295104296104297104298104299104300104301104302104303104304104305104306104307104308104309104310104311104312104313104314104315104316104317104318104319104320104321104322104323104324104325104326104327104328104329104330104331104332104333104334104335104336104337104338104339104340104341104342104343104344104345104346104347104348104349104350104351104352104353104354104355104356104357104358104359104360104361104362104363104364104365104366104367104368104369104370104371104372104373104374104375104376104377104378104379104380104381104382104383104384104385104386104387104388104389104390104391104392104393104394104395104396104397104398104399104400104401104402104403104404104405104406104407104408104409104410104411104412104413104414104415104416104417104418104419104420104421104422104423104424104425104426104427104428104429104430104431104432104433104434104435104436104437104438104439104440104441104442104443104444104445104446104447104448104449104450104451104452104453104454104455104456104457104458104459104460104461104462104463104464104465104466104467104468104469104470104471104472104473104474104475104476104477104478104479104480104481104482104483104484104485104486104487104488104489104490104491104492104493104494104495104496104497104498104499104500104501104502104503104504104505104506104507104508104509104510104511104512104513104514104515104516104517104518104519104520104521104522104523104524104525104526104527104528104529104530104531104532104533104534104535104536104537104538104539104540104541104542104543104544104545104546104547104548104549104550104551104552104553104554104555104556104557104558104559104560104561104562104563104564104565104566104567104568104569104570104571104572104573104574104575104576104577104578104579104580104581104582104583104584104585104586104587104588104589104590104591104592104593104594104595104596104597104598104599104600104601104602104603104604104605104606104607104608104609104610104611104612104613104614104615104616104617104618104619104620104621104622104623104624104625104626104627104628104629104630104631104632104633104634104635104636104637104638104639104640104641104642104643104644104645104646104647104648104649104650104651104652104653104654104655104656104657104658104659104660104661104662104663104664104665104666104667104668104669104670104671104672104673104674104675104676104677104678104679104680104681104682104683104684104685104686104687104688104689104690104691104692104693104694104695104696104697104698104699104700104701104702104703104704104705104706104707104708104709104710104711104712104713104714104715104716104717104718104719104720104721104722104723104724104725104726104727104728104729104730104731104732104733104734104735104736104737104738104739104740104741104742104743104744104745104746104747104748104749104750104751104752104753104754104755104756104757104758104759104760104761104762104763104764104765104766104767104768104769104770104771104772104773104774104775104776104777104778104779104780104781104782104783104784104785104786104787104788104789104790104791104792104793104794104795104796104797104798104799104800104801104802104803104804104805104806104807104808104809104810104811104812104813104814104815104816104817104818104819104820104821104822104823104824104825104826104827104828104829104830104831104832104833104834104835104836104837104838104839104840104841104842104843104844104845104846104847104848104849104850104851104852104853104854104855104856104857104858104859104860104861104862104863104864104865104866104867104868104869104870104871104872104873104874104875104876104877104878104879104880104881104882104883104884104885104886104887104888104889104890104891104892104893104894104895104896104897104898104899104900104901104902104903104904104905104906104907104908104909104910104911104912104913104914104915104916104917104918104919104920104921104922104923104924104925104926104927104928104929104930104931104932104933104934104935104936104937104938104939104940104941104942104943104944104945104946104947104948104949104950104951104952104953104954104955104956104957104958104959104960104961104962104963104964104965104966104967104968104969104970104971104972104973104974104975104976104977104978104979104980104981104982104983104984104985104986104987104988104989104990104991104992104993104994104995104996104997104998104999105000105001105002105003105004105005105006105007105008105009105010105011105012105013105014105015105016105017105018105019105020105021105022105023105024105025105026105027105028105029105030105031105032105033105034105035105036105037105038105039105040105041105042105043105044105045105046105047105048105049105050105051105052105053105054105055105056105057105058105059105060105061105062105063105064105065105066105067105068105069105070105071105072105073105074105075105076105077105078105079105080105081105082105083105084105085105086105087105088105089105090105091105092105093105094105095105096105097105098105099105100105101105102105103105104105105105106105107105108105109105110105111105112105113105114105115105116105117105118105119105120105121105122105123105124105125105126105127105128105129105130105131105132105133105134105135105136105137105138105139105140105141105142105143105144105145105146105147105148105149105150105151105152105153105154105155105156105157105158105159105160105161105162105163105164105165105166105167105168105169105170105171105172105173105174105175105176105177105178105179105180105181105182105183105184105185105186105187105188105189105190105191105192105193105194105195105196105197105198105199105200105201105202105203105204105205105206105207105208105209105210105211105212105213105214105215105216105217105218105219105220105221105222105223105224105225105226105227105228105229105230105231105232105233105234105235105236105237105238105239105240105241105242105243105244105245105246105247105248105249105250105251105252105253105254105255105256105257105258105259105260105261105262105263105264105265105266105267105268105269105270105271105272105273105274105275105276105277105278105279105280105281105282105283105284105285105286105287105288105289105290105291105292105293105294105295105296105297105298105299105300105301105302105303105304105305105306105307105308105309105310105311105312105313105314105315105316105317105318105319105320105321105322105323105324105325105326105327105328105329105330105331105332105333105334105335105336105337105338105339105340105341105342105343105344105345105346105347105348105349105350105351105352105353105354105355105356105357105358105359105360105361105362105363105364105365105366105367105368105369105370105371105372105373105374105375105376105377105378105379105380105381105382105383105384105385105386105387105388105389105390105391105392105393105394105395105396105397105398105399105400105401105402105403105404105405105406105407105408105409105410105411105412105413105414105415105416105417105418105419105420105421105422105423105424105425105426105427105428105429105430105431105432105433105434105435105436105437105438105439105440105441105442105443105444105445105446105447105448105449105450105451105452105453105454105455105456105457105458105459105460105461105462105463105464105465105466105467105468105469105470105471105472105473105474105475105476105477105478105479105480105481105482105483105484105485105486105487105488105489105490105491105492105493105494105495105496105497105498105499105500105501105502105503105504105505105506105507105508105509105510105511105512105513105514105515105516105517105518105519105520105521105522105523105524105525105526105527105528105529105530105531105532105533105534105535105536105537105538105539105540105541105542105543105544105545105546105547105548105549105550105551105552105553105554105555105556105557105558105559105560105561105562105563105564105565105566105567105568105569105570105571105572105573105574105575105576105577105578105579105580105581105582105583105584105585105586105587105588105589105590105591105592105593105594105595105596105597105598105599105600105601105602105603105604105605105606105607105608105609105610105611105612105613105614105615105616105617105618105619105620105621105622105623105624105625105626105627105628105629105630105631105632105633105634105635105636105637105638105639105640105641105642105643105644105645105646105647105648105649105650105651105652105653105654105655105656105657105658105659105660105661105662105663105664105665105666105667105668105669105670105671105672105673105674105675105676105677105678105679105680105681105682105683105684105685105686105687105688105689105690105691105692105693105694105695105696105697105698105699105700105701105702105703105704105705105706105707105708105709105710105711105712105713105714105715105716105717105718105719105720105721105722105723105724105725105726105727105728105729105730105731105732105733105734105735105736105737105738105739105740105741105742105743105744105745105746105747105748105749105750105751105752105753105754105755105756105757105758105759105760105761105762105763105764105765105766105767105768105769105770105771105772105773105774105775105776105777105778105779105780105781105782105783105784105785105786105787105788105789105790105791105792105793105794105795105796105797105798105799105800105801105802105803105804105805105806105807105808105809105810105811105812105813105814105815105816105817105818105819105820105821105822105823105824105825105826105827105828105829105830105831105832105833105834105835105836105837105838105839105840105841105842105843105844105845105846105847105848105849105850105851105852105853105854105855105856105857105858105859105860105861105862105863105864105865105866105867105868105869105870105871105872105873105874105875105876105877105878105879105880105881105882105883105884105885105886105887105888105889105890105891105892105893105894105895105896105897105898105899105900105901105902105903105904105905105906105907105908105909105910105911105912105913105914105915105916105917105918105919105920105921105922105923105924105925105926105927105928105929105930105931105932105933105934105935105936105937105938105939105940105941105942105943105944105945105946105947105948105949105950105951105952105953105954105955105956105957105958105959105960105961105962105963105964105965105966105967105968105969105970105971105972105973105974105975105976105977105978105979105980105981105982105983105984105985105986105987105988105989105990105991105992105993105994105995105996105997105998105999106000106001106002106003106004106005106006106007106008106009106010106011106012106013106014106015106016106017106018106019106020106021106022106023106024106025106026106027106028106029106030106031106032106033106034106035106036106037106038106039106040106041106042106043106044106045106046106047106048106049106050106051106052106053106054106055106056106057106058106059106060106061106062106063106064106065106066106067106068106069106070106071106072106073106074106075106076106077106078106079106080106081106082106083106084106085106086106087106088106089106090106091106092106093106094106095106096106097106098106099106100106101106102106103106104106105106106106107106108106109106110106111106112106113106114106115106116106117106118106119106120106121106122106123106124106125106126106127106128106129106130106131106132106133106134106135106136106137106138106139106140106141106142106143106144106145106146106147106148106149106150106151106152106153106154106155106156106157106158106159106160106161106162106163106164106165106166106167106168106169106170106171106172106173106174106175106176106177106178106179106180106181106182106183106184106185106186106187106188106189106190106191106192106193106194106195106196106197106198106199106200106201106202106203106204106205106206106207106208106209106210106211106212106213106214106215106216106217106218106219106220106221106222106223106224106225106226106227106228106229106230106231106232106233106234106235106236106237106238106239106240106241106242106243106244106245106246106247106248106249106250106251106252106253106254106255106256106257106258106259106260106261106262106263106264106265106266106267106268106269106270106271106272106273106274106275106276106277106278106279106280106281106282106283106284106285106286106287106288106289106290106291106292106293106294106295106296106297106298106299106300106301106302106303106304106305106306106307106308106309106310106311106312106313106314106315106316106317106318106319106320106321106322106323106324106325106326106327106328106329106330106331106332106333106334106335106336106337106338106339106340106341106342106343106344106345106346106347106348106349106350106351106352106353106354106355106356106357106358106359106360106361106362106363106364106365106366106367106368106369106370106371106372106373106374106375106376106377106378106379106380106381106382106383106384106385106386106387106388106389106390106391106392106393106394106395106396106397106398106399106400106401106402106403106404106405106406106407106408106409106410106411106412106413106414106415106416106417106418106419106420106421106422106423106424106425106426106427106428106429106430106431106432106433106434106435106436106437106438106439106440106441106442106443106444106445106446106447106448106449106450106451106452106453106454106455106456106457106458106459106460106461106462106463106464106465106466106467106468106469106470106471106472106473106474106475106476106477106478106479106480106481106482106483106484106485106486106487106488106489106490106491106492106493106494106495106496106497106498106499106500106501106502106503106504106505106506106507106508106509106510106511106512106513106514106515106516106517106518106519106520106521106522106523106524106525106526106527106528106529106530106531106532106533106534106535106536106537106538106539106540106541106542106543106544106545106546106547106548106549106550106551106552106553106554106555106556106557106558106559106560106561106562106563106564106565106566106567106568106569106570106571106572106573106574106575106576106577106578106579106580106581106582106583106584106585106586106587106588106589106590106591106592106593106594106595106596106597106598106599106600106601106602106603106604106605106606106607106608106609106610106611106612106613106614106615106616106617106618106619106620106621106622106623106624106625106626106627106628106629106630106631106632106633106634106635106636106637106638106639106640106641106642106643106644106645106646106647106648106649106650106651106652106653106654106655106656106657106658106659106660106661106662106663106664106665106666106667106668106669106670106671106672106673106674106675106676106677106678106679106680106681106682106683106684106685106686106687106688106689106690106691106692106693106694106695106696106697106698106699106700106701106702106703106704106705106706106707106708106709106710106711106712106713106714106715106716106717106718106719106720106721106722106723106724106725106726106727106728106729106730106731106732106733106734106735106736106737106738106739106740106741106742106743106744106745106746106747106748106749106750106751106752106753106754106755106756106757106758106759106760106761106762106763106764106765106766106767106768106769106770106771106772106773106774106775106776106777106778106779106780106781106782106783106784106785106786106787106788106789106790106791106792106793106794106795106796106797106798106799106800106801106802106803106804106805106806106807106808106809106810106811106812106813106814106815106816106817106818106819106820106821106822106823106824106825106826106827106828106829106830106831106832106833106834106835106836106837106838106839106840106841106842106843106844106845106846106847106848106849106850106851106852106853106854106855106856106857106858106859106860106861106862106863106864106865106866106867106868106869106870106871106872106873106874106875106876106877106878106879106880106881106882106883106884106885106886106887106888106889106890106891106892106893106894106895106896106897106898106899106900106901106902106903106904106905106906106907106908106909106910106911106912106913106914106915106916106917106918106919106920106921106922106923106924106925106926106927106928106929106930106931106932106933106934106935106936106937106938106939106940106941106942106943106944106945106946106947106948106949106950106951106952106953106954106955106956106957106958106959106960106961106962106963106964106965106966106967106968106969106970106971106972106973106974106975106976106977106978106979106980106981106982106983106984106985106986106987106988106989106990106991106992106993106994106995106996106997106998106999107000107001107002107003107004107005107006107007107008107009107010107011107012107013107014107015107016107017107018107019107020107021107022107023107024107025107026107027107028107029107030107031107032107033107034107035107036107037107038107039107040107041107042107043107044107045107046107047107048107049107050107051107052107053107054107055107056107057107058107059107060107061107062107063107064107065107066107067107068107069107070107071107072107073107074107075107076107077107078107079107080107081107082107083107084107085107086107087107088107089107090107091107092107093107094107095107096107097107098107099107100107101107102107103107104107105107106107107107108107109107110107111107112107113107114107115107116107117107118107119107120107121107122107123107124107125107126107127107128107129107130107131107132107133107134107135107136107137107138107139107140107141107142107143107144107145107146107147107148107149107150107151107152107153107154107155107156107157107158107159107160107161107162107163107164107165107166107167107168107169107170107171107172107173107174107175107176107177107178107179107180107181107182107183107184107185107186107187107188107189107190107191107192107193107194107195107196107197107198107199107200107201107202107203107204107205107206107207107208107209107210107211107212107213107214107215107216107217107218107219107220107221107222107223107224107225107226107227107228107229107230107231107232107233107234107235107236107237107238107239107240107241107242107243107244107245107246107247107248107249107250107251107252107253107254107255107256107257107258107259107260107261107262107263107264107265107266107267107268107269107270107271107272107273107274107275107276107277107278107279107280107281107282107283107284107285107286107287107288107289107290107291107292107293107294107295107296107297107298107299107300107301107302107303107304107305107306107307107308107309107310107311107312107313107314107315107316107317107318107319107320107321107322107323107324107325107326107327107328107329107330107331107332107333107334107335107336107337107338107339107340107341107342107343107344107345107346107347107348107349107350107351107352107353107354107355107356107357107358107359107360107361107362107363107364107365107366107367107368107369107370107371107372107373107374107375107376107377107378107379107380107381107382107383107384107385107386107387107388107389107390107391107392107393107394107395107396107397107398107399107400107401107402107403107404107405107406107407107408107409107410107411107412107413107414107415107416107417107418107419107420107421107422107423107424107425107426107427107428107429107430107431107432107433107434107435107436107437107438107439107440107441107442107443107444107445107446107447107448107449107450107451107452107453107454107455107456107457107458107459107460107461107462107463107464107465107466107467107468107469107470107471107472107473107474107475107476107477107478107479107480107481107482107483107484107485107486107487107488107489107490107491107492107493107494107495107496107497107498107499107500107501107502107503107504107505107506107507107508107509107510107511107512107513107514107515107516107517107518107519107520107521107522107523107524107525107526107527107528107529107530107531107532107533107534107535107536107537107538107539107540107541107542107543107544107545107546107547107548107549107550107551107552107553107554107555107556107557107558107559107560107561107562107563107564107565107566107567107568107569107570107571107572107573107574107575107576107577107578107579107580107581107582107583107584107585107586107587107588107589107590107591107592107593107594107595107596107597107598107599107600107601107602107603107604107605107606107607107608107609107610107611107612107613107614107615107616107617107618107619107620107621107622107623107624107625107626107627107628107629107630107631107632107633107634107635107636107637107638107639107640107641107642107643107644107645107646107647107648107649107650107651107652107653107654107655107656107657107658107659107660107661107662107663107664107665107666107667107668107669107670107671107672107673107674107675107676107677107678107679107680107681107682107683107684107685107686107687107688107689107690107691107692107693107694107695107696107697107698107699107700107701107702107703107704107705107706107707107708107709107710107711107712107713107714107715107716107717107718107719107720107721107722107723107724107725107726107727107728107729107730107731107732107733107734107735107736107737107738107739107740107741107742107743107744107745107746107747107748107749107750107751107752107753107754107755107756107757107758107759107760107761107762107763107764107765107766107767107768107769107770107771107772107773107774107775107776107777107778107779107780107781107782107783107784107785107786107787107788107789107790107791107792107793107794107795107796107797107798107799107800107801107802107803107804107805107806107807107808107809107810107811107812107813107814107815107816107817107818107819107820107821107822107823107824107825107826107827107828107829107830107831107832107833107834107835107836107837107838107839107840107841107842107843107844107845107846107847107848107849107850107851107852107853107854107855107856107857107858107859107860107861107862107863107864107865107866107867107868107869107870107871107872107873107874107875107876107877107878107879107880107881107882107883107884107885107886107887107888107889107890107891107892107893107894107895107896107897107898107899107900107901107902107903107904107905107906107907107908107909107910107911107912107913107914107915107916107917107918107919107920107921107922107923107924107925107926107927107928107929107930107931107932107933107934107935107936107937107938107939107940107941107942107943107944107945107946107947107948107949107950107951107952107953107954107955107956107957107958107959107960107961107962107963107964107965107966107967107968107969107970107971107972107973107974107975107976107977107978107979107980107981107982107983107984107985107986107987107988107989107990107991107992107993107994107995107996107997107998107999108000108001108002108003108004108005108006108007108008108009108010108011108012108013108014108015108016108017108018108019108020108021108022108023108024108025108026108027108028108029108030108031108032108033108034108035108036108037108038108039108040108041108042108043108044108045108046108047108048108049108050108051108052108053108054108055108056108057108058108059108060108061108062108063108064108065108066108067108068108069108070108071108072108073108074108075108076108077108078108079108080108081108082108083108084108085108086108087108088108089108090108091108092108093108094108095108096108097108098108099108100108101108102108103108104108105108106108107108108108109108110108111108112108113108114108115108116108117108118108119108120108121108122108123108124108125108126108127108128108129108130108131108132108133108134108135108136108137108138108139108140108141108142108143108144108145108146108147108148108149108150108151108152108153108154108155108156108157108158108159108160108161108162108163108164108165108166108167108168108169108170108171108172108173108174108175108176108177108178108179108180108181108182108183108184108185108186108187108188108189108190108191108192108193108194108195108196108197108198108199108200108201108202108203108204108205108206108207108208108209108210108211108212108213108214108215108216108217108218108219108220108221108222108223108224108225108226108227108228108229108230108231108232108233108234108235108236108237108238108239108240108241108242108243108244108245108246108247108248108249108250108251108252108253108254108255108256108257108258108259108260108261108262108263108264108265108266108267108268108269108270108271108272108273108274108275108276108277108278108279108280108281108282108283108284108285108286108287108288108289108290108291108292108293108294108295108296108297108298108299108300108301108302108303108304108305108306108307108308108309108310108311108312108313108314108315108316108317108318108319108320108321108322108323108324108325108326108327108328108329108330108331108332108333108334108335108336108337108338108339108340108341108342108343108344108345108346108347108348108349108350108351108352108353108354108355108356108357108358108359108360108361108362108363108364108365108366108367108368108369108370108371108372108373108374108375108376108377108378108379108380108381108382108383108384108385108386108387108388108389108390108391108392108393108394108395108396108397108398108399108400108401108402108403108404108405108406108407108408108409108410108411108412108413108414108415108416108417108418108419108420108421108422108423108424108425108426108427108428108429108430108431108432108433108434108435108436108437108438108439108440108441108442108443108444108445108446108447108448108449108450108451108452108453108454108455108456108457108458108459108460108461108462108463108464108465108466108467108468108469108470108471108472108473108474108475108476108477108478108479108480108481108482108483108484108485108486108487108488108489108490108491108492108493108494108495108496108497108498108499108500108501108502108503108504108505108506108507108508108509108510108511108512108513108514108515108516108517108518108519108520108521108522108523108524108525108526108527108528108529108530108531108532108533108534108535108536108537108538108539108540108541108542108543108544108545108546108547108548108549108550108551108552108553108554108555108556108557108558108559108560108561108562108563108564108565108566108567108568108569108570108571108572108573108574108575108576108577108578108579108580108581108582108583108584108585108586108587108588108589108590108591108592108593108594108595108596108597108598108599108600108601108602108603108604108605108606108607108608108609108610108611108612108613108614108615108616108617108618108619108620108621108622108623108624108625108626108627108628108629108630108631108632108633108634108635108636108637108638108639108640108641108642108643108644108645108646108647108648108649108650108651108652108653108654108655108656108657108658108659108660108661108662108663108664108665108666108667108668108669108670108671108672108673108674108675108676108677108678108679108680108681108682108683108684108685108686108687108688108689108690108691108692108693108694108695108696108697108698108699108700108701108702108703108704108705108706108707108708108709108710108711108712108713108714108715108716108717108718108719108720108721108722108723108724108725108726108727108728108729108730108731108732108733108734108735108736108737108738108739108740108741108742108743108744108745108746108747108748108749108750108751108752108753108754108755108756108757108758108759108760108761108762108763108764108765108766108767108768108769108770108771108772108773108774108775108776108777108778108779108780108781108782108783108784108785108786108787108788108789108790108791108792108793108794108795108796108797108798108799108800108801108802108803108804108805108806108807108808108809108810108811108812108813108814108815108816108817108818108819108820108821108822108823108824108825108826108827108828108829108830108831108832108833108834108835108836108837108838108839108840108841108842108843108844108845108846108847108848108849108850108851108852108853108854108855108856108857108858108859108860108861108862108863108864108865108866108867108868108869108870108871108872108873108874108875108876108877108878108879108880108881108882108883108884108885108886108887108888108889108890108891108892108893108894108895108896108897108898108899108900108901108902108903108904108905108906108907108908108909108910108911108912108913108914108915108916108917108918108919108920108921108922108923108924108925108926108927108928108929108930108931108932108933108934108935108936108937108938108939108940108941108942108943108944108945108946108947108948108949108950108951108952108953108954108955108956108957108958108959108960108961108962108963108964108965108966108967108968108969108970108971108972108973108974108975108976108977108978108979108980108981108982108983108984108985108986108987108988108989108990108991108992108993108994108995108996108997108998108999109000109001109002109003109004109005109006109007109008109009109010109011109012109013109014109015109016109017109018109019109020109021109022109023109024109025109026109027109028109029109030109031109032109033109034109035109036109037109038109039109040109041109042109043109044109045109046109047109048109049109050109051109052109053109054109055109056109057109058109059109060109061109062109063109064109065109066109067109068109069109070109071109072109073109074109075109076109077109078109079109080109081109082109083109084109085109086109087109088109089109090109091109092109093109094109095109096109097109098109099109100109101109102109103109104109105109106109107109108109109109110109111109112109113109114109115109116109117109118109119109120109121109122109123109124109125109126109127109128109129109130109131109132109133109134109135109136109137109138109139109140109141109142109143109144109145109146109147109148109149109150109151109152109153109154109155109156109157109158109159109160109161109162109163109164109165109166109167109168109169109170109171109172109173109174109175109176109177109178109179109180109181109182109183109184109185109186109187109188109189109190109191109192109193109194109195109196109197109198109199109200109201109202109203109204109205109206109207109208109209109210109211109212109213109214109215109216109217109218109219109220109221109222109223109224109225109226109227109228109229109230109231109232109233109234109235109236109237109238109239109240109241109242109243109244109245109246109247109248109249109250109251109252109253109254109255109256109257109258109259109260109261109262109263109264109265109266109267109268109269109270109271109272109273109274109275109276109277109278109279109280109281109282109283109284109285109286109287109288109289109290109291109292109293109294109295109296109297109298109299109300109301109302109303109304109305109306109307109308109309109310109311109312109313109314109315109316109317109318109319109320109321109322109323109324109325109326109327109328109329109330109331109332109333109334109335109336109337109338109339109340109341109342109343109344109345109346109347109348109349109350109351109352109353109354109355109356109357109358109359109360109361109362109363109364109365109366109367109368109369109370109371109372109373109374109375109376109377109378109379109380109381109382109383109384109385109386109387109388109389109390109391109392109393109394109395109396109397109398109399109400109401109402109403109404109405109406109407109408109409109410109411109412109413109414109415109416109417109418109419109420109421109422109423109424109425109426109427109428109429109430109431109432109433109434109435109436109437109438109439109440109441109442109443109444109445109446109447109448109449109450109451109452109453109454109455109456109457109458109459109460109461109462109463109464109465109466109467109468109469109470109471109472109473109474109475109476109477109478109479109480109481109482109483109484109485109486109487109488109489109490109491109492109493109494109495109496109497109498109499109500109501109502109503109504109505109506109507109508109509109510109511109512109513109514109515109516109517109518109519109520109521109522109523109524109525109526109527109528109529109530109531109532109533109534109535109536109537109538109539109540109541109542109543109544109545109546109547109548109549109550109551109552109553109554109555109556109557109558109559109560109561109562109563109564109565109566109567109568109569109570109571109572109573109574109575109576109577109578109579109580109581109582109583109584109585109586109587109588109589109590109591109592109593109594109595109596109597109598109599109600109601109602109603109604109605109606109607109608109609109610109611109612109613109614109615109616109617109618109619109620109621109622109623109624109625109626109627109628109629109630109631109632109633109634109635109636109637109638109639109640109641109642109643109644109645109646109647109648109649109650109651109652109653109654109655109656109657109658109659109660109661109662109663109664109665109666109667109668109669109670109671109672109673109674109675109676109677109678109679109680109681109682109683109684109685109686109687109688109689109690109691109692109693109694109695109696109697109698109699109700109701109702109703109704109705109706109707109708109709109710109711109712109713109714109715109716109717109718109719109720109721109722109723109724109725109726109727109728109729109730109731109732109733109734109735109736109737109738109739109740109741109742109743109744109745109746109747109748109749109750109751109752109753109754109755109756109757109758109759109760109761109762109763109764109765109766109767109768109769109770109771109772109773109774109775109776109777109778109779109780109781109782109783109784109785109786109787109788109789109790109791109792109793109794109795109796109797109798109799109800109801109802109803109804109805109806109807109808109809109810109811109812109813109814109815109816109817109818109819109820109821109822109823109824109825109826109827109828109829109830109831109832109833109834109835109836109837109838109839109840109841109842109843109844109845109846109847109848109849109850109851109852109853109854109855109856109857109858109859109860109861109862109863109864109865109866109867109868109869109870109871109872109873109874109875109876109877109878109879109880109881109882109883109884109885109886109887109888109889109890109891109892109893109894109895109896109897109898109899109900109901109902109903109904109905109906109907109908109909109910109911109912109913109914109915109916109917109918109919109920109921109922109923109924109925109926109927109928109929109930109931109932109933109934109935109936109937109938109939109940109941109942109943109944109945109946109947109948109949109950109951109952109953109954109955109956109957109958109959109960109961109962109963109964109965109966109967109968109969109970109971109972109973109974109975109976109977109978109979109980109981109982109983109984109985109986109987109988109989109990109991109992109993109994109995109996109997109998109999110000110001110002110003110004110005110006110007110008110009110010110011110012110013110014110015110016110017110018110019110020110021110022110023110024110025110026110027110028110029110030110031110032110033110034110035110036110037110038110039110040110041110042110043110044110045110046110047110048110049110050110051110052110053110054110055110056110057110058110059110060110061110062110063110064110065110066110067110068110069110070110071110072110073110074110075110076110077110078110079110080110081110082110083110084110085110086110087110088110089110090110091110092110093110094110095110096110097110098110099110100110101110102110103110104110105110106110107110108110109110110110111110112110113110114110115110116110117110118110119110120110121110122110123110124110125110126110127110128110129110130110131110132110133110134110135110136110137110138110139110140110141110142110143110144110145110146110147110148110149110150110151110152110153110154110155110156110157110158110159110160110161110162110163110164110165110166110167110168110169110170110171110172110173110174110175110176110177110178110179110180110181110182110183110184110185110186110187110188110189110190110191110192110193110194110195110196110197110198110199110200110201110202110203110204110205110206110207110208110209110210110211110212110213110214110215110216110217110218110219110220110221110222110223110224110225110226110227110228110229110230110231110232110233110234110235110236110237110238110239110240110241110242110243110244110245110246110247110248110249110250110251110252110253110254110255110256110257110258110259110260110261110262110263110264110265110266110267110268110269110270110271110272110273110274110275110276110277110278110279110280110281110282110283110284110285110286110287110288110289110290110291110292110293110294110295110296110297110298110299110300110301110302110303110304110305110306110307110308110309110310110311110312110313110314110315110316110317110318110319110320110321110322110323110324110325110326110327110328110329110330110331110332110333110334110335110336110337110338110339110340110341110342110343110344110345110346110347110348110349110350110351110352110353110354110355110356110357110358110359110360110361110362110363110364110365110366110367110368110369110370110371110372110373110374110375110376110377110378110379110380110381110382110383110384110385110386110387110388110389110390110391110392110393110394110395110396110397110398110399110400110401110402110403110404110405110406110407110408110409110410110411110412110413110414110415110416110417110418110419110420110421110422110423110424110425110426110427110428110429110430110431110432110433110434110435110436110437110438110439110440110441110442110443110444110445110446110447110448110449110450110451110452110453110454110455110456110457110458110459110460110461110462110463110464110465110466110467110468110469110470110471110472110473110474110475110476110477110478110479110480110481110482110483110484110485110486110487110488110489110490110491110492110493110494110495110496110497110498110499110500110501110502110503110504110505110506110507110508110509110510110511110512110513110514110515110516110517110518110519110520110521110522110523110524110525110526110527110528110529110530110531110532110533110534110535110536110537110538110539110540110541110542110543110544110545110546110547110548110549110550110551110552110553110554110555110556110557110558110559110560110561110562110563110564110565110566110567110568110569110570110571110572110573110574110575110576110577110578110579110580110581110582110583110584110585110586110587110588110589110590110591110592110593110594110595110596110597110598110599110600110601110602110603110604110605110606110607110608110609110610110611110612110613110614110615110616110617110618110619110620110621110622110623110624110625110626110627110628110629110630110631110632110633110634110635110636110637110638110639110640110641110642110643110644110645110646110647110648110649110650110651110652110653110654110655110656110657110658110659110660110661110662110663110664110665110666110667110668110669110670110671110672110673110674110675110676110677110678110679110680110681110682110683110684110685110686110687110688110689110690110691110692110693110694110695110696110697110698110699110700110701110702110703110704110705110706110707110708110709110710110711110712110713110714110715110716110717110718110719110720110721110722110723110724110725110726110727110728110729110730110731110732110733110734110735110736110737110738110739110740110741110742110743110744110745110746110747110748110749110750110751110752110753110754110755110756110757110758110759110760110761110762110763110764110765110766110767110768110769110770110771110772110773110774110775110776110777110778110779110780110781110782110783110784110785110786110787110788110789110790110791110792110793110794110795110796110797110798110799110800110801110802110803110804110805110806110807110808110809110810110811110812110813110814110815110816110817110818110819110820110821110822110823110824110825110826110827110828110829110830110831110832110833110834110835110836110837110838110839110840110841110842110843110844110845110846110847110848110849110850110851110852110853110854110855110856110857110858110859110860110861110862110863110864110865110866110867110868110869110870110871110872110873110874110875110876110877110878110879110880110881110882110883110884110885110886110887110888110889110890110891110892110893110894110895110896110897110898110899110900110901110902110903110904110905110906110907110908110909110910110911110912110913110914110915110916110917110918110919110920110921110922110923110924110925110926110927110928110929110930110931110932110933110934110935110936110937110938110939110940110941110942110943110944110945110946110947110948110949110950110951110952110953110954110955110956110957110958110959110960110961110962110963110964110965110966110967110968110969110970110971110972110973110974110975110976110977110978110979110980110981110982110983110984110985110986110987110988110989110990110991110992110993110994110995110996110997110998110999111000111001111002111003111004111005111006111007111008111009111010111011111012111013111014111015111016111017111018111019111020111021111022111023111024111025111026111027111028111029111030111031111032111033111034111035111036111037111038111039111040111041111042111043111044111045111046111047111048111049111050111051111052111053111054111055111056111057111058111059111060111061111062111063111064111065111066111067111068111069111070111071111072111073111074111075111076111077111078111079111080111081111082111083111084111085111086111087111088111089111090111091111092111093111094111095111096111097111098111099111100111101111102111103111104111105111106111107111108111109111110111111111112111113111114111115111116111117111118111119111120111121111122111123111124111125111126111127111128111129111130111131111132111133111134111135111136111137111138111139111140111141111142111143111144111145111146111147111148111149111150111151111152111153111154111155111156111157111158111159111160111161111162111163111164111165111166111167111168111169111170111171111172111173111174111175111176111177111178111179111180111181111182111183111184111185111186111187111188111189111190111191111192111193111194111195111196111197111198111199111200111201111202111203111204111205111206111207111208111209111210111211111212111213111214111215111216111217111218111219111220111221111222111223111224111225111226111227111228111229111230111231111232111233111234111235111236111237111238111239111240111241111242111243111244111245111246111247111248111249111250111251111252111253111254111255111256111257111258111259111260111261111262111263111264111265111266111267111268111269111270111271111272111273111274111275111276111277111278111279111280111281111282111283111284111285111286111287111288111289111290111291111292111293111294111295111296111297111298111299111300111301111302111303111304111305111306111307111308111309111310111311111312111313111314111315111316111317111318111319111320111321111322111323111324111325111326111327111328111329111330111331111332111333111334111335111336111337111338111339111340111341111342111343111344111345111346111347111348111349111350111351111352111353111354111355111356111357111358111359111360111361111362111363111364111365111366111367111368111369111370111371111372111373111374111375111376111377111378111379111380111381111382111383111384111385111386111387111388111389111390111391111392111393111394111395111396111397111398111399111400111401111402111403111404111405111406111407111408111409111410111411111412111413111414111415111416111417111418111419111420111421111422111423111424111425111426111427111428111429111430111431111432111433111434111435111436111437111438111439111440111441111442111443111444111445111446111447111448111449111450111451111452111453111454111455111456111457111458111459111460111461111462111463111464111465111466111467111468111469111470111471111472111473111474111475111476111477111478111479111480111481111482111483111484111485111486111487111488111489111490111491111492111493111494111495111496111497111498111499111500111501111502111503111504111505111506111507111508111509111510111511111512111513111514111515111516111517111518111519111520111521111522111523111524111525111526111527111528111529111530111531111532111533111534111535111536111537111538111539111540111541111542111543111544111545111546111547111548111549111550111551111552111553111554111555111556111557111558111559111560111561111562111563111564111565111566111567111568111569111570111571111572111573111574111575111576111577111578111579111580111581111582111583111584111585111586111587111588111589111590111591111592111593111594111595111596111597111598111599111600111601111602111603111604111605111606111607111608111609111610111611111612111613111614111615111616111617111618111619111620111621111622111623111624111625111626111627111628111629111630111631111632111633111634111635111636111637111638111639111640111641111642111643111644111645111646111647111648111649111650111651111652111653111654111655111656111657111658111659111660111661111662111663111664111665111666111667111668111669111670111671111672111673111674111675111676111677111678111679111680111681111682111683111684111685111686111687111688111689111690111691111692111693111694111695111696111697111698111699111700111701111702111703111704111705111706111707111708111709111710111711111712111713111714111715111716111717111718111719111720111721111722111723111724111725111726111727111728111729111730111731111732111733111734111735111736111737111738111739111740111741111742111743111744111745111746111747111748111749111750111751111752111753111754111755111756111757111758111759111760111761111762111763111764111765111766111767111768111769111770111771111772111773111774111775111776111777111778111779111780111781111782111783111784111785111786111787111788111789111790111791111792111793111794111795111796111797111798111799111800111801111802111803111804111805111806111807111808111809111810111811111812111813111814111815111816111817111818111819111820111821111822111823111824111825111826111827111828111829111830111831111832111833111834111835111836111837111838111839111840111841111842111843111844111845111846111847111848111849111850111851111852111853111854111855111856111857111858111859111860111861111862111863111864111865111866111867111868111869111870111871111872111873111874111875111876111877111878111879111880111881111882111883111884111885111886111887111888111889111890111891111892111893111894111895111896111897111898111899111900111901111902111903111904111905111906111907111908111909111910111911111912111913111914111915111916111917111918111919111920111921111922111923111924111925111926111927111928111929111930111931111932111933111934111935111936111937111938111939111940111941111942111943111944111945111946111947111948111949111950111951111952111953111954111955111956111957111958111959111960111961111962111963111964111965111966111967111968111969111970111971111972111973111974111975111976111977111978111979111980111981111982111983111984111985111986111987111988111989111990111991111992111993111994111995111996111997111998111999112000112001112002112003112004112005112006112007112008112009112010112011112012112013112014112015112016112017112018112019112020112021112022112023112024112025112026112027112028112029112030112031112032112033112034112035112036112037112038112039112040112041112042112043112044112045112046112047112048112049112050112051112052112053112054112055112056112057112058112059112060112061112062112063112064112065112066112067112068112069112070112071112072112073112074112075112076112077112078112079112080112081112082112083112084112085112086112087112088112089112090112091112092112093112094112095112096112097112098112099112100112101112102112103112104112105112106112107112108112109112110112111112112112113112114112115112116112117112118112119112120112121112122112123112124112125112126112127112128112129112130112131112132112133112134112135112136112137112138112139112140112141112142112143112144112145112146112147112148112149112150112151112152112153112154112155112156112157112158112159112160112161112162112163112164112165112166112167112168112169112170112171112172112173112174112175112176112177112178112179112180112181112182112183112184112185112186112187112188112189112190112191112192112193112194112195112196112197112198112199112200112201112202112203112204112205112206112207112208112209112210112211112212112213112214112215112216112217112218112219112220112221112222112223112224112225112226112227112228112229112230112231112232112233112234112235112236112237112238112239112240112241112242112243112244112245112246112247112248112249112250112251112252112253112254112255112256112257112258112259112260112261112262112263112264112265112266112267112268112269112270112271112272112273112274112275112276112277112278112279112280112281112282112283112284112285112286112287112288112289112290112291112292112293112294112295112296112297112298112299112300112301112302112303112304112305112306112307112308112309112310112311112312112313112314112315112316112317112318112319112320112321112322112323112324112325112326112327112328112329112330112331112332112333112334112335112336112337112338112339112340112341112342112343112344112345112346112347112348112349112350112351112352112353112354112355112356112357112358112359112360112361112362112363112364112365112366112367112368112369112370112371112372112373112374112375112376112377112378112379112380112381112382112383112384112385112386112387112388112389112390112391112392112393112394112395112396112397112398112399112400112401112402112403112404112405112406112407112408112409112410112411112412112413112414112415112416112417112418112419112420112421112422112423112424112425112426112427112428112429112430112431112432112433112434112435112436112437112438112439112440112441112442112443112444112445112446112447112448112449112450112451112452112453112454112455112456112457112458112459112460112461112462112463112464112465112466112467112468112469112470112471112472112473112474112475112476112477112478112479112480112481112482112483112484112485112486112487112488112489112490112491112492112493112494112495112496112497112498112499112500112501112502112503112504112505112506112507112508112509112510112511112512112513112514112515112516112517112518112519112520112521112522112523112524112525112526112527112528112529112530112531112532112533112534112535112536112537112538112539112540112541112542112543112544112545112546112547112548112549112550112551112552112553112554112555112556112557112558112559112560112561112562112563112564112565112566112567112568112569112570112571112572112573112574112575112576112577112578112579112580112581112582112583112584112585112586112587112588112589112590112591112592112593112594112595112596112597112598112599112600112601112602112603112604112605112606112607112608112609112610112611112612112613112614112615112616112617112618112619112620112621112622112623112624112625112626112627112628112629112630112631112632112633112634112635112636112637112638112639112640112641112642112643112644112645112646112647112648112649112650112651112652112653112654112655112656112657112658112659112660112661112662112663112664112665112666112667112668112669112670112671112672112673112674112675112676112677112678112679112680112681112682112683112684112685112686112687112688112689112690112691112692112693112694112695112696112697112698112699112700112701112702112703112704112705112706112707112708112709112710112711112712112713112714112715112716112717112718112719112720112721112722112723112724112725112726112727112728112729112730112731112732112733112734112735112736112737112738112739112740112741112742112743112744112745112746112747112748112749112750112751112752112753112754112755112756112757112758112759112760112761112762112763112764112765112766112767112768112769112770112771112772112773112774112775112776112777112778112779112780112781112782112783112784112785112786112787112788112789112790112791112792112793112794112795112796112797112798112799112800112801112802112803112804112805112806112807112808112809112810112811112812112813112814112815112816112817112818112819112820112821112822112823112824112825112826112827112828112829112830112831112832112833112834112835112836112837112838112839112840112841112842112843112844112845112846112847112848112849112850112851112852112853112854112855112856112857112858112859112860112861112862112863112864112865112866112867112868112869112870112871112872112873112874112875112876112877112878112879112880112881112882112883112884112885112886112887112888112889112890112891112892112893112894112895112896112897112898112899112900112901112902112903112904112905112906112907112908112909112910112911112912112913112914112915112916112917112918112919112920112921112922112923112924112925112926112927112928112929112930112931112932112933112934112935112936112937112938112939112940112941112942112943112944112945112946112947112948112949112950112951112952112953112954112955112956112957112958112959112960112961112962112963112964112965112966112967112968112969112970112971112972112973112974112975112976112977112978112979112980112981112982112983112984112985112986112987112988112989112990112991112992112993112994112995112996112997112998112999113000113001113002113003113004113005113006113007113008113009113010113011113012113013113014113015113016113017113018113019113020113021113022113023113024113025113026113027113028113029113030113031113032113033113034113035113036113037113038113039113040113041113042113043113044113045113046113047113048113049113050113051113052113053113054113055113056113057113058113059113060113061113062113063113064113065113066113067113068113069113070113071113072113073113074113075113076113077113078113079113080113081113082113083113084113085113086113087113088113089113090113091113092113093113094113095113096113097113098113099113100113101113102113103113104113105113106113107113108113109113110113111113112113113113114113115113116113117113118113119113120113121113122113123113124113125113126113127113128113129113130113131113132113133113134113135113136113137113138113139113140113141113142113143113144113145113146113147113148113149113150113151113152113153113154113155113156113157113158113159113160113161113162113163113164113165113166113167113168113169113170113171113172113173113174113175113176113177113178113179113180113181113182113183113184113185113186113187113188113189113190113191113192113193113194113195113196113197113198113199113200113201113202113203113204113205113206113207113208113209113210113211113212113213113214113215113216113217113218113219113220113221113222113223113224113225113226113227113228113229113230113231113232113233113234113235113236113237113238113239113240113241113242113243113244113245113246113247113248113249113250113251113252113253113254113255113256113257113258113259113260113261113262113263113264113265113266113267113268113269113270113271113272113273113274113275113276113277113278113279113280113281113282113283113284113285113286113287113288113289113290113291113292113293113294113295113296113297113298113299113300113301113302113303113304113305113306113307113308113309113310113311113312113313113314113315113316113317113318113319113320113321113322113323113324113325113326113327113328113329113330113331113332113333113334113335113336113337113338113339113340113341113342113343113344113345113346113347113348113349113350113351113352113353113354113355113356113357113358113359113360113361113362113363113364113365113366113367113368113369113370113371113372113373113374113375113376113377113378113379113380113381113382113383113384113385113386113387113388113389113390113391113392113393113394113395113396113397113398113399113400113401113402113403113404113405113406113407113408113409113410113411113412113413113414113415113416113417113418113419113420113421113422113423113424113425113426113427113428113429113430113431113432113433113434113435113436113437113438113439113440113441113442113443113444113445113446113447113448113449113450113451113452113453113454113455113456113457113458113459113460113461113462113463113464113465113466113467113468113469113470113471113472113473113474113475113476113477113478113479113480113481113482113483113484113485113486113487113488113489113490113491113492113493113494113495113496113497113498113499113500113501113502113503113504113505113506113507113508113509113510113511113512113513113514113515113516113517113518113519113520113521113522113523113524113525113526113527113528113529113530113531113532113533113534113535113536113537113538113539113540113541113542113543113544113545113546113547113548113549113550113551113552113553113554113555113556113557113558113559113560113561113562113563113564113565113566113567113568113569113570113571113572113573113574113575113576113577113578113579113580113581113582113583113584113585113586113587113588113589113590113591113592113593113594113595113596113597113598113599113600113601113602113603113604113605113606113607113608113609113610113611113612113613113614113615113616113617113618113619113620113621113622113623113624113625113626113627113628113629113630113631113632113633113634113635113636113637113638113639113640113641113642113643113644113645113646113647113648113649113650113651113652113653113654113655113656113657113658113659113660113661113662113663113664113665113666113667113668113669113670113671113672113673113674113675113676113677113678113679113680113681113682113683113684113685113686113687113688113689113690113691113692113693113694113695113696113697113698113699113700113701113702113703113704113705113706113707113708113709113710113711113712113713113714113715113716113717113718113719113720113721113722113723113724113725113726113727113728113729113730113731113732113733113734113735113736113737113738113739113740113741113742113743113744113745113746113747113748113749113750113751113752113753113754113755113756113757113758113759113760113761113762113763113764113765113766113767113768113769113770113771113772113773113774113775113776113777113778113779113780113781113782113783113784113785113786113787113788113789113790113791113792113793113794113795113796113797113798113799113800113801113802113803113804113805113806113807113808113809113810113811113812113813113814113815113816113817113818113819113820113821113822113823113824113825113826113827113828113829113830113831113832113833113834113835113836113837113838113839113840113841113842113843113844113845113846113847113848113849113850113851113852113853113854113855113856113857113858113859113860113861113862113863113864113865113866113867113868113869113870113871113872113873113874113875113876113877113878113879113880113881113882113883113884113885113886113887113888113889113890113891113892113893113894113895113896113897113898113899113900113901113902113903113904113905113906113907113908113909113910113911113912113913113914113915113916113917113918113919113920113921113922113923113924113925113926113927113928113929113930113931113932113933113934113935113936113937113938113939113940113941113942113943113944113945113946113947113948113949113950113951113952113953113954113955113956113957113958113959113960113961113962113963113964113965113966113967113968113969113970113971113972113973113974113975113976113977113978113979113980113981113982113983113984113985113986113987113988113989113990113991113992113993113994113995113996113997113998113999114000114001114002114003114004114005114006114007114008114009114010114011114012114013114014114015114016114017114018114019114020114021114022114023114024114025114026114027114028114029114030114031114032114033114034114035114036114037114038114039114040114041114042114043114044114045114046114047114048114049114050114051114052114053114054114055114056114057114058114059114060114061114062114063114064114065114066114067114068114069114070114071114072114073114074114075114076114077114078114079114080114081114082114083114084114085114086114087114088114089114090114091114092114093114094114095114096114097114098114099114100114101114102114103114104114105114106114107114108114109114110114111114112114113114114114115114116114117114118114119114120114121114122114123114124114125114126114127114128114129114130114131114132114133114134114135114136114137114138114139114140114141114142114143114144114145114146114147114148114149114150114151114152114153114154114155114156114157114158114159114160114161114162114163114164114165114166114167114168114169114170114171114172114173114174114175114176114177114178114179114180114181114182114183114184114185114186114187114188114189114190114191114192114193114194114195114196114197114198114199114200114201114202114203114204114205114206114207114208114209114210114211114212114213114214114215114216114217114218114219114220114221114222114223114224114225114226114227114228114229114230114231114232114233114234114235114236114237114238114239114240114241114242114243114244114245114246114247114248114249114250114251114252114253114254114255114256114257114258114259114260114261114262114263114264114265114266114267114268114269114270114271114272114273114274114275114276114277114278114279114280114281114282114283114284114285114286114287114288114289114290114291114292114293114294114295114296114297114298114299114300114301114302114303114304114305114306114307114308114309114310114311114312114313114314114315114316114317114318114319114320114321114322114323114324114325114326114327114328114329114330114331114332114333114334114335114336114337114338114339114340114341114342114343114344114345114346114347114348114349114350114351114352114353114354114355114356114357114358114359114360114361114362114363114364114365114366114367114368114369114370114371114372114373114374114375114376114377114378114379114380114381114382114383114384114385114386114387114388114389114390114391114392114393114394114395114396114397114398114399114400114401114402114403114404114405114406114407114408114409114410114411114412114413114414114415114416114417114418114419114420114421114422114423114424114425114426114427114428114429114430114431114432114433114434114435114436114437114438114439114440114441114442114443114444114445114446114447114448114449114450114451114452114453114454114455114456114457114458114459114460114461114462114463114464114465114466114467114468114469114470114471114472114473114474114475114476114477114478114479114480114481114482114483114484114485114486114487114488114489114490114491114492114493114494114495114496114497114498114499114500114501114502114503114504114505114506114507114508114509114510114511114512114513114514114515114516114517114518114519114520114521114522114523114524114525114526114527114528114529114530114531114532114533114534114535114536114537114538114539114540114541114542114543114544114545114546114547114548114549114550114551114552114553114554114555114556114557114558114559114560114561114562114563114564114565114566114567114568114569114570114571114572114573114574114575114576114577114578114579114580114581114582114583114584114585114586114587114588114589114590114591114592114593114594114595114596114597114598114599114600114601114602114603114604114605114606114607114608114609114610114611114612114613114614114615114616114617114618114619114620114621114622114623114624114625114626114627114628114629114630114631114632114633114634114635114636114637114638114639114640114641114642114643114644114645114646114647114648114649114650114651114652114653114654114655114656114657114658114659114660114661114662114663114664114665114666114667114668114669114670114671114672114673114674114675114676114677114678114679114680114681114682114683114684114685114686114687114688114689114690114691114692114693114694114695114696114697114698114699114700114701114702114703114704114705114706114707114708114709114710114711114712114713114714114715114716114717114718114719114720114721114722114723114724114725114726114727114728114729114730114731114732114733114734114735114736114737114738114739114740114741114742114743114744114745114746114747114748114749114750114751114752114753114754114755114756114757114758114759114760114761114762114763114764114765114766114767114768114769114770114771114772114773114774114775114776114777114778114779114780114781114782114783114784114785114786114787114788114789114790114791114792114793114794114795114796114797114798114799114800114801114802114803114804114805114806114807114808114809114810114811114812114813114814114815114816114817114818114819114820114821114822114823114824114825114826114827114828114829114830114831114832114833114834114835114836114837114838114839114840114841114842114843114844114845114846114847114848114849114850114851114852114853114854114855114856114857114858114859114860114861114862114863114864114865114866114867114868114869114870114871114872114873114874114875114876114877114878114879114880114881114882114883114884114885114886114887114888114889114890114891114892114893114894114895114896114897114898114899114900114901114902114903114904114905114906114907114908114909114910114911114912114913114914114915114916114917114918114919114920114921114922114923114924114925114926114927114928114929114930114931114932114933114934114935114936114937114938114939114940114941114942114943114944114945114946114947114948114949114950114951114952114953114954114955114956114957114958114959114960114961114962114963114964114965114966114967114968114969114970114971114972114973114974114975114976114977114978114979114980114981114982114983114984114985114986114987114988114989114990114991114992114993114994114995114996114997114998114999115000115001115002115003115004115005115006115007115008115009115010115011115012115013115014115015115016115017115018115019115020115021115022115023115024115025115026115027115028115029115030115031115032115033115034115035115036115037115038115039115040115041115042115043115044115045115046115047115048115049115050115051115052115053115054115055115056115057115058115059115060115061115062115063115064115065115066115067115068115069115070115071115072115073115074115075115076115077115078115079115080115081115082115083115084115085115086115087115088115089115090115091115092115093115094115095115096115097115098115099115100115101115102115103115104115105115106115107115108115109115110115111115112115113115114115115115116115117115118115119115120115121115122115123115124115125115126115127115128115129115130115131115132115133115134115135115136115137115138115139115140115141115142115143115144115145115146115147115148115149115150115151115152115153115154115155115156115157115158115159115160115161115162115163115164115165115166115167115168115169115170115171115172115173115174115175115176115177115178115179115180115181115182115183115184115185115186115187115188115189115190115191115192115193115194115195115196115197115198115199115200115201115202115203115204115205115206115207115208115209115210115211115212115213115214115215115216115217115218115219115220115221115222115223115224115225115226115227115228115229115230115231115232115233115234115235115236115237115238115239115240115241115242115243115244115245115246115247115248115249115250115251115252115253115254115255115256115257115258115259115260115261115262115263115264115265115266115267115268115269115270115271115272115273115274115275115276115277115278115279115280115281115282115283115284115285115286115287115288115289115290115291115292115293115294115295115296115297115298115299115300115301115302115303115304115305115306115307115308115309115310115311115312115313115314115315115316115317115318115319115320115321115322115323115324115325115326115327115328115329115330115331115332115333115334115335115336115337115338115339115340115341115342115343115344115345115346115347115348115349115350115351115352115353115354115355115356115357115358115359115360115361115362115363115364115365115366115367115368115369115370115371115372115373115374115375115376115377115378115379115380115381115382115383115384115385115386115387115388115389115390115391115392115393115394115395115396115397115398115399115400115401115402115403115404115405115406115407115408115409115410115411115412115413115414115415115416115417115418115419115420115421115422115423115424115425115426115427115428115429115430115431115432115433115434115435115436115437115438115439115440115441115442115443115444115445115446115447115448115449115450115451115452115453115454115455115456115457115458115459115460115461115462115463115464115465115466115467115468115469115470115471115472115473115474115475115476115477115478115479115480115481115482115483115484115485115486115487115488115489115490115491115492115493115494115495115496115497115498115499115500115501115502115503115504115505115506115507115508115509115510115511115512115513115514115515115516115517115518115519115520115521115522115523115524115525115526115527115528115529115530115531115532115533115534115535115536115537115538115539115540115541115542115543115544115545115546115547115548115549115550115551115552115553115554115555115556115557115558115559115560115561115562115563115564115565115566115567115568115569115570115571115572115573115574115575115576115577115578115579115580115581115582115583115584115585115586115587115588115589115590115591115592115593115594115595115596115597115598115599115600115601115602115603115604115605115606115607115608115609115610115611115612115613115614115615115616115617115618115619115620115621115622115623115624115625115626115627115628115629115630115631115632115633115634115635115636115637115638115639115640115641115642115643115644115645115646115647115648115649115650115651115652115653115654115655115656115657115658115659115660115661115662115663115664115665115666115667115668115669115670115671115672115673115674115675115676115677115678115679115680115681115682115683115684115685115686115687115688115689115690115691115692115693115694115695115696115697115698115699115700115701115702115703115704115705115706115707115708115709115710115711115712115713115714115715115716115717115718115719115720115721115722115723115724115725115726115727115728115729115730115731115732115733115734115735115736115737115738115739115740115741115742115743115744115745115746115747115748115749115750115751115752115753115754115755115756115757115758115759115760115761115762115763115764115765115766115767115768115769115770115771115772115773115774115775115776115777115778115779115780115781115782115783115784115785115786115787115788115789115790115791115792115793115794115795115796115797115798115799115800115801115802115803115804115805115806115807115808115809115810115811115812115813115814115815115816115817115818115819115820115821115822115823115824115825115826115827115828115829115830115831115832115833115834115835115836115837115838115839115840115841115842115843115844115845115846115847115848115849115850115851115852115853115854115855115856115857115858115859115860115861115862115863115864115865115866115867115868115869115870115871115872115873115874115875115876115877115878115879115880115881115882115883115884115885115886115887115888115889115890115891115892115893115894115895115896115897115898115899115900115901115902115903115904115905115906115907115908115909115910115911115912115913115914115915115916115917115918115919115920115921115922115923115924115925115926115927115928115929115930115931115932115933115934115935115936115937115938115939115940115941115942115943115944115945115946115947115948115949115950115951115952115953115954115955115956115957115958115959115960115961115962115963115964115965115966115967115968115969115970115971115972115973115974115975115976115977115978115979115980115981115982115983115984115985115986115987115988115989115990115991115992115993115994115995115996115997115998115999116000116001116002116003116004116005116006116007116008116009116010116011116012116013116014116015116016116017116018116019116020116021116022116023116024116025116026116027116028116029116030116031116032116033116034116035116036116037116038116039116040116041116042116043116044116045116046116047116048116049116050116051116052116053116054116055116056116057116058116059116060116061116062116063116064116065116066116067116068116069116070116071116072116073116074116075116076116077116078116079116080116081116082116083116084116085116086116087116088116089116090116091116092116093116094116095116096116097116098116099116100116101116102116103116104116105116106116107116108116109116110116111116112116113116114116115116116116117116118116119116120116121116122116123116124116125116126116127116128116129116130116131116132116133116134116135116136116137116138116139116140116141116142116143116144116145116146116147116148116149116150116151116152116153116154116155116156116157116158116159116160116161116162116163116164116165116166116167116168116169116170116171116172116173116174116175116176116177116178116179116180116181116182116183116184116185116186116187116188116189116190116191116192116193116194116195116196116197116198116199116200116201116202116203116204116205116206116207116208116209116210116211116212116213116214116215116216116217116218116219116220116221116222116223116224116225116226116227116228116229116230116231116232116233116234116235116236116237116238116239116240116241116242116243116244116245116246116247116248116249116250116251116252116253116254116255116256116257116258116259116260116261116262116263116264116265116266116267116268116269116270116271116272116273116274116275116276116277116278116279116280116281116282116283116284116285116286116287116288116289116290116291116292116293116294116295116296116297116298116299116300116301116302116303116304116305116306116307116308116309116310116311116312116313116314116315116316116317116318116319116320116321116322116323116324116325116326116327116328116329116330116331116332116333116334116335116336116337116338116339116340116341116342116343116344116345116346116347116348116349116350116351116352116353116354116355116356116357116358116359116360116361116362116363116364116365116366116367116368116369116370116371116372116373116374116375116376116377116378116379116380116381116382116383116384116385116386116387116388116389116390116391116392116393116394116395116396116397116398116399116400116401116402116403116404116405116406116407116408116409116410116411116412116413116414116415116416116417116418116419116420116421116422116423116424116425116426116427116428116429116430116431116432116433116434116435116436116437116438116439116440116441116442116443116444116445116446116447116448116449116450116451116452116453116454116455116456116457116458116459116460116461116462116463116464116465116466116467116468116469116470116471116472116473116474116475116476116477116478116479116480116481116482116483116484116485116486116487116488116489116490116491116492116493116494116495116496116497116498116499116500116501116502116503116504116505116506116507116508116509116510116511116512116513116514116515116516116517116518116519116520116521116522116523116524116525116526116527116528116529116530116531116532116533116534116535116536116537116538116539116540116541116542116543116544116545116546116547116548116549116550116551116552116553116554116555116556116557116558116559116560116561116562116563116564116565116566116567116568116569116570116571116572116573116574116575116576116577116578116579116580116581116582116583116584116585116586116587116588116589116590116591116592116593116594116595116596116597116598116599116600116601116602116603116604116605116606116607116608116609116610116611116612116613116614116615116616116617116618116619116620116621116622116623116624116625116626116627116628116629116630116631116632116633116634116635116636116637116638116639116640116641116642116643116644116645116646116647116648116649116650116651116652116653116654116655116656116657116658116659116660116661116662116663116664116665116666116667116668116669116670116671116672116673116674116675116676116677116678116679116680116681116682116683116684116685116686116687116688116689116690116691116692116693116694116695116696116697116698116699116700116701116702116703116704116705116706116707116708116709116710116711116712116713116714116715116716116717116718116719116720116721116722116723116724116725116726116727116728116729116730116731116732116733116734116735116736116737116738116739116740116741116742116743116744116745116746116747116748116749116750116751116752116753116754116755116756116757116758116759116760116761116762116763116764116765116766116767116768116769116770116771116772116773116774116775116776116777116778116779116780116781116782116783116784116785116786116787116788116789116790116791116792116793116794116795116796116797116798116799116800116801116802116803116804116805116806116807116808116809116810116811116812116813116814116815116816116817116818116819116820116821116822116823116824116825116826116827116828116829116830116831116832116833116834116835116836116837116838116839116840116841116842116843116844116845116846116847116848116849116850116851116852116853116854116855116856116857116858116859116860116861116862116863116864116865116866116867116868116869116870116871116872116873116874116875116876116877116878116879116880116881116882116883116884116885116886116887116888116889116890116891116892116893116894116895116896116897116898116899116900116901116902116903116904116905116906116907116908116909116910116911116912116913116914116915116916116917116918116919116920116921116922116923116924116925116926116927116928116929116930116931116932116933116934116935116936116937116938116939116940116941116942116943116944116945116946116947116948116949116950116951116952116953116954116955116956116957116958116959116960116961116962116963116964116965116966116967116968116969116970116971116972116973116974116975116976116977116978116979116980116981116982116983116984116985116986116987116988116989116990116991116992116993116994116995116996116997116998116999117000117001117002117003117004117005117006117007117008117009117010117011117012117013117014117015117016117017117018117019117020117021117022117023117024117025117026117027117028117029117030117031117032117033117034117035117036117037117038117039117040117041117042117043117044117045117046117047117048117049117050117051117052117053117054117055117056117057117058117059117060117061117062117063117064117065117066117067117068117069117070117071117072117073117074117075117076117077117078117079117080117081117082117083117084117085117086117087117088117089117090117091117092117093117094117095117096117097117098117099117100117101117102117103117104117105117106117107117108117109117110117111117112117113117114117115117116117117117118117119117120117121117122117123117124117125117126117127117128117129117130117131117132117133117134117135117136117137117138117139117140117141117142117143117144117145117146117147117148117149117150117151117152117153117154117155117156117157117158117159117160117161117162117163117164117165117166117167117168117169117170117171117172117173117174117175117176117177117178117179117180117181117182117183117184117185117186117187117188117189117190117191117192117193117194117195117196117197117198117199117200117201117202117203117204117205117206117207117208117209117210117211117212117213117214117215117216117217117218117219117220117221117222117223117224117225117226117227117228117229117230117231117232117233117234117235117236117237117238117239117240117241117242117243117244117245117246117247117248117249117250117251117252117253117254117255117256117257117258117259117260117261117262117263117264117265117266117267117268117269117270117271117272117273117274117275117276117277117278117279117280117281117282117283117284117285117286117287117288117289117290117291117292117293117294117295117296117297117298117299117300117301117302117303117304117305117306117307117308117309117310117311117312117313117314117315117316117317117318117319117320117321117322117323117324117325117326117327117328117329117330117331117332117333117334117335117336117337117338117339117340117341117342117343117344117345117346117347117348117349117350117351117352117353117354117355117356117357117358117359117360117361117362117363117364117365117366117367117368117369117370117371117372117373117374117375117376117377117378117379117380117381117382117383117384117385117386117387117388117389117390117391117392117393117394117395117396117397117398117399117400117401117402117403117404117405117406117407117408117409117410117411117412117413117414117415117416117417117418117419117420117421117422117423117424117425117426117427117428117429117430117431117432117433117434117435117436117437117438117439117440117441117442117443117444117445117446117447117448117449117450117451117452117453117454117455117456117457117458117459117460117461117462117463117464117465117466117467117468117469117470117471117472117473117474117475117476117477117478117479117480117481117482117483117484117485117486117487117488117489117490117491117492117493117494117495117496117497117498117499117500117501117502117503117504117505117506117507117508117509117510117511117512117513117514117515117516117517117518117519117520117521117522117523117524117525117526117527117528117529117530117531117532117533117534117535117536117537117538117539117540117541117542117543117544117545117546117547117548117549117550117551117552117553117554117555117556117557117558117559117560117561117562117563117564117565117566117567117568117569117570117571117572117573117574117575117576117577117578117579117580117581117582117583117584117585117586117587117588117589117590117591117592117593117594117595117596117597117598117599117600117601117602117603117604117605117606117607117608117609117610117611117612117613117614117615117616117617117618117619117620117621117622117623117624117625117626117627117628117629117630117631117632117633117634117635117636117637117638117639117640117641117642117643117644117645117646117647117648117649117650117651117652117653117654117655117656117657117658117659117660117661117662117663117664117665117666117667117668117669117670117671117672117673117674117675117676117677117678117679117680117681117682117683117684117685117686117687117688117689117690117691117692117693117694117695117696117697117698117699117700117701117702117703117704117705117706117707117708117709117710117711117712117713117714117715117716117717117718117719117720117721117722117723117724117725117726117727117728117729117730117731117732117733117734117735117736117737117738117739117740117741117742117743117744117745117746117747117748117749117750117751117752117753117754117755117756117757117758117759117760117761117762117763117764117765117766117767117768117769117770117771117772117773117774117775117776117777117778117779117780117781117782117783117784117785117786117787117788117789117790117791117792117793117794117795117796117797117798117799117800117801117802117803117804117805117806117807117808117809117810117811117812117813117814117815117816117817117818117819117820117821117822117823117824117825117826117827117828117829117830117831117832117833117834117835117836117837117838117839117840117841117842117843117844117845117846117847117848117849117850117851117852117853117854117855117856117857117858117859117860117861117862117863117864117865117866117867117868117869117870117871117872117873117874117875117876117877117878117879117880117881117882117883117884117885117886117887117888117889117890117891117892117893117894117895117896117897117898117899117900117901117902117903117904117905117906117907117908117909117910117911117912117913117914117915117916117917117918117919117920117921117922117923117924117925117926117927117928117929117930117931117932117933117934117935117936117937117938117939117940117941117942117943117944117945117946117947117948117949117950117951117952117953117954117955117956117957117958117959117960117961117962117963117964117965117966117967117968117969117970117971117972117973117974117975117976117977117978117979117980117981117982117983117984117985117986117987117988117989117990117991117992117993117994117995117996117997117998117999118000118001118002118003118004118005118006118007118008118009118010118011118012118013118014118015118016118017118018118019118020118021118022118023118024118025118026118027118028118029118030118031118032118033118034118035118036118037118038118039118040118041118042118043118044118045118046118047118048118049118050118051118052118053118054118055118056118057118058118059118060118061118062118063118064118065118066118067118068118069118070118071118072118073118074118075118076118077118078118079118080118081118082118083118084118085118086118087118088118089118090118091118092118093118094118095118096118097118098118099118100118101118102118103118104118105118106118107118108118109118110118111118112118113118114118115118116118117118118118119118120118121118122118123118124118125118126118127118128118129118130118131118132118133118134118135118136118137118138118139118140118141118142118143118144118145118146118147118148118149118150118151118152118153118154118155118156118157118158118159118160118161118162118163118164118165118166118167118168118169118170118171118172118173118174118175118176118177118178118179118180118181118182118183118184118185118186118187118188118189118190118191118192118193118194118195118196118197118198118199118200118201118202118203118204118205118206118207118208118209118210118211118212118213118214118215118216118217118218118219118220118221118222118223118224118225118226118227118228118229118230118231118232118233118234118235118236118237118238118239118240118241118242118243118244118245118246118247118248118249118250118251118252118253118254118255118256118257118258118259118260118261118262118263118264118265118266118267118268118269118270118271118272118273118274118275118276118277118278118279118280118281118282118283118284118285118286118287118288118289118290118291118292118293118294118295118296118297118298118299118300118301118302118303118304118305118306118307118308118309118310118311118312118313118314118315118316118317118318118319118320118321118322118323118324118325118326118327118328118329118330118331118332118333118334118335118336118337118338118339118340118341118342118343118344118345118346118347118348118349118350118351118352118353118354118355118356118357118358118359118360118361118362118363118364118365118366118367118368118369118370118371118372118373118374118375118376118377118378118379118380118381118382118383118384118385118386118387118388118389118390118391118392118393118394118395118396118397118398118399118400118401118402118403118404118405118406118407118408118409118410118411118412118413118414118415118416118417118418118419118420118421118422118423118424118425118426118427118428118429118430118431118432118433118434118435118436118437118438118439118440118441118442118443118444118445118446118447118448118449118450118451118452118453118454118455118456118457118458118459118460118461118462118463118464118465118466118467118468118469118470118471118472118473118474118475118476118477118478118479118480118481118482118483118484118485118486118487118488118489118490118491118492118493118494118495118496118497118498118499118500118501118502118503118504118505118506118507118508118509118510118511118512118513118514118515118516118517118518118519118520118521118522118523118524118525118526118527118528118529118530118531118532118533118534118535118536118537118538118539118540118541118542118543118544118545118546118547118548118549118550118551118552118553118554118555118556118557118558118559118560118561118562118563118564118565118566118567118568118569118570118571118572118573118574118575118576118577118578118579118580118581118582118583118584118585118586118587118588118589118590118591118592118593118594118595118596118597118598118599118600118601118602118603118604118605118606118607118608118609118610118611118612118613118614118615118616118617118618118619118620118621118622118623118624118625118626118627118628118629118630118631118632118633118634118635118636118637118638118639118640118641118642118643118644118645118646118647118648118649118650118651118652118653118654118655118656118657118658118659118660118661118662118663118664118665118666118667118668118669118670118671118672118673118674118675118676118677118678118679118680118681118682118683118684118685118686118687118688118689118690118691118692118693118694118695118696118697118698118699118700118701118702118703118704118705118706118707118708118709118710118711118712118713118714118715118716118717118718118719118720118721118722118723118724118725118726118727118728118729118730118731118732118733118734118735118736118737118738118739118740118741118742118743118744118745118746118747118748118749118750118751118752118753118754118755118756118757118758118759118760118761118762118763118764118765118766118767118768118769118770118771118772118773118774118775118776118777118778118779118780118781118782118783118784118785118786118787118788118789118790118791118792118793118794118795118796118797118798118799118800118801118802118803118804118805118806118807118808118809118810118811118812118813118814118815118816118817118818118819118820118821118822118823118824118825118826118827118828118829118830118831118832118833118834118835118836118837118838118839118840118841118842118843118844118845118846118847118848118849118850118851118852118853118854118855118856118857118858118859118860118861118862118863118864118865118866118867118868118869118870118871118872118873118874118875118876118877118878118879118880118881118882118883118884118885118886118887118888118889118890118891118892118893118894118895118896118897118898118899118900118901118902118903118904118905118906118907118908118909118910118911118912118913118914118915118916118917118918118919118920118921118922118923118924118925118926118927118928118929118930118931118932118933118934118935118936118937118938118939118940118941118942118943118944118945118946118947118948118949118950118951118952118953118954118955118956118957118958118959118960118961118962118963118964118965118966118967118968118969118970118971118972118973118974118975118976118977118978118979118980118981118982118983118984118985118986118987118988118989118990118991118992118993118994118995118996118997118998118999119000119001119002119003119004119005119006119007119008119009119010119011119012119013119014119015119016119017119018119019119020119021119022119023119024119025119026119027119028119029119030119031119032119033119034119035119036119037119038119039119040119041119042119043119044119045119046119047119048119049119050119051119052119053119054119055119056119057119058119059119060119061119062119063119064119065119066119067119068119069119070119071119072119073119074119075119076119077119078119079119080119081119082119083119084119085119086119087119088119089119090119091119092119093119094119095119096119097119098119099119100119101119102119103119104119105119106119107119108119109119110119111119112119113119114119115119116119117119118119119119120119121119122119123119124119125119126119127119128119129119130119131119132119133119134119135119136119137119138119139119140119141119142119143119144119145119146119147119148119149119150119151119152119153119154119155119156119157119158119159119160119161119162119163119164119165119166119167119168119169119170119171119172119173119174119175119176119177119178119179119180119181119182119183119184119185119186119187119188119189119190119191119192119193119194119195119196119197119198119199119200119201119202119203119204119205119206119207119208119209119210119211119212119213119214119215119216119217119218119219119220119221119222119223119224119225119226119227119228119229119230119231119232119233119234119235119236119237119238119239119240119241119242119243119244119245119246119247119248119249119250119251119252119253119254119255119256119257119258119259119260119261119262119263119264119265119266119267119268119269119270119271119272119273119274119275119276119277119278119279119280119281119282119283119284119285119286119287119288119289119290119291119292119293119294119295119296119297119298119299119300119301119302119303119304119305119306119307119308119309119310119311119312119313119314119315119316119317119318119319119320119321119322119323119324119325119326119327119328119329119330119331119332119333119334119335119336119337119338119339119340119341119342119343119344119345119346119347119348119349119350119351119352119353119354119355119356119357119358119359119360119361119362119363119364119365119366119367119368119369119370119371119372119373119374119375119376119377119378119379119380119381119382119383119384119385119386119387119388119389119390119391119392119393119394119395119396119397119398119399119400119401119402119403119404119405119406119407119408119409119410119411119412119413119414119415119416119417119418119419119420119421119422119423119424119425119426119427119428119429119430119431119432119433119434119435119436119437119438119439119440119441119442119443119444119445119446119447119448119449119450119451119452119453119454119455119456119457119458119459119460119461119462119463119464119465119466119467119468119469119470119471119472119473119474119475119476119477119478119479119480119481119482119483119484119485119486119487119488119489119490119491119492119493119494119495119496119497119498119499119500119501119502119503119504119505119506119507119508119509119510119511119512119513119514119515119516119517119518119519119520119521119522119523119524119525119526119527119528119529119530119531119532119533119534119535119536119537119538119539119540119541119542119543119544119545119546119547119548119549119550119551119552119553119554119555119556119557119558119559119560119561119562119563119564119565119566119567119568119569119570119571119572119573119574119575119576119577119578119579119580119581119582119583119584119585119586119587119588119589119590119591119592119593119594119595119596119597119598119599119600119601119602119603119604119605119606119607119608119609119610119611119612119613119614119615119616119617119618119619119620119621119622119623119624119625119626119627119628119629119630119631119632119633119634119635119636119637119638119639119640119641119642119643119644119645119646119647119648119649119650119651119652119653119654119655119656119657119658119659119660119661119662119663119664119665119666119667119668119669119670119671119672119673119674119675119676119677119678119679119680119681119682119683119684119685119686119687119688119689119690119691119692119693119694119695119696119697119698119699119700119701119702119703119704119705119706119707119708119709119710119711119712119713119714119715119716119717119718119719119720119721119722119723119724119725119726119727119728119729119730119731119732119733119734119735119736119737119738119739119740119741119742119743119744119745119746119747119748119749119750119751119752119753119754119755119756119757119758119759119760119761119762119763119764119765119766119767119768119769119770119771119772119773119774119775119776119777119778119779119780119781119782119783119784119785119786119787119788119789119790119791119792119793119794119795119796119797119798119799119800119801119802119803119804119805119806119807119808119809119810119811119812119813119814119815119816119817119818119819119820119821119822119823119824119825119826119827119828119829119830119831119832119833119834119835119836119837119838119839119840119841119842119843119844119845119846119847119848119849119850119851119852119853119854119855119856119857119858119859119860119861119862119863119864119865119866119867119868119869119870119871119872119873119874119875119876119877119878119879119880119881119882119883119884119885119886119887119888119889119890119891119892119893119894119895119896119897119898119899119900119901119902119903119904119905119906119907119908119909119910119911119912119913119914119915119916119917119918119919119920119921119922119923119924119925119926119927119928119929119930119931119932119933119934119935119936119937119938119939119940119941119942119943119944119945119946119947119948119949119950119951119952119953119954119955119956119957119958119959119960119961119962119963119964119965119966119967119968119969119970119971119972119973119974119975119976119977119978119979119980119981119982119983119984119985119986119987119988119989119990119991119992119993119994119995119996119997119998119999120000120001120002120003120004120005120006120007120008120009120010120011120012120013120014120015120016120017120018120019120020120021120022120023120024120025120026120027120028120029120030120031120032120033120034120035120036120037120038120039120040120041120042120043120044120045120046120047120048120049120050120051120052120053120054120055120056120057120058120059120060120061120062120063120064120065120066120067120068120069120070120071120072120073120074120075120076120077120078120079120080120081120082120083120084120085120086120087120088120089120090120091120092120093120094120095120096120097120098120099120100120101120102120103120104120105120106120107120108120109120110120111120112120113120114120115120116120117120118120119120120120121120122120123120124120125120126120127120128120129120130120131120132120133120134120135120136120137120138120139120140120141120142120143120144120145120146120147120148120149120150120151120152120153120154120155120156120157120158120159120160120161120162120163120164120165120166120167120168120169120170120171120172120173120174120175120176120177120178120179120180120181120182120183120184120185120186120187120188120189120190120191120192120193120194120195120196120197120198120199120200120201120202120203120204120205120206120207120208120209120210120211120212120213120214120215120216120217120218120219120220120221120222120223120224120225120226120227120228120229120230120231120232120233120234120235120236120237120238120239120240120241120242120243120244120245120246120247120248120249120250120251120252120253120254120255120256120257120258120259120260120261120262120263120264120265120266120267120268120269120270120271120272120273120274120275120276120277120278120279120280120281120282120283120284120285120286120287120288120289120290120291120292120293120294120295120296120297120298120299120300120301120302120303120304120305120306120307120308120309120310120311120312120313120314120315120316120317120318120319120320120321120322120323120324120325120326120327120328120329120330120331120332120333120334120335120336120337120338120339120340120341120342120343120344120345120346120347120348120349120350120351120352120353120354120355120356120357120358120359120360120361120362120363120364120365120366120367120368120369120370120371120372120373120374120375120376120377120378120379120380120381120382120383120384120385120386120387120388120389120390120391120392120393120394120395120396120397120398120399120400120401120402120403120404120405120406120407120408120409120410120411120412120413120414120415120416120417120418120419120420120421120422120423120424120425120426120427120428120429120430120431120432120433120434120435120436120437120438120439120440120441120442120443120444120445120446120447120448120449120450120451120452120453120454120455120456120457120458120459120460120461120462120463120464120465120466120467120468120469120470120471120472120473120474120475120476120477120478120479120480120481120482120483120484120485120486120487120488120489120490120491120492120493120494120495120496120497120498120499120500120501120502120503120504120505120506120507120508120509120510120511120512120513120514120515120516120517120518120519120520120521120522120523120524120525120526120527120528120529120530120531120532120533120534120535120536120537120538120539120540120541120542120543120544120545120546120547120548120549120550120551120552120553120554120555120556120557120558120559120560120561120562120563120564120565120566120567120568120569120570120571120572120573120574120575120576120577120578120579120580120581120582120583120584120585120586120587120588120589120590120591120592120593120594120595120596120597120598120599120600120601120602120603120604120605120606120607120608120609120610120611120612120613120614120615120616120617120618120619120620120621120622120623120624120625120626120627120628120629120630120631120632120633120634120635120636120637120638120639120640120641120642120643120644120645120646120647120648120649120650120651120652120653120654120655120656120657120658120659120660120661120662120663120664120665120666120667120668120669120670120671120672120673120674120675120676120677120678120679120680120681120682120683120684120685120686120687120688120689120690120691120692120693120694120695120696120697120698120699120700120701120702120703120704120705120706120707120708120709120710120711120712120713120714120715120716120717120718120719120720120721120722120723120724120725120726120727120728120729120730120731120732120733120734120735120736120737120738120739120740120741120742120743120744120745120746120747120748120749120750120751120752120753120754120755120756120757120758120759120760120761120762120763120764120765120766120767120768120769120770120771120772120773120774120775120776120777120778120779120780120781120782120783120784120785120786120787120788120789120790120791120792120793120794120795120796120797120798120799120800120801120802120803120804120805120806120807120808120809120810120811120812120813120814120815120816120817120818120819120820120821120822120823120824120825120826120827120828120829120830120831120832120833120834120835120836120837120838120839120840120841120842120843120844120845120846120847120848120849120850120851120852120853120854120855120856120857120858120859120860120861120862120863120864120865120866120867120868120869120870120871120872120873120874120875120876120877120878120879120880120881120882120883120884120885120886120887120888120889120890120891120892120893120894120895120896120897120898120899120900120901120902120903120904120905120906120907120908120909120910120911120912120913120914120915120916120917120918120919120920120921120922120923120924120925120926120927120928120929120930120931120932120933120934120935120936120937120938120939120940120941120942120943120944120945120946120947120948120949120950120951120952120953120954120955120956120957120958120959120960120961120962120963120964120965120966120967120968120969120970120971120972120973120974120975120976120977120978120979120980120981120982120983120984120985120986120987120988120989120990120991120992120993120994120995120996120997120998120999121000121001121002121003121004121005121006121007121008121009121010121011121012121013121014121015121016121017121018121019121020121021121022121023121024121025121026121027121028121029121030121031121032121033121034121035121036121037121038121039121040121041121042121043121044121045121046121047121048121049121050121051121052121053121054121055121056121057121058121059121060121061121062121063121064121065121066121067121068121069121070121071121072121073121074121075121076121077121078121079121080121081121082121083121084121085121086121087121088121089121090121091121092121093121094121095121096121097121098121099121100121101121102121103121104121105121106121107121108121109121110121111121112121113121114121115121116121117121118121119121120121121121122121123121124121125121126121127121128121129121130121131121132121133121134121135121136121137121138121139121140121141121142121143121144121145121146121147121148121149121150121151121152121153121154121155121156121157121158121159121160121161121162121163121164121165121166121167121168121169121170121171121172121173121174121175121176121177121178121179121180121181121182121183121184121185121186121187121188121189121190121191121192121193121194121195121196121197121198121199121200121201121202121203121204121205121206121207121208121209121210121211121212121213121214121215121216121217121218121219121220121221121222121223121224121225121226121227121228121229121230121231121232121233121234121235121236121237121238121239121240121241121242121243121244121245121246121247121248121249121250121251121252121253121254121255121256121257121258121259121260121261121262121263121264121265121266121267121268121269121270121271121272121273121274121275121276121277121278121279121280121281121282121283121284121285121286121287121288121289121290121291121292121293121294121295121296121297121298121299121300121301121302121303121304121305121306121307121308121309121310121311121312121313121314121315121316121317121318121319121320121321121322121323121324121325121326121327121328121329121330121331121332121333121334121335121336121337121338121339121340121341121342121343121344121345121346121347121348121349121350121351121352121353121354121355121356121357121358121359121360121361121362121363121364121365121366121367121368121369121370121371121372121373121374121375121376121377121378121379121380121381121382121383121384121385121386121387121388121389121390121391121392121393121394121395121396121397121398121399121400121401121402121403121404121405121406121407121408121409121410121411121412121413121414121415121416121417121418121419121420121421121422121423121424121425121426121427121428121429121430121431121432121433121434121435121436121437121438121439121440121441121442121443121444121445121446121447121448121449121450121451121452121453121454121455121456121457121458121459121460121461121462121463121464121465121466121467121468121469121470121471121472121473121474121475121476121477121478121479121480121481121482121483121484121485121486121487121488121489121490121491121492121493121494121495121496121497121498121499121500121501121502121503121504121505121506121507121508121509121510121511121512121513121514121515121516121517121518121519121520121521121522121523121524121525121526121527121528121529121530121531121532121533121534121535121536121537121538121539121540121541121542121543121544121545121546121547121548121549121550121551121552121553121554121555121556121557121558121559121560121561121562121563121564121565121566121567121568121569121570121571121572121573121574121575121576121577121578121579121580121581121582121583121584121585121586121587121588121589121590121591121592121593121594121595121596121597121598121599121600121601121602121603121604121605121606121607121608121609121610121611121612121613121614121615121616121617121618121619121620121621121622121623121624121625121626121627121628121629121630121631121632121633121634121635121636121637121638121639121640121641121642121643121644121645121646121647121648121649121650121651121652121653121654121655121656121657121658121659121660121661121662121663121664121665121666121667121668121669121670121671121672121673121674121675121676121677121678121679121680121681121682121683121684121685121686121687121688121689121690121691121692121693121694121695121696121697121698121699121700121701121702121703121704121705121706121707121708121709121710121711121712121713121714121715121716121717121718121719121720121721121722121723121724121725121726121727121728121729121730121731121732121733121734121735121736121737121738121739121740121741121742121743121744121745121746121747121748121749121750121751121752121753121754121755121756121757121758121759121760121761121762121763121764121765121766121767121768121769121770121771121772121773121774121775121776121777121778121779121780121781121782121783121784121785121786121787121788121789121790121791121792121793121794121795121796121797121798121799121800121801121802121803121804121805121806121807121808121809121810121811121812121813121814121815121816121817121818121819121820121821121822121823121824121825121826121827121828121829121830121831121832121833121834121835121836121837121838121839121840121841121842121843121844121845121846121847121848121849121850121851121852121853121854121855121856121857121858121859121860121861121862121863121864121865121866121867121868121869121870121871121872121873121874121875121876121877121878121879121880121881121882121883121884121885121886121887121888121889121890121891121892121893121894121895121896121897121898121899121900121901121902121903121904121905121906121907121908121909121910121911121912121913121914121915121916121917121918121919121920121921121922121923121924121925121926121927121928121929121930121931121932121933121934121935121936121937121938121939121940121941121942121943121944121945121946121947121948121949121950121951121952121953121954121955121956121957121958121959121960121961121962121963121964121965121966121967121968121969121970121971121972121973121974121975121976121977121978121979121980121981121982121983121984121985121986121987121988121989121990121991121992121993121994121995121996121997121998121999122000122001122002122003122004122005122006122007122008122009122010122011122012122013122014122015122016122017122018122019122020122021122022122023122024122025122026122027122028122029122030122031122032122033122034122035122036122037122038122039122040122041122042122043122044122045122046122047122048122049122050122051122052122053122054122055122056122057122058122059122060122061122062122063122064122065122066122067122068122069122070122071122072122073122074122075122076122077122078122079122080122081122082122083122084122085122086122087122088122089122090122091122092122093122094122095122096122097122098122099122100122101122102122103122104122105122106122107122108122109122110122111122112122113122114122115122116122117122118122119122120122121122122122123122124122125122126122127122128122129122130122131122132122133122134122135122136122137122138122139122140122141122142122143122144122145122146122147122148122149122150122151122152122153122154122155122156122157122158122159122160122161122162122163122164122165122166122167122168122169122170122171122172122173122174122175122176122177122178122179122180122181122182122183122184122185122186122187122188122189122190122191122192122193122194122195122196122197122198122199122200122201122202122203122204122205122206122207122208122209122210122211122212122213122214122215122216122217122218122219122220122221122222122223122224122225122226122227122228122229122230122231122232122233122234122235122236122237122238122239122240122241122242122243122244122245122246122247122248122249122250122251122252122253122254122255122256122257122258122259122260122261122262122263122264122265122266122267122268122269122270122271122272122273122274122275122276122277122278122279122280122281122282122283122284122285122286122287122288122289122290122291122292122293122294122295122296122297122298122299122300122301122302122303122304122305122306122307122308122309122310122311122312122313122314122315122316122317122318122319122320122321
  1. unit pic32mx795f512l;
  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 getTCS : TBits_1; inline;
  408. function getTGATE : TBits_1; inline;
  409. function getTON : TBits_1; inline;
  410. function getTSIDL : TBits_1; inline;
  411. function getw : TBits_32; inline;
  412. procedure setON(thebits : TBits_1); inline;
  413. procedure setSIDL(thebits : TBits_1); inline;
  414. procedure setT32(thebits : TBits_1); inline;
  415. procedure setTCKPS(thebits : TBits_3); inline;
  416. procedure setTCKPS0(thebits : TBits_1); inline;
  417. procedure setTCKPS1(thebits : TBits_1); inline;
  418. procedure setTCKPS2(thebits : TBits_1); inline;
  419. procedure setTCS(thebits : TBits_1); inline;
  420. procedure setTGATE(thebits : TBits_1); inline;
  421. procedure setTON(thebits : TBits_1); inline;
  422. procedure setTSIDL(thebits : TBits_1); inline;
  423. procedure setw(thebits : TBits_32); inline;
  424. public
  425. procedure clearON; inline;
  426. procedure clearSIDL; inline;
  427. procedure clearT32; inline;
  428. procedure clearTCKPS0; inline;
  429. procedure clearTCKPS1; inline;
  430. procedure clearTCKPS2; inline;
  431. procedure clearTCS; inline;
  432. procedure clearTGATE; inline;
  433. procedure clearTON; inline;
  434. procedure clearTSIDL; inline;
  435. procedure setON; inline;
  436. procedure setSIDL; inline;
  437. procedure setT32; inline;
  438. procedure setTCKPS0; inline;
  439. procedure setTCKPS1; inline;
  440. procedure setTCKPS2; inline;
  441. procedure setTCS; inline;
  442. procedure setTGATE; inline;
  443. procedure setTON; inline;
  444. procedure setTSIDL; inline;
  445. property ON : TBits_1 read getON write setON;
  446. property SIDL : TBits_1 read getSIDL write setSIDL;
  447. property T32 : TBits_1 read getT32 write setT32;
  448. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  449. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  450. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  451. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  452. property TCS : TBits_1 read getTCS write setTCS;
  453. property TGATE : TBits_1 read getTGATE write setTGATE;
  454. property TON : TBits_1 read getTON write setTON;
  455. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  456. property w : TBits_32 read getw write setw;
  457. end;
  458. type
  459. TTMR23Registers = record
  460. T2CONbits : TTMR23_T2CON;
  461. T2CON : longWord;
  462. T2CONCLR : longWord;
  463. T2CONSET : longWord;
  464. T2CONINV : longWord;
  465. TMR2 : longWord;
  466. TMR2CLR : longWord;
  467. TMR2SET : longWord;
  468. TMR2INV : longWord;
  469. PR2 : longWord;
  470. PR2CLR : longWord;
  471. PR2SET : longWord;
  472. PR2INV : longWord;
  473. end;
  474. TTMR3_T3CON = record
  475. private
  476. function getON : TBits_1; inline;
  477. function getSIDL : TBits_1; inline;
  478. function getTCKPS : TBits_3; inline;
  479. function getTCKPS0 : TBits_1; inline;
  480. function getTCKPS1 : TBits_1; inline;
  481. function getTCKPS2 : TBits_1; inline;
  482. function getTCS : TBits_1; inline;
  483. function getTGATE : TBits_1; inline;
  484. function getTON : TBits_1; inline;
  485. function getTSIDL : TBits_1; inline;
  486. function getw : TBits_32; inline;
  487. procedure setON(thebits : TBits_1); inline;
  488. procedure setSIDL(thebits : TBits_1); inline;
  489. procedure setTCKPS(thebits : TBits_3); inline;
  490. procedure setTCKPS0(thebits : TBits_1); inline;
  491. procedure setTCKPS1(thebits : TBits_1); inline;
  492. procedure setTCKPS2(thebits : TBits_1); inline;
  493. procedure setTCS(thebits : TBits_1); inline;
  494. procedure setTGATE(thebits : TBits_1); inline;
  495. procedure setTON(thebits : TBits_1); inline;
  496. procedure setTSIDL(thebits : TBits_1); inline;
  497. procedure setw(thebits : TBits_32); inline;
  498. public
  499. procedure clearON; inline;
  500. procedure clearSIDL; inline;
  501. procedure clearTCKPS0; inline;
  502. procedure clearTCKPS1; inline;
  503. procedure clearTCKPS2; inline;
  504. procedure clearTCS; inline;
  505. procedure clearTGATE; inline;
  506. procedure clearTON; inline;
  507. procedure clearTSIDL; inline;
  508. procedure setON; inline;
  509. procedure setSIDL; inline;
  510. procedure setTCKPS0; inline;
  511. procedure setTCKPS1; inline;
  512. procedure setTCKPS2; inline;
  513. procedure setTCS; inline;
  514. procedure setTGATE; inline;
  515. procedure setTON; inline;
  516. procedure setTSIDL; inline;
  517. property ON : TBits_1 read getON write setON;
  518. property SIDL : TBits_1 read getSIDL write setSIDL;
  519. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  520. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  521. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  522. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  523. property TCS : TBits_1 read getTCS write setTCS;
  524. property TGATE : TBits_1 read getTGATE write setTGATE;
  525. property TON : TBits_1 read getTON write setTON;
  526. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  527. property w : TBits_32 read getw write setw;
  528. end;
  529. type
  530. TTMR3Registers = record
  531. T3CONbits : TTMR3_T3CON;
  532. T3CON : longWord;
  533. T3CONCLR : longWord;
  534. T3CONSET : longWord;
  535. T3CONINV : longWord;
  536. TMR3 : longWord;
  537. TMR3CLR : longWord;
  538. TMR3SET : longWord;
  539. TMR3INV : longWord;
  540. PR3 : longWord;
  541. PR3CLR : longWord;
  542. PR3SET : longWord;
  543. PR3INV : longWord;
  544. end;
  545. TTMR4_T4CON = record
  546. private
  547. function getON : TBits_1; inline;
  548. function getSIDL : TBits_1; inline;
  549. function getT32 : TBits_1; inline;
  550. function getTCKPS : TBits_3; inline;
  551. function getTCKPS0 : TBits_1; inline;
  552. function getTCKPS1 : TBits_1; inline;
  553. function getTCKPS2 : TBits_1; inline;
  554. function getTCS : TBits_1; inline;
  555. function getTGATE : TBits_1; inline;
  556. function getTON : TBits_1; inline;
  557. function getTSIDL : TBits_1; inline;
  558. function getw : TBits_32; inline;
  559. procedure setON(thebits : TBits_1); inline;
  560. procedure setSIDL(thebits : TBits_1); inline;
  561. procedure setT32(thebits : TBits_1); inline;
  562. procedure setTCKPS(thebits : TBits_3); inline;
  563. procedure setTCKPS0(thebits : TBits_1); inline;
  564. procedure setTCKPS1(thebits : TBits_1); inline;
  565. procedure setTCKPS2(thebits : TBits_1); inline;
  566. procedure setTCS(thebits : TBits_1); inline;
  567. procedure setTGATE(thebits : TBits_1); inline;
  568. procedure setTON(thebits : TBits_1); inline;
  569. procedure setTSIDL(thebits : TBits_1); inline;
  570. procedure setw(thebits : TBits_32); inline;
  571. public
  572. procedure clearON; inline;
  573. procedure clearSIDL; inline;
  574. procedure clearT32; inline;
  575. procedure clearTCKPS0; inline;
  576. procedure clearTCKPS1; inline;
  577. procedure clearTCKPS2; inline;
  578. procedure clearTCS; inline;
  579. procedure clearTGATE; inline;
  580. procedure clearTON; inline;
  581. procedure clearTSIDL; inline;
  582. procedure setON; inline;
  583. procedure setSIDL; inline;
  584. procedure setT32; inline;
  585. procedure setTCKPS0; inline;
  586. procedure setTCKPS1; inline;
  587. procedure setTCKPS2; inline;
  588. procedure setTCS; inline;
  589. procedure setTGATE; inline;
  590. procedure setTON; inline;
  591. procedure setTSIDL; inline;
  592. property ON : TBits_1 read getON write setON;
  593. property SIDL : TBits_1 read getSIDL write setSIDL;
  594. property T32 : TBits_1 read getT32 write setT32;
  595. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  596. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  597. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  598. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  599. property TCS : TBits_1 read getTCS write setTCS;
  600. property TGATE : TBits_1 read getTGATE write setTGATE;
  601. property TON : TBits_1 read getTON write setTON;
  602. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  603. property w : TBits_32 read getw write setw;
  604. end;
  605. type
  606. TTMR4Registers = record
  607. T4CONbits : TTMR4_T4CON;
  608. T4CON : longWord;
  609. T4CONCLR : longWord;
  610. T4CONSET : longWord;
  611. T4CONINV : longWord;
  612. TMR4 : longWord;
  613. TMR4CLR : longWord;
  614. TMR4SET : longWord;
  615. TMR4INV : longWord;
  616. PR4 : longWord;
  617. PR4CLR : longWord;
  618. PR4SET : longWord;
  619. PR4INV : longWord;
  620. end;
  621. TTMR5_T5CON = record
  622. private
  623. function getON : TBits_1; inline;
  624. function getSIDL : TBits_1; inline;
  625. function getTCKPS : TBits_3; inline;
  626. function getTCKPS0 : TBits_1; inline;
  627. function getTCKPS1 : TBits_1; inline;
  628. function getTCKPS2 : TBits_1; inline;
  629. function getTCS : TBits_1; inline;
  630. function getTGATE : TBits_1; inline;
  631. function getTON : TBits_1; inline;
  632. function getTSIDL : TBits_1; inline;
  633. function getw : TBits_32; inline;
  634. procedure setON(thebits : TBits_1); inline;
  635. procedure setSIDL(thebits : TBits_1); inline;
  636. procedure setTCKPS(thebits : TBits_3); inline;
  637. procedure setTCKPS0(thebits : TBits_1); inline;
  638. procedure setTCKPS1(thebits : TBits_1); inline;
  639. procedure setTCKPS2(thebits : TBits_1); inline;
  640. procedure setTCS(thebits : TBits_1); inline;
  641. procedure setTGATE(thebits : TBits_1); inline;
  642. procedure setTON(thebits : TBits_1); inline;
  643. procedure setTSIDL(thebits : TBits_1); inline;
  644. procedure setw(thebits : TBits_32); inline;
  645. public
  646. procedure clearON; inline;
  647. procedure clearSIDL; inline;
  648. procedure clearTCKPS0; inline;
  649. procedure clearTCKPS1; inline;
  650. procedure clearTCKPS2; inline;
  651. procedure clearTCS; inline;
  652. procedure clearTGATE; inline;
  653. procedure clearTON; inline;
  654. procedure clearTSIDL; inline;
  655. procedure setON; inline;
  656. procedure setSIDL; inline;
  657. procedure setTCKPS0; inline;
  658. procedure setTCKPS1; inline;
  659. procedure setTCKPS2; inline;
  660. procedure setTCS; inline;
  661. procedure setTGATE; inline;
  662. procedure setTON; inline;
  663. procedure setTSIDL; inline;
  664. property ON : TBits_1 read getON write setON;
  665. property SIDL : TBits_1 read getSIDL write setSIDL;
  666. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  667. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  668. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  669. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  670. property TCS : TBits_1 read getTCS write setTCS;
  671. property TGATE : TBits_1 read getTGATE write setTGATE;
  672. property TON : TBits_1 read getTON write setTON;
  673. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  674. property w : TBits_32 read getw write setw;
  675. end;
  676. type
  677. TTMR5Registers = record
  678. T5CONbits : TTMR5_T5CON;
  679. T5CON : longWord;
  680. T5CONCLR : longWord;
  681. T5CONSET : longWord;
  682. T5CONINV : longWord;
  683. TMR5 : longWord;
  684. TMR5CLR : longWord;
  685. TMR5SET : longWord;
  686. TMR5INV : longWord;
  687. PR5 : longWord;
  688. PR5CLR : longWord;
  689. PR5SET : longWord;
  690. PR5INV : longWord;
  691. end;
  692. TICAP1_IC1CON = record
  693. private
  694. function getC32 : TBits_1; inline;
  695. function getFEDGE : TBits_1; inline;
  696. function getICBNE : TBits_1; inline;
  697. function getICI : TBits_2; inline;
  698. function getICI0 : TBits_1; inline;
  699. function getICI1 : TBits_1; inline;
  700. function getICM : TBits_3; inline;
  701. function getICM0 : TBits_1; inline;
  702. function getICM1 : TBits_1; inline;
  703. function getICM2 : TBits_1; inline;
  704. function getICOV : TBits_1; inline;
  705. function getICSIDL : TBits_1; inline;
  706. function getICTMR : TBits_1; inline;
  707. function getON : TBits_1; inline;
  708. function getSIDL : TBits_1; inline;
  709. function getw : TBits_32; inline;
  710. procedure setC32(thebits : TBits_1); inline;
  711. procedure setFEDGE(thebits : TBits_1); inline;
  712. procedure setICBNE(thebits : TBits_1); inline;
  713. procedure setICI(thebits : TBits_2); inline;
  714. procedure setICI0(thebits : TBits_1); inline;
  715. procedure setICI1(thebits : TBits_1); inline;
  716. procedure setICM(thebits : TBits_3); inline;
  717. procedure setICM0(thebits : TBits_1); inline;
  718. procedure setICM1(thebits : TBits_1); inline;
  719. procedure setICM2(thebits : TBits_1); inline;
  720. procedure setICOV(thebits : TBits_1); inline;
  721. procedure setICSIDL(thebits : TBits_1); inline;
  722. procedure setICTMR(thebits : TBits_1); inline;
  723. procedure setON(thebits : TBits_1); inline;
  724. procedure setSIDL(thebits : TBits_1); inline;
  725. procedure setw(thebits : TBits_32); inline;
  726. public
  727. procedure clearC32; inline;
  728. procedure clearFEDGE; inline;
  729. procedure clearICBNE; inline;
  730. procedure clearICI0; inline;
  731. procedure clearICI1; inline;
  732. procedure clearICM0; inline;
  733. procedure clearICM1; inline;
  734. procedure clearICM2; inline;
  735. procedure clearICOV; inline;
  736. procedure clearICSIDL; inline;
  737. procedure clearICTMR; inline;
  738. procedure clearON; inline;
  739. procedure clearSIDL; inline;
  740. procedure setC32; inline;
  741. procedure setFEDGE; inline;
  742. procedure setICBNE; inline;
  743. procedure setICI0; inline;
  744. procedure setICI1; inline;
  745. procedure setICM0; inline;
  746. procedure setICM1; inline;
  747. procedure setICM2; inline;
  748. procedure setICOV; inline;
  749. procedure setICSIDL; inline;
  750. procedure setICTMR; inline;
  751. procedure setON; inline;
  752. procedure setSIDL; inline;
  753. property C32 : TBits_1 read getC32 write setC32;
  754. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  755. property ICBNE : TBits_1 read getICBNE write setICBNE;
  756. property ICI : TBits_2 read getICI write setICI;
  757. property ICI0 : TBits_1 read getICI0 write setICI0;
  758. property ICI1 : TBits_1 read getICI1 write setICI1;
  759. property ICM : TBits_3 read getICM write setICM;
  760. property ICM0 : TBits_1 read getICM0 write setICM0;
  761. property ICM1 : TBits_1 read getICM1 write setICM1;
  762. property ICM2 : TBits_1 read getICM2 write setICM2;
  763. property ICOV : TBits_1 read getICOV write setICOV;
  764. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  765. property ICTMR : TBits_1 read getICTMR write setICTMR;
  766. property ON : TBits_1 read getON write setON;
  767. property SIDL : TBits_1 read getSIDL write setSIDL;
  768. property w : TBits_32 read getw write setw;
  769. end;
  770. type
  771. TICAP1Registers = record
  772. IC1CONbits : TICAP1_IC1CON;
  773. IC1CON : longWord;
  774. IC1CONCLR : longWord;
  775. IC1CONSET : longWord;
  776. IC1CONINV : longWord;
  777. IC1BUF : longWord;
  778. end;
  779. TICAP2_IC2CON = record
  780. private
  781. function getC32 : TBits_1; inline;
  782. function getFEDGE : TBits_1; inline;
  783. function getICBNE : TBits_1; inline;
  784. function getICI : TBits_2; inline;
  785. function getICI0 : TBits_1; inline;
  786. function getICI1 : TBits_1; inline;
  787. function getICM : TBits_3; inline;
  788. function getICM0 : TBits_1; inline;
  789. function getICM1 : TBits_1; inline;
  790. function getICM2 : TBits_1; inline;
  791. function getICOV : TBits_1; inline;
  792. function getICSIDL : TBits_1; inline;
  793. function getICTMR : TBits_1; inline;
  794. function getON : TBits_1; inline;
  795. function getSIDL : TBits_1; inline;
  796. function getw : TBits_32; inline;
  797. procedure setC32(thebits : TBits_1); inline;
  798. procedure setFEDGE(thebits : TBits_1); inline;
  799. procedure setICBNE(thebits : TBits_1); inline;
  800. procedure setICI(thebits : TBits_2); inline;
  801. procedure setICI0(thebits : TBits_1); inline;
  802. procedure setICI1(thebits : TBits_1); inline;
  803. procedure setICM(thebits : TBits_3); inline;
  804. procedure setICM0(thebits : TBits_1); inline;
  805. procedure setICM1(thebits : TBits_1); inline;
  806. procedure setICM2(thebits : TBits_1); inline;
  807. procedure setICOV(thebits : TBits_1); inline;
  808. procedure setICSIDL(thebits : TBits_1); inline;
  809. procedure setICTMR(thebits : TBits_1); inline;
  810. procedure setON(thebits : TBits_1); inline;
  811. procedure setSIDL(thebits : TBits_1); inline;
  812. procedure setw(thebits : TBits_32); inline;
  813. public
  814. procedure clearC32; inline;
  815. procedure clearFEDGE; inline;
  816. procedure clearICBNE; inline;
  817. procedure clearICI0; inline;
  818. procedure clearICI1; inline;
  819. procedure clearICM0; inline;
  820. procedure clearICM1; inline;
  821. procedure clearICM2; inline;
  822. procedure clearICOV; inline;
  823. procedure clearICSIDL; inline;
  824. procedure clearICTMR; inline;
  825. procedure clearON; inline;
  826. procedure clearSIDL; inline;
  827. procedure setC32; inline;
  828. procedure setFEDGE; inline;
  829. procedure setICBNE; inline;
  830. procedure setICI0; inline;
  831. procedure setICI1; inline;
  832. procedure setICM0; inline;
  833. procedure setICM1; inline;
  834. procedure setICM2; inline;
  835. procedure setICOV; inline;
  836. procedure setICSIDL; inline;
  837. procedure setICTMR; inline;
  838. procedure setON; inline;
  839. procedure setSIDL; inline;
  840. property C32 : TBits_1 read getC32 write setC32;
  841. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  842. property ICBNE : TBits_1 read getICBNE write setICBNE;
  843. property ICI : TBits_2 read getICI write setICI;
  844. property ICI0 : TBits_1 read getICI0 write setICI0;
  845. property ICI1 : TBits_1 read getICI1 write setICI1;
  846. property ICM : TBits_3 read getICM write setICM;
  847. property ICM0 : TBits_1 read getICM0 write setICM0;
  848. property ICM1 : TBits_1 read getICM1 write setICM1;
  849. property ICM2 : TBits_1 read getICM2 write setICM2;
  850. property ICOV : TBits_1 read getICOV write setICOV;
  851. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  852. property ICTMR : TBits_1 read getICTMR write setICTMR;
  853. property ON : TBits_1 read getON write setON;
  854. property SIDL : TBits_1 read getSIDL write setSIDL;
  855. property w : TBits_32 read getw write setw;
  856. end;
  857. type
  858. TICAP2Registers = record
  859. IC2CONbits : TICAP2_IC2CON;
  860. IC2CON : longWord;
  861. IC2CONCLR : longWord;
  862. IC2CONSET : longWord;
  863. IC2CONINV : longWord;
  864. IC2BUF : longWord;
  865. end;
  866. TICAP3_IC3CON = record
  867. private
  868. function getC32 : TBits_1; inline;
  869. function getFEDGE : TBits_1; inline;
  870. function getICBNE : TBits_1; inline;
  871. function getICI : TBits_2; inline;
  872. function getICI0 : TBits_1; inline;
  873. function getICI1 : TBits_1; inline;
  874. function getICM : TBits_3; inline;
  875. function getICM0 : TBits_1; inline;
  876. function getICM1 : TBits_1; inline;
  877. function getICM2 : TBits_1; inline;
  878. function getICOV : TBits_1; inline;
  879. function getICSIDL : TBits_1; inline;
  880. function getICTMR : TBits_1; inline;
  881. function getON : TBits_1; inline;
  882. function getSIDL : TBits_1; inline;
  883. function getw : TBits_32; inline;
  884. procedure setC32(thebits : TBits_1); inline;
  885. procedure setFEDGE(thebits : TBits_1); inline;
  886. procedure setICBNE(thebits : TBits_1); inline;
  887. procedure setICI(thebits : TBits_2); inline;
  888. procedure setICI0(thebits : TBits_1); inline;
  889. procedure setICI1(thebits : TBits_1); inline;
  890. procedure setICM(thebits : TBits_3); inline;
  891. procedure setICM0(thebits : TBits_1); inline;
  892. procedure setICM1(thebits : TBits_1); inline;
  893. procedure setICM2(thebits : TBits_1); inline;
  894. procedure setICOV(thebits : TBits_1); inline;
  895. procedure setICSIDL(thebits : TBits_1); inline;
  896. procedure setICTMR(thebits : TBits_1); inline;
  897. procedure setON(thebits : TBits_1); inline;
  898. procedure setSIDL(thebits : TBits_1); inline;
  899. procedure setw(thebits : TBits_32); inline;
  900. public
  901. procedure clearC32; inline;
  902. procedure clearFEDGE; inline;
  903. procedure clearICBNE; inline;
  904. procedure clearICI0; inline;
  905. procedure clearICI1; inline;
  906. procedure clearICM0; inline;
  907. procedure clearICM1; inline;
  908. procedure clearICM2; inline;
  909. procedure clearICOV; inline;
  910. procedure clearICSIDL; inline;
  911. procedure clearICTMR; inline;
  912. procedure clearON; inline;
  913. procedure clearSIDL; inline;
  914. procedure setC32; inline;
  915. procedure setFEDGE; inline;
  916. procedure setICBNE; inline;
  917. procedure setICI0; inline;
  918. procedure setICI1; inline;
  919. procedure setICM0; inline;
  920. procedure setICM1; inline;
  921. procedure setICM2; inline;
  922. procedure setICOV; inline;
  923. procedure setICSIDL; inline;
  924. procedure setICTMR; inline;
  925. procedure setON; inline;
  926. procedure setSIDL; inline;
  927. property C32 : TBits_1 read getC32 write setC32;
  928. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  929. property ICBNE : TBits_1 read getICBNE write setICBNE;
  930. property ICI : TBits_2 read getICI write setICI;
  931. property ICI0 : TBits_1 read getICI0 write setICI0;
  932. property ICI1 : TBits_1 read getICI1 write setICI1;
  933. property ICM : TBits_3 read getICM write setICM;
  934. property ICM0 : TBits_1 read getICM0 write setICM0;
  935. property ICM1 : TBits_1 read getICM1 write setICM1;
  936. property ICM2 : TBits_1 read getICM2 write setICM2;
  937. property ICOV : TBits_1 read getICOV write setICOV;
  938. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  939. property ICTMR : TBits_1 read getICTMR write setICTMR;
  940. property ON : TBits_1 read getON write setON;
  941. property SIDL : TBits_1 read getSIDL write setSIDL;
  942. property w : TBits_32 read getw write setw;
  943. end;
  944. type
  945. TICAP3Registers = record
  946. IC3CONbits : TICAP3_IC3CON;
  947. IC3CON : longWord;
  948. IC3CONCLR : longWord;
  949. IC3CONSET : longWord;
  950. IC3CONINV : longWord;
  951. IC3BUF : longWord;
  952. end;
  953. TICAP4_IC4CON = record
  954. private
  955. function getC32 : TBits_1; inline;
  956. function getFEDGE : TBits_1; inline;
  957. function getICBNE : TBits_1; inline;
  958. function getICI : TBits_2; inline;
  959. function getICI0 : TBits_1; inline;
  960. function getICI1 : TBits_1; inline;
  961. function getICM : TBits_3; inline;
  962. function getICM0 : TBits_1; inline;
  963. function getICM1 : TBits_1; inline;
  964. function getICM2 : TBits_1; inline;
  965. function getICOV : TBits_1; inline;
  966. function getICSIDL : TBits_1; inline;
  967. function getICTMR : TBits_1; inline;
  968. function getON : TBits_1; inline;
  969. function getSIDL : TBits_1; inline;
  970. function getw : TBits_32; inline;
  971. procedure setC32(thebits : TBits_1); inline;
  972. procedure setFEDGE(thebits : TBits_1); inline;
  973. procedure setICBNE(thebits : TBits_1); inline;
  974. procedure setICI(thebits : TBits_2); inline;
  975. procedure setICI0(thebits : TBits_1); inline;
  976. procedure setICI1(thebits : TBits_1); inline;
  977. procedure setICM(thebits : TBits_3); inline;
  978. procedure setICM0(thebits : TBits_1); inline;
  979. procedure setICM1(thebits : TBits_1); inline;
  980. procedure setICM2(thebits : TBits_1); inline;
  981. procedure setICOV(thebits : TBits_1); inline;
  982. procedure setICSIDL(thebits : TBits_1); inline;
  983. procedure setICTMR(thebits : TBits_1); inline;
  984. procedure setON(thebits : TBits_1); inline;
  985. procedure setSIDL(thebits : TBits_1); inline;
  986. procedure setw(thebits : TBits_32); inline;
  987. public
  988. procedure clearC32; inline;
  989. procedure clearFEDGE; inline;
  990. procedure clearICBNE; inline;
  991. procedure clearICI0; inline;
  992. procedure clearICI1; inline;
  993. procedure clearICM0; inline;
  994. procedure clearICM1; inline;
  995. procedure clearICM2; inline;
  996. procedure clearICOV; inline;
  997. procedure clearICSIDL; inline;
  998. procedure clearICTMR; inline;
  999. procedure clearON; inline;
  1000. procedure clearSIDL; inline;
  1001. procedure setC32; inline;
  1002. procedure setFEDGE; inline;
  1003. procedure setICBNE; inline;
  1004. procedure setICI0; inline;
  1005. procedure setICI1; inline;
  1006. procedure setICM0; inline;
  1007. procedure setICM1; inline;
  1008. procedure setICM2; inline;
  1009. procedure setICOV; inline;
  1010. procedure setICSIDL; inline;
  1011. procedure setICTMR; inline;
  1012. procedure setON; inline;
  1013. procedure setSIDL; inline;
  1014. property C32 : TBits_1 read getC32 write setC32;
  1015. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  1016. property ICBNE : TBits_1 read getICBNE write setICBNE;
  1017. property ICI : TBits_2 read getICI write setICI;
  1018. property ICI0 : TBits_1 read getICI0 write setICI0;
  1019. property ICI1 : TBits_1 read getICI1 write setICI1;
  1020. property ICM : TBits_3 read getICM write setICM;
  1021. property ICM0 : TBits_1 read getICM0 write setICM0;
  1022. property ICM1 : TBits_1 read getICM1 write setICM1;
  1023. property ICM2 : TBits_1 read getICM2 write setICM2;
  1024. property ICOV : TBits_1 read getICOV write setICOV;
  1025. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  1026. property ICTMR : TBits_1 read getICTMR write setICTMR;
  1027. property ON : TBits_1 read getON write setON;
  1028. property SIDL : TBits_1 read getSIDL write setSIDL;
  1029. property w : TBits_32 read getw write setw;
  1030. end;
  1031. type
  1032. TICAP4Registers = record
  1033. IC4CONbits : TICAP4_IC4CON;
  1034. IC4CON : longWord;
  1035. IC4CONCLR : longWord;
  1036. IC4CONSET : longWord;
  1037. IC4CONINV : longWord;
  1038. IC4BUF : longWord;
  1039. end;
  1040. TICAP5_IC5CON = record
  1041. private
  1042. function getC32 : TBits_1; inline;
  1043. function getFEDGE : TBits_1; inline;
  1044. function getICBNE : TBits_1; inline;
  1045. function getICI : TBits_2; inline;
  1046. function getICI0 : TBits_1; inline;
  1047. function getICI1 : TBits_1; inline;
  1048. function getICM : TBits_3; inline;
  1049. function getICM0 : TBits_1; inline;
  1050. function getICM1 : TBits_1; inline;
  1051. function getICM2 : TBits_1; inline;
  1052. function getICOV : TBits_1; inline;
  1053. function getICSIDL : TBits_1; inline;
  1054. function getICTMR : TBits_1; inline;
  1055. function getON : TBits_1; inline;
  1056. function getSIDL : TBits_1; inline;
  1057. function getw : TBits_32; inline;
  1058. procedure setC32(thebits : TBits_1); inline;
  1059. procedure setFEDGE(thebits : TBits_1); inline;
  1060. procedure setICBNE(thebits : TBits_1); inline;
  1061. procedure setICI(thebits : TBits_2); inline;
  1062. procedure setICI0(thebits : TBits_1); inline;
  1063. procedure setICI1(thebits : TBits_1); inline;
  1064. procedure setICM(thebits : TBits_3); inline;
  1065. procedure setICM0(thebits : TBits_1); inline;
  1066. procedure setICM1(thebits : TBits_1); inline;
  1067. procedure setICM2(thebits : TBits_1); inline;
  1068. procedure setICOV(thebits : TBits_1); inline;
  1069. procedure setICSIDL(thebits : TBits_1); inline;
  1070. procedure setICTMR(thebits : TBits_1); inline;
  1071. procedure setON(thebits : TBits_1); inline;
  1072. procedure setSIDL(thebits : TBits_1); inline;
  1073. procedure setw(thebits : TBits_32); inline;
  1074. public
  1075. procedure clearC32; inline;
  1076. procedure clearFEDGE; inline;
  1077. procedure clearICBNE; inline;
  1078. procedure clearICI0; inline;
  1079. procedure clearICI1; inline;
  1080. procedure clearICM0; inline;
  1081. procedure clearICM1; inline;
  1082. procedure clearICM2; inline;
  1083. procedure clearICOV; inline;
  1084. procedure clearICSIDL; inline;
  1085. procedure clearICTMR; inline;
  1086. procedure clearON; inline;
  1087. procedure clearSIDL; inline;
  1088. procedure setC32; inline;
  1089. procedure setFEDGE; inline;
  1090. procedure setICBNE; inline;
  1091. procedure setICI0; inline;
  1092. procedure setICI1; inline;
  1093. procedure setICM0; inline;
  1094. procedure setICM1; inline;
  1095. procedure setICM2; inline;
  1096. procedure setICOV; inline;
  1097. procedure setICSIDL; inline;
  1098. procedure setICTMR; inline;
  1099. procedure setON; inline;
  1100. procedure setSIDL; inline;
  1101. property C32 : TBits_1 read getC32 write setC32;
  1102. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  1103. property ICBNE : TBits_1 read getICBNE write setICBNE;
  1104. property ICI : TBits_2 read getICI write setICI;
  1105. property ICI0 : TBits_1 read getICI0 write setICI0;
  1106. property ICI1 : TBits_1 read getICI1 write setICI1;
  1107. property ICM : TBits_3 read getICM write setICM;
  1108. property ICM0 : TBits_1 read getICM0 write setICM0;
  1109. property ICM1 : TBits_1 read getICM1 write setICM1;
  1110. property ICM2 : TBits_1 read getICM2 write setICM2;
  1111. property ICOV : TBits_1 read getICOV write setICOV;
  1112. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  1113. property ICTMR : TBits_1 read getICTMR write setICTMR;
  1114. property ON : TBits_1 read getON write setON;
  1115. property SIDL : TBits_1 read getSIDL write setSIDL;
  1116. property w : TBits_32 read getw write setw;
  1117. end;
  1118. type
  1119. TICAP5Registers = record
  1120. IC5CONbits : TICAP5_IC5CON;
  1121. IC5CON : longWord;
  1122. IC5CONCLR : longWord;
  1123. IC5CONSET : longWord;
  1124. IC5CONINV : longWord;
  1125. IC5BUF : longWord;
  1126. end;
  1127. TOCMP1_OC1CON = record
  1128. private
  1129. function getOC32 : TBits_1; inline;
  1130. function getOCFLT : TBits_1; inline;
  1131. function getOCM : TBits_3; inline;
  1132. function getOCM0 : TBits_1; inline;
  1133. function getOCM1 : TBits_1; inline;
  1134. function getOCM2 : TBits_1; inline;
  1135. function getOCSIDL : TBits_1; inline;
  1136. function getOCTSEL : TBits_1; inline;
  1137. function getON : TBits_1; inline;
  1138. function getSIDL : TBits_1; inline;
  1139. function getw : TBits_32; inline;
  1140. procedure setOC32(thebits : TBits_1); inline;
  1141. procedure setOCFLT(thebits : TBits_1); inline;
  1142. procedure setOCM(thebits : TBits_3); inline;
  1143. procedure setOCM0(thebits : TBits_1); inline;
  1144. procedure setOCM1(thebits : TBits_1); inline;
  1145. procedure setOCM2(thebits : TBits_1); inline;
  1146. procedure setOCSIDL(thebits : TBits_1); inline;
  1147. procedure setOCTSEL(thebits : TBits_1); inline;
  1148. procedure setON(thebits : TBits_1); inline;
  1149. procedure setSIDL(thebits : TBits_1); inline;
  1150. procedure setw(thebits : TBits_32); inline;
  1151. public
  1152. procedure clearOC32; inline;
  1153. procedure clearOCFLT; inline;
  1154. procedure clearOCM0; inline;
  1155. procedure clearOCM1; inline;
  1156. procedure clearOCM2; inline;
  1157. procedure clearOCSIDL; inline;
  1158. procedure clearOCTSEL; inline;
  1159. procedure clearON; inline;
  1160. procedure clearSIDL; inline;
  1161. procedure setOC32; inline;
  1162. procedure setOCFLT; inline;
  1163. procedure setOCM0; inline;
  1164. procedure setOCM1; inline;
  1165. procedure setOCM2; inline;
  1166. procedure setOCSIDL; inline;
  1167. procedure setOCTSEL; inline;
  1168. procedure setON; inline;
  1169. procedure setSIDL; inline;
  1170. property OC32 : TBits_1 read getOC32 write setOC32;
  1171. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1172. property OCM : TBits_3 read getOCM write setOCM;
  1173. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1174. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1175. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1176. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1177. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1178. property ON : TBits_1 read getON write setON;
  1179. property SIDL : TBits_1 read getSIDL write setSIDL;
  1180. property w : TBits_32 read getw write setw;
  1181. end;
  1182. type
  1183. TOCMP1Registers = record
  1184. OC1CONbits : TOCMP1_OC1CON;
  1185. OC1CON : longWord;
  1186. OC1CONCLR : longWord;
  1187. OC1CONSET : longWord;
  1188. OC1CONINV : longWord;
  1189. OC1R : longWord;
  1190. OC1RCLR : longWord;
  1191. OC1RSET : longWord;
  1192. OC1RINV : longWord;
  1193. OC1RS : longWord;
  1194. OC1RSCLR : longWord;
  1195. OC1RSSET : longWord;
  1196. OC1RSINV : longWord;
  1197. end;
  1198. TOCMP2_OC2CON = record
  1199. private
  1200. function getOC32 : TBits_1; inline;
  1201. function getOCFLT : TBits_1; inline;
  1202. function getOCM : TBits_3; inline;
  1203. function getOCM0 : TBits_1; inline;
  1204. function getOCM1 : TBits_1; inline;
  1205. function getOCM2 : TBits_1; inline;
  1206. function getOCSIDL : TBits_1; inline;
  1207. function getOCTSEL : TBits_1; inline;
  1208. function getON : TBits_1; inline;
  1209. function getSIDL : TBits_1; inline;
  1210. function getw : TBits_32; inline;
  1211. procedure setOC32(thebits : TBits_1); inline;
  1212. procedure setOCFLT(thebits : TBits_1); inline;
  1213. procedure setOCM(thebits : TBits_3); inline;
  1214. procedure setOCM0(thebits : TBits_1); inline;
  1215. procedure setOCM1(thebits : TBits_1); inline;
  1216. procedure setOCM2(thebits : TBits_1); inline;
  1217. procedure setOCSIDL(thebits : TBits_1); inline;
  1218. procedure setOCTSEL(thebits : TBits_1); inline;
  1219. procedure setON(thebits : TBits_1); inline;
  1220. procedure setSIDL(thebits : TBits_1); inline;
  1221. procedure setw(thebits : TBits_32); inline;
  1222. public
  1223. procedure clearOC32; inline;
  1224. procedure clearOCFLT; inline;
  1225. procedure clearOCM0; inline;
  1226. procedure clearOCM1; inline;
  1227. procedure clearOCM2; inline;
  1228. procedure clearOCSIDL; inline;
  1229. procedure clearOCTSEL; inline;
  1230. procedure clearON; inline;
  1231. procedure clearSIDL; inline;
  1232. procedure setOC32; inline;
  1233. procedure setOCFLT; inline;
  1234. procedure setOCM0; inline;
  1235. procedure setOCM1; inline;
  1236. procedure setOCM2; inline;
  1237. procedure setOCSIDL; inline;
  1238. procedure setOCTSEL; inline;
  1239. procedure setON; inline;
  1240. procedure setSIDL; inline;
  1241. property OC32 : TBits_1 read getOC32 write setOC32;
  1242. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1243. property OCM : TBits_3 read getOCM write setOCM;
  1244. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1245. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1246. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1247. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1248. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1249. property ON : TBits_1 read getON write setON;
  1250. property SIDL : TBits_1 read getSIDL write setSIDL;
  1251. property w : TBits_32 read getw write setw;
  1252. end;
  1253. type
  1254. TOCMP2Registers = record
  1255. OC2CONbits : TOCMP2_OC2CON;
  1256. OC2CON : longWord;
  1257. OC2CONCLR : longWord;
  1258. OC2CONSET : longWord;
  1259. OC2CONINV : longWord;
  1260. OC2R : longWord;
  1261. OC2RCLR : longWord;
  1262. OC2RSET : longWord;
  1263. OC2RINV : longWord;
  1264. OC2RS : longWord;
  1265. OC2RSCLR : longWord;
  1266. OC2RSSET : longWord;
  1267. OC2RSINV : longWord;
  1268. end;
  1269. TOCMP3_OC3CON = record
  1270. private
  1271. function getOC32 : TBits_1; inline;
  1272. function getOCFLT : TBits_1; inline;
  1273. function getOCM : TBits_3; inline;
  1274. function getOCM0 : TBits_1; inline;
  1275. function getOCM1 : TBits_1; inline;
  1276. function getOCM2 : TBits_1; inline;
  1277. function getOCSIDL : TBits_1; inline;
  1278. function getOCTSEL : TBits_1; inline;
  1279. function getON : TBits_1; inline;
  1280. function getSIDL : TBits_1; inline;
  1281. function getw : TBits_32; inline;
  1282. procedure setOC32(thebits : TBits_1); inline;
  1283. procedure setOCFLT(thebits : TBits_1); inline;
  1284. procedure setOCM(thebits : TBits_3); inline;
  1285. procedure setOCM0(thebits : TBits_1); inline;
  1286. procedure setOCM1(thebits : TBits_1); inline;
  1287. procedure setOCM2(thebits : TBits_1); inline;
  1288. procedure setOCSIDL(thebits : TBits_1); inline;
  1289. procedure setOCTSEL(thebits : TBits_1); inline;
  1290. procedure setON(thebits : TBits_1); inline;
  1291. procedure setSIDL(thebits : TBits_1); inline;
  1292. procedure setw(thebits : TBits_32); inline;
  1293. public
  1294. procedure clearOC32; inline;
  1295. procedure clearOCFLT; inline;
  1296. procedure clearOCM0; inline;
  1297. procedure clearOCM1; inline;
  1298. procedure clearOCM2; inline;
  1299. procedure clearOCSIDL; inline;
  1300. procedure clearOCTSEL; inline;
  1301. procedure clearON; inline;
  1302. procedure clearSIDL; inline;
  1303. procedure setOC32; inline;
  1304. procedure setOCFLT; inline;
  1305. procedure setOCM0; inline;
  1306. procedure setOCM1; inline;
  1307. procedure setOCM2; inline;
  1308. procedure setOCSIDL; inline;
  1309. procedure setOCTSEL; inline;
  1310. procedure setON; inline;
  1311. procedure setSIDL; inline;
  1312. property OC32 : TBits_1 read getOC32 write setOC32;
  1313. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1314. property OCM : TBits_3 read getOCM write setOCM;
  1315. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1316. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1317. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1318. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1319. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1320. property ON : TBits_1 read getON write setON;
  1321. property SIDL : TBits_1 read getSIDL write setSIDL;
  1322. property w : TBits_32 read getw write setw;
  1323. end;
  1324. type
  1325. TOCMP3Registers = record
  1326. OC3CONbits : TOCMP3_OC3CON;
  1327. OC3CON : longWord;
  1328. OC3CONCLR : longWord;
  1329. OC3CONSET : longWord;
  1330. OC3CONINV : longWord;
  1331. OC3R : longWord;
  1332. OC3RCLR : longWord;
  1333. OC3RSET : longWord;
  1334. OC3RINV : longWord;
  1335. OC3RS : longWord;
  1336. OC3RSCLR : longWord;
  1337. OC3RSSET : longWord;
  1338. OC3RSINV : longWord;
  1339. end;
  1340. TOCMP4_OC4CON = record
  1341. private
  1342. function getOC32 : TBits_1; inline;
  1343. function getOCFLT : TBits_1; inline;
  1344. function getOCM : TBits_3; inline;
  1345. function getOCM0 : TBits_1; inline;
  1346. function getOCM1 : TBits_1; inline;
  1347. function getOCM2 : TBits_1; inline;
  1348. function getOCSIDL : TBits_1; inline;
  1349. function getOCTSEL : TBits_1; inline;
  1350. function getON : TBits_1; inline;
  1351. function getSIDL : TBits_1; inline;
  1352. function getw : TBits_32; inline;
  1353. procedure setOC32(thebits : TBits_1); inline;
  1354. procedure setOCFLT(thebits : TBits_1); inline;
  1355. procedure setOCM(thebits : TBits_3); inline;
  1356. procedure setOCM0(thebits : TBits_1); inline;
  1357. procedure setOCM1(thebits : TBits_1); inline;
  1358. procedure setOCM2(thebits : TBits_1); inline;
  1359. procedure setOCSIDL(thebits : TBits_1); inline;
  1360. procedure setOCTSEL(thebits : TBits_1); inline;
  1361. procedure setON(thebits : TBits_1); inline;
  1362. procedure setSIDL(thebits : TBits_1); inline;
  1363. procedure setw(thebits : TBits_32); inline;
  1364. public
  1365. procedure clearOC32; inline;
  1366. procedure clearOCFLT; inline;
  1367. procedure clearOCM0; inline;
  1368. procedure clearOCM1; inline;
  1369. procedure clearOCM2; inline;
  1370. procedure clearOCSIDL; inline;
  1371. procedure clearOCTSEL; inline;
  1372. procedure clearON; inline;
  1373. procedure clearSIDL; inline;
  1374. procedure setOC32; inline;
  1375. procedure setOCFLT; inline;
  1376. procedure setOCM0; inline;
  1377. procedure setOCM1; inline;
  1378. procedure setOCM2; inline;
  1379. procedure setOCSIDL; inline;
  1380. procedure setOCTSEL; inline;
  1381. procedure setON; inline;
  1382. procedure setSIDL; inline;
  1383. property OC32 : TBits_1 read getOC32 write setOC32;
  1384. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1385. property OCM : TBits_3 read getOCM write setOCM;
  1386. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1387. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1388. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1389. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1390. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1391. property ON : TBits_1 read getON write setON;
  1392. property SIDL : TBits_1 read getSIDL write setSIDL;
  1393. property w : TBits_32 read getw write setw;
  1394. end;
  1395. type
  1396. TOCMP4Registers = record
  1397. OC4CONbits : TOCMP4_OC4CON;
  1398. OC4CON : longWord;
  1399. OC4CONCLR : longWord;
  1400. OC4CONSET : longWord;
  1401. OC4CONINV : longWord;
  1402. OC4R : longWord;
  1403. OC4RCLR : longWord;
  1404. OC4RSET : longWord;
  1405. OC4RINV : longWord;
  1406. OC4RS : longWord;
  1407. OC4RSCLR : longWord;
  1408. OC4RSSET : longWord;
  1409. OC4RSINV : longWord;
  1410. end;
  1411. TOCMP5_OC5CON = record
  1412. private
  1413. function getOC32 : TBits_1; inline;
  1414. function getOCFLT : TBits_1; inline;
  1415. function getOCM : TBits_3; inline;
  1416. function getOCM0 : TBits_1; inline;
  1417. function getOCM1 : TBits_1; inline;
  1418. function getOCM2 : TBits_1; inline;
  1419. function getOCSIDL : TBits_1; inline;
  1420. function getOCTSEL : TBits_1; inline;
  1421. function getON : TBits_1; inline;
  1422. function getSIDL : TBits_1; inline;
  1423. function getw : TBits_32; inline;
  1424. procedure setOC32(thebits : TBits_1); inline;
  1425. procedure setOCFLT(thebits : TBits_1); inline;
  1426. procedure setOCM(thebits : TBits_3); inline;
  1427. procedure setOCM0(thebits : TBits_1); inline;
  1428. procedure setOCM1(thebits : TBits_1); inline;
  1429. procedure setOCM2(thebits : TBits_1); inline;
  1430. procedure setOCSIDL(thebits : TBits_1); inline;
  1431. procedure setOCTSEL(thebits : TBits_1); inline;
  1432. procedure setON(thebits : TBits_1); inline;
  1433. procedure setSIDL(thebits : TBits_1); inline;
  1434. procedure setw(thebits : TBits_32); inline;
  1435. public
  1436. procedure clearOC32; inline;
  1437. procedure clearOCFLT; inline;
  1438. procedure clearOCM0; inline;
  1439. procedure clearOCM1; inline;
  1440. procedure clearOCM2; inline;
  1441. procedure clearOCSIDL; inline;
  1442. procedure clearOCTSEL; inline;
  1443. procedure clearON; inline;
  1444. procedure clearSIDL; inline;
  1445. procedure setOC32; inline;
  1446. procedure setOCFLT; inline;
  1447. procedure setOCM0; inline;
  1448. procedure setOCM1; inline;
  1449. procedure setOCM2; inline;
  1450. procedure setOCSIDL; inline;
  1451. procedure setOCTSEL; inline;
  1452. procedure setON; inline;
  1453. procedure setSIDL; inline;
  1454. property OC32 : TBits_1 read getOC32 write setOC32;
  1455. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1456. property OCM : TBits_3 read getOCM write setOCM;
  1457. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1458. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1459. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1460. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1461. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1462. property ON : TBits_1 read getON write setON;
  1463. property SIDL : TBits_1 read getSIDL write setSIDL;
  1464. property w : TBits_32 read getw write setw;
  1465. end;
  1466. type
  1467. TOCMP5Registers = record
  1468. OC5CONbits : TOCMP5_OC5CON;
  1469. OC5CON : longWord;
  1470. OC5CONCLR : longWord;
  1471. OC5CONSET : longWord;
  1472. OC5CONINV : longWord;
  1473. OC5R : longWord;
  1474. OC5RCLR : longWord;
  1475. OC5RSET : longWord;
  1476. OC5RINV : longWord;
  1477. OC5RS : longWord;
  1478. OC5RSCLR : longWord;
  1479. OC5RSSET : longWord;
  1480. OC5RSINV : longWord;
  1481. end;
  1482. TI2C1A_I2C1ACON = record
  1483. private
  1484. function getA10M : TBits_1; inline;
  1485. function getACKDT : TBits_1; inline;
  1486. function getACKEN : TBits_1; inline;
  1487. function getDISSLW : TBits_1; inline;
  1488. function getGCEN : TBits_1; inline;
  1489. function getI2CEN : TBits_1; inline;
  1490. function getI2CSIDL : TBits_1; inline;
  1491. function getIPMIEN : TBits_1; inline;
  1492. function getON : TBits_1; inline;
  1493. function getPEN : TBits_1; inline;
  1494. function getRCEN : TBits_1; inline;
  1495. function getRSEN : TBits_1; inline;
  1496. function getSCLREL : TBits_1; inline;
  1497. function getSEN : TBits_1; inline;
  1498. function getSIDL : TBits_1; inline;
  1499. function getSMEN : TBits_1; inline;
  1500. function getSTREN : TBits_1; inline;
  1501. function getSTRICT : TBits_1; inline;
  1502. function getw : TBits_32; inline;
  1503. procedure setA10M(thebits : TBits_1); inline;
  1504. procedure setACKDT(thebits : TBits_1); inline;
  1505. procedure setACKEN(thebits : TBits_1); inline;
  1506. procedure setDISSLW(thebits : TBits_1); inline;
  1507. procedure setGCEN(thebits : TBits_1); inline;
  1508. procedure setI2CEN(thebits : TBits_1); inline;
  1509. procedure setI2CSIDL(thebits : TBits_1); inline;
  1510. procedure setIPMIEN(thebits : TBits_1); inline;
  1511. procedure setON(thebits : TBits_1); inline;
  1512. procedure setPEN(thebits : TBits_1); inline;
  1513. procedure setRCEN(thebits : TBits_1); inline;
  1514. procedure setRSEN(thebits : TBits_1); inline;
  1515. procedure setSCLREL(thebits : TBits_1); inline;
  1516. procedure setSEN(thebits : TBits_1); inline;
  1517. procedure setSIDL(thebits : TBits_1); inline;
  1518. procedure setSMEN(thebits : TBits_1); inline;
  1519. procedure setSTREN(thebits : TBits_1); inline;
  1520. procedure setSTRICT(thebits : TBits_1); inline;
  1521. procedure setw(thebits : TBits_32); inline;
  1522. public
  1523. procedure clearA10M; inline;
  1524. procedure clearACKDT; inline;
  1525. procedure clearACKEN; inline;
  1526. procedure clearDISSLW; inline;
  1527. procedure clearGCEN; inline;
  1528. procedure clearI2CEN; inline;
  1529. procedure clearI2CSIDL; inline;
  1530. procedure clearIPMIEN; inline;
  1531. procedure clearON; inline;
  1532. procedure clearPEN; inline;
  1533. procedure clearRCEN; inline;
  1534. procedure clearRSEN; inline;
  1535. procedure clearSCLREL; inline;
  1536. procedure clearSEN; inline;
  1537. procedure clearSIDL; inline;
  1538. procedure clearSMEN; inline;
  1539. procedure clearSTREN; inline;
  1540. procedure clearSTRICT; inline;
  1541. procedure setA10M; inline;
  1542. procedure setACKDT; inline;
  1543. procedure setACKEN; inline;
  1544. procedure setDISSLW; inline;
  1545. procedure setGCEN; inline;
  1546. procedure setI2CEN; inline;
  1547. procedure setI2CSIDL; inline;
  1548. procedure setIPMIEN; inline;
  1549. procedure setON; inline;
  1550. procedure setPEN; inline;
  1551. procedure setRCEN; inline;
  1552. procedure setRSEN; inline;
  1553. procedure setSCLREL; inline;
  1554. procedure setSEN; inline;
  1555. procedure setSIDL; inline;
  1556. procedure setSMEN; inline;
  1557. procedure setSTREN; inline;
  1558. procedure setSTRICT; inline;
  1559. property A10M : TBits_1 read getA10M write setA10M;
  1560. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1561. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1562. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1563. property GCEN : TBits_1 read getGCEN write setGCEN;
  1564. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1565. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1566. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1567. property ON : TBits_1 read getON write setON;
  1568. property PEN : TBits_1 read getPEN write setPEN;
  1569. property RCEN : TBits_1 read getRCEN write setRCEN;
  1570. property RSEN : TBits_1 read getRSEN write setRSEN;
  1571. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1572. property SEN : TBits_1 read getSEN write setSEN;
  1573. property SIDL : TBits_1 read getSIDL write setSIDL;
  1574. property SMEN : TBits_1 read getSMEN write setSMEN;
  1575. property STREN : TBits_1 read getSTREN write setSTREN;
  1576. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1577. property w : TBits_32 read getw write setw;
  1578. end;
  1579. TI2C1A_I2C3CON = record
  1580. private
  1581. function getA10M : TBits_1; inline;
  1582. function getACKDT : TBits_1; inline;
  1583. function getACKEN : TBits_1; inline;
  1584. function getDISSLW : TBits_1; inline;
  1585. function getGCEN : TBits_1; inline;
  1586. function getI2CEN : TBits_1; inline;
  1587. function getI2CSIDL : TBits_1; inline;
  1588. function getIPMIEN : TBits_1; inline;
  1589. function getON : TBits_1; inline;
  1590. function getPEN : TBits_1; inline;
  1591. function getRCEN : TBits_1; inline;
  1592. function getRSEN : TBits_1; inline;
  1593. function getSCLREL : TBits_1; inline;
  1594. function getSEN : TBits_1; inline;
  1595. function getSIDL : TBits_1; inline;
  1596. function getSMEN : TBits_1; inline;
  1597. function getSTREN : TBits_1; inline;
  1598. function getSTRICT : TBits_1; inline;
  1599. function getw : TBits_32; inline;
  1600. procedure setA10M(thebits : TBits_1); inline;
  1601. procedure setACKDT(thebits : TBits_1); inline;
  1602. procedure setACKEN(thebits : TBits_1); inline;
  1603. procedure setDISSLW(thebits : TBits_1); inline;
  1604. procedure setGCEN(thebits : TBits_1); inline;
  1605. procedure setI2CEN(thebits : TBits_1); inline;
  1606. procedure setI2CSIDL(thebits : TBits_1); inline;
  1607. procedure setIPMIEN(thebits : TBits_1); inline;
  1608. procedure setON(thebits : TBits_1); inline;
  1609. procedure setPEN(thebits : TBits_1); inline;
  1610. procedure setRCEN(thebits : TBits_1); inline;
  1611. procedure setRSEN(thebits : TBits_1); inline;
  1612. procedure setSCLREL(thebits : TBits_1); inline;
  1613. procedure setSEN(thebits : TBits_1); inline;
  1614. procedure setSIDL(thebits : TBits_1); inline;
  1615. procedure setSMEN(thebits : TBits_1); inline;
  1616. procedure setSTREN(thebits : TBits_1); inline;
  1617. procedure setSTRICT(thebits : TBits_1); inline;
  1618. procedure setw(thebits : TBits_32); inline;
  1619. public
  1620. procedure clearA10M; inline;
  1621. procedure clearACKDT; inline;
  1622. procedure clearACKEN; inline;
  1623. procedure clearDISSLW; inline;
  1624. procedure clearGCEN; inline;
  1625. procedure clearI2CEN; inline;
  1626. procedure clearI2CSIDL; inline;
  1627. procedure clearIPMIEN; inline;
  1628. procedure clearON; inline;
  1629. procedure clearPEN; inline;
  1630. procedure clearRCEN; inline;
  1631. procedure clearRSEN; inline;
  1632. procedure clearSCLREL; inline;
  1633. procedure clearSEN; inline;
  1634. procedure clearSIDL; inline;
  1635. procedure clearSMEN; inline;
  1636. procedure clearSTREN; inline;
  1637. procedure clearSTRICT; inline;
  1638. procedure setA10M; inline;
  1639. procedure setACKDT; inline;
  1640. procedure setACKEN; inline;
  1641. procedure setDISSLW; inline;
  1642. procedure setGCEN; inline;
  1643. procedure setI2CEN; inline;
  1644. procedure setI2CSIDL; inline;
  1645. procedure setIPMIEN; inline;
  1646. procedure setON; inline;
  1647. procedure setPEN; inline;
  1648. procedure setRCEN; inline;
  1649. procedure setRSEN; inline;
  1650. procedure setSCLREL; inline;
  1651. procedure setSEN; inline;
  1652. procedure setSIDL; inline;
  1653. procedure setSMEN; inline;
  1654. procedure setSTREN; inline;
  1655. procedure setSTRICT; inline;
  1656. property A10M : TBits_1 read getA10M write setA10M;
  1657. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1658. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1659. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1660. property GCEN : TBits_1 read getGCEN write setGCEN;
  1661. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1662. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1663. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1664. property ON : TBits_1 read getON write setON;
  1665. property PEN : TBits_1 read getPEN write setPEN;
  1666. property RCEN : TBits_1 read getRCEN write setRCEN;
  1667. property RSEN : TBits_1 read getRSEN write setRSEN;
  1668. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1669. property SEN : TBits_1 read getSEN write setSEN;
  1670. property SIDL : TBits_1 read getSIDL write setSIDL;
  1671. property SMEN : TBits_1 read getSMEN write setSMEN;
  1672. property STREN : TBits_1 read getSTREN write setSTREN;
  1673. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1674. property w : TBits_32 read getw write setw;
  1675. end;
  1676. TI2C1A_I2C1ASTAT = record
  1677. private
  1678. function getACKSTAT : TBits_1; inline;
  1679. function getADD10 : TBits_1; inline;
  1680. function getBCL : TBits_1; inline;
  1681. function getD_A : TBits_1; inline;
  1682. function getGCSTAT : TBits_1; inline;
  1683. function getI2COV : TBits_1; inline;
  1684. function getI2CPOV : TBits_1; inline;
  1685. function getIWCOL : TBits_1; inline;
  1686. function getP : TBits_1; inline;
  1687. function getRBF : TBits_1; inline;
  1688. function getR_W : TBits_1; inline;
  1689. function getS : TBits_1; inline;
  1690. function getTBF : TBits_1; inline;
  1691. function getTRSTAT : TBits_1; inline;
  1692. function getw : TBits_32; inline;
  1693. procedure setACKSTAT(thebits : TBits_1); inline;
  1694. procedure setADD10(thebits : TBits_1); inline;
  1695. procedure setBCL(thebits : TBits_1); inline;
  1696. procedure setD_A(thebits : TBits_1); inline;
  1697. procedure setGCSTAT(thebits : TBits_1); inline;
  1698. procedure setI2COV(thebits : TBits_1); inline;
  1699. procedure setI2CPOV(thebits : TBits_1); inline;
  1700. procedure setIWCOL(thebits : TBits_1); inline;
  1701. procedure setP(thebits : TBits_1); inline;
  1702. procedure setRBF(thebits : TBits_1); inline;
  1703. procedure setR_W(thebits : TBits_1); inline;
  1704. procedure setS(thebits : TBits_1); inline;
  1705. procedure setTBF(thebits : TBits_1); inline;
  1706. procedure setTRSTAT(thebits : TBits_1); inline;
  1707. procedure setw(thebits : TBits_32); inline;
  1708. public
  1709. procedure clearACKSTAT; inline;
  1710. procedure clearADD10; inline;
  1711. procedure clearBCL; inline;
  1712. procedure clearD_A; inline;
  1713. procedure clearGCSTAT; inline;
  1714. procedure clearI2COV; inline;
  1715. procedure clearI2CPOV; inline;
  1716. procedure clearIWCOL; inline;
  1717. procedure clearP; inline;
  1718. procedure clearRBF; inline;
  1719. procedure clearR_W; inline;
  1720. procedure clearS; inline;
  1721. procedure clearTBF; inline;
  1722. procedure clearTRSTAT; inline;
  1723. procedure setACKSTAT; inline;
  1724. procedure setADD10; inline;
  1725. procedure setBCL; inline;
  1726. procedure setD_A; inline;
  1727. procedure setGCSTAT; inline;
  1728. procedure setI2COV; inline;
  1729. procedure setI2CPOV; inline;
  1730. procedure setIWCOL; inline;
  1731. procedure setP; inline;
  1732. procedure setRBF; inline;
  1733. procedure setR_W; inline;
  1734. procedure setS; inline;
  1735. procedure setTBF; inline;
  1736. procedure setTRSTAT; inline;
  1737. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  1738. property ADD10 : TBits_1 read getADD10 write setADD10;
  1739. property BCL : TBits_1 read getBCL write setBCL;
  1740. property D_A : TBits_1 read getD_A write setD_A;
  1741. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  1742. property I2COV : TBits_1 read getI2COV write setI2COV;
  1743. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  1744. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  1745. property P : TBits_1 read getP write setP;
  1746. property RBF : TBits_1 read getRBF write setRBF;
  1747. property R_W : TBits_1 read getR_W write setR_W;
  1748. property S : TBits_1 read getS write setS;
  1749. property TBF : TBits_1 read getTBF write setTBF;
  1750. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  1751. property w : TBits_32 read getw write setw;
  1752. end;
  1753. TI2C1A_I2C3STAT = record
  1754. private
  1755. function getACKSTAT : TBits_1; inline;
  1756. function getADD10 : TBits_1; inline;
  1757. function getBCL : TBits_1; inline;
  1758. function getD_A : TBits_1; inline;
  1759. function getGCSTAT : TBits_1; inline;
  1760. function getI2COV : TBits_1; inline;
  1761. function getI2CPOV : TBits_1; inline;
  1762. function getIWCOL : TBits_1; inline;
  1763. function getP : TBits_1; inline;
  1764. function getRBF : TBits_1; inline;
  1765. function getR_W : TBits_1; inline;
  1766. function getS : TBits_1; inline;
  1767. function getTBF : TBits_1; inline;
  1768. function getTRSTAT : TBits_1; inline;
  1769. function getw : TBits_32; inline;
  1770. procedure setACKSTAT(thebits : TBits_1); inline;
  1771. procedure setADD10(thebits : TBits_1); inline;
  1772. procedure setBCL(thebits : TBits_1); inline;
  1773. procedure setD_A(thebits : TBits_1); inline;
  1774. procedure setGCSTAT(thebits : TBits_1); inline;
  1775. procedure setI2COV(thebits : TBits_1); inline;
  1776. procedure setI2CPOV(thebits : TBits_1); inline;
  1777. procedure setIWCOL(thebits : TBits_1); inline;
  1778. procedure setP(thebits : TBits_1); inline;
  1779. procedure setRBF(thebits : TBits_1); inline;
  1780. procedure setR_W(thebits : TBits_1); inline;
  1781. procedure setS(thebits : TBits_1); inline;
  1782. procedure setTBF(thebits : TBits_1); inline;
  1783. procedure setTRSTAT(thebits : TBits_1); inline;
  1784. procedure setw(thebits : TBits_32); inline;
  1785. public
  1786. procedure clearACKSTAT; inline;
  1787. procedure clearADD10; inline;
  1788. procedure clearBCL; inline;
  1789. procedure clearD_A; inline;
  1790. procedure clearGCSTAT; inline;
  1791. procedure clearI2COV; inline;
  1792. procedure clearI2CPOV; inline;
  1793. procedure clearIWCOL; inline;
  1794. procedure clearP; inline;
  1795. procedure clearRBF; inline;
  1796. procedure clearR_W; inline;
  1797. procedure clearS; inline;
  1798. procedure clearTBF; inline;
  1799. procedure clearTRSTAT; inline;
  1800. procedure setACKSTAT; inline;
  1801. procedure setADD10; inline;
  1802. procedure setBCL; inline;
  1803. procedure setD_A; inline;
  1804. procedure setGCSTAT; inline;
  1805. procedure setI2COV; inline;
  1806. procedure setI2CPOV; inline;
  1807. procedure setIWCOL; inline;
  1808. procedure setP; inline;
  1809. procedure setRBF; inline;
  1810. procedure setR_W; inline;
  1811. procedure setS; inline;
  1812. procedure setTBF; inline;
  1813. procedure setTRSTAT; inline;
  1814. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  1815. property ADD10 : TBits_1 read getADD10 write setADD10;
  1816. property BCL : TBits_1 read getBCL write setBCL;
  1817. property D_A : TBits_1 read getD_A write setD_A;
  1818. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  1819. property I2COV : TBits_1 read getI2COV write setI2COV;
  1820. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  1821. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  1822. property P : TBits_1 read getP write setP;
  1823. property RBF : TBits_1 read getRBF write setRBF;
  1824. property R_W : TBits_1 read getR_W write setR_W;
  1825. property S : TBits_1 read getS write setS;
  1826. property TBF : TBits_1 read getTBF write setTBF;
  1827. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  1828. property w : TBits_32 read getw write setw;
  1829. end;
  1830. type
  1831. TI2C1ARegisters = record
  1832. I2C1ACONbits : TI2C1A_I2C1ACON;
  1833. I2C1ACON : longWord;
  1834. I2C3CONbits : TI2C1A_I2C3CON;
  1835. I2C3CON : longWord;
  1836. I2C1ACONCLR : longWord;
  1837. I2C3CONCLR : longWord;
  1838. I2C1ACONSET : longWord;
  1839. I2C3CONSET : longWord;
  1840. I2C1ACONINV : longWord;
  1841. I2C3CONINV : longWord;
  1842. I2C1ASTATbits : TI2C1A_I2C1ASTAT;
  1843. I2C1ASTAT : longWord;
  1844. I2C3STATbits : TI2C1A_I2C3STAT;
  1845. I2C3STAT : longWord;
  1846. I2C1ASTATCLR : longWord;
  1847. I2C3STATCLR : longWord;
  1848. I2C1ASTATSET : longWord;
  1849. I2C3STATSET : longWord;
  1850. I2C1ASTATINV : longWord;
  1851. I2C3STATINV : longWord;
  1852. I2C1AADD : longWord;
  1853. I2C3ADD : longWord;
  1854. I2C1AADDCLR : longWord;
  1855. I2C3ADDCLR : longWord;
  1856. I2C1AADDSET : longWord;
  1857. I2C3ADDSET : longWord;
  1858. I2C1AADDINV : longWord;
  1859. I2C3ADDINV : longWord;
  1860. I2C1AMSK : longWord;
  1861. I2C3MSK : longWord;
  1862. I2C1AMSKCLR : longWord;
  1863. I2C3MSKCLR : longWord;
  1864. I2C1AMSKSET : longWord;
  1865. I2C3MSKSET : longWord;
  1866. I2C1AMSKINV : longWord;
  1867. I2C3MSKINV : longWord;
  1868. I2C1ABRG : longWord;
  1869. I2C3BRG : longWord;
  1870. I2C1ABRGCLR : longWord;
  1871. I2C3BRGCLR : longWord;
  1872. I2C1ABRGSET : longWord;
  1873. I2C3BRGSET : longWord;
  1874. I2C1ABRGINV : longWord;
  1875. I2C3BRGINV : longWord;
  1876. I2C1ATRN : longWord;
  1877. I2C3TRN : longWord;
  1878. I2C1ATRNCLR : longWord;
  1879. I2C3TRNCLR : longWord;
  1880. I2C1ATRNSET : longWord;
  1881. I2C3TRNSET : longWord;
  1882. I2C1ATRNINV : longWord;
  1883. I2C3TRNINV : longWord;
  1884. I2C1ARCV : longWord;
  1885. I2C3RCV : longWord;
  1886. end;
  1887. TI2C2A_I2C2ACON = record
  1888. private
  1889. function getA10M : TBits_1; inline;
  1890. function getACKDT : TBits_1; inline;
  1891. function getACKEN : TBits_1; inline;
  1892. function getDISSLW : TBits_1; inline;
  1893. function getGCEN : TBits_1; inline;
  1894. function getI2CEN : TBits_1; inline;
  1895. function getI2CSIDL : TBits_1; inline;
  1896. function getIPMIEN : TBits_1; inline;
  1897. function getON : TBits_1; inline;
  1898. function getPEN : TBits_1; inline;
  1899. function getRCEN : TBits_1; inline;
  1900. function getRSEN : TBits_1; inline;
  1901. function getSCLREL : TBits_1; inline;
  1902. function getSEN : TBits_1; inline;
  1903. function getSIDL : TBits_1; inline;
  1904. function getSMEN : TBits_1; inline;
  1905. function getSTREN : TBits_1; inline;
  1906. function getSTRICT : TBits_1; inline;
  1907. function getw : TBits_32; inline;
  1908. procedure setA10M(thebits : TBits_1); inline;
  1909. procedure setACKDT(thebits : TBits_1); inline;
  1910. procedure setACKEN(thebits : TBits_1); inline;
  1911. procedure setDISSLW(thebits : TBits_1); inline;
  1912. procedure setGCEN(thebits : TBits_1); inline;
  1913. procedure setI2CEN(thebits : TBits_1); inline;
  1914. procedure setI2CSIDL(thebits : TBits_1); inline;
  1915. procedure setIPMIEN(thebits : TBits_1); inline;
  1916. procedure setON(thebits : TBits_1); inline;
  1917. procedure setPEN(thebits : TBits_1); inline;
  1918. procedure setRCEN(thebits : TBits_1); inline;
  1919. procedure setRSEN(thebits : TBits_1); inline;
  1920. procedure setSCLREL(thebits : TBits_1); inline;
  1921. procedure setSEN(thebits : TBits_1); inline;
  1922. procedure setSIDL(thebits : TBits_1); inline;
  1923. procedure setSMEN(thebits : TBits_1); inline;
  1924. procedure setSTREN(thebits : TBits_1); inline;
  1925. procedure setSTRICT(thebits : TBits_1); inline;
  1926. procedure setw(thebits : TBits_32); inline;
  1927. public
  1928. procedure clearA10M; inline;
  1929. procedure clearACKDT; inline;
  1930. procedure clearACKEN; inline;
  1931. procedure clearDISSLW; inline;
  1932. procedure clearGCEN; inline;
  1933. procedure clearI2CEN; inline;
  1934. procedure clearI2CSIDL; inline;
  1935. procedure clearIPMIEN; inline;
  1936. procedure clearON; inline;
  1937. procedure clearPEN; inline;
  1938. procedure clearRCEN; inline;
  1939. procedure clearRSEN; inline;
  1940. procedure clearSCLREL; inline;
  1941. procedure clearSEN; inline;
  1942. procedure clearSIDL; inline;
  1943. procedure clearSMEN; inline;
  1944. procedure clearSTREN; inline;
  1945. procedure clearSTRICT; inline;
  1946. procedure setA10M; inline;
  1947. procedure setACKDT; inline;
  1948. procedure setACKEN; inline;
  1949. procedure setDISSLW; inline;
  1950. procedure setGCEN; inline;
  1951. procedure setI2CEN; inline;
  1952. procedure setI2CSIDL; inline;
  1953. procedure setIPMIEN; inline;
  1954. procedure setON; inline;
  1955. procedure setPEN; inline;
  1956. procedure setRCEN; inline;
  1957. procedure setRSEN; inline;
  1958. procedure setSCLREL; inline;
  1959. procedure setSEN; inline;
  1960. procedure setSIDL; inline;
  1961. procedure setSMEN; inline;
  1962. procedure setSTREN; inline;
  1963. procedure setSTRICT; inline;
  1964. property A10M : TBits_1 read getA10M write setA10M;
  1965. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1966. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1967. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1968. property GCEN : TBits_1 read getGCEN write setGCEN;
  1969. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1970. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1971. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1972. property ON : TBits_1 read getON write setON;
  1973. property PEN : TBits_1 read getPEN write setPEN;
  1974. property RCEN : TBits_1 read getRCEN write setRCEN;
  1975. property RSEN : TBits_1 read getRSEN write setRSEN;
  1976. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1977. property SEN : TBits_1 read getSEN write setSEN;
  1978. property SIDL : TBits_1 read getSIDL write setSIDL;
  1979. property SMEN : TBits_1 read getSMEN write setSMEN;
  1980. property STREN : TBits_1 read getSTREN write setSTREN;
  1981. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1982. property w : TBits_32 read getw write setw;
  1983. end;
  1984. TI2C2A_I2C4CON = record
  1985. private
  1986. function getA10M : TBits_1; inline;
  1987. function getACKDT : TBits_1; inline;
  1988. function getACKEN : TBits_1; inline;
  1989. function getDISSLW : TBits_1; inline;
  1990. function getGCEN : TBits_1; inline;
  1991. function getI2CEN : TBits_1; inline;
  1992. function getI2CSIDL : TBits_1; inline;
  1993. function getIPMIEN : TBits_1; inline;
  1994. function getON : TBits_1; inline;
  1995. function getPEN : TBits_1; inline;
  1996. function getRCEN : TBits_1; inline;
  1997. function getRSEN : TBits_1; inline;
  1998. function getSCLREL : TBits_1; inline;
  1999. function getSEN : TBits_1; inline;
  2000. function getSIDL : TBits_1; inline;
  2001. function getSMEN : TBits_1; inline;
  2002. function getSTREN : TBits_1; inline;
  2003. function getSTRICT : TBits_1; inline;
  2004. function getw : TBits_32; inline;
  2005. procedure setA10M(thebits : TBits_1); inline;
  2006. procedure setACKDT(thebits : TBits_1); inline;
  2007. procedure setACKEN(thebits : TBits_1); inline;
  2008. procedure setDISSLW(thebits : TBits_1); inline;
  2009. procedure setGCEN(thebits : TBits_1); inline;
  2010. procedure setI2CEN(thebits : TBits_1); inline;
  2011. procedure setI2CSIDL(thebits : TBits_1); inline;
  2012. procedure setIPMIEN(thebits : TBits_1); inline;
  2013. procedure setON(thebits : TBits_1); inline;
  2014. procedure setPEN(thebits : TBits_1); inline;
  2015. procedure setRCEN(thebits : TBits_1); inline;
  2016. procedure setRSEN(thebits : TBits_1); inline;
  2017. procedure setSCLREL(thebits : TBits_1); inline;
  2018. procedure setSEN(thebits : TBits_1); inline;
  2019. procedure setSIDL(thebits : TBits_1); inline;
  2020. procedure setSMEN(thebits : TBits_1); inline;
  2021. procedure setSTREN(thebits : TBits_1); inline;
  2022. procedure setSTRICT(thebits : TBits_1); inline;
  2023. procedure setw(thebits : TBits_32); inline;
  2024. public
  2025. procedure clearA10M; inline;
  2026. procedure clearACKDT; inline;
  2027. procedure clearACKEN; inline;
  2028. procedure clearDISSLW; inline;
  2029. procedure clearGCEN; inline;
  2030. procedure clearI2CEN; inline;
  2031. procedure clearI2CSIDL; inline;
  2032. procedure clearIPMIEN; inline;
  2033. procedure clearON; inline;
  2034. procedure clearPEN; inline;
  2035. procedure clearRCEN; inline;
  2036. procedure clearRSEN; inline;
  2037. procedure clearSCLREL; inline;
  2038. procedure clearSEN; inline;
  2039. procedure clearSIDL; inline;
  2040. procedure clearSMEN; inline;
  2041. procedure clearSTREN; inline;
  2042. procedure clearSTRICT; inline;
  2043. procedure setA10M; inline;
  2044. procedure setACKDT; inline;
  2045. procedure setACKEN; inline;
  2046. procedure setDISSLW; inline;
  2047. procedure setGCEN; inline;
  2048. procedure setI2CEN; inline;
  2049. procedure setI2CSIDL; inline;
  2050. procedure setIPMIEN; inline;
  2051. procedure setON; inline;
  2052. procedure setPEN; inline;
  2053. procedure setRCEN; inline;
  2054. procedure setRSEN; inline;
  2055. procedure setSCLREL; inline;
  2056. procedure setSEN; inline;
  2057. procedure setSIDL; inline;
  2058. procedure setSMEN; inline;
  2059. procedure setSTREN; inline;
  2060. procedure setSTRICT; inline;
  2061. property A10M : TBits_1 read getA10M write setA10M;
  2062. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2063. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2064. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2065. property GCEN : TBits_1 read getGCEN write setGCEN;
  2066. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2067. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2068. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2069. property ON : TBits_1 read getON write setON;
  2070. property PEN : TBits_1 read getPEN write setPEN;
  2071. property RCEN : TBits_1 read getRCEN write setRCEN;
  2072. property RSEN : TBits_1 read getRSEN write setRSEN;
  2073. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2074. property SEN : TBits_1 read getSEN write setSEN;
  2075. property SIDL : TBits_1 read getSIDL write setSIDL;
  2076. property SMEN : TBits_1 read getSMEN write setSMEN;
  2077. property STREN : TBits_1 read getSTREN write setSTREN;
  2078. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2079. property w : TBits_32 read getw write setw;
  2080. end;
  2081. TI2C2A_I2C2ASTAT = record
  2082. private
  2083. function getACKSTAT : TBits_1; inline;
  2084. function getADD10 : TBits_1; inline;
  2085. function getBCL : TBits_1; inline;
  2086. function getD_A : TBits_1; inline;
  2087. function getGCSTAT : TBits_1; inline;
  2088. function getI2COV : TBits_1; inline;
  2089. function getI2CPOV : TBits_1; inline;
  2090. function getIWCOL : TBits_1; inline;
  2091. function getP : TBits_1; inline;
  2092. function getRBF : TBits_1; inline;
  2093. function getR_W : TBits_1; inline;
  2094. function getS : TBits_1; inline;
  2095. function getTBF : TBits_1; inline;
  2096. function getTRSTAT : TBits_1; inline;
  2097. function getw : TBits_32; inline;
  2098. procedure setACKSTAT(thebits : TBits_1); inline;
  2099. procedure setADD10(thebits : TBits_1); inline;
  2100. procedure setBCL(thebits : TBits_1); inline;
  2101. procedure setD_A(thebits : TBits_1); inline;
  2102. procedure setGCSTAT(thebits : TBits_1); inline;
  2103. procedure setI2COV(thebits : TBits_1); inline;
  2104. procedure setI2CPOV(thebits : TBits_1); inline;
  2105. procedure setIWCOL(thebits : TBits_1); inline;
  2106. procedure setP(thebits : TBits_1); inline;
  2107. procedure setRBF(thebits : TBits_1); inline;
  2108. procedure setR_W(thebits : TBits_1); inline;
  2109. procedure setS(thebits : TBits_1); inline;
  2110. procedure setTBF(thebits : TBits_1); inline;
  2111. procedure setTRSTAT(thebits : TBits_1); inline;
  2112. procedure setw(thebits : TBits_32); inline;
  2113. public
  2114. procedure clearACKSTAT; inline;
  2115. procedure clearADD10; inline;
  2116. procedure clearBCL; inline;
  2117. procedure clearD_A; inline;
  2118. procedure clearGCSTAT; inline;
  2119. procedure clearI2COV; inline;
  2120. procedure clearI2CPOV; inline;
  2121. procedure clearIWCOL; inline;
  2122. procedure clearP; inline;
  2123. procedure clearRBF; inline;
  2124. procedure clearR_W; inline;
  2125. procedure clearS; inline;
  2126. procedure clearTBF; inline;
  2127. procedure clearTRSTAT; inline;
  2128. procedure setACKSTAT; inline;
  2129. procedure setADD10; inline;
  2130. procedure setBCL; inline;
  2131. procedure setD_A; inline;
  2132. procedure setGCSTAT; inline;
  2133. procedure setI2COV; inline;
  2134. procedure setI2CPOV; inline;
  2135. procedure setIWCOL; inline;
  2136. procedure setP; inline;
  2137. procedure setRBF; inline;
  2138. procedure setR_W; inline;
  2139. procedure setS; inline;
  2140. procedure setTBF; inline;
  2141. procedure setTRSTAT; inline;
  2142. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2143. property ADD10 : TBits_1 read getADD10 write setADD10;
  2144. property BCL : TBits_1 read getBCL write setBCL;
  2145. property D_A : TBits_1 read getD_A write setD_A;
  2146. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2147. property I2COV : TBits_1 read getI2COV write setI2COV;
  2148. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2149. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2150. property P : TBits_1 read getP write setP;
  2151. property RBF : TBits_1 read getRBF write setRBF;
  2152. property R_W : TBits_1 read getR_W write setR_W;
  2153. property S : TBits_1 read getS write setS;
  2154. property TBF : TBits_1 read getTBF write setTBF;
  2155. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2156. property w : TBits_32 read getw write setw;
  2157. end;
  2158. TI2C2A_I2C4STAT = record
  2159. private
  2160. function getACKSTAT : TBits_1; inline;
  2161. function getADD10 : TBits_1; inline;
  2162. function getBCL : TBits_1; inline;
  2163. function getD_A : TBits_1; inline;
  2164. function getGCSTAT : TBits_1; inline;
  2165. function getI2COV : TBits_1; inline;
  2166. function getI2CPOV : TBits_1; inline;
  2167. function getIWCOL : TBits_1; inline;
  2168. function getP : TBits_1; inline;
  2169. function getRBF : TBits_1; inline;
  2170. function getR_W : TBits_1; inline;
  2171. function getS : TBits_1; inline;
  2172. function getTBF : TBits_1; inline;
  2173. function getTRSTAT : TBits_1; inline;
  2174. function getw : TBits_32; inline;
  2175. procedure setACKSTAT(thebits : TBits_1); inline;
  2176. procedure setADD10(thebits : TBits_1); inline;
  2177. procedure setBCL(thebits : TBits_1); inline;
  2178. procedure setD_A(thebits : TBits_1); inline;
  2179. procedure setGCSTAT(thebits : TBits_1); inline;
  2180. procedure setI2COV(thebits : TBits_1); inline;
  2181. procedure setI2CPOV(thebits : TBits_1); inline;
  2182. procedure setIWCOL(thebits : TBits_1); inline;
  2183. procedure setP(thebits : TBits_1); inline;
  2184. procedure setRBF(thebits : TBits_1); inline;
  2185. procedure setR_W(thebits : TBits_1); inline;
  2186. procedure setS(thebits : TBits_1); inline;
  2187. procedure setTBF(thebits : TBits_1); inline;
  2188. procedure setTRSTAT(thebits : TBits_1); inline;
  2189. procedure setw(thebits : TBits_32); inline;
  2190. public
  2191. procedure clearACKSTAT; inline;
  2192. procedure clearADD10; inline;
  2193. procedure clearBCL; inline;
  2194. procedure clearD_A; inline;
  2195. procedure clearGCSTAT; inline;
  2196. procedure clearI2COV; inline;
  2197. procedure clearI2CPOV; inline;
  2198. procedure clearIWCOL; inline;
  2199. procedure clearP; inline;
  2200. procedure clearRBF; inline;
  2201. procedure clearR_W; inline;
  2202. procedure clearS; inline;
  2203. procedure clearTBF; inline;
  2204. procedure clearTRSTAT; inline;
  2205. procedure setACKSTAT; inline;
  2206. procedure setADD10; inline;
  2207. procedure setBCL; inline;
  2208. procedure setD_A; inline;
  2209. procedure setGCSTAT; inline;
  2210. procedure setI2COV; inline;
  2211. procedure setI2CPOV; inline;
  2212. procedure setIWCOL; inline;
  2213. procedure setP; inline;
  2214. procedure setRBF; inline;
  2215. procedure setR_W; inline;
  2216. procedure setS; inline;
  2217. procedure setTBF; inline;
  2218. procedure setTRSTAT; inline;
  2219. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2220. property ADD10 : TBits_1 read getADD10 write setADD10;
  2221. property BCL : TBits_1 read getBCL write setBCL;
  2222. property D_A : TBits_1 read getD_A write setD_A;
  2223. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2224. property I2COV : TBits_1 read getI2COV write setI2COV;
  2225. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2226. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2227. property P : TBits_1 read getP write setP;
  2228. property RBF : TBits_1 read getRBF write setRBF;
  2229. property R_W : TBits_1 read getR_W write setR_W;
  2230. property S : TBits_1 read getS write setS;
  2231. property TBF : TBits_1 read getTBF write setTBF;
  2232. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2233. property w : TBits_32 read getw write setw;
  2234. end;
  2235. type
  2236. TI2C2ARegisters = record
  2237. I2C2ACONbits : TI2C2A_I2C2ACON;
  2238. I2C2ACON : longWord;
  2239. I2C4CONbits : TI2C2A_I2C4CON;
  2240. I2C4CON : longWord;
  2241. I2C2ACONCLR : longWord;
  2242. I2C4CONCLR : longWord;
  2243. I2C2ACONSET : longWord;
  2244. I2C4CONSET : longWord;
  2245. I2C2ACONINV : longWord;
  2246. I2C4CONINV : longWord;
  2247. I2C2ASTATbits : TI2C2A_I2C2ASTAT;
  2248. I2C2ASTAT : longWord;
  2249. I2C4STATbits : TI2C2A_I2C4STAT;
  2250. I2C4STAT : longWord;
  2251. I2C2ASTATCLR : longWord;
  2252. I2C4STATCLR : longWord;
  2253. I2C2ASTATSET : longWord;
  2254. I2C4STATSET : longWord;
  2255. I2C2ASTATINV : longWord;
  2256. I2C4STATINV : longWord;
  2257. I2C2AADD : longWord;
  2258. I2C4ADD : longWord;
  2259. I2C2AADDCLR : longWord;
  2260. I2C4ADDCLR : longWord;
  2261. I2C2AADDSET : longWord;
  2262. I2C4ADDSET : longWord;
  2263. I2C2AADDINV : longWord;
  2264. I2C4ADDINV : longWord;
  2265. I2C2AMSK : longWord;
  2266. I2C4MSK : longWord;
  2267. I2C2AMSKCLR : longWord;
  2268. I2C4MSKCLR : longWord;
  2269. I2C2AMSKSET : longWord;
  2270. I2C4MSKSET : longWord;
  2271. I2C2AMSKINV : longWord;
  2272. I2C4MSKINV : longWord;
  2273. I2C2ABRG : longWord;
  2274. I2C4BRG : longWord;
  2275. I2C2ABRGCLR : longWord;
  2276. I2C4BRGCLR : longWord;
  2277. I2C2ABRGSET : longWord;
  2278. I2C4BRGSET : longWord;
  2279. I2C2ABRGINV : longWord;
  2280. I2C4BRGINV : longWord;
  2281. I2C2ATRN : longWord;
  2282. I2C4TRN : longWord;
  2283. I2C2ATRNCLR : longWord;
  2284. I2C4TRNCLR : longWord;
  2285. I2C2ATRNSET : longWord;
  2286. I2C4TRNSET : longWord;
  2287. I2C2ATRNINV : longWord;
  2288. I2C4TRNINV : longWord;
  2289. I2C2ARCV : longWord;
  2290. I2C4RCV : longWord;
  2291. end;
  2292. TI2C3A_I2C3ACON = record
  2293. private
  2294. function getA10M : TBits_1; inline;
  2295. function getACKDT : TBits_1; inline;
  2296. function getACKEN : TBits_1; inline;
  2297. function getDISSLW : TBits_1; inline;
  2298. function getGCEN : TBits_1; inline;
  2299. function getI2CEN : TBits_1; inline;
  2300. function getI2CSIDL : TBits_1; inline;
  2301. function getIPMIEN : TBits_1; inline;
  2302. function getON : TBits_1; inline;
  2303. function getPEN : TBits_1; inline;
  2304. function getRCEN : TBits_1; inline;
  2305. function getRSEN : TBits_1; inline;
  2306. function getSCLREL : TBits_1; inline;
  2307. function getSEN : TBits_1; inline;
  2308. function getSIDL : TBits_1; inline;
  2309. function getSMEN : TBits_1; inline;
  2310. function getSTREN : TBits_1; inline;
  2311. function getSTRICT : TBits_1; inline;
  2312. function getw : TBits_32; inline;
  2313. procedure setA10M(thebits : TBits_1); inline;
  2314. procedure setACKDT(thebits : TBits_1); inline;
  2315. procedure setACKEN(thebits : TBits_1); inline;
  2316. procedure setDISSLW(thebits : TBits_1); inline;
  2317. procedure setGCEN(thebits : TBits_1); inline;
  2318. procedure setI2CEN(thebits : TBits_1); inline;
  2319. procedure setI2CSIDL(thebits : TBits_1); inline;
  2320. procedure setIPMIEN(thebits : TBits_1); inline;
  2321. procedure setON(thebits : TBits_1); inline;
  2322. procedure setPEN(thebits : TBits_1); inline;
  2323. procedure setRCEN(thebits : TBits_1); inline;
  2324. procedure setRSEN(thebits : TBits_1); inline;
  2325. procedure setSCLREL(thebits : TBits_1); inline;
  2326. procedure setSEN(thebits : TBits_1); inline;
  2327. procedure setSIDL(thebits : TBits_1); inline;
  2328. procedure setSMEN(thebits : TBits_1); inline;
  2329. procedure setSTREN(thebits : TBits_1); inline;
  2330. procedure setSTRICT(thebits : TBits_1); inline;
  2331. procedure setw(thebits : TBits_32); inline;
  2332. public
  2333. procedure clearA10M; inline;
  2334. procedure clearACKDT; inline;
  2335. procedure clearACKEN; inline;
  2336. procedure clearDISSLW; inline;
  2337. procedure clearGCEN; inline;
  2338. procedure clearI2CEN; inline;
  2339. procedure clearI2CSIDL; inline;
  2340. procedure clearIPMIEN; inline;
  2341. procedure clearON; inline;
  2342. procedure clearPEN; inline;
  2343. procedure clearRCEN; inline;
  2344. procedure clearRSEN; inline;
  2345. procedure clearSCLREL; inline;
  2346. procedure clearSEN; inline;
  2347. procedure clearSIDL; inline;
  2348. procedure clearSMEN; inline;
  2349. procedure clearSTREN; inline;
  2350. procedure clearSTRICT; inline;
  2351. procedure setA10M; inline;
  2352. procedure setACKDT; inline;
  2353. procedure setACKEN; inline;
  2354. procedure setDISSLW; inline;
  2355. procedure setGCEN; inline;
  2356. procedure setI2CEN; inline;
  2357. procedure setI2CSIDL; inline;
  2358. procedure setIPMIEN; inline;
  2359. procedure setON; inline;
  2360. procedure setPEN; inline;
  2361. procedure setRCEN; inline;
  2362. procedure setRSEN; inline;
  2363. procedure setSCLREL; inline;
  2364. procedure setSEN; inline;
  2365. procedure setSIDL; inline;
  2366. procedure setSMEN; inline;
  2367. procedure setSTREN; inline;
  2368. procedure setSTRICT; inline;
  2369. property A10M : TBits_1 read getA10M write setA10M;
  2370. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2371. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2372. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2373. property GCEN : TBits_1 read getGCEN write setGCEN;
  2374. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2375. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2376. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2377. property ON : TBits_1 read getON write setON;
  2378. property PEN : TBits_1 read getPEN write setPEN;
  2379. property RCEN : TBits_1 read getRCEN write setRCEN;
  2380. property RSEN : TBits_1 read getRSEN write setRSEN;
  2381. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2382. property SEN : TBits_1 read getSEN write setSEN;
  2383. property SIDL : TBits_1 read getSIDL write setSIDL;
  2384. property SMEN : TBits_1 read getSMEN write setSMEN;
  2385. property STREN : TBits_1 read getSTREN write setSTREN;
  2386. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2387. property w : TBits_32 read getw write setw;
  2388. end;
  2389. TI2C3A_I2C5CON = record
  2390. private
  2391. function getA10M : TBits_1; inline;
  2392. function getACKDT : TBits_1; inline;
  2393. function getACKEN : TBits_1; inline;
  2394. function getDISSLW : TBits_1; inline;
  2395. function getGCEN : TBits_1; inline;
  2396. function getI2CEN : TBits_1; inline;
  2397. function getI2CSIDL : TBits_1; inline;
  2398. function getIPMIEN : TBits_1; inline;
  2399. function getON : TBits_1; inline;
  2400. function getPEN : TBits_1; inline;
  2401. function getRCEN : TBits_1; inline;
  2402. function getRSEN : TBits_1; inline;
  2403. function getSCLREL : TBits_1; inline;
  2404. function getSEN : TBits_1; inline;
  2405. function getSIDL : TBits_1; inline;
  2406. function getSMEN : TBits_1; inline;
  2407. function getSTREN : TBits_1; inline;
  2408. function getSTRICT : TBits_1; inline;
  2409. function getw : TBits_32; inline;
  2410. procedure setA10M(thebits : TBits_1); inline;
  2411. procedure setACKDT(thebits : TBits_1); inline;
  2412. procedure setACKEN(thebits : TBits_1); inline;
  2413. procedure setDISSLW(thebits : TBits_1); inline;
  2414. procedure setGCEN(thebits : TBits_1); inline;
  2415. procedure setI2CEN(thebits : TBits_1); inline;
  2416. procedure setI2CSIDL(thebits : TBits_1); inline;
  2417. procedure setIPMIEN(thebits : TBits_1); inline;
  2418. procedure setON(thebits : TBits_1); inline;
  2419. procedure setPEN(thebits : TBits_1); inline;
  2420. procedure setRCEN(thebits : TBits_1); inline;
  2421. procedure setRSEN(thebits : TBits_1); inline;
  2422. procedure setSCLREL(thebits : TBits_1); inline;
  2423. procedure setSEN(thebits : TBits_1); inline;
  2424. procedure setSIDL(thebits : TBits_1); inline;
  2425. procedure setSMEN(thebits : TBits_1); inline;
  2426. procedure setSTREN(thebits : TBits_1); inline;
  2427. procedure setSTRICT(thebits : TBits_1); inline;
  2428. procedure setw(thebits : TBits_32); inline;
  2429. public
  2430. procedure clearA10M; inline;
  2431. procedure clearACKDT; inline;
  2432. procedure clearACKEN; inline;
  2433. procedure clearDISSLW; inline;
  2434. procedure clearGCEN; inline;
  2435. procedure clearI2CEN; inline;
  2436. procedure clearI2CSIDL; inline;
  2437. procedure clearIPMIEN; inline;
  2438. procedure clearON; inline;
  2439. procedure clearPEN; inline;
  2440. procedure clearRCEN; inline;
  2441. procedure clearRSEN; inline;
  2442. procedure clearSCLREL; inline;
  2443. procedure clearSEN; inline;
  2444. procedure clearSIDL; inline;
  2445. procedure clearSMEN; inline;
  2446. procedure clearSTREN; inline;
  2447. procedure clearSTRICT; inline;
  2448. procedure setA10M; inline;
  2449. procedure setACKDT; inline;
  2450. procedure setACKEN; inline;
  2451. procedure setDISSLW; inline;
  2452. procedure setGCEN; inline;
  2453. procedure setI2CEN; inline;
  2454. procedure setI2CSIDL; inline;
  2455. procedure setIPMIEN; inline;
  2456. procedure setON; inline;
  2457. procedure setPEN; inline;
  2458. procedure setRCEN; inline;
  2459. procedure setRSEN; inline;
  2460. procedure setSCLREL; inline;
  2461. procedure setSEN; inline;
  2462. procedure setSIDL; inline;
  2463. procedure setSMEN; inline;
  2464. procedure setSTREN; inline;
  2465. procedure setSTRICT; inline;
  2466. property A10M : TBits_1 read getA10M write setA10M;
  2467. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2468. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2469. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2470. property GCEN : TBits_1 read getGCEN write setGCEN;
  2471. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2472. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2473. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2474. property ON : TBits_1 read getON write setON;
  2475. property PEN : TBits_1 read getPEN write setPEN;
  2476. property RCEN : TBits_1 read getRCEN write setRCEN;
  2477. property RSEN : TBits_1 read getRSEN write setRSEN;
  2478. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2479. property SEN : TBits_1 read getSEN write setSEN;
  2480. property SIDL : TBits_1 read getSIDL write setSIDL;
  2481. property SMEN : TBits_1 read getSMEN write setSMEN;
  2482. property STREN : TBits_1 read getSTREN write setSTREN;
  2483. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2484. property w : TBits_32 read getw write setw;
  2485. end;
  2486. TI2C3A_I2C3ASTAT = record
  2487. private
  2488. function getACKSTAT : TBits_1; inline;
  2489. function getADD10 : TBits_1; inline;
  2490. function getBCL : TBits_1; inline;
  2491. function getD_A : TBits_1; inline;
  2492. function getGCSTAT : TBits_1; inline;
  2493. function getI2COV : TBits_1; inline;
  2494. function getI2CPOV : TBits_1; inline;
  2495. function getIWCOL : TBits_1; inline;
  2496. function getP : TBits_1; inline;
  2497. function getRBF : TBits_1; inline;
  2498. function getR_W : TBits_1; inline;
  2499. function getS : TBits_1; inline;
  2500. function getTBF : TBits_1; inline;
  2501. function getTRSTAT : TBits_1; inline;
  2502. function getw : TBits_32; inline;
  2503. procedure setACKSTAT(thebits : TBits_1); inline;
  2504. procedure setADD10(thebits : TBits_1); inline;
  2505. procedure setBCL(thebits : TBits_1); inline;
  2506. procedure setD_A(thebits : TBits_1); inline;
  2507. procedure setGCSTAT(thebits : TBits_1); inline;
  2508. procedure setI2COV(thebits : TBits_1); inline;
  2509. procedure setI2CPOV(thebits : TBits_1); inline;
  2510. procedure setIWCOL(thebits : TBits_1); inline;
  2511. procedure setP(thebits : TBits_1); inline;
  2512. procedure setRBF(thebits : TBits_1); inline;
  2513. procedure setR_W(thebits : TBits_1); inline;
  2514. procedure setS(thebits : TBits_1); inline;
  2515. procedure setTBF(thebits : TBits_1); inline;
  2516. procedure setTRSTAT(thebits : TBits_1); inline;
  2517. procedure setw(thebits : TBits_32); inline;
  2518. public
  2519. procedure clearACKSTAT; inline;
  2520. procedure clearADD10; inline;
  2521. procedure clearBCL; inline;
  2522. procedure clearD_A; inline;
  2523. procedure clearGCSTAT; inline;
  2524. procedure clearI2COV; inline;
  2525. procedure clearI2CPOV; inline;
  2526. procedure clearIWCOL; inline;
  2527. procedure clearP; inline;
  2528. procedure clearRBF; inline;
  2529. procedure clearR_W; inline;
  2530. procedure clearS; inline;
  2531. procedure clearTBF; inline;
  2532. procedure clearTRSTAT; inline;
  2533. procedure setACKSTAT; inline;
  2534. procedure setADD10; inline;
  2535. procedure setBCL; inline;
  2536. procedure setD_A; inline;
  2537. procedure setGCSTAT; inline;
  2538. procedure setI2COV; inline;
  2539. procedure setI2CPOV; inline;
  2540. procedure setIWCOL; inline;
  2541. procedure setP; inline;
  2542. procedure setRBF; inline;
  2543. procedure setR_W; inline;
  2544. procedure setS; inline;
  2545. procedure setTBF; inline;
  2546. procedure setTRSTAT; inline;
  2547. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2548. property ADD10 : TBits_1 read getADD10 write setADD10;
  2549. property BCL : TBits_1 read getBCL write setBCL;
  2550. property D_A : TBits_1 read getD_A write setD_A;
  2551. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2552. property I2COV : TBits_1 read getI2COV write setI2COV;
  2553. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2554. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2555. property P : TBits_1 read getP write setP;
  2556. property RBF : TBits_1 read getRBF write setRBF;
  2557. property R_W : TBits_1 read getR_W write setR_W;
  2558. property S : TBits_1 read getS write setS;
  2559. property TBF : TBits_1 read getTBF write setTBF;
  2560. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2561. property w : TBits_32 read getw write setw;
  2562. end;
  2563. TI2C3A_I2C5STAT = record
  2564. private
  2565. function getACKSTAT : TBits_1; inline;
  2566. function getADD10 : TBits_1; inline;
  2567. function getBCL : TBits_1; inline;
  2568. function getD_A : TBits_1; inline;
  2569. function getGCSTAT : TBits_1; inline;
  2570. function getI2COV : TBits_1; inline;
  2571. function getI2CPOV : TBits_1; inline;
  2572. function getIWCOL : TBits_1; inline;
  2573. function getP : TBits_1; inline;
  2574. function getRBF : TBits_1; inline;
  2575. function getR_W : TBits_1; inline;
  2576. function getS : TBits_1; inline;
  2577. function getTBF : TBits_1; inline;
  2578. function getTRSTAT : TBits_1; inline;
  2579. function getw : TBits_32; inline;
  2580. procedure setACKSTAT(thebits : TBits_1); inline;
  2581. procedure setADD10(thebits : TBits_1); inline;
  2582. procedure setBCL(thebits : TBits_1); inline;
  2583. procedure setD_A(thebits : TBits_1); inline;
  2584. procedure setGCSTAT(thebits : TBits_1); inline;
  2585. procedure setI2COV(thebits : TBits_1); inline;
  2586. procedure setI2CPOV(thebits : TBits_1); inline;
  2587. procedure setIWCOL(thebits : TBits_1); inline;
  2588. procedure setP(thebits : TBits_1); inline;
  2589. procedure setRBF(thebits : TBits_1); inline;
  2590. procedure setR_W(thebits : TBits_1); inline;
  2591. procedure setS(thebits : TBits_1); inline;
  2592. procedure setTBF(thebits : TBits_1); inline;
  2593. procedure setTRSTAT(thebits : TBits_1); inline;
  2594. procedure setw(thebits : TBits_32); inline;
  2595. public
  2596. procedure clearACKSTAT; inline;
  2597. procedure clearADD10; inline;
  2598. procedure clearBCL; inline;
  2599. procedure clearD_A; inline;
  2600. procedure clearGCSTAT; inline;
  2601. procedure clearI2COV; inline;
  2602. procedure clearI2CPOV; inline;
  2603. procedure clearIWCOL; inline;
  2604. procedure clearP; inline;
  2605. procedure clearRBF; inline;
  2606. procedure clearR_W; inline;
  2607. procedure clearS; inline;
  2608. procedure clearTBF; inline;
  2609. procedure clearTRSTAT; inline;
  2610. procedure setACKSTAT; inline;
  2611. procedure setADD10; inline;
  2612. procedure setBCL; inline;
  2613. procedure setD_A; inline;
  2614. procedure setGCSTAT; inline;
  2615. procedure setI2COV; inline;
  2616. procedure setI2CPOV; inline;
  2617. procedure setIWCOL; inline;
  2618. procedure setP; inline;
  2619. procedure setRBF; inline;
  2620. procedure setR_W; inline;
  2621. procedure setS; inline;
  2622. procedure setTBF; inline;
  2623. procedure setTRSTAT; inline;
  2624. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2625. property ADD10 : TBits_1 read getADD10 write setADD10;
  2626. property BCL : TBits_1 read getBCL write setBCL;
  2627. property D_A : TBits_1 read getD_A write setD_A;
  2628. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2629. property I2COV : TBits_1 read getI2COV write setI2COV;
  2630. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2631. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2632. property P : TBits_1 read getP write setP;
  2633. property RBF : TBits_1 read getRBF write setRBF;
  2634. property R_W : TBits_1 read getR_W write setR_W;
  2635. property S : TBits_1 read getS write setS;
  2636. property TBF : TBits_1 read getTBF write setTBF;
  2637. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2638. property w : TBits_32 read getw write setw;
  2639. end;
  2640. type
  2641. TI2C3ARegisters = record
  2642. I2C3ACONbits : TI2C3A_I2C3ACON;
  2643. I2C3ACON : longWord;
  2644. I2C5CONbits : TI2C3A_I2C5CON;
  2645. I2C5CON : longWord;
  2646. I2C3ACONCLR : longWord;
  2647. I2C5CONCLR : longWord;
  2648. I2C3ACONSET : longWord;
  2649. I2C5CONSET : longWord;
  2650. I2C3ACONINV : longWord;
  2651. I2C5CONINV : longWord;
  2652. I2C3ASTATbits : TI2C3A_I2C3ASTAT;
  2653. I2C3ASTAT : longWord;
  2654. I2C5STATbits : TI2C3A_I2C5STAT;
  2655. I2C5STAT : longWord;
  2656. I2C3ASTATCLR : longWord;
  2657. I2C5STATCLR : longWord;
  2658. I2C3ASTATSET : longWord;
  2659. I2C5STATSET : longWord;
  2660. I2C3ASTATINV : longWord;
  2661. I2C5STATINV : longWord;
  2662. I2C3AADD : longWord;
  2663. I2C5ADD : longWord;
  2664. I2C3AADDCLR : longWord;
  2665. I2C5ADDCLR : longWord;
  2666. I2C3AADDSET : longWord;
  2667. I2C5ADDSET : longWord;
  2668. I2C3AADDINV : longWord;
  2669. I2C5ADDINV : longWord;
  2670. I2C3AMSK : longWord;
  2671. I2C5MSK : longWord;
  2672. I2C3AMSKCLR : longWord;
  2673. I2C5MSKCLR : longWord;
  2674. I2C3AMSKSET : longWord;
  2675. I2C5MSKSET : longWord;
  2676. I2C3AMSKINV : longWord;
  2677. I2C5MSKINV : longWord;
  2678. I2C3ABRG : longWord;
  2679. I2C5BRG : longWord;
  2680. I2C3ABRGCLR : longWord;
  2681. I2C5BRGCLR : longWord;
  2682. I2C3ABRGSET : longWord;
  2683. I2C5BRGSET : longWord;
  2684. I2C3ABRGINV : longWord;
  2685. I2C5BRGINV : longWord;
  2686. I2C3ATRN : longWord;
  2687. I2C5TRN : longWord;
  2688. I2C3ATRNCLR : longWord;
  2689. I2C5TRNCLR : longWord;
  2690. I2C3ATRNSET : longWord;
  2691. I2C5TRNSET : longWord;
  2692. I2C3ATRNINV : longWord;
  2693. I2C5TRNINV : longWord;
  2694. I2C3ARCV : longWord;
  2695. I2C5RCV : longWord;
  2696. end;
  2697. TI2C1_I2C1CON = record
  2698. private
  2699. function getA10M : TBits_1; inline;
  2700. function getACKDT : TBits_1; inline;
  2701. function getACKEN : TBits_1; inline;
  2702. function getDISSLW : TBits_1; inline;
  2703. function getGCEN : TBits_1; inline;
  2704. function getI2CEN : TBits_1; inline;
  2705. function getI2CSIDL : TBits_1; inline;
  2706. function getIPMIEN : TBits_1; inline;
  2707. function getON : TBits_1; inline;
  2708. function getPEN : TBits_1; inline;
  2709. function getRCEN : TBits_1; inline;
  2710. function getRSEN : TBits_1; inline;
  2711. function getSCLREL : TBits_1; inline;
  2712. function getSEN : TBits_1; inline;
  2713. function getSIDL : TBits_1; inline;
  2714. function getSMEN : TBits_1; inline;
  2715. function getSTREN : TBits_1; inline;
  2716. function getSTRICT : TBits_1; inline;
  2717. function getw : TBits_32; inline;
  2718. procedure setA10M(thebits : TBits_1); inline;
  2719. procedure setACKDT(thebits : TBits_1); inline;
  2720. procedure setACKEN(thebits : TBits_1); inline;
  2721. procedure setDISSLW(thebits : TBits_1); inline;
  2722. procedure setGCEN(thebits : TBits_1); inline;
  2723. procedure setI2CEN(thebits : TBits_1); inline;
  2724. procedure setI2CSIDL(thebits : TBits_1); inline;
  2725. procedure setIPMIEN(thebits : TBits_1); inline;
  2726. procedure setON(thebits : TBits_1); inline;
  2727. procedure setPEN(thebits : TBits_1); inline;
  2728. procedure setRCEN(thebits : TBits_1); inline;
  2729. procedure setRSEN(thebits : TBits_1); inline;
  2730. procedure setSCLREL(thebits : TBits_1); inline;
  2731. procedure setSEN(thebits : TBits_1); inline;
  2732. procedure setSIDL(thebits : TBits_1); inline;
  2733. procedure setSMEN(thebits : TBits_1); inline;
  2734. procedure setSTREN(thebits : TBits_1); inline;
  2735. procedure setSTRICT(thebits : TBits_1); inline;
  2736. procedure setw(thebits : TBits_32); inline;
  2737. public
  2738. procedure clearA10M; inline;
  2739. procedure clearACKDT; inline;
  2740. procedure clearACKEN; inline;
  2741. procedure clearDISSLW; inline;
  2742. procedure clearGCEN; inline;
  2743. procedure clearI2CEN; inline;
  2744. procedure clearI2CSIDL; inline;
  2745. procedure clearIPMIEN; inline;
  2746. procedure clearON; inline;
  2747. procedure clearPEN; inline;
  2748. procedure clearRCEN; inline;
  2749. procedure clearRSEN; inline;
  2750. procedure clearSCLREL; inline;
  2751. procedure clearSEN; inline;
  2752. procedure clearSIDL; inline;
  2753. procedure clearSMEN; inline;
  2754. procedure clearSTREN; inline;
  2755. procedure clearSTRICT; inline;
  2756. procedure setA10M; inline;
  2757. procedure setACKDT; inline;
  2758. procedure setACKEN; inline;
  2759. procedure setDISSLW; inline;
  2760. procedure setGCEN; inline;
  2761. procedure setI2CEN; inline;
  2762. procedure setI2CSIDL; inline;
  2763. procedure setIPMIEN; inline;
  2764. procedure setON; inline;
  2765. procedure setPEN; inline;
  2766. procedure setRCEN; inline;
  2767. procedure setRSEN; inline;
  2768. procedure setSCLREL; inline;
  2769. procedure setSEN; inline;
  2770. procedure setSIDL; inline;
  2771. procedure setSMEN; inline;
  2772. procedure setSTREN; inline;
  2773. procedure setSTRICT; inline;
  2774. property A10M : TBits_1 read getA10M write setA10M;
  2775. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2776. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2777. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2778. property GCEN : TBits_1 read getGCEN write setGCEN;
  2779. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2780. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2781. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2782. property ON : TBits_1 read getON write setON;
  2783. property PEN : TBits_1 read getPEN write setPEN;
  2784. property RCEN : TBits_1 read getRCEN write setRCEN;
  2785. property RSEN : TBits_1 read getRSEN write setRSEN;
  2786. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2787. property SEN : TBits_1 read getSEN write setSEN;
  2788. property SIDL : TBits_1 read getSIDL write setSIDL;
  2789. property SMEN : TBits_1 read getSMEN write setSMEN;
  2790. property STREN : TBits_1 read getSTREN write setSTREN;
  2791. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2792. property w : TBits_32 read getw write setw;
  2793. end;
  2794. TI2C1_I2C1STAT = record
  2795. private
  2796. function getACKSTAT : TBits_1; inline;
  2797. function getADD10 : TBits_1; inline;
  2798. function getBCL : TBits_1; inline;
  2799. function getD_A : TBits_1; inline;
  2800. function getGCSTAT : TBits_1; inline;
  2801. function getI2COV : TBits_1; inline;
  2802. function getI2CPOV : TBits_1; inline;
  2803. function getIWCOL : TBits_1; inline;
  2804. function getP : TBits_1; inline;
  2805. function getRBF : TBits_1; inline;
  2806. function getR_W : TBits_1; inline;
  2807. function getS : TBits_1; inline;
  2808. function getTBF : TBits_1; inline;
  2809. function getTRSTAT : TBits_1; inline;
  2810. function getw : TBits_32; inline;
  2811. procedure setACKSTAT(thebits : TBits_1); inline;
  2812. procedure setADD10(thebits : TBits_1); inline;
  2813. procedure setBCL(thebits : TBits_1); inline;
  2814. procedure setD_A(thebits : TBits_1); inline;
  2815. procedure setGCSTAT(thebits : TBits_1); inline;
  2816. procedure setI2COV(thebits : TBits_1); inline;
  2817. procedure setI2CPOV(thebits : TBits_1); inline;
  2818. procedure setIWCOL(thebits : TBits_1); inline;
  2819. procedure setP(thebits : TBits_1); inline;
  2820. procedure setRBF(thebits : TBits_1); inline;
  2821. procedure setR_W(thebits : TBits_1); inline;
  2822. procedure setS(thebits : TBits_1); inline;
  2823. procedure setTBF(thebits : TBits_1); inline;
  2824. procedure setTRSTAT(thebits : TBits_1); inline;
  2825. procedure setw(thebits : TBits_32); inline;
  2826. public
  2827. procedure clearACKSTAT; inline;
  2828. procedure clearADD10; inline;
  2829. procedure clearBCL; inline;
  2830. procedure clearD_A; inline;
  2831. procedure clearGCSTAT; inline;
  2832. procedure clearI2COV; inline;
  2833. procedure clearI2CPOV; inline;
  2834. procedure clearIWCOL; inline;
  2835. procedure clearP; inline;
  2836. procedure clearRBF; inline;
  2837. procedure clearR_W; inline;
  2838. procedure clearS; inline;
  2839. procedure clearTBF; inline;
  2840. procedure clearTRSTAT; inline;
  2841. procedure setACKSTAT; inline;
  2842. procedure setADD10; inline;
  2843. procedure setBCL; inline;
  2844. procedure setD_A; inline;
  2845. procedure setGCSTAT; inline;
  2846. procedure setI2COV; inline;
  2847. procedure setI2CPOV; inline;
  2848. procedure setIWCOL; inline;
  2849. procedure setP; inline;
  2850. procedure setRBF; inline;
  2851. procedure setR_W; inline;
  2852. procedure setS; inline;
  2853. procedure setTBF; inline;
  2854. procedure setTRSTAT; inline;
  2855. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2856. property ADD10 : TBits_1 read getADD10 write setADD10;
  2857. property BCL : TBits_1 read getBCL write setBCL;
  2858. property D_A : TBits_1 read getD_A write setD_A;
  2859. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2860. property I2COV : TBits_1 read getI2COV write setI2COV;
  2861. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2862. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2863. property P : TBits_1 read getP write setP;
  2864. property RBF : TBits_1 read getRBF write setRBF;
  2865. property R_W : TBits_1 read getR_W write setR_W;
  2866. property S : TBits_1 read getS write setS;
  2867. property TBF : TBits_1 read getTBF write setTBF;
  2868. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2869. property w : TBits_32 read getw write setw;
  2870. end;
  2871. type
  2872. TI2C1Registers = record
  2873. I2C1CONbits : TI2C1_I2C1CON;
  2874. I2C1CON : longWord;
  2875. I2C1CONCLR : longWord;
  2876. I2C1CONSET : longWord;
  2877. I2C1CONINV : longWord;
  2878. I2C1STATbits : TI2C1_I2C1STAT;
  2879. I2C1STAT : longWord;
  2880. I2C1STATCLR : longWord;
  2881. I2C1STATSET : longWord;
  2882. I2C1STATINV : longWord;
  2883. I2C1ADD : longWord;
  2884. I2C1ADDCLR : longWord;
  2885. I2C1ADDSET : longWord;
  2886. I2C1ADDINV : longWord;
  2887. I2C1MSK : longWord;
  2888. I2C1MSKCLR : longWord;
  2889. I2C1MSKSET : longWord;
  2890. I2C1MSKINV : longWord;
  2891. I2C1BRG : longWord;
  2892. I2C1BRGCLR : longWord;
  2893. I2C1BRGSET : longWord;
  2894. I2C1BRGINV : longWord;
  2895. I2C1TRN : longWord;
  2896. I2C1TRNCLR : longWord;
  2897. I2C1TRNSET : longWord;
  2898. I2C1TRNINV : longWord;
  2899. I2C1RCV : longWord;
  2900. end;
  2901. TI2C2_I2C2CON = record
  2902. private
  2903. function getA10M : TBits_1; inline;
  2904. function getACKDT : TBits_1; inline;
  2905. function getACKEN : TBits_1; inline;
  2906. function getDISSLW : TBits_1; inline;
  2907. function getGCEN : TBits_1; inline;
  2908. function getI2CEN : TBits_1; inline;
  2909. function getI2CSIDL : TBits_1; inline;
  2910. function getIPMIEN : TBits_1; inline;
  2911. function getON : TBits_1; inline;
  2912. function getPEN : TBits_1; inline;
  2913. function getRCEN : TBits_1; inline;
  2914. function getRSEN : TBits_1; inline;
  2915. function getSCLREL : TBits_1; inline;
  2916. function getSEN : TBits_1; inline;
  2917. function getSIDL : TBits_1; inline;
  2918. function getSMEN : TBits_1; inline;
  2919. function getSTREN : TBits_1; inline;
  2920. function getSTRICT : TBits_1; inline;
  2921. function getw : TBits_32; inline;
  2922. procedure setA10M(thebits : TBits_1); inline;
  2923. procedure setACKDT(thebits : TBits_1); inline;
  2924. procedure setACKEN(thebits : TBits_1); inline;
  2925. procedure setDISSLW(thebits : TBits_1); inline;
  2926. procedure setGCEN(thebits : TBits_1); inline;
  2927. procedure setI2CEN(thebits : TBits_1); inline;
  2928. procedure setI2CSIDL(thebits : TBits_1); inline;
  2929. procedure setIPMIEN(thebits : TBits_1); inline;
  2930. procedure setON(thebits : TBits_1); inline;
  2931. procedure setPEN(thebits : TBits_1); inline;
  2932. procedure setRCEN(thebits : TBits_1); inline;
  2933. procedure setRSEN(thebits : TBits_1); inline;
  2934. procedure setSCLREL(thebits : TBits_1); inline;
  2935. procedure setSEN(thebits : TBits_1); inline;
  2936. procedure setSIDL(thebits : TBits_1); inline;
  2937. procedure setSMEN(thebits : TBits_1); inline;
  2938. procedure setSTREN(thebits : TBits_1); inline;
  2939. procedure setSTRICT(thebits : TBits_1); inline;
  2940. procedure setw(thebits : TBits_32); inline;
  2941. public
  2942. procedure clearA10M; inline;
  2943. procedure clearACKDT; inline;
  2944. procedure clearACKEN; inline;
  2945. procedure clearDISSLW; inline;
  2946. procedure clearGCEN; inline;
  2947. procedure clearI2CEN; inline;
  2948. procedure clearI2CSIDL; inline;
  2949. procedure clearIPMIEN; inline;
  2950. procedure clearON; inline;
  2951. procedure clearPEN; inline;
  2952. procedure clearRCEN; inline;
  2953. procedure clearRSEN; inline;
  2954. procedure clearSCLREL; inline;
  2955. procedure clearSEN; inline;
  2956. procedure clearSIDL; inline;
  2957. procedure clearSMEN; inline;
  2958. procedure clearSTREN; inline;
  2959. procedure clearSTRICT; inline;
  2960. procedure setA10M; inline;
  2961. procedure setACKDT; inline;
  2962. procedure setACKEN; inline;
  2963. procedure setDISSLW; inline;
  2964. procedure setGCEN; inline;
  2965. procedure setI2CEN; inline;
  2966. procedure setI2CSIDL; inline;
  2967. procedure setIPMIEN; inline;
  2968. procedure setON; inline;
  2969. procedure setPEN; inline;
  2970. procedure setRCEN; inline;
  2971. procedure setRSEN; inline;
  2972. procedure setSCLREL; inline;
  2973. procedure setSEN; inline;
  2974. procedure setSIDL; inline;
  2975. procedure setSMEN; inline;
  2976. procedure setSTREN; inline;
  2977. procedure setSTRICT; inline;
  2978. property A10M : TBits_1 read getA10M write setA10M;
  2979. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2980. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2981. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2982. property GCEN : TBits_1 read getGCEN write setGCEN;
  2983. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2984. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2985. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2986. property ON : TBits_1 read getON write setON;
  2987. property PEN : TBits_1 read getPEN write setPEN;
  2988. property RCEN : TBits_1 read getRCEN write setRCEN;
  2989. property RSEN : TBits_1 read getRSEN write setRSEN;
  2990. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2991. property SEN : TBits_1 read getSEN write setSEN;
  2992. property SIDL : TBits_1 read getSIDL write setSIDL;
  2993. property SMEN : TBits_1 read getSMEN write setSMEN;
  2994. property STREN : TBits_1 read getSTREN write setSTREN;
  2995. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2996. property w : TBits_32 read getw write setw;
  2997. end;
  2998. TI2C2_I2C2STAT = record
  2999. private
  3000. function getACKSTAT : TBits_1; inline;
  3001. function getADD10 : TBits_1; inline;
  3002. function getBCL : TBits_1; inline;
  3003. function getD_A : TBits_1; inline;
  3004. function getGCSTAT : TBits_1; inline;
  3005. function getI2COV : TBits_1; inline;
  3006. function getI2CPOV : TBits_1; inline;
  3007. function getIWCOL : TBits_1; inline;
  3008. function getP : TBits_1; inline;
  3009. function getRBF : TBits_1; inline;
  3010. function getR_W : TBits_1; inline;
  3011. function getS : TBits_1; inline;
  3012. function getTBF : TBits_1; inline;
  3013. function getTRSTAT : TBits_1; inline;
  3014. function getw : TBits_32; inline;
  3015. procedure setACKSTAT(thebits : TBits_1); inline;
  3016. procedure setADD10(thebits : TBits_1); inline;
  3017. procedure setBCL(thebits : TBits_1); inline;
  3018. procedure setD_A(thebits : TBits_1); inline;
  3019. procedure setGCSTAT(thebits : TBits_1); inline;
  3020. procedure setI2COV(thebits : TBits_1); inline;
  3021. procedure setI2CPOV(thebits : TBits_1); inline;
  3022. procedure setIWCOL(thebits : TBits_1); inline;
  3023. procedure setP(thebits : TBits_1); inline;
  3024. procedure setRBF(thebits : TBits_1); inline;
  3025. procedure setR_W(thebits : TBits_1); inline;
  3026. procedure setS(thebits : TBits_1); inline;
  3027. procedure setTBF(thebits : TBits_1); inline;
  3028. procedure setTRSTAT(thebits : TBits_1); inline;
  3029. procedure setw(thebits : TBits_32); inline;
  3030. public
  3031. procedure clearACKSTAT; inline;
  3032. procedure clearADD10; inline;
  3033. procedure clearBCL; inline;
  3034. procedure clearD_A; inline;
  3035. procedure clearGCSTAT; inline;
  3036. procedure clearI2COV; inline;
  3037. procedure clearI2CPOV; inline;
  3038. procedure clearIWCOL; inline;
  3039. procedure clearP; inline;
  3040. procedure clearRBF; inline;
  3041. procedure clearR_W; inline;
  3042. procedure clearS; inline;
  3043. procedure clearTBF; inline;
  3044. procedure clearTRSTAT; inline;
  3045. procedure setACKSTAT; inline;
  3046. procedure setADD10; inline;
  3047. procedure setBCL; inline;
  3048. procedure setD_A; inline;
  3049. procedure setGCSTAT; inline;
  3050. procedure setI2COV; inline;
  3051. procedure setI2CPOV; inline;
  3052. procedure setIWCOL; inline;
  3053. procedure setP; inline;
  3054. procedure setRBF; inline;
  3055. procedure setR_W; inline;
  3056. procedure setS; inline;
  3057. procedure setTBF; inline;
  3058. procedure setTRSTAT; inline;
  3059. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  3060. property ADD10 : TBits_1 read getADD10 write setADD10;
  3061. property BCL : TBits_1 read getBCL write setBCL;
  3062. property D_A : TBits_1 read getD_A write setD_A;
  3063. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  3064. property I2COV : TBits_1 read getI2COV write setI2COV;
  3065. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  3066. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  3067. property P : TBits_1 read getP write setP;
  3068. property RBF : TBits_1 read getRBF write setRBF;
  3069. property R_W : TBits_1 read getR_W write setR_W;
  3070. property S : TBits_1 read getS write setS;
  3071. property TBF : TBits_1 read getTBF write setTBF;
  3072. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  3073. property w : TBits_32 read getw write setw;
  3074. end;
  3075. type
  3076. TI2C2Registers = record
  3077. I2C2CONbits : TI2C2_I2C2CON;
  3078. I2C2CON : longWord;
  3079. I2C2CONCLR : longWord;
  3080. I2C2CONSET : longWord;
  3081. I2C2CONINV : longWord;
  3082. I2C2STATbits : TI2C2_I2C2STAT;
  3083. I2C2STAT : longWord;
  3084. I2C2STATCLR : longWord;
  3085. I2C2STATSET : longWord;
  3086. I2C2STATINV : longWord;
  3087. I2C2ADD : longWord;
  3088. I2C2ADDCLR : longWord;
  3089. I2C2ADDSET : longWord;
  3090. I2C2ADDINV : longWord;
  3091. I2C2MSK : longWord;
  3092. I2C2MSKCLR : longWord;
  3093. I2C2MSKSET : longWord;
  3094. I2C2MSKINV : longWord;
  3095. I2C2BRG : longWord;
  3096. I2C2BRGCLR : longWord;
  3097. I2C2BRGSET : longWord;
  3098. I2C2BRGINV : longWord;
  3099. I2C2TRN : longWord;
  3100. I2C2TRNCLR : longWord;
  3101. I2C2TRNSET : longWord;
  3102. I2C2TRNINV : longWord;
  3103. I2C2RCV : longWord;
  3104. end;
  3105. TSPI3_SPI1ACON = record
  3106. private
  3107. function getCKE : TBits_1; inline;
  3108. function getCKP : TBits_1; inline;
  3109. function getDISSDO : TBits_1; inline;
  3110. function getENHBUF : TBits_1; inline;
  3111. function getFRMCNT : TBits_3; inline;
  3112. function getFRMEN : TBits_1; inline;
  3113. function getFRMPOL : TBits_1; inline;
  3114. function getFRMSYNC : TBits_1; inline;
  3115. function getFRMSYPW : TBits_1; inline;
  3116. function getMODE16 : TBits_1; inline;
  3117. function getMODE32 : TBits_1; inline;
  3118. function getMSSEN : TBits_1; inline;
  3119. function getMSTEN : TBits_1; inline;
  3120. function getON : TBits_1; inline;
  3121. function getSIDL : TBits_1; inline;
  3122. function getSMP : TBits_1; inline;
  3123. function getSPIFE : TBits_1; inline;
  3124. function getSRXISEL : TBits_2; inline;
  3125. function getSSEN : TBits_1; inline;
  3126. function getSTXISEL : TBits_2; inline;
  3127. function getw : TBits_32; inline;
  3128. procedure setCKE(thebits : TBits_1); inline;
  3129. procedure setCKP(thebits : TBits_1); inline;
  3130. procedure setDISSDO(thebits : TBits_1); inline;
  3131. procedure setENHBUF(thebits : TBits_1); inline;
  3132. procedure setFRMCNT(thebits : TBits_3); inline;
  3133. procedure setFRMEN(thebits : TBits_1); inline;
  3134. procedure setFRMPOL(thebits : TBits_1); inline;
  3135. procedure setFRMSYNC(thebits : TBits_1); inline;
  3136. procedure setFRMSYPW(thebits : TBits_1); inline;
  3137. procedure setMODE16(thebits : TBits_1); inline;
  3138. procedure setMODE32(thebits : TBits_1); inline;
  3139. procedure setMSSEN(thebits : TBits_1); inline;
  3140. procedure setMSTEN(thebits : TBits_1); inline;
  3141. procedure setON(thebits : TBits_1); inline;
  3142. procedure setSIDL(thebits : TBits_1); inline;
  3143. procedure setSMP(thebits : TBits_1); inline;
  3144. procedure setSPIFE(thebits : TBits_1); inline;
  3145. procedure setSRXISEL(thebits : TBits_2); inline;
  3146. procedure setSSEN(thebits : TBits_1); inline;
  3147. procedure setSTXISEL(thebits : TBits_2); inline;
  3148. procedure setw(thebits : TBits_32); inline;
  3149. public
  3150. procedure clearCKE; inline;
  3151. procedure clearCKP; inline;
  3152. procedure clearDISSDO; inline;
  3153. procedure clearENHBUF; inline;
  3154. procedure clearFRMEN; inline;
  3155. procedure clearFRMPOL; inline;
  3156. procedure clearFRMSYNC; inline;
  3157. procedure clearFRMSYPW; inline;
  3158. procedure clearMODE16; inline;
  3159. procedure clearMODE32; inline;
  3160. procedure clearMSSEN; inline;
  3161. procedure clearMSTEN; inline;
  3162. procedure clearON; inline;
  3163. procedure clearSIDL; inline;
  3164. procedure clearSMP; inline;
  3165. procedure clearSPIFE; inline;
  3166. procedure clearSSEN; inline;
  3167. procedure setCKE; inline;
  3168. procedure setCKP; inline;
  3169. procedure setDISSDO; inline;
  3170. procedure setENHBUF; inline;
  3171. procedure setFRMEN; inline;
  3172. procedure setFRMPOL; inline;
  3173. procedure setFRMSYNC; inline;
  3174. procedure setFRMSYPW; inline;
  3175. procedure setMODE16; inline;
  3176. procedure setMODE32; inline;
  3177. procedure setMSSEN; inline;
  3178. procedure setMSTEN; inline;
  3179. procedure setON; inline;
  3180. procedure setSIDL; inline;
  3181. procedure setSMP; inline;
  3182. procedure setSPIFE; inline;
  3183. procedure setSSEN; inline;
  3184. property CKE : TBits_1 read getCKE write setCKE;
  3185. property CKP : TBits_1 read getCKP write setCKP;
  3186. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3187. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3188. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3189. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3190. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3191. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3192. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3193. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3194. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3195. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3196. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3197. property ON : TBits_1 read getON write setON;
  3198. property SIDL : TBits_1 read getSIDL write setSIDL;
  3199. property SMP : TBits_1 read getSMP write setSMP;
  3200. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3201. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3202. property SSEN : TBits_1 read getSSEN write setSSEN;
  3203. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3204. property w : TBits_32 read getw write setw;
  3205. end;
  3206. TSPI3_SPI3CON = record
  3207. private
  3208. function getCKE : TBits_1; inline;
  3209. function getCKP : TBits_1; inline;
  3210. function getDISSDO : TBits_1; inline;
  3211. function getENHBUF : TBits_1; inline;
  3212. function getFRMCNT : TBits_3; inline;
  3213. function getFRMEN : TBits_1; inline;
  3214. function getFRMPOL : TBits_1; inline;
  3215. function getFRMSYNC : TBits_1; inline;
  3216. function getFRMSYPW : TBits_1; inline;
  3217. function getMODE16 : TBits_1; inline;
  3218. function getMODE32 : TBits_1; inline;
  3219. function getMSSEN : TBits_1; inline;
  3220. function getMSTEN : TBits_1; inline;
  3221. function getON : TBits_1; inline;
  3222. function getSIDL : TBits_1; inline;
  3223. function getSMP : TBits_1; inline;
  3224. function getSPIFE : TBits_1; inline;
  3225. function getSRXISEL : TBits_2; inline;
  3226. function getSSEN : TBits_1; inline;
  3227. function getSTXISEL : TBits_2; inline;
  3228. function getw : TBits_32; inline;
  3229. procedure setCKE(thebits : TBits_1); inline;
  3230. procedure setCKP(thebits : TBits_1); inline;
  3231. procedure setDISSDO(thebits : TBits_1); inline;
  3232. procedure setENHBUF(thebits : TBits_1); inline;
  3233. procedure setFRMCNT(thebits : TBits_3); inline;
  3234. procedure setFRMEN(thebits : TBits_1); inline;
  3235. procedure setFRMPOL(thebits : TBits_1); inline;
  3236. procedure setFRMSYNC(thebits : TBits_1); inline;
  3237. procedure setFRMSYPW(thebits : TBits_1); inline;
  3238. procedure setMODE16(thebits : TBits_1); inline;
  3239. procedure setMODE32(thebits : TBits_1); inline;
  3240. procedure setMSSEN(thebits : TBits_1); inline;
  3241. procedure setMSTEN(thebits : TBits_1); inline;
  3242. procedure setON(thebits : TBits_1); inline;
  3243. procedure setSIDL(thebits : TBits_1); inline;
  3244. procedure setSMP(thebits : TBits_1); inline;
  3245. procedure setSPIFE(thebits : TBits_1); inline;
  3246. procedure setSRXISEL(thebits : TBits_2); inline;
  3247. procedure setSSEN(thebits : TBits_1); inline;
  3248. procedure setSTXISEL(thebits : TBits_2); inline;
  3249. procedure setw(thebits : TBits_32); inline;
  3250. public
  3251. procedure clearCKE; inline;
  3252. procedure clearCKP; inline;
  3253. procedure clearDISSDO; inline;
  3254. procedure clearENHBUF; inline;
  3255. procedure clearFRMEN; inline;
  3256. procedure clearFRMPOL; inline;
  3257. procedure clearFRMSYNC; inline;
  3258. procedure clearFRMSYPW; inline;
  3259. procedure clearMODE16; inline;
  3260. procedure clearMODE32; inline;
  3261. procedure clearMSSEN; inline;
  3262. procedure clearMSTEN; inline;
  3263. procedure clearON; inline;
  3264. procedure clearSIDL; inline;
  3265. procedure clearSMP; inline;
  3266. procedure clearSPIFE; inline;
  3267. procedure clearSSEN; inline;
  3268. procedure setCKE; inline;
  3269. procedure setCKP; inline;
  3270. procedure setDISSDO; inline;
  3271. procedure setENHBUF; inline;
  3272. procedure setFRMEN; inline;
  3273. procedure setFRMPOL; inline;
  3274. procedure setFRMSYNC; inline;
  3275. procedure setFRMSYPW; inline;
  3276. procedure setMODE16; inline;
  3277. procedure setMODE32; inline;
  3278. procedure setMSSEN; inline;
  3279. procedure setMSTEN; inline;
  3280. procedure setON; inline;
  3281. procedure setSIDL; inline;
  3282. procedure setSMP; inline;
  3283. procedure setSPIFE; inline;
  3284. procedure setSSEN; inline;
  3285. property CKE : TBits_1 read getCKE write setCKE;
  3286. property CKP : TBits_1 read getCKP write setCKP;
  3287. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3288. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3289. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3290. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3291. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3292. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3293. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3294. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3295. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3296. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3297. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3298. property ON : TBits_1 read getON write setON;
  3299. property SIDL : TBits_1 read getSIDL write setSIDL;
  3300. property SMP : TBits_1 read getSMP write setSMP;
  3301. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3302. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3303. property SSEN : TBits_1 read getSSEN write setSSEN;
  3304. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3305. property w : TBits_32 read getw write setw;
  3306. end;
  3307. TSPI3_SPI1ASTAT = record
  3308. private
  3309. function getRXBUFELM : TBits_5; inline;
  3310. function getSPIBUSY : TBits_1; inline;
  3311. function getSPIRBE : TBits_1; inline;
  3312. function getSPIRBF : TBits_1; inline;
  3313. function getSPIROV : TBits_1; inline;
  3314. function getSPITBE : TBits_1; inline;
  3315. function getSPITBF : TBits_1; inline;
  3316. function getSPITUR : TBits_1; inline;
  3317. function getSRMT : TBits_1; inline;
  3318. function getTXBUFELM : TBits_5; inline;
  3319. function getw : TBits_32; inline;
  3320. procedure setRXBUFELM(thebits : TBits_5); inline;
  3321. procedure setSPIBUSY(thebits : TBits_1); inline;
  3322. procedure setSPIRBE(thebits : TBits_1); inline;
  3323. procedure setSPIRBF(thebits : TBits_1); inline;
  3324. procedure setSPIROV(thebits : TBits_1); inline;
  3325. procedure setSPITBE(thebits : TBits_1); inline;
  3326. procedure setSPITBF(thebits : TBits_1); inline;
  3327. procedure setSPITUR(thebits : TBits_1); inline;
  3328. procedure setSRMT(thebits : TBits_1); inline;
  3329. procedure setTXBUFELM(thebits : TBits_5); inline;
  3330. procedure setw(thebits : TBits_32); inline;
  3331. public
  3332. procedure clearSPIBUSY; inline;
  3333. procedure clearSPIRBE; inline;
  3334. procedure clearSPIRBF; inline;
  3335. procedure clearSPIROV; inline;
  3336. procedure clearSPITBE; inline;
  3337. procedure clearSPITBF; inline;
  3338. procedure clearSPITUR; inline;
  3339. procedure clearSRMT; inline;
  3340. procedure setSPIBUSY; inline;
  3341. procedure setSPIRBE; inline;
  3342. procedure setSPIRBF; inline;
  3343. procedure setSPIROV; inline;
  3344. procedure setSPITBE; inline;
  3345. procedure setSPITBF; inline;
  3346. procedure setSPITUR; inline;
  3347. procedure setSRMT; inline;
  3348. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3349. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3350. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3351. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3352. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3353. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3354. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3355. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3356. property SRMT : TBits_1 read getSRMT write setSRMT;
  3357. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3358. property w : TBits_32 read getw write setw;
  3359. end;
  3360. TSPI3_SPI3STAT = record
  3361. private
  3362. function getRXBUFELM : TBits_5; inline;
  3363. function getSPIBUSY : TBits_1; inline;
  3364. function getSPIRBE : TBits_1; inline;
  3365. function getSPIRBF : TBits_1; inline;
  3366. function getSPIROV : TBits_1; inline;
  3367. function getSPITBE : TBits_1; inline;
  3368. function getSPITBF : TBits_1; inline;
  3369. function getSPITUR : TBits_1; inline;
  3370. function getSRMT : TBits_1; inline;
  3371. function getTXBUFELM : TBits_5; inline;
  3372. function getw : TBits_32; inline;
  3373. procedure setRXBUFELM(thebits : TBits_5); inline;
  3374. procedure setSPIBUSY(thebits : TBits_1); inline;
  3375. procedure setSPIRBE(thebits : TBits_1); inline;
  3376. procedure setSPIRBF(thebits : TBits_1); inline;
  3377. procedure setSPIROV(thebits : TBits_1); inline;
  3378. procedure setSPITBE(thebits : TBits_1); inline;
  3379. procedure setSPITBF(thebits : TBits_1); inline;
  3380. procedure setSPITUR(thebits : TBits_1); inline;
  3381. procedure setSRMT(thebits : TBits_1); inline;
  3382. procedure setTXBUFELM(thebits : TBits_5); inline;
  3383. procedure setw(thebits : TBits_32); inline;
  3384. public
  3385. procedure clearSPIBUSY; inline;
  3386. procedure clearSPIRBE; inline;
  3387. procedure clearSPIRBF; inline;
  3388. procedure clearSPIROV; inline;
  3389. procedure clearSPITBE; inline;
  3390. procedure clearSPITBF; inline;
  3391. procedure clearSPITUR; inline;
  3392. procedure clearSRMT; inline;
  3393. procedure setSPIBUSY; inline;
  3394. procedure setSPIRBE; inline;
  3395. procedure setSPIRBF; inline;
  3396. procedure setSPIROV; inline;
  3397. procedure setSPITBE; inline;
  3398. procedure setSPITBF; inline;
  3399. procedure setSPITUR; inline;
  3400. procedure setSRMT; inline;
  3401. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3402. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3403. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3404. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3405. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3406. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3407. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3408. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3409. property SRMT : TBits_1 read getSRMT write setSRMT;
  3410. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3411. property w : TBits_32 read getw write setw;
  3412. end;
  3413. type
  3414. TSPI3Registers = record
  3415. SPI1ACONbits : TSPI3_SPI1ACON;
  3416. SPI1ACON : longWord;
  3417. SPI3CONbits : TSPI3_SPI3CON;
  3418. SPI3CON : longWord;
  3419. SPI1ACONCLR : longWord;
  3420. SPI3CONCLR : longWord;
  3421. SPI1ACONSET : longWord;
  3422. SPI3CONSET : longWord;
  3423. SPI1ACONINV : longWord;
  3424. SPI3CONINV : longWord;
  3425. SPI1ASTATbits : TSPI3_SPI1ASTAT;
  3426. SPI1ASTAT : longWord;
  3427. SPI3STATbits : TSPI3_SPI3STAT;
  3428. SPI3STAT : longWord;
  3429. SPI1ASTATCLR : longWord;
  3430. SPI3STATCLR : longWord;
  3431. SPI1ASTATSET : longWord;
  3432. SPI3STATSET : longWord;
  3433. SPI1ASTATINV : longWord;
  3434. SPI3STATINV : longWord;
  3435. SPI1ABUF : longWord;
  3436. SPI3BUF : longWord;
  3437. SPI1ABRG : longWord;
  3438. SPI3BRG : longWord;
  3439. SPI1ABRGCLR : longWord;
  3440. SPI3BRGCLR : longWord;
  3441. SPI1ABRGSET : longWord;
  3442. SPI3BRGSET : longWord;
  3443. SPI1ABRGINV : longWord;
  3444. SPI3BRGINV : longWord;
  3445. end;
  3446. TSPI2_SPI2ACON = record
  3447. private
  3448. function getCKE : TBits_1; inline;
  3449. function getCKP : TBits_1; inline;
  3450. function getDISSDO : TBits_1; inline;
  3451. function getENHBUF : TBits_1; inline;
  3452. function getFRMCNT : TBits_3; inline;
  3453. function getFRMEN : TBits_1; inline;
  3454. function getFRMPOL : TBits_1; inline;
  3455. function getFRMSYNC : TBits_1; inline;
  3456. function getFRMSYPW : TBits_1; inline;
  3457. function getMODE16 : TBits_1; inline;
  3458. function getMODE32 : TBits_1; inline;
  3459. function getMSSEN : TBits_1; inline;
  3460. function getMSTEN : TBits_1; inline;
  3461. function getON : TBits_1; inline;
  3462. function getSIDL : TBits_1; inline;
  3463. function getSMP : TBits_1; inline;
  3464. function getSPIFE : TBits_1; inline;
  3465. function getSRXISEL : TBits_2; inline;
  3466. function getSSEN : TBits_1; inline;
  3467. function getSTXISEL : TBits_2; inline;
  3468. function getw : TBits_32; inline;
  3469. procedure setCKE(thebits : TBits_1); inline;
  3470. procedure setCKP(thebits : TBits_1); inline;
  3471. procedure setDISSDO(thebits : TBits_1); inline;
  3472. procedure setENHBUF(thebits : TBits_1); inline;
  3473. procedure setFRMCNT(thebits : TBits_3); inline;
  3474. procedure setFRMEN(thebits : TBits_1); inline;
  3475. procedure setFRMPOL(thebits : TBits_1); inline;
  3476. procedure setFRMSYNC(thebits : TBits_1); inline;
  3477. procedure setFRMSYPW(thebits : TBits_1); inline;
  3478. procedure setMODE16(thebits : TBits_1); inline;
  3479. procedure setMODE32(thebits : TBits_1); inline;
  3480. procedure setMSSEN(thebits : TBits_1); inline;
  3481. procedure setMSTEN(thebits : TBits_1); inline;
  3482. procedure setON(thebits : TBits_1); inline;
  3483. procedure setSIDL(thebits : TBits_1); inline;
  3484. procedure setSMP(thebits : TBits_1); inline;
  3485. procedure setSPIFE(thebits : TBits_1); inline;
  3486. procedure setSRXISEL(thebits : TBits_2); inline;
  3487. procedure setSSEN(thebits : TBits_1); inline;
  3488. procedure setSTXISEL(thebits : TBits_2); inline;
  3489. procedure setw(thebits : TBits_32); inline;
  3490. public
  3491. procedure clearCKE; inline;
  3492. procedure clearCKP; inline;
  3493. procedure clearDISSDO; inline;
  3494. procedure clearENHBUF; inline;
  3495. procedure clearFRMEN; inline;
  3496. procedure clearFRMPOL; inline;
  3497. procedure clearFRMSYNC; inline;
  3498. procedure clearFRMSYPW; inline;
  3499. procedure clearMODE16; inline;
  3500. procedure clearMODE32; inline;
  3501. procedure clearMSSEN; inline;
  3502. procedure clearMSTEN; inline;
  3503. procedure clearON; inline;
  3504. procedure clearSIDL; inline;
  3505. procedure clearSMP; inline;
  3506. procedure clearSPIFE; inline;
  3507. procedure clearSSEN; inline;
  3508. procedure setCKE; inline;
  3509. procedure setCKP; inline;
  3510. procedure setDISSDO; inline;
  3511. procedure setENHBUF; inline;
  3512. procedure setFRMEN; inline;
  3513. procedure setFRMPOL; inline;
  3514. procedure setFRMSYNC; inline;
  3515. procedure setFRMSYPW; inline;
  3516. procedure setMODE16; inline;
  3517. procedure setMODE32; inline;
  3518. procedure setMSSEN; inline;
  3519. procedure setMSTEN; inline;
  3520. procedure setON; inline;
  3521. procedure setSIDL; inline;
  3522. procedure setSMP; inline;
  3523. procedure setSPIFE; inline;
  3524. procedure setSSEN; inline;
  3525. property CKE : TBits_1 read getCKE write setCKE;
  3526. property CKP : TBits_1 read getCKP write setCKP;
  3527. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3528. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3529. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3530. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3531. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3532. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3533. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3534. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3535. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3536. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3537. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3538. property ON : TBits_1 read getON write setON;
  3539. property SIDL : TBits_1 read getSIDL write setSIDL;
  3540. property SMP : TBits_1 read getSMP write setSMP;
  3541. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3542. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3543. property SSEN : TBits_1 read getSSEN write setSSEN;
  3544. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3545. property w : TBits_32 read getw write setw;
  3546. end;
  3547. TSPI2_SPI2CON = record
  3548. private
  3549. function getCKE : TBits_1; inline;
  3550. function getCKP : TBits_1; inline;
  3551. function getDISSDO : TBits_1; inline;
  3552. function getENHBUF : TBits_1; inline;
  3553. function getFRMCNT : TBits_3; inline;
  3554. function getFRMEN : TBits_1; inline;
  3555. function getFRMPOL : TBits_1; inline;
  3556. function getFRMSYNC : TBits_1; inline;
  3557. function getFRMSYPW : TBits_1; inline;
  3558. function getMODE16 : TBits_1; inline;
  3559. function getMODE32 : TBits_1; inline;
  3560. function getMSSEN : TBits_1; inline;
  3561. function getMSTEN : TBits_1; inline;
  3562. function getON : TBits_1; inline;
  3563. function getSIDL : TBits_1; inline;
  3564. function getSMP : TBits_1; inline;
  3565. function getSPIFE : TBits_1; inline;
  3566. function getSRXISEL : TBits_2; inline;
  3567. function getSSEN : TBits_1; inline;
  3568. function getSTXISEL : TBits_2; inline;
  3569. function getw : TBits_32; inline;
  3570. procedure setCKE(thebits : TBits_1); inline;
  3571. procedure setCKP(thebits : TBits_1); inline;
  3572. procedure setDISSDO(thebits : TBits_1); inline;
  3573. procedure setENHBUF(thebits : TBits_1); inline;
  3574. procedure setFRMCNT(thebits : TBits_3); inline;
  3575. procedure setFRMEN(thebits : TBits_1); inline;
  3576. procedure setFRMPOL(thebits : TBits_1); inline;
  3577. procedure setFRMSYNC(thebits : TBits_1); inline;
  3578. procedure setFRMSYPW(thebits : TBits_1); inline;
  3579. procedure setMODE16(thebits : TBits_1); inline;
  3580. procedure setMODE32(thebits : TBits_1); inline;
  3581. procedure setMSSEN(thebits : TBits_1); inline;
  3582. procedure setMSTEN(thebits : TBits_1); inline;
  3583. procedure setON(thebits : TBits_1); inline;
  3584. procedure setSIDL(thebits : TBits_1); inline;
  3585. procedure setSMP(thebits : TBits_1); inline;
  3586. procedure setSPIFE(thebits : TBits_1); inline;
  3587. procedure setSRXISEL(thebits : TBits_2); inline;
  3588. procedure setSSEN(thebits : TBits_1); inline;
  3589. procedure setSTXISEL(thebits : TBits_2); inline;
  3590. procedure setw(thebits : TBits_32); inline;
  3591. public
  3592. procedure clearCKE; inline;
  3593. procedure clearCKP; inline;
  3594. procedure clearDISSDO; inline;
  3595. procedure clearENHBUF; inline;
  3596. procedure clearFRMEN; inline;
  3597. procedure clearFRMPOL; inline;
  3598. procedure clearFRMSYNC; inline;
  3599. procedure clearFRMSYPW; inline;
  3600. procedure clearMODE16; inline;
  3601. procedure clearMODE32; inline;
  3602. procedure clearMSSEN; inline;
  3603. procedure clearMSTEN; inline;
  3604. procedure clearON; inline;
  3605. procedure clearSIDL; inline;
  3606. procedure clearSMP; inline;
  3607. procedure clearSPIFE; inline;
  3608. procedure clearSSEN; inline;
  3609. procedure setCKE; inline;
  3610. procedure setCKP; inline;
  3611. procedure setDISSDO; inline;
  3612. procedure setENHBUF; inline;
  3613. procedure setFRMEN; inline;
  3614. procedure setFRMPOL; inline;
  3615. procedure setFRMSYNC; inline;
  3616. procedure setFRMSYPW; inline;
  3617. procedure setMODE16; inline;
  3618. procedure setMODE32; inline;
  3619. procedure setMSSEN; inline;
  3620. procedure setMSTEN; inline;
  3621. procedure setON; inline;
  3622. procedure setSIDL; inline;
  3623. procedure setSMP; inline;
  3624. procedure setSPIFE; inline;
  3625. procedure setSSEN; inline;
  3626. property CKE : TBits_1 read getCKE write setCKE;
  3627. property CKP : TBits_1 read getCKP write setCKP;
  3628. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3629. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3630. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3631. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3632. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3633. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3634. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3635. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3636. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3637. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3638. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3639. property ON : TBits_1 read getON write setON;
  3640. property SIDL : TBits_1 read getSIDL write setSIDL;
  3641. property SMP : TBits_1 read getSMP write setSMP;
  3642. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3643. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3644. property SSEN : TBits_1 read getSSEN write setSSEN;
  3645. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3646. property w : TBits_32 read getw write setw;
  3647. end;
  3648. TSPI2_SPI2ASTAT = record
  3649. private
  3650. function getRXBUFELM : TBits_5; inline;
  3651. function getSPIBUSY : TBits_1; inline;
  3652. function getSPIRBE : TBits_1; inline;
  3653. function getSPIRBF : TBits_1; inline;
  3654. function getSPIROV : TBits_1; inline;
  3655. function getSPITBE : TBits_1; inline;
  3656. function getSPITBF : TBits_1; inline;
  3657. function getSPITUR : TBits_1; inline;
  3658. function getSRMT : TBits_1; inline;
  3659. function getTXBUFELM : TBits_5; inline;
  3660. function getw : TBits_32; inline;
  3661. procedure setRXBUFELM(thebits : TBits_5); inline;
  3662. procedure setSPIBUSY(thebits : TBits_1); inline;
  3663. procedure setSPIRBE(thebits : TBits_1); inline;
  3664. procedure setSPIRBF(thebits : TBits_1); inline;
  3665. procedure setSPIROV(thebits : TBits_1); inline;
  3666. procedure setSPITBE(thebits : TBits_1); inline;
  3667. procedure setSPITBF(thebits : TBits_1); inline;
  3668. procedure setSPITUR(thebits : TBits_1); inline;
  3669. procedure setSRMT(thebits : TBits_1); inline;
  3670. procedure setTXBUFELM(thebits : TBits_5); inline;
  3671. procedure setw(thebits : TBits_32); inline;
  3672. public
  3673. procedure clearSPIBUSY; inline;
  3674. procedure clearSPIRBE; inline;
  3675. procedure clearSPIRBF; inline;
  3676. procedure clearSPIROV; inline;
  3677. procedure clearSPITBE; inline;
  3678. procedure clearSPITBF; inline;
  3679. procedure clearSPITUR; inline;
  3680. procedure clearSRMT; inline;
  3681. procedure setSPIBUSY; inline;
  3682. procedure setSPIRBE; inline;
  3683. procedure setSPIRBF; inline;
  3684. procedure setSPIROV; inline;
  3685. procedure setSPITBE; inline;
  3686. procedure setSPITBF; inline;
  3687. procedure setSPITUR; inline;
  3688. procedure setSRMT; inline;
  3689. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3690. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3691. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3692. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3693. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3694. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3695. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3696. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3697. property SRMT : TBits_1 read getSRMT write setSRMT;
  3698. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3699. property w : TBits_32 read getw write setw;
  3700. end;
  3701. TSPI2_SPI2STAT = record
  3702. private
  3703. function getRXBUFELM : TBits_5; inline;
  3704. function getSPIBUSY : TBits_1; inline;
  3705. function getSPIRBE : TBits_1; inline;
  3706. function getSPIRBF : TBits_1; inline;
  3707. function getSPIROV : TBits_1; inline;
  3708. function getSPITBE : TBits_1; inline;
  3709. function getSPITBF : TBits_1; inline;
  3710. function getSPITUR : TBits_1; inline;
  3711. function getSRMT : TBits_1; inline;
  3712. function getTXBUFELM : TBits_5; inline;
  3713. function getw : TBits_32; inline;
  3714. procedure setRXBUFELM(thebits : TBits_5); inline;
  3715. procedure setSPIBUSY(thebits : TBits_1); inline;
  3716. procedure setSPIRBE(thebits : TBits_1); inline;
  3717. procedure setSPIRBF(thebits : TBits_1); inline;
  3718. procedure setSPIROV(thebits : TBits_1); inline;
  3719. procedure setSPITBE(thebits : TBits_1); inline;
  3720. procedure setSPITBF(thebits : TBits_1); inline;
  3721. procedure setSPITUR(thebits : TBits_1); inline;
  3722. procedure setSRMT(thebits : TBits_1); inline;
  3723. procedure setTXBUFELM(thebits : TBits_5); inline;
  3724. procedure setw(thebits : TBits_32); inline;
  3725. public
  3726. procedure clearSPIBUSY; inline;
  3727. procedure clearSPIRBE; inline;
  3728. procedure clearSPIRBF; inline;
  3729. procedure clearSPIROV; inline;
  3730. procedure clearSPITBE; inline;
  3731. procedure clearSPITBF; inline;
  3732. procedure clearSPITUR; inline;
  3733. procedure clearSRMT; inline;
  3734. procedure setSPIBUSY; inline;
  3735. procedure setSPIRBE; inline;
  3736. procedure setSPIRBF; inline;
  3737. procedure setSPIROV; inline;
  3738. procedure setSPITBE; inline;
  3739. procedure setSPITBF; inline;
  3740. procedure setSPITUR; inline;
  3741. procedure setSRMT; inline;
  3742. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3743. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3744. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3745. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3746. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3747. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3748. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3749. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3750. property SRMT : TBits_1 read getSRMT write setSRMT;
  3751. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3752. property w : TBits_32 read getw write setw;
  3753. end;
  3754. type
  3755. TSPI2Registers = record
  3756. SPI2ACONbits : TSPI2_SPI2ACON;
  3757. SPI2ACON : longWord;
  3758. SPI2CONbits : TSPI2_SPI2CON;
  3759. SPI2CON : longWord;
  3760. SPI2ACONCLR : longWord;
  3761. SPI2CONCLR : longWord;
  3762. SPI2ACONSET : longWord;
  3763. SPI2CONSET : longWord;
  3764. SPI2ACONINV : longWord;
  3765. SPI2CONINV : longWord;
  3766. SPI2ASTATbits : TSPI2_SPI2ASTAT;
  3767. SPI2ASTAT : longWord;
  3768. SPI2STATbits : TSPI2_SPI2STAT;
  3769. SPI2STAT : longWord;
  3770. SPI2ASTATCLR : longWord;
  3771. SPI2STATCLR : longWord;
  3772. SPI2ASTATSET : longWord;
  3773. SPI2STATSET : longWord;
  3774. SPI2ASTATINV : longWord;
  3775. SPI2STATINV : longWord;
  3776. SPI2ABUF : longWord;
  3777. SPI2BUF : longWord;
  3778. SPI2ABRG : longWord;
  3779. SPI2BRG : longWord;
  3780. SPI2ABRGCLR : longWord;
  3781. SPI2BRGCLR : longWord;
  3782. SPI2ABRGSET : longWord;
  3783. SPI2BRGSET : longWord;
  3784. SPI2ABRGINV : longWord;
  3785. SPI2BRGINV : longWord;
  3786. end;
  3787. TSPI3A_SPI3ACON = record
  3788. private
  3789. function getCKE : TBits_1; inline;
  3790. function getCKP : TBits_1; inline;
  3791. function getDISSDO : TBits_1; inline;
  3792. function getENHBUF : TBits_1; inline;
  3793. function getFRMCNT : TBits_3; inline;
  3794. function getFRMEN : TBits_1; inline;
  3795. function getFRMPOL : TBits_1; inline;
  3796. function getFRMSYNC : TBits_1; inline;
  3797. function getFRMSYPW : TBits_1; inline;
  3798. function getMODE16 : TBits_1; inline;
  3799. function getMODE32 : TBits_1; inline;
  3800. function getMSSEN : TBits_1; inline;
  3801. function getMSTEN : TBits_1; inline;
  3802. function getON : TBits_1; inline;
  3803. function getSIDL : TBits_1; inline;
  3804. function getSMP : TBits_1; inline;
  3805. function getSPIFE : TBits_1; inline;
  3806. function getSRXISEL : TBits_2; inline;
  3807. function getSSEN : TBits_1; inline;
  3808. function getSTXISEL : TBits_2; inline;
  3809. function getw : TBits_32; inline;
  3810. procedure setCKE(thebits : TBits_1); inline;
  3811. procedure setCKP(thebits : TBits_1); inline;
  3812. procedure setDISSDO(thebits : TBits_1); inline;
  3813. procedure setENHBUF(thebits : TBits_1); inline;
  3814. procedure setFRMCNT(thebits : TBits_3); inline;
  3815. procedure setFRMEN(thebits : TBits_1); inline;
  3816. procedure setFRMPOL(thebits : TBits_1); inline;
  3817. procedure setFRMSYNC(thebits : TBits_1); inline;
  3818. procedure setFRMSYPW(thebits : TBits_1); inline;
  3819. procedure setMODE16(thebits : TBits_1); inline;
  3820. procedure setMODE32(thebits : TBits_1); inline;
  3821. procedure setMSSEN(thebits : TBits_1); inline;
  3822. procedure setMSTEN(thebits : TBits_1); inline;
  3823. procedure setON(thebits : TBits_1); inline;
  3824. procedure setSIDL(thebits : TBits_1); inline;
  3825. procedure setSMP(thebits : TBits_1); inline;
  3826. procedure setSPIFE(thebits : TBits_1); inline;
  3827. procedure setSRXISEL(thebits : TBits_2); inline;
  3828. procedure setSSEN(thebits : TBits_1); inline;
  3829. procedure setSTXISEL(thebits : TBits_2); inline;
  3830. procedure setw(thebits : TBits_32); inline;
  3831. public
  3832. procedure clearCKE; inline;
  3833. procedure clearCKP; inline;
  3834. procedure clearDISSDO; inline;
  3835. procedure clearENHBUF; inline;
  3836. procedure clearFRMEN; inline;
  3837. procedure clearFRMPOL; inline;
  3838. procedure clearFRMSYNC; inline;
  3839. procedure clearFRMSYPW; inline;
  3840. procedure clearMODE16; inline;
  3841. procedure clearMODE32; inline;
  3842. procedure clearMSSEN; inline;
  3843. procedure clearMSTEN; inline;
  3844. procedure clearON; inline;
  3845. procedure clearSIDL; inline;
  3846. procedure clearSMP; inline;
  3847. procedure clearSPIFE; inline;
  3848. procedure clearSSEN; inline;
  3849. procedure setCKE; inline;
  3850. procedure setCKP; inline;
  3851. procedure setDISSDO; inline;
  3852. procedure setENHBUF; inline;
  3853. procedure setFRMEN; inline;
  3854. procedure setFRMPOL; inline;
  3855. procedure setFRMSYNC; inline;
  3856. procedure setFRMSYPW; inline;
  3857. procedure setMODE16; inline;
  3858. procedure setMODE32; inline;
  3859. procedure setMSSEN; inline;
  3860. procedure setMSTEN; inline;
  3861. procedure setON; inline;
  3862. procedure setSIDL; inline;
  3863. procedure setSMP; inline;
  3864. procedure setSPIFE; inline;
  3865. procedure setSSEN; inline;
  3866. property CKE : TBits_1 read getCKE write setCKE;
  3867. property CKP : TBits_1 read getCKP write setCKP;
  3868. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3869. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3870. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3871. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3872. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3873. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3874. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3875. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3876. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3877. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3878. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3879. property ON : TBits_1 read getON write setON;
  3880. property SIDL : TBits_1 read getSIDL write setSIDL;
  3881. property SMP : TBits_1 read getSMP write setSMP;
  3882. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3883. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3884. property SSEN : TBits_1 read getSSEN write setSSEN;
  3885. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3886. property w : TBits_32 read getw write setw;
  3887. end;
  3888. TSPI3A_SPI4CON = record
  3889. private
  3890. function getCKE : TBits_1; inline;
  3891. function getCKP : TBits_1; inline;
  3892. function getDISSDO : TBits_1; inline;
  3893. function getENHBUF : TBits_1; inline;
  3894. function getFRMCNT : TBits_3; inline;
  3895. function getFRMEN : TBits_1; inline;
  3896. function getFRMPOL : TBits_1; inline;
  3897. function getFRMSYNC : TBits_1; inline;
  3898. function getFRMSYPW : TBits_1; inline;
  3899. function getMODE16 : TBits_1; inline;
  3900. function getMODE32 : TBits_1; inline;
  3901. function getMSSEN : TBits_1; inline;
  3902. function getMSTEN : TBits_1; inline;
  3903. function getON : TBits_1; inline;
  3904. function getSIDL : TBits_1; inline;
  3905. function getSMP : TBits_1; inline;
  3906. function getSPIFE : TBits_1; inline;
  3907. function getSRXISEL : TBits_2; inline;
  3908. function getSSEN : TBits_1; inline;
  3909. function getSTXISEL : TBits_2; inline;
  3910. function getw : TBits_32; inline;
  3911. procedure setCKE(thebits : TBits_1); inline;
  3912. procedure setCKP(thebits : TBits_1); inline;
  3913. procedure setDISSDO(thebits : TBits_1); inline;
  3914. procedure setENHBUF(thebits : TBits_1); inline;
  3915. procedure setFRMCNT(thebits : TBits_3); inline;
  3916. procedure setFRMEN(thebits : TBits_1); inline;
  3917. procedure setFRMPOL(thebits : TBits_1); inline;
  3918. procedure setFRMSYNC(thebits : TBits_1); inline;
  3919. procedure setFRMSYPW(thebits : TBits_1); inline;
  3920. procedure setMODE16(thebits : TBits_1); inline;
  3921. procedure setMODE32(thebits : TBits_1); inline;
  3922. procedure setMSSEN(thebits : TBits_1); inline;
  3923. procedure setMSTEN(thebits : TBits_1); inline;
  3924. procedure setON(thebits : TBits_1); inline;
  3925. procedure setSIDL(thebits : TBits_1); inline;
  3926. procedure setSMP(thebits : TBits_1); inline;
  3927. procedure setSPIFE(thebits : TBits_1); inline;
  3928. procedure setSRXISEL(thebits : TBits_2); inline;
  3929. procedure setSSEN(thebits : TBits_1); inline;
  3930. procedure setSTXISEL(thebits : TBits_2); inline;
  3931. procedure setw(thebits : TBits_32); inline;
  3932. public
  3933. procedure clearCKE; inline;
  3934. procedure clearCKP; inline;
  3935. procedure clearDISSDO; inline;
  3936. procedure clearENHBUF; inline;
  3937. procedure clearFRMEN; inline;
  3938. procedure clearFRMPOL; inline;
  3939. procedure clearFRMSYNC; inline;
  3940. procedure clearFRMSYPW; inline;
  3941. procedure clearMODE16; inline;
  3942. procedure clearMODE32; inline;
  3943. procedure clearMSSEN; inline;
  3944. procedure clearMSTEN; inline;
  3945. procedure clearON; inline;
  3946. procedure clearSIDL; inline;
  3947. procedure clearSMP; inline;
  3948. procedure clearSPIFE; inline;
  3949. procedure clearSSEN; inline;
  3950. procedure setCKE; inline;
  3951. procedure setCKP; inline;
  3952. procedure setDISSDO; inline;
  3953. procedure setENHBUF; inline;
  3954. procedure setFRMEN; inline;
  3955. procedure setFRMPOL; inline;
  3956. procedure setFRMSYNC; inline;
  3957. procedure setFRMSYPW; inline;
  3958. procedure setMODE16; inline;
  3959. procedure setMODE32; inline;
  3960. procedure setMSSEN; inline;
  3961. procedure setMSTEN; inline;
  3962. procedure setON; inline;
  3963. procedure setSIDL; inline;
  3964. procedure setSMP; inline;
  3965. procedure setSPIFE; inline;
  3966. procedure setSSEN; inline;
  3967. property CKE : TBits_1 read getCKE write setCKE;
  3968. property CKP : TBits_1 read getCKP write setCKP;
  3969. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3970. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3971. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3972. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3973. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3974. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3975. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3976. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3977. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3978. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3979. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3980. property ON : TBits_1 read getON write setON;
  3981. property SIDL : TBits_1 read getSIDL write setSIDL;
  3982. property SMP : TBits_1 read getSMP write setSMP;
  3983. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3984. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3985. property SSEN : TBits_1 read getSSEN write setSSEN;
  3986. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3987. property w : TBits_32 read getw write setw;
  3988. end;
  3989. TSPI3A_SPI3ASTAT = record
  3990. private
  3991. function getRXBUFELM : TBits_5; inline;
  3992. function getSPIBUSY : TBits_1; inline;
  3993. function getSPIRBE : TBits_1; inline;
  3994. function getSPIRBF : TBits_1; inline;
  3995. function getSPIROV : TBits_1; inline;
  3996. function getSPITBE : TBits_1; inline;
  3997. function getSPITBF : TBits_1; inline;
  3998. function getSPITUR : TBits_1; inline;
  3999. function getSRMT : TBits_1; inline;
  4000. function getTXBUFELM : TBits_5; inline;
  4001. function getw : TBits_32; inline;
  4002. procedure setRXBUFELM(thebits : TBits_5); inline;
  4003. procedure setSPIBUSY(thebits : TBits_1); inline;
  4004. procedure setSPIRBE(thebits : TBits_1); inline;
  4005. procedure setSPIRBF(thebits : TBits_1); inline;
  4006. procedure setSPIROV(thebits : TBits_1); inline;
  4007. procedure setSPITBE(thebits : TBits_1); inline;
  4008. procedure setSPITBF(thebits : TBits_1); inline;
  4009. procedure setSPITUR(thebits : TBits_1); inline;
  4010. procedure setSRMT(thebits : TBits_1); inline;
  4011. procedure setTXBUFELM(thebits : TBits_5); inline;
  4012. procedure setw(thebits : TBits_32); inline;
  4013. public
  4014. procedure clearSPIBUSY; inline;
  4015. procedure clearSPIRBE; inline;
  4016. procedure clearSPIRBF; inline;
  4017. procedure clearSPIROV; inline;
  4018. procedure clearSPITBE; inline;
  4019. procedure clearSPITBF; inline;
  4020. procedure clearSPITUR; inline;
  4021. procedure clearSRMT; inline;
  4022. procedure setSPIBUSY; inline;
  4023. procedure setSPIRBE; inline;
  4024. procedure setSPIRBF; inline;
  4025. procedure setSPIROV; inline;
  4026. procedure setSPITBE; inline;
  4027. procedure setSPITBF; inline;
  4028. procedure setSPITUR; inline;
  4029. procedure setSRMT; inline;
  4030. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  4031. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  4032. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  4033. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  4034. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  4035. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  4036. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  4037. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  4038. property SRMT : TBits_1 read getSRMT write setSRMT;
  4039. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  4040. property w : TBits_32 read getw write setw;
  4041. end;
  4042. TSPI3A_SPI4STAT = record
  4043. private
  4044. function getRXBUFELM : TBits_5; inline;
  4045. function getSPIBUSY : TBits_1; inline;
  4046. function getSPIRBE : TBits_1; inline;
  4047. function getSPIRBF : TBits_1; inline;
  4048. function getSPIROV : TBits_1; inline;
  4049. function getSPITBE : TBits_1; inline;
  4050. function getSPITBF : TBits_1; inline;
  4051. function getSPITUR : TBits_1; inline;
  4052. function getSRMT : TBits_1; inline;
  4053. function getTXBUFELM : TBits_5; inline;
  4054. function getw : TBits_32; inline;
  4055. procedure setRXBUFELM(thebits : TBits_5); inline;
  4056. procedure setSPIBUSY(thebits : TBits_1); inline;
  4057. procedure setSPIRBE(thebits : TBits_1); inline;
  4058. procedure setSPIRBF(thebits : TBits_1); inline;
  4059. procedure setSPIROV(thebits : TBits_1); inline;
  4060. procedure setSPITBE(thebits : TBits_1); inline;
  4061. procedure setSPITBF(thebits : TBits_1); inline;
  4062. procedure setSPITUR(thebits : TBits_1); inline;
  4063. procedure setSRMT(thebits : TBits_1); inline;
  4064. procedure setTXBUFELM(thebits : TBits_5); inline;
  4065. procedure setw(thebits : TBits_32); inline;
  4066. public
  4067. procedure clearSPIBUSY; inline;
  4068. procedure clearSPIRBE; inline;
  4069. procedure clearSPIRBF; inline;
  4070. procedure clearSPIROV; inline;
  4071. procedure clearSPITBE; inline;
  4072. procedure clearSPITBF; inline;
  4073. procedure clearSPITUR; inline;
  4074. procedure clearSRMT; inline;
  4075. procedure setSPIBUSY; inline;
  4076. procedure setSPIRBE; inline;
  4077. procedure setSPIRBF; inline;
  4078. procedure setSPIROV; inline;
  4079. procedure setSPITBE; inline;
  4080. procedure setSPITBF; inline;
  4081. procedure setSPITUR; inline;
  4082. procedure setSRMT; inline;
  4083. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  4084. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  4085. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  4086. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  4087. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  4088. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  4089. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  4090. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  4091. property SRMT : TBits_1 read getSRMT write setSRMT;
  4092. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  4093. property w : TBits_32 read getw write setw;
  4094. end;
  4095. type
  4096. TSPI3ARegisters = record
  4097. SPI3ACONbits : TSPI3A_SPI3ACON;
  4098. SPI3ACON : longWord;
  4099. SPI4CONbits : TSPI3A_SPI4CON;
  4100. SPI4CON : longWord;
  4101. SPI3ACONCLR : longWord;
  4102. SPI4CONCLR : longWord;
  4103. SPI3ACONSET : longWord;
  4104. SPI4CONSET : longWord;
  4105. SPI3ACONINV : longWord;
  4106. SPI4CONINV : longWord;
  4107. SPI3ASTATbits : TSPI3A_SPI3ASTAT;
  4108. SPI3ASTAT : longWord;
  4109. SPI4STATbits : TSPI3A_SPI4STAT;
  4110. SPI4STAT : longWord;
  4111. SPI3ASTATCLR : longWord;
  4112. SPI4STATCLR : longWord;
  4113. SPI3ASTATSET : longWord;
  4114. SPI4STATSET : longWord;
  4115. SPI3ASTATINV : longWord;
  4116. SPI4STATINV : longWord;
  4117. SPI3ABUF : longWord;
  4118. SPI4BUF : longWord;
  4119. SPI3ABRG : longWord;
  4120. SPI4BRG : longWord;
  4121. SPI3ABRGCLR : longWord;
  4122. SPI4BRGCLR : longWord;
  4123. SPI3ABRGSET : longWord;
  4124. SPI4BRGSET : longWord;
  4125. SPI3ABRGINV : longWord;
  4126. SPI4BRGINV : longWord;
  4127. end;
  4128. TSPI1_SPI1CON = record
  4129. private
  4130. function getCKE : TBits_1; inline;
  4131. function getCKP : TBits_1; inline;
  4132. function getDISSDO : TBits_1; inline;
  4133. function getENHBUF : TBits_1; inline;
  4134. function getFRMCNT : TBits_3; inline;
  4135. function getFRMEN : TBits_1; inline;
  4136. function getFRMPOL : TBits_1; inline;
  4137. function getFRMSYNC : TBits_1; inline;
  4138. function getFRMSYPW : TBits_1; inline;
  4139. function getMODE16 : TBits_1; inline;
  4140. function getMODE32 : TBits_1; inline;
  4141. function getMSSEN : TBits_1; inline;
  4142. function getMSTEN : TBits_1; inline;
  4143. function getON : TBits_1; inline;
  4144. function getSIDL : TBits_1; inline;
  4145. function getSMP : TBits_1; inline;
  4146. function getSPIFE : TBits_1; inline;
  4147. function getSRXISEL : TBits_2; inline;
  4148. function getSSEN : TBits_1; inline;
  4149. function getSTXISEL : TBits_2; inline;
  4150. function getw : TBits_32; inline;
  4151. procedure setCKE(thebits : TBits_1); inline;
  4152. procedure setCKP(thebits : TBits_1); inline;
  4153. procedure setDISSDO(thebits : TBits_1); inline;
  4154. procedure setENHBUF(thebits : TBits_1); inline;
  4155. procedure setFRMCNT(thebits : TBits_3); inline;
  4156. procedure setFRMEN(thebits : TBits_1); inline;
  4157. procedure setFRMPOL(thebits : TBits_1); inline;
  4158. procedure setFRMSYNC(thebits : TBits_1); inline;
  4159. procedure setFRMSYPW(thebits : TBits_1); inline;
  4160. procedure setMODE16(thebits : TBits_1); inline;
  4161. procedure setMODE32(thebits : TBits_1); inline;
  4162. procedure setMSSEN(thebits : TBits_1); inline;
  4163. procedure setMSTEN(thebits : TBits_1); inline;
  4164. procedure setON(thebits : TBits_1); inline;
  4165. procedure setSIDL(thebits : TBits_1); inline;
  4166. procedure setSMP(thebits : TBits_1); inline;
  4167. procedure setSPIFE(thebits : TBits_1); inline;
  4168. procedure setSRXISEL(thebits : TBits_2); inline;
  4169. procedure setSSEN(thebits : TBits_1); inline;
  4170. procedure setSTXISEL(thebits : TBits_2); inline;
  4171. procedure setw(thebits : TBits_32); inline;
  4172. public
  4173. procedure clearCKE; inline;
  4174. procedure clearCKP; inline;
  4175. procedure clearDISSDO; inline;
  4176. procedure clearENHBUF; inline;
  4177. procedure clearFRMEN; inline;
  4178. procedure clearFRMPOL; inline;
  4179. procedure clearFRMSYNC; inline;
  4180. procedure clearFRMSYPW; inline;
  4181. procedure clearMODE16; inline;
  4182. procedure clearMODE32; inline;
  4183. procedure clearMSSEN; inline;
  4184. procedure clearMSTEN; inline;
  4185. procedure clearON; inline;
  4186. procedure clearSIDL; inline;
  4187. procedure clearSMP; inline;
  4188. procedure clearSPIFE; inline;
  4189. procedure clearSSEN; inline;
  4190. procedure setCKE; inline;
  4191. procedure setCKP; inline;
  4192. procedure setDISSDO; inline;
  4193. procedure setENHBUF; inline;
  4194. procedure setFRMEN; inline;
  4195. procedure setFRMPOL; inline;
  4196. procedure setFRMSYNC; inline;
  4197. procedure setFRMSYPW; inline;
  4198. procedure setMODE16; inline;
  4199. procedure setMODE32; inline;
  4200. procedure setMSSEN; inline;
  4201. procedure setMSTEN; inline;
  4202. procedure setON; inline;
  4203. procedure setSIDL; inline;
  4204. procedure setSMP; inline;
  4205. procedure setSPIFE; inline;
  4206. procedure setSSEN; inline;
  4207. property CKE : TBits_1 read getCKE write setCKE;
  4208. property CKP : TBits_1 read getCKP write setCKP;
  4209. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  4210. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  4211. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  4212. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  4213. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  4214. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  4215. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  4216. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  4217. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  4218. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  4219. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  4220. property ON : TBits_1 read getON write setON;
  4221. property SIDL : TBits_1 read getSIDL write setSIDL;
  4222. property SMP : TBits_1 read getSMP write setSMP;
  4223. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  4224. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  4225. property SSEN : TBits_1 read getSSEN write setSSEN;
  4226. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  4227. property w : TBits_32 read getw write setw;
  4228. end;
  4229. TSPI1_SPI1STAT = record
  4230. private
  4231. function getRXBUFELM : TBits_5; inline;
  4232. function getSPIBUSY : TBits_1; inline;
  4233. function getSPIRBE : TBits_1; inline;
  4234. function getSPIRBF : TBits_1; inline;
  4235. function getSPIROV : TBits_1; inline;
  4236. function getSPITBE : TBits_1; inline;
  4237. function getSPITBF : TBits_1; inline;
  4238. function getSPITUR : TBits_1; inline;
  4239. function getSRMT : TBits_1; inline;
  4240. function getTXBUFELM : TBits_5; inline;
  4241. function getw : TBits_32; inline;
  4242. procedure setRXBUFELM(thebits : TBits_5); inline;
  4243. procedure setSPIBUSY(thebits : TBits_1); inline;
  4244. procedure setSPIRBE(thebits : TBits_1); inline;
  4245. procedure setSPIRBF(thebits : TBits_1); inline;
  4246. procedure setSPIROV(thebits : TBits_1); inline;
  4247. procedure setSPITBE(thebits : TBits_1); inline;
  4248. procedure setSPITBF(thebits : TBits_1); inline;
  4249. procedure setSPITUR(thebits : TBits_1); inline;
  4250. procedure setSRMT(thebits : TBits_1); inline;
  4251. procedure setTXBUFELM(thebits : TBits_5); inline;
  4252. procedure setw(thebits : TBits_32); inline;
  4253. public
  4254. procedure clearSPIBUSY; inline;
  4255. procedure clearSPIRBE; inline;
  4256. procedure clearSPIRBF; inline;
  4257. procedure clearSPIROV; inline;
  4258. procedure clearSPITBE; inline;
  4259. procedure clearSPITBF; inline;
  4260. procedure clearSPITUR; inline;
  4261. procedure clearSRMT; inline;
  4262. procedure setSPIBUSY; inline;
  4263. procedure setSPIRBE; inline;
  4264. procedure setSPIRBF; inline;
  4265. procedure setSPIROV; inline;
  4266. procedure setSPITBE; inline;
  4267. procedure setSPITBF; inline;
  4268. procedure setSPITUR; inline;
  4269. procedure setSRMT; inline;
  4270. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  4271. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  4272. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  4273. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  4274. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  4275. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  4276. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  4277. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  4278. property SRMT : TBits_1 read getSRMT write setSRMT;
  4279. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  4280. property w : TBits_32 read getw write setw;
  4281. end;
  4282. type
  4283. TSPI1Registers = record
  4284. SPI1CONbits : TSPI1_SPI1CON;
  4285. SPI1CON : longWord;
  4286. SPI1CONCLR : longWord;
  4287. SPI1CONSET : longWord;
  4288. SPI1CONINV : longWord;
  4289. SPI1STATbits : TSPI1_SPI1STAT;
  4290. SPI1STAT : longWord;
  4291. SPI1STATCLR : longWord;
  4292. SPI1STATSET : longWord;
  4293. SPI1STATINV : longWord;
  4294. SPI1BUF : longWord;
  4295. SPI1BRG : longWord;
  4296. SPI1BRGCLR : longWord;
  4297. SPI1BRGSET : longWord;
  4298. SPI1BRGINV : longWord;
  4299. end;
  4300. TUART1_U1AMODE = record
  4301. private
  4302. function getABAUD : TBits_1; inline;
  4303. function getBRGH : TBits_1; inline;
  4304. function getIREN : TBits_1; inline;
  4305. function getLPBACK : TBits_1; inline;
  4306. function getON : TBits_1; inline;
  4307. function getPDSEL : TBits_2; inline;
  4308. function getPDSEL0 : TBits_1; inline;
  4309. function getPDSEL1 : TBits_1; inline;
  4310. function getRTSMD : TBits_1; inline;
  4311. function getRXINV : TBits_1; inline;
  4312. function getSIDL : TBits_1; inline;
  4313. function getSTSEL : TBits_1; inline;
  4314. function getUARTEN : TBits_1; inline;
  4315. function getUEN : TBits_2; inline;
  4316. function getUEN0 : TBits_1; inline;
  4317. function getUEN1 : TBits_1; inline;
  4318. function getUSIDL : TBits_1; inline;
  4319. function getWAKE : TBits_1; inline;
  4320. function getw : TBits_32; inline;
  4321. procedure setABAUD(thebits : TBits_1); inline;
  4322. procedure setBRGH(thebits : TBits_1); inline;
  4323. procedure setIREN(thebits : TBits_1); inline;
  4324. procedure setLPBACK(thebits : TBits_1); inline;
  4325. procedure setON(thebits : TBits_1); inline;
  4326. procedure setPDSEL(thebits : TBits_2); inline;
  4327. procedure setPDSEL0(thebits : TBits_1); inline;
  4328. procedure setPDSEL1(thebits : TBits_1); inline;
  4329. procedure setRTSMD(thebits : TBits_1); inline;
  4330. procedure setRXINV(thebits : TBits_1); inline;
  4331. procedure setSIDL(thebits : TBits_1); inline;
  4332. procedure setSTSEL(thebits : TBits_1); inline;
  4333. procedure setUARTEN(thebits : TBits_1); inline;
  4334. procedure setUEN(thebits : TBits_2); inline;
  4335. procedure setUEN0(thebits : TBits_1); inline;
  4336. procedure setUEN1(thebits : TBits_1); inline;
  4337. procedure setUSIDL(thebits : TBits_1); inline;
  4338. procedure setWAKE(thebits : TBits_1); inline;
  4339. procedure setw(thebits : TBits_32); inline;
  4340. public
  4341. procedure clearABAUD; inline;
  4342. procedure clearBRGH; inline;
  4343. procedure clearIREN; inline;
  4344. procedure clearLPBACK; inline;
  4345. procedure clearON; inline;
  4346. procedure clearPDSEL0; inline;
  4347. procedure clearPDSEL1; inline;
  4348. procedure clearRTSMD; inline;
  4349. procedure clearRXINV; inline;
  4350. procedure clearSIDL; inline;
  4351. procedure clearSTSEL; inline;
  4352. procedure clearUARTEN; inline;
  4353. procedure clearUEN0; inline;
  4354. procedure clearUEN1; inline;
  4355. procedure clearUSIDL; inline;
  4356. procedure clearWAKE; inline;
  4357. procedure setABAUD; inline;
  4358. procedure setBRGH; inline;
  4359. procedure setIREN; inline;
  4360. procedure setLPBACK; inline;
  4361. procedure setON; inline;
  4362. procedure setPDSEL0; inline;
  4363. procedure setPDSEL1; inline;
  4364. procedure setRTSMD; inline;
  4365. procedure setRXINV; inline;
  4366. procedure setSIDL; inline;
  4367. procedure setSTSEL; inline;
  4368. procedure setUARTEN; inline;
  4369. procedure setUEN0; inline;
  4370. procedure setUEN1; inline;
  4371. procedure setUSIDL; inline;
  4372. procedure setWAKE; inline;
  4373. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4374. property BRGH : TBits_1 read getBRGH write setBRGH;
  4375. property IREN : TBits_1 read getIREN write setIREN;
  4376. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4377. property ON : TBits_1 read getON write setON;
  4378. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4379. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4380. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4381. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  4382. property RXINV : TBits_1 read getRXINV write setRXINV;
  4383. property SIDL : TBits_1 read getSIDL write setSIDL;
  4384. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4385. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4386. property UEN : TBits_2 read getUEN write setUEN;
  4387. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  4388. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  4389. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4390. property WAKE : TBits_1 read getWAKE write setWAKE;
  4391. property w : TBits_32 read getw write setw;
  4392. end;
  4393. TUART1_U1MODE = record
  4394. private
  4395. function getABAUD : TBits_1; inline;
  4396. function getBRGH : TBits_1; inline;
  4397. function getIREN : TBits_1; inline;
  4398. function getLPBACK : TBits_1; inline;
  4399. function getON : TBits_1; inline;
  4400. function getPDSEL : TBits_2; inline;
  4401. function getPDSEL0 : TBits_1; inline;
  4402. function getPDSEL1 : TBits_1; inline;
  4403. function getRTSMD : TBits_1; inline;
  4404. function getRXINV : TBits_1; inline;
  4405. function getSIDL : TBits_1; inline;
  4406. function getSTSEL : TBits_1; inline;
  4407. function getUARTEN : TBits_1; inline;
  4408. function getUEN : TBits_2; inline;
  4409. function getUEN0 : TBits_1; inline;
  4410. function getUEN1 : TBits_1; inline;
  4411. function getUSIDL : TBits_1; inline;
  4412. function getWAKE : TBits_1; inline;
  4413. function getw : TBits_32; inline;
  4414. procedure setABAUD(thebits : TBits_1); inline;
  4415. procedure setBRGH(thebits : TBits_1); inline;
  4416. procedure setIREN(thebits : TBits_1); inline;
  4417. procedure setLPBACK(thebits : TBits_1); inline;
  4418. procedure setON(thebits : TBits_1); inline;
  4419. procedure setPDSEL(thebits : TBits_2); inline;
  4420. procedure setPDSEL0(thebits : TBits_1); inline;
  4421. procedure setPDSEL1(thebits : TBits_1); inline;
  4422. procedure setRTSMD(thebits : TBits_1); inline;
  4423. procedure setRXINV(thebits : TBits_1); inline;
  4424. procedure setSIDL(thebits : TBits_1); inline;
  4425. procedure setSTSEL(thebits : TBits_1); inline;
  4426. procedure setUARTEN(thebits : TBits_1); inline;
  4427. procedure setUEN(thebits : TBits_2); inline;
  4428. procedure setUEN0(thebits : TBits_1); inline;
  4429. procedure setUEN1(thebits : TBits_1); inline;
  4430. procedure setUSIDL(thebits : TBits_1); inline;
  4431. procedure setWAKE(thebits : TBits_1); inline;
  4432. procedure setw(thebits : TBits_32); inline;
  4433. public
  4434. procedure clearABAUD; inline;
  4435. procedure clearBRGH; inline;
  4436. procedure clearIREN; inline;
  4437. procedure clearLPBACK; inline;
  4438. procedure clearON; inline;
  4439. procedure clearPDSEL0; inline;
  4440. procedure clearPDSEL1; inline;
  4441. procedure clearRTSMD; inline;
  4442. procedure clearRXINV; inline;
  4443. procedure clearSIDL; inline;
  4444. procedure clearSTSEL; inline;
  4445. procedure clearUARTEN; inline;
  4446. procedure clearUEN0; inline;
  4447. procedure clearUEN1; inline;
  4448. procedure clearUSIDL; inline;
  4449. procedure clearWAKE; inline;
  4450. procedure setABAUD; inline;
  4451. procedure setBRGH; inline;
  4452. procedure setIREN; inline;
  4453. procedure setLPBACK; inline;
  4454. procedure setON; inline;
  4455. procedure setPDSEL0; inline;
  4456. procedure setPDSEL1; inline;
  4457. procedure setRTSMD; inline;
  4458. procedure setRXINV; inline;
  4459. procedure setSIDL; inline;
  4460. procedure setSTSEL; inline;
  4461. procedure setUARTEN; inline;
  4462. procedure setUEN0; inline;
  4463. procedure setUEN1; inline;
  4464. procedure setUSIDL; inline;
  4465. procedure setWAKE; inline;
  4466. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4467. property BRGH : TBits_1 read getBRGH write setBRGH;
  4468. property IREN : TBits_1 read getIREN write setIREN;
  4469. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4470. property ON : TBits_1 read getON write setON;
  4471. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4472. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4473. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4474. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  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 UEN : TBits_2 read getUEN write setUEN;
  4480. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  4481. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  4482. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4483. property WAKE : TBits_1 read getWAKE write setWAKE;
  4484. property w : TBits_32 read getw write setw;
  4485. end;
  4486. TUART1_U1ASTA = record
  4487. private
  4488. function getADDEN : TBits_1; inline;
  4489. function getADDR : TBits_8; inline;
  4490. function getADM_EN : TBits_1; inline;
  4491. function getFERR : TBits_1; inline;
  4492. function getOERR : TBits_1; inline;
  4493. function getPERR : TBits_1; inline;
  4494. function getRIDLE : TBits_1; inline;
  4495. function getTRMT : TBits_1; inline;
  4496. function getURXDA : TBits_1; inline;
  4497. function getURXEN : TBits_1; inline;
  4498. function getURXISEL : TBits_2; inline;
  4499. function getURXISEL0 : TBits_1; inline;
  4500. function getURXISEL1 : TBits_1; inline;
  4501. function getUTXBF : TBits_1; inline;
  4502. function getUTXBRK : TBits_1; inline;
  4503. function getUTXEN : TBits_1; inline;
  4504. function getUTXINV : TBits_1; inline;
  4505. function getUTXISEL : TBits_2; inline;
  4506. function getUTXISEL0 : TBits_1; inline;
  4507. function getUTXISEL1 : TBits_1; inline;
  4508. function getUTXSEL : TBits_2; inline;
  4509. function getw : TBits_32; inline;
  4510. procedure setADDEN(thebits : TBits_1); inline;
  4511. procedure setADDR(thebits : TBits_8); inline;
  4512. procedure setADM_EN(thebits : TBits_1); inline;
  4513. procedure setFERR(thebits : TBits_1); inline;
  4514. procedure setOERR(thebits : TBits_1); inline;
  4515. procedure setPERR(thebits : TBits_1); inline;
  4516. procedure setRIDLE(thebits : TBits_1); inline;
  4517. procedure setTRMT(thebits : TBits_1); inline;
  4518. procedure setURXDA(thebits : TBits_1); inline;
  4519. procedure setURXEN(thebits : TBits_1); inline;
  4520. procedure setURXISEL(thebits : TBits_2); inline;
  4521. procedure setURXISEL0(thebits : TBits_1); inline;
  4522. procedure setURXISEL1(thebits : TBits_1); inline;
  4523. procedure setUTXBF(thebits : TBits_1); inline;
  4524. procedure setUTXBRK(thebits : TBits_1); inline;
  4525. procedure setUTXEN(thebits : TBits_1); inline;
  4526. procedure setUTXINV(thebits : TBits_1); inline;
  4527. procedure setUTXISEL(thebits : TBits_2); inline;
  4528. procedure setUTXISEL0(thebits : TBits_1); inline;
  4529. procedure setUTXISEL1(thebits : TBits_1); inline;
  4530. procedure setUTXSEL(thebits : TBits_2); inline;
  4531. procedure setw(thebits : TBits_32); inline;
  4532. public
  4533. procedure clearADDEN; inline;
  4534. procedure clearADM_EN; inline;
  4535. procedure clearFERR; inline;
  4536. procedure clearOERR; inline;
  4537. procedure clearPERR; inline;
  4538. procedure clearRIDLE; inline;
  4539. procedure clearTRMT; inline;
  4540. procedure clearURXDA; inline;
  4541. procedure clearURXEN; inline;
  4542. procedure clearURXISEL0; inline;
  4543. procedure clearURXISEL1; inline;
  4544. procedure clearUTXBF; inline;
  4545. procedure clearUTXBRK; inline;
  4546. procedure clearUTXEN; inline;
  4547. procedure clearUTXINV; inline;
  4548. procedure clearUTXISEL0; inline;
  4549. procedure clearUTXISEL1; inline;
  4550. procedure setADDEN; inline;
  4551. procedure setADM_EN; inline;
  4552. procedure setFERR; inline;
  4553. procedure setOERR; inline;
  4554. procedure setPERR; inline;
  4555. procedure setRIDLE; inline;
  4556. procedure setTRMT; inline;
  4557. procedure setURXDA; inline;
  4558. procedure setURXEN; inline;
  4559. procedure setURXISEL0; inline;
  4560. procedure setURXISEL1; inline;
  4561. procedure setUTXBF; inline;
  4562. procedure setUTXBRK; inline;
  4563. procedure setUTXEN; inline;
  4564. procedure setUTXINV; inline;
  4565. procedure setUTXISEL0; inline;
  4566. procedure setUTXISEL1; inline;
  4567. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4568. property ADDR : TBits_8 read getADDR write setADDR;
  4569. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4570. property FERR : TBits_1 read getFERR write setFERR;
  4571. property OERR : TBits_1 read getOERR write setOERR;
  4572. property PERR : TBits_1 read getPERR write setPERR;
  4573. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4574. property TRMT : TBits_1 read getTRMT write setTRMT;
  4575. property URXDA : TBits_1 read getURXDA write setURXDA;
  4576. property URXEN : TBits_1 read getURXEN write setURXEN;
  4577. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4578. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4579. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4580. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4581. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4582. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4583. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4584. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4585. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4586. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4587. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4588. property w : TBits_32 read getw write setw;
  4589. end;
  4590. TUART1_U1STA = record
  4591. private
  4592. function getADDEN : TBits_1; inline;
  4593. function getADDR : TBits_8; inline;
  4594. function getADM_EN : TBits_1; inline;
  4595. function getFERR : TBits_1; inline;
  4596. function getOERR : TBits_1; inline;
  4597. function getPERR : TBits_1; inline;
  4598. function getRIDLE : TBits_1; inline;
  4599. function getTRMT : TBits_1; inline;
  4600. function getURXDA : TBits_1; inline;
  4601. function getURXEN : TBits_1; inline;
  4602. function getURXISEL : TBits_2; inline;
  4603. function getURXISEL0 : TBits_1; inline;
  4604. function getURXISEL1 : TBits_1; inline;
  4605. function getUTXBF : TBits_1; inline;
  4606. function getUTXBRK : TBits_1; inline;
  4607. function getUTXEN : TBits_1; inline;
  4608. function getUTXINV : TBits_1; inline;
  4609. function getUTXISEL : TBits_2; inline;
  4610. function getUTXISEL0 : TBits_1; inline;
  4611. function getUTXISEL1 : TBits_1; inline;
  4612. function getUTXSEL : TBits_2; inline;
  4613. function getw : TBits_32; inline;
  4614. procedure setADDEN(thebits : TBits_1); inline;
  4615. procedure setADDR(thebits : TBits_8); inline;
  4616. procedure setADM_EN(thebits : TBits_1); inline;
  4617. procedure setFERR(thebits : TBits_1); inline;
  4618. procedure setOERR(thebits : TBits_1); inline;
  4619. procedure setPERR(thebits : TBits_1); inline;
  4620. procedure setRIDLE(thebits : TBits_1); inline;
  4621. procedure setTRMT(thebits : TBits_1); inline;
  4622. procedure setURXDA(thebits : TBits_1); inline;
  4623. procedure setURXEN(thebits : TBits_1); inline;
  4624. procedure setURXISEL(thebits : TBits_2); inline;
  4625. procedure setURXISEL0(thebits : TBits_1); inline;
  4626. procedure setURXISEL1(thebits : TBits_1); inline;
  4627. procedure setUTXBF(thebits : TBits_1); inline;
  4628. procedure setUTXBRK(thebits : TBits_1); inline;
  4629. procedure setUTXEN(thebits : TBits_1); inline;
  4630. procedure setUTXINV(thebits : TBits_1); inline;
  4631. procedure setUTXISEL(thebits : TBits_2); inline;
  4632. procedure setUTXISEL0(thebits : TBits_1); inline;
  4633. procedure setUTXISEL1(thebits : TBits_1); inline;
  4634. procedure setUTXSEL(thebits : TBits_2); inline;
  4635. procedure setw(thebits : TBits_32); inline;
  4636. public
  4637. procedure clearADDEN; inline;
  4638. procedure clearADM_EN; inline;
  4639. procedure clearFERR; inline;
  4640. procedure clearOERR; inline;
  4641. procedure clearPERR; inline;
  4642. procedure clearRIDLE; inline;
  4643. procedure clearTRMT; inline;
  4644. procedure clearURXDA; inline;
  4645. procedure clearURXEN; inline;
  4646. procedure clearURXISEL0; inline;
  4647. procedure clearURXISEL1; inline;
  4648. procedure clearUTXBF; inline;
  4649. procedure clearUTXBRK; inline;
  4650. procedure clearUTXEN; inline;
  4651. procedure clearUTXINV; inline;
  4652. procedure clearUTXISEL0; inline;
  4653. procedure clearUTXISEL1; inline;
  4654. procedure setADDEN; inline;
  4655. procedure setADM_EN; inline;
  4656. procedure setFERR; inline;
  4657. procedure setOERR; inline;
  4658. procedure setPERR; inline;
  4659. procedure setRIDLE; inline;
  4660. procedure setTRMT; inline;
  4661. procedure setURXDA; inline;
  4662. procedure setURXEN; inline;
  4663. procedure setURXISEL0; inline;
  4664. procedure setURXISEL1; inline;
  4665. procedure setUTXBF; inline;
  4666. procedure setUTXBRK; inline;
  4667. procedure setUTXEN; inline;
  4668. procedure setUTXINV; inline;
  4669. procedure setUTXISEL0; inline;
  4670. procedure setUTXISEL1; inline;
  4671. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4672. property ADDR : TBits_8 read getADDR write setADDR;
  4673. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4674. property FERR : TBits_1 read getFERR write setFERR;
  4675. property OERR : TBits_1 read getOERR write setOERR;
  4676. property PERR : TBits_1 read getPERR write setPERR;
  4677. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4678. property TRMT : TBits_1 read getTRMT write setTRMT;
  4679. property URXDA : TBits_1 read getURXDA write setURXDA;
  4680. property URXEN : TBits_1 read getURXEN write setURXEN;
  4681. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4682. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4683. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4684. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4685. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4686. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4687. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4688. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4689. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4690. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4691. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4692. property w : TBits_32 read getw write setw;
  4693. end;
  4694. type
  4695. TUART1Registers = record
  4696. U1AMODEbits : TUART1_U1AMODE;
  4697. U1AMODE : longWord;
  4698. U1MODEbits : TUART1_U1MODE;
  4699. U1MODE : longWord;
  4700. U1AMODECLR : longWord;
  4701. U1MODECLR : longWord;
  4702. U1AMODESET : longWord;
  4703. U1MODESET : longWord;
  4704. U1AMODEINV : longWord;
  4705. U1MODEINV : longWord;
  4706. U1ASTAbits : TUART1_U1ASTA;
  4707. U1ASTA : longWord;
  4708. U1STAbits : TUART1_U1STA;
  4709. U1STA : longWord;
  4710. U1ASTACLR : longWord;
  4711. U1STACLR : longWord;
  4712. U1ASTASET : longWord;
  4713. U1STASET : longWord;
  4714. U1ASTAINV : longWord;
  4715. U1STAINV : longWord;
  4716. U1ATXREG : longWord;
  4717. U1TXREG : longWord;
  4718. U1ARXREG : longWord;
  4719. U1RXREG : longWord;
  4720. U1ABRG : longWord;
  4721. U1BRG : longWord;
  4722. U1ABRGCLR : longWord;
  4723. U1BRGCLR : longWord;
  4724. U1ABRGSET : longWord;
  4725. U1BRGSET : longWord;
  4726. U1ABRGINV : longWord;
  4727. U1BRGINV : longWord;
  4728. end;
  4729. TUART1B_U1BMODE = record
  4730. private
  4731. function getABAUD : TBits_1; inline;
  4732. function getBRGH : TBits_1; inline;
  4733. function getIREN : TBits_1; inline;
  4734. function getLPBACK : TBits_1; inline;
  4735. function getON : TBits_1; inline;
  4736. function getPDSEL : TBits_2; inline;
  4737. function getPDSEL0 : TBits_1; inline;
  4738. function getPDSEL1 : TBits_1; inline;
  4739. function getRXINV : TBits_1; inline;
  4740. function getSIDL : TBits_1; inline;
  4741. function getSTSEL : TBits_1; inline;
  4742. function getUARTEN : TBits_1; inline;
  4743. function getUSIDL : TBits_1; inline;
  4744. function getWAKE : TBits_1; inline;
  4745. function getw : TBits_32; inline;
  4746. procedure setABAUD(thebits : TBits_1); inline;
  4747. procedure setBRGH(thebits : TBits_1); inline;
  4748. procedure setIREN(thebits : TBits_1); inline;
  4749. procedure setLPBACK(thebits : TBits_1); inline;
  4750. procedure setON(thebits : TBits_1); inline;
  4751. procedure setPDSEL(thebits : TBits_2); inline;
  4752. procedure setPDSEL0(thebits : TBits_1); inline;
  4753. procedure setPDSEL1(thebits : TBits_1); inline;
  4754. procedure setRXINV(thebits : TBits_1); inline;
  4755. procedure setSIDL(thebits : TBits_1); inline;
  4756. procedure setSTSEL(thebits : TBits_1); inline;
  4757. procedure setUARTEN(thebits : TBits_1); inline;
  4758. procedure setUSIDL(thebits : TBits_1); inline;
  4759. procedure setWAKE(thebits : TBits_1); inline;
  4760. procedure setw(thebits : TBits_32); inline;
  4761. public
  4762. procedure clearABAUD; inline;
  4763. procedure clearBRGH; inline;
  4764. procedure clearIREN; inline;
  4765. procedure clearLPBACK; inline;
  4766. procedure clearON; inline;
  4767. procedure clearPDSEL0; inline;
  4768. procedure clearPDSEL1; inline;
  4769. procedure clearRXINV; inline;
  4770. procedure clearSIDL; inline;
  4771. procedure clearSTSEL; inline;
  4772. procedure clearUARTEN; inline;
  4773. procedure clearUSIDL; inline;
  4774. procedure clearWAKE; inline;
  4775. procedure setABAUD; inline;
  4776. procedure setBRGH; inline;
  4777. procedure setIREN; inline;
  4778. procedure setLPBACK; inline;
  4779. procedure setON; inline;
  4780. procedure setPDSEL0; inline;
  4781. procedure setPDSEL1; inline;
  4782. procedure setRXINV; inline;
  4783. procedure setSIDL; inline;
  4784. procedure setSTSEL; inline;
  4785. procedure setUARTEN; inline;
  4786. procedure setUSIDL; inline;
  4787. procedure setWAKE; inline;
  4788. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4789. property BRGH : TBits_1 read getBRGH write setBRGH;
  4790. property IREN : TBits_1 read getIREN write setIREN;
  4791. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4792. property ON : TBits_1 read getON write setON;
  4793. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4794. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4795. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4796. property RXINV : TBits_1 read getRXINV write setRXINV;
  4797. property SIDL : TBits_1 read getSIDL write setSIDL;
  4798. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4799. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4800. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4801. property WAKE : TBits_1 read getWAKE write setWAKE;
  4802. property w : TBits_32 read getw write setw;
  4803. end;
  4804. TUART1B_U4MODE = record
  4805. private
  4806. function getABAUD : TBits_1; inline;
  4807. function getBRGH : TBits_1; inline;
  4808. function getIREN : TBits_1; inline;
  4809. function getLPBACK : TBits_1; inline;
  4810. function getON : TBits_1; inline;
  4811. function getPDSEL : TBits_2; inline;
  4812. function getPDSEL0 : TBits_1; inline;
  4813. function getPDSEL1 : TBits_1; inline;
  4814. function getRXINV : TBits_1; inline;
  4815. function getSIDL : TBits_1; inline;
  4816. function getSTSEL : TBits_1; inline;
  4817. function getUARTEN : TBits_1; inline;
  4818. function getUSIDL : TBits_1; inline;
  4819. function getWAKE : TBits_1; inline;
  4820. function getw : TBits_32; inline;
  4821. procedure setABAUD(thebits : TBits_1); inline;
  4822. procedure setBRGH(thebits : TBits_1); inline;
  4823. procedure setIREN(thebits : TBits_1); inline;
  4824. procedure setLPBACK(thebits : TBits_1); inline;
  4825. procedure setON(thebits : TBits_1); inline;
  4826. procedure setPDSEL(thebits : TBits_2); inline;
  4827. procedure setPDSEL0(thebits : TBits_1); inline;
  4828. procedure setPDSEL1(thebits : TBits_1); inline;
  4829. procedure setRXINV(thebits : TBits_1); inline;
  4830. procedure setSIDL(thebits : TBits_1); inline;
  4831. procedure setSTSEL(thebits : TBits_1); inline;
  4832. procedure setUARTEN(thebits : TBits_1); inline;
  4833. procedure setUSIDL(thebits : TBits_1); inline;
  4834. procedure setWAKE(thebits : TBits_1); inline;
  4835. procedure setw(thebits : TBits_32); inline;
  4836. public
  4837. procedure clearABAUD; inline;
  4838. procedure clearBRGH; inline;
  4839. procedure clearIREN; inline;
  4840. procedure clearLPBACK; inline;
  4841. procedure clearON; inline;
  4842. procedure clearPDSEL0; inline;
  4843. procedure clearPDSEL1; inline;
  4844. procedure clearRXINV; inline;
  4845. procedure clearSIDL; inline;
  4846. procedure clearSTSEL; inline;
  4847. procedure clearUARTEN; inline;
  4848. procedure clearUSIDL; inline;
  4849. procedure clearWAKE; inline;
  4850. procedure setABAUD; inline;
  4851. procedure setBRGH; inline;
  4852. procedure setIREN; inline;
  4853. procedure setLPBACK; inline;
  4854. procedure setON; inline;
  4855. procedure setPDSEL0; inline;
  4856. procedure setPDSEL1; inline;
  4857. procedure setRXINV; inline;
  4858. procedure setSIDL; inline;
  4859. procedure setSTSEL; inline;
  4860. procedure setUARTEN; inline;
  4861. procedure setUSIDL; inline;
  4862. procedure setWAKE; inline;
  4863. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4864. property BRGH : TBits_1 read getBRGH write setBRGH;
  4865. property IREN : TBits_1 read getIREN write setIREN;
  4866. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4867. property ON : TBits_1 read getON write setON;
  4868. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4869. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4870. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4871. property RXINV : TBits_1 read getRXINV write setRXINV;
  4872. property SIDL : TBits_1 read getSIDL write setSIDL;
  4873. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4874. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4875. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4876. property WAKE : TBits_1 read getWAKE write setWAKE;
  4877. property w : TBits_32 read getw write setw;
  4878. end;
  4879. TUART1B_U1BSTA = record
  4880. private
  4881. function getADDEN : TBits_1; inline;
  4882. function getADDR : TBits_8; inline;
  4883. function getADM_EN : TBits_1; inline;
  4884. function getFERR : TBits_1; inline;
  4885. function getOERR : TBits_1; inline;
  4886. function getPERR : TBits_1; inline;
  4887. function getRIDLE : TBits_1; inline;
  4888. function getTRMT : TBits_1; inline;
  4889. function getURXDA : TBits_1; inline;
  4890. function getURXEN : TBits_1; inline;
  4891. function getURXISEL : TBits_2; inline;
  4892. function getURXISEL0 : TBits_1; inline;
  4893. function getURXISEL1 : TBits_1; inline;
  4894. function getUTXBF : TBits_1; inline;
  4895. function getUTXBRK : TBits_1; inline;
  4896. function getUTXEN : TBits_1; inline;
  4897. function getUTXINV : TBits_1; inline;
  4898. function getUTXISEL : TBits_2; inline;
  4899. function getUTXISEL0 : TBits_1; inline;
  4900. function getUTXISEL1 : TBits_1; inline;
  4901. function getUTXSEL : TBits_2; inline;
  4902. function getw : TBits_32; inline;
  4903. procedure setADDEN(thebits : TBits_1); inline;
  4904. procedure setADDR(thebits : TBits_8); inline;
  4905. procedure setADM_EN(thebits : TBits_1); inline;
  4906. procedure setFERR(thebits : TBits_1); inline;
  4907. procedure setOERR(thebits : TBits_1); inline;
  4908. procedure setPERR(thebits : TBits_1); inline;
  4909. procedure setRIDLE(thebits : TBits_1); inline;
  4910. procedure setTRMT(thebits : TBits_1); inline;
  4911. procedure setURXDA(thebits : TBits_1); inline;
  4912. procedure setURXEN(thebits : TBits_1); inline;
  4913. procedure setURXISEL(thebits : TBits_2); inline;
  4914. procedure setURXISEL0(thebits : TBits_1); inline;
  4915. procedure setURXISEL1(thebits : TBits_1); inline;
  4916. procedure setUTXBF(thebits : TBits_1); inline;
  4917. procedure setUTXBRK(thebits : TBits_1); inline;
  4918. procedure setUTXEN(thebits : TBits_1); inline;
  4919. procedure setUTXINV(thebits : TBits_1); inline;
  4920. procedure setUTXISEL(thebits : TBits_2); inline;
  4921. procedure setUTXISEL0(thebits : TBits_1); inline;
  4922. procedure setUTXISEL1(thebits : TBits_1); inline;
  4923. procedure setUTXSEL(thebits : TBits_2); inline;
  4924. procedure setw(thebits : TBits_32); inline;
  4925. public
  4926. procedure clearADDEN; inline;
  4927. procedure clearADM_EN; inline;
  4928. procedure clearFERR; inline;
  4929. procedure clearOERR; inline;
  4930. procedure clearPERR; inline;
  4931. procedure clearRIDLE; inline;
  4932. procedure clearTRMT; inline;
  4933. procedure clearURXDA; inline;
  4934. procedure clearURXEN; inline;
  4935. procedure clearURXISEL0; inline;
  4936. procedure clearURXISEL1; inline;
  4937. procedure clearUTXBF; inline;
  4938. procedure clearUTXBRK; inline;
  4939. procedure clearUTXEN; inline;
  4940. procedure clearUTXINV; inline;
  4941. procedure clearUTXISEL0; inline;
  4942. procedure clearUTXISEL1; inline;
  4943. procedure setADDEN; inline;
  4944. procedure setADM_EN; inline;
  4945. procedure setFERR; inline;
  4946. procedure setOERR; inline;
  4947. procedure setPERR; inline;
  4948. procedure setRIDLE; inline;
  4949. procedure setTRMT; inline;
  4950. procedure setURXDA; inline;
  4951. procedure setURXEN; inline;
  4952. procedure setURXISEL0; inline;
  4953. procedure setURXISEL1; inline;
  4954. procedure setUTXBF; inline;
  4955. procedure setUTXBRK; inline;
  4956. procedure setUTXEN; inline;
  4957. procedure setUTXINV; inline;
  4958. procedure setUTXISEL0; inline;
  4959. procedure setUTXISEL1; inline;
  4960. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4961. property ADDR : TBits_8 read getADDR write setADDR;
  4962. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4963. property FERR : TBits_1 read getFERR write setFERR;
  4964. property OERR : TBits_1 read getOERR write setOERR;
  4965. property PERR : TBits_1 read getPERR write setPERR;
  4966. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4967. property TRMT : TBits_1 read getTRMT write setTRMT;
  4968. property URXDA : TBits_1 read getURXDA write setURXDA;
  4969. property URXEN : TBits_1 read getURXEN write setURXEN;
  4970. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4971. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4972. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4973. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4974. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4975. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4976. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4977. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4978. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4979. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4980. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4981. property w : TBits_32 read getw write setw;
  4982. end;
  4983. TUART1B_U4STA = record
  4984. private
  4985. function getADDEN : TBits_1; inline;
  4986. function getADDR : TBits_8; inline;
  4987. function getADM_EN : TBits_1; inline;
  4988. function getFERR : TBits_1; inline;
  4989. function getOERR : TBits_1; inline;
  4990. function getPERR : TBits_1; inline;
  4991. function getRIDLE : TBits_1; inline;
  4992. function getTRMT : TBits_1; inline;
  4993. function getURXDA : TBits_1; inline;
  4994. function getURXEN : TBits_1; inline;
  4995. function getURXISEL : TBits_2; inline;
  4996. function getURXISEL0 : TBits_1; inline;
  4997. function getURXISEL1 : TBits_1; inline;
  4998. function getUTXBF : TBits_1; inline;
  4999. function getUTXBRK : TBits_1; inline;
  5000. function getUTXEN : TBits_1; inline;
  5001. function getUTXINV : TBits_1; inline;
  5002. function getUTXISEL : TBits_2; inline;
  5003. function getUTXISEL0 : TBits_1; inline;
  5004. function getUTXISEL1 : TBits_1; inline;
  5005. function getUTXSEL : TBits_2; inline;
  5006. function getw : TBits_32; inline;
  5007. procedure setADDEN(thebits : TBits_1); inline;
  5008. procedure setADDR(thebits : TBits_8); inline;
  5009. procedure setADM_EN(thebits : TBits_1); inline;
  5010. procedure setFERR(thebits : TBits_1); inline;
  5011. procedure setOERR(thebits : TBits_1); inline;
  5012. procedure setPERR(thebits : TBits_1); inline;
  5013. procedure setRIDLE(thebits : TBits_1); inline;
  5014. procedure setTRMT(thebits : TBits_1); inline;
  5015. procedure setURXDA(thebits : TBits_1); inline;
  5016. procedure setURXEN(thebits : TBits_1); inline;
  5017. procedure setURXISEL(thebits : TBits_2); inline;
  5018. procedure setURXISEL0(thebits : TBits_1); inline;
  5019. procedure setURXISEL1(thebits : TBits_1); inline;
  5020. procedure setUTXBF(thebits : TBits_1); inline;
  5021. procedure setUTXBRK(thebits : TBits_1); inline;
  5022. procedure setUTXEN(thebits : TBits_1); inline;
  5023. procedure setUTXINV(thebits : TBits_1); inline;
  5024. procedure setUTXISEL(thebits : TBits_2); inline;
  5025. procedure setUTXISEL0(thebits : TBits_1); inline;
  5026. procedure setUTXISEL1(thebits : TBits_1); inline;
  5027. procedure setUTXSEL(thebits : TBits_2); inline;
  5028. procedure setw(thebits : TBits_32); inline;
  5029. public
  5030. procedure clearADDEN; inline;
  5031. procedure clearADM_EN; inline;
  5032. procedure clearFERR; inline;
  5033. procedure clearOERR; inline;
  5034. procedure clearPERR; inline;
  5035. procedure clearRIDLE; inline;
  5036. procedure clearTRMT; inline;
  5037. procedure clearURXDA; inline;
  5038. procedure clearURXEN; inline;
  5039. procedure clearURXISEL0; inline;
  5040. procedure clearURXISEL1; inline;
  5041. procedure clearUTXBF; inline;
  5042. procedure clearUTXBRK; inline;
  5043. procedure clearUTXEN; inline;
  5044. procedure clearUTXINV; inline;
  5045. procedure clearUTXISEL0; inline;
  5046. procedure clearUTXISEL1; inline;
  5047. procedure setADDEN; inline;
  5048. procedure setADM_EN; inline;
  5049. procedure setFERR; inline;
  5050. procedure setOERR; inline;
  5051. procedure setPERR; inline;
  5052. procedure setRIDLE; inline;
  5053. procedure setTRMT; inline;
  5054. procedure setURXDA; inline;
  5055. procedure setURXEN; inline;
  5056. procedure setURXISEL0; inline;
  5057. procedure setURXISEL1; inline;
  5058. procedure setUTXBF; inline;
  5059. procedure setUTXBRK; inline;
  5060. procedure setUTXEN; inline;
  5061. procedure setUTXINV; inline;
  5062. procedure setUTXISEL0; inline;
  5063. procedure setUTXISEL1; inline;
  5064. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5065. property ADDR : TBits_8 read getADDR write setADDR;
  5066. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5067. property FERR : TBits_1 read getFERR write setFERR;
  5068. property OERR : TBits_1 read getOERR write setOERR;
  5069. property PERR : TBits_1 read getPERR write setPERR;
  5070. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5071. property TRMT : TBits_1 read getTRMT write setTRMT;
  5072. property URXDA : TBits_1 read getURXDA write setURXDA;
  5073. property URXEN : TBits_1 read getURXEN write setURXEN;
  5074. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5075. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5076. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5077. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5078. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5079. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5080. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5081. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5082. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5083. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5084. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5085. property w : TBits_32 read getw write setw;
  5086. end;
  5087. type
  5088. TUART1BRegisters = record
  5089. U1BMODEbits : TUART1B_U1BMODE;
  5090. U1BMODE : longWord;
  5091. U4MODEbits : TUART1B_U4MODE;
  5092. U4MODE : longWord;
  5093. U1BMODECLR : longWord;
  5094. U4MODECLR : longWord;
  5095. U1BMODESET : longWord;
  5096. U4MODESET : longWord;
  5097. U1BMODEINV : longWord;
  5098. U4MODEINV : longWord;
  5099. U1BSTAbits : TUART1B_U1BSTA;
  5100. U1BSTA : longWord;
  5101. U4STAbits : TUART1B_U4STA;
  5102. U4STA : longWord;
  5103. U1BSTACLR : longWord;
  5104. U4STACLR : longWord;
  5105. U1BSTASET : longWord;
  5106. U4STASET : longWord;
  5107. U1BSTAINV : longWord;
  5108. U4STAINV : longWord;
  5109. U1BTXREG : longWord;
  5110. U4TXREG : longWord;
  5111. U1BRXREG : longWord;
  5112. U4RXREG : longWord;
  5113. U1BBRG : longWord;
  5114. U4BRG : longWord;
  5115. U1BBRGCLR : longWord;
  5116. U4BRGCLR : longWord;
  5117. U1BBRGSET : longWord;
  5118. U4BRGSET : longWord;
  5119. U1BBRGINV : longWord;
  5120. U4BRGINV : longWord;
  5121. end;
  5122. TUART3_U2AMODE = record
  5123. private
  5124. function getABAUD : TBits_1; inline;
  5125. function getBRGH : TBits_1; inline;
  5126. function getIREN : TBits_1; inline;
  5127. function getLPBACK : TBits_1; inline;
  5128. function getON : TBits_1; inline;
  5129. function getPDSEL : TBits_2; inline;
  5130. function getPDSEL0 : TBits_1; inline;
  5131. function getPDSEL1 : TBits_1; inline;
  5132. function getRTSMD : TBits_1; inline;
  5133. function getRXINV : TBits_1; inline;
  5134. function getSIDL : TBits_1; inline;
  5135. function getSTSEL : TBits_1; inline;
  5136. function getUARTEN : TBits_1; inline;
  5137. function getUEN : TBits_2; inline;
  5138. function getUEN0 : TBits_1; inline;
  5139. function getUEN1 : TBits_1; inline;
  5140. function getUSIDL : TBits_1; inline;
  5141. function getWAKE : TBits_1; inline;
  5142. function getw : TBits_32; inline;
  5143. procedure setABAUD(thebits : TBits_1); inline;
  5144. procedure setBRGH(thebits : TBits_1); inline;
  5145. procedure setIREN(thebits : TBits_1); inline;
  5146. procedure setLPBACK(thebits : TBits_1); inline;
  5147. procedure setON(thebits : TBits_1); inline;
  5148. procedure setPDSEL(thebits : TBits_2); inline;
  5149. procedure setPDSEL0(thebits : TBits_1); inline;
  5150. procedure setPDSEL1(thebits : TBits_1); inline;
  5151. procedure setRTSMD(thebits : TBits_1); inline;
  5152. procedure setRXINV(thebits : TBits_1); inline;
  5153. procedure setSIDL(thebits : TBits_1); inline;
  5154. procedure setSTSEL(thebits : TBits_1); inline;
  5155. procedure setUARTEN(thebits : TBits_1); inline;
  5156. procedure setUEN(thebits : TBits_2); inline;
  5157. procedure setUEN0(thebits : TBits_1); inline;
  5158. procedure setUEN1(thebits : TBits_1); inline;
  5159. procedure setUSIDL(thebits : TBits_1); inline;
  5160. procedure setWAKE(thebits : TBits_1); inline;
  5161. procedure setw(thebits : TBits_32); inline;
  5162. public
  5163. procedure clearABAUD; inline;
  5164. procedure clearBRGH; inline;
  5165. procedure clearIREN; inline;
  5166. procedure clearLPBACK; inline;
  5167. procedure clearON; inline;
  5168. procedure clearPDSEL0; inline;
  5169. procedure clearPDSEL1; inline;
  5170. procedure clearRTSMD; inline;
  5171. procedure clearRXINV; inline;
  5172. procedure clearSIDL; inline;
  5173. procedure clearSTSEL; inline;
  5174. procedure clearUARTEN; inline;
  5175. procedure clearUEN0; inline;
  5176. procedure clearUEN1; inline;
  5177. procedure clearUSIDL; inline;
  5178. procedure clearWAKE; inline;
  5179. procedure setABAUD; inline;
  5180. procedure setBRGH; inline;
  5181. procedure setIREN; inline;
  5182. procedure setLPBACK; inline;
  5183. procedure setON; inline;
  5184. procedure setPDSEL0; inline;
  5185. procedure setPDSEL1; inline;
  5186. procedure setRTSMD; inline;
  5187. procedure setRXINV; inline;
  5188. procedure setSIDL; inline;
  5189. procedure setSTSEL; inline;
  5190. procedure setUARTEN; inline;
  5191. procedure setUEN0; inline;
  5192. procedure setUEN1; inline;
  5193. procedure setUSIDL; inline;
  5194. procedure setWAKE; inline;
  5195. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5196. property BRGH : TBits_1 read getBRGH write setBRGH;
  5197. property IREN : TBits_1 read getIREN write setIREN;
  5198. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5199. property ON : TBits_1 read getON write setON;
  5200. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5201. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5202. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5203. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  5204. property RXINV : TBits_1 read getRXINV write setRXINV;
  5205. property SIDL : TBits_1 read getSIDL write setSIDL;
  5206. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5207. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5208. property UEN : TBits_2 read getUEN write setUEN;
  5209. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  5210. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  5211. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5212. property WAKE : TBits_1 read getWAKE write setWAKE;
  5213. property w : TBits_32 read getw write setw;
  5214. end;
  5215. TUART3_U3MODE = record
  5216. private
  5217. function getABAUD : TBits_1; inline;
  5218. function getBRGH : TBits_1; inline;
  5219. function getIREN : TBits_1; inline;
  5220. function getLPBACK : TBits_1; inline;
  5221. function getON : TBits_1; inline;
  5222. function getPDSEL : TBits_2; inline;
  5223. function getPDSEL0 : TBits_1; inline;
  5224. function getPDSEL1 : TBits_1; inline;
  5225. function getRTSMD : TBits_1; inline;
  5226. function getRXINV : TBits_1; inline;
  5227. function getSIDL : TBits_1; inline;
  5228. function getSTSEL : TBits_1; inline;
  5229. function getUARTEN : TBits_1; inline;
  5230. function getUEN : TBits_2; inline;
  5231. function getUEN0 : TBits_1; inline;
  5232. function getUEN1 : TBits_1; inline;
  5233. function getUSIDL : TBits_1; inline;
  5234. function getWAKE : TBits_1; inline;
  5235. function getw : TBits_32; inline;
  5236. procedure setABAUD(thebits : TBits_1); inline;
  5237. procedure setBRGH(thebits : TBits_1); inline;
  5238. procedure setIREN(thebits : TBits_1); inline;
  5239. procedure setLPBACK(thebits : TBits_1); inline;
  5240. procedure setON(thebits : TBits_1); inline;
  5241. procedure setPDSEL(thebits : TBits_2); inline;
  5242. procedure setPDSEL0(thebits : TBits_1); inline;
  5243. procedure setPDSEL1(thebits : TBits_1); inline;
  5244. procedure setRTSMD(thebits : TBits_1); inline;
  5245. procedure setRXINV(thebits : TBits_1); inline;
  5246. procedure setSIDL(thebits : TBits_1); inline;
  5247. procedure setSTSEL(thebits : TBits_1); inline;
  5248. procedure setUARTEN(thebits : TBits_1); inline;
  5249. procedure setUEN(thebits : TBits_2); inline;
  5250. procedure setUEN0(thebits : TBits_1); inline;
  5251. procedure setUEN1(thebits : TBits_1); inline;
  5252. procedure setUSIDL(thebits : TBits_1); inline;
  5253. procedure setWAKE(thebits : TBits_1); inline;
  5254. procedure setw(thebits : TBits_32); inline;
  5255. public
  5256. procedure clearABAUD; inline;
  5257. procedure clearBRGH; inline;
  5258. procedure clearIREN; inline;
  5259. procedure clearLPBACK; inline;
  5260. procedure clearON; inline;
  5261. procedure clearPDSEL0; inline;
  5262. procedure clearPDSEL1; inline;
  5263. procedure clearRTSMD; inline;
  5264. procedure clearRXINV; inline;
  5265. procedure clearSIDL; inline;
  5266. procedure clearSTSEL; inline;
  5267. procedure clearUARTEN; inline;
  5268. procedure clearUEN0; inline;
  5269. procedure clearUEN1; inline;
  5270. procedure clearUSIDL; inline;
  5271. procedure clearWAKE; inline;
  5272. procedure setABAUD; inline;
  5273. procedure setBRGH; inline;
  5274. procedure setIREN; inline;
  5275. procedure setLPBACK; inline;
  5276. procedure setON; inline;
  5277. procedure setPDSEL0; inline;
  5278. procedure setPDSEL1; inline;
  5279. procedure setRTSMD; inline;
  5280. procedure setRXINV; inline;
  5281. procedure setSIDL; inline;
  5282. procedure setSTSEL; inline;
  5283. procedure setUARTEN; inline;
  5284. procedure setUEN0; inline;
  5285. procedure setUEN1; inline;
  5286. procedure setUSIDL; inline;
  5287. procedure setWAKE; inline;
  5288. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5289. property BRGH : TBits_1 read getBRGH write setBRGH;
  5290. property IREN : TBits_1 read getIREN write setIREN;
  5291. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5292. property ON : TBits_1 read getON write setON;
  5293. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5294. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5295. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5296. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  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 UEN : TBits_2 read getUEN write setUEN;
  5302. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  5303. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  5304. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5305. property WAKE : TBits_1 read getWAKE write setWAKE;
  5306. property w : TBits_32 read getw write setw;
  5307. end;
  5308. TUART3_U2ASTA = record
  5309. private
  5310. function getADDEN : TBits_1; inline;
  5311. function getADDR : TBits_8; inline;
  5312. function getADM_EN : TBits_1; inline;
  5313. function getFERR : TBits_1; inline;
  5314. function getOERR : TBits_1; inline;
  5315. function getPERR : TBits_1; inline;
  5316. function getRIDLE : TBits_1; inline;
  5317. function getTRMT : TBits_1; inline;
  5318. function getURXDA : TBits_1; inline;
  5319. function getURXEN : TBits_1; inline;
  5320. function getURXISEL : TBits_2; inline;
  5321. function getURXISEL0 : TBits_1; inline;
  5322. function getURXISEL1 : TBits_1; inline;
  5323. function getUTXBF : TBits_1; inline;
  5324. function getUTXBRK : TBits_1; inline;
  5325. function getUTXEN : TBits_1; inline;
  5326. function getUTXINV : TBits_1; inline;
  5327. function getUTXISEL : TBits_2; inline;
  5328. function getUTXISEL0 : TBits_1; inline;
  5329. function getUTXISEL1 : TBits_1; inline;
  5330. function getUTXSEL : TBits_2; inline;
  5331. function getw : TBits_32; inline;
  5332. procedure setADDEN(thebits : TBits_1); inline;
  5333. procedure setADDR(thebits : TBits_8); inline;
  5334. procedure setADM_EN(thebits : TBits_1); inline;
  5335. procedure setFERR(thebits : TBits_1); inline;
  5336. procedure setOERR(thebits : TBits_1); inline;
  5337. procedure setPERR(thebits : TBits_1); inline;
  5338. procedure setRIDLE(thebits : TBits_1); inline;
  5339. procedure setTRMT(thebits : TBits_1); inline;
  5340. procedure setURXDA(thebits : TBits_1); inline;
  5341. procedure setURXEN(thebits : TBits_1); inline;
  5342. procedure setURXISEL(thebits : TBits_2); inline;
  5343. procedure setURXISEL0(thebits : TBits_1); inline;
  5344. procedure setURXISEL1(thebits : TBits_1); inline;
  5345. procedure setUTXBF(thebits : TBits_1); inline;
  5346. procedure setUTXBRK(thebits : TBits_1); inline;
  5347. procedure setUTXEN(thebits : TBits_1); inline;
  5348. procedure setUTXINV(thebits : TBits_1); inline;
  5349. procedure setUTXISEL(thebits : TBits_2); inline;
  5350. procedure setUTXISEL0(thebits : TBits_1); inline;
  5351. procedure setUTXISEL1(thebits : TBits_1); inline;
  5352. procedure setUTXSEL(thebits : TBits_2); inline;
  5353. procedure setw(thebits : TBits_32); inline;
  5354. public
  5355. procedure clearADDEN; inline;
  5356. procedure clearADM_EN; inline;
  5357. procedure clearFERR; inline;
  5358. procedure clearOERR; inline;
  5359. procedure clearPERR; inline;
  5360. procedure clearRIDLE; inline;
  5361. procedure clearTRMT; inline;
  5362. procedure clearURXDA; inline;
  5363. procedure clearURXEN; inline;
  5364. procedure clearURXISEL0; inline;
  5365. procedure clearURXISEL1; inline;
  5366. procedure clearUTXBF; inline;
  5367. procedure clearUTXBRK; inline;
  5368. procedure clearUTXEN; inline;
  5369. procedure clearUTXINV; inline;
  5370. procedure clearUTXISEL0; inline;
  5371. procedure clearUTXISEL1; inline;
  5372. procedure setADDEN; inline;
  5373. procedure setADM_EN; inline;
  5374. procedure setFERR; inline;
  5375. procedure setOERR; inline;
  5376. procedure setPERR; inline;
  5377. procedure setRIDLE; inline;
  5378. procedure setTRMT; inline;
  5379. procedure setURXDA; inline;
  5380. procedure setURXEN; inline;
  5381. procedure setURXISEL0; inline;
  5382. procedure setURXISEL1; inline;
  5383. procedure setUTXBF; inline;
  5384. procedure setUTXBRK; inline;
  5385. procedure setUTXEN; inline;
  5386. procedure setUTXINV; inline;
  5387. procedure setUTXISEL0; inline;
  5388. procedure setUTXISEL1; inline;
  5389. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5390. property ADDR : TBits_8 read getADDR write setADDR;
  5391. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5392. property FERR : TBits_1 read getFERR write setFERR;
  5393. property OERR : TBits_1 read getOERR write setOERR;
  5394. property PERR : TBits_1 read getPERR write setPERR;
  5395. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5396. property TRMT : TBits_1 read getTRMT write setTRMT;
  5397. property URXDA : TBits_1 read getURXDA write setURXDA;
  5398. property URXEN : TBits_1 read getURXEN write setURXEN;
  5399. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5400. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5401. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5402. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5403. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5404. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5405. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5406. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5407. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5408. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5409. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5410. property w : TBits_32 read getw write setw;
  5411. end;
  5412. TUART3_U3STA = record
  5413. private
  5414. function getADDEN : TBits_1; inline;
  5415. function getADDR : TBits_8; inline;
  5416. function getADM_EN : TBits_1; inline;
  5417. function getFERR : TBits_1; inline;
  5418. function getOERR : TBits_1; inline;
  5419. function getPERR : TBits_1; inline;
  5420. function getRIDLE : TBits_1; inline;
  5421. function getTRMT : TBits_1; inline;
  5422. function getURXDA : TBits_1; inline;
  5423. function getURXEN : TBits_1; inline;
  5424. function getURXISEL : TBits_2; inline;
  5425. function getURXISEL0 : TBits_1; inline;
  5426. function getURXISEL1 : TBits_1; inline;
  5427. function getUTXBF : TBits_1; inline;
  5428. function getUTXBRK : TBits_1; inline;
  5429. function getUTXEN : TBits_1; inline;
  5430. function getUTXINV : TBits_1; inline;
  5431. function getUTXISEL : TBits_2; inline;
  5432. function getUTXISEL0 : TBits_1; inline;
  5433. function getUTXISEL1 : TBits_1; inline;
  5434. function getUTXSEL : TBits_2; inline;
  5435. function getw : TBits_32; inline;
  5436. procedure setADDEN(thebits : TBits_1); inline;
  5437. procedure setADDR(thebits : TBits_8); inline;
  5438. procedure setADM_EN(thebits : TBits_1); inline;
  5439. procedure setFERR(thebits : TBits_1); inline;
  5440. procedure setOERR(thebits : TBits_1); inline;
  5441. procedure setPERR(thebits : TBits_1); inline;
  5442. procedure setRIDLE(thebits : TBits_1); inline;
  5443. procedure setTRMT(thebits : TBits_1); inline;
  5444. procedure setURXDA(thebits : TBits_1); inline;
  5445. procedure setURXEN(thebits : TBits_1); inline;
  5446. procedure setURXISEL(thebits : TBits_2); inline;
  5447. procedure setURXISEL0(thebits : TBits_1); inline;
  5448. procedure setURXISEL1(thebits : TBits_1); inline;
  5449. procedure setUTXBF(thebits : TBits_1); inline;
  5450. procedure setUTXBRK(thebits : TBits_1); inline;
  5451. procedure setUTXEN(thebits : TBits_1); inline;
  5452. procedure setUTXINV(thebits : TBits_1); inline;
  5453. procedure setUTXISEL(thebits : TBits_2); inline;
  5454. procedure setUTXISEL0(thebits : TBits_1); inline;
  5455. procedure setUTXISEL1(thebits : TBits_1); inline;
  5456. procedure setUTXSEL(thebits : TBits_2); inline;
  5457. procedure setw(thebits : TBits_32); inline;
  5458. public
  5459. procedure clearADDEN; inline;
  5460. procedure clearADM_EN; inline;
  5461. procedure clearFERR; inline;
  5462. procedure clearOERR; inline;
  5463. procedure clearPERR; inline;
  5464. procedure clearRIDLE; inline;
  5465. procedure clearTRMT; inline;
  5466. procedure clearURXDA; inline;
  5467. procedure clearURXEN; inline;
  5468. procedure clearURXISEL0; inline;
  5469. procedure clearURXISEL1; inline;
  5470. procedure clearUTXBF; inline;
  5471. procedure clearUTXBRK; inline;
  5472. procedure clearUTXEN; inline;
  5473. procedure clearUTXINV; inline;
  5474. procedure clearUTXISEL0; inline;
  5475. procedure clearUTXISEL1; inline;
  5476. procedure setADDEN; inline;
  5477. procedure setADM_EN; inline;
  5478. procedure setFERR; inline;
  5479. procedure setOERR; inline;
  5480. procedure setPERR; inline;
  5481. procedure setRIDLE; inline;
  5482. procedure setTRMT; inline;
  5483. procedure setURXDA; inline;
  5484. procedure setURXEN; inline;
  5485. procedure setURXISEL0; inline;
  5486. procedure setURXISEL1; inline;
  5487. procedure setUTXBF; inline;
  5488. procedure setUTXBRK; inline;
  5489. procedure setUTXEN; inline;
  5490. procedure setUTXINV; inline;
  5491. procedure setUTXISEL0; inline;
  5492. procedure setUTXISEL1; inline;
  5493. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5494. property ADDR : TBits_8 read getADDR write setADDR;
  5495. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5496. property FERR : TBits_1 read getFERR write setFERR;
  5497. property OERR : TBits_1 read getOERR write setOERR;
  5498. property PERR : TBits_1 read getPERR write setPERR;
  5499. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5500. property TRMT : TBits_1 read getTRMT write setTRMT;
  5501. property URXDA : TBits_1 read getURXDA write setURXDA;
  5502. property URXEN : TBits_1 read getURXEN write setURXEN;
  5503. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5504. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5505. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5506. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5507. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5508. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5509. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5510. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5511. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5512. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5513. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5514. property w : TBits_32 read getw write setw;
  5515. end;
  5516. type
  5517. TUART3Registers = record
  5518. U2AMODEbits : TUART3_U2AMODE;
  5519. U2AMODE : longWord;
  5520. U3MODEbits : TUART3_U3MODE;
  5521. U3MODE : longWord;
  5522. U2AMODECLR : longWord;
  5523. U3MODECLR : longWord;
  5524. U2AMODESET : longWord;
  5525. U3MODESET : longWord;
  5526. U2AMODEINV : longWord;
  5527. U3MODEINV : longWord;
  5528. U2ASTAbits : TUART3_U2ASTA;
  5529. U2ASTA : longWord;
  5530. U3STAbits : TUART3_U3STA;
  5531. U3STA : longWord;
  5532. U2ASTACLR : longWord;
  5533. U3STACLR : longWord;
  5534. U2ASTASET : longWord;
  5535. U3STASET : longWord;
  5536. U2ASTAINV : longWord;
  5537. U3STAINV : longWord;
  5538. U2ATXREG : longWord;
  5539. U3TXREG : longWord;
  5540. U2ARXREG : longWord;
  5541. U3RXREG : longWord;
  5542. U2ABRG : longWord;
  5543. U3BRG : longWord;
  5544. U2ABRGCLR : longWord;
  5545. U3BRGCLR : longWord;
  5546. U2ABRGSET : longWord;
  5547. U3BRGSET : longWord;
  5548. U2ABRGINV : longWord;
  5549. U3BRGINV : longWord;
  5550. end;
  5551. TUART2B_U2BMODE = record
  5552. private
  5553. function getABAUD : TBits_1; inline;
  5554. function getBRGH : TBits_1; inline;
  5555. function getIREN : TBits_1; inline;
  5556. function getLPBACK : TBits_1; inline;
  5557. function getON : TBits_1; inline;
  5558. function getPDSEL : TBits_2; inline;
  5559. function getPDSEL0 : TBits_1; inline;
  5560. function getPDSEL1 : TBits_1; inline;
  5561. function getRXINV : TBits_1; inline;
  5562. function getSIDL : TBits_1; inline;
  5563. function getSTSEL : TBits_1; inline;
  5564. function getUARTEN : TBits_1; inline;
  5565. function getUSIDL : TBits_1; inline;
  5566. function getWAKE : TBits_1; inline;
  5567. function getw : TBits_32; inline;
  5568. procedure setABAUD(thebits : TBits_1); inline;
  5569. procedure setBRGH(thebits : TBits_1); inline;
  5570. procedure setIREN(thebits : TBits_1); inline;
  5571. procedure setLPBACK(thebits : TBits_1); inline;
  5572. procedure setON(thebits : TBits_1); inline;
  5573. procedure setPDSEL(thebits : TBits_2); inline;
  5574. procedure setPDSEL0(thebits : TBits_1); inline;
  5575. procedure setPDSEL1(thebits : TBits_1); inline;
  5576. procedure setRXINV(thebits : TBits_1); inline;
  5577. procedure setSIDL(thebits : TBits_1); inline;
  5578. procedure setSTSEL(thebits : TBits_1); inline;
  5579. procedure setUARTEN(thebits : TBits_1); inline;
  5580. procedure setUSIDL(thebits : TBits_1); inline;
  5581. procedure setWAKE(thebits : TBits_1); inline;
  5582. procedure setw(thebits : TBits_32); inline;
  5583. public
  5584. procedure clearABAUD; inline;
  5585. procedure clearBRGH; inline;
  5586. procedure clearIREN; inline;
  5587. procedure clearLPBACK; inline;
  5588. procedure clearON; inline;
  5589. procedure clearPDSEL0; inline;
  5590. procedure clearPDSEL1; inline;
  5591. procedure clearRXINV; inline;
  5592. procedure clearSIDL; inline;
  5593. procedure clearSTSEL; inline;
  5594. procedure clearUARTEN; inline;
  5595. procedure clearUSIDL; inline;
  5596. procedure clearWAKE; inline;
  5597. procedure setABAUD; inline;
  5598. procedure setBRGH; inline;
  5599. procedure setIREN; inline;
  5600. procedure setLPBACK; inline;
  5601. procedure setON; inline;
  5602. procedure setPDSEL0; inline;
  5603. procedure setPDSEL1; inline;
  5604. procedure setRXINV; inline;
  5605. procedure setSIDL; inline;
  5606. procedure setSTSEL; inline;
  5607. procedure setUARTEN; inline;
  5608. procedure setUSIDL; inline;
  5609. procedure setWAKE; inline;
  5610. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5611. property BRGH : TBits_1 read getBRGH write setBRGH;
  5612. property IREN : TBits_1 read getIREN write setIREN;
  5613. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5614. property ON : TBits_1 read getON write setON;
  5615. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5616. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5617. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5618. property RXINV : TBits_1 read getRXINV write setRXINV;
  5619. property SIDL : TBits_1 read getSIDL write setSIDL;
  5620. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5621. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5622. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5623. property WAKE : TBits_1 read getWAKE write setWAKE;
  5624. property w : TBits_32 read getw write setw;
  5625. end;
  5626. TUART2B_U6MODE = record
  5627. private
  5628. function getABAUD : TBits_1; inline;
  5629. function getBRGH : TBits_1; inline;
  5630. function getIREN : TBits_1; inline;
  5631. function getLPBACK : TBits_1; inline;
  5632. function getON : TBits_1; inline;
  5633. function getPDSEL : TBits_2; inline;
  5634. function getPDSEL0 : TBits_1; inline;
  5635. function getPDSEL1 : TBits_1; inline;
  5636. function getRXINV : TBits_1; inline;
  5637. function getSIDL : TBits_1; inline;
  5638. function getSTSEL : TBits_1; inline;
  5639. function getUARTEN : TBits_1; inline;
  5640. function getUSIDL : TBits_1; inline;
  5641. function getWAKE : TBits_1; inline;
  5642. function getw : TBits_32; inline;
  5643. procedure setABAUD(thebits : TBits_1); inline;
  5644. procedure setBRGH(thebits : TBits_1); inline;
  5645. procedure setIREN(thebits : TBits_1); inline;
  5646. procedure setLPBACK(thebits : TBits_1); inline;
  5647. procedure setON(thebits : TBits_1); inline;
  5648. procedure setPDSEL(thebits : TBits_2); inline;
  5649. procedure setPDSEL0(thebits : TBits_1); inline;
  5650. procedure setPDSEL1(thebits : TBits_1); inline;
  5651. procedure setRXINV(thebits : TBits_1); inline;
  5652. procedure setSIDL(thebits : TBits_1); inline;
  5653. procedure setSTSEL(thebits : TBits_1); inline;
  5654. procedure setUARTEN(thebits : TBits_1); inline;
  5655. procedure setUSIDL(thebits : TBits_1); inline;
  5656. procedure setWAKE(thebits : TBits_1); inline;
  5657. procedure setw(thebits : TBits_32); inline;
  5658. public
  5659. procedure clearABAUD; inline;
  5660. procedure clearBRGH; inline;
  5661. procedure clearIREN; inline;
  5662. procedure clearLPBACK; inline;
  5663. procedure clearON; inline;
  5664. procedure clearPDSEL0; inline;
  5665. procedure clearPDSEL1; inline;
  5666. procedure clearRXINV; inline;
  5667. procedure clearSIDL; inline;
  5668. procedure clearSTSEL; inline;
  5669. procedure clearUARTEN; inline;
  5670. procedure clearUSIDL; inline;
  5671. procedure clearWAKE; inline;
  5672. procedure setABAUD; inline;
  5673. procedure setBRGH; inline;
  5674. procedure setIREN; inline;
  5675. procedure setLPBACK; inline;
  5676. procedure setON; inline;
  5677. procedure setPDSEL0; inline;
  5678. procedure setPDSEL1; inline;
  5679. procedure setRXINV; inline;
  5680. procedure setSIDL; inline;
  5681. procedure setSTSEL; inline;
  5682. procedure setUARTEN; inline;
  5683. procedure setUSIDL; inline;
  5684. procedure setWAKE; inline;
  5685. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5686. property BRGH : TBits_1 read getBRGH write setBRGH;
  5687. property IREN : TBits_1 read getIREN write setIREN;
  5688. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5689. property ON : TBits_1 read getON write setON;
  5690. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5691. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5692. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5693. property RXINV : TBits_1 read getRXINV write setRXINV;
  5694. property SIDL : TBits_1 read getSIDL write setSIDL;
  5695. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5696. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5697. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5698. property WAKE : TBits_1 read getWAKE write setWAKE;
  5699. property w : TBits_32 read getw write setw;
  5700. end;
  5701. TUART2B_U2BSTA = record
  5702. private
  5703. function getADDEN : TBits_1; inline;
  5704. function getADDR : TBits_8; inline;
  5705. function getADM_EN : TBits_1; inline;
  5706. function getFERR : TBits_1; inline;
  5707. function getOERR : TBits_1; inline;
  5708. function getPERR : TBits_1; inline;
  5709. function getRIDLE : TBits_1; inline;
  5710. function getTRMT : TBits_1; inline;
  5711. function getURXDA : TBits_1; inline;
  5712. function getURXEN : TBits_1; inline;
  5713. function getURXISEL : TBits_2; inline;
  5714. function getURXISEL0 : TBits_1; inline;
  5715. function getURXISEL1 : TBits_1; inline;
  5716. function getUTXBF : TBits_1; inline;
  5717. function getUTXBRK : TBits_1; inline;
  5718. function getUTXEN : TBits_1; inline;
  5719. function getUTXINV : TBits_1; inline;
  5720. function getUTXISEL : TBits_2; inline;
  5721. function getUTXISEL0 : TBits_1; inline;
  5722. function getUTXISEL1 : TBits_1; inline;
  5723. function getUTXSEL : TBits_2; inline;
  5724. function getw : TBits_32; inline;
  5725. procedure setADDEN(thebits : TBits_1); inline;
  5726. procedure setADDR(thebits : TBits_8); inline;
  5727. procedure setADM_EN(thebits : TBits_1); inline;
  5728. procedure setFERR(thebits : TBits_1); inline;
  5729. procedure setOERR(thebits : TBits_1); inline;
  5730. procedure setPERR(thebits : TBits_1); inline;
  5731. procedure setRIDLE(thebits : TBits_1); inline;
  5732. procedure setTRMT(thebits : TBits_1); inline;
  5733. procedure setURXDA(thebits : TBits_1); inline;
  5734. procedure setURXEN(thebits : TBits_1); inline;
  5735. procedure setURXISEL(thebits : TBits_2); inline;
  5736. procedure setURXISEL0(thebits : TBits_1); inline;
  5737. procedure setURXISEL1(thebits : TBits_1); inline;
  5738. procedure setUTXBF(thebits : TBits_1); inline;
  5739. procedure setUTXBRK(thebits : TBits_1); inline;
  5740. procedure setUTXEN(thebits : TBits_1); inline;
  5741. procedure setUTXINV(thebits : TBits_1); inline;
  5742. procedure setUTXISEL(thebits : TBits_2); inline;
  5743. procedure setUTXISEL0(thebits : TBits_1); inline;
  5744. procedure setUTXISEL1(thebits : TBits_1); inline;
  5745. procedure setUTXSEL(thebits : TBits_2); inline;
  5746. procedure setw(thebits : TBits_32); inline;
  5747. public
  5748. procedure clearADDEN; inline;
  5749. procedure clearADM_EN; inline;
  5750. procedure clearFERR; inline;
  5751. procedure clearOERR; inline;
  5752. procedure clearPERR; inline;
  5753. procedure clearRIDLE; inline;
  5754. procedure clearTRMT; inline;
  5755. procedure clearURXDA; inline;
  5756. procedure clearURXEN; inline;
  5757. procedure clearURXISEL0; inline;
  5758. procedure clearURXISEL1; inline;
  5759. procedure clearUTXBF; inline;
  5760. procedure clearUTXBRK; inline;
  5761. procedure clearUTXEN; inline;
  5762. procedure clearUTXINV; inline;
  5763. procedure clearUTXISEL0; inline;
  5764. procedure clearUTXISEL1; inline;
  5765. procedure setADDEN; inline;
  5766. procedure setADM_EN; inline;
  5767. procedure setFERR; inline;
  5768. procedure setOERR; inline;
  5769. procedure setPERR; inline;
  5770. procedure setRIDLE; inline;
  5771. procedure setTRMT; inline;
  5772. procedure setURXDA; inline;
  5773. procedure setURXEN; inline;
  5774. procedure setURXISEL0; inline;
  5775. procedure setURXISEL1; inline;
  5776. procedure setUTXBF; inline;
  5777. procedure setUTXBRK; inline;
  5778. procedure setUTXEN; inline;
  5779. procedure setUTXINV; inline;
  5780. procedure setUTXISEL0; inline;
  5781. procedure setUTXISEL1; inline;
  5782. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5783. property ADDR : TBits_8 read getADDR write setADDR;
  5784. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5785. property FERR : TBits_1 read getFERR write setFERR;
  5786. property OERR : TBits_1 read getOERR write setOERR;
  5787. property PERR : TBits_1 read getPERR write setPERR;
  5788. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5789. property TRMT : TBits_1 read getTRMT write setTRMT;
  5790. property URXDA : TBits_1 read getURXDA write setURXDA;
  5791. property URXEN : TBits_1 read getURXEN write setURXEN;
  5792. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5793. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5794. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5795. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5796. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5797. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5798. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5799. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5800. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5801. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5802. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5803. property w : TBits_32 read getw write setw;
  5804. end;
  5805. TUART2B_U6STA = record
  5806. private
  5807. function getADDEN : TBits_1; inline;
  5808. function getADDR : TBits_8; inline;
  5809. function getADM_EN : TBits_1; inline;
  5810. function getFERR : TBits_1; inline;
  5811. function getOERR : TBits_1; inline;
  5812. function getPERR : TBits_1; inline;
  5813. function getRIDLE : TBits_1; inline;
  5814. function getTRMT : TBits_1; inline;
  5815. function getURXDA : TBits_1; inline;
  5816. function getURXEN : TBits_1; inline;
  5817. function getURXISEL : TBits_2; inline;
  5818. function getURXISEL0 : TBits_1; inline;
  5819. function getURXISEL1 : TBits_1; inline;
  5820. function getUTXBF : TBits_1; inline;
  5821. function getUTXBRK : TBits_1; inline;
  5822. function getUTXEN : TBits_1; inline;
  5823. function getUTXINV : TBits_1; inline;
  5824. function getUTXISEL : TBits_2; inline;
  5825. function getUTXISEL0 : TBits_1; inline;
  5826. function getUTXISEL1 : TBits_1; inline;
  5827. function getUTXSEL : TBits_2; inline;
  5828. function getw : TBits_32; inline;
  5829. procedure setADDEN(thebits : TBits_1); inline;
  5830. procedure setADDR(thebits : TBits_8); inline;
  5831. procedure setADM_EN(thebits : TBits_1); inline;
  5832. procedure setFERR(thebits : TBits_1); inline;
  5833. procedure setOERR(thebits : TBits_1); inline;
  5834. procedure setPERR(thebits : TBits_1); inline;
  5835. procedure setRIDLE(thebits : TBits_1); inline;
  5836. procedure setTRMT(thebits : TBits_1); inline;
  5837. procedure setURXDA(thebits : TBits_1); inline;
  5838. procedure setURXEN(thebits : TBits_1); inline;
  5839. procedure setURXISEL(thebits : TBits_2); inline;
  5840. procedure setURXISEL0(thebits : TBits_1); inline;
  5841. procedure setURXISEL1(thebits : TBits_1); inline;
  5842. procedure setUTXBF(thebits : TBits_1); inline;
  5843. procedure setUTXBRK(thebits : TBits_1); inline;
  5844. procedure setUTXEN(thebits : TBits_1); inline;
  5845. procedure setUTXINV(thebits : TBits_1); inline;
  5846. procedure setUTXISEL(thebits : TBits_2); inline;
  5847. procedure setUTXISEL0(thebits : TBits_1); inline;
  5848. procedure setUTXISEL1(thebits : TBits_1); inline;
  5849. procedure setUTXSEL(thebits : TBits_2); inline;
  5850. procedure setw(thebits : TBits_32); inline;
  5851. public
  5852. procedure clearADDEN; inline;
  5853. procedure clearADM_EN; inline;
  5854. procedure clearFERR; inline;
  5855. procedure clearOERR; inline;
  5856. procedure clearPERR; inline;
  5857. procedure clearRIDLE; inline;
  5858. procedure clearTRMT; inline;
  5859. procedure clearURXDA; inline;
  5860. procedure clearURXEN; inline;
  5861. procedure clearURXISEL0; inline;
  5862. procedure clearURXISEL1; inline;
  5863. procedure clearUTXBF; inline;
  5864. procedure clearUTXBRK; inline;
  5865. procedure clearUTXEN; inline;
  5866. procedure clearUTXINV; inline;
  5867. procedure clearUTXISEL0; inline;
  5868. procedure clearUTXISEL1; inline;
  5869. procedure setADDEN; inline;
  5870. procedure setADM_EN; inline;
  5871. procedure setFERR; inline;
  5872. procedure setOERR; inline;
  5873. procedure setPERR; inline;
  5874. procedure setRIDLE; inline;
  5875. procedure setTRMT; inline;
  5876. procedure setURXDA; inline;
  5877. procedure setURXEN; inline;
  5878. procedure setURXISEL0; inline;
  5879. procedure setURXISEL1; inline;
  5880. procedure setUTXBF; inline;
  5881. procedure setUTXBRK; inline;
  5882. procedure setUTXEN; inline;
  5883. procedure setUTXINV; inline;
  5884. procedure setUTXISEL0; inline;
  5885. procedure setUTXISEL1; inline;
  5886. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5887. property ADDR : TBits_8 read getADDR write setADDR;
  5888. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5889. property FERR : TBits_1 read getFERR write setFERR;
  5890. property OERR : TBits_1 read getOERR write setOERR;
  5891. property PERR : TBits_1 read getPERR write setPERR;
  5892. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5893. property TRMT : TBits_1 read getTRMT write setTRMT;
  5894. property URXDA : TBits_1 read getURXDA write setURXDA;
  5895. property URXEN : TBits_1 read getURXEN write setURXEN;
  5896. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5897. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5898. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5899. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5900. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5901. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5902. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5903. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5904. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5905. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5906. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5907. property w : TBits_32 read getw write setw;
  5908. end;
  5909. type
  5910. TUART2BRegisters = record
  5911. U2BMODEbits : TUART2B_U2BMODE;
  5912. U2BMODE : longWord;
  5913. U6MODEbits : TUART2B_U6MODE;
  5914. U6MODE : longWord;
  5915. U2BMODECLR : longWord;
  5916. U6MODECLR : longWord;
  5917. U2BMODESET : longWord;
  5918. U6MODESET : longWord;
  5919. U2BMODEINV : longWord;
  5920. U6MODEINV : longWord;
  5921. U2BSTAbits : TUART2B_U2BSTA;
  5922. U2BSTA : longWord;
  5923. U6STAbits : TUART2B_U6STA;
  5924. U6STA : longWord;
  5925. U2BSTACLR : longWord;
  5926. U6STACLR : longWord;
  5927. U2BSTASET : longWord;
  5928. U6STASET : longWord;
  5929. U2BSTAINV : longWord;
  5930. U6STAINV : longWord;
  5931. U2BTXREG : longWord;
  5932. U6TXREG : longWord;
  5933. U2BRXREG : longWord;
  5934. U6RXREG : longWord;
  5935. U2BBRG : longWord;
  5936. U6BRG : longWord;
  5937. U2BBRGCLR : longWord;
  5938. U6BRGCLR : longWord;
  5939. U2BBRGSET : longWord;
  5940. U6BRGSET : longWord;
  5941. U2BBRGINV : longWord;
  5942. U6BRGINV : longWord;
  5943. end;
  5944. TUART3A_U2MODE = record
  5945. private
  5946. function getABAUD : TBits_1; inline;
  5947. function getBRGH : TBits_1; inline;
  5948. function getIREN : TBits_1; inline;
  5949. function getLPBACK : TBits_1; inline;
  5950. function getON : TBits_1; inline;
  5951. function getPDSEL : TBits_2; inline;
  5952. function getPDSEL0 : TBits_1; inline;
  5953. function getPDSEL1 : TBits_1; inline;
  5954. function getRTSMD : TBits_1; inline;
  5955. function getRXINV : TBits_1; inline;
  5956. function getSIDL : TBits_1; inline;
  5957. function getSTSEL : TBits_1; inline;
  5958. function getUARTEN : TBits_1; inline;
  5959. function getUEN : TBits_2; inline;
  5960. function getUEN0 : TBits_1; inline;
  5961. function getUEN1 : TBits_1; inline;
  5962. function getUSIDL : TBits_1; inline;
  5963. function getWAKE : TBits_1; inline;
  5964. function getw : TBits_32; inline;
  5965. procedure setABAUD(thebits : TBits_1); inline;
  5966. procedure setBRGH(thebits : TBits_1); inline;
  5967. procedure setIREN(thebits : TBits_1); inline;
  5968. procedure setLPBACK(thebits : TBits_1); inline;
  5969. procedure setON(thebits : TBits_1); inline;
  5970. procedure setPDSEL(thebits : TBits_2); inline;
  5971. procedure setPDSEL0(thebits : TBits_1); inline;
  5972. procedure setPDSEL1(thebits : TBits_1); inline;
  5973. procedure setRTSMD(thebits : TBits_1); inline;
  5974. procedure setRXINV(thebits : TBits_1); inline;
  5975. procedure setSIDL(thebits : TBits_1); inline;
  5976. procedure setSTSEL(thebits : TBits_1); inline;
  5977. procedure setUARTEN(thebits : TBits_1); inline;
  5978. procedure setUEN(thebits : TBits_2); inline;
  5979. procedure setUEN0(thebits : TBits_1); inline;
  5980. procedure setUEN1(thebits : TBits_1); inline;
  5981. procedure setUSIDL(thebits : TBits_1); inline;
  5982. procedure setWAKE(thebits : TBits_1); inline;
  5983. procedure setw(thebits : TBits_32); inline;
  5984. public
  5985. procedure clearABAUD; inline;
  5986. procedure clearBRGH; inline;
  5987. procedure clearIREN; inline;
  5988. procedure clearLPBACK; inline;
  5989. procedure clearON; inline;
  5990. procedure clearPDSEL0; inline;
  5991. procedure clearPDSEL1; inline;
  5992. procedure clearRTSMD; inline;
  5993. procedure clearRXINV; inline;
  5994. procedure clearSIDL; inline;
  5995. procedure clearSTSEL; inline;
  5996. procedure clearUARTEN; inline;
  5997. procedure clearUEN0; inline;
  5998. procedure clearUEN1; inline;
  5999. procedure clearUSIDL; inline;
  6000. procedure clearWAKE; inline;
  6001. procedure setABAUD; inline;
  6002. procedure setBRGH; inline;
  6003. procedure setIREN; inline;
  6004. procedure setLPBACK; inline;
  6005. procedure setON; inline;
  6006. procedure setPDSEL0; inline;
  6007. procedure setPDSEL1; inline;
  6008. procedure setRTSMD; inline;
  6009. procedure setRXINV; inline;
  6010. procedure setSIDL; inline;
  6011. procedure setSTSEL; inline;
  6012. procedure setUARTEN; inline;
  6013. procedure setUEN0; inline;
  6014. procedure setUEN1; inline;
  6015. procedure setUSIDL; inline;
  6016. procedure setWAKE; inline;
  6017. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6018. property BRGH : TBits_1 read getBRGH write setBRGH;
  6019. property IREN : TBits_1 read getIREN write setIREN;
  6020. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6021. property ON : TBits_1 read getON write setON;
  6022. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6023. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6024. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6025. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  6026. property RXINV : TBits_1 read getRXINV write setRXINV;
  6027. property SIDL : TBits_1 read getSIDL write setSIDL;
  6028. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6029. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6030. property UEN : TBits_2 read getUEN write setUEN;
  6031. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  6032. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  6033. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6034. property WAKE : TBits_1 read getWAKE write setWAKE;
  6035. property w : TBits_32 read getw write setw;
  6036. end;
  6037. TUART3A_U3AMODE = record
  6038. private
  6039. function getABAUD : TBits_1; inline;
  6040. function getBRGH : TBits_1; inline;
  6041. function getIREN : TBits_1; inline;
  6042. function getLPBACK : TBits_1; inline;
  6043. function getON : TBits_1; inline;
  6044. function getPDSEL : TBits_2; inline;
  6045. function getPDSEL0 : TBits_1; inline;
  6046. function getPDSEL1 : TBits_1; inline;
  6047. function getRTSMD : TBits_1; inline;
  6048. function getRXINV : TBits_1; inline;
  6049. function getSIDL : TBits_1; inline;
  6050. function getSTSEL : TBits_1; inline;
  6051. function getUARTEN : TBits_1; inline;
  6052. function getUEN : TBits_2; inline;
  6053. function getUEN0 : TBits_1; inline;
  6054. function getUEN1 : TBits_1; inline;
  6055. function getUSIDL : TBits_1; inline;
  6056. function getWAKE : TBits_1; inline;
  6057. function getw : TBits_32; inline;
  6058. procedure setABAUD(thebits : TBits_1); inline;
  6059. procedure setBRGH(thebits : TBits_1); inline;
  6060. procedure setIREN(thebits : TBits_1); inline;
  6061. procedure setLPBACK(thebits : TBits_1); inline;
  6062. procedure setON(thebits : TBits_1); inline;
  6063. procedure setPDSEL(thebits : TBits_2); inline;
  6064. procedure setPDSEL0(thebits : TBits_1); inline;
  6065. procedure setPDSEL1(thebits : TBits_1); inline;
  6066. procedure setRTSMD(thebits : TBits_1); inline;
  6067. procedure setRXINV(thebits : TBits_1); inline;
  6068. procedure setSIDL(thebits : TBits_1); inline;
  6069. procedure setSTSEL(thebits : TBits_1); inline;
  6070. procedure setUARTEN(thebits : TBits_1); inline;
  6071. procedure setUEN(thebits : TBits_2); inline;
  6072. procedure setUEN0(thebits : TBits_1); inline;
  6073. procedure setUEN1(thebits : TBits_1); inline;
  6074. procedure setUSIDL(thebits : TBits_1); inline;
  6075. procedure setWAKE(thebits : TBits_1); inline;
  6076. procedure setw(thebits : TBits_32); inline;
  6077. public
  6078. procedure clearABAUD; inline;
  6079. procedure clearBRGH; inline;
  6080. procedure clearIREN; inline;
  6081. procedure clearLPBACK; inline;
  6082. procedure clearON; inline;
  6083. procedure clearPDSEL0; inline;
  6084. procedure clearPDSEL1; inline;
  6085. procedure clearRTSMD; inline;
  6086. procedure clearRXINV; inline;
  6087. procedure clearSIDL; inline;
  6088. procedure clearSTSEL; inline;
  6089. procedure clearUARTEN; inline;
  6090. procedure clearUEN0; inline;
  6091. procedure clearUEN1; inline;
  6092. procedure clearUSIDL; inline;
  6093. procedure clearWAKE; inline;
  6094. procedure setABAUD; inline;
  6095. procedure setBRGH; inline;
  6096. procedure setIREN; inline;
  6097. procedure setLPBACK; inline;
  6098. procedure setON; inline;
  6099. procedure setPDSEL0; inline;
  6100. procedure setPDSEL1; inline;
  6101. procedure setRTSMD; inline;
  6102. procedure setRXINV; inline;
  6103. procedure setSIDL; inline;
  6104. procedure setSTSEL; inline;
  6105. procedure setUARTEN; inline;
  6106. procedure setUEN0; inline;
  6107. procedure setUEN1; inline;
  6108. procedure setUSIDL; inline;
  6109. procedure setWAKE; inline;
  6110. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6111. property BRGH : TBits_1 read getBRGH write setBRGH;
  6112. property IREN : TBits_1 read getIREN write setIREN;
  6113. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6114. property ON : TBits_1 read getON write setON;
  6115. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6116. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6117. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6118. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  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 UEN : TBits_2 read getUEN write setUEN;
  6124. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  6125. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  6126. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6127. property WAKE : TBits_1 read getWAKE write setWAKE;
  6128. property w : TBits_32 read getw write setw;
  6129. end;
  6130. TUART3A_U2STA = record
  6131. private
  6132. function getADDEN : TBits_1; inline;
  6133. function getADDR : TBits_8; inline;
  6134. function getADM_EN : TBits_1; inline;
  6135. function getFERR : TBits_1; inline;
  6136. function getOERR : TBits_1; inline;
  6137. function getPERR : TBits_1; inline;
  6138. function getRIDLE : TBits_1; inline;
  6139. function getTRMT : TBits_1; inline;
  6140. function getURXDA : TBits_1; inline;
  6141. function getURXEN : TBits_1; inline;
  6142. function getURXISEL : TBits_2; inline;
  6143. function getURXISEL0 : TBits_1; inline;
  6144. function getURXISEL1 : TBits_1; inline;
  6145. function getUTXBF : TBits_1; inline;
  6146. function getUTXBRK : TBits_1; inline;
  6147. function getUTXEN : TBits_1; inline;
  6148. function getUTXINV : TBits_1; inline;
  6149. function getUTXISEL : TBits_2; inline;
  6150. function getUTXISEL0 : TBits_1; inline;
  6151. function getUTXISEL1 : TBits_1; inline;
  6152. function getUTXSEL : TBits_2; inline;
  6153. function getw : TBits_32; inline;
  6154. procedure setADDEN(thebits : TBits_1); inline;
  6155. procedure setADDR(thebits : TBits_8); inline;
  6156. procedure setADM_EN(thebits : TBits_1); inline;
  6157. procedure setFERR(thebits : TBits_1); inline;
  6158. procedure setOERR(thebits : TBits_1); inline;
  6159. procedure setPERR(thebits : TBits_1); inline;
  6160. procedure setRIDLE(thebits : TBits_1); inline;
  6161. procedure setTRMT(thebits : TBits_1); inline;
  6162. procedure setURXDA(thebits : TBits_1); inline;
  6163. procedure setURXEN(thebits : TBits_1); inline;
  6164. procedure setURXISEL(thebits : TBits_2); inline;
  6165. procedure setURXISEL0(thebits : TBits_1); inline;
  6166. procedure setURXISEL1(thebits : TBits_1); inline;
  6167. procedure setUTXBF(thebits : TBits_1); inline;
  6168. procedure setUTXBRK(thebits : TBits_1); inline;
  6169. procedure setUTXEN(thebits : TBits_1); inline;
  6170. procedure setUTXINV(thebits : TBits_1); inline;
  6171. procedure setUTXISEL(thebits : TBits_2); inline;
  6172. procedure setUTXISEL0(thebits : TBits_1); inline;
  6173. procedure setUTXISEL1(thebits : TBits_1); inline;
  6174. procedure setUTXSEL(thebits : TBits_2); inline;
  6175. procedure setw(thebits : TBits_32); inline;
  6176. public
  6177. procedure clearADDEN; inline;
  6178. procedure clearADM_EN; inline;
  6179. procedure clearFERR; inline;
  6180. procedure clearOERR; inline;
  6181. procedure clearPERR; inline;
  6182. procedure clearRIDLE; inline;
  6183. procedure clearTRMT; inline;
  6184. procedure clearURXDA; inline;
  6185. procedure clearURXEN; inline;
  6186. procedure clearURXISEL0; inline;
  6187. procedure clearURXISEL1; inline;
  6188. procedure clearUTXBF; inline;
  6189. procedure clearUTXBRK; inline;
  6190. procedure clearUTXEN; inline;
  6191. procedure clearUTXINV; inline;
  6192. procedure clearUTXISEL0; inline;
  6193. procedure clearUTXISEL1; inline;
  6194. procedure setADDEN; inline;
  6195. procedure setADM_EN; inline;
  6196. procedure setFERR; inline;
  6197. procedure setOERR; inline;
  6198. procedure setPERR; inline;
  6199. procedure setRIDLE; inline;
  6200. procedure setTRMT; inline;
  6201. procedure setURXDA; inline;
  6202. procedure setURXEN; inline;
  6203. procedure setURXISEL0; inline;
  6204. procedure setURXISEL1; inline;
  6205. procedure setUTXBF; inline;
  6206. procedure setUTXBRK; inline;
  6207. procedure setUTXEN; inline;
  6208. procedure setUTXINV; inline;
  6209. procedure setUTXISEL0; inline;
  6210. procedure setUTXISEL1; inline;
  6211. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6212. property ADDR : TBits_8 read getADDR write setADDR;
  6213. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6214. property FERR : TBits_1 read getFERR write setFERR;
  6215. property OERR : TBits_1 read getOERR write setOERR;
  6216. property PERR : TBits_1 read getPERR write setPERR;
  6217. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6218. property TRMT : TBits_1 read getTRMT write setTRMT;
  6219. property URXDA : TBits_1 read getURXDA write setURXDA;
  6220. property URXEN : TBits_1 read getURXEN write setURXEN;
  6221. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6222. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6223. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6224. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6225. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6226. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6227. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6228. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6229. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6230. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6231. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6232. property w : TBits_32 read getw write setw;
  6233. end;
  6234. TUART3A_U3ASTA = record
  6235. private
  6236. function getADDEN : TBits_1; inline;
  6237. function getADDR : TBits_8; inline;
  6238. function getADM_EN : TBits_1; inline;
  6239. function getFERR : TBits_1; inline;
  6240. function getOERR : TBits_1; inline;
  6241. function getPERR : TBits_1; inline;
  6242. function getRIDLE : TBits_1; inline;
  6243. function getTRMT : TBits_1; inline;
  6244. function getURXDA : TBits_1; inline;
  6245. function getURXEN : TBits_1; inline;
  6246. function getURXISEL : TBits_2; inline;
  6247. function getURXISEL0 : TBits_1; inline;
  6248. function getURXISEL1 : TBits_1; inline;
  6249. function getUTXBF : TBits_1; inline;
  6250. function getUTXBRK : TBits_1; inline;
  6251. function getUTXEN : TBits_1; inline;
  6252. function getUTXINV : TBits_1; inline;
  6253. function getUTXISEL : TBits_2; inline;
  6254. function getUTXISEL0 : TBits_1; inline;
  6255. function getUTXISEL1 : TBits_1; inline;
  6256. function getUTXSEL : TBits_2; inline;
  6257. function getw : TBits_32; inline;
  6258. procedure setADDEN(thebits : TBits_1); inline;
  6259. procedure setADDR(thebits : TBits_8); inline;
  6260. procedure setADM_EN(thebits : TBits_1); inline;
  6261. procedure setFERR(thebits : TBits_1); inline;
  6262. procedure setOERR(thebits : TBits_1); inline;
  6263. procedure setPERR(thebits : TBits_1); inline;
  6264. procedure setRIDLE(thebits : TBits_1); inline;
  6265. procedure setTRMT(thebits : TBits_1); inline;
  6266. procedure setURXDA(thebits : TBits_1); inline;
  6267. procedure setURXEN(thebits : TBits_1); inline;
  6268. procedure setURXISEL(thebits : TBits_2); inline;
  6269. procedure setURXISEL0(thebits : TBits_1); inline;
  6270. procedure setURXISEL1(thebits : TBits_1); inline;
  6271. procedure setUTXBF(thebits : TBits_1); inline;
  6272. procedure setUTXBRK(thebits : TBits_1); inline;
  6273. procedure setUTXEN(thebits : TBits_1); inline;
  6274. procedure setUTXINV(thebits : TBits_1); inline;
  6275. procedure setUTXISEL(thebits : TBits_2); inline;
  6276. procedure setUTXISEL0(thebits : TBits_1); inline;
  6277. procedure setUTXISEL1(thebits : TBits_1); inline;
  6278. procedure setUTXSEL(thebits : TBits_2); inline;
  6279. procedure setw(thebits : TBits_32); inline;
  6280. public
  6281. procedure clearADDEN; inline;
  6282. procedure clearADM_EN; inline;
  6283. procedure clearFERR; inline;
  6284. procedure clearOERR; inline;
  6285. procedure clearPERR; inline;
  6286. procedure clearRIDLE; inline;
  6287. procedure clearTRMT; inline;
  6288. procedure clearURXDA; inline;
  6289. procedure clearURXEN; inline;
  6290. procedure clearURXISEL0; inline;
  6291. procedure clearURXISEL1; inline;
  6292. procedure clearUTXBF; inline;
  6293. procedure clearUTXBRK; inline;
  6294. procedure clearUTXEN; inline;
  6295. procedure clearUTXINV; inline;
  6296. procedure clearUTXISEL0; inline;
  6297. procedure clearUTXISEL1; inline;
  6298. procedure setADDEN; inline;
  6299. procedure setADM_EN; inline;
  6300. procedure setFERR; inline;
  6301. procedure setOERR; inline;
  6302. procedure setPERR; inline;
  6303. procedure setRIDLE; inline;
  6304. procedure setTRMT; inline;
  6305. procedure setURXDA; inline;
  6306. procedure setURXEN; inline;
  6307. procedure setURXISEL0; inline;
  6308. procedure setURXISEL1; inline;
  6309. procedure setUTXBF; inline;
  6310. procedure setUTXBRK; inline;
  6311. procedure setUTXEN; inline;
  6312. procedure setUTXINV; inline;
  6313. procedure setUTXISEL0; inline;
  6314. procedure setUTXISEL1; inline;
  6315. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6316. property ADDR : TBits_8 read getADDR write setADDR;
  6317. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6318. property FERR : TBits_1 read getFERR write setFERR;
  6319. property OERR : TBits_1 read getOERR write setOERR;
  6320. property PERR : TBits_1 read getPERR write setPERR;
  6321. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6322. property TRMT : TBits_1 read getTRMT write setTRMT;
  6323. property URXDA : TBits_1 read getURXDA write setURXDA;
  6324. property URXEN : TBits_1 read getURXEN write setURXEN;
  6325. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6326. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6327. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6328. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6329. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6330. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6331. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6332. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6333. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6334. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6335. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6336. property w : TBits_32 read getw write setw;
  6337. end;
  6338. type
  6339. TUART3ARegisters = record
  6340. U2MODEbits : TUART3A_U2MODE;
  6341. U2MODE : longWord;
  6342. U3AMODEbits : TUART3A_U3AMODE;
  6343. U3AMODE : longWord;
  6344. U2MODECLR : longWord;
  6345. U3AMODECLR : longWord;
  6346. U2MODESET : longWord;
  6347. U3AMODESET : longWord;
  6348. U2MODEINV : longWord;
  6349. U3AMODEINV : longWord;
  6350. U2STAbits : TUART3A_U2STA;
  6351. U2STA : longWord;
  6352. U3ASTAbits : TUART3A_U3ASTA;
  6353. U3ASTA : longWord;
  6354. U2STACLR : longWord;
  6355. U3ASTACLR : longWord;
  6356. U2STASET : longWord;
  6357. U3ASTASET : longWord;
  6358. U2STAINV : longWord;
  6359. U3ASTAINV : longWord;
  6360. U2TXREG : longWord;
  6361. U3ATXREG : longWord;
  6362. U2RXREG : longWord;
  6363. U3ARXREG : longWord;
  6364. U2BRG : longWord;
  6365. U3ABRG : longWord;
  6366. U2BRGCLR : longWord;
  6367. U3ABRGCLR : longWord;
  6368. U2BRGSET : longWord;
  6369. U3ABRGSET : longWord;
  6370. U2BRGINV : longWord;
  6371. U3ABRGINV : longWord;
  6372. end;
  6373. TUART5_U3BMODE = record
  6374. private
  6375. function getABAUD : TBits_1; inline;
  6376. function getBRGH : TBits_1; inline;
  6377. function getIREN : TBits_1; inline;
  6378. function getLPBACK : TBits_1; inline;
  6379. function getON : TBits_1; inline;
  6380. function getPDSEL : TBits_2; inline;
  6381. function getPDSEL0 : TBits_1; inline;
  6382. function getPDSEL1 : TBits_1; inline;
  6383. function getRXINV : TBits_1; inline;
  6384. function getSIDL : TBits_1; inline;
  6385. function getSTSEL : TBits_1; inline;
  6386. function getUARTEN : TBits_1; inline;
  6387. function getUSIDL : TBits_1; inline;
  6388. function getWAKE : TBits_1; inline;
  6389. function getw : TBits_32; inline;
  6390. procedure setABAUD(thebits : TBits_1); inline;
  6391. procedure setBRGH(thebits : TBits_1); inline;
  6392. procedure setIREN(thebits : TBits_1); inline;
  6393. procedure setLPBACK(thebits : TBits_1); inline;
  6394. procedure setON(thebits : TBits_1); inline;
  6395. procedure setPDSEL(thebits : TBits_2); inline;
  6396. procedure setPDSEL0(thebits : TBits_1); inline;
  6397. procedure setPDSEL1(thebits : TBits_1); inline;
  6398. procedure setRXINV(thebits : TBits_1); inline;
  6399. procedure setSIDL(thebits : TBits_1); inline;
  6400. procedure setSTSEL(thebits : TBits_1); inline;
  6401. procedure setUARTEN(thebits : TBits_1); inline;
  6402. procedure setUSIDL(thebits : TBits_1); inline;
  6403. procedure setWAKE(thebits : TBits_1); inline;
  6404. procedure setw(thebits : TBits_32); inline;
  6405. public
  6406. procedure clearABAUD; inline;
  6407. procedure clearBRGH; inline;
  6408. procedure clearIREN; inline;
  6409. procedure clearLPBACK; inline;
  6410. procedure clearON; inline;
  6411. procedure clearPDSEL0; inline;
  6412. procedure clearPDSEL1; inline;
  6413. procedure clearRXINV; inline;
  6414. procedure clearSIDL; inline;
  6415. procedure clearSTSEL; inline;
  6416. procedure clearUARTEN; inline;
  6417. procedure clearUSIDL; inline;
  6418. procedure clearWAKE; inline;
  6419. procedure setABAUD; inline;
  6420. procedure setBRGH; inline;
  6421. procedure setIREN; inline;
  6422. procedure setLPBACK; inline;
  6423. procedure setON; inline;
  6424. procedure setPDSEL0; inline;
  6425. procedure setPDSEL1; inline;
  6426. procedure setRXINV; inline;
  6427. procedure setSIDL; inline;
  6428. procedure setSTSEL; inline;
  6429. procedure setUARTEN; inline;
  6430. procedure setUSIDL; inline;
  6431. procedure setWAKE; inline;
  6432. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6433. property BRGH : TBits_1 read getBRGH write setBRGH;
  6434. property IREN : TBits_1 read getIREN write setIREN;
  6435. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6436. property ON : TBits_1 read getON write setON;
  6437. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6438. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6439. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6440. property RXINV : TBits_1 read getRXINV write setRXINV;
  6441. property SIDL : TBits_1 read getSIDL write setSIDL;
  6442. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6443. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6444. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6445. property WAKE : TBits_1 read getWAKE write setWAKE;
  6446. property w : TBits_32 read getw write setw;
  6447. end;
  6448. TUART5_U5MODE = record
  6449. private
  6450. function getABAUD : TBits_1; inline;
  6451. function getBRGH : TBits_1; inline;
  6452. function getIREN : TBits_1; inline;
  6453. function getLPBACK : TBits_1; inline;
  6454. function getON : TBits_1; inline;
  6455. function getPDSEL : TBits_2; inline;
  6456. function getPDSEL0 : TBits_1; inline;
  6457. function getPDSEL1 : TBits_1; inline;
  6458. function getRXINV : TBits_1; inline;
  6459. function getSIDL : TBits_1; inline;
  6460. function getSTSEL : TBits_1; inline;
  6461. function getUARTEN : TBits_1; inline;
  6462. function getUSIDL : TBits_1; inline;
  6463. function getWAKE : TBits_1; inline;
  6464. function getw : TBits_32; inline;
  6465. procedure setABAUD(thebits : TBits_1); inline;
  6466. procedure setBRGH(thebits : TBits_1); inline;
  6467. procedure setIREN(thebits : TBits_1); inline;
  6468. procedure setLPBACK(thebits : TBits_1); inline;
  6469. procedure setON(thebits : TBits_1); inline;
  6470. procedure setPDSEL(thebits : TBits_2); inline;
  6471. procedure setPDSEL0(thebits : TBits_1); inline;
  6472. procedure setPDSEL1(thebits : TBits_1); inline;
  6473. procedure setRXINV(thebits : TBits_1); inline;
  6474. procedure setSIDL(thebits : TBits_1); inline;
  6475. procedure setSTSEL(thebits : TBits_1); inline;
  6476. procedure setUARTEN(thebits : TBits_1); inline;
  6477. procedure setUSIDL(thebits : TBits_1); inline;
  6478. procedure setWAKE(thebits : TBits_1); inline;
  6479. procedure setw(thebits : TBits_32); inline;
  6480. public
  6481. procedure clearABAUD; inline;
  6482. procedure clearBRGH; inline;
  6483. procedure clearIREN; inline;
  6484. procedure clearLPBACK; inline;
  6485. procedure clearON; inline;
  6486. procedure clearPDSEL0; inline;
  6487. procedure clearPDSEL1; inline;
  6488. procedure clearRXINV; inline;
  6489. procedure clearSIDL; inline;
  6490. procedure clearSTSEL; inline;
  6491. procedure clearUARTEN; inline;
  6492. procedure clearUSIDL; inline;
  6493. procedure clearWAKE; inline;
  6494. procedure setABAUD; inline;
  6495. procedure setBRGH; inline;
  6496. procedure setIREN; inline;
  6497. procedure setLPBACK; inline;
  6498. procedure setON; inline;
  6499. procedure setPDSEL0; inline;
  6500. procedure setPDSEL1; inline;
  6501. procedure setRXINV; inline;
  6502. procedure setSIDL; inline;
  6503. procedure setSTSEL; inline;
  6504. procedure setUARTEN; inline;
  6505. procedure setUSIDL; inline;
  6506. procedure setWAKE; inline;
  6507. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6508. property BRGH : TBits_1 read getBRGH write setBRGH;
  6509. property IREN : TBits_1 read getIREN write setIREN;
  6510. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6511. property ON : TBits_1 read getON write setON;
  6512. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6513. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6514. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6515. property RXINV : TBits_1 read getRXINV write setRXINV;
  6516. property SIDL : TBits_1 read getSIDL write setSIDL;
  6517. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6518. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6519. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6520. property WAKE : TBits_1 read getWAKE write setWAKE;
  6521. property w : TBits_32 read getw write setw;
  6522. end;
  6523. TUART5_U3BSTA = record
  6524. private
  6525. function getADDEN : TBits_1; inline;
  6526. function getADDR : TBits_8; inline;
  6527. function getADM_EN : TBits_1; inline;
  6528. function getFERR : TBits_1; inline;
  6529. function getOERR : TBits_1; inline;
  6530. function getPERR : TBits_1; inline;
  6531. function getRIDLE : TBits_1; inline;
  6532. function getTRMT : TBits_1; inline;
  6533. function getURXDA : TBits_1; inline;
  6534. function getURXEN : TBits_1; inline;
  6535. function getURXISEL : TBits_2; inline;
  6536. function getURXISEL0 : TBits_1; inline;
  6537. function getURXISEL1 : TBits_1; inline;
  6538. function getUTXBF : TBits_1; inline;
  6539. function getUTXBRK : TBits_1; inline;
  6540. function getUTXEN : TBits_1; inline;
  6541. function getUTXINV : TBits_1; inline;
  6542. function getUTXISEL : TBits_2; inline;
  6543. function getUTXISEL0 : TBits_1; inline;
  6544. function getUTXISEL1 : TBits_1; inline;
  6545. function getUTXSEL : TBits_2; inline;
  6546. function getw : TBits_32; inline;
  6547. procedure setADDEN(thebits : TBits_1); inline;
  6548. procedure setADDR(thebits : TBits_8); inline;
  6549. procedure setADM_EN(thebits : TBits_1); inline;
  6550. procedure setFERR(thebits : TBits_1); inline;
  6551. procedure setOERR(thebits : TBits_1); inline;
  6552. procedure setPERR(thebits : TBits_1); inline;
  6553. procedure setRIDLE(thebits : TBits_1); inline;
  6554. procedure setTRMT(thebits : TBits_1); inline;
  6555. procedure setURXDA(thebits : TBits_1); inline;
  6556. procedure setURXEN(thebits : TBits_1); inline;
  6557. procedure setURXISEL(thebits : TBits_2); inline;
  6558. procedure setURXISEL0(thebits : TBits_1); inline;
  6559. procedure setURXISEL1(thebits : TBits_1); inline;
  6560. procedure setUTXBF(thebits : TBits_1); inline;
  6561. procedure setUTXBRK(thebits : TBits_1); inline;
  6562. procedure setUTXEN(thebits : TBits_1); inline;
  6563. procedure setUTXINV(thebits : TBits_1); inline;
  6564. procedure setUTXISEL(thebits : TBits_2); inline;
  6565. procedure setUTXISEL0(thebits : TBits_1); inline;
  6566. procedure setUTXISEL1(thebits : TBits_1); inline;
  6567. procedure setUTXSEL(thebits : TBits_2); inline;
  6568. procedure setw(thebits : TBits_32); inline;
  6569. public
  6570. procedure clearADDEN; inline;
  6571. procedure clearADM_EN; inline;
  6572. procedure clearFERR; inline;
  6573. procedure clearOERR; inline;
  6574. procedure clearPERR; inline;
  6575. procedure clearRIDLE; inline;
  6576. procedure clearTRMT; inline;
  6577. procedure clearURXDA; inline;
  6578. procedure clearURXEN; inline;
  6579. procedure clearURXISEL0; inline;
  6580. procedure clearURXISEL1; inline;
  6581. procedure clearUTXBF; inline;
  6582. procedure clearUTXBRK; inline;
  6583. procedure clearUTXEN; inline;
  6584. procedure clearUTXINV; inline;
  6585. procedure clearUTXISEL0; inline;
  6586. procedure clearUTXISEL1; inline;
  6587. procedure setADDEN; inline;
  6588. procedure setADM_EN; inline;
  6589. procedure setFERR; inline;
  6590. procedure setOERR; inline;
  6591. procedure setPERR; inline;
  6592. procedure setRIDLE; inline;
  6593. procedure setTRMT; inline;
  6594. procedure setURXDA; inline;
  6595. procedure setURXEN; inline;
  6596. procedure setURXISEL0; inline;
  6597. procedure setURXISEL1; inline;
  6598. procedure setUTXBF; inline;
  6599. procedure setUTXBRK; inline;
  6600. procedure setUTXEN; inline;
  6601. procedure setUTXINV; inline;
  6602. procedure setUTXISEL0; inline;
  6603. procedure setUTXISEL1; inline;
  6604. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6605. property ADDR : TBits_8 read getADDR write setADDR;
  6606. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6607. property FERR : TBits_1 read getFERR write setFERR;
  6608. property OERR : TBits_1 read getOERR write setOERR;
  6609. property PERR : TBits_1 read getPERR write setPERR;
  6610. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6611. property TRMT : TBits_1 read getTRMT write setTRMT;
  6612. property URXDA : TBits_1 read getURXDA write setURXDA;
  6613. property URXEN : TBits_1 read getURXEN write setURXEN;
  6614. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6615. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6616. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6617. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6618. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6619. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6620. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6621. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6622. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6623. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6624. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6625. property w : TBits_32 read getw write setw;
  6626. end;
  6627. TUART5_U5STA = record
  6628. private
  6629. function getADDEN : TBits_1; inline;
  6630. function getADDR : TBits_8; inline;
  6631. function getADM_EN : TBits_1; inline;
  6632. function getFERR : TBits_1; inline;
  6633. function getOERR : TBits_1; inline;
  6634. function getPERR : TBits_1; inline;
  6635. function getRIDLE : TBits_1; inline;
  6636. function getTRMT : TBits_1; inline;
  6637. function getURXDA : TBits_1; inline;
  6638. function getURXEN : TBits_1; inline;
  6639. function getURXISEL : TBits_2; inline;
  6640. function getURXISEL0 : TBits_1; inline;
  6641. function getURXISEL1 : TBits_1; inline;
  6642. function getUTXBF : TBits_1; inline;
  6643. function getUTXBRK : TBits_1; inline;
  6644. function getUTXEN : TBits_1; inline;
  6645. function getUTXINV : TBits_1; inline;
  6646. function getUTXISEL : TBits_2; inline;
  6647. function getUTXISEL0 : TBits_1; inline;
  6648. function getUTXISEL1 : TBits_1; inline;
  6649. function getUTXSEL : TBits_2; inline;
  6650. function getw : TBits_32; inline;
  6651. procedure setADDEN(thebits : TBits_1); inline;
  6652. procedure setADDR(thebits : TBits_8); inline;
  6653. procedure setADM_EN(thebits : TBits_1); inline;
  6654. procedure setFERR(thebits : TBits_1); inline;
  6655. procedure setOERR(thebits : TBits_1); inline;
  6656. procedure setPERR(thebits : TBits_1); inline;
  6657. procedure setRIDLE(thebits : TBits_1); inline;
  6658. procedure setTRMT(thebits : TBits_1); inline;
  6659. procedure setURXDA(thebits : TBits_1); inline;
  6660. procedure setURXEN(thebits : TBits_1); inline;
  6661. procedure setURXISEL(thebits : TBits_2); inline;
  6662. procedure setURXISEL0(thebits : TBits_1); inline;
  6663. procedure setURXISEL1(thebits : TBits_1); inline;
  6664. procedure setUTXBF(thebits : TBits_1); inline;
  6665. procedure setUTXBRK(thebits : TBits_1); inline;
  6666. procedure setUTXEN(thebits : TBits_1); inline;
  6667. procedure setUTXINV(thebits : TBits_1); inline;
  6668. procedure setUTXISEL(thebits : TBits_2); inline;
  6669. procedure setUTXISEL0(thebits : TBits_1); inline;
  6670. procedure setUTXISEL1(thebits : TBits_1); inline;
  6671. procedure setUTXSEL(thebits : TBits_2); inline;
  6672. procedure setw(thebits : TBits_32); inline;
  6673. public
  6674. procedure clearADDEN; inline;
  6675. procedure clearADM_EN; inline;
  6676. procedure clearFERR; inline;
  6677. procedure clearOERR; inline;
  6678. procedure clearPERR; inline;
  6679. procedure clearRIDLE; inline;
  6680. procedure clearTRMT; inline;
  6681. procedure clearURXDA; inline;
  6682. procedure clearURXEN; inline;
  6683. procedure clearURXISEL0; inline;
  6684. procedure clearURXISEL1; inline;
  6685. procedure clearUTXBF; inline;
  6686. procedure clearUTXBRK; inline;
  6687. procedure clearUTXEN; inline;
  6688. procedure clearUTXINV; inline;
  6689. procedure clearUTXISEL0; inline;
  6690. procedure clearUTXISEL1; inline;
  6691. procedure setADDEN; inline;
  6692. procedure setADM_EN; inline;
  6693. procedure setFERR; inline;
  6694. procedure setOERR; inline;
  6695. procedure setPERR; inline;
  6696. procedure setRIDLE; inline;
  6697. procedure setTRMT; inline;
  6698. procedure setURXDA; inline;
  6699. procedure setURXEN; inline;
  6700. procedure setURXISEL0; inline;
  6701. procedure setURXISEL1; inline;
  6702. procedure setUTXBF; inline;
  6703. procedure setUTXBRK; inline;
  6704. procedure setUTXEN; inline;
  6705. procedure setUTXINV; inline;
  6706. procedure setUTXISEL0; inline;
  6707. procedure setUTXISEL1; inline;
  6708. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6709. property ADDR : TBits_8 read getADDR write setADDR;
  6710. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6711. property FERR : TBits_1 read getFERR write setFERR;
  6712. property OERR : TBits_1 read getOERR write setOERR;
  6713. property PERR : TBits_1 read getPERR write setPERR;
  6714. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6715. property TRMT : TBits_1 read getTRMT write setTRMT;
  6716. property URXDA : TBits_1 read getURXDA write setURXDA;
  6717. property URXEN : TBits_1 read getURXEN write setURXEN;
  6718. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6719. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6720. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6721. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6722. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6723. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6724. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6725. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6726. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6727. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6728. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6729. property w : TBits_32 read getw write setw;
  6730. end;
  6731. type
  6732. TUART5Registers = record
  6733. U3BMODEbits : TUART5_U3BMODE;
  6734. U3BMODE : longWord;
  6735. U5MODEbits : TUART5_U5MODE;
  6736. U5MODE : longWord;
  6737. U3BMODECLR : longWord;
  6738. U5MODECLR : longWord;
  6739. U3BMODESET : longWord;
  6740. U5MODESET : longWord;
  6741. U3BMODEINV : longWord;
  6742. U5MODEINV : longWord;
  6743. U3BSTAbits : TUART5_U3BSTA;
  6744. U3BSTA : longWord;
  6745. U5STAbits : TUART5_U5STA;
  6746. U5STA : longWord;
  6747. U3BSTACLR : longWord;
  6748. U5STACLR : longWord;
  6749. U3BSTASET : longWord;
  6750. U5STASET : longWord;
  6751. U3BSTAINV : longWord;
  6752. U5STAINV : longWord;
  6753. U3BTXREG : longWord;
  6754. U5TXREG : longWord;
  6755. U3BRXREG : longWord;
  6756. U5RXREG : longWord;
  6757. U3BBRG : longWord;
  6758. U5BRG : longWord;
  6759. U3BBRGCLR : longWord;
  6760. U5BRGCLR : longWord;
  6761. U3BBRGSET : longWord;
  6762. U5BRGSET : longWord;
  6763. U3BBRGINV : longWord;
  6764. U5BRGINV : longWord;
  6765. end;
  6766. TPMP_PMCON = record
  6767. private
  6768. function getADRMUX : TBits_2; inline;
  6769. function getADRMUX0 : TBits_1; inline;
  6770. function getADRMUX1 : TBits_1; inline;
  6771. function getALP : TBits_1; inline;
  6772. function getCS1P : TBits_1; inline;
  6773. function getCS2P : TBits_1; inline;
  6774. function getCSF : TBits_2; inline;
  6775. function getCSF0 : TBits_1; inline;
  6776. function getCSF1 : TBits_1; inline;
  6777. function getON : TBits_1; inline;
  6778. function getPMPEN : TBits_1; inline;
  6779. function getPMPTTL : TBits_1; inline;
  6780. function getPSIDL : TBits_1; inline;
  6781. function getPTRDEN : TBits_1; inline;
  6782. function getPTWREN : TBits_1; inline;
  6783. function getRDSP : TBits_1; inline;
  6784. function getSIDL : TBits_1; inline;
  6785. function getWRSP : TBits_1; inline;
  6786. function getw : TBits_32; inline;
  6787. procedure setADRMUX(thebits : TBits_2); inline;
  6788. procedure setADRMUX0(thebits : TBits_1); inline;
  6789. procedure setADRMUX1(thebits : TBits_1); inline;
  6790. procedure setALP(thebits : TBits_1); inline;
  6791. procedure setCS1P(thebits : TBits_1); inline;
  6792. procedure setCS2P(thebits : TBits_1); inline;
  6793. procedure setCSF(thebits : TBits_2); inline;
  6794. procedure setCSF0(thebits : TBits_1); inline;
  6795. procedure setCSF1(thebits : TBits_1); inline;
  6796. procedure setON(thebits : TBits_1); inline;
  6797. procedure setPMPEN(thebits : TBits_1); inline;
  6798. procedure setPMPTTL(thebits : TBits_1); inline;
  6799. procedure setPSIDL(thebits : TBits_1); inline;
  6800. procedure setPTRDEN(thebits : TBits_1); inline;
  6801. procedure setPTWREN(thebits : TBits_1); inline;
  6802. procedure setRDSP(thebits : TBits_1); inline;
  6803. procedure setSIDL(thebits : TBits_1); inline;
  6804. procedure setWRSP(thebits : TBits_1); inline;
  6805. procedure setw(thebits : TBits_32); inline;
  6806. public
  6807. procedure clearADRMUX0; inline;
  6808. procedure clearADRMUX1; inline;
  6809. procedure clearALP; inline;
  6810. procedure clearCS1P; inline;
  6811. procedure clearCS2P; inline;
  6812. procedure clearCSF0; inline;
  6813. procedure clearCSF1; inline;
  6814. procedure clearON; inline;
  6815. procedure clearPMPEN; inline;
  6816. procedure clearPMPTTL; inline;
  6817. procedure clearPSIDL; inline;
  6818. procedure clearPTRDEN; inline;
  6819. procedure clearPTWREN; inline;
  6820. procedure clearRDSP; inline;
  6821. procedure clearSIDL; inline;
  6822. procedure clearWRSP; inline;
  6823. procedure setADRMUX0; inline;
  6824. procedure setADRMUX1; inline;
  6825. procedure setALP; inline;
  6826. procedure setCS1P; inline;
  6827. procedure setCS2P; inline;
  6828. procedure setCSF0; inline;
  6829. procedure setCSF1; inline;
  6830. procedure setON; inline;
  6831. procedure setPMPEN; inline;
  6832. procedure setPMPTTL; inline;
  6833. procedure setPSIDL; inline;
  6834. procedure setPTRDEN; inline;
  6835. procedure setPTWREN; inline;
  6836. procedure setRDSP; inline;
  6837. procedure setSIDL; inline;
  6838. procedure setWRSP; inline;
  6839. property ADRMUX : TBits_2 read getADRMUX write setADRMUX;
  6840. property ADRMUX0 : TBits_1 read getADRMUX0 write setADRMUX0;
  6841. property ADRMUX1 : TBits_1 read getADRMUX1 write setADRMUX1;
  6842. property ALP : TBits_1 read getALP write setALP;
  6843. property CS1P : TBits_1 read getCS1P write setCS1P;
  6844. property CS2P : TBits_1 read getCS2P write setCS2P;
  6845. property CSF : TBits_2 read getCSF write setCSF;
  6846. property CSF0 : TBits_1 read getCSF0 write setCSF0;
  6847. property CSF1 : TBits_1 read getCSF1 write setCSF1;
  6848. property ON : TBits_1 read getON write setON;
  6849. property PMPEN : TBits_1 read getPMPEN write setPMPEN;
  6850. property PMPTTL : TBits_1 read getPMPTTL write setPMPTTL;
  6851. property PSIDL : TBits_1 read getPSIDL write setPSIDL;
  6852. property PTRDEN : TBits_1 read getPTRDEN write setPTRDEN;
  6853. property PTWREN : TBits_1 read getPTWREN write setPTWREN;
  6854. property RDSP : TBits_1 read getRDSP write setRDSP;
  6855. property SIDL : TBits_1 read getSIDL write setSIDL;
  6856. property WRSP : TBits_1 read getWRSP write setWRSP;
  6857. property w : TBits_32 read getw write setw;
  6858. end;
  6859. TPMP_PMMODE = record
  6860. private
  6861. function getBUSY : TBits_1; inline;
  6862. function getINCM : TBits_2; inline;
  6863. function getINCM0 : TBits_1; inline;
  6864. function getINCM1 : TBits_1; inline;
  6865. function getIRQM : TBits_2; inline;
  6866. function getIRQM0 : TBits_1; inline;
  6867. function getIRQM1 : TBits_1; inline;
  6868. function getMODE : TBits_2; inline;
  6869. function getMODE0 : TBits_1; inline;
  6870. function getMODE1 : TBits_1; inline;
  6871. function getMODE16 : TBits_1; inline;
  6872. function getWAITB : TBits_2; inline;
  6873. function getWAITB0 : TBits_1; inline;
  6874. function getWAITB1 : TBits_1; inline;
  6875. function getWAITE : TBits_2; inline;
  6876. function getWAITE0 : TBits_1; inline;
  6877. function getWAITE1 : TBits_1; inline;
  6878. function getWAITM : TBits_4; inline;
  6879. function getWAITM0 : TBits_1; inline;
  6880. function getWAITM1 : TBits_1; inline;
  6881. function getWAITM2 : TBits_1; inline;
  6882. function getWAITM3 : TBits_1; inline;
  6883. function getw : TBits_32; inline;
  6884. procedure setBUSY(thebits : TBits_1); inline;
  6885. procedure setINCM(thebits : TBits_2); inline;
  6886. procedure setINCM0(thebits : TBits_1); inline;
  6887. procedure setINCM1(thebits : TBits_1); inline;
  6888. procedure setIRQM(thebits : TBits_2); inline;
  6889. procedure setIRQM0(thebits : TBits_1); inline;
  6890. procedure setIRQM1(thebits : TBits_1); inline;
  6891. procedure setMODE(thebits : TBits_2); inline;
  6892. procedure setMODE0(thebits : TBits_1); inline;
  6893. procedure setMODE1(thebits : TBits_1); inline;
  6894. procedure setMODE16(thebits : TBits_1); inline;
  6895. procedure setWAITB(thebits : TBits_2); inline;
  6896. procedure setWAITB0(thebits : TBits_1); inline;
  6897. procedure setWAITB1(thebits : TBits_1); inline;
  6898. procedure setWAITE(thebits : TBits_2); inline;
  6899. procedure setWAITE0(thebits : TBits_1); inline;
  6900. procedure setWAITE1(thebits : TBits_1); inline;
  6901. procedure setWAITM(thebits : TBits_4); inline;
  6902. procedure setWAITM0(thebits : TBits_1); inline;
  6903. procedure setWAITM1(thebits : TBits_1); inline;
  6904. procedure setWAITM2(thebits : TBits_1); inline;
  6905. procedure setWAITM3(thebits : TBits_1); inline;
  6906. procedure setw(thebits : TBits_32); inline;
  6907. public
  6908. procedure clearBUSY; inline;
  6909. procedure clearINCM0; inline;
  6910. procedure clearINCM1; inline;
  6911. procedure clearIRQM0; inline;
  6912. procedure clearIRQM1; inline;
  6913. procedure clearMODE0; inline;
  6914. procedure clearMODE16; inline;
  6915. procedure clearMODE1; inline;
  6916. procedure clearWAITB0; inline;
  6917. procedure clearWAITB1; inline;
  6918. procedure clearWAITE0; inline;
  6919. procedure clearWAITE1; inline;
  6920. procedure clearWAITM0; inline;
  6921. procedure clearWAITM1; inline;
  6922. procedure clearWAITM2; inline;
  6923. procedure clearWAITM3; inline;
  6924. procedure setBUSY; inline;
  6925. procedure setINCM0; inline;
  6926. procedure setINCM1; inline;
  6927. procedure setIRQM0; inline;
  6928. procedure setIRQM1; inline;
  6929. procedure setMODE0; inline;
  6930. procedure setMODE16; inline;
  6931. procedure setMODE1; inline;
  6932. procedure setWAITB0; inline;
  6933. procedure setWAITB1; inline;
  6934. procedure setWAITE0; inline;
  6935. procedure setWAITE1; inline;
  6936. procedure setWAITM0; inline;
  6937. procedure setWAITM1; inline;
  6938. procedure setWAITM2; inline;
  6939. procedure setWAITM3; inline;
  6940. property BUSY : TBits_1 read getBUSY write setBUSY;
  6941. property INCM : TBits_2 read getINCM write setINCM;
  6942. property INCM0 : TBits_1 read getINCM0 write setINCM0;
  6943. property INCM1 : TBits_1 read getINCM1 write setINCM1;
  6944. property IRQM : TBits_2 read getIRQM write setIRQM;
  6945. property IRQM0 : TBits_1 read getIRQM0 write setIRQM0;
  6946. property IRQM1 : TBits_1 read getIRQM1 write setIRQM1;
  6947. property MODE : TBits_2 read getMODE write setMODE;
  6948. property MODE0 : TBits_1 read getMODE0 write setMODE0;
  6949. property MODE1 : TBits_1 read getMODE1 write setMODE1;
  6950. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  6951. property WAITB : TBits_2 read getWAITB write setWAITB;
  6952. property WAITB0 : TBits_1 read getWAITB0 write setWAITB0;
  6953. property WAITB1 : TBits_1 read getWAITB1 write setWAITB1;
  6954. property WAITE : TBits_2 read getWAITE write setWAITE;
  6955. property WAITE0 : TBits_1 read getWAITE0 write setWAITE0;
  6956. property WAITE1 : TBits_1 read getWAITE1 write setWAITE1;
  6957. property WAITM : TBits_4 read getWAITM write setWAITM;
  6958. property WAITM0 : TBits_1 read getWAITM0 write setWAITM0;
  6959. property WAITM1 : TBits_1 read getWAITM1 write setWAITM1;
  6960. property WAITM2 : TBits_1 read getWAITM2 write setWAITM2;
  6961. property WAITM3 : TBits_1 read getWAITM3 write setWAITM3;
  6962. property w : TBits_32 read getw write setw;
  6963. end;
  6964. TPMP_PMADDR = record
  6965. private
  6966. function getADDR : TBits_14; inline;
  6967. function getCS : TBits_2; inline;
  6968. function getCS1 : TBits_1; inline;
  6969. function getCS2 : TBits_1; inline;
  6970. function getPADDR : TBits_14; inline;
  6971. function getw : TBits_32; inline;
  6972. procedure setADDR(thebits : TBits_14); inline;
  6973. procedure setCS(thebits : TBits_2); inline;
  6974. procedure setCS1(thebits : TBits_1); inline;
  6975. procedure setCS2(thebits : TBits_1); inline;
  6976. procedure setPADDR(thebits : TBits_14); inline;
  6977. procedure setw(thebits : TBits_32); inline;
  6978. public
  6979. procedure clearCS1; inline;
  6980. procedure clearCS2; inline;
  6981. procedure setCS1; inline;
  6982. procedure setCS2; inline;
  6983. property ADDR : TBits_14 read getADDR write setADDR;
  6984. property CS : TBits_2 read getCS write setCS;
  6985. property CS1 : TBits_1 read getCS1 write setCS1;
  6986. property CS2 : TBits_1 read getCS2 write setCS2;
  6987. property PADDR : TBits_14 read getPADDR write setPADDR;
  6988. property w : TBits_32 read getw write setw;
  6989. end;
  6990. TPMP_PMDOUT = record
  6991. private
  6992. function getDATAOUT : TBits_32; inline;
  6993. function getw : TBits_32; inline;
  6994. procedure setDATAOUT(thebits : TBits_32); inline;
  6995. procedure setw(thebits : TBits_32); inline;
  6996. public
  6997. property DATAOUT : TBits_32 read getDATAOUT write setDATAOUT;
  6998. property w : TBits_32 read getw write setw;
  6999. end;
  7000. TPMP_PMDIN = record
  7001. private
  7002. function getDATAIN : TBits_32; inline;
  7003. function getw : TBits_32; inline;
  7004. procedure setDATAIN(thebits : TBits_32); inline;
  7005. procedure setw(thebits : TBits_32); inline;
  7006. public
  7007. property DATAIN : TBits_32 read getDATAIN write setDATAIN;
  7008. property w : TBits_32 read getw write setw;
  7009. end;
  7010. TPMP_PMAEN = record
  7011. private
  7012. function getPTEN : TBits_16; inline;
  7013. function getPTEN0 : TBits_1; inline;
  7014. function getPTEN1 : TBits_1; inline;
  7015. function getPTEN10 : TBits_1; inline;
  7016. function getPTEN11 : TBits_1; inline;
  7017. function getPTEN12 : TBits_1; inline;
  7018. function getPTEN13 : TBits_1; inline;
  7019. function getPTEN14 : TBits_1; inline;
  7020. function getPTEN15 : TBits_1; inline;
  7021. function getPTEN2 : TBits_1; inline;
  7022. function getPTEN3 : TBits_1; inline;
  7023. function getPTEN4 : TBits_1; inline;
  7024. function getPTEN5 : TBits_1; inline;
  7025. function getPTEN6 : TBits_1; inline;
  7026. function getPTEN7 : TBits_1; inline;
  7027. function getPTEN8 : TBits_1; inline;
  7028. function getPTEN9 : TBits_1; inline;
  7029. function getw : TBits_32; inline;
  7030. procedure setPTEN(thebits : TBits_16); inline;
  7031. procedure setPTEN0(thebits : TBits_1); inline;
  7032. procedure setPTEN1(thebits : TBits_1); inline;
  7033. procedure setPTEN10(thebits : TBits_1); inline;
  7034. procedure setPTEN11(thebits : TBits_1); inline;
  7035. procedure setPTEN12(thebits : TBits_1); inline;
  7036. procedure setPTEN13(thebits : TBits_1); inline;
  7037. procedure setPTEN14(thebits : TBits_1); inline;
  7038. procedure setPTEN15(thebits : TBits_1); inline;
  7039. procedure setPTEN2(thebits : TBits_1); inline;
  7040. procedure setPTEN3(thebits : TBits_1); inline;
  7041. procedure setPTEN4(thebits : TBits_1); inline;
  7042. procedure setPTEN5(thebits : TBits_1); inline;
  7043. procedure setPTEN6(thebits : TBits_1); inline;
  7044. procedure setPTEN7(thebits : TBits_1); inline;
  7045. procedure setPTEN8(thebits : TBits_1); inline;
  7046. procedure setPTEN9(thebits : TBits_1); inline;
  7047. procedure setw(thebits : TBits_32); inline;
  7048. public
  7049. procedure clearPTEN0; inline;
  7050. procedure clearPTEN10; inline;
  7051. procedure clearPTEN11; inline;
  7052. procedure clearPTEN12; inline;
  7053. procedure clearPTEN13; inline;
  7054. procedure clearPTEN14; inline;
  7055. procedure clearPTEN15; inline;
  7056. procedure clearPTEN1; inline;
  7057. procedure clearPTEN2; inline;
  7058. procedure clearPTEN3; inline;
  7059. procedure clearPTEN4; inline;
  7060. procedure clearPTEN5; inline;
  7061. procedure clearPTEN6; inline;
  7062. procedure clearPTEN7; inline;
  7063. procedure clearPTEN8; inline;
  7064. procedure clearPTEN9; inline;
  7065. procedure setPTEN0; inline;
  7066. procedure setPTEN10; inline;
  7067. procedure setPTEN11; inline;
  7068. procedure setPTEN12; inline;
  7069. procedure setPTEN13; inline;
  7070. procedure setPTEN14; inline;
  7071. procedure setPTEN15; inline;
  7072. procedure setPTEN1; inline;
  7073. procedure setPTEN2; inline;
  7074. procedure setPTEN3; inline;
  7075. procedure setPTEN4; inline;
  7076. procedure setPTEN5; inline;
  7077. procedure setPTEN6; inline;
  7078. procedure setPTEN7; inline;
  7079. procedure setPTEN8; inline;
  7080. procedure setPTEN9; inline;
  7081. property PTEN : TBits_16 read getPTEN write setPTEN;
  7082. property PTEN0 : TBits_1 read getPTEN0 write setPTEN0;
  7083. property PTEN1 : TBits_1 read getPTEN1 write setPTEN1;
  7084. property PTEN10 : TBits_1 read getPTEN10 write setPTEN10;
  7085. property PTEN11 : TBits_1 read getPTEN11 write setPTEN11;
  7086. property PTEN12 : TBits_1 read getPTEN12 write setPTEN12;
  7087. property PTEN13 : TBits_1 read getPTEN13 write setPTEN13;
  7088. property PTEN14 : TBits_1 read getPTEN14 write setPTEN14;
  7089. property PTEN15 : TBits_1 read getPTEN15 write setPTEN15;
  7090. property PTEN2 : TBits_1 read getPTEN2 write setPTEN2;
  7091. property PTEN3 : TBits_1 read getPTEN3 write setPTEN3;
  7092. property PTEN4 : TBits_1 read getPTEN4 write setPTEN4;
  7093. property PTEN5 : TBits_1 read getPTEN5 write setPTEN5;
  7094. property PTEN6 : TBits_1 read getPTEN6 write setPTEN6;
  7095. property PTEN7 : TBits_1 read getPTEN7 write setPTEN7;
  7096. property PTEN8 : TBits_1 read getPTEN8 write setPTEN8;
  7097. property PTEN9 : TBits_1 read getPTEN9 write setPTEN9;
  7098. property w : TBits_32 read getw write setw;
  7099. end;
  7100. TPMP_PMSTAT = record
  7101. private
  7102. function getIB0F : TBits_1; inline;
  7103. function getIB1F : TBits_1; inline;
  7104. function getIB2F : TBits_1; inline;
  7105. function getIB3F : TBits_1; inline;
  7106. function getIBF : TBits_1; inline;
  7107. function getIBOV : TBits_1; inline;
  7108. function getOB0E : TBits_1; inline;
  7109. function getOB1E : TBits_1; inline;
  7110. function getOB2E : TBits_1; inline;
  7111. function getOB3E : TBits_1; inline;
  7112. function getOBE : TBits_1; inline;
  7113. function getOBUF : TBits_1; inline;
  7114. function getw : TBits_32; inline;
  7115. procedure setIB0F(thebits : TBits_1); inline;
  7116. procedure setIB1F(thebits : TBits_1); inline;
  7117. procedure setIB2F(thebits : TBits_1); inline;
  7118. procedure setIB3F(thebits : TBits_1); inline;
  7119. procedure setIBF(thebits : TBits_1); inline;
  7120. procedure setIBOV(thebits : TBits_1); inline;
  7121. procedure setOB0E(thebits : TBits_1); inline;
  7122. procedure setOB1E(thebits : TBits_1); inline;
  7123. procedure setOB2E(thebits : TBits_1); inline;
  7124. procedure setOB3E(thebits : TBits_1); inline;
  7125. procedure setOBE(thebits : TBits_1); inline;
  7126. procedure setOBUF(thebits : TBits_1); inline;
  7127. procedure setw(thebits : TBits_32); inline;
  7128. public
  7129. procedure clearIB0F; inline;
  7130. procedure clearIB1F; inline;
  7131. procedure clearIB2F; inline;
  7132. procedure clearIB3F; inline;
  7133. procedure clearIBF; inline;
  7134. procedure clearIBOV; inline;
  7135. procedure clearOB0E; inline;
  7136. procedure clearOB1E; inline;
  7137. procedure clearOB2E; inline;
  7138. procedure clearOB3E; inline;
  7139. procedure clearOBE; inline;
  7140. procedure clearOBUF; inline;
  7141. procedure setIB0F; inline;
  7142. procedure setIB1F; inline;
  7143. procedure setIB2F; inline;
  7144. procedure setIB3F; inline;
  7145. procedure setIBF; inline;
  7146. procedure setIBOV; inline;
  7147. procedure setOB0E; inline;
  7148. procedure setOB1E; inline;
  7149. procedure setOB2E; inline;
  7150. procedure setOB3E; inline;
  7151. procedure setOBE; inline;
  7152. procedure setOBUF; inline;
  7153. property IB0F : TBits_1 read getIB0F write setIB0F;
  7154. property IB1F : TBits_1 read getIB1F write setIB1F;
  7155. property IB2F : TBits_1 read getIB2F write setIB2F;
  7156. property IB3F : TBits_1 read getIB3F write setIB3F;
  7157. property IBF : TBits_1 read getIBF write setIBF;
  7158. property IBOV : TBits_1 read getIBOV write setIBOV;
  7159. property OB0E : TBits_1 read getOB0E write setOB0E;
  7160. property OB1E : TBits_1 read getOB1E write setOB1E;
  7161. property OB2E : TBits_1 read getOB2E write setOB2E;
  7162. property OB3E : TBits_1 read getOB3E write setOB3E;
  7163. property OBE : TBits_1 read getOBE write setOBE;
  7164. property OBUF : TBits_1 read getOBUF write setOBUF;
  7165. property w : TBits_32 read getw write setw;
  7166. end;
  7167. type
  7168. TPMPRegisters = record
  7169. PMCONbits : TPMP_PMCON;
  7170. PMCON : longWord;
  7171. PMCONCLR : longWord;
  7172. PMCONSET : longWord;
  7173. PMCONINV : longWord;
  7174. PMMODEbits : TPMP_PMMODE;
  7175. PMMODE : longWord;
  7176. PMMODECLR : longWord;
  7177. PMMODESET : longWord;
  7178. PMMODEINV : longWord;
  7179. PMADDRbits : TPMP_PMADDR;
  7180. PMADDR : longWord;
  7181. PMADDRCLR : longWord;
  7182. PMADDRSET : longWord;
  7183. PMADDRINV : longWord;
  7184. PMDOUTbits : TPMP_PMDOUT;
  7185. PMDOUT : longWord;
  7186. PMDOUTCLR : longWord;
  7187. PMDOUTSET : longWord;
  7188. PMDOUTINV : longWord;
  7189. PMDINbits : TPMP_PMDIN;
  7190. PMDIN : longWord;
  7191. PMDINCLR : longWord;
  7192. PMDINSET : longWord;
  7193. PMDININV : longWord;
  7194. PMAENbits : TPMP_PMAEN;
  7195. PMAEN : longWord;
  7196. PMAENCLR : longWord;
  7197. PMAENSET : longWord;
  7198. PMAENINV : longWord;
  7199. PMSTATbits : TPMP_PMSTAT;
  7200. PMSTAT : longWord;
  7201. PMSTATCLR : longWord;
  7202. PMSTATSET : longWord;
  7203. PMSTATINV : longWord;
  7204. end;
  7205. TADC10_AD1CON1 = record
  7206. private
  7207. function getADON : TBits_1; inline;
  7208. function getADSIDL : TBits_1; inline;
  7209. function getASAM : TBits_1; inline;
  7210. function getCLRASAM : TBits_1; inline;
  7211. function getDONE : TBits_1; inline;
  7212. function getFORM : TBits_3; inline;
  7213. function getFORM0 : TBits_1; inline;
  7214. function getFORM1 : TBits_1; inline;
  7215. function getFORM2 : TBits_1; inline;
  7216. function getON : TBits_1; inline;
  7217. function getSAMP : TBits_1; inline;
  7218. function getSIDL : TBits_1; inline;
  7219. function getSSRC : TBits_3; inline;
  7220. function getSSRC0 : TBits_1; inline;
  7221. function getSSRC1 : TBits_1; inline;
  7222. function getSSRC2 : TBits_1; inline;
  7223. function getw : TBits_32; inline;
  7224. procedure setADON(thebits : TBits_1); inline;
  7225. procedure setADSIDL(thebits : TBits_1); inline;
  7226. procedure setASAM(thebits : TBits_1); inline;
  7227. procedure setCLRASAM(thebits : TBits_1); inline;
  7228. procedure setDONE(thebits : TBits_1); inline;
  7229. procedure setFORM(thebits : TBits_3); inline;
  7230. procedure setFORM0(thebits : TBits_1); inline;
  7231. procedure setFORM1(thebits : TBits_1); inline;
  7232. procedure setFORM2(thebits : TBits_1); inline;
  7233. procedure setON(thebits : TBits_1); inline;
  7234. procedure setSAMP(thebits : TBits_1); inline;
  7235. procedure setSIDL(thebits : TBits_1); inline;
  7236. procedure setSSRC(thebits : TBits_3); inline;
  7237. procedure setSSRC0(thebits : TBits_1); inline;
  7238. procedure setSSRC1(thebits : TBits_1); inline;
  7239. procedure setSSRC2(thebits : TBits_1); inline;
  7240. procedure setw(thebits : TBits_32); inline;
  7241. public
  7242. procedure clearADON; inline;
  7243. procedure clearADSIDL; inline;
  7244. procedure clearASAM; inline;
  7245. procedure clearCLRASAM; inline;
  7246. procedure clearDONE; inline;
  7247. procedure clearFORM0; inline;
  7248. procedure clearFORM1; inline;
  7249. procedure clearFORM2; inline;
  7250. procedure clearON; inline;
  7251. procedure clearSAMP; inline;
  7252. procedure clearSIDL; inline;
  7253. procedure clearSSRC0; inline;
  7254. procedure clearSSRC1; inline;
  7255. procedure clearSSRC2; inline;
  7256. procedure setADON; inline;
  7257. procedure setADSIDL; inline;
  7258. procedure setASAM; inline;
  7259. procedure setCLRASAM; inline;
  7260. procedure setDONE; inline;
  7261. procedure setFORM0; inline;
  7262. procedure setFORM1; inline;
  7263. procedure setFORM2; inline;
  7264. procedure setON; inline;
  7265. procedure setSAMP; inline;
  7266. procedure setSIDL; inline;
  7267. procedure setSSRC0; inline;
  7268. procedure setSSRC1; inline;
  7269. procedure setSSRC2; inline;
  7270. property ADON : TBits_1 read getADON write setADON;
  7271. property ADSIDL : TBits_1 read getADSIDL write setADSIDL;
  7272. property ASAM : TBits_1 read getASAM write setASAM;
  7273. property CLRASAM : TBits_1 read getCLRASAM write setCLRASAM;
  7274. property DONE : TBits_1 read getDONE write setDONE;
  7275. property FORM : TBits_3 read getFORM write setFORM;
  7276. property FORM0 : TBits_1 read getFORM0 write setFORM0;
  7277. property FORM1 : TBits_1 read getFORM1 write setFORM1;
  7278. property FORM2 : TBits_1 read getFORM2 write setFORM2;
  7279. property ON : TBits_1 read getON write setON;
  7280. property SAMP : TBits_1 read getSAMP write setSAMP;
  7281. property SIDL : TBits_1 read getSIDL write setSIDL;
  7282. property SSRC : TBits_3 read getSSRC write setSSRC;
  7283. property SSRC0 : TBits_1 read getSSRC0 write setSSRC0;
  7284. property SSRC1 : TBits_1 read getSSRC1 write setSSRC1;
  7285. property SSRC2 : TBits_1 read getSSRC2 write setSSRC2;
  7286. property w : TBits_32 read getw write setw;
  7287. end;
  7288. TADC10_AD1CON2 = record
  7289. private
  7290. function getALTS : TBits_1; inline;
  7291. function getBUFM : TBits_1; inline;
  7292. function getBUFS : TBits_1; inline;
  7293. function getCSCNA : TBits_1; inline;
  7294. function getOFFCAL : TBits_1; inline;
  7295. function getSMPI : TBits_4; inline;
  7296. function getSMPI0 : TBits_1; inline;
  7297. function getSMPI1 : TBits_1; inline;
  7298. function getSMPI2 : TBits_1; inline;
  7299. function getSMPI3 : TBits_1; inline;
  7300. function getVCFG : TBits_3; inline;
  7301. function getVCFG0 : TBits_1; inline;
  7302. function getVCFG1 : TBits_1; inline;
  7303. function getVCFG2 : TBits_1; inline;
  7304. function getw : TBits_32; inline;
  7305. procedure setALTS(thebits : TBits_1); inline;
  7306. procedure setBUFM(thebits : TBits_1); inline;
  7307. procedure setBUFS(thebits : TBits_1); inline;
  7308. procedure setCSCNA(thebits : TBits_1); inline;
  7309. procedure setOFFCAL(thebits : TBits_1); inline;
  7310. procedure setSMPI(thebits : TBits_4); inline;
  7311. procedure setSMPI0(thebits : TBits_1); inline;
  7312. procedure setSMPI1(thebits : TBits_1); inline;
  7313. procedure setSMPI2(thebits : TBits_1); inline;
  7314. procedure setSMPI3(thebits : TBits_1); inline;
  7315. procedure setVCFG(thebits : TBits_3); inline;
  7316. procedure setVCFG0(thebits : TBits_1); inline;
  7317. procedure setVCFG1(thebits : TBits_1); inline;
  7318. procedure setVCFG2(thebits : TBits_1); inline;
  7319. procedure setw(thebits : TBits_32); inline;
  7320. public
  7321. procedure clearALTS; inline;
  7322. procedure clearBUFM; inline;
  7323. procedure clearBUFS; inline;
  7324. procedure clearCSCNA; inline;
  7325. procedure clearOFFCAL; inline;
  7326. procedure clearSMPI0; inline;
  7327. procedure clearSMPI1; inline;
  7328. procedure clearSMPI2; inline;
  7329. procedure clearSMPI3; inline;
  7330. procedure clearVCFG0; inline;
  7331. procedure clearVCFG1; inline;
  7332. procedure clearVCFG2; inline;
  7333. procedure setALTS; inline;
  7334. procedure setBUFM; inline;
  7335. procedure setBUFS; inline;
  7336. procedure setCSCNA; inline;
  7337. procedure setOFFCAL; inline;
  7338. procedure setSMPI0; inline;
  7339. procedure setSMPI1; inline;
  7340. procedure setSMPI2; inline;
  7341. procedure setSMPI3; inline;
  7342. procedure setVCFG0; inline;
  7343. procedure setVCFG1; inline;
  7344. procedure setVCFG2; inline;
  7345. property ALTS : TBits_1 read getALTS write setALTS;
  7346. property BUFM : TBits_1 read getBUFM write setBUFM;
  7347. property BUFS : TBits_1 read getBUFS write setBUFS;
  7348. property CSCNA : TBits_1 read getCSCNA write setCSCNA;
  7349. property OFFCAL : TBits_1 read getOFFCAL write setOFFCAL;
  7350. property SMPI : TBits_4 read getSMPI write setSMPI;
  7351. property SMPI0 : TBits_1 read getSMPI0 write setSMPI0;
  7352. property SMPI1 : TBits_1 read getSMPI1 write setSMPI1;
  7353. property SMPI2 : TBits_1 read getSMPI2 write setSMPI2;
  7354. property SMPI3 : TBits_1 read getSMPI3 write setSMPI3;
  7355. property VCFG : TBits_3 read getVCFG write setVCFG;
  7356. property VCFG0 : TBits_1 read getVCFG0 write setVCFG0;
  7357. property VCFG1 : TBits_1 read getVCFG1 write setVCFG1;
  7358. property VCFG2 : TBits_1 read getVCFG2 write setVCFG2;
  7359. property w : TBits_32 read getw write setw;
  7360. end;
  7361. TADC10_AD1CON3 = record
  7362. private
  7363. function getADCS : TBits_8; inline;
  7364. function getADCS0 : TBits_1; inline;
  7365. function getADCS1 : TBits_1; inline;
  7366. function getADCS2 : TBits_1; inline;
  7367. function getADCS3 : TBits_1; inline;
  7368. function getADCS4 : TBits_1; inline;
  7369. function getADCS5 : TBits_1; inline;
  7370. function getADCS6 : TBits_1; inline;
  7371. function getADCS7 : TBits_1; inline;
  7372. function getADRC : TBits_1; inline;
  7373. function getSAMC : TBits_5; inline;
  7374. function getSAMC0 : TBits_1; inline;
  7375. function getSAMC1 : TBits_1; inline;
  7376. function getSAMC2 : TBits_1; inline;
  7377. function getSAMC3 : TBits_1; inline;
  7378. function getSAMC4 : TBits_1; inline;
  7379. function getw : TBits_32; inline;
  7380. procedure setADCS(thebits : TBits_8); inline;
  7381. procedure setADCS0(thebits : TBits_1); inline;
  7382. procedure setADCS1(thebits : TBits_1); inline;
  7383. procedure setADCS2(thebits : TBits_1); inline;
  7384. procedure setADCS3(thebits : TBits_1); inline;
  7385. procedure setADCS4(thebits : TBits_1); inline;
  7386. procedure setADCS5(thebits : TBits_1); inline;
  7387. procedure setADCS6(thebits : TBits_1); inline;
  7388. procedure setADCS7(thebits : TBits_1); inline;
  7389. procedure setADRC(thebits : TBits_1); inline;
  7390. procedure setSAMC(thebits : TBits_5); inline;
  7391. procedure setSAMC0(thebits : TBits_1); inline;
  7392. procedure setSAMC1(thebits : TBits_1); inline;
  7393. procedure setSAMC2(thebits : TBits_1); inline;
  7394. procedure setSAMC3(thebits : TBits_1); inline;
  7395. procedure setSAMC4(thebits : TBits_1); inline;
  7396. procedure setw(thebits : TBits_32); inline;
  7397. public
  7398. procedure clearADCS0; inline;
  7399. procedure clearADCS1; inline;
  7400. procedure clearADCS2; inline;
  7401. procedure clearADCS3; inline;
  7402. procedure clearADCS4; inline;
  7403. procedure clearADCS5; inline;
  7404. procedure clearADCS6; inline;
  7405. procedure clearADCS7; inline;
  7406. procedure clearADRC; inline;
  7407. procedure clearSAMC0; inline;
  7408. procedure clearSAMC1; inline;
  7409. procedure clearSAMC2; inline;
  7410. procedure clearSAMC3; inline;
  7411. procedure clearSAMC4; inline;
  7412. procedure setADCS0; inline;
  7413. procedure setADCS1; inline;
  7414. procedure setADCS2; inline;
  7415. procedure setADCS3; inline;
  7416. procedure setADCS4; inline;
  7417. procedure setADCS5; inline;
  7418. procedure setADCS6; inline;
  7419. procedure setADCS7; inline;
  7420. procedure setADRC; inline;
  7421. procedure setSAMC0; inline;
  7422. procedure setSAMC1; inline;
  7423. procedure setSAMC2; inline;
  7424. procedure setSAMC3; inline;
  7425. procedure setSAMC4; inline;
  7426. property ADCS : TBits_8 read getADCS write setADCS;
  7427. property ADCS0 : TBits_1 read getADCS0 write setADCS0;
  7428. property ADCS1 : TBits_1 read getADCS1 write setADCS1;
  7429. property ADCS2 : TBits_1 read getADCS2 write setADCS2;
  7430. property ADCS3 : TBits_1 read getADCS3 write setADCS3;
  7431. property ADCS4 : TBits_1 read getADCS4 write setADCS4;
  7432. property ADCS5 : TBits_1 read getADCS5 write setADCS5;
  7433. property ADCS6 : TBits_1 read getADCS6 write setADCS6;
  7434. property ADCS7 : TBits_1 read getADCS7 write setADCS7;
  7435. property ADRC : TBits_1 read getADRC write setADRC;
  7436. property SAMC : TBits_5 read getSAMC write setSAMC;
  7437. property SAMC0 : TBits_1 read getSAMC0 write setSAMC0;
  7438. property SAMC1 : TBits_1 read getSAMC1 write setSAMC1;
  7439. property SAMC2 : TBits_1 read getSAMC2 write setSAMC2;
  7440. property SAMC3 : TBits_1 read getSAMC3 write setSAMC3;
  7441. property SAMC4 : TBits_1 read getSAMC4 write setSAMC4;
  7442. property w : TBits_32 read getw write setw;
  7443. end;
  7444. TADC10_AD1CHS = record
  7445. private
  7446. function getCH0NA : TBits_1; inline;
  7447. function getCH0NB : TBits_1; inline;
  7448. function getCH0SA : TBits_4; inline;
  7449. function getCH0SA0 : TBits_1; inline;
  7450. function getCH0SA1 : TBits_1; inline;
  7451. function getCH0SA2 : TBits_1; inline;
  7452. function getCH0SA3 : TBits_1; inline;
  7453. function getCH0SB : TBits_4; inline;
  7454. function getCH0SB0 : TBits_1; inline;
  7455. function getCH0SB1 : TBits_1; inline;
  7456. function getCH0SB2 : TBits_1; inline;
  7457. function getCH0SB3 : TBits_1; inline;
  7458. function getw : TBits_32; inline;
  7459. procedure setCH0NA(thebits : TBits_1); inline;
  7460. procedure setCH0NB(thebits : TBits_1); inline;
  7461. procedure setCH0SA(thebits : TBits_4); inline;
  7462. procedure setCH0SA0(thebits : TBits_1); inline;
  7463. procedure setCH0SA1(thebits : TBits_1); inline;
  7464. procedure setCH0SA2(thebits : TBits_1); inline;
  7465. procedure setCH0SA3(thebits : TBits_1); inline;
  7466. procedure setCH0SB(thebits : TBits_4); inline;
  7467. procedure setCH0SB0(thebits : TBits_1); inline;
  7468. procedure setCH0SB1(thebits : TBits_1); inline;
  7469. procedure setCH0SB2(thebits : TBits_1); inline;
  7470. procedure setCH0SB3(thebits : TBits_1); inline;
  7471. procedure setw(thebits : TBits_32); inline;
  7472. public
  7473. procedure clearCH0NA; inline;
  7474. procedure clearCH0NB; inline;
  7475. procedure clearCH0SA0; inline;
  7476. procedure clearCH0SA1; inline;
  7477. procedure clearCH0SA2; inline;
  7478. procedure clearCH0SA3; inline;
  7479. procedure clearCH0SB0; inline;
  7480. procedure clearCH0SB1; inline;
  7481. procedure clearCH0SB2; inline;
  7482. procedure clearCH0SB3; inline;
  7483. procedure setCH0NA; inline;
  7484. procedure setCH0NB; inline;
  7485. procedure setCH0SA0; inline;
  7486. procedure setCH0SA1; inline;
  7487. procedure setCH0SA2; inline;
  7488. procedure setCH0SA3; inline;
  7489. procedure setCH0SB0; inline;
  7490. procedure setCH0SB1; inline;
  7491. procedure setCH0SB2; inline;
  7492. procedure setCH0SB3; inline;
  7493. property CH0NA : TBits_1 read getCH0NA write setCH0NA;
  7494. property CH0NB : TBits_1 read getCH0NB write setCH0NB;
  7495. property CH0SA : TBits_4 read getCH0SA write setCH0SA;
  7496. property CH0SA0 : TBits_1 read getCH0SA0 write setCH0SA0;
  7497. property CH0SA1 : TBits_1 read getCH0SA1 write setCH0SA1;
  7498. property CH0SA2 : TBits_1 read getCH0SA2 write setCH0SA2;
  7499. property CH0SA3 : TBits_1 read getCH0SA3 write setCH0SA3;
  7500. property CH0SB : TBits_4 read getCH0SB write setCH0SB;
  7501. property CH0SB0 : TBits_1 read getCH0SB0 write setCH0SB0;
  7502. property CH0SB1 : TBits_1 read getCH0SB1 write setCH0SB1;
  7503. property CH0SB2 : TBits_1 read getCH0SB2 write setCH0SB2;
  7504. property CH0SB3 : TBits_1 read getCH0SB3 write setCH0SB3;
  7505. property w : TBits_32 read getw write setw;
  7506. end;
  7507. TADC10_AD1CSSL = record
  7508. private
  7509. function getCSSL : TBits_16; inline;
  7510. function getCSSL0 : TBits_1; inline;
  7511. function getCSSL1 : TBits_1; inline;
  7512. function getCSSL10 : TBits_1; inline;
  7513. function getCSSL11 : TBits_1; inline;
  7514. function getCSSL12 : TBits_1; inline;
  7515. function getCSSL13 : TBits_1; inline;
  7516. function getCSSL14 : TBits_1; inline;
  7517. function getCSSL15 : TBits_1; inline;
  7518. function getCSSL2 : TBits_1; inline;
  7519. function getCSSL3 : TBits_1; inline;
  7520. function getCSSL4 : TBits_1; inline;
  7521. function getCSSL5 : TBits_1; inline;
  7522. function getCSSL6 : TBits_1; inline;
  7523. function getCSSL7 : TBits_1; inline;
  7524. function getCSSL8 : TBits_1; inline;
  7525. function getCSSL9 : TBits_1; inline;
  7526. function getw : TBits_32; inline;
  7527. procedure setCSSL(thebits : TBits_16); inline;
  7528. procedure setCSSL0(thebits : TBits_1); inline;
  7529. procedure setCSSL1(thebits : TBits_1); inline;
  7530. procedure setCSSL10(thebits : TBits_1); inline;
  7531. procedure setCSSL11(thebits : TBits_1); inline;
  7532. procedure setCSSL12(thebits : TBits_1); inline;
  7533. procedure setCSSL13(thebits : TBits_1); inline;
  7534. procedure setCSSL14(thebits : TBits_1); inline;
  7535. procedure setCSSL15(thebits : TBits_1); inline;
  7536. procedure setCSSL2(thebits : TBits_1); inline;
  7537. procedure setCSSL3(thebits : TBits_1); inline;
  7538. procedure setCSSL4(thebits : TBits_1); inline;
  7539. procedure setCSSL5(thebits : TBits_1); inline;
  7540. procedure setCSSL6(thebits : TBits_1); inline;
  7541. procedure setCSSL7(thebits : TBits_1); inline;
  7542. procedure setCSSL8(thebits : TBits_1); inline;
  7543. procedure setCSSL9(thebits : TBits_1); inline;
  7544. procedure setw(thebits : TBits_32); inline;
  7545. public
  7546. procedure clearCSSL0; inline;
  7547. procedure clearCSSL10; inline;
  7548. procedure clearCSSL11; inline;
  7549. procedure clearCSSL12; inline;
  7550. procedure clearCSSL13; inline;
  7551. procedure clearCSSL14; inline;
  7552. procedure clearCSSL15; inline;
  7553. procedure clearCSSL1; inline;
  7554. procedure clearCSSL2; inline;
  7555. procedure clearCSSL3; inline;
  7556. procedure clearCSSL4; inline;
  7557. procedure clearCSSL5; inline;
  7558. procedure clearCSSL6; inline;
  7559. procedure clearCSSL7; inline;
  7560. procedure clearCSSL8; inline;
  7561. procedure clearCSSL9; inline;
  7562. procedure setCSSL0; inline;
  7563. procedure setCSSL10; inline;
  7564. procedure setCSSL11; inline;
  7565. procedure setCSSL12; inline;
  7566. procedure setCSSL13; inline;
  7567. procedure setCSSL14; inline;
  7568. procedure setCSSL15; inline;
  7569. procedure setCSSL1; inline;
  7570. procedure setCSSL2; inline;
  7571. procedure setCSSL3; inline;
  7572. procedure setCSSL4; inline;
  7573. procedure setCSSL5; inline;
  7574. procedure setCSSL6; inline;
  7575. procedure setCSSL7; inline;
  7576. procedure setCSSL8; inline;
  7577. procedure setCSSL9; inline;
  7578. property CSSL : TBits_16 read getCSSL write setCSSL;
  7579. property CSSL0 : TBits_1 read getCSSL0 write setCSSL0;
  7580. property CSSL1 : TBits_1 read getCSSL1 write setCSSL1;
  7581. property CSSL10 : TBits_1 read getCSSL10 write setCSSL10;
  7582. property CSSL11 : TBits_1 read getCSSL11 write setCSSL11;
  7583. property CSSL12 : TBits_1 read getCSSL12 write setCSSL12;
  7584. property CSSL13 : TBits_1 read getCSSL13 write setCSSL13;
  7585. property CSSL14 : TBits_1 read getCSSL14 write setCSSL14;
  7586. property CSSL15 : TBits_1 read getCSSL15 write setCSSL15;
  7587. property CSSL2 : TBits_1 read getCSSL2 write setCSSL2;
  7588. property CSSL3 : TBits_1 read getCSSL3 write setCSSL3;
  7589. property CSSL4 : TBits_1 read getCSSL4 write setCSSL4;
  7590. property CSSL5 : TBits_1 read getCSSL5 write setCSSL5;
  7591. property CSSL6 : TBits_1 read getCSSL6 write setCSSL6;
  7592. property CSSL7 : TBits_1 read getCSSL7 write setCSSL7;
  7593. property CSSL8 : TBits_1 read getCSSL8 write setCSSL8;
  7594. property CSSL9 : TBits_1 read getCSSL9 write setCSSL9;
  7595. property w : TBits_32 read getw write setw;
  7596. end;
  7597. TADC10_AD1PCFG = record
  7598. private
  7599. function getPCFG : TBits_16; inline;
  7600. function getPCFG0 : TBits_1; inline;
  7601. function getPCFG1 : TBits_1; inline;
  7602. function getPCFG10 : TBits_1; inline;
  7603. function getPCFG11 : TBits_1; inline;
  7604. function getPCFG12 : TBits_1; inline;
  7605. function getPCFG13 : TBits_1; inline;
  7606. function getPCFG14 : TBits_1; inline;
  7607. function getPCFG15 : TBits_1; inline;
  7608. function getPCFG2 : TBits_1; inline;
  7609. function getPCFG3 : TBits_1; inline;
  7610. function getPCFG4 : TBits_1; inline;
  7611. function getPCFG5 : TBits_1; inline;
  7612. function getPCFG6 : TBits_1; inline;
  7613. function getPCFG7 : TBits_1; inline;
  7614. function getPCFG8 : TBits_1; inline;
  7615. function getPCFG9 : TBits_1; inline;
  7616. function getw : TBits_32; inline;
  7617. procedure setPCFG(thebits : TBits_16); inline;
  7618. procedure setPCFG0(thebits : TBits_1); inline;
  7619. procedure setPCFG1(thebits : TBits_1); inline;
  7620. procedure setPCFG10(thebits : TBits_1); inline;
  7621. procedure setPCFG11(thebits : TBits_1); inline;
  7622. procedure setPCFG12(thebits : TBits_1); inline;
  7623. procedure setPCFG13(thebits : TBits_1); inline;
  7624. procedure setPCFG14(thebits : TBits_1); inline;
  7625. procedure setPCFG15(thebits : TBits_1); inline;
  7626. procedure setPCFG2(thebits : TBits_1); inline;
  7627. procedure setPCFG3(thebits : TBits_1); inline;
  7628. procedure setPCFG4(thebits : TBits_1); inline;
  7629. procedure setPCFG5(thebits : TBits_1); inline;
  7630. procedure setPCFG6(thebits : TBits_1); inline;
  7631. procedure setPCFG7(thebits : TBits_1); inline;
  7632. procedure setPCFG8(thebits : TBits_1); inline;
  7633. procedure setPCFG9(thebits : TBits_1); inline;
  7634. procedure setw(thebits : TBits_32); inline;
  7635. public
  7636. procedure clearPCFG0; inline;
  7637. procedure clearPCFG10; inline;
  7638. procedure clearPCFG11; inline;
  7639. procedure clearPCFG12; inline;
  7640. procedure clearPCFG13; inline;
  7641. procedure clearPCFG14; inline;
  7642. procedure clearPCFG15; inline;
  7643. procedure clearPCFG1; inline;
  7644. procedure clearPCFG2; inline;
  7645. procedure clearPCFG3; inline;
  7646. procedure clearPCFG4; inline;
  7647. procedure clearPCFG5; inline;
  7648. procedure clearPCFG6; inline;
  7649. procedure clearPCFG7; inline;
  7650. procedure clearPCFG8; inline;
  7651. procedure clearPCFG9; inline;
  7652. procedure setPCFG0; inline;
  7653. procedure setPCFG10; inline;
  7654. procedure setPCFG11; inline;
  7655. procedure setPCFG12; inline;
  7656. procedure setPCFG13; inline;
  7657. procedure setPCFG14; inline;
  7658. procedure setPCFG15; inline;
  7659. procedure setPCFG1; inline;
  7660. procedure setPCFG2; inline;
  7661. procedure setPCFG3; inline;
  7662. procedure setPCFG4; inline;
  7663. procedure setPCFG5; inline;
  7664. procedure setPCFG6; inline;
  7665. procedure setPCFG7; inline;
  7666. procedure setPCFG8; inline;
  7667. procedure setPCFG9; inline;
  7668. property PCFG : TBits_16 read getPCFG write setPCFG;
  7669. property PCFG0 : TBits_1 read getPCFG0 write setPCFG0;
  7670. property PCFG1 : TBits_1 read getPCFG1 write setPCFG1;
  7671. property PCFG10 : TBits_1 read getPCFG10 write setPCFG10;
  7672. property PCFG11 : TBits_1 read getPCFG11 write setPCFG11;
  7673. property PCFG12 : TBits_1 read getPCFG12 write setPCFG12;
  7674. property PCFG13 : TBits_1 read getPCFG13 write setPCFG13;
  7675. property PCFG14 : TBits_1 read getPCFG14 write setPCFG14;
  7676. property PCFG15 : TBits_1 read getPCFG15 write setPCFG15;
  7677. property PCFG2 : TBits_1 read getPCFG2 write setPCFG2;
  7678. property PCFG3 : TBits_1 read getPCFG3 write setPCFG3;
  7679. property PCFG4 : TBits_1 read getPCFG4 write setPCFG4;
  7680. property PCFG5 : TBits_1 read getPCFG5 write setPCFG5;
  7681. property PCFG6 : TBits_1 read getPCFG6 write setPCFG6;
  7682. property PCFG7 : TBits_1 read getPCFG7 write setPCFG7;
  7683. property PCFG8 : TBits_1 read getPCFG8 write setPCFG8;
  7684. property PCFG9 : TBits_1 read getPCFG9 write setPCFG9;
  7685. property w : TBits_32 read getw write setw;
  7686. end;
  7687. type
  7688. TADC10Registers = record
  7689. AD1CON1bits : TADC10_AD1CON1;
  7690. AD1CON1 : longWord;
  7691. AD1CON1CLR : longWord;
  7692. AD1CON1SET : longWord;
  7693. AD1CON1INV : longWord;
  7694. AD1CON2bits : TADC10_AD1CON2;
  7695. AD1CON2 : longWord;
  7696. AD1CON2CLR : longWord;
  7697. AD1CON2SET : longWord;
  7698. AD1CON2INV : longWord;
  7699. AD1CON3bits : TADC10_AD1CON3;
  7700. AD1CON3 : longWord;
  7701. AD1CON3CLR : longWord;
  7702. AD1CON3SET : longWord;
  7703. AD1CON3INV : longWord;
  7704. AD1CHSbits : TADC10_AD1CHS;
  7705. AD1CHS : longWord;
  7706. AD1CHSCLR : longWord;
  7707. AD1CHSSET : longWord;
  7708. AD1CHSINV : longWord;
  7709. AD1CSSLbits : TADC10_AD1CSSL;
  7710. AD1CSSL : longWord;
  7711. AD1CSSLCLR : longWord;
  7712. AD1CSSLSET : longWord;
  7713. AD1CSSLINV : longWord;
  7714. AD1PCFGbits : TADC10_AD1PCFG;
  7715. AD1PCFG : longWord;
  7716. AD1PCFGCLR : longWord;
  7717. AD1PCFGSET : longWord;
  7718. AD1PCFGINV : longWord;
  7719. ADC1BUF0 : longWord;
  7720. ADC1BUF1 : longWord;
  7721. ADC1BUF2 : longWord;
  7722. ADC1BUF3 : longWord;
  7723. ADC1BUF4 : longWord;
  7724. ADC1BUF5 : longWord;
  7725. ADC1BUF6 : longWord;
  7726. ADC1BUF7 : longWord;
  7727. ADC1BUF8 : longWord;
  7728. ADC1BUF9 : longWord;
  7729. ADC1BUFA : longWord;
  7730. ADC1BUFB : longWord;
  7731. ADC1BUFC : longWord;
  7732. ADC1BUFD : longWord;
  7733. ADC1BUFE : longWord;
  7734. ADC1BUFF : longWord;
  7735. end;
  7736. TCVR_CVRCON = record
  7737. private
  7738. function getCVR : TBits_4; inline;
  7739. function getCVR0 : TBits_1; inline;
  7740. function getCVR1 : TBits_1; inline;
  7741. function getCVR2 : TBits_1; inline;
  7742. function getCVR3 : TBits_1; inline;
  7743. function getCVROE : TBits_1; inline;
  7744. function getCVRR : TBits_1; inline;
  7745. function getCVRSS : TBits_1; inline;
  7746. function getON : TBits_1; inline;
  7747. function getw : TBits_32; inline;
  7748. procedure setCVR(thebits : TBits_4); inline;
  7749. procedure setCVR0(thebits : TBits_1); inline;
  7750. procedure setCVR1(thebits : TBits_1); inline;
  7751. procedure setCVR2(thebits : TBits_1); inline;
  7752. procedure setCVR3(thebits : TBits_1); inline;
  7753. procedure setCVROE(thebits : TBits_1); inline;
  7754. procedure setCVRR(thebits : TBits_1); inline;
  7755. procedure setCVRSS(thebits : TBits_1); inline;
  7756. procedure setON(thebits : TBits_1); inline;
  7757. procedure setw(thebits : TBits_32); inline;
  7758. public
  7759. procedure clearCVR0; inline;
  7760. procedure clearCVR1; inline;
  7761. procedure clearCVR2; inline;
  7762. procedure clearCVR3; inline;
  7763. procedure clearCVROE; inline;
  7764. procedure clearCVRR; inline;
  7765. procedure clearCVRSS; inline;
  7766. procedure clearON; inline;
  7767. procedure setCVR0; inline;
  7768. procedure setCVR1; inline;
  7769. procedure setCVR2; inline;
  7770. procedure setCVR3; inline;
  7771. procedure setCVROE; inline;
  7772. procedure setCVRR; inline;
  7773. procedure setCVRSS; inline;
  7774. procedure setON; inline;
  7775. property CVR : TBits_4 read getCVR write setCVR;
  7776. property CVR0 : TBits_1 read getCVR0 write setCVR0;
  7777. property CVR1 : TBits_1 read getCVR1 write setCVR1;
  7778. property CVR2 : TBits_1 read getCVR2 write setCVR2;
  7779. property CVR3 : TBits_1 read getCVR3 write setCVR3;
  7780. property CVROE : TBits_1 read getCVROE write setCVROE;
  7781. property CVRR : TBits_1 read getCVRR write setCVRR;
  7782. property CVRSS : TBits_1 read getCVRSS write setCVRSS;
  7783. property ON : TBits_1 read getON write setON;
  7784. property w : TBits_32 read getw write setw;
  7785. end;
  7786. type
  7787. TCVRRegisters = record
  7788. CVRCONbits : TCVR_CVRCON;
  7789. CVRCON : longWord;
  7790. CVRCONCLR : longWord;
  7791. CVRCONSET : longWord;
  7792. CVRCONINV : longWord;
  7793. end;
  7794. TCMP_CM1CON = record
  7795. private
  7796. function getCCH : TBits_2; inline;
  7797. function getCCH0 : TBits_1; inline;
  7798. function getCCH1 : TBits_1; inline;
  7799. function getCOE : TBits_1; inline;
  7800. function getCOUT : TBits_1; inline;
  7801. function getCPOL : TBits_1; inline;
  7802. function getCREF : TBits_1; inline;
  7803. function getEVPOL : TBits_2; inline;
  7804. function getEVPOL0 : TBits_1; inline;
  7805. function getEVPOL1 : TBits_1; inline;
  7806. function getON : TBits_1; inline;
  7807. function getw : TBits_32; inline;
  7808. procedure setCCH(thebits : TBits_2); inline;
  7809. procedure setCCH0(thebits : TBits_1); inline;
  7810. procedure setCCH1(thebits : TBits_1); inline;
  7811. procedure setCOE(thebits : TBits_1); inline;
  7812. procedure setCOUT(thebits : TBits_1); inline;
  7813. procedure setCPOL(thebits : TBits_1); inline;
  7814. procedure setCREF(thebits : TBits_1); inline;
  7815. procedure setEVPOL(thebits : TBits_2); inline;
  7816. procedure setEVPOL0(thebits : TBits_1); inline;
  7817. procedure setEVPOL1(thebits : TBits_1); inline;
  7818. procedure setON(thebits : TBits_1); inline;
  7819. procedure setw(thebits : TBits_32); inline;
  7820. public
  7821. procedure clearCCH0; inline;
  7822. procedure clearCCH1; inline;
  7823. procedure clearCOE; inline;
  7824. procedure clearCOUT; inline;
  7825. procedure clearCPOL; inline;
  7826. procedure clearCREF; inline;
  7827. procedure clearEVPOL0; inline;
  7828. procedure clearEVPOL1; inline;
  7829. procedure clearON; inline;
  7830. procedure setCCH0; inline;
  7831. procedure setCCH1; inline;
  7832. procedure setCOE; inline;
  7833. procedure setCOUT; inline;
  7834. procedure setCPOL; inline;
  7835. procedure setCREF; inline;
  7836. procedure setEVPOL0; inline;
  7837. procedure setEVPOL1; inline;
  7838. procedure setON; inline;
  7839. property CCH : TBits_2 read getCCH write setCCH;
  7840. property CCH0 : TBits_1 read getCCH0 write setCCH0;
  7841. property CCH1 : TBits_1 read getCCH1 write setCCH1;
  7842. property COE : TBits_1 read getCOE write setCOE;
  7843. property COUT : TBits_1 read getCOUT write setCOUT;
  7844. property CPOL : TBits_1 read getCPOL write setCPOL;
  7845. property CREF : TBits_1 read getCREF write setCREF;
  7846. property EVPOL : TBits_2 read getEVPOL write setEVPOL;
  7847. property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
  7848. property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
  7849. property ON : TBits_1 read getON write setON;
  7850. property w : TBits_32 read getw write setw;
  7851. end;
  7852. TCMP_CM2CON = record
  7853. private
  7854. function getCCH : TBits_2; inline;
  7855. function getCCH0 : TBits_1; inline;
  7856. function getCCH1 : TBits_1; inline;
  7857. function getCOE : TBits_1; inline;
  7858. function getCOUT : TBits_1; inline;
  7859. function getCPOL : TBits_1; inline;
  7860. function getCREF : TBits_1; inline;
  7861. function getEVPOL : TBits_2; inline;
  7862. function getEVPOL0 : TBits_1; inline;
  7863. function getEVPOL1 : TBits_1; inline;
  7864. function getON : TBits_1; inline;
  7865. function getw : TBits_32; inline;
  7866. procedure setCCH(thebits : TBits_2); inline;
  7867. procedure setCCH0(thebits : TBits_1); inline;
  7868. procedure setCCH1(thebits : TBits_1); inline;
  7869. procedure setCOE(thebits : TBits_1); inline;
  7870. procedure setCOUT(thebits : TBits_1); inline;
  7871. procedure setCPOL(thebits : TBits_1); inline;
  7872. procedure setCREF(thebits : TBits_1); inline;
  7873. procedure setEVPOL(thebits : TBits_2); inline;
  7874. procedure setEVPOL0(thebits : TBits_1); inline;
  7875. procedure setEVPOL1(thebits : TBits_1); inline;
  7876. procedure setON(thebits : TBits_1); inline;
  7877. procedure setw(thebits : TBits_32); inline;
  7878. public
  7879. procedure clearCCH0; inline;
  7880. procedure clearCCH1; inline;
  7881. procedure clearCOE; inline;
  7882. procedure clearCOUT; inline;
  7883. procedure clearCPOL; inline;
  7884. procedure clearCREF; inline;
  7885. procedure clearEVPOL0; inline;
  7886. procedure clearEVPOL1; inline;
  7887. procedure clearON; inline;
  7888. procedure setCCH0; inline;
  7889. procedure setCCH1; inline;
  7890. procedure setCOE; inline;
  7891. procedure setCOUT; inline;
  7892. procedure setCPOL; inline;
  7893. procedure setCREF; inline;
  7894. procedure setEVPOL0; inline;
  7895. procedure setEVPOL1; inline;
  7896. procedure setON; inline;
  7897. property CCH : TBits_2 read getCCH write setCCH;
  7898. property CCH0 : TBits_1 read getCCH0 write setCCH0;
  7899. property CCH1 : TBits_1 read getCCH1 write setCCH1;
  7900. property COE : TBits_1 read getCOE write setCOE;
  7901. property COUT : TBits_1 read getCOUT write setCOUT;
  7902. property CPOL : TBits_1 read getCPOL write setCPOL;
  7903. property CREF : TBits_1 read getCREF write setCREF;
  7904. property EVPOL : TBits_2 read getEVPOL write setEVPOL;
  7905. property EVPOL0 : TBits_1 read getEVPOL0 write setEVPOL0;
  7906. property EVPOL1 : TBits_1 read getEVPOL1 write setEVPOL1;
  7907. property ON : TBits_1 read getON write setON;
  7908. property w : TBits_32 read getw write setw;
  7909. end;
  7910. TCMP_CMSTAT = record
  7911. private
  7912. function getC1OUT : TBits_1; inline;
  7913. function getC2OUT : TBits_1; inline;
  7914. function getSIDL : TBits_1; inline;
  7915. function getw : TBits_32; inline;
  7916. procedure setC1OUT(thebits : TBits_1); inline;
  7917. procedure setC2OUT(thebits : TBits_1); inline;
  7918. procedure setSIDL(thebits : TBits_1); inline;
  7919. procedure setw(thebits : TBits_32); inline;
  7920. public
  7921. procedure clearC1OUT; inline;
  7922. procedure clearC2OUT; inline;
  7923. procedure clearSIDL; inline;
  7924. procedure setC1OUT; inline;
  7925. procedure setC2OUT; inline;
  7926. procedure setSIDL; inline;
  7927. property C1OUT : TBits_1 read getC1OUT write setC1OUT;
  7928. property C2OUT : TBits_1 read getC2OUT write setC2OUT;
  7929. property SIDL : TBits_1 read getSIDL write setSIDL;
  7930. property w : TBits_32 read getw write setw;
  7931. end;
  7932. type
  7933. TCMPRegisters = record
  7934. CM1CONbits : TCMP_CM1CON;
  7935. CM1CON : longWord;
  7936. CM1CONCLR : longWord;
  7937. CM1CONSET : longWord;
  7938. CM1CONINV : longWord;
  7939. CM2CONbits : TCMP_CM2CON;
  7940. CM2CON : longWord;
  7941. CM2CONCLR : longWord;
  7942. CM2CONSET : longWord;
  7943. CM2CONINV : longWord;
  7944. CMSTATbits : TCMP_CMSTAT;
  7945. CMSTAT : longWord;
  7946. CMSTATCLR : longWord;
  7947. CMSTATSET : longWord;
  7948. CMSTATINV : longWord;
  7949. end;
  7950. TOSC_OSCCON = record
  7951. private
  7952. function getCF : TBits_1; inline;
  7953. function getCLKLOCK : TBits_1; inline;
  7954. function getCOSC : TBits_3; inline;
  7955. function getCOSC0 : TBits_1; inline;
  7956. function getCOSC1 : TBits_1; inline;
  7957. function getCOSC2 : TBits_1; inline;
  7958. function getFRCDIV : TBits_3; inline;
  7959. function getFRCDIV0 : TBits_1; inline;
  7960. function getFRCDIV1 : TBits_1; inline;
  7961. function getFRCDIV2 : TBits_1; inline;
  7962. function getNOSC : TBits_3; inline;
  7963. function getNOSC0 : TBits_1; inline;
  7964. function getNOSC1 : TBits_1; inline;
  7965. function getNOSC2 : TBits_1; inline;
  7966. function getOSWEN : TBits_1; inline;
  7967. function getPBDIV : TBits_2; inline;
  7968. function getPBDIV0 : TBits_1; inline;
  7969. function getPBDIV1 : TBits_1; inline;
  7970. function getPLLMULT : TBits_3; inline;
  7971. function getPLLMULT0 : TBits_1; inline;
  7972. function getPLLMULT1 : TBits_1; inline;
  7973. function getPLLMULT2 : TBits_1; inline;
  7974. function getPLLODIV : TBits_3; inline;
  7975. function getPLLODIV0 : TBits_1; inline;
  7976. function getPLLODIV1 : TBits_1; inline;
  7977. function getPLLODIV2 : TBits_1; inline;
  7978. function getSLOCK : TBits_1; inline;
  7979. function getSLPEN : TBits_1; inline;
  7980. function getSOSCEN : TBits_1; inline;
  7981. function getSOSCRDY : TBits_1; inline;
  7982. function getUFRCEN : TBits_1; inline;
  7983. function getULOCK : TBits_1; inline;
  7984. function getw : TBits_32; inline;
  7985. procedure setCF(thebits : TBits_1); inline;
  7986. procedure setCLKLOCK(thebits : TBits_1); inline;
  7987. procedure setCOSC(thebits : TBits_3); inline;
  7988. procedure setCOSC0(thebits : TBits_1); inline;
  7989. procedure setCOSC1(thebits : TBits_1); inline;
  7990. procedure setCOSC2(thebits : TBits_1); inline;
  7991. procedure setFRCDIV(thebits : TBits_3); inline;
  7992. procedure setFRCDIV0(thebits : TBits_1); inline;
  7993. procedure setFRCDIV1(thebits : TBits_1); inline;
  7994. procedure setFRCDIV2(thebits : TBits_1); inline;
  7995. procedure setNOSC(thebits : TBits_3); inline;
  7996. procedure setNOSC0(thebits : TBits_1); inline;
  7997. procedure setNOSC1(thebits : TBits_1); inline;
  7998. procedure setNOSC2(thebits : TBits_1); inline;
  7999. procedure setOSWEN(thebits : TBits_1); inline;
  8000. procedure setPBDIV(thebits : TBits_2); inline;
  8001. procedure setPBDIV0(thebits : TBits_1); inline;
  8002. procedure setPBDIV1(thebits : TBits_1); inline;
  8003. procedure setPLLMULT(thebits : TBits_3); inline;
  8004. procedure setPLLMULT0(thebits : TBits_1); inline;
  8005. procedure setPLLMULT1(thebits : TBits_1); inline;
  8006. procedure setPLLMULT2(thebits : TBits_1); inline;
  8007. procedure setPLLODIV(thebits : TBits_3); inline;
  8008. procedure setPLLODIV0(thebits : TBits_1); inline;
  8009. procedure setPLLODIV1(thebits : TBits_1); inline;
  8010. procedure setPLLODIV2(thebits : TBits_1); inline;
  8011. procedure setSLOCK(thebits : TBits_1); inline;
  8012. procedure setSLPEN(thebits : TBits_1); inline;
  8013. procedure setSOSCEN(thebits : TBits_1); inline;
  8014. procedure setSOSCRDY(thebits : TBits_1); inline;
  8015. procedure setUFRCEN(thebits : TBits_1); inline;
  8016. procedure setULOCK(thebits : TBits_1); inline;
  8017. procedure setw(thebits : TBits_32); inline;
  8018. public
  8019. procedure clearCF; inline;
  8020. procedure clearCLKLOCK; inline;
  8021. procedure clearCOSC0; inline;
  8022. procedure clearCOSC1; inline;
  8023. procedure clearCOSC2; inline;
  8024. procedure clearFRCDIV0; inline;
  8025. procedure clearFRCDIV1; inline;
  8026. procedure clearFRCDIV2; inline;
  8027. procedure clearNOSC0; inline;
  8028. procedure clearNOSC1; inline;
  8029. procedure clearNOSC2; inline;
  8030. procedure clearOSWEN; inline;
  8031. procedure clearPBDIV0; inline;
  8032. procedure clearPBDIV1; inline;
  8033. procedure clearPLLMULT0; inline;
  8034. procedure clearPLLMULT1; inline;
  8035. procedure clearPLLMULT2; inline;
  8036. procedure clearPLLODIV0; inline;
  8037. procedure clearPLLODIV1; inline;
  8038. procedure clearPLLODIV2; inline;
  8039. procedure clearSLOCK; inline;
  8040. procedure clearSLPEN; inline;
  8041. procedure clearSOSCEN; inline;
  8042. procedure clearSOSCRDY; inline;
  8043. procedure clearUFRCEN; inline;
  8044. procedure clearULOCK; inline;
  8045. procedure setCF; inline;
  8046. procedure setCLKLOCK; inline;
  8047. procedure setCOSC0; inline;
  8048. procedure setCOSC1; inline;
  8049. procedure setCOSC2; inline;
  8050. procedure setFRCDIV0; inline;
  8051. procedure setFRCDIV1; inline;
  8052. procedure setFRCDIV2; inline;
  8053. procedure setNOSC0; inline;
  8054. procedure setNOSC1; inline;
  8055. procedure setNOSC2; inline;
  8056. procedure setOSWEN; inline;
  8057. procedure setPBDIV0; inline;
  8058. procedure setPBDIV1; inline;
  8059. procedure setPLLMULT0; inline;
  8060. procedure setPLLMULT1; inline;
  8061. procedure setPLLMULT2; inline;
  8062. procedure setPLLODIV0; inline;
  8063. procedure setPLLODIV1; inline;
  8064. procedure setPLLODIV2; inline;
  8065. procedure setSLOCK; inline;
  8066. procedure setSLPEN; inline;
  8067. procedure setSOSCEN; inline;
  8068. procedure setSOSCRDY; inline;
  8069. procedure setUFRCEN; inline;
  8070. procedure setULOCK; inline;
  8071. property CF : TBits_1 read getCF write setCF;
  8072. property CLKLOCK : TBits_1 read getCLKLOCK write setCLKLOCK;
  8073. property COSC : TBits_3 read getCOSC write setCOSC;
  8074. property COSC0 : TBits_1 read getCOSC0 write setCOSC0;
  8075. property COSC1 : TBits_1 read getCOSC1 write setCOSC1;
  8076. property COSC2 : TBits_1 read getCOSC2 write setCOSC2;
  8077. property FRCDIV : TBits_3 read getFRCDIV write setFRCDIV;
  8078. property FRCDIV0 : TBits_1 read getFRCDIV0 write setFRCDIV0;
  8079. property FRCDIV1 : TBits_1 read getFRCDIV1 write setFRCDIV1;
  8080. property FRCDIV2 : TBits_1 read getFRCDIV2 write setFRCDIV2;
  8081. property NOSC : TBits_3 read getNOSC write setNOSC;
  8082. property NOSC0 : TBits_1 read getNOSC0 write setNOSC0;
  8083. property NOSC1 : TBits_1 read getNOSC1 write setNOSC1;
  8084. property NOSC2 : TBits_1 read getNOSC2 write setNOSC2;
  8085. property OSWEN : TBits_1 read getOSWEN write setOSWEN;
  8086. property PBDIV : TBits_2 read getPBDIV write setPBDIV;
  8087. property PBDIV0 : TBits_1 read getPBDIV0 write setPBDIV0;
  8088. property PBDIV1 : TBits_1 read getPBDIV1 write setPBDIV1;
  8089. property PLLMULT : TBits_3 read getPLLMULT write setPLLMULT;
  8090. property PLLMULT0 : TBits_1 read getPLLMULT0 write setPLLMULT0;
  8091. property PLLMULT1 : TBits_1 read getPLLMULT1 write setPLLMULT1;
  8092. property PLLMULT2 : TBits_1 read getPLLMULT2 write setPLLMULT2;
  8093. property PLLODIV : TBits_3 read getPLLODIV write setPLLODIV;
  8094. property PLLODIV0 : TBits_1 read getPLLODIV0 write setPLLODIV0;
  8095. property PLLODIV1 : TBits_1 read getPLLODIV1 write setPLLODIV1;
  8096. property PLLODIV2 : TBits_1 read getPLLODIV2 write setPLLODIV2;
  8097. property SLOCK : TBits_1 read getSLOCK write setSLOCK;
  8098. property SLPEN : TBits_1 read getSLPEN write setSLPEN;
  8099. property SOSCEN : TBits_1 read getSOSCEN write setSOSCEN;
  8100. property SOSCRDY : TBits_1 read getSOSCRDY write setSOSCRDY;
  8101. property UFRCEN : TBits_1 read getUFRCEN write setUFRCEN;
  8102. property ULOCK : TBits_1 read getULOCK write setULOCK;
  8103. property w : TBits_32 read getw write setw;
  8104. end;
  8105. TOSC_OSCTUN = record
  8106. private
  8107. function getTUN : TBits_6; inline;
  8108. function getTUN0 : TBits_1; inline;
  8109. function getTUN1 : TBits_1; inline;
  8110. function getTUN2 : TBits_1; inline;
  8111. function getTUN3 : TBits_1; inline;
  8112. function getTUN4 : TBits_1; inline;
  8113. function getTUN5 : TBits_1; inline;
  8114. function getw : TBits_32; inline;
  8115. procedure setTUN(thebits : TBits_6); inline;
  8116. procedure setTUN0(thebits : TBits_1); inline;
  8117. procedure setTUN1(thebits : TBits_1); inline;
  8118. procedure setTUN2(thebits : TBits_1); inline;
  8119. procedure setTUN3(thebits : TBits_1); inline;
  8120. procedure setTUN4(thebits : TBits_1); inline;
  8121. procedure setTUN5(thebits : TBits_1); inline;
  8122. procedure setw(thebits : TBits_32); inline;
  8123. public
  8124. procedure clearTUN0; inline;
  8125. procedure clearTUN1; inline;
  8126. procedure clearTUN2; inline;
  8127. procedure clearTUN3; inline;
  8128. procedure clearTUN4; inline;
  8129. procedure clearTUN5; inline;
  8130. procedure setTUN0; inline;
  8131. procedure setTUN1; inline;
  8132. procedure setTUN2; inline;
  8133. procedure setTUN3; inline;
  8134. procedure setTUN4; inline;
  8135. procedure setTUN5; inline;
  8136. property TUN : TBits_6 read getTUN write setTUN;
  8137. property TUN0 : TBits_1 read getTUN0 write setTUN0;
  8138. property TUN1 : TBits_1 read getTUN1 write setTUN1;
  8139. property TUN2 : TBits_1 read getTUN2 write setTUN2;
  8140. property TUN3 : TBits_1 read getTUN3 write setTUN3;
  8141. property TUN4 : TBits_1 read getTUN4 write setTUN4;
  8142. property TUN5 : TBits_1 read getTUN5 write setTUN5;
  8143. property w : TBits_32 read getw write setw;
  8144. end;
  8145. type
  8146. TOSCRegisters = record
  8147. OSCCONbits : TOSC_OSCCON;
  8148. OSCCON : longWord;
  8149. OSCCONCLR : longWord;
  8150. OSCCONSET : longWord;
  8151. OSCCONINV : longWord;
  8152. OSCTUNbits : TOSC_OSCTUN;
  8153. OSCTUN : longWord;
  8154. OSCTUNCLR : longWord;
  8155. OSCTUNSET : longWord;
  8156. OSCTUNINV : longWord;
  8157. end;
  8158. type
  8159. TCFGRegisters = record
  8160. DDPCON : longWord;
  8161. DEVID : longWord;
  8162. SYSKEY : longWord;
  8163. SYSKEYCLR : longWord;
  8164. SYSKEYSET : longWord;
  8165. SYSKEYINV : longWord;
  8166. end;
  8167. TNVM_NVMCON = record
  8168. private
  8169. function getLVDERR : TBits_1; inline;
  8170. function getLVDSTAT : TBits_1; inline;
  8171. function getNVMOP : TBits_4; inline;
  8172. function getNVMOP0 : TBits_1; inline;
  8173. function getNVMOP1 : TBits_1; inline;
  8174. function getNVMOP2 : TBits_1; inline;
  8175. function getNVMOP3 : TBits_1; inline;
  8176. function getPROGOP : TBits_4; inline;
  8177. function getPROGOP0 : TBits_1; inline;
  8178. function getPROGOP1 : TBits_1; inline;
  8179. function getPROGOP2 : TBits_1; inline;
  8180. function getPROGOP3 : TBits_1; inline;
  8181. function getWR : TBits_1; inline;
  8182. function getWREN : TBits_1; inline;
  8183. function getWRERR : TBits_1; inline;
  8184. function getw : TBits_32; inline;
  8185. procedure setLVDERR(thebits : TBits_1); inline;
  8186. procedure setLVDSTAT(thebits : TBits_1); inline;
  8187. procedure setNVMOP(thebits : TBits_4); inline;
  8188. procedure setNVMOP0(thebits : TBits_1); inline;
  8189. procedure setNVMOP1(thebits : TBits_1); inline;
  8190. procedure setNVMOP2(thebits : TBits_1); inline;
  8191. procedure setNVMOP3(thebits : TBits_1); inline;
  8192. procedure setPROGOP(thebits : TBits_4); inline;
  8193. procedure setPROGOP0(thebits : TBits_1); inline;
  8194. procedure setPROGOP1(thebits : TBits_1); inline;
  8195. procedure setPROGOP2(thebits : TBits_1); inline;
  8196. procedure setPROGOP3(thebits : TBits_1); inline;
  8197. procedure setWR(thebits : TBits_1); inline;
  8198. procedure setWREN(thebits : TBits_1); inline;
  8199. procedure setWRERR(thebits : TBits_1); inline;
  8200. procedure setw(thebits : TBits_32); inline;
  8201. public
  8202. procedure clearLVDERR; inline;
  8203. procedure clearLVDSTAT; inline;
  8204. procedure clearNVMOP0; inline;
  8205. procedure clearNVMOP1; inline;
  8206. procedure clearNVMOP2; inline;
  8207. procedure clearNVMOP3; inline;
  8208. procedure clearPROGOP0; inline;
  8209. procedure clearPROGOP1; inline;
  8210. procedure clearPROGOP2; inline;
  8211. procedure clearPROGOP3; inline;
  8212. procedure clearWR; inline;
  8213. procedure clearWREN; inline;
  8214. procedure clearWRERR; inline;
  8215. procedure setLVDERR; inline;
  8216. procedure setLVDSTAT; inline;
  8217. procedure setNVMOP0; inline;
  8218. procedure setNVMOP1; inline;
  8219. procedure setNVMOP2; inline;
  8220. procedure setNVMOP3; inline;
  8221. procedure setPROGOP0; inline;
  8222. procedure setPROGOP1; inline;
  8223. procedure setPROGOP2; inline;
  8224. procedure setPROGOP3; inline;
  8225. procedure setWR; inline;
  8226. procedure setWREN; inline;
  8227. procedure setWRERR; inline;
  8228. property LVDERR : TBits_1 read getLVDERR write setLVDERR;
  8229. property LVDSTAT : TBits_1 read getLVDSTAT write setLVDSTAT;
  8230. property NVMOP : TBits_4 read getNVMOP write setNVMOP;
  8231. property NVMOP0 : TBits_1 read getNVMOP0 write setNVMOP0;
  8232. property NVMOP1 : TBits_1 read getNVMOP1 write setNVMOP1;
  8233. property NVMOP2 : TBits_1 read getNVMOP2 write setNVMOP2;
  8234. property NVMOP3 : TBits_1 read getNVMOP3 write setNVMOP3;
  8235. property PROGOP : TBits_4 read getPROGOP write setPROGOP;
  8236. property PROGOP0 : TBits_1 read getPROGOP0 write setPROGOP0;
  8237. property PROGOP1 : TBits_1 read getPROGOP1 write setPROGOP1;
  8238. property PROGOP2 : TBits_1 read getPROGOP2 write setPROGOP2;
  8239. property PROGOP3 : TBits_1 read getPROGOP3 write setPROGOP3;
  8240. property WR : TBits_1 read getWR write setWR;
  8241. property WREN : TBits_1 read getWREN write setWREN;
  8242. property WRERR : TBits_1 read getWRERR write setWRERR;
  8243. property w : TBits_32 read getw write setw;
  8244. end;
  8245. type
  8246. TNVMRegisters = record
  8247. NVMCONbits : TNVM_NVMCON;
  8248. NVMCON : longWord;
  8249. NVMCONCLR : longWord;
  8250. NVMCONSET : longWord;
  8251. NVMCONINV : longWord;
  8252. NVMKEY : longWord;
  8253. NVMADDR : longWord;
  8254. NVMADDRCLR : longWord;
  8255. NVMADDRSET : longWord;
  8256. NVMADDRINV : longWord;
  8257. NVMDATA : longWord;
  8258. NVMSRCADDR : longWord;
  8259. end;
  8260. TRCON_RCON = record
  8261. private
  8262. function getBOR : TBits_1; inline;
  8263. function getCMR : TBits_1; inline;
  8264. function getEXTR : TBits_1; inline;
  8265. function getIDLE : TBits_1; inline;
  8266. function getPOR : TBits_1; inline;
  8267. function getSLEEP : TBits_1; inline;
  8268. function getSWR : TBits_1; inline;
  8269. function getVREGS : TBits_1; inline;
  8270. function getWDTO : TBits_1; inline;
  8271. function getw : TBits_32; inline;
  8272. procedure setBOR(thebits : TBits_1); inline;
  8273. procedure setCMR(thebits : TBits_1); inline;
  8274. procedure setEXTR(thebits : TBits_1); inline;
  8275. procedure setIDLE(thebits : TBits_1); inline;
  8276. procedure setPOR(thebits : TBits_1); inline;
  8277. procedure setSLEEP(thebits : TBits_1); inline;
  8278. procedure setSWR(thebits : TBits_1); inline;
  8279. procedure setVREGS(thebits : TBits_1); inline;
  8280. procedure setWDTO(thebits : TBits_1); inline;
  8281. procedure setw(thebits : TBits_32); inline;
  8282. public
  8283. procedure clearBOR; inline;
  8284. procedure clearCMR; inline;
  8285. procedure clearEXTR; inline;
  8286. procedure clearIDLE; inline;
  8287. procedure clearPOR; inline;
  8288. procedure clearSLEEP; inline;
  8289. procedure clearSWR; inline;
  8290. procedure clearVREGS; inline;
  8291. procedure clearWDTO; inline;
  8292. procedure setBOR; inline;
  8293. procedure setCMR; inline;
  8294. procedure setEXTR; inline;
  8295. procedure setIDLE; inline;
  8296. procedure setPOR; inline;
  8297. procedure setSLEEP; inline;
  8298. procedure setSWR; inline;
  8299. procedure setVREGS; inline;
  8300. procedure setWDTO; inline;
  8301. property BOR : TBits_1 read getBOR write setBOR;
  8302. property CMR : TBits_1 read getCMR write setCMR;
  8303. property EXTR : TBits_1 read getEXTR write setEXTR;
  8304. property IDLE : TBits_1 read getIDLE write setIDLE;
  8305. property POR : TBits_1 read getPOR write setPOR;
  8306. property SLEEP : TBits_1 read getSLEEP write setSLEEP;
  8307. property SWR : TBits_1 read getSWR write setSWR;
  8308. property VREGS : TBits_1 read getVREGS write setVREGS;
  8309. property WDTO : TBits_1 read getWDTO write setWDTO;
  8310. property w : TBits_32 read getw write setw;
  8311. end;
  8312. TRCON_RSWRST = record
  8313. private
  8314. function getSWRST : TBits_1; inline;
  8315. function getw : TBits_32; inline;
  8316. procedure setSWRST(thebits : TBits_1); inline;
  8317. procedure setw(thebits : TBits_32); inline;
  8318. public
  8319. procedure clearSWRST; inline;
  8320. procedure setSWRST; inline;
  8321. property SWRST : TBits_1 read getSWRST write setSWRST;
  8322. property w : TBits_32 read getw write setw;
  8323. end;
  8324. type
  8325. TRCONRegisters = record
  8326. RCONbits : TRCON_RCON;
  8327. RCON : longWord;
  8328. RCONCLR : longWord;
  8329. RCONSET : longWord;
  8330. RCONINV : longWord;
  8331. RSWRSTbits : TRCON_RSWRST;
  8332. RSWRST : longWord;
  8333. RSWRSTCLR : longWord;
  8334. RSWRSTSET : longWord;
  8335. RSWRSTINV : longWord;
  8336. end;
  8337. type
  8338. T_DDPSTATRegisters = record
  8339. _DDPSTAT : longWord;
  8340. end;
  8341. type
  8342. T_STRORegisters = record
  8343. _STRO : longWord;
  8344. _STROCLR : longWord;
  8345. _STROSET : longWord;
  8346. _STROINV : longWord;
  8347. end;
  8348. type
  8349. T_APPORegisters = record
  8350. _APPO : longWord;
  8351. _APPOCLR : longWord;
  8352. _APPOSET : longWord;
  8353. _APPOINV : longWord;
  8354. end;
  8355. type
  8356. T_APPIRegisters = record
  8357. _APPI : longWord;
  8358. end;
  8359. TINT_INTCON = record
  8360. private
  8361. function getFRZ : TBits_1; inline;
  8362. function getINT0EP : TBits_1; inline;
  8363. function getINT1EP : TBits_1; inline;
  8364. function getINT2EP : TBits_1; inline;
  8365. function getINT3EP : TBits_1; inline;
  8366. function getINT4EP : TBits_1; inline;
  8367. function getMVEC : TBits_1; inline;
  8368. function getSS0 : TBits_1; inline;
  8369. function getTPC : TBits_3; inline;
  8370. function getw : TBits_32; inline;
  8371. procedure setFRZ(thebits : TBits_1); inline;
  8372. procedure setINT0EP(thebits : TBits_1); inline;
  8373. procedure setINT1EP(thebits : TBits_1); inline;
  8374. procedure setINT2EP(thebits : TBits_1); inline;
  8375. procedure setINT3EP(thebits : TBits_1); inline;
  8376. procedure setINT4EP(thebits : TBits_1); inline;
  8377. procedure setMVEC(thebits : TBits_1); inline;
  8378. procedure setSS0(thebits : TBits_1); inline;
  8379. procedure setTPC(thebits : TBits_3); inline;
  8380. procedure setw(thebits : TBits_32); inline;
  8381. public
  8382. procedure clearFRZ; inline;
  8383. procedure clearINT0EP; inline;
  8384. procedure clearINT1EP; inline;
  8385. procedure clearINT2EP; inline;
  8386. procedure clearINT3EP; inline;
  8387. procedure clearINT4EP; inline;
  8388. procedure clearMVEC; inline;
  8389. procedure clearSS0; inline;
  8390. procedure setFRZ; inline;
  8391. procedure setINT0EP; inline;
  8392. procedure setINT1EP; inline;
  8393. procedure setINT2EP; inline;
  8394. procedure setINT3EP; inline;
  8395. procedure setINT4EP; inline;
  8396. procedure setMVEC; inline;
  8397. procedure setSS0; inline;
  8398. property FRZ : TBits_1 read getFRZ write setFRZ;
  8399. property INT0EP : TBits_1 read getINT0EP write setINT0EP;
  8400. property INT1EP : TBits_1 read getINT1EP write setINT1EP;
  8401. property INT2EP : TBits_1 read getINT2EP write setINT2EP;
  8402. property INT3EP : TBits_1 read getINT3EP write setINT3EP;
  8403. property INT4EP : TBits_1 read getINT4EP write setINT4EP;
  8404. property MVEC : TBits_1 read getMVEC write setMVEC;
  8405. property SS0 : TBits_1 read getSS0 write setSS0;
  8406. property TPC : TBits_3 read getTPC write setTPC;
  8407. property w : TBits_32 read getw write setw;
  8408. end;
  8409. TINT_IFS0 = record
  8410. private
  8411. function getCS0IF : TBits_1; inline;
  8412. function getCS1IF : TBits_1; inline;
  8413. function getCTIF : TBits_1; inline;
  8414. function getI2C1ABIF : TBits_1; inline;
  8415. function getI2C1AMIF : TBits_1; inline;
  8416. function getI2C1ASIF : TBits_1; inline;
  8417. function getI2C1BIF : TBits_1; inline;
  8418. function getI2C1MIF : TBits_1; inline;
  8419. function getI2C1SIF : TBits_1; inline;
  8420. function getI2C3BIF : TBits_1; inline;
  8421. function getI2C3MIF : TBits_1; inline;
  8422. function getI2C3SIF : TBits_1; inline;
  8423. function getIC1IF : TBits_1; inline;
  8424. function getIC2IF : TBits_1; inline;
  8425. function getIC3IF : TBits_1; inline;
  8426. function getIC4IF : TBits_1; inline;
  8427. function getIC5IF : TBits_1; inline;
  8428. function getINT0IF : TBits_1; inline;
  8429. function getINT1IF : TBits_1; inline;
  8430. function getINT2IF : TBits_1; inline;
  8431. function getINT3IF : TBits_1; inline;
  8432. function getINT4IF : TBits_1; inline;
  8433. function getOC1IF : TBits_1; inline;
  8434. function getOC2IF : TBits_1; inline;
  8435. function getOC3IF : TBits_1; inline;
  8436. function getOC4IF : TBits_1; inline;
  8437. function getOC5IF : TBits_1; inline;
  8438. function getSPI1AEIF : TBits_1; inline;
  8439. function getSPI1ARXIF : TBits_1; inline;
  8440. function getSPI1ATXIF : TBits_1; inline;
  8441. function getSPI1EIF : TBits_1; inline;
  8442. function getSPI1RXIF : TBits_1; inline;
  8443. function getSPI1TXIF : TBits_1; inline;
  8444. function getSPI3EIF : TBits_1; inline;
  8445. function getSPI3RXIF : TBits_1; inline;
  8446. function getSPI3TXIF : TBits_1; inline;
  8447. function getT1IF : TBits_1; inline;
  8448. function getT2IF : TBits_1; inline;
  8449. function getT3IF : TBits_1; inline;
  8450. function getT4IF : TBits_1; inline;
  8451. function getT5IF : TBits_1; inline;
  8452. function getU1AEIF : TBits_1; inline;
  8453. function getU1ARXIF : TBits_1; inline;
  8454. function getU1ATXIF : TBits_1; inline;
  8455. function getU1EIF : TBits_1; inline;
  8456. function getU1RXIF : TBits_1; inline;
  8457. function getU1TXIF : TBits_1; inline;
  8458. function getw : TBits_32; inline;
  8459. procedure setCS0IF(thebits : TBits_1); inline;
  8460. procedure setCS1IF(thebits : TBits_1); inline;
  8461. procedure setCTIF(thebits : TBits_1); inline;
  8462. procedure setI2C1ABIF(thebits : TBits_1); inline;
  8463. procedure setI2C1AMIF(thebits : TBits_1); inline;
  8464. procedure setI2C1ASIF(thebits : TBits_1); inline;
  8465. procedure setI2C1BIF(thebits : TBits_1); inline;
  8466. procedure setI2C1MIF(thebits : TBits_1); inline;
  8467. procedure setI2C1SIF(thebits : TBits_1); inline;
  8468. procedure setI2C3BIF(thebits : TBits_1); inline;
  8469. procedure setI2C3MIF(thebits : TBits_1); inline;
  8470. procedure setI2C3SIF(thebits : TBits_1); inline;
  8471. procedure setIC1IF(thebits : TBits_1); inline;
  8472. procedure setIC2IF(thebits : TBits_1); inline;
  8473. procedure setIC3IF(thebits : TBits_1); inline;
  8474. procedure setIC4IF(thebits : TBits_1); inline;
  8475. procedure setIC5IF(thebits : TBits_1); inline;
  8476. procedure setINT0IF(thebits : TBits_1); inline;
  8477. procedure setINT1IF(thebits : TBits_1); inline;
  8478. procedure setINT2IF(thebits : TBits_1); inline;
  8479. procedure setINT3IF(thebits : TBits_1); inline;
  8480. procedure setINT4IF(thebits : TBits_1); inline;
  8481. procedure setOC1IF(thebits : TBits_1); inline;
  8482. procedure setOC2IF(thebits : TBits_1); inline;
  8483. procedure setOC3IF(thebits : TBits_1); inline;
  8484. procedure setOC4IF(thebits : TBits_1); inline;
  8485. procedure setOC5IF(thebits : TBits_1); inline;
  8486. procedure setSPI1AEIF(thebits : TBits_1); inline;
  8487. procedure setSPI1ARXIF(thebits : TBits_1); inline;
  8488. procedure setSPI1ATXIF(thebits : TBits_1); inline;
  8489. procedure setSPI1EIF(thebits : TBits_1); inline;
  8490. procedure setSPI1RXIF(thebits : TBits_1); inline;
  8491. procedure setSPI1TXIF(thebits : TBits_1); inline;
  8492. procedure setSPI3EIF(thebits : TBits_1); inline;
  8493. procedure setSPI3RXIF(thebits : TBits_1); inline;
  8494. procedure setSPI3TXIF(thebits : TBits_1); inline;
  8495. procedure setT1IF(thebits : TBits_1); inline;
  8496. procedure setT2IF(thebits : TBits_1); inline;
  8497. procedure setT3IF(thebits : TBits_1); inline;
  8498. procedure setT4IF(thebits : TBits_1); inline;
  8499. procedure setT5IF(thebits : TBits_1); inline;
  8500. procedure setU1AEIF(thebits : TBits_1); inline;
  8501. procedure setU1ARXIF(thebits : TBits_1); inline;
  8502. procedure setU1ATXIF(thebits : TBits_1); inline;
  8503. procedure setU1EIF(thebits : TBits_1); inline;
  8504. procedure setU1RXIF(thebits : TBits_1); inline;
  8505. procedure setU1TXIF(thebits : TBits_1); inline;
  8506. procedure setw(thebits : TBits_32); inline;
  8507. public
  8508. procedure clearCS0IF; inline;
  8509. procedure clearCS1IF; inline;
  8510. procedure clearCTIF; inline;
  8511. procedure clearI2C1ABIF; inline;
  8512. procedure clearI2C1AMIF; inline;
  8513. procedure clearI2C1ASIF; inline;
  8514. procedure clearI2C1BIF; inline;
  8515. procedure clearI2C1MIF; inline;
  8516. procedure clearI2C1SIF; inline;
  8517. procedure clearI2C3BIF; inline;
  8518. procedure clearI2C3MIF; inline;
  8519. procedure clearI2C3SIF; inline;
  8520. procedure clearIC1IF; inline;
  8521. procedure clearIC2IF; inline;
  8522. procedure clearIC3IF; inline;
  8523. procedure clearIC4IF; inline;
  8524. procedure clearIC5IF; inline;
  8525. procedure clearINT0IF; inline;
  8526. procedure clearINT1IF; inline;
  8527. procedure clearINT2IF; inline;
  8528. procedure clearINT3IF; inline;
  8529. procedure clearINT4IF; inline;
  8530. procedure clearOC1IF; inline;
  8531. procedure clearOC2IF; inline;
  8532. procedure clearOC3IF; inline;
  8533. procedure clearOC4IF; inline;
  8534. procedure clearOC5IF; inline;
  8535. procedure clearSPI1AEIF; inline;
  8536. procedure clearSPI1ARXIF; inline;
  8537. procedure clearSPI1ATXIF; inline;
  8538. procedure clearSPI1EIF; inline;
  8539. procedure clearSPI1RXIF; inline;
  8540. procedure clearSPI1TXIF; inline;
  8541. procedure clearSPI3EIF; inline;
  8542. procedure clearSPI3RXIF; inline;
  8543. procedure clearSPI3TXIF; inline;
  8544. procedure clearT1IF; inline;
  8545. procedure clearT2IF; inline;
  8546. procedure clearT3IF; inline;
  8547. procedure clearT4IF; inline;
  8548. procedure clearT5IF; inline;
  8549. procedure clearU1AEIF; inline;
  8550. procedure clearU1ARXIF; inline;
  8551. procedure clearU1ATXIF; inline;
  8552. procedure clearU1EIF; inline;
  8553. procedure clearU1RXIF; inline;
  8554. procedure clearU1TXIF; inline;
  8555. procedure setCS0IF; inline;
  8556. procedure setCS1IF; inline;
  8557. procedure setCTIF; inline;
  8558. procedure setI2C1ABIF; inline;
  8559. procedure setI2C1AMIF; inline;
  8560. procedure setI2C1ASIF; inline;
  8561. procedure setI2C1BIF; inline;
  8562. procedure setI2C1MIF; inline;
  8563. procedure setI2C1SIF; inline;
  8564. procedure setI2C3BIF; inline;
  8565. procedure setI2C3MIF; inline;
  8566. procedure setI2C3SIF; inline;
  8567. procedure setIC1IF; inline;
  8568. procedure setIC2IF; inline;
  8569. procedure setIC3IF; inline;
  8570. procedure setIC4IF; inline;
  8571. procedure setIC5IF; inline;
  8572. procedure setINT0IF; inline;
  8573. procedure setINT1IF; inline;
  8574. procedure setINT2IF; inline;
  8575. procedure setINT3IF; inline;
  8576. procedure setINT4IF; inline;
  8577. procedure setOC1IF; inline;
  8578. procedure setOC2IF; inline;
  8579. procedure setOC3IF; inline;
  8580. procedure setOC4IF; inline;
  8581. procedure setOC5IF; inline;
  8582. procedure setSPI1AEIF; inline;
  8583. procedure setSPI1ARXIF; inline;
  8584. procedure setSPI1ATXIF; inline;
  8585. procedure setSPI1EIF; inline;
  8586. procedure setSPI1RXIF; inline;
  8587. procedure setSPI1TXIF; inline;
  8588. procedure setSPI3EIF; inline;
  8589. procedure setSPI3RXIF; inline;
  8590. procedure setSPI3TXIF; inline;
  8591. procedure setT1IF; inline;
  8592. procedure setT2IF; inline;
  8593. procedure setT3IF; inline;
  8594. procedure setT4IF; inline;
  8595. procedure setT5IF; inline;
  8596. procedure setU1AEIF; inline;
  8597. procedure setU1ARXIF; inline;
  8598. procedure setU1ATXIF; inline;
  8599. procedure setU1EIF; inline;
  8600. procedure setU1RXIF; inline;
  8601. procedure setU1TXIF; inline;
  8602. property CS0IF : TBits_1 read getCS0IF write setCS0IF;
  8603. property CS1IF : TBits_1 read getCS1IF write setCS1IF;
  8604. property CTIF : TBits_1 read getCTIF write setCTIF;
  8605. property I2C1ABIF : TBits_1 read getI2C1ABIF write setI2C1ABIF;
  8606. property I2C1AMIF : TBits_1 read getI2C1AMIF write setI2C1AMIF;
  8607. property I2C1ASIF : TBits_1 read getI2C1ASIF write setI2C1ASIF;
  8608. property I2C1BIF : TBits_1 read getI2C1BIF write setI2C1BIF;
  8609. property I2C1MIF : TBits_1 read getI2C1MIF write setI2C1MIF;
  8610. property I2C1SIF : TBits_1 read getI2C1SIF write setI2C1SIF;
  8611. property I2C3BIF : TBits_1 read getI2C3BIF write setI2C3BIF;
  8612. property I2C3MIF : TBits_1 read getI2C3MIF write setI2C3MIF;
  8613. property I2C3SIF : TBits_1 read getI2C3SIF write setI2C3SIF;
  8614. property IC1IF : TBits_1 read getIC1IF write setIC1IF;
  8615. property IC2IF : TBits_1 read getIC2IF write setIC2IF;
  8616. property IC3IF : TBits_1 read getIC3IF write setIC3IF;
  8617. property IC4IF : TBits_1 read getIC4IF write setIC4IF;
  8618. property IC5IF : TBits_1 read getIC5IF write setIC5IF;
  8619. property INT0IF : TBits_1 read getINT0IF write setINT0IF;
  8620. property INT1IF : TBits_1 read getINT1IF write setINT1IF;
  8621. property INT2IF : TBits_1 read getINT2IF write setINT2IF;
  8622. property INT3IF : TBits_1 read getINT3IF write setINT3IF;
  8623. property INT4IF : TBits_1 read getINT4IF write setINT4IF;
  8624. property OC1IF : TBits_1 read getOC1IF write setOC1IF;
  8625. property OC2IF : TBits_1 read getOC2IF write setOC2IF;
  8626. property OC3IF : TBits_1 read getOC3IF write setOC3IF;
  8627. property OC4IF : TBits_1 read getOC4IF write setOC4IF;
  8628. property OC5IF : TBits_1 read getOC5IF write setOC5IF;
  8629. property SPI1AEIF : TBits_1 read getSPI1AEIF write setSPI1AEIF;
  8630. property SPI1ARXIF : TBits_1 read getSPI1ARXIF write setSPI1ARXIF;
  8631. property SPI1ATXIF : TBits_1 read getSPI1ATXIF write setSPI1ATXIF;
  8632. property SPI1EIF : TBits_1 read getSPI1EIF write setSPI1EIF;
  8633. property SPI1RXIF : TBits_1 read getSPI1RXIF write setSPI1RXIF;
  8634. property SPI1TXIF : TBits_1 read getSPI1TXIF write setSPI1TXIF;
  8635. property SPI3EIF : TBits_1 read getSPI3EIF write setSPI3EIF;
  8636. property SPI3RXIF : TBits_1 read getSPI3RXIF write setSPI3RXIF;
  8637. property SPI3TXIF : TBits_1 read getSPI3TXIF write setSPI3TXIF;
  8638. property T1IF : TBits_1 read getT1IF write setT1IF;
  8639. property T2IF : TBits_1 read getT2IF write setT2IF;
  8640. property T3IF : TBits_1 read getT3IF write setT3IF;
  8641. property T4IF : TBits_1 read getT4IF write setT4IF;
  8642. property T5IF : TBits_1 read getT5IF write setT5IF;
  8643. property U1AEIF : TBits_1 read getU1AEIF write setU1AEIF;
  8644. property U1ARXIF : TBits_1 read getU1ARXIF write setU1ARXIF;
  8645. property U1ATXIF : TBits_1 read getU1ATXIF write setU1ATXIF;
  8646. property U1EIF : TBits_1 read getU1EIF write setU1EIF;
  8647. property U1RXIF : TBits_1 read getU1RXIF write setU1RXIF;
  8648. property U1TXIF : TBits_1 read getU1TXIF write setU1TXIF;
  8649. property w : TBits_32 read getw write setw;
  8650. end;
  8651. TINT_IFS1 = record
  8652. private
  8653. function getAD1IF : TBits_1; inline;
  8654. function getCAN1IF : TBits_1; inline;
  8655. function getCAN2IF : TBits_1; inline;
  8656. function getCMP1IF : TBits_1; inline;
  8657. function getCMP2IF : TBits_1; inline;
  8658. function getCNIF : TBits_1; inline;
  8659. function getDMA0IF : TBits_1; inline;
  8660. function getDMA1IF : TBits_1; inline;
  8661. function getDMA2IF : TBits_1; inline;
  8662. function getDMA3IF : TBits_1; inline;
  8663. function getDMA4IF : TBits_1; inline;
  8664. function getDMA5IF : TBits_1; inline;
  8665. function getDMA6IF : TBits_1; inline;
  8666. function getDMA7IF : TBits_1; inline;
  8667. function getETHIF : TBits_1; inline;
  8668. function getFCEIF : TBits_1; inline;
  8669. function getFSCMIF : TBits_1; inline;
  8670. function getI2C2ABIF : TBits_1; inline;
  8671. function getI2C2AMIF : TBits_1; inline;
  8672. function getI2C2ASIF : TBits_1; inline;
  8673. function getI2C2BIF : TBits_1; inline;
  8674. function getI2C2MIF : TBits_1; inline;
  8675. function getI2C2SIF : TBits_1; inline;
  8676. function getI2C3ABIF : TBits_1; inline;
  8677. function getI2C3AMIF : TBits_1; inline;
  8678. function getI2C3ASIF : TBits_1; inline;
  8679. function getI2C4BIF : TBits_1; inline;
  8680. function getI2C4MIF : TBits_1; inline;
  8681. function getI2C4SIF : TBits_1; inline;
  8682. function getI2C5BIF : TBits_1; inline;
  8683. function getI2C5MIF : TBits_1; inline;
  8684. function getI2C5SIF : TBits_1; inline;
  8685. function getIC1EIF : TBits_1; inline;
  8686. function getIC2EIF : TBits_1; inline;
  8687. function getIC3EIF : TBits_1; inline;
  8688. function getPMPIF : TBits_1; inline;
  8689. function getRTCCIF : TBits_1; inline;
  8690. function getSPI2AEIF : TBits_1; inline;
  8691. function getSPI2ARXIF : TBits_1; inline;
  8692. function getSPI2ATXIF : TBits_1; inline;
  8693. function getSPI2EIF : TBits_1; inline;
  8694. function getSPI2RXIF : TBits_1; inline;
  8695. function getSPI2TXIF : TBits_1; inline;
  8696. function getSPI3AEIF : TBits_1; inline;
  8697. function getSPI3ARXIF : TBits_1; inline;
  8698. function getSPI3ATXIF : TBits_1; inline;
  8699. function getSPI4EIF : TBits_1; inline;
  8700. function getSPI4RXIF : TBits_1; inline;
  8701. function getSPI4TXIF : TBits_1; inline;
  8702. function getU2AEIF : TBits_1; inline;
  8703. function getU2ARXIF : TBits_1; inline;
  8704. function getU2ATXIF : TBits_1; inline;
  8705. function getU2EIF : TBits_1; inline;
  8706. function getU2RXIF : TBits_1; inline;
  8707. function getU2TXIF : TBits_1; inline;
  8708. function getU3AEIF : TBits_1; inline;
  8709. function getU3ARXIF : TBits_1; inline;
  8710. function getU3ATXIF : TBits_1; inline;
  8711. function getU3EIF : TBits_1; inline;
  8712. function getU3RXIF : TBits_1; inline;
  8713. function getU3TXIF : TBits_1; inline;
  8714. function getUSBIF : TBits_1; inline;
  8715. function getw : TBits_32; inline;
  8716. procedure setAD1IF(thebits : TBits_1); inline;
  8717. procedure setCAN1IF(thebits : TBits_1); inline;
  8718. procedure setCAN2IF(thebits : TBits_1); inline;
  8719. procedure setCMP1IF(thebits : TBits_1); inline;
  8720. procedure setCMP2IF(thebits : TBits_1); inline;
  8721. procedure setCNIF(thebits : TBits_1); inline;
  8722. procedure setDMA0IF(thebits : TBits_1); inline;
  8723. procedure setDMA1IF(thebits : TBits_1); inline;
  8724. procedure setDMA2IF(thebits : TBits_1); inline;
  8725. procedure setDMA3IF(thebits : TBits_1); inline;
  8726. procedure setDMA4IF(thebits : TBits_1); inline;
  8727. procedure setDMA5IF(thebits : TBits_1); inline;
  8728. procedure setDMA6IF(thebits : TBits_1); inline;
  8729. procedure setDMA7IF(thebits : TBits_1); inline;
  8730. procedure setETHIF(thebits : TBits_1); inline;
  8731. procedure setFCEIF(thebits : TBits_1); inline;
  8732. procedure setFSCMIF(thebits : TBits_1); inline;
  8733. procedure setI2C2ABIF(thebits : TBits_1); inline;
  8734. procedure setI2C2AMIF(thebits : TBits_1); inline;
  8735. procedure setI2C2ASIF(thebits : TBits_1); inline;
  8736. procedure setI2C2BIF(thebits : TBits_1); inline;
  8737. procedure setI2C2MIF(thebits : TBits_1); inline;
  8738. procedure setI2C2SIF(thebits : TBits_1); inline;
  8739. procedure setI2C3ABIF(thebits : TBits_1); inline;
  8740. procedure setI2C3AMIF(thebits : TBits_1); inline;
  8741. procedure setI2C3ASIF(thebits : TBits_1); inline;
  8742. procedure setI2C4BIF(thebits : TBits_1); inline;
  8743. procedure setI2C4MIF(thebits : TBits_1); inline;
  8744. procedure setI2C4SIF(thebits : TBits_1); inline;
  8745. procedure setI2C5BIF(thebits : TBits_1); inline;
  8746. procedure setI2C5MIF(thebits : TBits_1); inline;
  8747. procedure setI2C5SIF(thebits : TBits_1); inline;
  8748. procedure setIC1EIF(thebits : TBits_1); inline;
  8749. procedure setIC2EIF(thebits : TBits_1); inline;
  8750. procedure setIC3EIF(thebits : TBits_1); inline;
  8751. procedure setPMPIF(thebits : TBits_1); inline;
  8752. procedure setRTCCIF(thebits : TBits_1); inline;
  8753. procedure setSPI2AEIF(thebits : TBits_1); inline;
  8754. procedure setSPI2ARXIF(thebits : TBits_1); inline;
  8755. procedure setSPI2ATXIF(thebits : TBits_1); inline;
  8756. procedure setSPI2EIF(thebits : TBits_1); inline;
  8757. procedure setSPI2RXIF(thebits : TBits_1); inline;
  8758. procedure setSPI2TXIF(thebits : TBits_1); inline;
  8759. procedure setSPI3AEIF(thebits : TBits_1); inline;
  8760. procedure setSPI3ARXIF(thebits : TBits_1); inline;
  8761. procedure setSPI3ATXIF(thebits : TBits_1); inline;
  8762. procedure setSPI4EIF(thebits : TBits_1); inline;
  8763. procedure setSPI4RXIF(thebits : TBits_1); inline;
  8764. procedure setSPI4TXIF(thebits : TBits_1); inline;
  8765. procedure setU2AEIF(thebits : TBits_1); inline;
  8766. procedure setU2ARXIF(thebits : TBits_1); inline;
  8767. procedure setU2ATXIF(thebits : TBits_1); inline;
  8768. procedure setU2EIF(thebits : TBits_1); inline;
  8769. procedure setU2RXIF(thebits : TBits_1); inline;
  8770. procedure setU2TXIF(thebits : TBits_1); inline;
  8771. procedure setU3AEIF(thebits : TBits_1); inline;
  8772. procedure setU3ARXIF(thebits : TBits_1); inline;
  8773. procedure setU3ATXIF(thebits : TBits_1); inline;
  8774. procedure setU3EIF(thebits : TBits_1); inline;
  8775. procedure setU3RXIF(thebits : TBits_1); inline;
  8776. procedure setU3TXIF(thebits : TBits_1); inline;
  8777. procedure setUSBIF(thebits : TBits_1); inline;
  8778. procedure setw(thebits : TBits_32); inline;
  8779. public
  8780. procedure clearAD1IF; inline;
  8781. procedure clearCAN1IF; inline;
  8782. procedure clearCAN2IF; inline;
  8783. procedure clearCMP1IF; inline;
  8784. procedure clearCMP2IF; inline;
  8785. procedure clearCNIF; inline;
  8786. procedure clearDMA0IF; inline;
  8787. procedure clearDMA1IF; inline;
  8788. procedure clearDMA2IF; inline;
  8789. procedure clearDMA3IF; inline;
  8790. procedure clearDMA4IF; inline;
  8791. procedure clearDMA5IF; inline;
  8792. procedure clearDMA6IF; inline;
  8793. procedure clearDMA7IF; inline;
  8794. procedure clearETHIF; inline;
  8795. procedure clearFCEIF; inline;
  8796. procedure clearFSCMIF; inline;
  8797. procedure clearI2C2ABIF; inline;
  8798. procedure clearI2C2AMIF; inline;
  8799. procedure clearI2C2ASIF; inline;
  8800. procedure clearI2C2BIF; inline;
  8801. procedure clearI2C2MIF; inline;
  8802. procedure clearI2C2SIF; inline;
  8803. procedure clearI2C3ABIF; inline;
  8804. procedure clearI2C3AMIF; inline;
  8805. procedure clearI2C3ASIF; inline;
  8806. procedure clearI2C4BIF; inline;
  8807. procedure clearI2C4MIF; inline;
  8808. procedure clearI2C4SIF; inline;
  8809. procedure clearI2C5BIF; inline;
  8810. procedure clearI2C5MIF; inline;
  8811. procedure clearI2C5SIF; inline;
  8812. procedure clearIC1EIF; inline;
  8813. procedure clearIC2EIF; inline;
  8814. procedure clearIC3EIF; inline;
  8815. procedure clearPMPIF; inline;
  8816. procedure clearRTCCIF; inline;
  8817. procedure clearSPI2AEIF; inline;
  8818. procedure clearSPI2ARXIF; inline;
  8819. procedure clearSPI2ATXIF; inline;
  8820. procedure clearSPI2EIF; inline;
  8821. procedure clearSPI2RXIF; inline;
  8822. procedure clearSPI2TXIF; inline;
  8823. procedure clearSPI3AEIF; inline;
  8824. procedure clearSPI3ARXIF; inline;
  8825. procedure clearSPI3ATXIF; inline;
  8826. procedure clearSPI4EIF; inline;
  8827. procedure clearSPI4RXIF; inline;
  8828. procedure clearSPI4TXIF; inline;
  8829. procedure clearU2AEIF; inline;
  8830. procedure clearU2ARXIF; inline;
  8831. procedure clearU2ATXIF; inline;
  8832. procedure clearU2EIF; inline;
  8833. procedure clearU2RXIF; inline;
  8834. procedure clearU2TXIF; inline;
  8835. procedure clearU3AEIF; inline;
  8836. procedure clearU3ARXIF; inline;
  8837. procedure clearU3ATXIF; inline;
  8838. procedure clearU3EIF; inline;
  8839. procedure clearU3RXIF; inline;
  8840. procedure clearU3TXIF; inline;
  8841. procedure clearUSBIF; inline;
  8842. procedure setAD1IF; inline;
  8843. procedure setCAN1IF; inline;
  8844. procedure setCAN2IF; inline;
  8845. procedure setCMP1IF; inline;
  8846. procedure setCMP2IF; inline;
  8847. procedure setCNIF; inline;
  8848. procedure setDMA0IF; inline;
  8849. procedure setDMA1IF; inline;
  8850. procedure setDMA2IF; inline;
  8851. procedure setDMA3IF; inline;
  8852. procedure setDMA4IF; inline;
  8853. procedure setDMA5IF; inline;
  8854. procedure setDMA6IF; inline;
  8855. procedure setDMA7IF; inline;
  8856. procedure setETHIF; inline;
  8857. procedure setFCEIF; inline;
  8858. procedure setFSCMIF; inline;
  8859. procedure setI2C2ABIF; inline;
  8860. procedure setI2C2AMIF; inline;
  8861. procedure setI2C2ASIF; inline;
  8862. procedure setI2C2BIF; inline;
  8863. procedure setI2C2MIF; inline;
  8864. procedure setI2C2SIF; inline;
  8865. procedure setI2C3ABIF; inline;
  8866. procedure setI2C3AMIF; inline;
  8867. procedure setI2C3ASIF; inline;
  8868. procedure setI2C4BIF; inline;
  8869. procedure setI2C4MIF; inline;
  8870. procedure setI2C4SIF; inline;
  8871. procedure setI2C5BIF; inline;
  8872. procedure setI2C5MIF; inline;
  8873. procedure setI2C5SIF; inline;
  8874. procedure setIC1EIF; inline;
  8875. procedure setIC2EIF; inline;
  8876. procedure setIC3EIF; inline;
  8877. procedure setPMPIF; inline;
  8878. procedure setRTCCIF; inline;
  8879. procedure setSPI2AEIF; inline;
  8880. procedure setSPI2ARXIF; inline;
  8881. procedure setSPI2ATXIF; inline;
  8882. procedure setSPI2EIF; inline;
  8883. procedure setSPI2RXIF; inline;
  8884. procedure setSPI2TXIF; inline;
  8885. procedure setSPI3AEIF; inline;
  8886. procedure setSPI3ARXIF; inline;
  8887. procedure setSPI3ATXIF; inline;
  8888. procedure setSPI4EIF; inline;
  8889. procedure setSPI4RXIF; inline;
  8890. procedure setSPI4TXIF; inline;
  8891. procedure setU2AEIF; inline;
  8892. procedure setU2ARXIF; inline;
  8893. procedure setU2ATXIF; inline;
  8894. procedure setU2EIF; inline;
  8895. procedure setU2RXIF; inline;
  8896. procedure setU2TXIF; inline;
  8897. procedure setU3AEIF; inline;
  8898. procedure setU3ARXIF; inline;
  8899. procedure setU3ATXIF; inline;
  8900. procedure setU3EIF; inline;
  8901. procedure setU3RXIF; inline;
  8902. procedure setU3TXIF; inline;
  8903. procedure setUSBIF; inline;
  8904. property AD1IF : TBits_1 read getAD1IF write setAD1IF;
  8905. property CAN1IF : TBits_1 read getCAN1IF write setCAN1IF;
  8906. property CAN2IF : TBits_1 read getCAN2IF write setCAN2IF;
  8907. property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
  8908. property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
  8909. property CNIF : TBits_1 read getCNIF write setCNIF;
  8910. property DMA0IF : TBits_1 read getDMA0IF write setDMA0IF;
  8911. property DMA1IF : TBits_1 read getDMA1IF write setDMA1IF;
  8912. property DMA2IF : TBits_1 read getDMA2IF write setDMA2IF;
  8913. property DMA3IF : TBits_1 read getDMA3IF write setDMA3IF;
  8914. property DMA4IF : TBits_1 read getDMA4IF write setDMA4IF;
  8915. property DMA5IF : TBits_1 read getDMA5IF write setDMA5IF;
  8916. property DMA6IF : TBits_1 read getDMA6IF write setDMA6IF;
  8917. property DMA7IF : TBits_1 read getDMA7IF write setDMA7IF;
  8918. property ETHIF : TBits_1 read getETHIF write setETHIF;
  8919. property FCEIF : TBits_1 read getFCEIF write setFCEIF;
  8920. property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
  8921. property I2C2ABIF : TBits_1 read getI2C2ABIF write setI2C2ABIF;
  8922. property I2C2AMIF : TBits_1 read getI2C2AMIF write setI2C2AMIF;
  8923. property I2C2ASIF : TBits_1 read getI2C2ASIF write setI2C2ASIF;
  8924. property I2C2BIF : TBits_1 read getI2C2BIF write setI2C2BIF;
  8925. property I2C2MIF : TBits_1 read getI2C2MIF write setI2C2MIF;
  8926. property I2C2SIF : TBits_1 read getI2C2SIF write setI2C2SIF;
  8927. property I2C3ABIF : TBits_1 read getI2C3ABIF write setI2C3ABIF;
  8928. property I2C3AMIF : TBits_1 read getI2C3AMIF write setI2C3AMIF;
  8929. property I2C3ASIF : TBits_1 read getI2C3ASIF write setI2C3ASIF;
  8930. property I2C4BIF : TBits_1 read getI2C4BIF write setI2C4BIF;
  8931. property I2C4MIF : TBits_1 read getI2C4MIF write setI2C4MIF;
  8932. property I2C4SIF : TBits_1 read getI2C4SIF write setI2C4SIF;
  8933. property I2C5BIF : TBits_1 read getI2C5BIF write setI2C5BIF;
  8934. property I2C5MIF : TBits_1 read getI2C5MIF write setI2C5MIF;
  8935. property I2C5SIF : TBits_1 read getI2C5SIF write setI2C5SIF;
  8936. property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
  8937. property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
  8938. property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
  8939. property PMPIF : TBits_1 read getPMPIF write setPMPIF;
  8940. property RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
  8941. property SPI2AEIF : TBits_1 read getSPI2AEIF write setSPI2AEIF;
  8942. property SPI2ARXIF : TBits_1 read getSPI2ARXIF write setSPI2ARXIF;
  8943. property SPI2ATXIF : TBits_1 read getSPI2ATXIF write setSPI2ATXIF;
  8944. property SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
  8945. property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
  8946. property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
  8947. property SPI3AEIF : TBits_1 read getSPI3AEIF write setSPI3AEIF;
  8948. property SPI3ARXIF : TBits_1 read getSPI3ARXIF write setSPI3ARXIF;
  8949. property SPI3ATXIF : TBits_1 read getSPI3ATXIF write setSPI3ATXIF;
  8950. property SPI4EIF : TBits_1 read getSPI4EIF write setSPI4EIF;
  8951. property SPI4RXIF : TBits_1 read getSPI4RXIF write setSPI4RXIF;
  8952. property SPI4TXIF : TBits_1 read getSPI4TXIF write setSPI4TXIF;
  8953. property U2AEIF : TBits_1 read getU2AEIF write setU2AEIF;
  8954. property U2ARXIF : TBits_1 read getU2ARXIF write setU2ARXIF;
  8955. property U2ATXIF : TBits_1 read getU2ATXIF write setU2ATXIF;
  8956. property U2EIF : TBits_1 read getU2EIF write setU2EIF;
  8957. property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
  8958. property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
  8959. property U3AEIF : TBits_1 read getU3AEIF write setU3AEIF;
  8960. property U3ARXIF : TBits_1 read getU3ARXIF write setU3ARXIF;
  8961. property U3ATXIF : TBits_1 read getU3ATXIF write setU3ATXIF;
  8962. property U3EIF : TBits_1 read getU3EIF write setU3EIF;
  8963. property U3RXIF : TBits_1 read getU3RXIF write setU3RXIF;
  8964. property U3TXIF : TBits_1 read getU3TXIF write setU3TXIF;
  8965. property USBIF : TBits_1 read getUSBIF write setUSBIF;
  8966. property w : TBits_32 read getw write setw;
  8967. end;
  8968. TINT_IFS2 = record
  8969. private
  8970. function getIC4EIF : TBits_1; inline;
  8971. function getIC5EIF : TBits_1; inline;
  8972. function getPMPEIF : TBits_1; inline;
  8973. function getU1BEIF : TBits_1; inline;
  8974. function getU1BRXIF : TBits_1; inline;
  8975. function getU1BTXIF : TBits_1; inline;
  8976. function getU2BEIF : TBits_1; inline;
  8977. function getU2BRXIF : TBits_1; inline;
  8978. function getU2BTXIF : TBits_1; inline;
  8979. function getU3BEIF : TBits_1; inline;
  8980. function getU3BRXIF : TBits_1; inline;
  8981. function getU3BTXIF : TBits_1; inline;
  8982. function getU4EIF : TBits_1; inline;
  8983. function getU4RXIF : TBits_1; inline;
  8984. function getU4TXIF : TBits_1; inline;
  8985. function getU5EIF : TBits_1; inline;
  8986. function getU5RXIF : TBits_1; inline;
  8987. function getU5TXIF : TBits_1; inline;
  8988. function getU6EIF : TBits_1; inline;
  8989. function getU6RXIF : TBits_1; inline;
  8990. function getU6TXIF : TBits_1; inline;
  8991. function getw : TBits_32; inline;
  8992. procedure setIC4EIF(thebits : TBits_1); inline;
  8993. procedure setIC5EIF(thebits : TBits_1); inline;
  8994. procedure setPMPEIF(thebits : TBits_1); inline;
  8995. procedure setU1BEIF(thebits : TBits_1); inline;
  8996. procedure setU1BRXIF(thebits : TBits_1); inline;
  8997. procedure setU1BTXIF(thebits : TBits_1); inline;
  8998. procedure setU2BEIF(thebits : TBits_1); inline;
  8999. procedure setU2BRXIF(thebits : TBits_1); inline;
  9000. procedure setU2BTXIF(thebits : TBits_1); inline;
  9001. procedure setU3BEIF(thebits : TBits_1); inline;
  9002. procedure setU3BRXIF(thebits : TBits_1); inline;
  9003. procedure setU3BTXIF(thebits : TBits_1); inline;
  9004. procedure setU4EIF(thebits : TBits_1); inline;
  9005. procedure setU4RXIF(thebits : TBits_1); inline;
  9006. procedure setU4TXIF(thebits : TBits_1); inline;
  9007. procedure setU5EIF(thebits : TBits_1); inline;
  9008. procedure setU5RXIF(thebits : TBits_1); inline;
  9009. procedure setU5TXIF(thebits : TBits_1); inline;
  9010. procedure setU6EIF(thebits : TBits_1); inline;
  9011. procedure setU6RXIF(thebits : TBits_1); inline;
  9012. procedure setU6TXIF(thebits : TBits_1); inline;
  9013. procedure setw(thebits : TBits_32); inline;
  9014. public
  9015. procedure clearIC4EIF; inline;
  9016. procedure clearIC5EIF; inline;
  9017. procedure clearPMPEIF; inline;
  9018. procedure clearU1BEIF; inline;
  9019. procedure clearU1BRXIF; inline;
  9020. procedure clearU1BTXIF; inline;
  9021. procedure clearU2BEIF; inline;
  9022. procedure clearU2BRXIF; inline;
  9023. procedure clearU2BTXIF; inline;
  9024. procedure clearU3BEIF; inline;
  9025. procedure clearU3BRXIF; inline;
  9026. procedure clearU3BTXIF; inline;
  9027. procedure clearU4EIF; inline;
  9028. procedure clearU4RXIF; inline;
  9029. procedure clearU4TXIF; inline;
  9030. procedure clearU5EIF; inline;
  9031. procedure clearU5RXIF; inline;
  9032. procedure clearU5TXIF; inline;
  9033. procedure clearU6EIF; inline;
  9034. procedure clearU6RXIF; inline;
  9035. procedure clearU6TXIF; inline;
  9036. procedure setIC4EIF; inline;
  9037. procedure setIC5EIF; inline;
  9038. procedure setPMPEIF; inline;
  9039. procedure setU1BEIF; inline;
  9040. procedure setU1BRXIF; inline;
  9041. procedure setU1BTXIF; inline;
  9042. procedure setU2BEIF; inline;
  9043. procedure setU2BRXIF; inline;
  9044. procedure setU2BTXIF; inline;
  9045. procedure setU3BEIF; inline;
  9046. procedure setU3BRXIF; inline;
  9047. procedure setU3BTXIF; inline;
  9048. procedure setU4EIF; inline;
  9049. procedure setU4RXIF; inline;
  9050. procedure setU4TXIF; inline;
  9051. procedure setU5EIF; inline;
  9052. procedure setU5RXIF; inline;
  9053. procedure setU5TXIF; inline;
  9054. procedure setU6EIF; inline;
  9055. procedure setU6RXIF; inline;
  9056. procedure setU6TXIF; inline;
  9057. property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
  9058. property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
  9059. property PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
  9060. property U1BEIF : TBits_1 read getU1BEIF write setU1BEIF;
  9061. property U1BRXIF : TBits_1 read getU1BRXIF write setU1BRXIF;
  9062. property U1BTXIF : TBits_1 read getU1BTXIF write setU1BTXIF;
  9063. property U2BEIF : TBits_1 read getU2BEIF write setU2BEIF;
  9064. property U2BRXIF : TBits_1 read getU2BRXIF write setU2BRXIF;
  9065. property U2BTXIF : TBits_1 read getU2BTXIF write setU2BTXIF;
  9066. property U3BEIF : TBits_1 read getU3BEIF write setU3BEIF;
  9067. property U3BRXIF : TBits_1 read getU3BRXIF write setU3BRXIF;
  9068. property U3BTXIF : TBits_1 read getU3BTXIF write setU3BTXIF;
  9069. property U4EIF : TBits_1 read getU4EIF write setU4EIF;
  9070. property U4RXIF : TBits_1 read getU4RXIF write setU4RXIF;
  9071. property U4TXIF : TBits_1 read getU4TXIF write setU4TXIF;
  9072. property U5EIF : TBits_1 read getU5EIF write setU5EIF;
  9073. property U5RXIF : TBits_1 read getU5RXIF write setU5RXIF;
  9074. property U5TXIF : TBits_1 read getU5TXIF write setU5TXIF;
  9075. property U6EIF : TBits_1 read getU6EIF write setU6EIF;
  9076. property U6RXIF : TBits_1 read getU6RXIF write setU6RXIF;
  9077. property U6TXIF : TBits_1 read getU6TXIF write setU6TXIF;
  9078. property w : TBits_32 read getw write setw;
  9079. end;
  9080. TINT_IEC0 = record
  9081. private
  9082. function getCS0IE : TBits_1; inline;
  9083. function getCS1IE : TBits_1; inline;
  9084. function getCTIE : TBits_1; inline;
  9085. function getI2C1ABIE : TBits_1; inline;
  9086. function getI2C1AMIE : TBits_1; inline;
  9087. function getI2C1ASIE : TBits_1; inline;
  9088. function getI2C1BIE : TBits_1; inline;
  9089. function getI2C1MIE : TBits_1; inline;
  9090. function getI2C1SIE : TBits_1; inline;
  9091. function getI2C3BIE : TBits_1; inline;
  9092. function getI2C3MIE : TBits_1; inline;
  9093. function getI2C3SIE : TBits_1; inline;
  9094. function getIC1IE : TBits_1; inline;
  9095. function getIC2IE : TBits_1; inline;
  9096. function getIC3IE : TBits_1; inline;
  9097. function getIC4IE : TBits_1; inline;
  9098. function getIC5IE : TBits_1; inline;
  9099. function getINT0IE : TBits_1; inline;
  9100. function getINT1IE : TBits_1; inline;
  9101. function getINT2IE : TBits_1; inline;
  9102. function getINT3IE : TBits_1; inline;
  9103. function getINT4IE : TBits_1; inline;
  9104. function getOC1IE : TBits_1; inline;
  9105. function getOC2IE : TBits_1; inline;
  9106. function getOC3IE : TBits_1; inline;
  9107. function getOC4IE : TBits_1; inline;
  9108. function getOC5IE : TBits_1; inline;
  9109. function getSPI1AEIE : TBits_1; inline;
  9110. function getSPI1ARXIE : TBits_1; inline;
  9111. function getSPI1ATXIE : TBits_1; inline;
  9112. function getSPI1EIE : TBits_1; inline;
  9113. function getSPI1RXIE : TBits_1; inline;
  9114. function getSPI1TXIE : TBits_1; inline;
  9115. function getSPI3EIE : TBits_1; inline;
  9116. function getSPI3RXIE : TBits_1; inline;
  9117. function getSPI3TXIE : TBits_1; inline;
  9118. function getT1IE : TBits_1; inline;
  9119. function getT2IE : TBits_1; inline;
  9120. function getT3IE : TBits_1; inline;
  9121. function getT4IE : TBits_1; inline;
  9122. function getT5IE : TBits_1; inline;
  9123. function getU1AEIE : TBits_1; inline;
  9124. function getU1ARXIE : TBits_1; inline;
  9125. function getU1ATXIE : TBits_1; inline;
  9126. function getU1EIE : TBits_1; inline;
  9127. function getU1RXIE : TBits_1; inline;
  9128. function getU1TXIE : TBits_1; inline;
  9129. function getw : TBits_32; inline;
  9130. procedure setCS0IE(thebits : TBits_1); inline;
  9131. procedure setCS1IE(thebits : TBits_1); inline;
  9132. procedure setCTIE(thebits : TBits_1); inline;
  9133. procedure setI2C1ABIE(thebits : TBits_1); inline;
  9134. procedure setI2C1AMIE(thebits : TBits_1); inline;
  9135. procedure setI2C1ASIE(thebits : TBits_1); inline;
  9136. procedure setI2C1BIE(thebits : TBits_1); inline;
  9137. procedure setI2C1MIE(thebits : TBits_1); inline;
  9138. procedure setI2C1SIE(thebits : TBits_1); inline;
  9139. procedure setI2C3BIE(thebits : TBits_1); inline;
  9140. procedure setI2C3MIE(thebits : TBits_1); inline;
  9141. procedure setI2C3SIE(thebits : TBits_1); inline;
  9142. procedure setIC1IE(thebits : TBits_1); inline;
  9143. procedure setIC2IE(thebits : TBits_1); inline;
  9144. procedure setIC3IE(thebits : TBits_1); inline;
  9145. procedure setIC4IE(thebits : TBits_1); inline;
  9146. procedure setIC5IE(thebits : TBits_1); inline;
  9147. procedure setINT0IE(thebits : TBits_1); inline;
  9148. procedure setINT1IE(thebits : TBits_1); inline;
  9149. procedure setINT2IE(thebits : TBits_1); inline;
  9150. procedure setINT3IE(thebits : TBits_1); inline;
  9151. procedure setINT4IE(thebits : TBits_1); inline;
  9152. procedure setOC1IE(thebits : TBits_1); inline;
  9153. procedure setOC2IE(thebits : TBits_1); inline;
  9154. procedure setOC3IE(thebits : TBits_1); inline;
  9155. procedure setOC4IE(thebits : TBits_1); inline;
  9156. procedure setOC5IE(thebits : TBits_1); inline;
  9157. procedure setSPI1AEIE(thebits : TBits_1); inline;
  9158. procedure setSPI1ARXIE(thebits : TBits_1); inline;
  9159. procedure setSPI1ATXIE(thebits : TBits_1); inline;
  9160. procedure setSPI1EIE(thebits : TBits_1); inline;
  9161. procedure setSPI1RXIE(thebits : TBits_1); inline;
  9162. procedure setSPI1TXIE(thebits : TBits_1); inline;
  9163. procedure setSPI3EIE(thebits : TBits_1); inline;
  9164. procedure setSPI3RXIE(thebits : TBits_1); inline;
  9165. procedure setSPI3TXIE(thebits : TBits_1); inline;
  9166. procedure setT1IE(thebits : TBits_1); inline;
  9167. procedure setT2IE(thebits : TBits_1); inline;
  9168. procedure setT3IE(thebits : TBits_1); inline;
  9169. procedure setT4IE(thebits : TBits_1); inline;
  9170. procedure setT5IE(thebits : TBits_1); inline;
  9171. procedure setU1AEIE(thebits : TBits_1); inline;
  9172. procedure setU1ARXIE(thebits : TBits_1); inline;
  9173. procedure setU1ATXIE(thebits : TBits_1); inline;
  9174. procedure setU1EIE(thebits : TBits_1); inline;
  9175. procedure setU1RXIE(thebits : TBits_1); inline;
  9176. procedure setU1TXIE(thebits : TBits_1); inline;
  9177. procedure setw(thebits : TBits_32); inline;
  9178. public
  9179. procedure clearCS0IE; inline;
  9180. procedure clearCS1IE; inline;
  9181. procedure clearCTIE; inline;
  9182. procedure clearI2C1ABIE; inline;
  9183. procedure clearI2C1AMIE; inline;
  9184. procedure clearI2C1ASIE; inline;
  9185. procedure clearI2C1BIE; inline;
  9186. procedure clearI2C1MIE; inline;
  9187. procedure clearI2C1SIE; inline;
  9188. procedure clearI2C3BIE; inline;
  9189. procedure clearI2C3MIE; inline;
  9190. procedure clearI2C3SIE; inline;
  9191. procedure clearIC1IE; inline;
  9192. procedure clearIC2IE; inline;
  9193. procedure clearIC3IE; inline;
  9194. procedure clearIC4IE; inline;
  9195. procedure clearIC5IE; inline;
  9196. procedure clearINT0IE; inline;
  9197. procedure clearINT1IE; inline;
  9198. procedure clearINT2IE; inline;
  9199. procedure clearINT3IE; inline;
  9200. procedure clearINT4IE; inline;
  9201. procedure clearOC1IE; inline;
  9202. procedure clearOC2IE; inline;
  9203. procedure clearOC3IE; inline;
  9204. procedure clearOC4IE; inline;
  9205. procedure clearOC5IE; inline;
  9206. procedure clearSPI1AEIE; inline;
  9207. procedure clearSPI1ARXIE; inline;
  9208. procedure clearSPI1ATXIE; inline;
  9209. procedure clearSPI1EIE; inline;
  9210. procedure clearSPI1RXIE; inline;
  9211. procedure clearSPI1TXIE; inline;
  9212. procedure clearSPI3EIE; inline;
  9213. procedure clearSPI3RXIE; inline;
  9214. procedure clearSPI3TXIE; inline;
  9215. procedure clearT1IE; inline;
  9216. procedure clearT2IE; inline;
  9217. procedure clearT3IE; inline;
  9218. procedure clearT4IE; inline;
  9219. procedure clearT5IE; inline;
  9220. procedure clearU1AEIE; inline;
  9221. procedure clearU1ARXIE; inline;
  9222. procedure clearU1ATXIE; inline;
  9223. procedure clearU1EIE; inline;
  9224. procedure clearU1RXIE; inline;
  9225. procedure clearU1TXIE; inline;
  9226. procedure setCS0IE; inline;
  9227. procedure setCS1IE; inline;
  9228. procedure setCTIE; inline;
  9229. procedure setI2C1ABIE; inline;
  9230. procedure setI2C1AMIE; inline;
  9231. procedure setI2C1ASIE; inline;
  9232. procedure setI2C1BIE; inline;
  9233. procedure setI2C1MIE; inline;
  9234. procedure setI2C1SIE; inline;
  9235. procedure setI2C3BIE; inline;
  9236. procedure setI2C3MIE; inline;
  9237. procedure setI2C3SIE; inline;
  9238. procedure setIC1IE; inline;
  9239. procedure setIC2IE; inline;
  9240. procedure setIC3IE; inline;
  9241. procedure setIC4IE; inline;
  9242. procedure setIC5IE; inline;
  9243. procedure setINT0IE; inline;
  9244. procedure setINT1IE; inline;
  9245. procedure setINT2IE; inline;
  9246. procedure setINT3IE; inline;
  9247. procedure setINT4IE; inline;
  9248. procedure setOC1IE; inline;
  9249. procedure setOC2IE; inline;
  9250. procedure setOC3IE; inline;
  9251. procedure setOC4IE; inline;
  9252. procedure setOC5IE; inline;
  9253. procedure setSPI1AEIE; inline;
  9254. procedure setSPI1ARXIE; inline;
  9255. procedure setSPI1ATXIE; inline;
  9256. procedure setSPI1EIE; inline;
  9257. procedure setSPI1RXIE; inline;
  9258. procedure setSPI1TXIE; inline;
  9259. procedure setSPI3EIE; inline;
  9260. procedure setSPI3RXIE; inline;
  9261. procedure setSPI3TXIE; inline;
  9262. procedure setT1IE; inline;
  9263. procedure setT2IE; inline;
  9264. procedure setT3IE; inline;
  9265. procedure setT4IE; inline;
  9266. procedure setT5IE; inline;
  9267. procedure setU1AEIE; inline;
  9268. procedure setU1ARXIE; inline;
  9269. procedure setU1ATXIE; inline;
  9270. procedure setU1EIE; inline;
  9271. procedure setU1RXIE; inline;
  9272. procedure setU1TXIE; inline;
  9273. property CS0IE : TBits_1 read getCS0IE write setCS0IE;
  9274. property CS1IE : TBits_1 read getCS1IE write setCS1IE;
  9275. property CTIE : TBits_1 read getCTIE write setCTIE;
  9276. property I2C1ABIE : TBits_1 read getI2C1ABIE write setI2C1ABIE;
  9277. property I2C1AMIE : TBits_1 read getI2C1AMIE write setI2C1AMIE;
  9278. property I2C1ASIE : TBits_1 read getI2C1ASIE write setI2C1ASIE;
  9279. property I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
  9280. property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
  9281. property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
  9282. property I2C3BIE : TBits_1 read getI2C3BIE write setI2C3BIE;
  9283. property I2C3MIE : TBits_1 read getI2C3MIE write setI2C3MIE;
  9284. property I2C3SIE : TBits_1 read getI2C3SIE write setI2C3SIE;
  9285. property IC1IE : TBits_1 read getIC1IE write setIC1IE;
  9286. property IC2IE : TBits_1 read getIC2IE write setIC2IE;
  9287. property IC3IE : TBits_1 read getIC3IE write setIC3IE;
  9288. property IC4IE : TBits_1 read getIC4IE write setIC4IE;
  9289. property IC5IE : TBits_1 read getIC5IE write setIC5IE;
  9290. property INT0IE : TBits_1 read getINT0IE write setINT0IE;
  9291. property INT1IE : TBits_1 read getINT1IE write setINT1IE;
  9292. property INT2IE : TBits_1 read getINT2IE write setINT2IE;
  9293. property INT3IE : TBits_1 read getINT3IE write setINT3IE;
  9294. property INT4IE : TBits_1 read getINT4IE write setINT4IE;
  9295. property OC1IE : TBits_1 read getOC1IE write setOC1IE;
  9296. property OC2IE : TBits_1 read getOC2IE write setOC2IE;
  9297. property OC3IE : TBits_1 read getOC3IE write setOC3IE;
  9298. property OC4IE : TBits_1 read getOC4IE write setOC4IE;
  9299. property OC5IE : TBits_1 read getOC5IE write setOC5IE;
  9300. property SPI1AEIE : TBits_1 read getSPI1AEIE write setSPI1AEIE;
  9301. property SPI1ARXIE : TBits_1 read getSPI1ARXIE write setSPI1ARXIE;
  9302. property SPI1ATXIE : TBits_1 read getSPI1ATXIE write setSPI1ATXIE;
  9303. property SPI1EIE : TBits_1 read getSPI1EIE write setSPI1EIE;
  9304. property SPI1RXIE : TBits_1 read getSPI1RXIE write setSPI1RXIE;
  9305. property SPI1TXIE : TBits_1 read getSPI1TXIE write setSPI1TXIE;
  9306. property SPI3EIE : TBits_1 read getSPI3EIE write setSPI3EIE;
  9307. property SPI3RXIE : TBits_1 read getSPI3RXIE write setSPI3RXIE;
  9308. property SPI3TXIE : TBits_1 read getSPI3TXIE write setSPI3TXIE;
  9309. property T1IE : TBits_1 read getT1IE write setT1IE;
  9310. property T2IE : TBits_1 read getT2IE write setT2IE;
  9311. property T3IE : TBits_1 read getT3IE write setT3IE;
  9312. property T4IE : TBits_1 read getT4IE write setT4IE;
  9313. property T5IE : TBits_1 read getT5IE write setT5IE;
  9314. property U1AEIE : TBits_1 read getU1AEIE write setU1AEIE;
  9315. property U1ARXIE : TBits_1 read getU1ARXIE write setU1ARXIE;
  9316. property U1ATXIE : TBits_1 read getU1ATXIE write setU1ATXIE;
  9317. property U1EIE : TBits_1 read getU1EIE write setU1EIE;
  9318. property U1RXIE : TBits_1 read getU1RXIE write setU1RXIE;
  9319. property U1TXIE : TBits_1 read getU1TXIE write setU1TXIE;
  9320. property w : TBits_32 read getw write setw;
  9321. end;
  9322. TINT_IEC1 = record
  9323. private
  9324. function getAD1IE : TBits_1; inline;
  9325. function getCAN1IE : TBits_1; inline;
  9326. function getCAN2IE : TBits_1; inline;
  9327. function getCMP1IE : TBits_1; inline;
  9328. function getCMP2IE : TBits_1; inline;
  9329. function getCNIE : TBits_1; inline;
  9330. function getDMA0IE : TBits_1; inline;
  9331. function getDMA1IE : TBits_1; inline;
  9332. function getDMA2IE : TBits_1; inline;
  9333. function getDMA3IE : TBits_1; inline;
  9334. function getDMA4IE : TBits_1; inline;
  9335. function getDMA5IE : TBits_1; inline;
  9336. function getDMA6IE : TBits_1; inline;
  9337. function getDMA7IE : TBits_1; inline;
  9338. function getETHIE : TBits_1; inline;
  9339. function getFCEIE : TBits_1; inline;
  9340. function getFSCMIE : TBits_1; inline;
  9341. function getI2C2ABIE : TBits_1; inline;
  9342. function getI2C2AMIE : TBits_1; inline;
  9343. function getI2C2ASIE : TBits_1; inline;
  9344. function getI2C2BIE : TBits_1; inline;
  9345. function getI2C2MIE : TBits_1; inline;
  9346. function getI2C2SIE : TBits_1; inline;
  9347. function getI2C3ABIE : TBits_1; inline;
  9348. function getI2C3AMIE : TBits_1; inline;
  9349. function getI2C3ASIE : TBits_1; inline;
  9350. function getI2C4BIE : TBits_1; inline;
  9351. function getI2C4MIE : TBits_1; inline;
  9352. function getI2C4SIE : TBits_1; inline;
  9353. function getI2C5BIE : TBits_1; inline;
  9354. function getI2C5MIE : TBits_1; inline;
  9355. function getI2C5SIE : TBits_1; inline;
  9356. function getIC1EIE : TBits_1; inline;
  9357. function getIC2EIE : TBits_1; inline;
  9358. function getIC3EIE : TBits_1; inline;
  9359. function getPMPIE : TBits_1; inline;
  9360. function getRTCCIE : TBits_1; inline;
  9361. function getSPI2AEIE : TBits_1; inline;
  9362. function getSPI2ARXIE : TBits_1; inline;
  9363. function getSPI2ATXIE : TBits_1; inline;
  9364. function getSPI2EIE : TBits_1; inline;
  9365. function getSPI2RXIE : TBits_1; inline;
  9366. function getSPI2TXIE : TBits_1; inline;
  9367. function getSPI3AEIE : TBits_1; inline;
  9368. function getSPI3ARXIE : TBits_1; inline;
  9369. function getSPI3ATXIE : TBits_1; inline;
  9370. function getSPI4EIE : TBits_1; inline;
  9371. function getSPI4RXIE : TBits_1; inline;
  9372. function getSPI4TXIE : TBits_1; inline;
  9373. function getU2AEIE : TBits_1; inline;
  9374. function getU2ARXIE : TBits_1; inline;
  9375. function getU2ATXIE : TBits_1; inline;
  9376. function getU2EIE : TBits_1; inline;
  9377. function getU2RXIE : TBits_1; inline;
  9378. function getU2TXIE : TBits_1; inline;
  9379. function getU3AEIE : TBits_1; inline;
  9380. function getU3ARXIE : TBits_1; inline;
  9381. function getU3ATXIE : TBits_1; inline;
  9382. function getU3EIE : TBits_1; inline;
  9383. function getU3RXIE : TBits_1; inline;
  9384. function getU3TXIE : TBits_1; inline;
  9385. function getUSBIE : TBits_1; inline;
  9386. function getw : TBits_32; inline;
  9387. procedure setAD1IE(thebits : TBits_1); inline;
  9388. procedure setCAN1IE(thebits : TBits_1); inline;
  9389. procedure setCAN2IE(thebits : TBits_1); inline;
  9390. procedure setCMP1IE(thebits : TBits_1); inline;
  9391. procedure setCMP2IE(thebits : TBits_1); inline;
  9392. procedure setCNIE(thebits : TBits_1); inline;
  9393. procedure setDMA0IE(thebits : TBits_1); inline;
  9394. procedure setDMA1IE(thebits : TBits_1); inline;
  9395. procedure setDMA2IE(thebits : TBits_1); inline;
  9396. procedure setDMA3IE(thebits : TBits_1); inline;
  9397. procedure setDMA4IE(thebits : TBits_1); inline;
  9398. procedure setDMA5IE(thebits : TBits_1); inline;
  9399. procedure setDMA6IE(thebits : TBits_1); inline;
  9400. procedure setDMA7IE(thebits : TBits_1); inline;
  9401. procedure setETHIE(thebits : TBits_1); inline;
  9402. procedure setFCEIE(thebits : TBits_1); inline;
  9403. procedure setFSCMIE(thebits : TBits_1); inline;
  9404. procedure setI2C2ABIE(thebits : TBits_1); inline;
  9405. procedure setI2C2AMIE(thebits : TBits_1); inline;
  9406. procedure setI2C2ASIE(thebits : TBits_1); inline;
  9407. procedure setI2C2BIE(thebits : TBits_1); inline;
  9408. procedure setI2C2MIE(thebits : TBits_1); inline;
  9409. procedure setI2C2SIE(thebits : TBits_1); inline;
  9410. procedure setI2C3ABIE(thebits : TBits_1); inline;
  9411. procedure setI2C3AMIE(thebits : TBits_1); inline;
  9412. procedure setI2C3ASIE(thebits : TBits_1); inline;
  9413. procedure setI2C4BIE(thebits : TBits_1); inline;
  9414. procedure setI2C4MIE(thebits : TBits_1); inline;
  9415. procedure setI2C4SIE(thebits : TBits_1); inline;
  9416. procedure setI2C5BIE(thebits : TBits_1); inline;
  9417. procedure setI2C5MIE(thebits : TBits_1); inline;
  9418. procedure setI2C5SIE(thebits : TBits_1); inline;
  9419. procedure setIC1EIE(thebits : TBits_1); inline;
  9420. procedure setIC2EIE(thebits : TBits_1); inline;
  9421. procedure setIC3EIE(thebits : TBits_1); inline;
  9422. procedure setPMPIE(thebits : TBits_1); inline;
  9423. procedure setRTCCIE(thebits : TBits_1); inline;
  9424. procedure setSPI2AEIE(thebits : TBits_1); inline;
  9425. procedure setSPI2ARXIE(thebits : TBits_1); inline;
  9426. procedure setSPI2ATXIE(thebits : TBits_1); inline;
  9427. procedure setSPI2EIE(thebits : TBits_1); inline;
  9428. procedure setSPI2RXIE(thebits : TBits_1); inline;
  9429. procedure setSPI2TXIE(thebits : TBits_1); inline;
  9430. procedure setSPI3AEIE(thebits : TBits_1); inline;
  9431. procedure setSPI3ARXIE(thebits : TBits_1); inline;
  9432. procedure setSPI3ATXIE(thebits : TBits_1); inline;
  9433. procedure setSPI4EIE(thebits : TBits_1); inline;
  9434. procedure setSPI4RXIE(thebits : TBits_1); inline;
  9435. procedure setSPI4TXIE(thebits : TBits_1); inline;
  9436. procedure setU2AEIE(thebits : TBits_1); inline;
  9437. procedure setU2ARXIE(thebits : TBits_1); inline;
  9438. procedure setU2ATXIE(thebits : TBits_1); inline;
  9439. procedure setU2EIE(thebits : TBits_1); inline;
  9440. procedure setU2RXIE(thebits : TBits_1); inline;
  9441. procedure setU2TXIE(thebits : TBits_1); inline;
  9442. procedure setU3AEIE(thebits : TBits_1); inline;
  9443. procedure setU3ARXIE(thebits : TBits_1); inline;
  9444. procedure setU3ATXIE(thebits : TBits_1); inline;
  9445. procedure setU3EIE(thebits : TBits_1); inline;
  9446. procedure setU3RXIE(thebits : TBits_1); inline;
  9447. procedure setU3TXIE(thebits : TBits_1); inline;
  9448. procedure setUSBIE(thebits : TBits_1); inline;
  9449. procedure setw(thebits : TBits_32); inline;
  9450. public
  9451. procedure clearAD1IE; inline;
  9452. procedure clearCAN1IE; inline;
  9453. procedure clearCAN2IE; inline;
  9454. procedure clearCMP1IE; inline;
  9455. procedure clearCMP2IE; inline;
  9456. procedure clearCNIE; inline;
  9457. procedure clearDMA0IE; inline;
  9458. procedure clearDMA1IE; inline;
  9459. procedure clearDMA2IE; inline;
  9460. procedure clearDMA3IE; inline;
  9461. procedure clearDMA4IE; inline;
  9462. procedure clearDMA5IE; inline;
  9463. procedure clearDMA6IE; inline;
  9464. procedure clearDMA7IE; inline;
  9465. procedure clearETHIE; inline;
  9466. procedure clearFCEIE; inline;
  9467. procedure clearFSCMIE; inline;
  9468. procedure clearI2C2ABIE; inline;
  9469. procedure clearI2C2AMIE; inline;
  9470. procedure clearI2C2ASIE; inline;
  9471. procedure clearI2C2BIE; inline;
  9472. procedure clearI2C2MIE; inline;
  9473. procedure clearI2C2SIE; inline;
  9474. procedure clearI2C3ABIE; inline;
  9475. procedure clearI2C3AMIE; inline;
  9476. procedure clearI2C3ASIE; inline;
  9477. procedure clearI2C4BIE; inline;
  9478. procedure clearI2C4MIE; inline;
  9479. procedure clearI2C4SIE; inline;
  9480. procedure clearI2C5BIE; inline;
  9481. procedure clearI2C5MIE; inline;
  9482. procedure clearI2C5SIE; inline;
  9483. procedure clearIC1EIE; inline;
  9484. procedure clearIC2EIE; inline;
  9485. procedure clearIC3EIE; inline;
  9486. procedure clearPMPIE; inline;
  9487. procedure clearRTCCIE; inline;
  9488. procedure clearSPI2AEIE; inline;
  9489. procedure clearSPI2ARXIE; inline;
  9490. procedure clearSPI2ATXIE; inline;
  9491. procedure clearSPI2EIE; inline;
  9492. procedure clearSPI2RXIE; inline;
  9493. procedure clearSPI2TXIE; inline;
  9494. procedure clearSPI3AEIE; inline;
  9495. procedure clearSPI3ARXIE; inline;
  9496. procedure clearSPI3ATXIE; inline;
  9497. procedure clearSPI4EIE; inline;
  9498. procedure clearSPI4RXIE; inline;
  9499. procedure clearSPI4TXIE; inline;
  9500. procedure clearU2AEIE; inline;
  9501. procedure clearU2ARXIE; inline;
  9502. procedure clearU2ATXIE; inline;
  9503. procedure clearU2EIE; inline;
  9504. procedure clearU2RXIE; inline;
  9505. procedure clearU2TXIE; inline;
  9506. procedure clearU3AEIE; inline;
  9507. procedure clearU3ARXIE; inline;
  9508. procedure clearU3ATXIE; inline;
  9509. procedure clearU3EIE; inline;
  9510. procedure clearU3RXIE; inline;
  9511. procedure clearU3TXIE; inline;
  9512. procedure clearUSBIE; inline;
  9513. procedure setAD1IE; inline;
  9514. procedure setCAN1IE; inline;
  9515. procedure setCAN2IE; inline;
  9516. procedure setCMP1IE; inline;
  9517. procedure setCMP2IE; inline;
  9518. procedure setCNIE; inline;
  9519. procedure setDMA0IE; inline;
  9520. procedure setDMA1IE; inline;
  9521. procedure setDMA2IE; inline;
  9522. procedure setDMA3IE; inline;
  9523. procedure setDMA4IE; inline;
  9524. procedure setDMA5IE; inline;
  9525. procedure setDMA6IE; inline;
  9526. procedure setDMA7IE; inline;
  9527. procedure setETHIE; inline;
  9528. procedure setFCEIE; inline;
  9529. procedure setFSCMIE; inline;
  9530. procedure setI2C2ABIE; inline;
  9531. procedure setI2C2AMIE; inline;
  9532. procedure setI2C2ASIE; inline;
  9533. procedure setI2C2BIE; inline;
  9534. procedure setI2C2MIE; inline;
  9535. procedure setI2C2SIE; inline;
  9536. procedure setI2C3ABIE; inline;
  9537. procedure setI2C3AMIE; inline;
  9538. procedure setI2C3ASIE; inline;
  9539. procedure setI2C4BIE; inline;
  9540. procedure setI2C4MIE; inline;
  9541. procedure setI2C4SIE; inline;
  9542. procedure setI2C5BIE; inline;
  9543. procedure setI2C5MIE; inline;
  9544. procedure setI2C5SIE; inline;
  9545. procedure setIC1EIE; inline;
  9546. procedure setIC2EIE; inline;
  9547. procedure setIC3EIE; inline;
  9548. procedure setPMPIE; inline;
  9549. procedure setRTCCIE; inline;
  9550. procedure setSPI2AEIE; inline;
  9551. procedure setSPI2ARXIE; inline;
  9552. procedure setSPI2ATXIE; inline;
  9553. procedure setSPI2EIE; inline;
  9554. procedure setSPI2RXIE; inline;
  9555. procedure setSPI2TXIE; inline;
  9556. procedure setSPI3AEIE; inline;
  9557. procedure setSPI3ARXIE; inline;
  9558. procedure setSPI3ATXIE; inline;
  9559. procedure setSPI4EIE; inline;
  9560. procedure setSPI4RXIE; inline;
  9561. procedure setSPI4TXIE; inline;
  9562. procedure setU2AEIE; inline;
  9563. procedure setU2ARXIE; inline;
  9564. procedure setU2ATXIE; inline;
  9565. procedure setU2EIE; inline;
  9566. procedure setU2RXIE; inline;
  9567. procedure setU2TXIE; inline;
  9568. procedure setU3AEIE; inline;
  9569. procedure setU3ARXIE; inline;
  9570. procedure setU3ATXIE; inline;
  9571. procedure setU3EIE; inline;
  9572. procedure setU3RXIE; inline;
  9573. procedure setU3TXIE; inline;
  9574. procedure setUSBIE; inline;
  9575. property AD1IE : TBits_1 read getAD1IE write setAD1IE;
  9576. property CAN1IE : TBits_1 read getCAN1IE write setCAN1IE;
  9577. property CAN2IE : TBits_1 read getCAN2IE write setCAN2IE;
  9578. property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
  9579. property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
  9580. property CNIE : TBits_1 read getCNIE write setCNIE;
  9581. property DMA0IE : TBits_1 read getDMA0IE write setDMA0IE;
  9582. property DMA1IE : TBits_1 read getDMA1IE write setDMA1IE;
  9583. property DMA2IE : TBits_1 read getDMA2IE write setDMA2IE;
  9584. property DMA3IE : TBits_1 read getDMA3IE write setDMA3IE;
  9585. property DMA4IE : TBits_1 read getDMA4IE write setDMA4IE;
  9586. property DMA5IE : TBits_1 read getDMA5IE write setDMA5IE;
  9587. property DMA6IE : TBits_1 read getDMA6IE write setDMA6IE;
  9588. property DMA7IE : TBits_1 read getDMA7IE write setDMA7IE;
  9589. property ETHIE : TBits_1 read getETHIE write setETHIE;
  9590. property FCEIE : TBits_1 read getFCEIE write setFCEIE;
  9591. property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
  9592. property I2C2ABIE : TBits_1 read getI2C2ABIE write setI2C2ABIE;
  9593. property I2C2AMIE : TBits_1 read getI2C2AMIE write setI2C2AMIE;
  9594. property I2C2ASIE : TBits_1 read getI2C2ASIE write setI2C2ASIE;
  9595. property I2C2BIE : TBits_1 read getI2C2BIE write setI2C2BIE;
  9596. property I2C2MIE : TBits_1 read getI2C2MIE write setI2C2MIE;
  9597. property I2C2SIE : TBits_1 read getI2C2SIE write setI2C2SIE;
  9598. property I2C3ABIE : TBits_1 read getI2C3ABIE write setI2C3ABIE;
  9599. property I2C3AMIE : TBits_1 read getI2C3AMIE write setI2C3AMIE;
  9600. property I2C3ASIE : TBits_1 read getI2C3ASIE write setI2C3ASIE;
  9601. property I2C4BIE : TBits_1 read getI2C4BIE write setI2C4BIE;
  9602. property I2C4MIE : TBits_1 read getI2C4MIE write setI2C4MIE;
  9603. property I2C4SIE : TBits_1 read getI2C4SIE write setI2C4SIE;
  9604. property I2C5BIE : TBits_1 read getI2C5BIE write setI2C5BIE;
  9605. property I2C5MIE : TBits_1 read getI2C5MIE write setI2C5MIE;
  9606. property I2C5SIE : TBits_1 read getI2C5SIE write setI2C5SIE;
  9607. property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
  9608. property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
  9609. property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
  9610. property PMPIE : TBits_1 read getPMPIE write setPMPIE;
  9611. property RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
  9612. property SPI2AEIE : TBits_1 read getSPI2AEIE write setSPI2AEIE;
  9613. property SPI2ARXIE : TBits_1 read getSPI2ARXIE write setSPI2ARXIE;
  9614. property SPI2ATXIE : TBits_1 read getSPI2ATXIE write setSPI2ATXIE;
  9615. property SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
  9616. property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
  9617. property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
  9618. property SPI3AEIE : TBits_1 read getSPI3AEIE write setSPI3AEIE;
  9619. property SPI3ARXIE : TBits_1 read getSPI3ARXIE write setSPI3ARXIE;
  9620. property SPI3ATXIE : TBits_1 read getSPI3ATXIE write setSPI3ATXIE;
  9621. property SPI4EIE : TBits_1 read getSPI4EIE write setSPI4EIE;
  9622. property SPI4RXIE : TBits_1 read getSPI4RXIE write setSPI4RXIE;
  9623. property SPI4TXIE : TBits_1 read getSPI4TXIE write setSPI4TXIE;
  9624. property U2AEIE : TBits_1 read getU2AEIE write setU2AEIE;
  9625. property U2ARXIE : TBits_1 read getU2ARXIE write setU2ARXIE;
  9626. property U2ATXIE : TBits_1 read getU2ATXIE write setU2ATXIE;
  9627. property U2EIE : TBits_1 read getU2EIE write setU2EIE;
  9628. property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
  9629. property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
  9630. property U3AEIE : TBits_1 read getU3AEIE write setU3AEIE;
  9631. property U3ARXIE : TBits_1 read getU3ARXIE write setU3ARXIE;
  9632. property U3ATXIE : TBits_1 read getU3ATXIE write setU3ATXIE;
  9633. property U3EIE : TBits_1 read getU3EIE write setU3EIE;
  9634. property U3RXIE : TBits_1 read getU3RXIE write setU3RXIE;
  9635. property U3TXIE : TBits_1 read getU3TXIE write setU3TXIE;
  9636. property USBIE : TBits_1 read getUSBIE write setUSBIE;
  9637. property w : TBits_32 read getw write setw;
  9638. end;
  9639. TINT_IEC2 = record
  9640. private
  9641. function getIC4EIE : TBits_1; inline;
  9642. function getIC5EIE : TBits_1; inline;
  9643. function getPMPEIE : TBits_1; inline;
  9644. function getU1BEIE : TBits_1; inline;
  9645. function getU1BRXIE : TBits_1; inline;
  9646. function getU1BTXIE : TBits_1; inline;
  9647. function getU2BEIE : TBits_1; inline;
  9648. function getU2BRXIE : TBits_1; inline;
  9649. function getU2BTXIE : TBits_1; inline;
  9650. function getU3BEIE : TBits_1; inline;
  9651. function getU3BRXIE : TBits_1; inline;
  9652. function getU3BTXIE : TBits_1; inline;
  9653. function getU4EIE : TBits_1; inline;
  9654. function getU4RXIE : TBits_1; inline;
  9655. function getU4TXIE : TBits_1; inline;
  9656. function getU5EIE : TBits_1; inline;
  9657. function getU5RXIE : TBits_1; inline;
  9658. function getU5TXIE : TBits_1; inline;
  9659. function getU6EIE : TBits_1; inline;
  9660. function getU6RXIE : TBits_1; inline;
  9661. function getU6TXIE : TBits_1; inline;
  9662. function getw : TBits_32; inline;
  9663. procedure setIC4EIE(thebits : TBits_1); inline;
  9664. procedure setIC5EIE(thebits : TBits_1); inline;
  9665. procedure setPMPEIE(thebits : TBits_1); inline;
  9666. procedure setU1BEIE(thebits : TBits_1); inline;
  9667. procedure setU1BRXIE(thebits : TBits_1); inline;
  9668. procedure setU1BTXIE(thebits : TBits_1); inline;
  9669. procedure setU2BEIE(thebits : TBits_1); inline;
  9670. procedure setU2BRXIE(thebits : TBits_1); inline;
  9671. procedure setU2BTXIE(thebits : TBits_1); inline;
  9672. procedure setU3BEIE(thebits : TBits_1); inline;
  9673. procedure setU3BRXIE(thebits : TBits_1); inline;
  9674. procedure setU3BTXIE(thebits : TBits_1); inline;
  9675. procedure setU4EIE(thebits : TBits_1); inline;
  9676. procedure setU4RXIE(thebits : TBits_1); inline;
  9677. procedure setU4TXIE(thebits : TBits_1); inline;
  9678. procedure setU5EIE(thebits : TBits_1); inline;
  9679. procedure setU5RXIE(thebits : TBits_1); inline;
  9680. procedure setU5TXIE(thebits : TBits_1); inline;
  9681. procedure setU6EIE(thebits : TBits_1); inline;
  9682. procedure setU6RXIE(thebits : TBits_1); inline;
  9683. procedure setU6TXIE(thebits : TBits_1); inline;
  9684. procedure setw(thebits : TBits_32); inline;
  9685. public
  9686. procedure clearIC4EIE; inline;
  9687. procedure clearIC5EIE; inline;
  9688. procedure clearPMPEIE; inline;
  9689. procedure clearU1BEIE; inline;
  9690. procedure clearU1BRXIE; inline;
  9691. procedure clearU1BTXIE; inline;
  9692. procedure clearU2BEIE; inline;
  9693. procedure clearU2BRXIE; inline;
  9694. procedure clearU2BTXIE; inline;
  9695. procedure clearU3BEIE; inline;
  9696. procedure clearU3BRXIE; inline;
  9697. procedure clearU3BTXIE; inline;
  9698. procedure clearU4EIE; inline;
  9699. procedure clearU4RXIE; inline;
  9700. procedure clearU4TXIE; inline;
  9701. procedure clearU5EIE; inline;
  9702. procedure clearU5RXIE; inline;
  9703. procedure clearU5TXIE; inline;
  9704. procedure clearU6EIE; inline;
  9705. procedure clearU6RXIE; inline;
  9706. procedure clearU6TXIE; inline;
  9707. procedure setIC4EIE; inline;
  9708. procedure setIC5EIE; inline;
  9709. procedure setPMPEIE; inline;
  9710. procedure setU1BEIE; inline;
  9711. procedure setU1BRXIE; inline;
  9712. procedure setU1BTXIE; inline;
  9713. procedure setU2BEIE; inline;
  9714. procedure setU2BRXIE; inline;
  9715. procedure setU2BTXIE; inline;
  9716. procedure setU3BEIE; inline;
  9717. procedure setU3BRXIE; inline;
  9718. procedure setU3BTXIE; inline;
  9719. procedure setU4EIE; inline;
  9720. procedure setU4RXIE; inline;
  9721. procedure setU4TXIE; inline;
  9722. procedure setU5EIE; inline;
  9723. procedure setU5RXIE; inline;
  9724. procedure setU5TXIE; inline;
  9725. procedure setU6EIE; inline;
  9726. procedure setU6RXIE; inline;
  9727. procedure setU6TXIE; inline;
  9728. property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
  9729. property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
  9730. property PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
  9731. property U1BEIE : TBits_1 read getU1BEIE write setU1BEIE;
  9732. property U1BRXIE : TBits_1 read getU1BRXIE write setU1BRXIE;
  9733. property U1BTXIE : TBits_1 read getU1BTXIE write setU1BTXIE;
  9734. property U2BEIE : TBits_1 read getU2BEIE write setU2BEIE;
  9735. property U2BRXIE : TBits_1 read getU2BRXIE write setU2BRXIE;
  9736. property U2BTXIE : TBits_1 read getU2BTXIE write setU2BTXIE;
  9737. property U3BEIE : TBits_1 read getU3BEIE write setU3BEIE;
  9738. property U3BRXIE : TBits_1 read getU3BRXIE write setU3BRXIE;
  9739. property U3BTXIE : TBits_1 read getU3BTXIE write setU3BTXIE;
  9740. property U4EIE : TBits_1 read getU4EIE write setU4EIE;
  9741. property U4RXIE : TBits_1 read getU4RXIE write setU4RXIE;
  9742. property U4TXIE : TBits_1 read getU4TXIE write setU4TXIE;
  9743. property U5EIE : TBits_1 read getU5EIE write setU5EIE;
  9744. property U5RXIE : TBits_1 read getU5RXIE write setU5RXIE;
  9745. property U5TXIE : TBits_1 read getU5TXIE write setU5TXIE;
  9746. property U6EIE : TBits_1 read getU6EIE write setU6EIE;
  9747. property U6RXIE : TBits_1 read getU6RXIE write setU6RXIE;
  9748. property U6TXIE : TBits_1 read getU6TXIE write setU6TXIE;
  9749. property w : TBits_32 read getw write setw;
  9750. end;
  9751. TINT_IPC0 = record
  9752. private
  9753. function getCS0IP : TBits_3; inline;
  9754. function getCS0IS : TBits_2; inline;
  9755. function getCS1IP : TBits_3; inline;
  9756. function getCS1IS : TBits_2; inline;
  9757. function getCTIP : TBits_3; inline;
  9758. function getCTIS : TBits_2; inline;
  9759. function getINT0IP : TBits_3; inline;
  9760. function getINT0IS : TBits_2; inline;
  9761. function getw : TBits_32; inline;
  9762. procedure setCS0IP(thebits : TBits_3); inline;
  9763. procedure setCS0IS(thebits : TBits_2); inline;
  9764. procedure setCS1IP(thebits : TBits_3); inline;
  9765. procedure setCS1IS(thebits : TBits_2); inline;
  9766. procedure setCTIP(thebits : TBits_3); inline;
  9767. procedure setCTIS(thebits : TBits_2); inline;
  9768. procedure setINT0IP(thebits : TBits_3); inline;
  9769. procedure setINT0IS(thebits : TBits_2); inline;
  9770. procedure setw(thebits : TBits_32); inline;
  9771. public
  9772. property CS0IP : TBits_3 read getCS0IP write setCS0IP;
  9773. property CS0IS : TBits_2 read getCS0IS write setCS0IS;
  9774. property CS1IP : TBits_3 read getCS1IP write setCS1IP;
  9775. property CS1IS : TBits_2 read getCS1IS write setCS1IS;
  9776. property CTIP : TBits_3 read getCTIP write setCTIP;
  9777. property CTIS : TBits_2 read getCTIS write setCTIS;
  9778. property INT0IP : TBits_3 read getINT0IP write setINT0IP;
  9779. property INT0IS : TBits_2 read getINT0IS write setINT0IS;
  9780. property w : TBits_32 read getw write setw;
  9781. end;
  9782. TINT_IPC1 = record
  9783. private
  9784. function getIC1IP : TBits_3; inline;
  9785. function getIC1IS : TBits_2; inline;
  9786. function getINT1IP : TBits_3; inline;
  9787. function getINT1IS : TBits_2; inline;
  9788. function getOC1IP : TBits_3; inline;
  9789. function getOC1IS : TBits_2; inline;
  9790. function getT1IP : TBits_3; inline;
  9791. function getT1IS : TBits_2; inline;
  9792. function getw : TBits_32; inline;
  9793. procedure setIC1IP(thebits : TBits_3); inline;
  9794. procedure setIC1IS(thebits : TBits_2); inline;
  9795. procedure setINT1IP(thebits : TBits_3); inline;
  9796. procedure setINT1IS(thebits : TBits_2); inline;
  9797. procedure setOC1IP(thebits : TBits_3); inline;
  9798. procedure setOC1IS(thebits : TBits_2); inline;
  9799. procedure setT1IP(thebits : TBits_3); inline;
  9800. procedure setT1IS(thebits : TBits_2); inline;
  9801. procedure setw(thebits : TBits_32); inline;
  9802. public
  9803. property IC1IP : TBits_3 read getIC1IP write setIC1IP;
  9804. property IC1IS : TBits_2 read getIC1IS write setIC1IS;
  9805. property INT1IP : TBits_3 read getINT1IP write setINT1IP;
  9806. property INT1IS : TBits_2 read getINT1IS write setINT1IS;
  9807. property OC1IP : TBits_3 read getOC1IP write setOC1IP;
  9808. property OC1IS : TBits_2 read getOC1IS write setOC1IS;
  9809. property T1IP : TBits_3 read getT1IP write setT1IP;
  9810. property T1IS : TBits_2 read getT1IS write setT1IS;
  9811. property w : TBits_32 read getw write setw;
  9812. end;
  9813. TINT_IPC2 = record
  9814. private
  9815. function getIC2IP : TBits_3; inline;
  9816. function getIC2IS : TBits_2; inline;
  9817. function getINT2IP : TBits_3; inline;
  9818. function getINT2IS : TBits_2; inline;
  9819. function getOC2IP : TBits_3; inline;
  9820. function getOC2IS : TBits_2; inline;
  9821. function getT2IP : TBits_3; inline;
  9822. function getT2IS : TBits_2; inline;
  9823. function getw : TBits_32; inline;
  9824. procedure setIC2IP(thebits : TBits_3); inline;
  9825. procedure setIC2IS(thebits : TBits_2); inline;
  9826. procedure setINT2IP(thebits : TBits_3); inline;
  9827. procedure setINT2IS(thebits : TBits_2); inline;
  9828. procedure setOC2IP(thebits : TBits_3); inline;
  9829. procedure setOC2IS(thebits : TBits_2); inline;
  9830. procedure setT2IP(thebits : TBits_3); inline;
  9831. procedure setT2IS(thebits : TBits_2); inline;
  9832. procedure setw(thebits : TBits_32); inline;
  9833. public
  9834. property IC2IP : TBits_3 read getIC2IP write setIC2IP;
  9835. property IC2IS : TBits_2 read getIC2IS write setIC2IS;
  9836. property INT2IP : TBits_3 read getINT2IP write setINT2IP;
  9837. property INT2IS : TBits_2 read getINT2IS write setINT2IS;
  9838. property OC2IP : TBits_3 read getOC2IP write setOC2IP;
  9839. property OC2IS : TBits_2 read getOC2IS write setOC2IS;
  9840. property T2IP : TBits_3 read getT2IP write setT2IP;
  9841. property T2IS : TBits_2 read getT2IS write setT2IS;
  9842. property w : TBits_32 read getw write setw;
  9843. end;
  9844. TINT_IPC3 = record
  9845. private
  9846. function getIC3IP : TBits_3; inline;
  9847. function getIC3IS : TBits_2; inline;
  9848. function getINT3IP : TBits_3; inline;
  9849. function getINT3IS : TBits_2; inline;
  9850. function getOC3IP : TBits_3; inline;
  9851. function getOC3IS : TBits_2; inline;
  9852. function getT3IP : TBits_3; inline;
  9853. function getT3IS : TBits_2; inline;
  9854. function getw : TBits_32; inline;
  9855. procedure setIC3IP(thebits : TBits_3); inline;
  9856. procedure setIC3IS(thebits : TBits_2); inline;
  9857. procedure setINT3IP(thebits : TBits_3); inline;
  9858. procedure setINT3IS(thebits : TBits_2); inline;
  9859. procedure setOC3IP(thebits : TBits_3); inline;
  9860. procedure setOC3IS(thebits : TBits_2); inline;
  9861. procedure setT3IP(thebits : TBits_3); inline;
  9862. procedure setT3IS(thebits : TBits_2); inline;
  9863. procedure setw(thebits : TBits_32); inline;
  9864. public
  9865. property IC3IP : TBits_3 read getIC3IP write setIC3IP;
  9866. property IC3IS : TBits_2 read getIC3IS write setIC3IS;
  9867. property INT3IP : TBits_3 read getINT3IP write setINT3IP;
  9868. property INT3IS : TBits_2 read getINT3IS write setINT3IS;
  9869. property OC3IP : TBits_3 read getOC3IP write setOC3IP;
  9870. property OC3IS : TBits_2 read getOC3IS write setOC3IS;
  9871. property T3IP : TBits_3 read getT3IP write setT3IP;
  9872. property T3IS : TBits_2 read getT3IS write setT3IS;
  9873. property w : TBits_32 read getw write setw;
  9874. end;
  9875. TINT_IPC4 = record
  9876. private
  9877. function getIC4IP : TBits_3; inline;
  9878. function getIC4IS : TBits_2; inline;
  9879. function getINT4IP : TBits_3; inline;
  9880. function getINT4IS : TBits_2; inline;
  9881. function getOC4IP : TBits_3; inline;
  9882. function getOC4IS : TBits_2; inline;
  9883. function getT4IP : TBits_3; inline;
  9884. function getT4IS : TBits_2; inline;
  9885. function getw : TBits_32; inline;
  9886. procedure setIC4IP(thebits : TBits_3); inline;
  9887. procedure setIC4IS(thebits : TBits_2); inline;
  9888. procedure setINT4IP(thebits : TBits_3); inline;
  9889. procedure setINT4IS(thebits : TBits_2); inline;
  9890. procedure setOC4IP(thebits : TBits_3); inline;
  9891. procedure setOC4IS(thebits : TBits_2); inline;
  9892. procedure setT4IP(thebits : TBits_3); inline;
  9893. procedure setT4IS(thebits : TBits_2); inline;
  9894. procedure setw(thebits : TBits_32); inline;
  9895. public
  9896. property IC4IP : TBits_3 read getIC4IP write setIC4IP;
  9897. property IC4IS : TBits_2 read getIC4IS write setIC4IS;
  9898. property INT4IP : TBits_3 read getINT4IP write setINT4IP;
  9899. property INT4IS : TBits_2 read getINT4IS write setINT4IS;
  9900. property OC4IP : TBits_3 read getOC4IP write setOC4IP;
  9901. property OC4IS : TBits_2 read getOC4IS write setOC4IS;
  9902. property T4IP : TBits_3 read getT4IP write setT4IP;
  9903. property T4IS : TBits_2 read getT4IS write setT4IS;
  9904. property w : TBits_32 read getw write setw;
  9905. end;
  9906. TINT_IPC5 = record
  9907. private
  9908. function getIC5IP : TBits_3; inline;
  9909. function getIC5IS : TBits_2; inline;
  9910. function getOC5IP : TBits_3; inline;
  9911. function getOC5IS : TBits_2; inline;
  9912. function getSPI1IP : TBits_3; inline;
  9913. function getSPI1IS : TBits_2; inline;
  9914. function getT5IP : TBits_3; inline;
  9915. function getT5IS : TBits_2; inline;
  9916. function getw : TBits_32; inline;
  9917. procedure setIC5IP(thebits : TBits_3); inline;
  9918. procedure setIC5IS(thebits : TBits_2); inline;
  9919. procedure setOC5IP(thebits : TBits_3); inline;
  9920. procedure setOC5IS(thebits : TBits_2); inline;
  9921. procedure setSPI1IP(thebits : TBits_3); inline;
  9922. procedure setSPI1IS(thebits : TBits_2); inline;
  9923. procedure setT5IP(thebits : TBits_3); inline;
  9924. procedure setT5IS(thebits : TBits_2); inline;
  9925. procedure setw(thebits : TBits_32); inline;
  9926. public
  9927. property IC5IP : TBits_3 read getIC5IP write setIC5IP;
  9928. property IC5IS : TBits_2 read getIC5IS write setIC5IS;
  9929. property OC5IP : TBits_3 read getOC5IP write setOC5IP;
  9930. property OC5IS : TBits_2 read getOC5IS write setOC5IS;
  9931. property SPI1IP : TBits_3 read getSPI1IP write setSPI1IP;
  9932. property SPI1IS : TBits_2 read getSPI1IS write setSPI1IS;
  9933. property T5IP : TBits_3 read getT5IP write setT5IP;
  9934. property T5IS : TBits_2 read getT5IS write setT5IS;
  9935. property w : TBits_32 read getw write setw;
  9936. end;
  9937. TINT_IPC6 = record
  9938. private
  9939. function getAD1IP : TBits_3; inline;
  9940. function getAD1IS : TBits_2; inline;
  9941. function getCNIP : TBits_3; inline;
  9942. function getCNIS : TBits_2; inline;
  9943. function getI2C1AIP : TBits_3; inline;
  9944. function getI2C1AIS : TBits_2; inline;
  9945. function getI2C1IP : TBits_3; inline;
  9946. function getI2C1IS : TBits_2; inline;
  9947. function getI2C3IP : TBits_3; inline;
  9948. function getI2C3IS : TBits_2; inline;
  9949. function getSPI1AIP : TBits_3; inline;
  9950. function getSPI1AIS : TBits_2; inline;
  9951. function getSPI3IP : TBits_3; inline;
  9952. function getSPI3IS : TBits_2; inline;
  9953. function getU1AIP : TBits_3; inline;
  9954. function getU1AIS : TBits_2; inline;
  9955. function getU1IP : TBits_3; inline;
  9956. function getU1IS : TBits_2; inline;
  9957. function getw : TBits_32; inline;
  9958. procedure setAD1IP(thebits : TBits_3); inline;
  9959. procedure setAD1IS(thebits : TBits_2); inline;
  9960. procedure setCNIP(thebits : TBits_3); inline;
  9961. procedure setCNIS(thebits : TBits_2); inline;
  9962. procedure setI2C1AIP(thebits : TBits_3); inline;
  9963. procedure setI2C1AIS(thebits : TBits_2); inline;
  9964. procedure setI2C1IP(thebits : TBits_3); inline;
  9965. procedure setI2C1IS(thebits : TBits_2); inline;
  9966. procedure setI2C3IP(thebits : TBits_3); inline;
  9967. procedure setI2C3IS(thebits : TBits_2); inline;
  9968. procedure setSPI1AIP(thebits : TBits_3); inline;
  9969. procedure setSPI1AIS(thebits : TBits_2); inline;
  9970. procedure setSPI3IP(thebits : TBits_3); inline;
  9971. procedure setSPI3IS(thebits : TBits_2); inline;
  9972. procedure setU1AIP(thebits : TBits_3); inline;
  9973. procedure setU1AIS(thebits : TBits_2); inline;
  9974. procedure setU1IP(thebits : TBits_3); inline;
  9975. procedure setU1IS(thebits : TBits_2); inline;
  9976. procedure setw(thebits : TBits_32); inline;
  9977. public
  9978. property AD1IP : TBits_3 read getAD1IP write setAD1IP;
  9979. property AD1IS : TBits_2 read getAD1IS write setAD1IS;
  9980. property CNIP : TBits_3 read getCNIP write setCNIP;
  9981. property CNIS : TBits_2 read getCNIS write setCNIS;
  9982. property I2C1AIP : TBits_3 read getI2C1AIP write setI2C1AIP;
  9983. property I2C1AIS : TBits_2 read getI2C1AIS write setI2C1AIS;
  9984. property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
  9985. property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
  9986. property I2C3IP : TBits_3 read getI2C3IP write setI2C3IP;
  9987. property I2C3IS : TBits_2 read getI2C3IS write setI2C3IS;
  9988. property SPI1AIP : TBits_3 read getSPI1AIP write setSPI1AIP;
  9989. property SPI1AIS : TBits_2 read getSPI1AIS write setSPI1AIS;
  9990. property SPI3IP : TBits_3 read getSPI3IP write setSPI3IP;
  9991. property SPI3IS : TBits_2 read getSPI3IS write setSPI3IS;
  9992. property U1AIP : TBits_3 read getU1AIP write setU1AIP;
  9993. property U1AIS : TBits_2 read getU1AIS write setU1AIS;
  9994. property U1IP : TBits_3 read getU1IP write setU1IP;
  9995. property U1IS : TBits_2 read getU1IS write setU1IS;
  9996. property w : TBits_32 read getw write setw;
  9997. end;
  9998. TINT_IPC7 = record
  9999. private
  10000. function getCMP1IP : TBits_3; inline;
  10001. function getCMP1IS : TBits_2; inline;
  10002. function getCMP2IP : TBits_3; inline;
  10003. function getCMP2IS : TBits_2; inline;
  10004. function getI2C2AIP : TBits_3; inline;
  10005. function getI2C2AIS : TBits_2; inline;
  10006. function getI2C4IP : TBits_3; inline;
  10007. function getI2C4IS : TBits_2; inline;
  10008. function getPMPIP : TBits_3; inline;
  10009. function getPMPIS : TBits_2; inline;
  10010. function getSPI2AIP : TBits_3; inline;
  10011. function getSPI2AIS : TBits_2; inline;
  10012. function getSPI2IP : TBits_3; inline;
  10013. function getSPI2IS : TBits_2; inline;
  10014. function getU2AIP : TBits_3; inline;
  10015. function getU2AIS : TBits_2; inline;
  10016. function getU3IP : TBits_3; inline;
  10017. function getU3IS : TBits_2; inline;
  10018. function getw : TBits_32; inline;
  10019. procedure setCMP1IP(thebits : TBits_3); inline;
  10020. procedure setCMP1IS(thebits : TBits_2); inline;
  10021. procedure setCMP2IP(thebits : TBits_3); inline;
  10022. procedure setCMP2IS(thebits : TBits_2); inline;
  10023. procedure setI2C2AIP(thebits : TBits_3); inline;
  10024. procedure setI2C2AIS(thebits : TBits_2); inline;
  10025. procedure setI2C4IP(thebits : TBits_3); inline;
  10026. procedure setI2C4IS(thebits : TBits_2); inline;
  10027. procedure setPMPIP(thebits : TBits_3); inline;
  10028. procedure setPMPIS(thebits : TBits_2); inline;
  10029. procedure setSPI2AIP(thebits : TBits_3); inline;
  10030. procedure setSPI2AIS(thebits : TBits_2); inline;
  10031. procedure setSPI2IP(thebits : TBits_3); inline;
  10032. procedure setSPI2IS(thebits : TBits_2); inline;
  10033. procedure setU2AIP(thebits : TBits_3); inline;
  10034. procedure setU2AIS(thebits : TBits_2); inline;
  10035. procedure setU3IP(thebits : TBits_3); inline;
  10036. procedure setU3IS(thebits : TBits_2); inline;
  10037. procedure setw(thebits : TBits_32); inline;
  10038. public
  10039. property CMP1IP : TBits_3 read getCMP1IP write setCMP1IP;
  10040. property CMP1IS : TBits_2 read getCMP1IS write setCMP1IS;
  10041. property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
  10042. property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
  10043. property I2C2AIP : TBits_3 read getI2C2AIP write setI2C2AIP;
  10044. property I2C2AIS : TBits_2 read getI2C2AIS write setI2C2AIS;
  10045. property I2C4IP : TBits_3 read getI2C4IP write setI2C4IP;
  10046. property I2C4IS : TBits_2 read getI2C4IS write setI2C4IS;
  10047. property PMPIP : TBits_3 read getPMPIP write setPMPIP;
  10048. property PMPIS : TBits_2 read getPMPIS write setPMPIS;
  10049. property SPI2AIP : TBits_3 read getSPI2AIP write setSPI2AIP;
  10050. property SPI2AIS : TBits_2 read getSPI2AIS write setSPI2AIS;
  10051. property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
  10052. property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
  10053. property U2AIP : TBits_3 read getU2AIP write setU2AIP;
  10054. property U2AIS : TBits_2 read getU2AIS write setU2AIS;
  10055. property U3IP : TBits_3 read getU3IP write setU3IP;
  10056. property U3IS : TBits_2 read getU3IS write setU3IS;
  10057. property w : TBits_32 read getw write setw;
  10058. end;
  10059. TINT_IPC8 = record
  10060. private
  10061. function getFSCMIP : TBits_3; inline;
  10062. function getFSCMIS : TBits_2; inline;
  10063. function getI2C2IP : TBits_3; inline;
  10064. function getI2C2IS : TBits_2; inline;
  10065. function getI2C3AIP : TBits_3; inline;
  10066. function getI2C3AIS : TBits_2; inline;
  10067. function getI2C5IP : TBits_3; inline;
  10068. function getI2C5IS : TBits_2; inline;
  10069. function getRTCCIP : TBits_3; inline;
  10070. function getRTCCIS : TBits_2; inline;
  10071. function getSPI3AIP : TBits_3; inline;
  10072. function getSPI3AIS : TBits_2; inline;
  10073. function getSPI4IP : TBits_3; inline;
  10074. function getSPI4IS : TBits_2; inline;
  10075. function getU2IP : TBits_3; inline;
  10076. function getU2IS : TBits_2; inline;
  10077. function getU3AIP : TBits_3; inline;
  10078. function getU3AIS : TBits_2; inline;
  10079. function getw : TBits_32; inline;
  10080. procedure setFSCMIP(thebits : TBits_3); inline;
  10081. procedure setFSCMIS(thebits : TBits_2); inline;
  10082. procedure setI2C2IP(thebits : TBits_3); inline;
  10083. procedure setI2C2IS(thebits : TBits_2); inline;
  10084. procedure setI2C3AIP(thebits : TBits_3); inline;
  10085. procedure setI2C3AIS(thebits : TBits_2); inline;
  10086. procedure setI2C5IP(thebits : TBits_3); inline;
  10087. procedure setI2C5IS(thebits : TBits_2); inline;
  10088. procedure setRTCCIP(thebits : TBits_3); inline;
  10089. procedure setRTCCIS(thebits : TBits_2); inline;
  10090. procedure setSPI3AIP(thebits : TBits_3); inline;
  10091. procedure setSPI3AIS(thebits : TBits_2); inline;
  10092. procedure setSPI4IP(thebits : TBits_3); inline;
  10093. procedure setSPI4IS(thebits : TBits_2); inline;
  10094. procedure setU2IP(thebits : TBits_3); inline;
  10095. procedure setU2IS(thebits : TBits_2); inline;
  10096. procedure setU3AIP(thebits : TBits_3); inline;
  10097. procedure setU3AIS(thebits : TBits_2); inline;
  10098. procedure setw(thebits : TBits_32); inline;
  10099. public
  10100. property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
  10101. property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
  10102. property I2C2IP : TBits_3 read getI2C2IP write setI2C2IP;
  10103. property I2C2IS : TBits_2 read getI2C2IS write setI2C2IS;
  10104. property I2C3AIP : TBits_3 read getI2C3AIP write setI2C3AIP;
  10105. property I2C3AIS : TBits_2 read getI2C3AIS write setI2C3AIS;
  10106. property I2C5IP : TBits_3 read getI2C5IP write setI2C5IP;
  10107. property I2C5IS : TBits_2 read getI2C5IS write setI2C5IS;
  10108. property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
  10109. property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
  10110. property SPI3AIP : TBits_3 read getSPI3AIP write setSPI3AIP;
  10111. property SPI3AIS : TBits_2 read getSPI3AIS write setSPI3AIS;
  10112. property SPI4IP : TBits_3 read getSPI4IP write setSPI4IP;
  10113. property SPI4IS : TBits_2 read getSPI4IS write setSPI4IS;
  10114. property U2IP : TBits_3 read getU2IP write setU2IP;
  10115. property U2IS : TBits_2 read getU2IS write setU2IS;
  10116. property U3AIP : TBits_3 read getU3AIP write setU3AIP;
  10117. property U3AIS : TBits_2 read getU3AIS write setU3AIS;
  10118. property w : TBits_32 read getw write setw;
  10119. end;
  10120. TINT_IPC9 = record
  10121. private
  10122. function getDMA0IP : TBits_3; inline;
  10123. function getDMA0IS : TBits_2; inline;
  10124. function getDMA1IP : TBits_3; inline;
  10125. function getDMA1IS : TBits_2; inline;
  10126. function getDMA2IP : TBits_3; inline;
  10127. function getDMA2IS : TBits_2; inline;
  10128. function getDMA3IP : TBits_3; inline;
  10129. function getDMA3IS : TBits_2; inline;
  10130. function getw : TBits_32; inline;
  10131. procedure setDMA0IP(thebits : TBits_3); inline;
  10132. procedure setDMA0IS(thebits : TBits_2); inline;
  10133. procedure setDMA1IP(thebits : TBits_3); inline;
  10134. procedure setDMA1IS(thebits : TBits_2); inline;
  10135. procedure setDMA2IP(thebits : TBits_3); inline;
  10136. procedure setDMA2IS(thebits : TBits_2); inline;
  10137. procedure setDMA3IP(thebits : TBits_3); inline;
  10138. procedure setDMA3IS(thebits : TBits_2); inline;
  10139. procedure setw(thebits : TBits_32); inline;
  10140. public
  10141. property DMA0IP : TBits_3 read getDMA0IP write setDMA0IP;
  10142. property DMA0IS : TBits_2 read getDMA0IS write setDMA0IS;
  10143. property DMA1IP : TBits_3 read getDMA1IP write setDMA1IP;
  10144. property DMA1IS : TBits_2 read getDMA1IS write setDMA1IS;
  10145. property DMA2IP : TBits_3 read getDMA2IP write setDMA2IP;
  10146. property DMA2IS : TBits_2 read getDMA2IS write setDMA2IS;
  10147. property DMA3IP : TBits_3 read getDMA3IP write setDMA3IP;
  10148. property DMA3IS : TBits_2 read getDMA3IS write setDMA3IS;
  10149. property w : TBits_32 read getw write setw;
  10150. end;
  10151. TINT_IPC10 = record
  10152. private
  10153. function getDMA4IP : TBits_3; inline;
  10154. function getDMA4IS : TBits_2; inline;
  10155. function getDMA5IP : TBits_3; inline;
  10156. function getDMA5IS : TBits_2; inline;
  10157. function getDMA6IP : TBits_3; inline;
  10158. function getDMA6IS : TBits_2; inline;
  10159. function getDMA7IP : TBits_3; inline;
  10160. function getDMA7IS : TBits_2; inline;
  10161. function getw : TBits_32; inline;
  10162. procedure setDMA4IP(thebits : TBits_3); inline;
  10163. procedure setDMA4IS(thebits : TBits_2); inline;
  10164. procedure setDMA5IP(thebits : TBits_3); inline;
  10165. procedure setDMA5IS(thebits : TBits_2); inline;
  10166. procedure setDMA6IP(thebits : TBits_3); inline;
  10167. procedure setDMA6IS(thebits : TBits_2); inline;
  10168. procedure setDMA7IP(thebits : TBits_3); inline;
  10169. procedure setDMA7IS(thebits : TBits_2); inline;
  10170. procedure setw(thebits : TBits_32); inline;
  10171. public
  10172. property DMA4IP : TBits_3 read getDMA4IP write setDMA4IP;
  10173. property DMA4IS : TBits_2 read getDMA4IS write setDMA4IS;
  10174. property DMA5IP : TBits_3 read getDMA5IP write setDMA5IP;
  10175. property DMA5IS : TBits_2 read getDMA5IS write setDMA5IS;
  10176. property DMA6IP : TBits_3 read getDMA6IP write setDMA6IP;
  10177. property DMA6IS : TBits_2 read getDMA6IS write setDMA6IS;
  10178. property DMA7IP : TBits_3 read getDMA7IP write setDMA7IP;
  10179. property DMA7IS : TBits_2 read getDMA7IS write setDMA7IS;
  10180. property w : TBits_32 read getw write setw;
  10181. end;
  10182. TINT_IPC11 = record
  10183. private
  10184. function getCAN1IP : TBits_3; inline;
  10185. function getCAN1IS : TBits_2; inline;
  10186. function getCAN2IP : TBits_3; inline;
  10187. function getCAN2IS : TBits_2; inline;
  10188. function getFCEIP : TBits_3; inline;
  10189. function getFCEIS : TBits_2; inline;
  10190. function getUSBIP : TBits_3; inline;
  10191. function getUSBIS : TBits_2; inline;
  10192. function getw : TBits_32; inline;
  10193. procedure setCAN1IP(thebits : TBits_3); inline;
  10194. procedure setCAN1IS(thebits : TBits_2); inline;
  10195. procedure setCAN2IP(thebits : TBits_3); inline;
  10196. procedure setCAN2IS(thebits : TBits_2); inline;
  10197. procedure setFCEIP(thebits : TBits_3); inline;
  10198. procedure setFCEIS(thebits : TBits_2); inline;
  10199. procedure setUSBIP(thebits : TBits_3); inline;
  10200. procedure setUSBIS(thebits : TBits_2); inline;
  10201. procedure setw(thebits : TBits_32); inline;
  10202. public
  10203. property CAN1IP : TBits_3 read getCAN1IP write setCAN1IP;
  10204. property CAN1IS : TBits_2 read getCAN1IS write setCAN1IS;
  10205. property CAN2IP : TBits_3 read getCAN2IP write setCAN2IP;
  10206. property CAN2IS : TBits_2 read getCAN2IS write setCAN2IS;
  10207. property FCEIP : TBits_3 read getFCEIP write setFCEIP;
  10208. property FCEIS : TBits_2 read getFCEIS write setFCEIS;
  10209. property USBIP : TBits_3 read getUSBIP write setUSBIP;
  10210. property USBIS : TBits_2 read getUSBIS write setUSBIS;
  10211. property w : TBits_32 read getw write setw;
  10212. end;
  10213. TINT_IPC12 = record
  10214. private
  10215. function getETHIP : TBits_3; inline;
  10216. function getETHIS : TBits_2; inline;
  10217. function getU1BIP : TBits_3; inline;
  10218. function getU1BIS : TBits_2; inline;
  10219. function getU2BIP : TBits_3; inline;
  10220. function getU2BIS : TBits_2; inline;
  10221. function getU3BIP : TBits_3; inline;
  10222. function getU3BIS : TBits_2; inline;
  10223. function getU4IP : TBits_3; inline;
  10224. function getU4IS : TBits_2; inline;
  10225. function getU5IP : TBits_3; inline;
  10226. function getU5IS : TBits_2; inline;
  10227. function getU6IP : TBits_3; inline;
  10228. function getU6IS : TBits_2; inline;
  10229. function getw : TBits_32; inline;
  10230. procedure setETHIP(thebits : TBits_3); inline;
  10231. procedure setETHIS(thebits : TBits_2); inline;
  10232. procedure setU1BIP(thebits : TBits_3); inline;
  10233. procedure setU1BIS(thebits : TBits_2); inline;
  10234. procedure setU2BIP(thebits : TBits_3); inline;
  10235. procedure setU2BIS(thebits : TBits_2); inline;
  10236. procedure setU3BIP(thebits : TBits_3); inline;
  10237. procedure setU3BIS(thebits : TBits_2); inline;
  10238. procedure setU4IP(thebits : TBits_3); inline;
  10239. procedure setU4IS(thebits : TBits_2); inline;
  10240. procedure setU5IP(thebits : TBits_3); inline;
  10241. procedure setU5IS(thebits : TBits_2); inline;
  10242. procedure setU6IP(thebits : TBits_3); inline;
  10243. procedure setU6IS(thebits : TBits_2); inline;
  10244. procedure setw(thebits : TBits_32); inline;
  10245. public
  10246. property ETHIP : TBits_3 read getETHIP write setETHIP;
  10247. property ETHIS : TBits_2 read getETHIS write setETHIS;
  10248. property U1BIP : TBits_3 read getU1BIP write setU1BIP;
  10249. property U1BIS : TBits_2 read getU1BIS write setU1BIS;
  10250. property U2BIP : TBits_3 read getU2BIP write setU2BIP;
  10251. property U2BIS : TBits_2 read getU2BIS write setU2BIS;
  10252. property U3BIP : TBits_3 read getU3BIP write setU3BIP;
  10253. property U3BIS : TBits_2 read getU3BIS write setU3BIS;
  10254. property U4IP : TBits_3 read getU4IP write setU4IP;
  10255. property U4IS : TBits_2 read getU4IS write setU4IS;
  10256. property U5IP : TBits_3 read getU5IP write setU5IP;
  10257. property U5IS : TBits_2 read getU5IS write setU5IS;
  10258. property U6IP : TBits_3 read getU6IP write setU6IP;
  10259. property U6IS : TBits_2 read getU6IS write setU6IS;
  10260. property w : TBits_32 read getw write setw;
  10261. end;
  10262. type
  10263. TINTRegisters = record
  10264. INTCONbits : TINT_INTCON;
  10265. INTCON : longWord;
  10266. INTCONCLR : longWord;
  10267. INTCONSET : longWord;
  10268. INTCONINV : longWord;
  10269. INTSTAT : longWord;
  10270. IPTMR : longWord;
  10271. IPTMRCLR : longWord;
  10272. IPTMRSET : longWord;
  10273. IPTMRINV : longWord;
  10274. IFS0bits : TINT_IFS0;
  10275. IFS0 : longWord;
  10276. IFS0CLR : longWord;
  10277. IFS0SET : longWord;
  10278. IFS0INV : longWord;
  10279. IFS1bits : TINT_IFS1;
  10280. IFS1 : longWord;
  10281. IFS1CLR : longWord;
  10282. IFS1SET : longWord;
  10283. IFS1INV : longWord;
  10284. IFS2bits : TINT_IFS2;
  10285. IFS2 : longWord;
  10286. IFS2CLR : longWord;
  10287. IFS2SET : longWord;
  10288. IFS2INV : longWord;
  10289. IEC0bits : TINT_IEC0;
  10290. IEC0 : longWord;
  10291. IEC0CLR : longWord;
  10292. IEC0SET : longWord;
  10293. IEC0INV : longWord;
  10294. IEC1bits : TINT_IEC1;
  10295. IEC1 : longWord;
  10296. IEC1CLR : longWord;
  10297. IEC1SET : longWord;
  10298. IEC1INV : longWord;
  10299. IEC2bits : TINT_IEC2;
  10300. IEC2 : longWord;
  10301. IEC2CLR : longWord;
  10302. IEC2SET : longWord;
  10303. IEC2INV : longWord;
  10304. IPC0bits : TINT_IPC0;
  10305. IPC0 : longWord;
  10306. IPC0CLR : longWord;
  10307. IPC0SET : longWord;
  10308. IPC0INV : longWord;
  10309. IPC1bits : TINT_IPC1;
  10310. IPC1 : longWord;
  10311. IPC1CLR : longWord;
  10312. IPC1SET : longWord;
  10313. IPC1INV : longWord;
  10314. IPC2bits : TINT_IPC2;
  10315. IPC2 : longWord;
  10316. IPC2CLR : longWord;
  10317. IPC2SET : longWord;
  10318. IPC2INV : longWord;
  10319. IPC3bits : TINT_IPC3;
  10320. IPC3 : longWord;
  10321. IPC3CLR : longWord;
  10322. IPC3SET : longWord;
  10323. IPC3INV : longWord;
  10324. IPC4bits : TINT_IPC4;
  10325. IPC4 : longWord;
  10326. IPC4CLR : longWord;
  10327. IPC4SET : longWord;
  10328. IPC4INV : longWord;
  10329. IPC5bits : TINT_IPC5;
  10330. IPC5 : longWord;
  10331. IPC5CLR : longWord;
  10332. IPC5SET : longWord;
  10333. IPC5INV : longWord;
  10334. IPC6bits : TINT_IPC6;
  10335. IPC6 : longWord;
  10336. IPC6CLR : longWord;
  10337. IPC6SET : longWord;
  10338. IPC6INV : longWord;
  10339. IPC7bits : TINT_IPC7;
  10340. IPC7 : longWord;
  10341. IPC7CLR : longWord;
  10342. IPC7SET : longWord;
  10343. IPC7INV : longWord;
  10344. IPC8bits : TINT_IPC8;
  10345. IPC8 : longWord;
  10346. IPC8CLR : longWord;
  10347. IPC8SET : longWord;
  10348. IPC8INV : longWord;
  10349. IPC9bits : TINT_IPC9;
  10350. IPC9 : longWord;
  10351. IPC9CLR : longWord;
  10352. IPC9SET : longWord;
  10353. IPC9INV : longWord;
  10354. IPC10bits : TINT_IPC10;
  10355. IPC10 : longWord;
  10356. IPC10CLR : longWord;
  10357. IPC10SET : longWord;
  10358. IPC10INV : longWord;
  10359. IPC11bits : TINT_IPC11;
  10360. IPC11 : longWord;
  10361. IPC11CLR : longWord;
  10362. IPC11SET : longWord;
  10363. IPC11INV : longWord;
  10364. IPC12bits : TINT_IPC12;
  10365. IPC12 : longWord;
  10366. IPC12CLR : longWord;
  10367. IPC12SET : longWord;
  10368. IPC12INV : longWord;
  10369. end;
  10370. TBMX_BMXCON = record
  10371. private
  10372. function getBMXARB : TBits_3; inline;
  10373. function getBMXCHEDMA : TBits_1; inline;
  10374. function getBMXERRDMA : TBits_1; inline;
  10375. function getBMXERRDS : TBits_1; inline;
  10376. function getBMXERRICD : TBits_1; inline;
  10377. function getBMXERRIS : TBits_1; inline;
  10378. function getBMXERRIXI : TBits_1; inline;
  10379. function getBMXWSDRM : TBits_1; inline;
  10380. function getw : TBits_32; inline;
  10381. procedure setBMXARB(thebits : TBits_3); inline;
  10382. procedure setBMXCHEDMA(thebits : TBits_1); inline;
  10383. procedure setBMXERRDMA(thebits : TBits_1); inline;
  10384. procedure setBMXERRDS(thebits : TBits_1); inline;
  10385. procedure setBMXERRICD(thebits : TBits_1); inline;
  10386. procedure setBMXERRIS(thebits : TBits_1); inline;
  10387. procedure setBMXERRIXI(thebits : TBits_1); inline;
  10388. procedure setBMXWSDRM(thebits : TBits_1); inline;
  10389. procedure setw(thebits : TBits_32); inline;
  10390. public
  10391. procedure clearBMXCHEDMA; inline;
  10392. procedure clearBMXERRDMA; inline;
  10393. procedure clearBMXERRDS; inline;
  10394. procedure clearBMXERRICD; inline;
  10395. procedure clearBMXERRIS; inline;
  10396. procedure clearBMXERRIXI; inline;
  10397. procedure clearBMXWSDRM; inline;
  10398. procedure setBMXCHEDMA; inline;
  10399. procedure setBMXERRDMA; inline;
  10400. procedure setBMXERRDS; inline;
  10401. procedure setBMXERRICD; inline;
  10402. procedure setBMXERRIS; inline;
  10403. procedure setBMXERRIXI; inline;
  10404. procedure setBMXWSDRM; inline;
  10405. property BMXARB : TBits_3 read getBMXARB write setBMXARB;
  10406. property BMXCHEDMA : TBits_1 read getBMXCHEDMA write setBMXCHEDMA;
  10407. property BMXERRDMA : TBits_1 read getBMXERRDMA write setBMXERRDMA;
  10408. property BMXERRDS : TBits_1 read getBMXERRDS write setBMXERRDS;
  10409. property BMXERRICD : TBits_1 read getBMXERRICD write setBMXERRICD;
  10410. property BMXERRIS : TBits_1 read getBMXERRIS write setBMXERRIS;
  10411. property BMXERRIXI : TBits_1 read getBMXERRIXI write setBMXERRIXI;
  10412. property BMXWSDRM : TBits_1 read getBMXWSDRM write setBMXWSDRM;
  10413. property w : TBits_32 read getw write setw;
  10414. end;
  10415. type
  10416. TBMXRegisters = record
  10417. BMXCONbits : TBMX_BMXCON;
  10418. BMXCON : longWord;
  10419. BMXCONCLR : longWord;
  10420. BMXCONSET : longWord;
  10421. BMXCONINV : longWord;
  10422. BMXDKPBA : longWord;
  10423. BMXDKPBACLR : longWord;
  10424. BMXDKPBASET : longWord;
  10425. BMXDKPBAINV : longWord;
  10426. BMXDUDBA : longWord;
  10427. BMXDUDBACLR : longWord;
  10428. BMXDUDBASET : longWord;
  10429. BMXDUDBAINV : longWord;
  10430. BMXDUPBA : longWord;
  10431. BMXDUPBACLR : longWord;
  10432. BMXDUPBASET : longWord;
  10433. BMXDUPBAINV : longWord;
  10434. BMXDRMSZ : longWord;
  10435. BMXPUPBA : longWord;
  10436. BMXPUPBACLR : longWord;
  10437. BMXPUPBASET : longWord;
  10438. BMXPUPBAINV : longWord;
  10439. BMXPFMSZ : longWord;
  10440. BMXBOOTSZ : longWord;
  10441. end;
  10442. TDMAC_DMACON = record
  10443. private
  10444. function getDMABUSY : TBits_1; inline;
  10445. function getON : TBits_1; inline;
  10446. function getSUSPEND : TBits_1; inline;
  10447. function getw : TBits_32; inline;
  10448. procedure setDMABUSY(thebits : TBits_1); inline;
  10449. procedure setON(thebits : TBits_1); inline;
  10450. procedure setSUSPEND(thebits : TBits_1); inline;
  10451. procedure setw(thebits : TBits_32); inline;
  10452. public
  10453. procedure clearDMABUSY; inline;
  10454. procedure clearON; inline;
  10455. procedure clearSUSPEND; inline;
  10456. procedure setDMABUSY; inline;
  10457. procedure setON; inline;
  10458. procedure setSUSPEND; inline;
  10459. property DMABUSY : TBits_1 read getDMABUSY write setDMABUSY;
  10460. property ON : TBits_1 read getON write setON;
  10461. property SUSPEND : TBits_1 read getSUSPEND write setSUSPEND;
  10462. property w : TBits_32 read getw write setw;
  10463. end;
  10464. TDMAC_DMASTAT = record
  10465. private
  10466. function getDMACH : TBits_3; inline;
  10467. function getRDWR : TBits_1; inline;
  10468. function getw : TBits_32; inline;
  10469. procedure setDMACH(thebits : TBits_3); inline;
  10470. procedure setRDWR(thebits : TBits_1); inline;
  10471. procedure setw(thebits : TBits_32); inline;
  10472. public
  10473. procedure clearRDWR; inline;
  10474. procedure setRDWR; inline;
  10475. property DMACH : TBits_3 read getDMACH write setDMACH;
  10476. property RDWR : TBits_1 read getRDWR write setRDWR;
  10477. property w : TBits_32 read getw write setw;
  10478. end;
  10479. TDMAC_DCRCCON = record
  10480. private
  10481. function getBITO : TBits_1; inline;
  10482. function getBYTO : TBits_2; inline;
  10483. function getCRCAPP : TBits_1; inline;
  10484. function getCRCCH : TBits_3; inline;
  10485. function getCRCEN : TBits_1; inline;
  10486. function getCRCTYP : TBits_1; inline;
  10487. function getPLEN : TBits_5; inline;
  10488. function getWBO : TBits_1; inline;
  10489. function getw : TBits_32; inline;
  10490. procedure setBITO(thebits : TBits_1); inline;
  10491. procedure setBYTO(thebits : TBits_2); inline;
  10492. procedure setCRCAPP(thebits : TBits_1); inline;
  10493. procedure setCRCCH(thebits : TBits_3); inline;
  10494. procedure setCRCEN(thebits : TBits_1); inline;
  10495. procedure setCRCTYP(thebits : TBits_1); inline;
  10496. procedure setPLEN(thebits : TBits_5); inline;
  10497. procedure setWBO(thebits : TBits_1); inline;
  10498. procedure setw(thebits : TBits_32); inline;
  10499. public
  10500. procedure clearBITO; inline;
  10501. procedure clearCRCAPP; inline;
  10502. procedure clearCRCEN; inline;
  10503. procedure clearCRCTYP; inline;
  10504. procedure clearWBO; inline;
  10505. procedure setBITO; inline;
  10506. procedure setCRCAPP; inline;
  10507. procedure setCRCEN; inline;
  10508. procedure setCRCTYP; inline;
  10509. procedure setWBO; inline;
  10510. property BITO : TBits_1 read getBITO write setBITO;
  10511. property BYTO : TBits_2 read getBYTO write setBYTO;
  10512. property CRCAPP : TBits_1 read getCRCAPP write setCRCAPP;
  10513. property CRCCH : TBits_3 read getCRCCH write setCRCCH;
  10514. property CRCEN : TBits_1 read getCRCEN write setCRCEN;
  10515. property CRCTYP : TBits_1 read getCRCTYP write setCRCTYP;
  10516. property PLEN : TBits_5 read getPLEN write setPLEN;
  10517. property WBO : TBits_1 read getWBO write setWBO;
  10518. property w : TBits_32 read getw write setw;
  10519. end;
  10520. type
  10521. TDMACRegisters = record
  10522. DMACONbits : TDMAC_DMACON;
  10523. DMACON : longWord;
  10524. DMACONCLR : longWord;
  10525. DMACONSET : longWord;
  10526. DMACONINV : longWord;
  10527. DMASTATbits : TDMAC_DMASTAT;
  10528. DMASTAT : longWord;
  10529. DMASTATCLR : longWord;
  10530. DMASTATSET : longWord;
  10531. DMASTATINV : longWord;
  10532. DMAADDR : longWord;
  10533. DMAADDRCLR : longWord;
  10534. DMAADDRSET : longWord;
  10535. DMAADDRINV : longWord;
  10536. DCRCCONbits : TDMAC_DCRCCON;
  10537. DCRCCON : longWord;
  10538. DCRCCONCLR : longWord;
  10539. DCRCCONSET : longWord;
  10540. DCRCCONINV : longWord;
  10541. DCRCDATA : longWord;
  10542. DCRCDATACLR : longWord;
  10543. DCRCDATASET : longWord;
  10544. DCRCDATAINV : longWord;
  10545. DCRCXOR : longWord;
  10546. DCRCXORCLR : longWord;
  10547. DCRCXORSET : longWord;
  10548. DCRCXORINV : longWord;
  10549. end;
  10550. TDMAC0_DCH0CON = record
  10551. private
  10552. function getCHAED : TBits_1; inline;
  10553. function getCHAEN : TBits_1; inline;
  10554. function getCHBUSY : TBits_1; inline;
  10555. function getCHCHN : TBits_1; inline;
  10556. function getCHCHNS : TBits_1; inline;
  10557. function getCHEDET : TBits_1; inline;
  10558. function getCHEN : TBits_1; inline;
  10559. function getCHPRI : TBits_2; inline;
  10560. function getw : TBits_32; inline;
  10561. procedure setCHAED(thebits : TBits_1); inline;
  10562. procedure setCHAEN(thebits : TBits_1); inline;
  10563. procedure setCHBUSY(thebits : TBits_1); inline;
  10564. procedure setCHCHN(thebits : TBits_1); inline;
  10565. procedure setCHCHNS(thebits : TBits_1); inline;
  10566. procedure setCHEDET(thebits : TBits_1); inline;
  10567. procedure setCHEN(thebits : TBits_1); inline;
  10568. procedure setCHPRI(thebits : TBits_2); inline;
  10569. procedure setw(thebits : TBits_32); inline;
  10570. public
  10571. procedure clearCHAED; inline;
  10572. procedure clearCHAEN; inline;
  10573. procedure clearCHBUSY; inline;
  10574. procedure clearCHCHN; inline;
  10575. procedure clearCHCHNS; inline;
  10576. procedure clearCHEDET; inline;
  10577. procedure clearCHEN; inline;
  10578. procedure setCHAED; inline;
  10579. procedure setCHAEN; inline;
  10580. procedure setCHBUSY; inline;
  10581. procedure setCHCHN; inline;
  10582. procedure setCHCHNS; inline;
  10583. procedure setCHEDET; inline;
  10584. procedure setCHEN; inline;
  10585. property CHAED : TBits_1 read getCHAED write setCHAED;
  10586. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10587. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10588. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10589. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10590. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10591. property CHEN : TBits_1 read getCHEN write setCHEN;
  10592. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10593. property w : TBits_32 read getw write setw;
  10594. end;
  10595. TDMAC0_DCH0ECON = record
  10596. private
  10597. function getAIRQEN : TBits_1; inline;
  10598. function getCABORT : TBits_1; inline;
  10599. function getCFORCE : TBits_1; inline;
  10600. function getCHAIRQ : TBits_8; inline;
  10601. function getCHSIRQ : TBits_8; inline;
  10602. function getPATEN : TBits_1; inline;
  10603. function getSIRQEN : TBits_1; inline;
  10604. function getw : TBits_32; inline;
  10605. procedure setAIRQEN(thebits : TBits_1); inline;
  10606. procedure setCABORT(thebits : TBits_1); inline;
  10607. procedure setCFORCE(thebits : TBits_1); inline;
  10608. procedure setCHAIRQ(thebits : TBits_8); inline;
  10609. procedure setCHSIRQ(thebits : TBits_8); inline;
  10610. procedure setPATEN(thebits : TBits_1); inline;
  10611. procedure setSIRQEN(thebits : TBits_1); inline;
  10612. procedure setw(thebits : TBits_32); inline;
  10613. public
  10614. procedure clearAIRQEN; inline;
  10615. procedure clearCABORT; inline;
  10616. procedure clearCFORCE; inline;
  10617. procedure clearPATEN; inline;
  10618. procedure clearSIRQEN; inline;
  10619. procedure setAIRQEN; inline;
  10620. procedure setCABORT; inline;
  10621. procedure setCFORCE; inline;
  10622. procedure setPATEN; inline;
  10623. procedure setSIRQEN; inline;
  10624. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10625. property CABORT : TBits_1 read getCABORT write setCABORT;
  10626. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10627. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10628. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10629. property PATEN : TBits_1 read getPATEN write setPATEN;
  10630. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10631. property w : TBits_32 read getw write setw;
  10632. end;
  10633. TDMAC0_DCH0INT = record
  10634. private
  10635. function getCHBCIE : TBits_1; inline;
  10636. function getCHBCIF : TBits_1; inline;
  10637. function getCHCCIE : TBits_1; inline;
  10638. function getCHCCIF : TBits_1; inline;
  10639. function getCHDDIE : TBits_1; inline;
  10640. function getCHDDIF : TBits_1; inline;
  10641. function getCHDHIE : TBits_1; inline;
  10642. function getCHDHIF : TBits_1; inline;
  10643. function getCHERIE : TBits_1; inline;
  10644. function getCHERIF : TBits_1; inline;
  10645. function getCHSDIE : TBits_1; inline;
  10646. function getCHSDIF : TBits_1; inline;
  10647. function getCHSHIE : TBits_1; inline;
  10648. function getCHSHIF : TBits_1; inline;
  10649. function getCHTAIE : TBits_1; inline;
  10650. function getCHTAIF : TBits_1; inline;
  10651. function getw : TBits_32; inline;
  10652. procedure setCHBCIE(thebits : TBits_1); inline;
  10653. procedure setCHBCIF(thebits : TBits_1); inline;
  10654. procedure setCHCCIE(thebits : TBits_1); inline;
  10655. procedure setCHCCIF(thebits : TBits_1); inline;
  10656. procedure setCHDDIE(thebits : TBits_1); inline;
  10657. procedure setCHDDIF(thebits : TBits_1); inline;
  10658. procedure setCHDHIE(thebits : TBits_1); inline;
  10659. procedure setCHDHIF(thebits : TBits_1); inline;
  10660. procedure setCHERIE(thebits : TBits_1); inline;
  10661. procedure setCHERIF(thebits : TBits_1); inline;
  10662. procedure setCHSDIE(thebits : TBits_1); inline;
  10663. procedure setCHSDIF(thebits : TBits_1); inline;
  10664. procedure setCHSHIE(thebits : TBits_1); inline;
  10665. procedure setCHSHIF(thebits : TBits_1); inline;
  10666. procedure setCHTAIE(thebits : TBits_1); inline;
  10667. procedure setCHTAIF(thebits : TBits_1); inline;
  10668. procedure setw(thebits : TBits_32); inline;
  10669. public
  10670. procedure clearCHBCIE; inline;
  10671. procedure clearCHBCIF; inline;
  10672. procedure clearCHCCIE; inline;
  10673. procedure clearCHCCIF; inline;
  10674. procedure clearCHDDIE; inline;
  10675. procedure clearCHDDIF; inline;
  10676. procedure clearCHDHIE; inline;
  10677. procedure clearCHDHIF; inline;
  10678. procedure clearCHERIE; inline;
  10679. procedure clearCHERIF; inline;
  10680. procedure clearCHSDIE; inline;
  10681. procedure clearCHSDIF; inline;
  10682. procedure clearCHSHIE; inline;
  10683. procedure clearCHSHIF; inline;
  10684. procedure clearCHTAIE; inline;
  10685. procedure clearCHTAIF; inline;
  10686. procedure setCHBCIE; inline;
  10687. procedure setCHBCIF; inline;
  10688. procedure setCHCCIE; inline;
  10689. procedure setCHCCIF; inline;
  10690. procedure setCHDDIE; inline;
  10691. procedure setCHDDIF; inline;
  10692. procedure setCHDHIE; inline;
  10693. procedure setCHDHIF; inline;
  10694. procedure setCHERIE; inline;
  10695. procedure setCHERIF; inline;
  10696. procedure setCHSDIE; inline;
  10697. procedure setCHSDIF; inline;
  10698. procedure setCHSHIE; inline;
  10699. procedure setCHSHIF; inline;
  10700. procedure setCHTAIE; inline;
  10701. procedure setCHTAIF; inline;
  10702. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10703. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10704. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10705. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10706. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10707. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10708. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10709. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10710. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10711. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10712. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10713. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10714. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10715. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10716. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10717. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10718. property w : TBits_32 read getw write setw;
  10719. end;
  10720. type
  10721. TDMAC0Registers = record
  10722. DCH0CONbits : TDMAC0_DCH0CON;
  10723. DCH0CON : longWord;
  10724. DCH0CONCLR : longWord;
  10725. DCH0CONSET : longWord;
  10726. DCH0CONINV : longWord;
  10727. DCH0ECONbits : TDMAC0_DCH0ECON;
  10728. DCH0ECON : longWord;
  10729. DCH0ECONCLR : longWord;
  10730. DCH0ECONSET : longWord;
  10731. DCH0ECONINV : longWord;
  10732. DCH0INTbits : TDMAC0_DCH0INT;
  10733. DCH0INT : longWord;
  10734. DCH0INTCLR : longWord;
  10735. DCH0INTSET : longWord;
  10736. DCH0INTINV : longWord;
  10737. DCH0SSA : longWord;
  10738. DCH0SSACLR : longWord;
  10739. DCH0SSASET : longWord;
  10740. DCH0SSAINV : longWord;
  10741. DCH0DSA : longWord;
  10742. DCH0DSACLR : longWord;
  10743. DCH0DSASET : longWord;
  10744. DCH0DSAINV : longWord;
  10745. DCH0SSIZ : longWord;
  10746. DCH0SSIZCLR : longWord;
  10747. DCH0SSIZSET : longWord;
  10748. DCH0SSIZINV : longWord;
  10749. DCH0DSIZ : longWord;
  10750. DCH0DSIZCLR : longWord;
  10751. DCH0DSIZSET : longWord;
  10752. DCH0DSIZINV : longWord;
  10753. DCH0SPTR : longWord;
  10754. DCH0SPTRCLR : longWord;
  10755. DCH0SPTRSET : longWord;
  10756. DCH0SPTRINV : longWord;
  10757. DCH0DPTR : longWord;
  10758. DCH0DPTRCLR : longWord;
  10759. DCH0DPTRSET : longWord;
  10760. DCH0DPTRINV : longWord;
  10761. DCH0CSIZ : longWord;
  10762. DCH0CSIZCLR : longWord;
  10763. DCH0CSIZSET : longWord;
  10764. DCH0CSIZINV : longWord;
  10765. DCH0CPTR : longWord;
  10766. DCH0CPTRCLR : longWord;
  10767. DCH0CPTRSET : longWord;
  10768. DCH0CPTRINV : longWord;
  10769. DCH0DAT : longWord;
  10770. DCH0DATCLR : longWord;
  10771. DCH0DATSET : longWord;
  10772. DCH0DATINV : longWord;
  10773. end;
  10774. TDMAC1_DCH1CON = record
  10775. private
  10776. function getCHAED : TBits_1; inline;
  10777. function getCHAEN : TBits_1; inline;
  10778. function getCHBUSY : TBits_1; inline;
  10779. function getCHCHN : TBits_1; inline;
  10780. function getCHCHNS : TBits_1; inline;
  10781. function getCHEDET : TBits_1; inline;
  10782. function getCHEN : TBits_1; inline;
  10783. function getCHPRI : TBits_2; inline;
  10784. function getw : TBits_32; inline;
  10785. procedure setCHAED(thebits : TBits_1); inline;
  10786. procedure setCHAEN(thebits : TBits_1); inline;
  10787. procedure setCHBUSY(thebits : TBits_1); inline;
  10788. procedure setCHCHN(thebits : TBits_1); inline;
  10789. procedure setCHCHNS(thebits : TBits_1); inline;
  10790. procedure setCHEDET(thebits : TBits_1); inline;
  10791. procedure setCHEN(thebits : TBits_1); inline;
  10792. procedure setCHPRI(thebits : TBits_2); inline;
  10793. procedure setw(thebits : TBits_32); inline;
  10794. public
  10795. procedure clearCHAED; inline;
  10796. procedure clearCHAEN; inline;
  10797. procedure clearCHBUSY; inline;
  10798. procedure clearCHCHN; inline;
  10799. procedure clearCHCHNS; inline;
  10800. procedure clearCHEDET; inline;
  10801. procedure clearCHEN; inline;
  10802. procedure setCHAED; inline;
  10803. procedure setCHAEN; inline;
  10804. procedure setCHBUSY; inline;
  10805. procedure setCHCHN; inline;
  10806. procedure setCHCHNS; inline;
  10807. procedure setCHEDET; inline;
  10808. procedure setCHEN; inline;
  10809. property CHAED : TBits_1 read getCHAED write setCHAED;
  10810. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10811. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10812. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10813. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10814. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10815. property CHEN : TBits_1 read getCHEN write setCHEN;
  10816. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10817. property w : TBits_32 read getw write setw;
  10818. end;
  10819. TDMAC1_DCH1ECON = record
  10820. private
  10821. function getAIRQEN : TBits_1; inline;
  10822. function getCABORT : TBits_1; inline;
  10823. function getCFORCE : TBits_1; inline;
  10824. function getCHAIRQ : TBits_8; inline;
  10825. function getCHSIRQ : TBits_8; inline;
  10826. function getPATEN : TBits_1; inline;
  10827. function getSIRQEN : TBits_1; inline;
  10828. function getw : TBits_32; inline;
  10829. procedure setAIRQEN(thebits : TBits_1); inline;
  10830. procedure setCABORT(thebits : TBits_1); inline;
  10831. procedure setCFORCE(thebits : TBits_1); inline;
  10832. procedure setCHAIRQ(thebits : TBits_8); inline;
  10833. procedure setCHSIRQ(thebits : TBits_8); inline;
  10834. procedure setPATEN(thebits : TBits_1); inline;
  10835. procedure setSIRQEN(thebits : TBits_1); inline;
  10836. procedure setw(thebits : TBits_32); inline;
  10837. public
  10838. procedure clearAIRQEN; inline;
  10839. procedure clearCABORT; inline;
  10840. procedure clearCFORCE; inline;
  10841. procedure clearPATEN; inline;
  10842. procedure clearSIRQEN; inline;
  10843. procedure setAIRQEN; inline;
  10844. procedure setCABORT; inline;
  10845. procedure setCFORCE; inline;
  10846. procedure setPATEN; inline;
  10847. procedure setSIRQEN; inline;
  10848. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10849. property CABORT : TBits_1 read getCABORT write setCABORT;
  10850. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10851. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10852. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10853. property PATEN : TBits_1 read getPATEN write setPATEN;
  10854. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10855. property w : TBits_32 read getw write setw;
  10856. end;
  10857. TDMAC1_DCH1INT = record
  10858. private
  10859. function getCHBCIE : TBits_1; inline;
  10860. function getCHBCIF : TBits_1; inline;
  10861. function getCHCCIE : TBits_1; inline;
  10862. function getCHCCIF : TBits_1; inline;
  10863. function getCHDDIE : TBits_1; inline;
  10864. function getCHDDIF : TBits_1; inline;
  10865. function getCHDHIE : TBits_1; inline;
  10866. function getCHDHIF : TBits_1; inline;
  10867. function getCHERIE : TBits_1; inline;
  10868. function getCHERIF : TBits_1; inline;
  10869. function getCHSDIE : TBits_1; inline;
  10870. function getCHSDIF : TBits_1; inline;
  10871. function getCHSHIE : TBits_1; inline;
  10872. function getCHSHIF : TBits_1; inline;
  10873. function getCHTAIE : TBits_1; inline;
  10874. function getCHTAIF : TBits_1; inline;
  10875. function getw : TBits_32; inline;
  10876. procedure setCHBCIE(thebits : TBits_1); inline;
  10877. procedure setCHBCIF(thebits : TBits_1); inline;
  10878. procedure setCHCCIE(thebits : TBits_1); inline;
  10879. procedure setCHCCIF(thebits : TBits_1); inline;
  10880. procedure setCHDDIE(thebits : TBits_1); inline;
  10881. procedure setCHDDIF(thebits : TBits_1); inline;
  10882. procedure setCHDHIE(thebits : TBits_1); inline;
  10883. procedure setCHDHIF(thebits : TBits_1); inline;
  10884. procedure setCHERIE(thebits : TBits_1); inline;
  10885. procedure setCHERIF(thebits : TBits_1); inline;
  10886. procedure setCHSDIE(thebits : TBits_1); inline;
  10887. procedure setCHSDIF(thebits : TBits_1); inline;
  10888. procedure setCHSHIE(thebits : TBits_1); inline;
  10889. procedure setCHSHIF(thebits : TBits_1); inline;
  10890. procedure setCHTAIE(thebits : TBits_1); inline;
  10891. procedure setCHTAIF(thebits : TBits_1); inline;
  10892. procedure setw(thebits : TBits_32); inline;
  10893. public
  10894. procedure clearCHBCIE; inline;
  10895. procedure clearCHBCIF; inline;
  10896. procedure clearCHCCIE; inline;
  10897. procedure clearCHCCIF; inline;
  10898. procedure clearCHDDIE; inline;
  10899. procedure clearCHDDIF; inline;
  10900. procedure clearCHDHIE; inline;
  10901. procedure clearCHDHIF; inline;
  10902. procedure clearCHERIE; inline;
  10903. procedure clearCHERIF; inline;
  10904. procedure clearCHSDIE; inline;
  10905. procedure clearCHSDIF; inline;
  10906. procedure clearCHSHIE; inline;
  10907. procedure clearCHSHIF; inline;
  10908. procedure clearCHTAIE; inline;
  10909. procedure clearCHTAIF; inline;
  10910. procedure setCHBCIE; inline;
  10911. procedure setCHBCIF; inline;
  10912. procedure setCHCCIE; inline;
  10913. procedure setCHCCIF; inline;
  10914. procedure setCHDDIE; inline;
  10915. procedure setCHDDIF; inline;
  10916. procedure setCHDHIE; inline;
  10917. procedure setCHDHIF; inline;
  10918. procedure setCHERIE; inline;
  10919. procedure setCHERIF; inline;
  10920. procedure setCHSDIE; inline;
  10921. procedure setCHSDIF; inline;
  10922. procedure setCHSHIE; inline;
  10923. procedure setCHSHIF; inline;
  10924. procedure setCHTAIE; inline;
  10925. procedure setCHTAIF; inline;
  10926. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10927. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10928. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10929. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10930. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10931. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10932. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10933. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10934. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10935. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10936. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10937. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10938. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10939. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10940. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10941. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10942. property w : TBits_32 read getw write setw;
  10943. end;
  10944. type
  10945. TDMAC1Registers = record
  10946. DCH1CONbits : TDMAC1_DCH1CON;
  10947. DCH1CON : longWord;
  10948. DCH1CONCLR : longWord;
  10949. DCH1CONSET : longWord;
  10950. DCH1CONINV : longWord;
  10951. DCH1ECONbits : TDMAC1_DCH1ECON;
  10952. DCH1ECON : longWord;
  10953. DCH1ECONCLR : longWord;
  10954. DCH1ECONSET : longWord;
  10955. DCH1ECONINV : longWord;
  10956. DCH1INTbits : TDMAC1_DCH1INT;
  10957. DCH1INT : longWord;
  10958. DCH1INTCLR : longWord;
  10959. DCH1INTSET : longWord;
  10960. DCH1INTINV : longWord;
  10961. DCH1SSA : longWord;
  10962. DCH1SSACLR : longWord;
  10963. DCH1SSASET : longWord;
  10964. DCH1SSAINV : longWord;
  10965. DCH1DSA : longWord;
  10966. DCH1DSACLR : longWord;
  10967. DCH1DSASET : longWord;
  10968. DCH1DSAINV : longWord;
  10969. DCH1SSIZ : longWord;
  10970. DCH1SSIZCLR : longWord;
  10971. DCH1SSIZSET : longWord;
  10972. DCH1SSIZINV : longWord;
  10973. DCH1DSIZ : longWord;
  10974. DCH1DSIZCLR : longWord;
  10975. DCH1DSIZSET : longWord;
  10976. DCH1DSIZINV : longWord;
  10977. DCH1SPTR : longWord;
  10978. DCH1SPTRCLR : longWord;
  10979. DCH1SPTRSET : longWord;
  10980. DCH1SPTRINV : longWord;
  10981. DCH1DPTR : longWord;
  10982. DCH1DPTRCLR : longWord;
  10983. DCH1DPTRSET : longWord;
  10984. DCH1DPTRINV : longWord;
  10985. DCH1CSIZ : longWord;
  10986. DCH1CSIZCLR : longWord;
  10987. DCH1CSIZSET : longWord;
  10988. DCH1CSIZINV : longWord;
  10989. DCH1CPTR : longWord;
  10990. DCH1CPTRCLR : longWord;
  10991. DCH1CPTRSET : longWord;
  10992. DCH1CPTRINV : longWord;
  10993. DCH1DAT : longWord;
  10994. DCH1DATCLR : longWord;
  10995. DCH1DATSET : longWord;
  10996. DCH1DATINV : longWord;
  10997. end;
  10998. TDMAC2_DCH2CON = record
  10999. private
  11000. function getCHAED : TBits_1; inline;
  11001. function getCHAEN : TBits_1; inline;
  11002. function getCHBUSY : TBits_1; inline;
  11003. function getCHCHN : TBits_1; inline;
  11004. function getCHCHNS : TBits_1; inline;
  11005. function getCHEDET : TBits_1; inline;
  11006. function getCHEN : TBits_1; inline;
  11007. function getCHPRI : TBits_2; inline;
  11008. function getw : TBits_32; inline;
  11009. procedure setCHAED(thebits : TBits_1); inline;
  11010. procedure setCHAEN(thebits : TBits_1); inline;
  11011. procedure setCHBUSY(thebits : TBits_1); inline;
  11012. procedure setCHCHN(thebits : TBits_1); inline;
  11013. procedure setCHCHNS(thebits : TBits_1); inline;
  11014. procedure setCHEDET(thebits : TBits_1); inline;
  11015. procedure setCHEN(thebits : TBits_1); inline;
  11016. procedure setCHPRI(thebits : TBits_2); inline;
  11017. procedure setw(thebits : TBits_32); inline;
  11018. public
  11019. procedure clearCHAED; inline;
  11020. procedure clearCHAEN; inline;
  11021. procedure clearCHBUSY; inline;
  11022. procedure clearCHCHN; inline;
  11023. procedure clearCHCHNS; inline;
  11024. procedure clearCHEDET; inline;
  11025. procedure clearCHEN; inline;
  11026. procedure setCHAED; inline;
  11027. procedure setCHAEN; inline;
  11028. procedure setCHBUSY; inline;
  11029. procedure setCHCHN; inline;
  11030. procedure setCHCHNS; inline;
  11031. procedure setCHEDET; inline;
  11032. procedure setCHEN; inline;
  11033. property CHAED : TBits_1 read getCHAED write setCHAED;
  11034. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11035. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11036. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11037. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11038. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11039. property CHEN : TBits_1 read getCHEN write setCHEN;
  11040. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11041. property w : TBits_32 read getw write setw;
  11042. end;
  11043. TDMAC2_DCH2ECON = record
  11044. private
  11045. function getAIRQEN : TBits_1; inline;
  11046. function getCABORT : TBits_1; inline;
  11047. function getCFORCE : TBits_1; inline;
  11048. function getCHAIRQ : TBits_8; inline;
  11049. function getCHSIRQ : TBits_8; inline;
  11050. function getPATEN : TBits_1; inline;
  11051. function getSIRQEN : TBits_1; inline;
  11052. function getw : TBits_32; inline;
  11053. procedure setAIRQEN(thebits : TBits_1); inline;
  11054. procedure setCABORT(thebits : TBits_1); inline;
  11055. procedure setCFORCE(thebits : TBits_1); inline;
  11056. procedure setCHAIRQ(thebits : TBits_8); inline;
  11057. procedure setCHSIRQ(thebits : TBits_8); inline;
  11058. procedure setPATEN(thebits : TBits_1); inline;
  11059. procedure setSIRQEN(thebits : TBits_1); inline;
  11060. procedure setw(thebits : TBits_32); inline;
  11061. public
  11062. procedure clearAIRQEN; inline;
  11063. procedure clearCABORT; inline;
  11064. procedure clearCFORCE; inline;
  11065. procedure clearPATEN; inline;
  11066. procedure clearSIRQEN; inline;
  11067. procedure setAIRQEN; inline;
  11068. procedure setCABORT; inline;
  11069. procedure setCFORCE; inline;
  11070. procedure setPATEN; inline;
  11071. procedure setSIRQEN; inline;
  11072. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11073. property CABORT : TBits_1 read getCABORT write setCABORT;
  11074. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11075. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11076. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11077. property PATEN : TBits_1 read getPATEN write setPATEN;
  11078. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11079. property w : TBits_32 read getw write setw;
  11080. end;
  11081. TDMAC2_DCH2INT = record
  11082. private
  11083. function getCHBCIE : TBits_1; inline;
  11084. function getCHBCIF : TBits_1; inline;
  11085. function getCHCCIE : TBits_1; inline;
  11086. function getCHCCIF : TBits_1; inline;
  11087. function getCHDDIE : TBits_1; inline;
  11088. function getCHDDIF : TBits_1; inline;
  11089. function getCHDHIE : TBits_1; inline;
  11090. function getCHDHIF : TBits_1; inline;
  11091. function getCHERIE : TBits_1; inline;
  11092. function getCHERIF : TBits_1; inline;
  11093. function getCHSDIE : TBits_1; inline;
  11094. function getCHSDIF : TBits_1; inline;
  11095. function getCHSHIE : TBits_1; inline;
  11096. function getCHSHIF : TBits_1; inline;
  11097. function getCHTAIE : TBits_1; inline;
  11098. function getCHTAIF : TBits_1; inline;
  11099. function getw : TBits_32; inline;
  11100. procedure setCHBCIE(thebits : TBits_1); inline;
  11101. procedure setCHBCIF(thebits : TBits_1); inline;
  11102. procedure setCHCCIE(thebits : TBits_1); inline;
  11103. procedure setCHCCIF(thebits : TBits_1); inline;
  11104. procedure setCHDDIE(thebits : TBits_1); inline;
  11105. procedure setCHDDIF(thebits : TBits_1); inline;
  11106. procedure setCHDHIE(thebits : TBits_1); inline;
  11107. procedure setCHDHIF(thebits : TBits_1); inline;
  11108. procedure setCHERIE(thebits : TBits_1); inline;
  11109. procedure setCHERIF(thebits : TBits_1); inline;
  11110. procedure setCHSDIE(thebits : TBits_1); inline;
  11111. procedure setCHSDIF(thebits : TBits_1); inline;
  11112. procedure setCHSHIE(thebits : TBits_1); inline;
  11113. procedure setCHSHIF(thebits : TBits_1); inline;
  11114. procedure setCHTAIE(thebits : TBits_1); inline;
  11115. procedure setCHTAIF(thebits : TBits_1); inline;
  11116. procedure setw(thebits : TBits_32); inline;
  11117. public
  11118. procedure clearCHBCIE; inline;
  11119. procedure clearCHBCIF; inline;
  11120. procedure clearCHCCIE; inline;
  11121. procedure clearCHCCIF; inline;
  11122. procedure clearCHDDIE; inline;
  11123. procedure clearCHDDIF; inline;
  11124. procedure clearCHDHIE; inline;
  11125. procedure clearCHDHIF; inline;
  11126. procedure clearCHERIE; inline;
  11127. procedure clearCHERIF; inline;
  11128. procedure clearCHSDIE; inline;
  11129. procedure clearCHSDIF; inline;
  11130. procedure clearCHSHIE; inline;
  11131. procedure clearCHSHIF; inline;
  11132. procedure clearCHTAIE; inline;
  11133. procedure clearCHTAIF; inline;
  11134. procedure setCHBCIE; inline;
  11135. procedure setCHBCIF; inline;
  11136. procedure setCHCCIE; inline;
  11137. procedure setCHCCIF; inline;
  11138. procedure setCHDDIE; inline;
  11139. procedure setCHDDIF; inline;
  11140. procedure setCHDHIE; inline;
  11141. procedure setCHDHIF; inline;
  11142. procedure setCHERIE; inline;
  11143. procedure setCHERIF; inline;
  11144. procedure setCHSDIE; inline;
  11145. procedure setCHSDIF; inline;
  11146. procedure setCHSHIE; inline;
  11147. procedure setCHSHIF; inline;
  11148. procedure setCHTAIE; inline;
  11149. procedure setCHTAIF; inline;
  11150. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11151. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11152. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11153. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11154. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11155. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11156. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11157. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11158. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11159. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11160. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11161. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11162. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11163. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11164. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11165. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11166. property w : TBits_32 read getw write setw;
  11167. end;
  11168. type
  11169. TDMAC2Registers = record
  11170. DCH2CONbits : TDMAC2_DCH2CON;
  11171. DCH2CON : longWord;
  11172. DCH2CONCLR : longWord;
  11173. DCH2CONSET : longWord;
  11174. DCH2CONINV : longWord;
  11175. DCH2ECONbits : TDMAC2_DCH2ECON;
  11176. DCH2ECON : longWord;
  11177. DCH2ECONCLR : longWord;
  11178. DCH2ECONSET : longWord;
  11179. DCH2ECONINV : longWord;
  11180. DCH2INTbits : TDMAC2_DCH2INT;
  11181. DCH2INT : longWord;
  11182. DCH2INTCLR : longWord;
  11183. DCH2INTSET : longWord;
  11184. DCH2INTINV : longWord;
  11185. DCH2SSA : longWord;
  11186. DCH2SSACLR : longWord;
  11187. DCH2SSASET : longWord;
  11188. DCH2SSAINV : longWord;
  11189. DCH2DSA : longWord;
  11190. DCH2DSACLR : longWord;
  11191. DCH2DSASET : longWord;
  11192. DCH2DSAINV : longWord;
  11193. DCH2SSIZ : longWord;
  11194. DCH2SSIZCLR : longWord;
  11195. DCH2SSIZSET : longWord;
  11196. DCH2SSIZINV : longWord;
  11197. DCH2DSIZ : longWord;
  11198. DCH2DSIZCLR : longWord;
  11199. DCH2DSIZSET : longWord;
  11200. DCH2DSIZINV : longWord;
  11201. DCH2SPTR : longWord;
  11202. DCH2SPTRCLR : longWord;
  11203. DCH2SPTRSET : longWord;
  11204. DCH2SPTRINV : longWord;
  11205. DCH2DPTR : longWord;
  11206. DCH2DPTRCLR : longWord;
  11207. DCH2DPTRSET : longWord;
  11208. DCH2DPTRINV : longWord;
  11209. DCH2CSIZ : longWord;
  11210. DCH2CSIZCLR : longWord;
  11211. DCH2CSIZSET : longWord;
  11212. DCH2CSIZINV : longWord;
  11213. DCH2CPTR : longWord;
  11214. DCH2CPTRCLR : longWord;
  11215. DCH2CPTRSET : longWord;
  11216. DCH2CPTRINV : longWord;
  11217. DCH2DAT : longWord;
  11218. DCH2DATCLR : longWord;
  11219. DCH2DATSET : longWord;
  11220. DCH2DATINV : longWord;
  11221. end;
  11222. TDMAC3_DCH3CON = record
  11223. private
  11224. function getCHAED : TBits_1; inline;
  11225. function getCHAEN : TBits_1; inline;
  11226. function getCHBUSY : TBits_1; inline;
  11227. function getCHCHN : TBits_1; inline;
  11228. function getCHCHNS : TBits_1; inline;
  11229. function getCHEDET : TBits_1; inline;
  11230. function getCHEN : TBits_1; inline;
  11231. function getCHPRI : TBits_2; inline;
  11232. function getw : TBits_32; inline;
  11233. procedure setCHAED(thebits : TBits_1); inline;
  11234. procedure setCHAEN(thebits : TBits_1); inline;
  11235. procedure setCHBUSY(thebits : TBits_1); inline;
  11236. procedure setCHCHN(thebits : TBits_1); inline;
  11237. procedure setCHCHNS(thebits : TBits_1); inline;
  11238. procedure setCHEDET(thebits : TBits_1); inline;
  11239. procedure setCHEN(thebits : TBits_1); inline;
  11240. procedure setCHPRI(thebits : TBits_2); inline;
  11241. procedure setw(thebits : TBits_32); inline;
  11242. public
  11243. procedure clearCHAED; inline;
  11244. procedure clearCHAEN; inline;
  11245. procedure clearCHBUSY; inline;
  11246. procedure clearCHCHN; inline;
  11247. procedure clearCHCHNS; inline;
  11248. procedure clearCHEDET; inline;
  11249. procedure clearCHEN; inline;
  11250. procedure setCHAED; inline;
  11251. procedure setCHAEN; inline;
  11252. procedure setCHBUSY; inline;
  11253. procedure setCHCHN; inline;
  11254. procedure setCHCHNS; inline;
  11255. procedure setCHEDET; inline;
  11256. procedure setCHEN; inline;
  11257. property CHAED : TBits_1 read getCHAED write setCHAED;
  11258. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11259. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11260. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11261. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11262. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11263. property CHEN : TBits_1 read getCHEN write setCHEN;
  11264. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11265. property w : TBits_32 read getw write setw;
  11266. end;
  11267. TDMAC3_DCH3ECON = record
  11268. private
  11269. function getAIRQEN : TBits_1; inline;
  11270. function getCABORT : TBits_1; inline;
  11271. function getCFORCE : TBits_1; inline;
  11272. function getCHAIRQ : TBits_8; inline;
  11273. function getCHSIRQ : TBits_8; inline;
  11274. function getPATEN : TBits_1; inline;
  11275. function getSIRQEN : TBits_1; inline;
  11276. function getw : TBits_32; inline;
  11277. procedure setAIRQEN(thebits : TBits_1); inline;
  11278. procedure setCABORT(thebits : TBits_1); inline;
  11279. procedure setCFORCE(thebits : TBits_1); inline;
  11280. procedure setCHAIRQ(thebits : TBits_8); inline;
  11281. procedure setCHSIRQ(thebits : TBits_8); inline;
  11282. procedure setPATEN(thebits : TBits_1); inline;
  11283. procedure setSIRQEN(thebits : TBits_1); inline;
  11284. procedure setw(thebits : TBits_32); inline;
  11285. public
  11286. procedure clearAIRQEN; inline;
  11287. procedure clearCABORT; inline;
  11288. procedure clearCFORCE; inline;
  11289. procedure clearPATEN; inline;
  11290. procedure clearSIRQEN; inline;
  11291. procedure setAIRQEN; inline;
  11292. procedure setCABORT; inline;
  11293. procedure setCFORCE; inline;
  11294. procedure setPATEN; inline;
  11295. procedure setSIRQEN; inline;
  11296. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11297. property CABORT : TBits_1 read getCABORT write setCABORT;
  11298. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11299. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11300. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11301. property PATEN : TBits_1 read getPATEN write setPATEN;
  11302. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11303. property w : TBits_32 read getw write setw;
  11304. end;
  11305. TDMAC3_DCH3INT = record
  11306. private
  11307. function getCHBCIE : TBits_1; inline;
  11308. function getCHBCIF : TBits_1; inline;
  11309. function getCHCCIE : TBits_1; inline;
  11310. function getCHCCIF : TBits_1; inline;
  11311. function getCHDDIE : TBits_1; inline;
  11312. function getCHDDIF : TBits_1; inline;
  11313. function getCHDHIE : TBits_1; inline;
  11314. function getCHDHIF : TBits_1; inline;
  11315. function getCHERIE : TBits_1; inline;
  11316. function getCHERIF : TBits_1; inline;
  11317. function getCHSDIE : TBits_1; inline;
  11318. function getCHSDIF : TBits_1; inline;
  11319. function getCHSHIE : TBits_1; inline;
  11320. function getCHSHIF : TBits_1; inline;
  11321. function getCHTAIE : TBits_1; inline;
  11322. function getCHTAIF : TBits_1; inline;
  11323. function getw : TBits_32; inline;
  11324. procedure setCHBCIE(thebits : TBits_1); inline;
  11325. procedure setCHBCIF(thebits : TBits_1); inline;
  11326. procedure setCHCCIE(thebits : TBits_1); inline;
  11327. procedure setCHCCIF(thebits : TBits_1); inline;
  11328. procedure setCHDDIE(thebits : TBits_1); inline;
  11329. procedure setCHDDIF(thebits : TBits_1); inline;
  11330. procedure setCHDHIE(thebits : TBits_1); inline;
  11331. procedure setCHDHIF(thebits : TBits_1); inline;
  11332. procedure setCHERIE(thebits : TBits_1); inline;
  11333. procedure setCHERIF(thebits : TBits_1); inline;
  11334. procedure setCHSDIE(thebits : TBits_1); inline;
  11335. procedure setCHSDIF(thebits : TBits_1); inline;
  11336. procedure setCHSHIE(thebits : TBits_1); inline;
  11337. procedure setCHSHIF(thebits : TBits_1); inline;
  11338. procedure setCHTAIE(thebits : TBits_1); inline;
  11339. procedure setCHTAIF(thebits : TBits_1); inline;
  11340. procedure setw(thebits : TBits_32); inline;
  11341. public
  11342. procedure clearCHBCIE; inline;
  11343. procedure clearCHBCIF; inline;
  11344. procedure clearCHCCIE; inline;
  11345. procedure clearCHCCIF; inline;
  11346. procedure clearCHDDIE; inline;
  11347. procedure clearCHDDIF; inline;
  11348. procedure clearCHDHIE; inline;
  11349. procedure clearCHDHIF; inline;
  11350. procedure clearCHERIE; inline;
  11351. procedure clearCHERIF; inline;
  11352. procedure clearCHSDIE; inline;
  11353. procedure clearCHSDIF; inline;
  11354. procedure clearCHSHIE; inline;
  11355. procedure clearCHSHIF; inline;
  11356. procedure clearCHTAIE; inline;
  11357. procedure clearCHTAIF; inline;
  11358. procedure setCHBCIE; inline;
  11359. procedure setCHBCIF; inline;
  11360. procedure setCHCCIE; inline;
  11361. procedure setCHCCIF; inline;
  11362. procedure setCHDDIE; inline;
  11363. procedure setCHDDIF; inline;
  11364. procedure setCHDHIE; inline;
  11365. procedure setCHDHIF; inline;
  11366. procedure setCHERIE; inline;
  11367. procedure setCHERIF; inline;
  11368. procedure setCHSDIE; inline;
  11369. procedure setCHSDIF; inline;
  11370. procedure setCHSHIE; inline;
  11371. procedure setCHSHIF; inline;
  11372. procedure setCHTAIE; inline;
  11373. procedure setCHTAIF; inline;
  11374. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11375. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11376. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11377. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11378. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11379. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11380. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11381. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11382. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11383. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11384. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11385. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11386. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11387. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11388. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11389. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11390. property w : TBits_32 read getw write setw;
  11391. end;
  11392. type
  11393. TDMAC3Registers = record
  11394. DCH3CONbits : TDMAC3_DCH3CON;
  11395. DCH3CON : longWord;
  11396. DCH3CONCLR : longWord;
  11397. DCH3CONSET : longWord;
  11398. DCH3CONINV : longWord;
  11399. DCH3ECONbits : TDMAC3_DCH3ECON;
  11400. DCH3ECON : longWord;
  11401. DCH3ECONCLR : longWord;
  11402. DCH3ECONSET : longWord;
  11403. DCH3ECONINV : longWord;
  11404. DCH3INTbits : TDMAC3_DCH3INT;
  11405. DCH3INT : longWord;
  11406. DCH3INTCLR : longWord;
  11407. DCH3INTSET : longWord;
  11408. DCH3INTINV : longWord;
  11409. DCH3SSA : longWord;
  11410. DCH3SSACLR : longWord;
  11411. DCH3SSASET : longWord;
  11412. DCH3SSAINV : longWord;
  11413. DCH3DSA : longWord;
  11414. DCH3DSACLR : longWord;
  11415. DCH3DSASET : longWord;
  11416. DCH3DSAINV : longWord;
  11417. DCH3SSIZ : longWord;
  11418. DCH3SSIZCLR : longWord;
  11419. DCH3SSIZSET : longWord;
  11420. DCH3SSIZINV : longWord;
  11421. DCH3DSIZ : longWord;
  11422. DCH3DSIZCLR : longWord;
  11423. DCH3DSIZSET : longWord;
  11424. DCH3DSIZINV : longWord;
  11425. DCH3SPTR : longWord;
  11426. DCH3SPTRCLR : longWord;
  11427. DCH3SPTRSET : longWord;
  11428. DCH3SPTRINV : longWord;
  11429. DCH3DPTR : longWord;
  11430. DCH3DPTRCLR : longWord;
  11431. DCH3DPTRSET : longWord;
  11432. DCH3DPTRINV : longWord;
  11433. DCH3CSIZ : longWord;
  11434. DCH3CSIZCLR : longWord;
  11435. DCH3CSIZSET : longWord;
  11436. DCH3CSIZINV : longWord;
  11437. DCH3CPTR : longWord;
  11438. DCH3CPTRCLR : longWord;
  11439. DCH3CPTRSET : longWord;
  11440. DCH3CPTRINV : longWord;
  11441. DCH3DAT : longWord;
  11442. DCH3DATCLR : longWord;
  11443. DCH3DATSET : longWord;
  11444. DCH3DATINV : longWord;
  11445. end;
  11446. TDMAC4_DCH4CON = record
  11447. private
  11448. function getCHAED : TBits_1; inline;
  11449. function getCHAEN : TBits_1; inline;
  11450. function getCHBUSY : TBits_1; inline;
  11451. function getCHCHN : TBits_1; inline;
  11452. function getCHCHNS : TBits_1; inline;
  11453. function getCHEDET : TBits_1; inline;
  11454. function getCHEN : TBits_1; inline;
  11455. function getCHPRI : TBits_2; inline;
  11456. function getw : TBits_32; inline;
  11457. procedure setCHAED(thebits : TBits_1); inline;
  11458. procedure setCHAEN(thebits : TBits_1); inline;
  11459. procedure setCHBUSY(thebits : TBits_1); inline;
  11460. procedure setCHCHN(thebits : TBits_1); inline;
  11461. procedure setCHCHNS(thebits : TBits_1); inline;
  11462. procedure setCHEDET(thebits : TBits_1); inline;
  11463. procedure setCHEN(thebits : TBits_1); inline;
  11464. procedure setCHPRI(thebits : TBits_2); inline;
  11465. procedure setw(thebits : TBits_32); inline;
  11466. public
  11467. procedure clearCHAED; inline;
  11468. procedure clearCHAEN; inline;
  11469. procedure clearCHBUSY; inline;
  11470. procedure clearCHCHN; inline;
  11471. procedure clearCHCHNS; inline;
  11472. procedure clearCHEDET; inline;
  11473. procedure clearCHEN; inline;
  11474. procedure setCHAED; inline;
  11475. procedure setCHAEN; inline;
  11476. procedure setCHBUSY; inline;
  11477. procedure setCHCHN; inline;
  11478. procedure setCHCHNS; inline;
  11479. procedure setCHEDET; inline;
  11480. procedure setCHEN; inline;
  11481. property CHAED : TBits_1 read getCHAED write setCHAED;
  11482. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11483. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11484. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11485. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11486. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11487. property CHEN : TBits_1 read getCHEN write setCHEN;
  11488. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11489. property w : TBits_32 read getw write setw;
  11490. end;
  11491. TDMAC4_DCH4ECON = record
  11492. private
  11493. function getAIRQEN : TBits_1; inline;
  11494. function getCABORT : TBits_1; inline;
  11495. function getCFORCE : TBits_1; inline;
  11496. function getCHAIRQ : TBits_8; inline;
  11497. function getCHSIRQ : TBits_8; inline;
  11498. function getPATEN : TBits_1; inline;
  11499. function getSIRQEN : TBits_1; inline;
  11500. function getw : TBits_32; inline;
  11501. procedure setAIRQEN(thebits : TBits_1); inline;
  11502. procedure setCABORT(thebits : TBits_1); inline;
  11503. procedure setCFORCE(thebits : TBits_1); inline;
  11504. procedure setCHAIRQ(thebits : TBits_8); inline;
  11505. procedure setCHSIRQ(thebits : TBits_8); inline;
  11506. procedure setPATEN(thebits : TBits_1); inline;
  11507. procedure setSIRQEN(thebits : TBits_1); inline;
  11508. procedure setw(thebits : TBits_32); inline;
  11509. public
  11510. procedure clearAIRQEN; inline;
  11511. procedure clearCABORT; inline;
  11512. procedure clearCFORCE; inline;
  11513. procedure clearPATEN; inline;
  11514. procedure clearSIRQEN; inline;
  11515. procedure setAIRQEN; inline;
  11516. procedure setCABORT; inline;
  11517. procedure setCFORCE; inline;
  11518. procedure setPATEN; inline;
  11519. procedure setSIRQEN; inline;
  11520. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11521. property CABORT : TBits_1 read getCABORT write setCABORT;
  11522. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11523. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11524. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11525. property PATEN : TBits_1 read getPATEN write setPATEN;
  11526. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11527. property w : TBits_32 read getw write setw;
  11528. end;
  11529. TDMAC4_DCH4INT = record
  11530. private
  11531. function getCHBCIE : TBits_1; inline;
  11532. function getCHBCIF : TBits_1; inline;
  11533. function getCHCCIE : TBits_1; inline;
  11534. function getCHCCIF : TBits_1; inline;
  11535. function getCHDDIE : TBits_1; inline;
  11536. function getCHDDIF : TBits_1; inline;
  11537. function getCHDHIE : TBits_1; inline;
  11538. function getCHDHIF : TBits_1; inline;
  11539. function getCHERIE : TBits_1; inline;
  11540. function getCHERIF : TBits_1; inline;
  11541. function getCHSDIE : TBits_1; inline;
  11542. function getCHSDIF : TBits_1; inline;
  11543. function getCHSHIE : TBits_1; inline;
  11544. function getCHSHIF : TBits_1; inline;
  11545. function getCHTAIE : TBits_1; inline;
  11546. function getCHTAIF : TBits_1; inline;
  11547. function getw : TBits_32; inline;
  11548. procedure setCHBCIE(thebits : TBits_1); inline;
  11549. procedure setCHBCIF(thebits : TBits_1); inline;
  11550. procedure setCHCCIE(thebits : TBits_1); inline;
  11551. procedure setCHCCIF(thebits : TBits_1); inline;
  11552. procedure setCHDDIE(thebits : TBits_1); inline;
  11553. procedure setCHDDIF(thebits : TBits_1); inline;
  11554. procedure setCHDHIE(thebits : TBits_1); inline;
  11555. procedure setCHDHIF(thebits : TBits_1); inline;
  11556. procedure setCHERIE(thebits : TBits_1); inline;
  11557. procedure setCHERIF(thebits : TBits_1); inline;
  11558. procedure setCHSDIE(thebits : TBits_1); inline;
  11559. procedure setCHSDIF(thebits : TBits_1); inline;
  11560. procedure setCHSHIE(thebits : TBits_1); inline;
  11561. procedure setCHSHIF(thebits : TBits_1); inline;
  11562. procedure setCHTAIE(thebits : TBits_1); inline;
  11563. procedure setCHTAIF(thebits : TBits_1); inline;
  11564. procedure setw(thebits : TBits_32); inline;
  11565. public
  11566. procedure clearCHBCIE; inline;
  11567. procedure clearCHBCIF; inline;
  11568. procedure clearCHCCIE; inline;
  11569. procedure clearCHCCIF; inline;
  11570. procedure clearCHDDIE; inline;
  11571. procedure clearCHDDIF; inline;
  11572. procedure clearCHDHIE; inline;
  11573. procedure clearCHDHIF; inline;
  11574. procedure clearCHERIE; inline;
  11575. procedure clearCHERIF; inline;
  11576. procedure clearCHSDIE; inline;
  11577. procedure clearCHSDIF; inline;
  11578. procedure clearCHSHIE; inline;
  11579. procedure clearCHSHIF; inline;
  11580. procedure clearCHTAIE; inline;
  11581. procedure clearCHTAIF; inline;
  11582. procedure setCHBCIE; inline;
  11583. procedure setCHBCIF; inline;
  11584. procedure setCHCCIE; inline;
  11585. procedure setCHCCIF; inline;
  11586. procedure setCHDDIE; inline;
  11587. procedure setCHDDIF; inline;
  11588. procedure setCHDHIE; inline;
  11589. procedure setCHDHIF; inline;
  11590. procedure setCHERIE; inline;
  11591. procedure setCHERIF; inline;
  11592. procedure setCHSDIE; inline;
  11593. procedure setCHSDIF; inline;
  11594. procedure setCHSHIE; inline;
  11595. procedure setCHSHIF; inline;
  11596. procedure setCHTAIE; inline;
  11597. procedure setCHTAIF; inline;
  11598. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11599. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11600. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11601. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11602. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11603. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11604. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11605. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11606. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11607. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11608. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11609. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11610. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11611. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11612. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11613. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11614. property w : TBits_32 read getw write setw;
  11615. end;
  11616. type
  11617. TDMAC4Registers = record
  11618. DCH4CONbits : TDMAC4_DCH4CON;
  11619. DCH4CON : longWord;
  11620. DCH4CONCLR : longWord;
  11621. DCH4CONSET : longWord;
  11622. DCH4CONINV : longWord;
  11623. DCH4ECONbits : TDMAC4_DCH4ECON;
  11624. DCH4ECON : longWord;
  11625. DCH4ECONCLR : longWord;
  11626. DCH4ECONSET : longWord;
  11627. DCH4ECONINV : longWord;
  11628. DCH4INTbits : TDMAC4_DCH4INT;
  11629. DCH4INT : longWord;
  11630. DCH4INTCLR : longWord;
  11631. DCH4INTSET : longWord;
  11632. DCH4INTINV : longWord;
  11633. DCH4SSA : longWord;
  11634. DCH4SSACLR : longWord;
  11635. DCH4SSASET : longWord;
  11636. DCH4SSAINV : longWord;
  11637. DCH4DSA : longWord;
  11638. DCH4DSACLR : longWord;
  11639. DCH4DSASET : longWord;
  11640. DCH4DSAINV : longWord;
  11641. DCH4SSIZ : longWord;
  11642. DCH4SSIZCLR : longWord;
  11643. DCH4SSIZSET : longWord;
  11644. DCH4SSIZINV : longWord;
  11645. DCH4DSIZ : longWord;
  11646. DCH4DSIZCLR : longWord;
  11647. DCH4DSIZSET : longWord;
  11648. DCH4DSIZINV : longWord;
  11649. DCH4SPTR : longWord;
  11650. DCH4SPTRCLR : longWord;
  11651. DCH4SPTRSET : longWord;
  11652. DCH4SPTRINV : longWord;
  11653. DCH4DPTR : longWord;
  11654. DCH4DPTRCLR : longWord;
  11655. DCH4DPTRSET : longWord;
  11656. DCH4DPTRINV : longWord;
  11657. DCH4CSIZ : longWord;
  11658. DCH4CSIZCLR : longWord;
  11659. DCH4CSIZSET : longWord;
  11660. DCH4CSIZINV : longWord;
  11661. DCH4CPTR : longWord;
  11662. DCH4CPTRCLR : longWord;
  11663. DCH4CPTRSET : longWord;
  11664. DCH4CPTRINV : longWord;
  11665. DCH4DAT : longWord;
  11666. DCH4DATCLR : longWord;
  11667. DCH4DATSET : longWord;
  11668. DCH4DATINV : longWord;
  11669. end;
  11670. TDMAC5_DCH5CON = record
  11671. private
  11672. function getCHAED : TBits_1; inline;
  11673. function getCHAEN : TBits_1; inline;
  11674. function getCHBUSY : TBits_1; inline;
  11675. function getCHCHN : TBits_1; inline;
  11676. function getCHCHNS : TBits_1; inline;
  11677. function getCHEDET : TBits_1; inline;
  11678. function getCHEN : TBits_1; inline;
  11679. function getCHPRI : TBits_2; inline;
  11680. function getw : TBits_32; inline;
  11681. procedure setCHAED(thebits : TBits_1); inline;
  11682. procedure setCHAEN(thebits : TBits_1); inline;
  11683. procedure setCHBUSY(thebits : TBits_1); inline;
  11684. procedure setCHCHN(thebits : TBits_1); inline;
  11685. procedure setCHCHNS(thebits : TBits_1); inline;
  11686. procedure setCHEDET(thebits : TBits_1); inline;
  11687. procedure setCHEN(thebits : TBits_1); inline;
  11688. procedure setCHPRI(thebits : TBits_2); inline;
  11689. procedure setw(thebits : TBits_32); inline;
  11690. public
  11691. procedure clearCHAED; inline;
  11692. procedure clearCHAEN; inline;
  11693. procedure clearCHBUSY; inline;
  11694. procedure clearCHCHN; inline;
  11695. procedure clearCHCHNS; inline;
  11696. procedure clearCHEDET; inline;
  11697. procedure clearCHEN; inline;
  11698. procedure setCHAED; inline;
  11699. procedure setCHAEN; inline;
  11700. procedure setCHBUSY; inline;
  11701. procedure setCHCHN; inline;
  11702. procedure setCHCHNS; inline;
  11703. procedure setCHEDET; inline;
  11704. procedure setCHEN; inline;
  11705. property CHAED : TBits_1 read getCHAED write setCHAED;
  11706. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11707. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11708. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11709. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11710. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11711. property CHEN : TBits_1 read getCHEN write setCHEN;
  11712. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11713. property w : TBits_32 read getw write setw;
  11714. end;
  11715. TDMAC5_DCH5ECON = record
  11716. private
  11717. function getAIRQEN : TBits_1; inline;
  11718. function getCABORT : TBits_1; inline;
  11719. function getCFORCE : TBits_1; inline;
  11720. function getCHAIRQ : TBits_8; inline;
  11721. function getCHSIRQ : TBits_8; inline;
  11722. function getPATEN : TBits_1; inline;
  11723. function getSIRQEN : TBits_1; inline;
  11724. function getw : TBits_32; inline;
  11725. procedure setAIRQEN(thebits : TBits_1); inline;
  11726. procedure setCABORT(thebits : TBits_1); inline;
  11727. procedure setCFORCE(thebits : TBits_1); inline;
  11728. procedure setCHAIRQ(thebits : TBits_8); inline;
  11729. procedure setCHSIRQ(thebits : TBits_8); inline;
  11730. procedure setPATEN(thebits : TBits_1); inline;
  11731. procedure setSIRQEN(thebits : TBits_1); inline;
  11732. procedure setw(thebits : TBits_32); inline;
  11733. public
  11734. procedure clearAIRQEN; inline;
  11735. procedure clearCABORT; inline;
  11736. procedure clearCFORCE; inline;
  11737. procedure clearPATEN; inline;
  11738. procedure clearSIRQEN; inline;
  11739. procedure setAIRQEN; inline;
  11740. procedure setCABORT; inline;
  11741. procedure setCFORCE; inline;
  11742. procedure setPATEN; inline;
  11743. procedure setSIRQEN; inline;
  11744. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11745. property CABORT : TBits_1 read getCABORT write setCABORT;
  11746. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11747. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11748. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11749. property PATEN : TBits_1 read getPATEN write setPATEN;
  11750. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11751. property w : TBits_32 read getw write setw;
  11752. end;
  11753. TDMAC5_DCH5INT = record
  11754. private
  11755. function getCHBCIE : TBits_1; inline;
  11756. function getCHBCIF : TBits_1; inline;
  11757. function getCHCCIE : TBits_1; inline;
  11758. function getCHCCIF : TBits_1; inline;
  11759. function getCHDDIE : TBits_1; inline;
  11760. function getCHDDIF : TBits_1; inline;
  11761. function getCHDHIE : TBits_1; inline;
  11762. function getCHDHIF : TBits_1; inline;
  11763. function getCHERIE : TBits_1; inline;
  11764. function getCHERIF : TBits_1; inline;
  11765. function getCHSDIE : TBits_1; inline;
  11766. function getCHSDIF : TBits_1; inline;
  11767. function getCHSHIE : TBits_1; inline;
  11768. function getCHSHIF : TBits_1; inline;
  11769. function getCHTAIE : TBits_1; inline;
  11770. function getCHTAIF : TBits_1; inline;
  11771. function getw : TBits_32; inline;
  11772. procedure setCHBCIE(thebits : TBits_1); inline;
  11773. procedure setCHBCIF(thebits : TBits_1); inline;
  11774. procedure setCHCCIE(thebits : TBits_1); inline;
  11775. procedure setCHCCIF(thebits : TBits_1); inline;
  11776. procedure setCHDDIE(thebits : TBits_1); inline;
  11777. procedure setCHDDIF(thebits : TBits_1); inline;
  11778. procedure setCHDHIE(thebits : TBits_1); inline;
  11779. procedure setCHDHIF(thebits : TBits_1); inline;
  11780. procedure setCHERIE(thebits : TBits_1); inline;
  11781. procedure setCHERIF(thebits : TBits_1); inline;
  11782. procedure setCHSDIE(thebits : TBits_1); inline;
  11783. procedure setCHSDIF(thebits : TBits_1); inline;
  11784. procedure setCHSHIE(thebits : TBits_1); inline;
  11785. procedure setCHSHIF(thebits : TBits_1); inline;
  11786. procedure setCHTAIE(thebits : TBits_1); inline;
  11787. procedure setCHTAIF(thebits : TBits_1); inline;
  11788. procedure setw(thebits : TBits_32); inline;
  11789. public
  11790. procedure clearCHBCIE; inline;
  11791. procedure clearCHBCIF; inline;
  11792. procedure clearCHCCIE; inline;
  11793. procedure clearCHCCIF; inline;
  11794. procedure clearCHDDIE; inline;
  11795. procedure clearCHDDIF; inline;
  11796. procedure clearCHDHIE; inline;
  11797. procedure clearCHDHIF; inline;
  11798. procedure clearCHERIE; inline;
  11799. procedure clearCHERIF; inline;
  11800. procedure clearCHSDIE; inline;
  11801. procedure clearCHSDIF; inline;
  11802. procedure clearCHSHIE; inline;
  11803. procedure clearCHSHIF; inline;
  11804. procedure clearCHTAIE; inline;
  11805. procedure clearCHTAIF; inline;
  11806. procedure setCHBCIE; inline;
  11807. procedure setCHBCIF; inline;
  11808. procedure setCHCCIE; inline;
  11809. procedure setCHCCIF; inline;
  11810. procedure setCHDDIE; inline;
  11811. procedure setCHDDIF; inline;
  11812. procedure setCHDHIE; inline;
  11813. procedure setCHDHIF; inline;
  11814. procedure setCHERIE; inline;
  11815. procedure setCHERIF; inline;
  11816. procedure setCHSDIE; inline;
  11817. procedure setCHSDIF; inline;
  11818. procedure setCHSHIE; inline;
  11819. procedure setCHSHIF; inline;
  11820. procedure setCHTAIE; inline;
  11821. procedure setCHTAIF; inline;
  11822. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11823. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11824. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11825. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11826. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11827. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11828. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11829. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11830. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11831. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11832. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11833. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11834. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11835. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11836. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11837. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11838. property w : TBits_32 read getw write setw;
  11839. end;
  11840. type
  11841. TDMAC5Registers = record
  11842. DCH5CONbits : TDMAC5_DCH5CON;
  11843. DCH5CON : longWord;
  11844. DCH5CONCLR : longWord;
  11845. DCH5CONSET : longWord;
  11846. DCH5CONINV : longWord;
  11847. DCH5ECONbits : TDMAC5_DCH5ECON;
  11848. DCH5ECON : longWord;
  11849. DCH5ECONCLR : longWord;
  11850. DCH5ECONSET : longWord;
  11851. DCH5ECONINV : longWord;
  11852. DCH5INTbits : TDMAC5_DCH5INT;
  11853. DCH5INT : longWord;
  11854. DCH5INTCLR : longWord;
  11855. DCH5INTSET : longWord;
  11856. DCH5INTINV : longWord;
  11857. DCH5SSA : longWord;
  11858. DCH5SSACLR : longWord;
  11859. DCH5SSASET : longWord;
  11860. DCH5SSAINV : longWord;
  11861. DCH5DSA : longWord;
  11862. DCH5DSACLR : longWord;
  11863. DCH5DSASET : longWord;
  11864. DCH5DSAINV : longWord;
  11865. DCH5SSIZ : longWord;
  11866. DCH5SSIZCLR : longWord;
  11867. DCH5SSIZSET : longWord;
  11868. DCH5SSIZINV : longWord;
  11869. DCH5DSIZ : longWord;
  11870. DCH5DSIZCLR : longWord;
  11871. DCH5DSIZSET : longWord;
  11872. DCH5DSIZINV : longWord;
  11873. DCH5SPTR : longWord;
  11874. DCH5SPTRCLR : longWord;
  11875. DCH5SPTRSET : longWord;
  11876. DCH5SPTRINV : longWord;
  11877. DCH5DPTR : longWord;
  11878. DCH5DPTRCLR : longWord;
  11879. DCH5DPTRSET : longWord;
  11880. DCH5DPTRINV : longWord;
  11881. DCH5CSIZ : longWord;
  11882. DCH5CSIZCLR : longWord;
  11883. DCH5CSIZSET : longWord;
  11884. DCH5CSIZINV : longWord;
  11885. DCH5CPTR : longWord;
  11886. DCH5CPTRCLR : longWord;
  11887. DCH5CPTRSET : longWord;
  11888. DCH5CPTRINV : longWord;
  11889. DCH5DAT : longWord;
  11890. DCH5DATCLR : longWord;
  11891. DCH5DATSET : longWord;
  11892. DCH5DATINV : longWord;
  11893. end;
  11894. TDMAC6_DCH6CON = record
  11895. private
  11896. function getCHAED : TBits_1; inline;
  11897. function getCHAEN : TBits_1; inline;
  11898. function getCHBUSY : TBits_1; inline;
  11899. function getCHCHN : TBits_1; inline;
  11900. function getCHCHNS : TBits_1; inline;
  11901. function getCHEDET : TBits_1; inline;
  11902. function getCHEN : TBits_1; inline;
  11903. function getCHPRI : TBits_2; inline;
  11904. function getw : TBits_32; inline;
  11905. procedure setCHAED(thebits : TBits_1); inline;
  11906. procedure setCHAEN(thebits : TBits_1); inline;
  11907. procedure setCHBUSY(thebits : TBits_1); inline;
  11908. procedure setCHCHN(thebits : TBits_1); inline;
  11909. procedure setCHCHNS(thebits : TBits_1); inline;
  11910. procedure setCHEDET(thebits : TBits_1); inline;
  11911. procedure setCHEN(thebits : TBits_1); inline;
  11912. procedure setCHPRI(thebits : TBits_2); inline;
  11913. procedure setw(thebits : TBits_32); inline;
  11914. public
  11915. procedure clearCHAED; inline;
  11916. procedure clearCHAEN; inline;
  11917. procedure clearCHBUSY; inline;
  11918. procedure clearCHCHN; inline;
  11919. procedure clearCHCHNS; inline;
  11920. procedure clearCHEDET; inline;
  11921. procedure clearCHEN; inline;
  11922. procedure setCHAED; inline;
  11923. procedure setCHAEN; inline;
  11924. procedure setCHBUSY; inline;
  11925. procedure setCHCHN; inline;
  11926. procedure setCHCHNS; inline;
  11927. procedure setCHEDET; inline;
  11928. procedure setCHEN; inline;
  11929. property CHAED : TBits_1 read getCHAED write setCHAED;
  11930. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11931. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11932. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11933. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11934. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11935. property CHEN : TBits_1 read getCHEN write setCHEN;
  11936. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11937. property w : TBits_32 read getw write setw;
  11938. end;
  11939. TDMAC6_DCH6ECON = record
  11940. private
  11941. function getAIRQEN : TBits_1; inline;
  11942. function getCABORT : TBits_1; inline;
  11943. function getCFORCE : TBits_1; inline;
  11944. function getCHAIRQ : TBits_8; inline;
  11945. function getCHSIRQ : TBits_8; inline;
  11946. function getPATEN : TBits_1; inline;
  11947. function getSIRQEN : TBits_1; inline;
  11948. function getw : TBits_32; inline;
  11949. procedure setAIRQEN(thebits : TBits_1); inline;
  11950. procedure setCABORT(thebits : TBits_1); inline;
  11951. procedure setCFORCE(thebits : TBits_1); inline;
  11952. procedure setCHAIRQ(thebits : TBits_8); inline;
  11953. procedure setCHSIRQ(thebits : TBits_8); inline;
  11954. procedure setPATEN(thebits : TBits_1); inline;
  11955. procedure setSIRQEN(thebits : TBits_1); inline;
  11956. procedure setw(thebits : TBits_32); inline;
  11957. public
  11958. procedure clearAIRQEN; inline;
  11959. procedure clearCABORT; inline;
  11960. procedure clearCFORCE; inline;
  11961. procedure clearPATEN; inline;
  11962. procedure clearSIRQEN; inline;
  11963. procedure setAIRQEN; inline;
  11964. procedure setCABORT; inline;
  11965. procedure setCFORCE; inline;
  11966. procedure setPATEN; inline;
  11967. procedure setSIRQEN; inline;
  11968. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11969. property CABORT : TBits_1 read getCABORT write setCABORT;
  11970. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11971. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11972. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11973. property PATEN : TBits_1 read getPATEN write setPATEN;
  11974. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11975. property w : TBits_32 read getw write setw;
  11976. end;
  11977. TDMAC6_DCH6INT = record
  11978. private
  11979. function getCHBCIE : TBits_1; inline;
  11980. function getCHBCIF : TBits_1; inline;
  11981. function getCHCCIE : TBits_1; inline;
  11982. function getCHCCIF : TBits_1; inline;
  11983. function getCHDDIE : TBits_1; inline;
  11984. function getCHDDIF : TBits_1; inline;
  11985. function getCHDHIE : TBits_1; inline;
  11986. function getCHDHIF : TBits_1; inline;
  11987. function getCHERIE : TBits_1; inline;
  11988. function getCHERIF : TBits_1; inline;
  11989. function getCHSDIE : TBits_1; inline;
  11990. function getCHSDIF : TBits_1; inline;
  11991. function getCHSHIE : TBits_1; inline;
  11992. function getCHSHIF : TBits_1; inline;
  11993. function getCHTAIE : TBits_1; inline;
  11994. function getCHTAIF : TBits_1; inline;
  11995. function getw : TBits_32; inline;
  11996. procedure setCHBCIE(thebits : TBits_1); inline;
  11997. procedure setCHBCIF(thebits : TBits_1); inline;
  11998. procedure setCHCCIE(thebits : TBits_1); inline;
  11999. procedure setCHCCIF(thebits : TBits_1); inline;
  12000. procedure setCHDDIE(thebits : TBits_1); inline;
  12001. procedure setCHDDIF(thebits : TBits_1); inline;
  12002. procedure setCHDHIE(thebits : TBits_1); inline;
  12003. procedure setCHDHIF(thebits : TBits_1); inline;
  12004. procedure setCHERIE(thebits : TBits_1); inline;
  12005. procedure setCHERIF(thebits : TBits_1); inline;
  12006. procedure setCHSDIE(thebits : TBits_1); inline;
  12007. procedure setCHSDIF(thebits : TBits_1); inline;
  12008. procedure setCHSHIE(thebits : TBits_1); inline;
  12009. procedure setCHSHIF(thebits : TBits_1); inline;
  12010. procedure setCHTAIE(thebits : TBits_1); inline;
  12011. procedure setCHTAIF(thebits : TBits_1); inline;
  12012. procedure setw(thebits : TBits_32); inline;
  12013. public
  12014. procedure clearCHBCIE; inline;
  12015. procedure clearCHBCIF; inline;
  12016. procedure clearCHCCIE; inline;
  12017. procedure clearCHCCIF; inline;
  12018. procedure clearCHDDIE; inline;
  12019. procedure clearCHDDIF; inline;
  12020. procedure clearCHDHIE; inline;
  12021. procedure clearCHDHIF; inline;
  12022. procedure clearCHERIE; inline;
  12023. procedure clearCHERIF; inline;
  12024. procedure clearCHSDIE; inline;
  12025. procedure clearCHSDIF; inline;
  12026. procedure clearCHSHIE; inline;
  12027. procedure clearCHSHIF; inline;
  12028. procedure clearCHTAIE; inline;
  12029. procedure clearCHTAIF; inline;
  12030. procedure setCHBCIE; inline;
  12031. procedure setCHBCIF; inline;
  12032. procedure setCHCCIE; inline;
  12033. procedure setCHCCIF; inline;
  12034. procedure setCHDDIE; inline;
  12035. procedure setCHDDIF; inline;
  12036. procedure setCHDHIE; inline;
  12037. procedure setCHDHIF; inline;
  12038. procedure setCHERIE; inline;
  12039. procedure setCHERIF; inline;
  12040. procedure setCHSDIE; inline;
  12041. procedure setCHSDIF; inline;
  12042. procedure setCHSHIE; inline;
  12043. procedure setCHSHIF; inline;
  12044. procedure setCHTAIE; inline;
  12045. procedure setCHTAIF; inline;
  12046. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  12047. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  12048. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  12049. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  12050. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  12051. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  12052. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  12053. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  12054. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  12055. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  12056. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  12057. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  12058. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  12059. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  12060. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  12061. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  12062. property w : TBits_32 read getw write setw;
  12063. end;
  12064. type
  12065. TDMAC6Registers = record
  12066. DCH6CONbits : TDMAC6_DCH6CON;
  12067. DCH6CON : longWord;
  12068. DCH6CONCLR : longWord;
  12069. DCH6CONSET : longWord;
  12070. DCH6CONINV : longWord;
  12071. DCH6ECONbits : TDMAC6_DCH6ECON;
  12072. DCH6ECON : longWord;
  12073. DCH6ECONCLR : longWord;
  12074. DCH6ECONSET : longWord;
  12075. DCH6ECONINV : longWord;
  12076. DCH6INTbits : TDMAC6_DCH6INT;
  12077. DCH6INT : longWord;
  12078. DCH6INTCLR : longWord;
  12079. DCH6INTSET : longWord;
  12080. DCH6INTINV : longWord;
  12081. DCH6SSA : longWord;
  12082. DCH6SSACLR : longWord;
  12083. DCH6SSASET : longWord;
  12084. DCH6SSAINV : longWord;
  12085. DCH6DSA : longWord;
  12086. DCH6DSACLR : longWord;
  12087. DCH6DSASET : longWord;
  12088. DCH6DSAINV : longWord;
  12089. DCH6SSIZ : longWord;
  12090. DCH6SSIZCLR : longWord;
  12091. DCH6SSIZSET : longWord;
  12092. DCH6SSIZINV : longWord;
  12093. DCH6DSIZ : longWord;
  12094. DCH6DSIZCLR : longWord;
  12095. DCH6DSIZSET : longWord;
  12096. DCH6DSIZINV : longWord;
  12097. DCH6SPTR : longWord;
  12098. DCH6SPTRCLR : longWord;
  12099. DCH6SPTRSET : longWord;
  12100. DCH6SPTRINV : longWord;
  12101. DCH6DPTR : longWord;
  12102. DCH6DPTRCLR : longWord;
  12103. DCH6DPTRSET : longWord;
  12104. DCH6DPTRINV : longWord;
  12105. DCH6CSIZ : longWord;
  12106. DCH6CSIZCLR : longWord;
  12107. DCH6CSIZSET : longWord;
  12108. DCH6CSIZINV : longWord;
  12109. DCH6CPTR : longWord;
  12110. DCH6CPTRCLR : longWord;
  12111. DCH6CPTRSET : longWord;
  12112. DCH6CPTRINV : longWord;
  12113. DCH6DAT : longWord;
  12114. DCH6DATCLR : longWord;
  12115. DCH6DATSET : longWord;
  12116. DCH6DATINV : longWord;
  12117. end;
  12118. TDMAC7_DCH7CON = record
  12119. private
  12120. function getCHAED : TBits_1; inline;
  12121. function getCHAEN : TBits_1; inline;
  12122. function getCHBUSY : TBits_1; inline;
  12123. function getCHCHN : TBits_1; inline;
  12124. function getCHCHNS : TBits_1; inline;
  12125. function getCHEDET : TBits_1; inline;
  12126. function getCHEN : TBits_1; inline;
  12127. function getCHPRI : TBits_2; inline;
  12128. function getw : TBits_32; inline;
  12129. procedure setCHAED(thebits : TBits_1); inline;
  12130. procedure setCHAEN(thebits : TBits_1); inline;
  12131. procedure setCHBUSY(thebits : TBits_1); inline;
  12132. procedure setCHCHN(thebits : TBits_1); inline;
  12133. procedure setCHCHNS(thebits : TBits_1); inline;
  12134. procedure setCHEDET(thebits : TBits_1); inline;
  12135. procedure setCHEN(thebits : TBits_1); inline;
  12136. procedure setCHPRI(thebits : TBits_2); inline;
  12137. procedure setw(thebits : TBits_32); inline;
  12138. public
  12139. procedure clearCHAED; inline;
  12140. procedure clearCHAEN; inline;
  12141. procedure clearCHBUSY; inline;
  12142. procedure clearCHCHN; inline;
  12143. procedure clearCHCHNS; inline;
  12144. procedure clearCHEDET; inline;
  12145. procedure clearCHEN; inline;
  12146. procedure setCHAED; inline;
  12147. procedure setCHAEN; inline;
  12148. procedure setCHBUSY; inline;
  12149. procedure setCHCHN; inline;
  12150. procedure setCHCHNS; inline;
  12151. procedure setCHEDET; inline;
  12152. procedure setCHEN; inline;
  12153. property CHAED : TBits_1 read getCHAED write setCHAED;
  12154. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  12155. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  12156. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  12157. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  12158. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  12159. property CHEN : TBits_1 read getCHEN write setCHEN;
  12160. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  12161. property w : TBits_32 read getw write setw;
  12162. end;
  12163. TDMAC7_DCH7ECON = record
  12164. private
  12165. function getAIRQEN : TBits_1; inline;
  12166. function getCABORT : TBits_1; inline;
  12167. function getCFORCE : TBits_1; inline;
  12168. function getCHAIRQ : TBits_8; inline;
  12169. function getCHSIRQ : TBits_8; inline;
  12170. function getPATEN : TBits_1; inline;
  12171. function getSIRQEN : TBits_1; inline;
  12172. function getw : TBits_32; inline;
  12173. procedure setAIRQEN(thebits : TBits_1); inline;
  12174. procedure setCABORT(thebits : TBits_1); inline;
  12175. procedure setCFORCE(thebits : TBits_1); inline;
  12176. procedure setCHAIRQ(thebits : TBits_8); inline;
  12177. procedure setCHSIRQ(thebits : TBits_8); inline;
  12178. procedure setPATEN(thebits : TBits_1); inline;
  12179. procedure setSIRQEN(thebits : TBits_1); inline;
  12180. procedure setw(thebits : TBits_32); inline;
  12181. public
  12182. procedure clearAIRQEN; inline;
  12183. procedure clearCABORT; inline;
  12184. procedure clearCFORCE; inline;
  12185. procedure clearPATEN; inline;
  12186. procedure clearSIRQEN; inline;
  12187. procedure setAIRQEN; inline;
  12188. procedure setCABORT; inline;
  12189. procedure setCFORCE; inline;
  12190. procedure setPATEN; inline;
  12191. procedure setSIRQEN; inline;
  12192. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  12193. property CABORT : TBits_1 read getCABORT write setCABORT;
  12194. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  12195. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  12196. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  12197. property PATEN : TBits_1 read getPATEN write setPATEN;
  12198. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  12199. property w : TBits_32 read getw write setw;
  12200. end;
  12201. TDMAC7_DCH7INT = record
  12202. private
  12203. function getCHBCIE : TBits_1; inline;
  12204. function getCHBCIF : TBits_1; inline;
  12205. function getCHCCIE : TBits_1; inline;
  12206. function getCHCCIF : TBits_1; inline;
  12207. function getCHDDIE : TBits_1; inline;
  12208. function getCHDDIF : TBits_1; inline;
  12209. function getCHDHIE : TBits_1; inline;
  12210. function getCHDHIF : TBits_1; inline;
  12211. function getCHERIE : TBits_1; inline;
  12212. function getCHERIF : TBits_1; inline;
  12213. function getCHSDIE : TBits_1; inline;
  12214. function getCHSDIF : TBits_1; inline;
  12215. function getCHSHIE : TBits_1; inline;
  12216. function getCHSHIF : TBits_1; inline;
  12217. function getCHTAIE : TBits_1; inline;
  12218. function getCHTAIF : TBits_1; inline;
  12219. function getw : TBits_32; inline;
  12220. procedure setCHBCIE(thebits : TBits_1); inline;
  12221. procedure setCHBCIF(thebits : TBits_1); inline;
  12222. procedure setCHCCIE(thebits : TBits_1); inline;
  12223. procedure setCHCCIF(thebits : TBits_1); inline;
  12224. procedure setCHDDIE(thebits : TBits_1); inline;
  12225. procedure setCHDDIF(thebits : TBits_1); inline;
  12226. procedure setCHDHIE(thebits : TBits_1); inline;
  12227. procedure setCHDHIF(thebits : TBits_1); inline;
  12228. procedure setCHERIE(thebits : TBits_1); inline;
  12229. procedure setCHERIF(thebits : TBits_1); inline;
  12230. procedure setCHSDIE(thebits : TBits_1); inline;
  12231. procedure setCHSDIF(thebits : TBits_1); inline;
  12232. procedure setCHSHIE(thebits : TBits_1); inline;
  12233. procedure setCHSHIF(thebits : TBits_1); inline;
  12234. procedure setCHTAIE(thebits : TBits_1); inline;
  12235. procedure setCHTAIF(thebits : TBits_1); inline;
  12236. procedure setw(thebits : TBits_32); inline;
  12237. public
  12238. procedure clearCHBCIE; inline;
  12239. procedure clearCHBCIF; inline;
  12240. procedure clearCHCCIE; inline;
  12241. procedure clearCHCCIF; inline;
  12242. procedure clearCHDDIE; inline;
  12243. procedure clearCHDDIF; inline;
  12244. procedure clearCHDHIE; inline;
  12245. procedure clearCHDHIF; inline;
  12246. procedure clearCHERIE; inline;
  12247. procedure clearCHERIF; inline;
  12248. procedure clearCHSDIE; inline;
  12249. procedure clearCHSDIF; inline;
  12250. procedure clearCHSHIE; inline;
  12251. procedure clearCHSHIF; inline;
  12252. procedure clearCHTAIE; inline;
  12253. procedure clearCHTAIF; inline;
  12254. procedure setCHBCIE; inline;
  12255. procedure setCHBCIF; inline;
  12256. procedure setCHCCIE; inline;
  12257. procedure setCHCCIF; inline;
  12258. procedure setCHDDIE; inline;
  12259. procedure setCHDDIF; inline;
  12260. procedure setCHDHIE; inline;
  12261. procedure setCHDHIF; inline;
  12262. procedure setCHERIE; inline;
  12263. procedure setCHERIF; inline;
  12264. procedure setCHSDIE; inline;
  12265. procedure setCHSDIF; inline;
  12266. procedure setCHSHIE; inline;
  12267. procedure setCHSHIF; inline;
  12268. procedure setCHTAIE; inline;
  12269. procedure setCHTAIF; inline;
  12270. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  12271. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  12272. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  12273. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  12274. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  12275. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  12276. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  12277. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  12278. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  12279. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  12280. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  12281. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  12282. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  12283. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  12284. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  12285. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  12286. property w : TBits_32 read getw write setw;
  12287. end;
  12288. type
  12289. TDMAC7Registers = record
  12290. DCH7CONbits : TDMAC7_DCH7CON;
  12291. DCH7CON : longWord;
  12292. DCH7CONCLR : longWord;
  12293. DCH7CONSET : longWord;
  12294. DCH7CONINV : longWord;
  12295. DCH7ECONbits : TDMAC7_DCH7ECON;
  12296. DCH7ECON : longWord;
  12297. DCH7ECONCLR : longWord;
  12298. DCH7ECONSET : longWord;
  12299. DCH7ECONINV : longWord;
  12300. DCH7INTbits : TDMAC7_DCH7INT;
  12301. DCH7INT : longWord;
  12302. DCH7INTCLR : longWord;
  12303. DCH7INTSET : longWord;
  12304. DCH7INTINV : longWord;
  12305. DCH7SSA : longWord;
  12306. DCH7SSACLR : longWord;
  12307. DCH7SSASET : longWord;
  12308. DCH7SSAINV : longWord;
  12309. DCH7DSA : longWord;
  12310. DCH7DSACLR : longWord;
  12311. DCH7DSASET : longWord;
  12312. DCH7DSAINV : longWord;
  12313. DCH7SSIZ : longWord;
  12314. DCH7SSIZCLR : longWord;
  12315. DCH7SSIZSET : longWord;
  12316. DCH7SSIZINV : longWord;
  12317. DCH7DSIZ : longWord;
  12318. DCH7DSIZCLR : longWord;
  12319. DCH7DSIZSET : longWord;
  12320. DCH7DSIZINV : longWord;
  12321. DCH7SPTR : longWord;
  12322. DCH7SPTRCLR : longWord;
  12323. DCH7SPTRSET : longWord;
  12324. DCH7SPTRINV : longWord;
  12325. DCH7DPTR : longWord;
  12326. DCH7DPTRCLR : longWord;
  12327. DCH7DPTRSET : longWord;
  12328. DCH7DPTRINV : longWord;
  12329. DCH7CSIZ : longWord;
  12330. DCH7CSIZCLR : longWord;
  12331. DCH7CSIZSET : longWord;
  12332. DCH7CSIZINV : longWord;
  12333. DCH7CPTR : longWord;
  12334. DCH7CPTRCLR : longWord;
  12335. DCH7CPTRSET : longWord;
  12336. DCH7CPTRINV : longWord;
  12337. DCH7DAT : longWord;
  12338. DCH7DATCLR : longWord;
  12339. DCH7DATSET : longWord;
  12340. DCH7DATINV : longWord;
  12341. end;
  12342. TPCACHE_CHECON = record
  12343. private
  12344. function getCHECOH : TBits_1; inline;
  12345. function getDCSZ : TBits_2; inline;
  12346. function getPFMWS : TBits_3; inline;
  12347. function getPREFEN : TBits_2; inline;
  12348. function getw : TBits_32; inline;
  12349. procedure setCHECOH(thebits : TBits_1); inline;
  12350. procedure setDCSZ(thebits : TBits_2); inline;
  12351. procedure setPFMWS(thebits : TBits_3); inline;
  12352. procedure setPREFEN(thebits : TBits_2); inline;
  12353. procedure setw(thebits : TBits_32); inline;
  12354. public
  12355. procedure clearCHECOH; inline;
  12356. procedure setCHECOH; inline;
  12357. property CHECOH : TBits_1 read getCHECOH write setCHECOH;
  12358. property DCSZ : TBits_2 read getDCSZ write setDCSZ;
  12359. property PFMWS : TBits_3 read getPFMWS write setPFMWS;
  12360. property PREFEN : TBits_2 read getPREFEN write setPREFEN;
  12361. property w : TBits_32 read getw write setw;
  12362. end;
  12363. TPCACHE_CHETAG = record
  12364. private
  12365. function getLLOCK : TBits_1; inline;
  12366. function getLTAG : TBits_20; inline;
  12367. function getLTAGBOOT : TBits_1; inline;
  12368. function getLTYPE : TBits_1; inline;
  12369. function getLVALID : TBits_1; inline;
  12370. function getw : TBits_32; inline;
  12371. procedure setLLOCK(thebits : TBits_1); inline;
  12372. procedure setLTAG(thebits : TBits_20); inline;
  12373. procedure setLTAGBOOT(thebits : TBits_1); inline;
  12374. procedure setLTYPE(thebits : TBits_1); inline;
  12375. procedure setLVALID(thebits : TBits_1); inline;
  12376. procedure setw(thebits : TBits_32); inline;
  12377. public
  12378. procedure clearLLOCK; inline;
  12379. procedure clearLTAGBOOT; inline;
  12380. procedure clearLTYPE; inline;
  12381. procedure clearLVALID; inline;
  12382. procedure setLLOCK; inline;
  12383. procedure setLTAGBOOT; inline;
  12384. procedure setLTYPE; inline;
  12385. procedure setLVALID; inline;
  12386. property LLOCK : TBits_1 read getLLOCK write setLLOCK;
  12387. property LTAG : TBits_20 read getLTAG write setLTAG;
  12388. property LTAGBOOT : TBits_1 read getLTAGBOOT write setLTAGBOOT;
  12389. property LTYPE : TBits_1 read getLTYPE write setLTYPE;
  12390. property LVALID : TBits_1 read getLVALID write setLVALID;
  12391. property w : TBits_32 read getw write setw;
  12392. end;
  12393. type
  12394. TPCACHERegisters = record
  12395. CHECONbits : TPCACHE_CHECON;
  12396. CHECON : longWord;
  12397. CHECONCLR : longWord;
  12398. CHECONSET : longWord;
  12399. CHECONINV : longWord;
  12400. CHEACC : longWord;
  12401. CHEACCCLR : longWord;
  12402. CHEACCSET : longWord;
  12403. CHEACCINV : longWord;
  12404. CHETAGbits : TPCACHE_CHETAG;
  12405. CHETAG : longWord;
  12406. CHETAGCLR : longWord;
  12407. CHETAGSET : longWord;
  12408. CHETAGINV : longWord;
  12409. CHEMSK : longWord;
  12410. CHEMSKCLR : longWord;
  12411. CHEMSKSET : longWord;
  12412. CHEMSKINV : longWord;
  12413. CHEW0 : longWord;
  12414. CHEW1 : longWord;
  12415. CHEW2 : longWord;
  12416. CHEW3 : longWord;
  12417. CHELRU : longWord;
  12418. CHEHIT : longWord;
  12419. CHEMIS : longWord;
  12420. CHEPFABT : longWord;
  12421. end;
  12422. TUSB_U1IR = record
  12423. private
  12424. function getATTACHIF : TBits_1; inline;
  12425. function getDETACHIF : TBits_1; inline;
  12426. function getIDLEIF : TBits_1; inline;
  12427. function getRESUMEIF : TBits_1; inline;
  12428. function getSOFIF : TBits_1; inline;
  12429. function getSTALLIF : TBits_1; inline;
  12430. function getTRNIF : TBits_1; inline;
  12431. function getUERRIF : TBits_1; inline;
  12432. function getURSTIF : TBits_1; inline;
  12433. function getURSTIF_DETACHIF : TBits_1; inline;
  12434. procedure setATTACHIF(thebits : TBits_1); inline;
  12435. procedure setDETACHIF(thebits : TBits_1); inline;
  12436. procedure setIDLEIF(thebits : TBits_1); inline;
  12437. procedure setRESUMEIF(thebits : TBits_1); inline;
  12438. procedure setSOFIF(thebits : TBits_1); inline;
  12439. procedure setSTALLIF(thebits : TBits_1); inline;
  12440. procedure setTRNIF(thebits : TBits_1); inline;
  12441. procedure setUERRIF(thebits : TBits_1); inline;
  12442. procedure setURSTIF(thebits : TBits_1); inline;
  12443. procedure setURSTIF_DETACHIF(thebits : TBits_1); inline;
  12444. public
  12445. procedure clearATTACHIF; inline;
  12446. procedure clearDETACHIF; inline;
  12447. procedure clearIDLEIF; inline;
  12448. procedure clearRESUMEIF; inline;
  12449. procedure clearSOFIF; inline;
  12450. procedure clearSTALLIF; inline;
  12451. procedure clearTRNIF; inline;
  12452. procedure clearUERRIF; inline;
  12453. procedure clearURSTIF; inline;
  12454. procedure clearURSTIF_DETACHIF; inline;
  12455. procedure setATTACHIF; inline;
  12456. procedure setDETACHIF; inline;
  12457. procedure setIDLEIF; inline;
  12458. procedure setRESUMEIF; inline;
  12459. procedure setSOFIF; inline;
  12460. procedure setSTALLIF; inline;
  12461. procedure setTRNIF; inline;
  12462. procedure setUERRIF; inline;
  12463. procedure setURSTIF; inline;
  12464. procedure setURSTIF_DETACHIF; inline;
  12465. property ATTACHIF : TBits_1 read getATTACHIF write setATTACHIF;
  12466. property DETACHIF : TBits_1 read getDETACHIF write setDETACHIF;
  12467. property IDLEIF : TBits_1 read getIDLEIF write setIDLEIF;
  12468. property RESUMEIF : TBits_1 read getRESUMEIF write setRESUMEIF;
  12469. property SOFIF : TBits_1 read getSOFIF write setSOFIF;
  12470. property STALLIF : TBits_1 read getSTALLIF write setSTALLIF;
  12471. property TRNIF : TBits_1 read getTRNIF write setTRNIF;
  12472. property UERRIF : TBits_1 read getUERRIF write setUERRIF;
  12473. property URSTIF : TBits_1 read getURSTIF write setURSTIF;
  12474. property URSTIF_DETACHIF : TBits_1 read getURSTIF_DETACHIF write setURSTIF_DETACHIF;
  12475. end;
  12476. TUSB_U1IE = record
  12477. private
  12478. function getATTACHIE : TBits_1; inline;
  12479. function getDETACHIE : TBits_1; inline;
  12480. function getIDLEIE : TBits_1; inline;
  12481. function getRESUMEIE : TBits_1; inline;
  12482. function getSOFIE : TBits_1; inline;
  12483. function getSTALLIE : TBits_1; inline;
  12484. function getTRNIE : TBits_1; inline;
  12485. function getUERRIE : TBits_1; inline;
  12486. function getURSTIE : TBits_1; inline;
  12487. function getURSTIE_DETACHIE : TBits_1; inline;
  12488. procedure setATTACHIE(thebits : TBits_1); inline;
  12489. procedure setDETACHIE(thebits : TBits_1); inline;
  12490. procedure setIDLEIE(thebits : TBits_1); inline;
  12491. procedure setRESUMEIE(thebits : TBits_1); inline;
  12492. procedure setSOFIE(thebits : TBits_1); inline;
  12493. procedure setSTALLIE(thebits : TBits_1); inline;
  12494. procedure setTRNIE(thebits : TBits_1); inline;
  12495. procedure setUERRIE(thebits : TBits_1); inline;
  12496. procedure setURSTIE(thebits : TBits_1); inline;
  12497. procedure setURSTIE_DETACHIE(thebits : TBits_1); inline;
  12498. public
  12499. procedure clearATTACHIE; inline;
  12500. procedure clearDETACHIE; inline;
  12501. procedure clearIDLEIE; inline;
  12502. procedure clearRESUMEIE; inline;
  12503. procedure clearSOFIE; inline;
  12504. procedure clearSTALLIE; inline;
  12505. procedure clearTRNIE; inline;
  12506. procedure clearUERRIE; inline;
  12507. procedure clearURSTIE; inline;
  12508. procedure clearURSTIE_DETACHIE; inline;
  12509. procedure setATTACHIE; inline;
  12510. procedure setDETACHIE; inline;
  12511. procedure setIDLEIE; inline;
  12512. procedure setRESUMEIE; inline;
  12513. procedure setSOFIE; inline;
  12514. procedure setSTALLIE; inline;
  12515. procedure setTRNIE; inline;
  12516. procedure setUERRIE; inline;
  12517. procedure setURSTIE; inline;
  12518. procedure setURSTIE_DETACHIE; inline;
  12519. property ATTACHIE : TBits_1 read getATTACHIE write setATTACHIE;
  12520. property DETACHIE : TBits_1 read getDETACHIE write setDETACHIE;
  12521. property IDLEIE : TBits_1 read getIDLEIE write setIDLEIE;
  12522. property RESUMEIE : TBits_1 read getRESUMEIE write setRESUMEIE;
  12523. property SOFIE : TBits_1 read getSOFIE write setSOFIE;
  12524. property STALLIE : TBits_1 read getSTALLIE write setSTALLIE;
  12525. property TRNIE : TBits_1 read getTRNIE write setTRNIE;
  12526. property UERRIE : TBits_1 read getUERRIE write setUERRIE;
  12527. property URSTIE : TBits_1 read getURSTIE write setURSTIE;
  12528. property URSTIE_DETACHIE : TBits_1 read getURSTIE_DETACHIE write setURSTIE_DETACHIE;
  12529. end;
  12530. TUSB_U1EIR = record
  12531. private
  12532. function getBMXEF : TBits_1; inline;
  12533. function getBTOEF : TBits_1; inline;
  12534. function getBTSEF : TBits_1; inline;
  12535. function getCRC16EF : TBits_1; inline;
  12536. function getCRC5EF : TBits_1; inline;
  12537. function getCRC5EF_EOFEF : TBits_1; inline;
  12538. function getDFN8EF : TBits_1; inline;
  12539. function getDMAEF : TBits_1; inline;
  12540. function getEOFEF : TBits_1; inline;
  12541. function getPIDEF : TBits_1; inline;
  12542. procedure setBMXEF(thebits : TBits_1); inline;
  12543. procedure setBTOEF(thebits : TBits_1); inline;
  12544. procedure setBTSEF(thebits : TBits_1); inline;
  12545. procedure setCRC16EF(thebits : TBits_1); inline;
  12546. procedure setCRC5EF(thebits : TBits_1); inline;
  12547. procedure setCRC5EF_EOFEF(thebits : TBits_1); inline;
  12548. procedure setDFN8EF(thebits : TBits_1); inline;
  12549. procedure setDMAEF(thebits : TBits_1); inline;
  12550. procedure setEOFEF(thebits : TBits_1); inline;
  12551. procedure setPIDEF(thebits : TBits_1); inline;
  12552. public
  12553. procedure clearBMXEF; inline;
  12554. procedure clearBTOEF; inline;
  12555. procedure clearBTSEF; inline;
  12556. procedure clearCRC16EF; inline;
  12557. procedure clearCRC5EF; inline;
  12558. procedure clearCRC5EF_EOFEF; inline;
  12559. procedure clearDFN8EF; inline;
  12560. procedure clearDMAEF; inline;
  12561. procedure clearEOFEF; inline;
  12562. procedure clearPIDEF; inline;
  12563. procedure setBMXEF; inline;
  12564. procedure setBTOEF; inline;
  12565. procedure setBTSEF; inline;
  12566. procedure setCRC16EF; inline;
  12567. procedure setCRC5EF; inline;
  12568. procedure setCRC5EF_EOFEF; inline;
  12569. procedure setDFN8EF; inline;
  12570. procedure setDMAEF; inline;
  12571. procedure setEOFEF; inline;
  12572. procedure setPIDEF; inline;
  12573. property BMXEF : TBits_1 read getBMXEF write setBMXEF;
  12574. property BTOEF : TBits_1 read getBTOEF write setBTOEF;
  12575. property BTSEF : TBits_1 read getBTSEF write setBTSEF;
  12576. property CRC16EF : TBits_1 read getCRC16EF write setCRC16EF;
  12577. property CRC5EF : TBits_1 read getCRC5EF write setCRC5EF;
  12578. property CRC5EF_EOFEF : TBits_1 read getCRC5EF_EOFEF write setCRC5EF_EOFEF;
  12579. property DFN8EF : TBits_1 read getDFN8EF write setDFN8EF;
  12580. property DMAEF : TBits_1 read getDMAEF write setDMAEF;
  12581. property EOFEF : TBits_1 read getEOFEF write setEOFEF;
  12582. property PIDEF : TBits_1 read getPIDEF write setPIDEF;
  12583. end;
  12584. TUSB_U1EIE = record
  12585. private
  12586. function getBMXEE : TBits_1; inline;
  12587. function getBTOEE : TBits_1; inline;
  12588. function getBTSEE : TBits_1; inline;
  12589. function getCRC16EE : TBits_1; inline;
  12590. function getCRC5EE : TBits_1; inline;
  12591. function getCRC5EE_EOFEE : TBits_1; inline;
  12592. function getDFN8EE : TBits_1; inline;
  12593. function getDMAEE : TBits_1; inline;
  12594. function getEOFEE : TBits_1; inline;
  12595. function getPIDEE : TBits_1; inline;
  12596. procedure setBMXEE(thebits : TBits_1); inline;
  12597. procedure setBTOEE(thebits : TBits_1); inline;
  12598. procedure setBTSEE(thebits : TBits_1); inline;
  12599. procedure setCRC16EE(thebits : TBits_1); inline;
  12600. procedure setCRC5EE(thebits : TBits_1); inline;
  12601. procedure setCRC5EE_EOFEE(thebits : TBits_1); inline;
  12602. procedure setDFN8EE(thebits : TBits_1); inline;
  12603. procedure setDMAEE(thebits : TBits_1); inline;
  12604. procedure setEOFEE(thebits : TBits_1); inline;
  12605. procedure setPIDEE(thebits : TBits_1); inline;
  12606. public
  12607. procedure clearBMXEE; inline;
  12608. procedure clearBTOEE; inline;
  12609. procedure clearBTSEE; inline;
  12610. procedure clearCRC16EE; inline;
  12611. procedure clearCRC5EE; inline;
  12612. procedure clearCRC5EE_EOFEE; inline;
  12613. procedure clearDFN8EE; inline;
  12614. procedure clearDMAEE; inline;
  12615. procedure clearEOFEE; inline;
  12616. procedure clearPIDEE; inline;
  12617. procedure setBMXEE; inline;
  12618. procedure setBTOEE; inline;
  12619. procedure setBTSEE; inline;
  12620. procedure setCRC16EE; inline;
  12621. procedure setCRC5EE; inline;
  12622. procedure setCRC5EE_EOFEE; inline;
  12623. procedure setDFN8EE; inline;
  12624. procedure setDMAEE; inline;
  12625. procedure setEOFEE; inline;
  12626. procedure setPIDEE; inline;
  12627. property BMXEE : TBits_1 read getBMXEE write setBMXEE;
  12628. property BTOEE : TBits_1 read getBTOEE write setBTOEE;
  12629. property BTSEE : TBits_1 read getBTSEE write setBTSEE;
  12630. property CRC16EE : TBits_1 read getCRC16EE write setCRC16EE;
  12631. property CRC5EE : TBits_1 read getCRC5EE write setCRC5EE;
  12632. property CRC5EE_EOFEE : TBits_1 read getCRC5EE_EOFEE write setCRC5EE_EOFEE;
  12633. property DFN8EE : TBits_1 read getDFN8EE write setDFN8EE;
  12634. property DMAEE : TBits_1 read getDMAEE write setDMAEE;
  12635. property EOFEE : TBits_1 read getEOFEE write setEOFEE;
  12636. property PIDEE : TBits_1 read getPIDEE write setPIDEE;
  12637. end;
  12638. TUSB_U1STAT = record
  12639. private
  12640. function getDIR : TBits_1; inline;
  12641. function getENDPT : TBits_4; inline;
  12642. function getENDPT0 : TBits_1; inline;
  12643. function getENDPT1 : TBits_1; inline;
  12644. function getENDPT2 : TBits_1; inline;
  12645. function getENDPT3 : TBits_1; inline;
  12646. function getPPBI : TBits_1; inline;
  12647. procedure setDIR(thebits : TBits_1); inline;
  12648. procedure setENDPT(thebits : TBits_4); inline;
  12649. procedure setENDPT0(thebits : TBits_1); inline;
  12650. procedure setENDPT1(thebits : TBits_1); inline;
  12651. procedure setENDPT2(thebits : TBits_1); inline;
  12652. procedure setENDPT3(thebits : TBits_1); inline;
  12653. procedure setPPBI(thebits : TBits_1); inline;
  12654. public
  12655. procedure clearDIR; inline;
  12656. procedure clearENDPT0; inline;
  12657. procedure clearENDPT1; inline;
  12658. procedure clearENDPT2; inline;
  12659. procedure clearENDPT3; inline;
  12660. procedure clearPPBI; inline;
  12661. procedure setDIR; inline;
  12662. procedure setENDPT0; inline;
  12663. procedure setENDPT1; inline;
  12664. procedure setENDPT2; inline;
  12665. procedure setENDPT3; inline;
  12666. procedure setPPBI; inline;
  12667. property DIR : TBits_1 read getDIR write setDIR;
  12668. property ENDPT : TBits_4 read getENDPT write setENDPT;
  12669. property ENDPT0 : TBits_1 read getENDPT0 write setENDPT0;
  12670. property ENDPT1 : TBits_1 read getENDPT1 write setENDPT1;
  12671. property ENDPT2 : TBits_1 read getENDPT2 write setENDPT2;
  12672. property ENDPT3 : TBits_1 read getENDPT3 write setENDPT3;
  12673. property PPBI : TBits_1 read getPPBI write setPPBI;
  12674. end;
  12675. TUSB_U1CON = record
  12676. private
  12677. function getHOSTEN : TBits_1; inline;
  12678. function getJSTATE : TBits_1; inline;
  12679. function getPKTDIS : TBits_1; inline;
  12680. function getPKTDIS_TOKBUSY : TBits_1; inline;
  12681. function getPPBRST : TBits_1; inline;
  12682. function getRESUME : TBits_1; inline;
  12683. function getSE0 : TBits_1; inline;
  12684. function getSOFEN : TBits_1; inline;
  12685. function getTOKBUSY : TBits_1; inline;
  12686. function getUSBEN : TBits_1; inline;
  12687. function getUSBEN_SOFEN : TBits_1; inline;
  12688. function getUSBRST : TBits_1; inline;
  12689. procedure setHOSTEN(thebits : TBits_1); inline;
  12690. procedure setJSTATE(thebits : TBits_1); inline;
  12691. procedure setPKTDIS(thebits : TBits_1); inline;
  12692. procedure setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  12693. procedure setPPBRST(thebits : TBits_1); inline;
  12694. procedure setRESUME(thebits : TBits_1); inline;
  12695. procedure setSE0(thebits : TBits_1); inline;
  12696. procedure setSOFEN(thebits : TBits_1); inline;
  12697. procedure setTOKBUSY(thebits : TBits_1); inline;
  12698. procedure setUSBEN(thebits : TBits_1); inline;
  12699. procedure setUSBEN_SOFEN(thebits : TBits_1); inline;
  12700. procedure setUSBRST(thebits : TBits_1); inline;
  12701. public
  12702. procedure clearHOSTEN; inline;
  12703. procedure clearJSTATE; inline;
  12704. procedure clearPKTDIS; inline;
  12705. procedure clearPKTDIS_TOKBUSY; inline;
  12706. procedure clearPPBRST; inline;
  12707. procedure clearRESUME; inline;
  12708. procedure clearSE0; inline;
  12709. procedure clearSOFEN; inline;
  12710. procedure clearTOKBUSY; inline;
  12711. procedure clearUSBEN; inline;
  12712. procedure clearUSBEN_SOFEN; inline;
  12713. procedure clearUSBRST; inline;
  12714. procedure setHOSTEN; inline;
  12715. procedure setJSTATE; inline;
  12716. procedure setPKTDIS; inline;
  12717. procedure setPKTDIS_TOKBUSY; inline;
  12718. procedure setPPBRST; inline;
  12719. procedure setRESUME; inline;
  12720. procedure setSE0; inline;
  12721. procedure setSOFEN; inline;
  12722. procedure setTOKBUSY; inline;
  12723. procedure setUSBEN; inline;
  12724. procedure setUSBEN_SOFEN; inline;
  12725. procedure setUSBRST; inline;
  12726. property HOSTEN : TBits_1 read getHOSTEN write setHOSTEN;
  12727. property JSTATE : TBits_1 read getJSTATE write setJSTATE;
  12728. property PKTDIS : TBits_1 read getPKTDIS write setPKTDIS;
  12729. property PKTDIS_TOKBUSY : TBits_1 read getPKTDIS_TOKBUSY write setPKTDIS_TOKBUSY;
  12730. property PPBRST : TBits_1 read getPPBRST write setPPBRST;
  12731. property RESUME : TBits_1 read getRESUME write setRESUME;
  12732. property SE0 : TBits_1 read getSE0 write setSE0;
  12733. property SOFEN : TBits_1 read getSOFEN write setSOFEN;
  12734. property TOKBUSY : TBits_1 read getTOKBUSY write setTOKBUSY;
  12735. property USBEN : TBits_1 read getUSBEN write setUSBEN;
  12736. property USBEN_SOFEN : TBits_1 read getUSBEN_SOFEN write setUSBEN_SOFEN;
  12737. property USBRST : TBits_1 read getUSBRST write setUSBRST;
  12738. end;
  12739. TUSB_U1ADDR = record
  12740. private
  12741. function getDEVADDR : TBits_7; inline;
  12742. function getDEVADDR0 : TBits_1; inline;
  12743. function getDEVADDR1 : TBits_1; inline;
  12744. function getDEVADDR2 : TBits_1; inline;
  12745. function getDEVADDR3 : TBits_1; inline;
  12746. function getDEVADDR4 : TBits_1; inline;
  12747. function getDEVADDR5 : TBits_1; inline;
  12748. function getDEVADDR6 : TBits_1; inline;
  12749. function getLSPDEN : TBits_1; inline;
  12750. procedure setDEVADDR(thebits : TBits_7); inline;
  12751. procedure setDEVADDR0(thebits : TBits_1); inline;
  12752. procedure setDEVADDR1(thebits : TBits_1); inline;
  12753. procedure setDEVADDR2(thebits : TBits_1); inline;
  12754. procedure setDEVADDR3(thebits : TBits_1); inline;
  12755. procedure setDEVADDR4(thebits : TBits_1); inline;
  12756. procedure setDEVADDR5(thebits : TBits_1); inline;
  12757. procedure setDEVADDR6(thebits : TBits_1); inline;
  12758. procedure setLSPDEN(thebits : TBits_1); inline;
  12759. public
  12760. procedure clearDEVADDR0; inline;
  12761. procedure clearDEVADDR1; inline;
  12762. procedure clearDEVADDR2; inline;
  12763. procedure clearDEVADDR3; inline;
  12764. procedure clearDEVADDR4; inline;
  12765. procedure clearDEVADDR5; inline;
  12766. procedure clearDEVADDR6; inline;
  12767. procedure clearLSPDEN; inline;
  12768. procedure setDEVADDR0; inline;
  12769. procedure setDEVADDR1; inline;
  12770. procedure setDEVADDR2; inline;
  12771. procedure setDEVADDR3; inline;
  12772. procedure setDEVADDR4; inline;
  12773. procedure setDEVADDR5; inline;
  12774. procedure setDEVADDR6; inline;
  12775. procedure setLSPDEN; inline;
  12776. property DEVADDR : TBits_7 read getDEVADDR write setDEVADDR;
  12777. property DEVADDR0 : TBits_1 read getDEVADDR0 write setDEVADDR0;
  12778. property DEVADDR1 : TBits_1 read getDEVADDR1 write setDEVADDR1;
  12779. property DEVADDR2 : TBits_1 read getDEVADDR2 write setDEVADDR2;
  12780. property DEVADDR3 : TBits_1 read getDEVADDR3 write setDEVADDR3;
  12781. property DEVADDR4 : TBits_1 read getDEVADDR4 write setDEVADDR4;
  12782. property DEVADDR5 : TBits_1 read getDEVADDR5 write setDEVADDR5;
  12783. property DEVADDR6 : TBits_1 read getDEVADDR6 write setDEVADDR6;
  12784. property LSPDEN : TBits_1 read getLSPDEN write setLSPDEN;
  12785. end;
  12786. TUSB_U1FRML = record
  12787. private
  12788. function getFRM0 : TBits_1; inline;
  12789. function getFRM1 : TBits_1; inline;
  12790. function getFRM2 : TBits_1; inline;
  12791. function getFRM3 : TBits_1; inline;
  12792. function getFRM4 : TBits_1; inline;
  12793. function getFRM5 : TBits_1; inline;
  12794. function getFRM6 : TBits_1; inline;
  12795. function getFRM7 : TBits_1; inline;
  12796. function getFRML : TBits_8; inline;
  12797. procedure setFRM0(thebits : TBits_1); inline;
  12798. procedure setFRM1(thebits : TBits_1); inline;
  12799. procedure setFRM2(thebits : TBits_1); inline;
  12800. procedure setFRM3(thebits : TBits_1); inline;
  12801. procedure setFRM4(thebits : TBits_1); inline;
  12802. procedure setFRM5(thebits : TBits_1); inline;
  12803. procedure setFRM6(thebits : TBits_1); inline;
  12804. procedure setFRM7(thebits : TBits_1); inline;
  12805. procedure setFRML(thebits : TBits_8); inline;
  12806. public
  12807. procedure clearFRM0; inline;
  12808. procedure clearFRM1; inline;
  12809. procedure clearFRM2; inline;
  12810. procedure clearFRM3; inline;
  12811. procedure clearFRM4; inline;
  12812. procedure clearFRM5; inline;
  12813. procedure clearFRM6; inline;
  12814. procedure clearFRM7; inline;
  12815. procedure setFRM0; inline;
  12816. procedure setFRM1; inline;
  12817. procedure setFRM2; inline;
  12818. procedure setFRM3; inline;
  12819. procedure setFRM4; inline;
  12820. procedure setFRM5; inline;
  12821. procedure setFRM6; inline;
  12822. procedure setFRM7; inline;
  12823. property FRM0 : TBits_1 read getFRM0 write setFRM0;
  12824. property FRM1 : TBits_1 read getFRM1 write setFRM1;
  12825. property FRM2 : TBits_1 read getFRM2 write setFRM2;
  12826. property FRM3 : TBits_1 read getFRM3 write setFRM3;
  12827. property FRM4 : TBits_1 read getFRM4 write setFRM4;
  12828. property FRM5 : TBits_1 read getFRM5 write setFRM5;
  12829. property FRM6 : TBits_1 read getFRM6 write setFRM6;
  12830. property FRM7 : TBits_1 read getFRM7 write setFRM7;
  12831. property FRML : TBits_8 read getFRML write setFRML;
  12832. end;
  12833. TUSB_U1FRMH = record
  12834. private
  12835. function getFRM10 : TBits_1; inline;
  12836. function getFRM8 : TBits_1; inline;
  12837. function getFRM9 : TBits_1; inline;
  12838. function getFRMH : TBits_3; inline;
  12839. procedure setFRM10(thebits : TBits_1); inline;
  12840. procedure setFRM8(thebits : TBits_1); inline;
  12841. procedure setFRM9(thebits : TBits_1); inline;
  12842. procedure setFRMH(thebits : TBits_3); inline;
  12843. public
  12844. procedure clearFRM10; inline;
  12845. procedure clearFRM8; inline;
  12846. procedure clearFRM9; inline;
  12847. procedure setFRM10; inline;
  12848. procedure setFRM8; inline;
  12849. procedure setFRM9; inline;
  12850. property FRM10 : TBits_1 read getFRM10 write setFRM10;
  12851. property FRM8 : TBits_1 read getFRM8 write setFRM8;
  12852. property FRM9 : TBits_1 read getFRM9 write setFRM9;
  12853. property FRMH : TBits_3 read getFRMH write setFRMH;
  12854. end;
  12855. TUSB_U1TOK = record
  12856. private
  12857. function getEP : TBits_4; inline;
  12858. function getEP0 : TBits_1; inline;
  12859. function getEP1 : TBits_1; inline;
  12860. function getEP2 : TBits_1; inline;
  12861. function getEP3 : TBits_1; inline;
  12862. function getPID : TBits_4; inline;
  12863. function getPID0 : TBits_1; inline;
  12864. function getPID1 : TBits_1; inline;
  12865. function getPID2 : TBits_1; inline;
  12866. function getPID3 : TBits_1; inline;
  12867. procedure setEP(thebits : TBits_4); inline;
  12868. procedure setEP0(thebits : TBits_1); inline;
  12869. procedure setEP1(thebits : TBits_1); inline;
  12870. procedure setEP2(thebits : TBits_1); inline;
  12871. procedure setEP3(thebits : TBits_1); inline;
  12872. procedure setPID(thebits : TBits_4); inline;
  12873. procedure setPID0(thebits : TBits_1); inline;
  12874. procedure setPID1(thebits : TBits_1); inline;
  12875. procedure setPID2(thebits : TBits_1); inline;
  12876. procedure setPID3(thebits : TBits_1); inline;
  12877. public
  12878. procedure clearEP0; inline;
  12879. procedure clearEP1; inline;
  12880. procedure clearEP2; inline;
  12881. procedure clearEP3; inline;
  12882. procedure clearPID0; inline;
  12883. procedure clearPID1; inline;
  12884. procedure clearPID2; inline;
  12885. procedure clearPID3; inline;
  12886. procedure setEP0; inline;
  12887. procedure setEP1; inline;
  12888. procedure setEP2; inline;
  12889. procedure setEP3; inline;
  12890. procedure setPID0; inline;
  12891. procedure setPID1; inline;
  12892. procedure setPID2; inline;
  12893. procedure setPID3; inline;
  12894. property EP : TBits_4 read getEP write setEP;
  12895. property EP0 : TBits_1 read getEP0 write setEP0;
  12896. property EP1 : TBits_1 read getEP1 write setEP1;
  12897. property EP2 : TBits_1 read getEP2 write setEP2;
  12898. property EP3 : TBits_1 read getEP3 write setEP3;
  12899. property PID : TBits_4 read getPID write setPID;
  12900. property PID0 : TBits_1 read getPID0 write setPID0;
  12901. property PID1 : TBits_1 read getPID1 write setPID1;
  12902. property PID2 : TBits_1 read getPID2 write setPID2;
  12903. property PID3 : TBits_1 read getPID3 write setPID3;
  12904. end;
  12905. type
  12906. TUSBRegisters = record
  12907. U1OTGIR : longWord;
  12908. U1OTGIRCLR : longWord;
  12909. U1OTGIE : longWord;
  12910. U1OTGIECLR : longWord;
  12911. U1OTGIESET : longWord;
  12912. U1OTGIEINV : longWord;
  12913. U1OTGSTAT : longWord;
  12914. U1OTGCON : longWord;
  12915. U1OTGCONCLR : longWord;
  12916. U1OTGCONSET : longWord;
  12917. U1OTGCONINV : longWord;
  12918. U1PWRC : longWord;
  12919. U1PWRCCLR : longWord;
  12920. U1PWRCSET : longWord;
  12921. U1PWRCINV : longWord;
  12922. U1IRbits : TUSB_U1IR;
  12923. U1IR : longWord;
  12924. U1IRCLR : longWord;
  12925. U1IEbits : TUSB_U1IE;
  12926. U1IE : longWord;
  12927. U1IECLR : longWord;
  12928. U1IESET : longWord;
  12929. U1IEINV : longWord;
  12930. U1EIRbits : TUSB_U1EIR;
  12931. U1EIR : longWord;
  12932. U1EIRCLR : longWord;
  12933. U1EIEbits : TUSB_U1EIE;
  12934. U1EIE : longWord;
  12935. U1EIECLR : longWord;
  12936. U1EIESET : longWord;
  12937. U1EIEINV : longWord;
  12938. U1STATbits : TUSB_U1STAT;
  12939. U1STAT : longWord;
  12940. U1CONbits : TUSB_U1CON;
  12941. U1CON : longWord;
  12942. U1CONCLR : longWord;
  12943. U1CONSET : longWord;
  12944. U1CONINV : longWord;
  12945. U1ADDRbits : TUSB_U1ADDR;
  12946. U1ADDR : longWord;
  12947. U1ADDRCLR : longWord;
  12948. U1ADDRSET : longWord;
  12949. U1ADDRINV : longWord;
  12950. U1BDTP1 : longWord;
  12951. U1BDTP1CLR : longWord;
  12952. U1BDTP1SET : longWord;
  12953. U1BDTP1INV : longWord;
  12954. U1FRMLbits : TUSB_U1FRML;
  12955. U1FRML : longWord;
  12956. U1FRMHbits : TUSB_U1FRMH;
  12957. U1FRMH : longWord;
  12958. U1TOKbits : TUSB_U1TOK;
  12959. U1TOK : longWord;
  12960. U1TOKCLR : longWord;
  12961. U1TOKSET : longWord;
  12962. U1TOKINV : longWord;
  12963. U1SOF : longWord;
  12964. U1SOFCLR : longWord;
  12965. U1SOFSET : longWord;
  12966. U1SOFINV : longWord;
  12967. U1BDTP2 : longWord;
  12968. U1BDTP2CLR : longWord;
  12969. U1BDTP2SET : longWord;
  12970. U1BDTP2INV : longWord;
  12971. U1BDTP3 : longWord;
  12972. U1BDTP3CLR : longWord;
  12973. U1BDTP3SET : longWord;
  12974. U1BDTP3INV : longWord;
  12975. U1CNFG1 : longWord;
  12976. U1CNFG1CLR : longWord;
  12977. U1CNFG1SET : longWord;
  12978. U1CNFG1INV : longWord;
  12979. U1EP0 : longWord;
  12980. U1EP0CLR : longWord;
  12981. U1EP0SET : longWord;
  12982. U1EP0INV : longWord;
  12983. U1EP1 : longWord;
  12984. U1EP1CLR : longWord;
  12985. U1EP1SET : longWord;
  12986. U1EP1INV : longWord;
  12987. U1EP2 : longWord;
  12988. U1EP2CLR : longWord;
  12989. U1EP2SET : longWord;
  12990. U1EP2INV : longWord;
  12991. U1EP3 : longWord;
  12992. U1EP3CLR : longWord;
  12993. U1EP3SET : longWord;
  12994. U1EP3INV : longWord;
  12995. U1EP4 : longWord;
  12996. U1EP4CLR : longWord;
  12997. U1EP4SET : longWord;
  12998. U1EP4INV : longWord;
  12999. U1EP5 : longWord;
  13000. U1EP5CLR : longWord;
  13001. U1EP5SET : longWord;
  13002. U1EP5INV : longWord;
  13003. U1EP6 : longWord;
  13004. U1EP6CLR : longWord;
  13005. U1EP6SET : longWord;
  13006. U1EP6INV : longWord;
  13007. U1EP7 : longWord;
  13008. U1EP7CLR : longWord;
  13009. U1EP7SET : longWord;
  13010. U1EP7INV : longWord;
  13011. U1EP8 : longWord;
  13012. U1EP8CLR : longWord;
  13013. U1EP8SET : longWord;
  13014. U1EP8INV : longWord;
  13015. U1EP9 : longWord;
  13016. U1EP9CLR : longWord;
  13017. U1EP9SET : longWord;
  13018. U1EP9INV : longWord;
  13019. U1EP10 : longWord;
  13020. U1EP10CLR : longWord;
  13021. U1EP10SET : longWord;
  13022. U1EP10INV : longWord;
  13023. U1EP11 : longWord;
  13024. U1EP11CLR : longWord;
  13025. U1EP11SET : longWord;
  13026. U1EP11INV : longWord;
  13027. U1EP12 : longWord;
  13028. U1EP12CLR : longWord;
  13029. U1EP12SET : longWord;
  13030. U1EP12INV : longWord;
  13031. U1EP13 : longWord;
  13032. U1EP13CLR : longWord;
  13033. U1EP13SET : longWord;
  13034. U1EP13INV : longWord;
  13035. U1EP14 : longWord;
  13036. U1EP14CLR : longWord;
  13037. U1EP14SET : longWord;
  13038. U1EP14INV : longWord;
  13039. U1EP15 : longWord;
  13040. U1EP15CLR : longWord;
  13041. U1EP15SET : longWord;
  13042. U1EP15INV : longWord;
  13043. end;
  13044. TPORTA_TRISA = record
  13045. private
  13046. function getTRISA0 : TBits_1; inline;
  13047. function getTRISA1 : TBits_1; inline;
  13048. function getTRISA10 : TBits_1; inline;
  13049. function getTRISA14 : TBits_1; inline;
  13050. function getTRISA15 : TBits_1; inline;
  13051. function getTRISA2 : TBits_1; inline;
  13052. function getTRISA3 : TBits_1; inline;
  13053. function getTRISA4 : TBits_1; inline;
  13054. function getTRISA5 : TBits_1; inline;
  13055. function getTRISA6 : TBits_1; inline;
  13056. function getTRISA7 : TBits_1; inline;
  13057. function getTRISA9 : TBits_1; inline;
  13058. function getw : TBits_32; inline;
  13059. procedure setTRISA0(thebits : TBits_1); inline;
  13060. procedure setTRISA1(thebits : TBits_1); inline;
  13061. procedure setTRISA10(thebits : TBits_1); inline;
  13062. procedure setTRISA14(thebits : TBits_1); inline;
  13063. procedure setTRISA15(thebits : TBits_1); inline;
  13064. procedure setTRISA2(thebits : TBits_1); inline;
  13065. procedure setTRISA3(thebits : TBits_1); inline;
  13066. procedure setTRISA4(thebits : TBits_1); inline;
  13067. procedure setTRISA5(thebits : TBits_1); inline;
  13068. procedure setTRISA6(thebits : TBits_1); inline;
  13069. procedure setTRISA7(thebits : TBits_1); inline;
  13070. procedure setTRISA9(thebits : TBits_1); inline;
  13071. procedure setw(thebits : TBits_32); inline;
  13072. public
  13073. procedure clearTRISA0; inline;
  13074. procedure clearTRISA10; inline;
  13075. procedure clearTRISA14; inline;
  13076. procedure clearTRISA15; inline;
  13077. procedure clearTRISA1; inline;
  13078. procedure clearTRISA2; inline;
  13079. procedure clearTRISA3; inline;
  13080. procedure clearTRISA4; inline;
  13081. procedure clearTRISA5; inline;
  13082. procedure clearTRISA6; inline;
  13083. procedure clearTRISA7; inline;
  13084. procedure clearTRISA9; inline;
  13085. procedure setTRISA0; inline;
  13086. procedure setTRISA10; inline;
  13087. procedure setTRISA14; inline;
  13088. procedure setTRISA15; inline;
  13089. procedure setTRISA1; inline;
  13090. procedure setTRISA2; inline;
  13091. procedure setTRISA3; inline;
  13092. procedure setTRISA4; inline;
  13093. procedure setTRISA5; inline;
  13094. procedure setTRISA6; inline;
  13095. procedure setTRISA7; inline;
  13096. procedure setTRISA9; inline;
  13097. property TRISA0 : TBits_1 read getTRISA0 write setTRISA0;
  13098. property TRISA1 : TBits_1 read getTRISA1 write setTRISA1;
  13099. property TRISA10 : TBits_1 read getTRISA10 write setTRISA10;
  13100. property TRISA14 : TBits_1 read getTRISA14 write setTRISA14;
  13101. property TRISA15 : TBits_1 read getTRISA15 write setTRISA15;
  13102. property TRISA2 : TBits_1 read getTRISA2 write setTRISA2;
  13103. property TRISA3 : TBits_1 read getTRISA3 write setTRISA3;
  13104. property TRISA4 : TBits_1 read getTRISA4 write setTRISA4;
  13105. property TRISA5 : TBits_1 read getTRISA5 write setTRISA5;
  13106. property TRISA6 : TBits_1 read getTRISA6 write setTRISA6;
  13107. property TRISA7 : TBits_1 read getTRISA7 write setTRISA7;
  13108. property TRISA9 : TBits_1 read getTRISA9 write setTRISA9;
  13109. property w : TBits_32 read getw write setw;
  13110. end;
  13111. TPORTA_PORTA = record
  13112. private
  13113. function getRA0 : TBits_1; inline;
  13114. function getRA1 : TBits_1; inline;
  13115. function getRA10 : TBits_1; inline;
  13116. function getRA14 : TBits_1; inline;
  13117. function getRA15 : TBits_1; inline;
  13118. function getRA2 : TBits_1; inline;
  13119. function getRA3 : TBits_1; inline;
  13120. function getRA4 : TBits_1; inline;
  13121. function getRA5 : TBits_1; inline;
  13122. function getRA6 : TBits_1; inline;
  13123. function getRA7 : TBits_1; inline;
  13124. function getRA9 : TBits_1; inline;
  13125. function getw : TBits_32; inline;
  13126. procedure setRA0(thebits : TBits_1); inline;
  13127. procedure setRA1(thebits : TBits_1); inline;
  13128. procedure setRA10(thebits : TBits_1); inline;
  13129. procedure setRA14(thebits : TBits_1); inline;
  13130. procedure setRA15(thebits : TBits_1); inline;
  13131. procedure setRA2(thebits : TBits_1); inline;
  13132. procedure setRA3(thebits : TBits_1); inline;
  13133. procedure setRA4(thebits : TBits_1); inline;
  13134. procedure setRA5(thebits : TBits_1); inline;
  13135. procedure setRA6(thebits : TBits_1); inline;
  13136. procedure setRA7(thebits : TBits_1); inline;
  13137. procedure setRA9(thebits : TBits_1); inline;
  13138. procedure setw(thebits : TBits_32); inline;
  13139. public
  13140. procedure clearRA0; inline;
  13141. procedure clearRA10; inline;
  13142. procedure clearRA14; inline;
  13143. procedure clearRA15; inline;
  13144. procedure clearRA1; inline;
  13145. procedure clearRA2; inline;
  13146. procedure clearRA3; inline;
  13147. procedure clearRA4; inline;
  13148. procedure clearRA5; inline;
  13149. procedure clearRA6; inline;
  13150. procedure clearRA7; inline;
  13151. procedure clearRA9; inline;
  13152. procedure setRA0; inline;
  13153. procedure setRA10; inline;
  13154. procedure setRA14; inline;
  13155. procedure setRA15; inline;
  13156. procedure setRA1; inline;
  13157. procedure setRA2; inline;
  13158. procedure setRA3; inline;
  13159. procedure setRA4; inline;
  13160. procedure setRA5; inline;
  13161. procedure setRA6; inline;
  13162. procedure setRA7; inline;
  13163. procedure setRA9; inline;
  13164. property RA0 : TBits_1 read getRA0 write setRA0;
  13165. property RA1 : TBits_1 read getRA1 write setRA1;
  13166. property RA10 : TBits_1 read getRA10 write setRA10;
  13167. property RA14 : TBits_1 read getRA14 write setRA14;
  13168. property RA15 : TBits_1 read getRA15 write setRA15;
  13169. property RA2 : TBits_1 read getRA2 write setRA2;
  13170. property RA3 : TBits_1 read getRA3 write setRA3;
  13171. property RA4 : TBits_1 read getRA4 write setRA4;
  13172. property RA5 : TBits_1 read getRA5 write setRA5;
  13173. property RA6 : TBits_1 read getRA6 write setRA6;
  13174. property RA7 : TBits_1 read getRA7 write setRA7;
  13175. property RA9 : TBits_1 read getRA9 write setRA9;
  13176. property w : TBits_32 read getw write setw;
  13177. end;
  13178. TPortA_bits=(RA0=0,RA1=1,RA2=2,RA3=3,RA4=4,RA5=5,RA6=6,RA7=7,RA9=9,RA10=10,RA14=14,RA15=15);
  13179. TPortA_bitset = set of TPortA_bits;
  13180. TPORTA_LATA = record
  13181. private
  13182. function getLATA0 : TBits_1; inline;
  13183. function getLATA1 : TBits_1; inline;
  13184. function getLATA10 : TBits_1; inline;
  13185. function getLATA14 : TBits_1; inline;
  13186. function getLATA15 : TBits_1; inline;
  13187. function getLATA2 : TBits_1; inline;
  13188. function getLATA3 : TBits_1; inline;
  13189. function getLATA4 : TBits_1; inline;
  13190. function getLATA5 : TBits_1; inline;
  13191. function getLATA6 : TBits_1; inline;
  13192. function getLATA7 : TBits_1; inline;
  13193. function getLATA9 : TBits_1; inline;
  13194. function getw : TBits_32; inline;
  13195. procedure setLATA0(thebits : TBits_1); inline;
  13196. procedure setLATA1(thebits : TBits_1); inline;
  13197. procedure setLATA10(thebits : TBits_1); inline;
  13198. procedure setLATA14(thebits : TBits_1); inline;
  13199. procedure setLATA15(thebits : TBits_1); inline;
  13200. procedure setLATA2(thebits : TBits_1); inline;
  13201. procedure setLATA3(thebits : TBits_1); inline;
  13202. procedure setLATA4(thebits : TBits_1); inline;
  13203. procedure setLATA5(thebits : TBits_1); inline;
  13204. procedure setLATA6(thebits : TBits_1); inline;
  13205. procedure setLATA7(thebits : TBits_1); inline;
  13206. procedure setLATA9(thebits : TBits_1); inline;
  13207. procedure setw(thebits : TBits_32); inline;
  13208. public
  13209. procedure clearLATA0; inline;
  13210. procedure clearLATA10; inline;
  13211. procedure clearLATA14; inline;
  13212. procedure clearLATA15; inline;
  13213. procedure clearLATA1; inline;
  13214. procedure clearLATA2; inline;
  13215. procedure clearLATA3; inline;
  13216. procedure clearLATA4; inline;
  13217. procedure clearLATA5; inline;
  13218. procedure clearLATA6; inline;
  13219. procedure clearLATA7; inline;
  13220. procedure clearLATA9; inline;
  13221. procedure setLATA0; inline;
  13222. procedure setLATA10; inline;
  13223. procedure setLATA14; inline;
  13224. procedure setLATA15; inline;
  13225. procedure setLATA1; inline;
  13226. procedure setLATA2; inline;
  13227. procedure setLATA3; inline;
  13228. procedure setLATA4; inline;
  13229. procedure setLATA5; inline;
  13230. procedure setLATA6; inline;
  13231. procedure setLATA7; inline;
  13232. procedure setLATA9; inline;
  13233. property LATA0 : TBits_1 read getLATA0 write setLATA0;
  13234. property LATA1 : TBits_1 read getLATA1 write setLATA1;
  13235. property LATA10 : TBits_1 read getLATA10 write setLATA10;
  13236. property LATA14 : TBits_1 read getLATA14 write setLATA14;
  13237. property LATA15 : TBits_1 read getLATA15 write setLATA15;
  13238. property LATA2 : TBits_1 read getLATA2 write setLATA2;
  13239. property LATA3 : TBits_1 read getLATA3 write setLATA3;
  13240. property LATA4 : TBits_1 read getLATA4 write setLATA4;
  13241. property LATA5 : TBits_1 read getLATA5 write setLATA5;
  13242. property LATA6 : TBits_1 read getLATA6 write setLATA6;
  13243. property LATA7 : TBits_1 read getLATA7 write setLATA7;
  13244. property LATA9 : TBits_1 read getLATA9 write setLATA9;
  13245. property w : TBits_32 read getw write setw;
  13246. end;
  13247. TPORTA_ODCA = record
  13248. private
  13249. function getODCA0 : TBits_1; inline;
  13250. function getODCA1 : TBits_1; inline;
  13251. function getODCA10 : TBits_1; inline;
  13252. function getODCA14 : TBits_1; inline;
  13253. function getODCA15 : TBits_1; inline;
  13254. function getODCA2 : TBits_1; inline;
  13255. function getODCA3 : TBits_1; inline;
  13256. function getODCA4 : TBits_1; inline;
  13257. function getODCA5 : TBits_1; inline;
  13258. function getODCA6 : TBits_1; inline;
  13259. function getODCA7 : TBits_1; inline;
  13260. function getODCA9 : TBits_1; inline;
  13261. function getw : TBits_32; inline;
  13262. procedure setODCA0(thebits : TBits_1); inline;
  13263. procedure setODCA1(thebits : TBits_1); inline;
  13264. procedure setODCA10(thebits : TBits_1); inline;
  13265. procedure setODCA14(thebits : TBits_1); inline;
  13266. procedure setODCA15(thebits : TBits_1); inline;
  13267. procedure setODCA2(thebits : TBits_1); inline;
  13268. procedure setODCA3(thebits : TBits_1); inline;
  13269. procedure setODCA4(thebits : TBits_1); inline;
  13270. procedure setODCA5(thebits : TBits_1); inline;
  13271. procedure setODCA6(thebits : TBits_1); inline;
  13272. procedure setODCA7(thebits : TBits_1); inline;
  13273. procedure setODCA9(thebits : TBits_1); inline;
  13274. procedure setw(thebits : TBits_32); inline;
  13275. public
  13276. procedure clearODCA0; inline;
  13277. procedure clearODCA10; inline;
  13278. procedure clearODCA14; inline;
  13279. procedure clearODCA15; inline;
  13280. procedure clearODCA1; inline;
  13281. procedure clearODCA2; inline;
  13282. procedure clearODCA3; inline;
  13283. procedure clearODCA4; inline;
  13284. procedure clearODCA5; inline;
  13285. procedure clearODCA6; inline;
  13286. procedure clearODCA7; inline;
  13287. procedure clearODCA9; inline;
  13288. procedure setODCA0; inline;
  13289. procedure setODCA10; inline;
  13290. procedure setODCA14; inline;
  13291. procedure setODCA15; inline;
  13292. procedure setODCA1; inline;
  13293. procedure setODCA2; inline;
  13294. procedure setODCA3; inline;
  13295. procedure setODCA4; inline;
  13296. procedure setODCA5; inline;
  13297. procedure setODCA6; inline;
  13298. procedure setODCA7; inline;
  13299. procedure setODCA9; inline;
  13300. property ODCA0 : TBits_1 read getODCA0 write setODCA0;
  13301. property ODCA1 : TBits_1 read getODCA1 write setODCA1;
  13302. property ODCA10 : TBits_1 read getODCA10 write setODCA10;
  13303. property ODCA14 : TBits_1 read getODCA14 write setODCA14;
  13304. property ODCA15 : TBits_1 read getODCA15 write setODCA15;
  13305. property ODCA2 : TBits_1 read getODCA2 write setODCA2;
  13306. property ODCA3 : TBits_1 read getODCA3 write setODCA3;
  13307. property ODCA4 : TBits_1 read getODCA4 write setODCA4;
  13308. property ODCA5 : TBits_1 read getODCA5 write setODCA5;
  13309. property ODCA6 : TBits_1 read getODCA6 write setODCA6;
  13310. property ODCA7 : TBits_1 read getODCA7 write setODCA7;
  13311. property ODCA9 : TBits_1 read getODCA9 write setODCA9;
  13312. property w : TBits_32 read getw write setw;
  13313. end;
  13314. type
  13315. TPORTARegisters = record
  13316. TRISAbits : TPORTA_TRISA;
  13317. TRISA : longWord;
  13318. TRISACLR : longWord;
  13319. TRISASET : longWord;
  13320. TRISAINV : longWord;
  13321. PORTAbits : TPORTA_PORTA;
  13322. PORTA : longWord;
  13323. PORTACLR : longWord;
  13324. PORTASET : longWord;
  13325. PORTAINV : longWord;
  13326. LATAbits : TPORTA_LATA;
  13327. LATA : longWord;
  13328. LATACLR : longWord;
  13329. LATASET : longWord;
  13330. LATAINV : longWord;
  13331. ODCAbits : TPORTA_ODCA;
  13332. ODCA : longWord;
  13333. ODCACLR : longWord;
  13334. ODCASET : longWord;
  13335. ODCAINV : longWord;
  13336. end;
  13337. TPORTB_TRISB = record
  13338. private
  13339. function getTRISB0 : TBits_1; inline;
  13340. function getTRISB1 : TBits_1; inline;
  13341. function getTRISB10 : TBits_1; inline;
  13342. function getTRISB11 : TBits_1; inline;
  13343. function getTRISB12 : TBits_1; inline;
  13344. function getTRISB13 : TBits_1; inline;
  13345. function getTRISB14 : TBits_1; inline;
  13346. function getTRISB15 : TBits_1; inline;
  13347. function getTRISB2 : TBits_1; inline;
  13348. function getTRISB3 : TBits_1; inline;
  13349. function getTRISB4 : TBits_1; inline;
  13350. function getTRISB5 : TBits_1; inline;
  13351. function getTRISB6 : TBits_1; inline;
  13352. function getTRISB7 : TBits_1; inline;
  13353. function getTRISB8 : TBits_1; inline;
  13354. function getTRISB9 : TBits_1; inline;
  13355. function getw : TBits_32; inline;
  13356. procedure setTRISB0(thebits : TBits_1); inline;
  13357. procedure setTRISB1(thebits : TBits_1); inline;
  13358. procedure setTRISB10(thebits : TBits_1); inline;
  13359. procedure setTRISB11(thebits : TBits_1); inline;
  13360. procedure setTRISB12(thebits : TBits_1); inline;
  13361. procedure setTRISB13(thebits : TBits_1); inline;
  13362. procedure setTRISB14(thebits : TBits_1); inline;
  13363. procedure setTRISB15(thebits : TBits_1); inline;
  13364. procedure setTRISB2(thebits : TBits_1); inline;
  13365. procedure setTRISB3(thebits : TBits_1); inline;
  13366. procedure setTRISB4(thebits : TBits_1); inline;
  13367. procedure setTRISB5(thebits : TBits_1); inline;
  13368. procedure setTRISB6(thebits : TBits_1); inline;
  13369. procedure setTRISB7(thebits : TBits_1); inline;
  13370. procedure setTRISB8(thebits : TBits_1); inline;
  13371. procedure setTRISB9(thebits : TBits_1); inline;
  13372. procedure setw(thebits : TBits_32); inline;
  13373. public
  13374. procedure clearTRISB0; inline;
  13375. procedure clearTRISB10; inline;
  13376. procedure clearTRISB11; inline;
  13377. procedure clearTRISB12; inline;
  13378. procedure clearTRISB13; inline;
  13379. procedure clearTRISB14; inline;
  13380. procedure clearTRISB15; inline;
  13381. procedure clearTRISB1; inline;
  13382. procedure clearTRISB2; inline;
  13383. procedure clearTRISB3; inline;
  13384. procedure clearTRISB4; inline;
  13385. procedure clearTRISB5; inline;
  13386. procedure clearTRISB6; inline;
  13387. procedure clearTRISB7; inline;
  13388. procedure clearTRISB8; inline;
  13389. procedure clearTRISB9; inline;
  13390. procedure setTRISB0; inline;
  13391. procedure setTRISB10; inline;
  13392. procedure setTRISB11; inline;
  13393. procedure setTRISB12; inline;
  13394. procedure setTRISB13; inline;
  13395. procedure setTRISB14; inline;
  13396. procedure setTRISB15; inline;
  13397. procedure setTRISB1; inline;
  13398. procedure setTRISB2; inline;
  13399. procedure setTRISB3; inline;
  13400. procedure setTRISB4; inline;
  13401. procedure setTRISB5; inline;
  13402. procedure setTRISB6; inline;
  13403. procedure setTRISB7; inline;
  13404. procedure setTRISB8; inline;
  13405. procedure setTRISB9; inline;
  13406. property TRISB0 : TBits_1 read getTRISB0 write setTRISB0;
  13407. property TRISB1 : TBits_1 read getTRISB1 write setTRISB1;
  13408. property TRISB10 : TBits_1 read getTRISB10 write setTRISB10;
  13409. property TRISB11 : TBits_1 read getTRISB11 write setTRISB11;
  13410. property TRISB12 : TBits_1 read getTRISB12 write setTRISB12;
  13411. property TRISB13 : TBits_1 read getTRISB13 write setTRISB13;
  13412. property TRISB14 : TBits_1 read getTRISB14 write setTRISB14;
  13413. property TRISB15 : TBits_1 read getTRISB15 write setTRISB15;
  13414. property TRISB2 : TBits_1 read getTRISB2 write setTRISB2;
  13415. property TRISB3 : TBits_1 read getTRISB3 write setTRISB3;
  13416. property TRISB4 : TBits_1 read getTRISB4 write setTRISB4;
  13417. property TRISB5 : TBits_1 read getTRISB5 write setTRISB5;
  13418. property TRISB6 : TBits_1 read getTRISB6 write setTRISB6;
  13419. property TRISB7 : TBits_1 read getTRISB7 write setTRISB7;
  13420. property TRISB8 : TBits_1 read getTRISB8 write setTRISB8;
  13421. property TRISB9 : TBits_1 read getTRISB9 write setTRISB9;
  13422. property w : TBits_32 read getw write setw;
  13423. end;
  13424. TPORTB_PORTB = record
  13425. private
  13426. function getRB0 : TBits_1; inline;
  13427. function getRB1 : TBits_1; inline;
  13428. function getRB10 : TBits_1; inline;
  13429. function getRB11 : TBits_1; inline;
  13430. function getRB12 : TBits_1; inline;
  13431. function getRB13 : TBits_1; inline;
  13432. function getRB14 : TBits_1; inline;
  13433. function getRB15 : TBits_1; inline;
  13434. function getRB2 : TBits_1; inline;
  13435. function getRB3 : TBits_1; inline;
  13436. function getRB4 : TBits_1; inline;
  13437. function getRB5 : TBits_1; inline;
  13438. function getRB6 : TBits_1; inline;
  13439. function getRB7 : TBits_1; inline;
  13440. function getRB8 : TBits_1; inline;
  13441. function getRB9 : TBits_1; inline;
  13442. function getw : TBits_32; inline;
  13443. procedure setRB0(thebits : TBits_1); inline;
  13444. procedure setRB1(thebits : TBits_1); inline;
  13445. procedure setRB10(thebits : TBits_1); inline;
  13446. procedure setRB11(thebits : TBits_1); inline;
  13447. procedure setRB12(thebits : TBits_1); inline;
  13448. procedure setRB13(thebits : TBits_1); inline;
  13449. procedure setRB14(thebits : TBits_1); inline;
  13450. procedure setRB15(thebits : TBits_1); inline;
  13451. procedure setRB2(thebits : TBits_1); inline;
  13452. procedure setRB3(thebits : TBits_1); inline;
  13453. procedure setRB4(thebits : TBits_1); inline;
  13454. procedure setRB5(thebits : TBits_1); inline;
  13455. procedure setRB6(thebits : TBits_1); inline;
  13456. procedure setRB7(thebits : TBits_1); inline;
  13457. procedure setRB8(thebits : TBits_1); inline;
  13458. procedure setRB9(thebits : TBits_1); inline;
  13459. procedure setw(thebits : TBits_32); inline;
  13460. public
  13461. procedure clearRB0; inline;
  13462. procedure clearRB10; inline;
  13463. procedure clearRB11; inline;
  13464. procedure clearRB12; inline;
  13465. procedure clearRB13; inline;
  13466. procedure clearRB14; inline;
  13467. procedure clearRB15; inline;
  13468. procedure clearRB1; inline;
  13469. procedure clearRB2; inline;
  13470. procedure clearRB3; inline;
  13471. procedure clearRB4; inline;
  13472. procedure clearRB5; inline;
  13473. procedure clearRB6; inline;
  13474. procedure clearRB7; inline;
  13475. procedure clearRB8; inline;
  13476. procedure clearRB9; inline;
  13477. procedure setRB0; inline;
  13478. procedure setRB10; inline;
  13479. procedure setRB11; inline;
  13480. procedure setRB12; inline;
  13481. procedure setRB13; inline;
  13482. procedure setRB14; inline;
  13483. procedure setRB15; inline;
  13484. procedure setRB1; inline;
  13485. procedure setRB2; inline;
  13486. procedure setRB3; inline;
  13487. procedure setRB4; inline;
  13488. procedure setRB5; inline;
  13489. procedure setRB6; inline;
  13490. procedure setRB7; inline;
  13491. procedure setRB8; inline;
  13492. procedure setRB9; inline;
  13493. property RB0 : TBits_1 read getRB0 write setRB0;
  13494. property RB1 : TBits_1 read getRB1 write setRB1;
  13495. property RB10 : TBits_1 read getRB10 write setRB10;
  13496. property RB11 : TBits_1 read getRB11 write setRB11;
  13497. property RB12 : TBits_1 read getRB12 write setRB12;
  13498. property RB13 : TBits_1 read getRB13 write setRB13;
  13499. property RB14 : TBits_1 read getRB14 write setRB14;
  13500. property RB15 : TBits_1 read getRB15 write setRB15;
  13501. property RB2 : TBits_1 read getRB2 write setRB2;
  13502. property RB3 : TBits_1 read getRB3 write setRB3;
  13503. property RB4 : TBits_1 read getRB4 write setRB4;
  13504. property RB5 : TBits_1 read getRB5 write setRB5;
  13505. property RB6 : TBits_1 read getRB6 write setRB6;
  13506. property RB7 : TBits_1 read getRB7 write setRB7;
  13507. property RB8 : TBits_1 read getRB8 write setRB8;
  13508. property RB9 : TBits_1 read getRB9 write setRB9;
  13509. property w : TBits_32 read getw write setw;
  13510. end;
  13511. 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);
  13512. TPortB_bitset = set of TPortB_bits;
  13513. TPORTB_LATB = record
  13514. private
  13515. function getLATB0 : TBits_1; inline;
  13516. function getLATB1 : TBits_1; inline;
  13517. function getLATB10 : TBits_1; inline;
  13518. function getLATB11 : TBits_1; inline;
  13519. function getLATB12 : TBits_1; inline;
  13520. function getLATB13 : TBits_1; inline;
  13521. function getLATB14 : TBits_1; inline;
  13522. function getLATB15 : TBits_1; inline;
  13523. function getLATB2 : TBits_1; inline;
  13524. function getLATB3 : TBits_1; inline;
  13525. function getLATB4 : TBits_1; inline;
  13526. function getLATB5 : TBits_1; inline;
  13527. function getLATB6 : TBits_1; inline;
  13528. function getLATB7 : TBits_1; inline;
  13529. function getLATB8 : TBits_1; inline;
  13530. function getLATB9 : TBits_1; inline;
  13531. function getw : TBits_32; inline;
  13532. procedure setLATB0(thebits : TBits_1); inline;
  13533. procedure setLATB1(thebits : TBits_1); inline;
  13534. procedure setLATB10(thebits : TBits_1); inline;
  13535. procedure setLATB11(thebits : TBits_1); inline;
  13536. procedure setLATB12(thebits : TBits_1); inline;
  13537. procedure setLATB13(thebits : TBits_1); inline;
  13538. procedure setLATB14(thebits : TBits_1); inline;
  13539. procedure setLATB15(thebits : TBits_1); inline;
  13540. procedure setLATB2(thebits : TBits_1); inline;
  13541. procedure setLATB3(thebits : TBits_1); inline;
  13542. procedure setLATB4(thebits : TBits_1); inline;
  13543. procedure setLATB5(thebits : TBits_1); inline;
  13544. procedure setLATB6(thebits : TBits_1); inline;
  13545. procedure setLATB7(thebits : TBits_1); inline;
  13546. procedure setLATB8(thebits : TBits_1); inline;
  13547. procedure setLATB9(thebits : TBits_1); inline;
  13548. procedure setw(thebits : TBits_32); inline;
  13549. public
  13550. procedure clearLATB0; inline;
  13551. procedure clearLATB10; inline;
  13552. procedure clearLATB11; inline;
  13553. procedure clearLATB12; inline;
  13554. procedure clearLATB13; inline;
  13555. procedure clearLATB14; inline;
  13556. procedure clearLATB15; inline;
  13557. procedure clearLATB1; inline;
  13558. procedure clearLATB2; inline;
  13559. procedure clearLATB3; inline;
  13560. procedure clearLATB4; inline;
  13561. procedure clearLATB5; inline;
  13562. procedure clearLATB6; inline;
  13563. procedure clearLATB7; inline;
  13564. procedure clearLATB8; inline;
  13565. procedure clearLATB9; inline;
  13566. procedure setLATB0; inline;
  13567. procedure setLATB10; inline;
  13568. procedure setLATB11; inline;
  13569. procedure setLATB12; inline;
  13570. procedure setLATB13; inline;
  13571. procedure setLATB14; inline;
  13572. procedure setLATB15; inline;
  13573. procedure setLATB1; inline;
  13574. procedure setLATB2; inline;
  13575. procedure setLATB3; inline;
  13576. procedure setLATB4; inline;
  13577. procedure setLATB5; inline;
  13578. procedure setLATB6; inline;
  13579. procedure setLATB7; inline;
  13580. procedure setLATB8; inline;
  13581. procedure setLATB9; inline;
  13582. property LATB0 : TBits_1 read getLATB0 write setLATB0;
  13583. property LATB1 : TBits_1 read getLATB1 write setLATB1;
  13584. property LATB10 : TBits_1 read getLATB10 write setLATB10;
  13585. property LATB11 : TBits_1 read getLATB11 write setLATB11;
  13586. property LATB12 : TBits_1 read getLATB12 write setLATB12;
  13587. property LATB13 : TBits_1 read getLATB13 write setLATB13;
  13588. property LATB14 : TBits_1 read getLATB14 write setLATB14;
  13589. property LATB15 : TBits_1 read getLATB15 write setLATB15;
  13590. property LATB2 : TBits_1 read getLATB2 write setLATB2;
  13591. property LATB3 : TBits_1 read getLATB3 write setLATB3;
  13592. property LATB4 : TBits_1 read getLATB4 write setLATB4;
  13593. property LATB5 : TBits_1 read getLATB5 write setLATB5;
  13594. property LATB6 : TBits_1 read getLATB6 write setLATB6;
  13595. property LATB7 : TBits_1 read getLATB7 write setLATB7;
  13596. property LATB8 : TBits_1 read getLATB8 write setLATB8;
  13597. property LATB9 : TBits_1 read getLATB9 write setLATB9;
  13598. property w : TBits_32 read getw write setw;
  13599. end;
  13600. TPORTB_ODCB = record
  13601. private
  13602. function getODCB0 : TBits_1; inline;
  13603. function getODCB1 : TBits_1; inline;
  13604. function getODCB10 : TBits_1; inline;
  13605. function getODCB11 : TBits_1; inline;
  13606. function getODCB12 : TBits_1; inline;
  13607. function getODCB13 : TBits_1; inline;
  13608. function getODCB14 : TBits_1; inline;
  13609. function getODCB15 : TBits_1; inline;
  13610. function getODCB2 : TBits_1; inline;
  13611. function getODCB3 : TBits_1; inline;
  13612. function getODCB4 : TBits_1; inline;
  13613. function getODCB5 : TBits_1; inline;
  13614. function getODCB6 : TBits_1; inline;
  13615. function getODCB7 : TBits_1; inline;
  13616. function getODCB8 : TBits_1; inline;
  13617. function getODCB9 : TBits_1; inline;
  13618. function getw : TBits_32; inline;
  13619. procedure setODCB0(thebits : TBits_1); inline;
  13620. procedure setODCB1(thebits : TBits_1); inline;
  13621. procedure setODCB10(thebits : TBits_1); inline;
  13622. procedure setODCB11(thebits : TBits_1); inline;
  13623. procedure setODCB12(thebits : TBits_1); inline;
  13624. procedure setODCB13(thebits : TBits_1); inline;
  13625. procedure setODCB14(thebits : TBits_1); inline;
  13626. procedure setODCB15(thebits : TBits_1); inline;
  13627. procedure setODCB2(thebits : TBits_1); inline;
  13628. procedure setODCB3(thebits : TBits_1); inline;
  13629. procedure setODCB4(thebits : TBits_1); inline;
  13630. procedure setODCB5(thebits : TBits_1); inline;
  13631. procedure setODCB6(thebits : TBits_1); inline;
  13632. procedure setODCB7(thebits : TBits_1); inline;
  13633. procedure setODCB8(thebits : TBits_1); inline;
  13634. procedure setODCB9(thebits : TBits_1); inline;
  13635. procedure setw(thebits : TBits_32); inline;
  13636. public
  13637. procedure clearODCB0; inline;
  13638. procedure clearODCB10; inline;
  13639. procedure clearODCB11; inline;
  13640. procedure clearODCB12; inline;
  13641. procedure clearODCB13; inline;
  13642. procedure clearODCB14; inline;
  13643. procedure clearODCB15; inline;
  13644. procedure clearODCB1; inline;
  13645. procedure clearODCB2; inline;
  13646. procedure clearODCB3; inline;
  13647. procedure clearODCB4; inline;
  13648. procedure clearODCB5; inline;
  13649. procedure clearODCB6; inline;
  13650. procedure clearODCB7; inline;
  13651. procedure clearODCB8; inline;
  13652. procedure clearODCB9; inline;
  13653. procedure setODCB0; inline;
  13654. procedure setODCB10; inline;
  13655. procedure setODCB11; inline;
  13656. procedure setODCB12; inline;
  13657. procedure setODCB13; inline;
  13658. procedure setODCB14; inline;
  13659. procedure setODCB15; inline;
  13660. procedure setODCB1; inline;
  13661. procedure setODCB2; inline;
  13662. procedure setODCB3; inline;
  13663. procedure setODCB4; inline;
  13664. procedure setODCB5; inline;
  13665. procedure setODCB6; inline;
  13666. procedure setODCB7; inline;
  13667. procedure setODCB8; inline;
  13668. procedure setODCB9; inline;
  13669. property ODCB0 : TBits_1 read getODCB0 write setODCB0;
  13670. property ODCB1 : TBits_1 read getODCB1 write setODCB1;
  13671. property ODCB10 : TBits_1 read getODCB10 write setODCB10;
  13672. property ODCB11 : TBits_1 read getODCB11 write setODCB11;
  13673. property ODCB12 : TBits_1 read getODCB12 write setODCB12;
  13674. property ODCB13 : TBits_1 read getODCB13 write setODCB13;
  13675. property ODCB14 : TBits_1 read getODCB14 write setODCB14;
  13676. property ODCB15 : TBits_1 read getODCB15 write setODCB15;
  13677. property ODCB2 : TBits_1 read getODCB2 write setODCB2;
  13678. property ODCB3 : TBits_1 read getODCB3 write setODCB3;
  13679. property ODCB4 : TBits_1 read getODCB4 write setODCB4;
  13680. property ODCB5 : TBits_1 read getODCB5 write setODCB5;
  13681. property ODCB6 : TBits_1 read getODCB6 write setODCB6;
  13682. property ODCB7 : TBits_1 read getODCB7 write setODCB7;
  13683. property ODCB8 : TBits_1 read getODCB8 write setODCB8;
  13684. property ODCB9 : TBits_1 read getODCB9 write setODCB9;
  13685. property w : TBits_32 read getw write setw;
  13686. end;
  13687. type
  13688. TPORTBRegisters = record
  13689. TRISBbits : TPORTB_TRISB;
  13690. TRISB : longWord;
  13691. TRISBCLR : longWord;
  13692. TRISBSET : longWord;
  13693. TRISBINV : longWord;
  13694. PORTBbits : TPORTB_PORTB;
  13695. PORTB : longWord;
  13696. PORTBCLR : longWord;
  13697. PORTBSET : longWord;
  13698. PORTBINV : longWord;
  13699. LATBbits : TPORTB_LATB;
  13700. LATB : longWord;
  13701. LATBCLR : longWord;
  13702. LATBSET : longWord;
  13703. LATBINV : longWord;
  13704. ODCBbits : TPORTB_ODCB;
  13705. ODCB : longWord;
  13706. ODCBCLR : longWord;
  13707. ODCBSET : longWord;
  13708. ODCBINV : longWord;
  13709. end;
  13710. TPORTC_TRISC = record
  13711. private
  13712. function getTRISC1 : TBits_1; inline;
  13713. function getTRISC12 : TBits_1; inline;
  13714. function getTRISC13 : TBits_1; inline;
  13715. function getTRISC14 : TBits_1; inline;
  13716. function getTRISC15 : TBits_1; inline;
  13717. function getTRISC2 : TBits_1; inline;
  13718. function getTRISC3 : TBits_1; inline;
  13719. function getTRISC4 : TBits_1; inline;
  13720. function getw : TBits_32; inline;
  13721. procedure setTRISC1(thebits : TBits_1); inline;
  13722. procedure setTRISC12(thebits : TBits_1); inline;
  13723. procedure setTRISC13(thebits : TBits_1); inline;
  13724. procedure setTRISC14(thebits : TBits_1); inline;
  13725. procedure setTRISC15(thebits : TBits_1); inline;
  13726. procedure setTRISC2(thebits : TBits_1); inline;
  13727. procedure setTRISC3(thebits : TBits_1); inline;
  13728. procedure setTRISC4(thebits : TBits_1); inline;
  13729. procedure setw(thebits : TBits_32); inline;
  13730. public
  13731. procedure clearTRISC12; inline;
  13732. procedure clearTRISC13; inline;
  13733. procedure clearTRISC14; inline;
  13734. procedure clearTRISC15; inline;
  13735. procedure clearTRISC1; inline;
  13736. procedure clearTRISC2; inline;
  13737. procedure clearTRISC3; inline;
  13738. procedure clearTRISC4; inline;
  13739. procedure setTRISC12; inline;
  13740. procedure setTRISC13; inline;
  13741. procedure setTRISC14; inline;
  13742. procedure setTRISC15; inline;
  13743. procedure setTRISC1; inline;
  13744. procedure setTRISC2; inline;
  13745. procedure setTRISC3; inline;
  13746. procedure setTRISC4; inline;
  13747. property TRISC1 : TBits_1 read getTRISC1 write setTRISC1;
  13748. property TRISC12 : TBits_1 read getTRISC12 write setTRISC12;
  13749. property TRISC13 : TBits_1 read getTRISC13 write setTRISC13;
  13750. property TRISC14 : TBits_1 read getTRISC14 write setTRISC14;
  13751. property TRISC15 : TBits_1 read getTRISC15 write setTRISC15;
  13752. property TRISC2 : TBits_1 read getTRISC2 write setTRISC2;
  13753. property TRISC3 : TBits_1 read getTRISC3 write setTRISC3;
  13754. property TRISC4 : TBits_1 read getTRISC4 write setTRISC4;
  13755. property w : TBits_32 read getw write setw;
  13756. end;
  13757. TPORTC_PORTC = record
  13758. private
  13759. function getRC1 : TBits_1; inline;
  13760. function getRC12 : TBits_1; inline;
  13761. function getRC13 : TBits_1; inline;
  13762. function getRC14 : TBits_1; inline;
  13763. function getRC15 : TBits_1; inline;
  13764. function getRC2 : TBits_1; inline;
  13765. function getRC3 : TBits_1; inline;
  13766. function getRC4 : TBits_1; inline;
  13767. function getw : TBits_32; inline;
  13768. procedure setRC1(thebits : TBits_1); inline;
  13769. procedure setRC12(thebits : TBits_1); inline;
  13770. procedure setRC13(thebits : TBits_1); inline;
  13771. procedure setRC14(thebits : TBits_1); inline;
  13772. procedure setRC15(thebits : TBits_1); inline;
  13773. procedure setRC2(thebits : TBits_1); inline;
  13774. procedure setRC3(thebits : TBits_1); inline;
  13775. procedure setRC4(thebits : TBits_1); inline;
  13776. procedure setw(thebits : TBits_32); inline;
  13777. public
  13778. procedure clearRC12; inline;
  13779. procedure clearRC13; inline;
  13780. procedure clearRC14; inline;
  13781. procedure clearRC15; inline;
  13782. procedure clearRC1; inline;
  13783. procedure clearRC2; inline;
  13784. procedure clearRC3; inline;
  13785. procedure clearRC4; inline;
  13786. procedure setRC12; inline;
  13787. procedure setRC13; inline;
  13788. procedure setRC14; inline;
  13789. procedure setRC15; inline;
  13790. procedure setRC1; inline;
  13791. procedure setRC2; inline;
  13792. procedure setRC3; inline;
  13793. procedure setRC4; inline;
  13794. property RC1 : TBits_1 read getRC1 write setRC1;
  13795. property RC12 : TBits_1 read getRC12 write setRC12;
  13796. property RC13 : TBits_1 read getRC13 write setRC13;
  13797. property RC14 : TBits_1 read getRC14 write setRC14;
  13798. property RC15 : TBits_1 read getRC15 write setRC15;
  13799. property RC2 : TBits_1 read getRC2 write setRC2;
  13800. property RC3 : TBits_1 read getRC3 write setRC3;
  13801. property RC4 : TBits_1 read getRC4 write setRC4;
  13802. property w : TBits_32 read getw write setw;
  13803. end;
  13804. TPortC_bits=(RC1=1,RC2=2,RC3=3,RC4=4,RC12=12,RC13=13,RC14=14,RC15=15);
  13805. TPortC_bitset = set of TPortC_bits;
  13806. TPORTC_LATC = record
  13807. private
  13808. function getLATC1 : TBits_1; inline;
  13809. function getLATC12 : TBits_1; inline;
  13810. function getLATC13 : TBits_1; inline;
  13811. function getLATC14 : TBits_1; inline;
  13812. function getLATC15 : TBits_1; inline;
  13813. function getLATC2 : TBits_1; inline;
  13814. function getLATC3 : TBits_1; inline;
  13815. function getLATC4 : TBits_1; inline;
  13816. function getw : TBits_32; inline;
  13817. procedure setLATC1(thebits : TBits_1); inline;
  13818. procedure setLATC12(thebits : TBits_1); inline;
  13819. procedure setLATC13(thebits : TBits_1); inline;
  13820. procedure setLATC14(thebits : TBits_1); inline;
  13821. procedure setLATC15(thebits : TBits_1); inline;
  13822. procedure setLATC2(thebits : TBits_1); inline;
  13823. procedure setLATC3(thebits : TBits_1); inline;
  13824. procedure setLATC4(thebits : TBits_1); inline;
  13825. procedure setw(thebits : TBits_32); inline;
  13826. public
  13827. procedure clearLATC12; inline;
  13828. procedure clearLATC13; inline;
  13829. procedure clearLATC14; inline;
  13830. procedure clearLATC15; inline;
  13831. procedure clearLATC1; inline;
  13832. procedure clearLATC2; inline;
  13833. procedure clearLATC3; inline;
  13834. procedure clearLATC4; inline;
  13835. procedure setLATC12; inline;
  13836. procedure setLATC13; inline;
  13837. procedure setLATC14; inline;
  13838. procedure setLATC15; inline;
  13839. procedure setLATC1; inline;
  13840. procedure setLATC2; inline;
  13841. procedure setLATC3; inline;
  13842. procedure setLATC4; inline;
  13843. property LATC1 : TBits_1 read getLATC1 write setLATC1;
  13844. property LATC12 : TBits_1 read getLATC12 write setLATC12;
  13845. property LATC13 : TBits_1 read getLATC13 write setLATC13;
  13846. property LATC14 : TBits_1 read getLATC14 write setLATC14;
  13847. property LATC15 : TBits_1 read getLATC15 write setLATC15;
  13848. property LATC2 : TBits_1 read getLATC2 write setLATC2;
  13849. property LATC3 : TBits_1 read getLATC3 write setLATC3;
  13850. property LATC4 : TBits_1 read getLATC4 write setLATC4;
  13851. property w : TBits_32 read getw write setw;
  13852. end;
  13853. TPORTC_ODCC = record
  13854. private
  13855. function getODCC1 : TBits_1; inline;
  13856. function getODCC12 : TBits_1; inline;
  13857. function getODCC13 : TBits_1; inline;
  13858. function getODCC14 : TBits_1; inline;
  13859. function getODCC15 : TBits_1; inline;
  13860. function getODCC2 : TBits_1; inline;
  13861. function getODCC3 : TBits_1; inline;
  13862. function getODCC4 : TBits_1; inline;
  13863. function getw : TBits_32; inline;
  13864. procedure setODCC1(thebits : TBits_1); inline;
  13865. procedure setODCC12(thebits : TBits_1); inline;
  13866. procedure setODCC13(thebits : TBits_1); inline;
  13867. procedure setODCC14(thebits : TBits_1); inline;
  13868. procedure setODCC15(thebits : TBits_1); inline;
  13869. procedure setODCC2(thebits : TBits_1); inline;
  13870. procedure setODCC3(thebits : TBits_1); inline;
  13871. procedure setODCC4(thebits : TBits_1); inline;
  13872. procedure setw(thebits : TBits_32); inline;
  13873. public
  13874. procedure clearODCC12; inline;
  13875. procedure clearODCC13; inline;
  13876. procedure clearODCC14; inline;
  13877. procedure clearODCC15; inline;
  13878. procedure clearODCC1; inline;
  13879. procedure clearODCC2; inline;
  13880. procedure clearODCC3; inline;
  13881. procedure clearODCC4; inline;
  13882. procedure setODCC12; inline;
  13883. procedure setODCC13; inline;
  13884. procedure setODCC14; inline;
  13885. procedure setODCC15; inline;
  13886. procedure setODCC1; inline;
  13887. procedure setODCC2; inline;
  13888. procedure setODCC3; inline;
  13889. procedure setODCC4; inline;
  13890. property ODCC1 : TBits_1 read getODCC1 write setODCC1;
  13891. property ODCC12 : TBits_1 read getODCC12 write setODCC12;
  13892. property ODCC13 : TBits_1 read getODCC13 write setODCC13;
  13893. property ODCC14 : TBits_1 read getODCC14 write setODCC14;
  13894. property ODCC15 : TBits_1 read getODCC15 write setODCC15;
  13895. property ODCC2 : TBits_1 read getODCC2 write setODCC2;
  13896. property ODCC3 : TBits_1 read getODCC3 write setODCC3;
  13897. property ODCC4 : TBits_1 read getODCC4 write setODCC4;
  13898. property w : TBits_32 read getw write setw;
  13899. end;
  13900. type
  13901. TPORTCRegisters = record
  13902. TRISCbits : TPORTC_TRISC;
  13903. TRISC : longWord;
  13904. TRISCCLR : longWord;
  13905. TRISCSET : longWord;
  13906. TRISCINV : longWord;
  13907. PORTCbits : TPORTC_PORTC;
  13908. PORTC : longWord;
  13909. PORTCCLR : longWord;
  13910. PORTCSET : longWord;
  13911. PORTCINV : longWord;
  13912. LATCbits : TPORTC_LATC;
  13913. LATC : longWord;
  13914. LATCCLR : longWord;
  13915. LATCSET : longWord;
  13916. LATCINV : longWord;
  13917. ODCCbits : TPORTC_ODCC;
  13918. ODCC : longWord;
  13919. ODCCCLR : longWord;
  13920. ODCCSET : longWord;
  13921. ODCCINV : longWord;
  13922. end;
  13923. TPORTD_TRISD = record
  13924. private
  13925. function getTRISD0 : TBits_1; inline;
  13926. function getTRISD1 : TBits_1; inline;
  13927. function getTRISD10 : TBits_1; inline;
  13928. function getTRISD11 : TBits_1; inline;
  13929. function getTRISD12 : TBits_1; inline;
  13930. function getTRISD13 : TBits_1; inline;
  13931. function getTRISD14 : TBits_1; inline;
  13932. function getTRISD15 : TBits_1; inline;
  13933. function getTRISD2 : TBits_1; inline;
  13934. function getTRISD3 : TBits_1; inline;
  13935. function getTRISD4 : TBits_1; inline;
  13936. function getTRISD5 : TBits_1; inline;
  13937. function getTRISD6 : TBits_1; inline;
  13938. function getTRISD7 : TBits_1; inline;
  13939. function getTRISD8 : TBits_1; inline;
  13940. function getTRISD9 : TBits_1; inline;
  13941. function getw : TBits_32; inline;
  13942. procedure setTRISD0(thebits : TBits_1); inline;
  13943. procedure setTRISD1(thebits : TBits_1); inline;
  13944. procedure setTRISD10(thebits : TBits_1); inline;
  13945. procedure setTRISD11(thebits : TBits_1); inline;
  13946. procedure setTRISD12(thebits : TBits_1); inline;
  13947. procedure setTRISD13(thebits : TBits_1); inline;
  13948. procedure setTRISD14(thebits : TBits_1); inline;
  13949. procedure setTRISD15(thebits : TBits_1); inline;
  13950. procedure setTRISD2(thebits : TBits_1); inline;
  13951. procedure setTRISD3(thebits : TBits_1); inline;
  13952. procedure setTRISD4(thebits : TBits_1); inline;
  13953. procedure setTRISD5(thebits : TBits_1); inline;
  13954. procedure setTRISD6(thebits : TBits_1); inline;
  13955. procedure setTRISD7(thebits : TBits_1); inline;
  13956. procedure setTRISD8(thebits : TBits_1); inline;
  13957. procedure setTRISD9(thebits : TBits_1); inline;
  13958. procedure setw(thebits : TBits_32); inline;
  13959. public
  13960. procedure clearTRISD0; inline;
  13961. procedure clearTRISD10; inline;
  13962. procedure clearTRISD11; inline;
  13963. procedure clearTRISD12; inline;
  13964. procedure clearTRISD13; inline;
  13965. procedure clearTRISD14; inline;
  13966. procedure clearTRISD15; inline;
  13967. procedure clearTRISD1; inline;
  13968. procedure clearTRISD2; inline;
  13969. procedure clearTRISD3; inline;
  13970. procedure clearTRISD4; inline;
  13971. procedure clearTRISD5; inline;
  13972. procedure clearTRISD6; inline;
  13973. procedure clearTRISD7; inline;
  13974. procedure clearTRISD8; inline;
  13975. procedure clearTRISD9; inline;
  13976. procedure setTRISD0; inline;
  13977. procedure setTRISD10; inline;
  13978. procedure setTRISD11; inline;
  13979. procedure setTRISD12; inline;
  13980. procedure setTRISD13; inline;
  13981. procedure setTRISD14; inline;
  13982. procedure setTRISD15; inline;
  13983. procedure setTRISD1; inline;
  13984. procedure setTRISD2; inline;
  13985. procedure setTRISD3; inline;
  13986. procedure setTRISD4; inline;
  13987. procedure setTRISD5; inline;
  13988. procedure setTRISD6; inline;
  13989. procedure setTRISD7; inline;
  13990. procedure setTRISD8; inline;
  13991. procedure setTRISD9; inline;
  13992. property TRISD0 : TBits_1 read getTRISD0 write setTRISD0;
  13993. property TRISD1 : TBits_1 read getTRISD1 write setTRISD1;
  13994. property TRISD10 : TBits_1 read getTRISD10 write setTRISD10;
  13995. property TRISD11 : TBits_1 read getTRISD11 write setTRISD11;
  13996. property TRISD12 : TBits_1 read getTRISD12 write setTRISD12;
  13997. property TRISD13 : TBits_1 read getTRISD13 write setTRISD13;
  13998. property TRISD14 : TBits_1 read getTRISD14 write setTRISD14;
  13999. property TRISD15 : TBits_1 read getTRISD15 write setTRISD15;
  14000. property TRISD2 : TBits_1 read getTRISD2 write setTRISD2;
  14001. property TRISD3 : TBits_1 read getTRISD3 write setTRISD3;
  14002. property TRISD4 : TBits_1 read getTRISD4 write setTRISD4;
  14003. property TRISD5 : TBits_1 read getTRISD5 write setTRISD5;
  14004. property TRISD6 : TBits_1 read getTRISD6 write setTRISD6;
  14005. property TRISD7 : TBits_1 read getTRISD7 write setTRISD7;
  14006. property TRISD8 : TBits_1 read getTRISD8 write setTRISD8;
  14007. property TRISD9 : TBits_1 read getTRISD9 write setTRISD9;
  14008. property w : TBits_32 read getw write setw;
  14009. end;
  14010. TPORTD_PORTD = record
  14011. private
  14012. function getRD0 : TBits_1; inline;
  14013. function getRD1 : TBits_1; inline;
  14014. function getRD10 : TBits_1; inline;
  14015. function getRD11 : TBits_1; inline;
  14016. function getRD12 : TBits_1; inline;
  14017. function getRD13 : TBits_1; inline;
  14018. function getRD14 : TBits_1; inline;
  14019. function getRD15 : TBits_1; inline;
  14020. function getRD2 : TBits_1; inline;
  14021. function getRD3 : TBits_1; inline;
  14022. function getRD4 : TBits_1; inline;
  14023. function getRD5 : TBits_1; inline;
  14024. function getRD6 : TBits_1; inline;
  14025. function getRD7 : TBits_1; inline;
  14026. function getRD8 : TBits_1; inline;
  14027. function getRD9 : TBits_1; inline;
  14028. function getw : TBits_32; inline;
  14029. procedure setRD0(thebits : TBits_1); inline;
  14030. procedure setRD1(thebits : TBits_1); inline;
  14031. procedure setRD10(thebits : TBits_1); inline;
  14032. procedure setRD11(thebits : TBits_1); inline;
  14033. procedure setRD12(thebits : TBits_1); inline;
  14034. procedure setRD13(thebits : TBits_1); inline;
  14035. procedure setRD14(thebits : TBits_1); inline;
  14036. procedure setRD15(thebits : TBits_1); inline;
  14037. procedure setRD2(thebits : TBits_1); inline;
  14038. procedure setRD3(thebits : TBits_1); inline;
  14039. procedure setRD4(thebits : TBits_1); inline;
  14040. procedure setRD5(thebits : TBits_1); inline;
  14041. procedure setRD6(thebits : TBits_1); inline;
  14042. procedure setRD7(thebits : TBits_1); inline;
  14043. procedure setRD8(thebits : TBits_1); inline;
  14044. procedure setRD9(thebits : TBits_1); inline;
  14045. procedure setw(thebits : TBits_32); inline;
  14046. public
  14047. procedure clearRD0; inline;
  14048. procedure clearRD10; inline;
  14049. procedure clearRD11; inline;
  14050. procedure clearRD12; inline;
  14051. procedure clearRD13; inline;
  14052. procedure clearRD14; inline;
  14053. procedure clearRD15; inline;
  14054. procedure clearRD1; inline;
  14055. procedure clearRD2; inline;
  14056. procedure clearRD3; inline;
  14057. procedure clearRD4; inline;
  14058. procedure clearRD5; inline;
  14059. procedure clearRD6; inline;
  14060. procedure clearRD7; inline;
  14061. procedure clearRD8; inline;
  14062. procedure clearRD9; inline;
  14063. procedure setRD0; inline;
  14064. procedure setRD10; inline;
  14065. procedure setRD11; inline;
  14066. procedure setRD12; inline;
  14067. procedure setRD13; inline;
  14068. procedure setRD14; inline;
  14069. procedure setRD15; inline;
  14070. procedure setRD1; inline;
  14071. procedure setRD2; inline;
  14072. procedure setRD3; inline;
  14073. procedure setRD4; inline;
  14074. procedure setRD5; inline;
  14075. procedure setRD6; inline;
  14076. procedure setRD7; inline;
  14077. procedure setRD8; inline;
  14078. procedure setRD9; inline;
  14079. property RD0 : TBits_1 read getRD0 write setRD0;
  14080. property RD1 : TBits_1 read getRD1 write setRD1;
  14081. property RD10 : TBits_1 read getRD10 write setRD10;
  14082. property RD11 : TBits_1 read getRD11 write setRD11;
  14083. property RD12 : TBits_1 read getRD12 write setRD12;
  14084. property RD13 : TBits_1 read getRD13 write setRD13;
  14085. property RD14 : TBits_1 read getRD14 write setRD14;
  14086. property RD15 : TBits_1 read getRD15 write setRD15;
  14087. property RD2 : TBits_1 read getRD2 write setRD2;
  14088. property RD3 : TBits_1 read getRD3 write setRD3;
  14089. property RD4 : TBits_1 read getRD4 write setRD4;
  14090. property RD5 : TBits_1 read getRD5 write setRD5;
  14091. property RD6 : TBits_1 read getRD6 write setRD6;
  14092. property RD7 : TBits_1 read getRD7 write setRD7;
  14093. property RD8 : TBits_1 read getRD8 write setRD8;
  14094. property RD9 : TBits_1 read getRD9 write setRD9;
  14095. property w : TBits_32 read getw write setw;
  14096. end;
  14097. 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,RD12=12,RD13=13,RD14=14,RD15=15);
  14098. TPortD_bitset = set of TPortD_bits;
  14099. TPORTD_LATD = record
  14100. private
  14101. function getLATD0 : TBits_1; inline;
  14102. function getLATD1 : TBits_1; inline;
  14103. function getLATD10 : TBits_1; inline;
  14104. function getLATD11 : TBits_1; inline;
  14105. function getLATD12 : TBits_1; inline;
  14106. function getLATD13 : TBits_1; inline;
  14107. function getLATD14 : TBits_1; inline;
  14108. function getLATD15 : TBits_1; inline;
  14109. function getLATD2 : TBits_1; inline;
  14110. function getLATD3 : TBits_1; inline;
  14111. function getLATD4 : TBits_1; inline;
  14112. function getLATD5 : TBits_1; inline;
  14113. function getLATD6 : TBits_1; inline;
  14114. function getLATD7 : TBits_1; inline;
  14115. function getLATD8 : TBits_1; inline;
  14116. function getLATD9 : TBits_1; inline;
  14117. function getw : TBits_32; inline;
  14118. procedure setLATD0(thebits : TBits_1); inline;
  14119. procedure setLATD1(thebits : TBits_1); inline;
  14120. procedure setLATD10(thebits : TBits_1); inline;
  14121. procedure setLATD11(thebits : TBits_1); inline;
  14122. procedure setLATD12(thebits : TBits_1); inline;
  14123. procedure setLATD13(thebits : TBits_1); inline;
  14124. procedure setLATD14(thebits : TBits_1); inline;
  14125. procedure setLATD15(thebits : TBits_1); inline;
  14126. procedure setLATD2(thebits : TBits_1); inline;
  14127. procedure setLATD3(thebits : TBits_1); inline;
  14128. procedure setLATD4(thebits : TBits_1); inline;
  14129. procedure setLATD5(thebits : TBits_1); inline;
  14130. procedure setLATD6(thebits : TBits_1); inline;
  14131. procedure setLATD7(thebits : TBits_1); inline;
  14132. procedure setLATD8(thebits : TBits_1); inline;
  14133. procedure setLATD9(thebits : TBits_1); inline;
  14134. procedure setw(thebits : TBits_32); inline;
  14135. public
  14136. procedure clearLATD0; inline;
  14137. procedure clearLATD10; inline;
  14138. procedure clearLATD11; inline;
  14139. procedure clearLATD12; inline;
  14140. procedure clearLATD13; inline;
  14141. procedure clearLATD14; inline;
  14142. procedure clearLATD15; inline;
  14143. procedure clearLATD1; inline;
  14144. procedure clearLATD2; inline;
  14145. procedure clearLATD3; inline;
  14146. procedure clearLATD4; inline;
  14147. procedure clearLATD5; inline;
  14148. procedure clearLATD6; inline;
  14149. procedure clearLATD7; inline;
  14150. procedure clearLATD8; inline;
  14151. procedure clearLATD9; inline;
  14152. procedure setLATD0; inline;
  14153. procedure setLATD10; inline;
  14154. procedure setLATD11; inline;
  14155. procedure setLATD12; inline;
  14156. procedure setLATD13; inline;
  14157. procedure setLATD14; inline;
  14158. procedure setLATD15; inline;
  14159. procedure setLATD1; inline;
  14160. procedure setLATD2; inline;
  14161. procedure setLATD3; inline;
  14162. procedure setLATD4; inline;
  14163. procedure setLATD5; inline;
  14164. procedure setLATD6; inline;
  14165. procedure setLATD7; inline;
  14166. procedure setLATD8; inline;
  14167. procedure setLATD9; inline;
  14168. property LATD0 : TBits_1 read getLATD0 write setLATD0;
  14169. property LATD1 : TBits_1 read getLATD1 write setLATD1;
  14170. property LATD10 : TBits_1 read getLATD10 write setLATD10;
  14171. property LATD11 : TBits_1 read getLATD11 write setLATD11;
  14172. property LATD12 : TBits_1 read getLATD12 write setLATD12;
  14173. property LATD13 : TBits_1 read getLATD13 write setLATD13;
  14174. property LATD14 : TBits_1 read getLATD14 write setLATD14;
  14175. property LATD15 : TBits_1 read getLATD15 write setLATD15;
  14176. property LATD2 : TBits_1 read getLATD2 write setLATD2;
  14177. property LATD3 : TBits_1 read getLATD3 write setLATD3;
  14178. property LATD4 : TBits_1 read getLATD4 write setLATD4;
  14179. property LATD5 : TBits_1 read getLATD5 write setLATD5;
  14180. property LATD6 : TBits_1 read getLATD6 write setLATD6;
  14181. property LATD7 : TBits_1 read getLATD7 write setLATD7;
  14182. property LATD8 : TBits_1 read getLATD8 write setLATD8;
  14183. property LATD9 : TBits_1 read getLATD9 write setLATD9;
  14184. property w : TBits_32 read getw write setw;
  14185. end;
  14186. TPORTD_ODCD = record
  14187. private
  14188. function getODCD0 : TBits_1; inline;
  14189. function getODCD1 : TBits_1; inline;
  14190. function getODCD10 : TBits_1; inline;
  14191. function getODCD11 : TBits_1; inline;
  14192. function getODCD12 : TBits_1; inline;
  14193. function getODCD13 : TBits_1; inline;
  14194. function getODCD14 : TBits_1; inline;
  14195. function getODCD15 : TBits_1; inline;
  14196. function getODCD2 : TBits_1; inline;
  14197. function getODCD3 : TBits_1; inline;
  14198. function getODCD4 : TBits_1; inline;
  14199. function getODCD5 : TBits_1; inline;
  14200. function getODCD6 : TBits_1; inline;
  14201. function getODCD7 : TBits_1; inline;
  14202. function getODCD8 : TBits_1; inline;
  14203. function getODCD9 : TBits_1; inline;
  14204. function getw : TBits_32; inline;
  14205. procedure setODCD0(thebits : TBits_1); inline;
  14206. procedure setODCD1(thebits : TBits_1); inline;
  14207. procedure setODCD10(thebits : TBits_1); inline;
  14208. procedure setODCD11(thebits : TBits_1); inline;
  14209. procedure setODCD12(thebits : TBits_1); inline;
  14210. procedure setODCD13(thebits : TBits_1); inline;
  14211. procedure setODCD14(thebits : TBits_1); inline;
  14212. procedure setODCD15(thebits : TBits_1); inline;
  14213. procedure setODCD2(thebits : TBits_1); inline;
  14214. procedure setODCD3(thebits : TBits_1); inline;
  14215. procedure setODCD4(thebits : TBits_1); inline;
  14216. procedure setODCD5(thebits : TBits_1); inline;
  14217. procedure setODCD6(thebits : TBits_1); inline;
  14218. procedure setODCD7(thebits : TBits_1); inline;
  14219. procedure setODCD8(thebits : TBits_1); inline;
  14220. procedure setODCD9(thebits : TBits_1); inline;
  14221. procedure setw(thebits : TBits_32); inline;
  14222. public
  14223. procedure clearODCD0; inline;
  14224. procedure clearODCD10; inline;
  14225. procedure clearODCD11; inline;
  14226. procedure clearODCD12; inline;
  14227. procedure clearODCD13; inline;
  14228. procedure clearODCD14; inline;
  14229. procedure clearODCD15; inline;
  14230. procedure clearODCD1; inline;
  14231. procedure clearODCD2; inline;
  14232. procedure clearODCD3; inline;
  14233. procedure clearODCD4; inline;
  14234. procedure clearODCD5; inline;
  14235. procedure clearODCD6; inline;
  14236. procedure clearODCD7; inline;
  14237. procedure clearODCD8; inline;
  14238. procedure clearODCD9; inline;
  14239. procedure setODCD0; inline;
  14240. procedure setODCD10; inline;
  14241. procedure setODCD11; inline;
  14242. procedure setODCD12; inline;
  14243. procedure setODCD13; inline;
  14244. procedure setODCD14; inline;
  14245. procedure setODCD15; inline;
  14246. procedure setODCD1; inline;
  14247. procedure setODCD2; inline;
  14248. procedure setODCD3; inline;
  14249. procedure setODCD4; inline;
  14250. procedure setODCD5; inline;
  14251. procedure setODCD6; inline;
  14252. procedure setODCD7; inline;
  14253. procedure setODCD8; inline;
  14254. procedure setODCD9; inline;
  14255. property ODCD0 : TBits_1 read getODCD0 write setODCD0;
  14256. property ODCD1 : TBits_1 read getODCD1 write setODCD1;
  14257. property ODCD10 : TBits_1 read getODCD10 write setODCD10;
  14258. property ODCD11 : TBits_1 read getODCD11 write setODCD11;
  14259. property ODCD12 : TBits_1 read getODCD12 write setODCD12;
  14260. property ODCD13 : TBits_1 read getODCD13 write setODCD13;
  14261. property ODCD14 : TBits_1 read getODCD14 write setODCD14;
  14262. property ODCD15 : TBits_1 read getODCD15 write setODCD15;
  14263. property ODCD2 : TBits_1 read getODCD2 write setODCD2;
  14264. property ODCD3 : TBits_1 read getODCD3 write setODCD3;
  14265. property ODCD4 : TBits_1 read getODCD4 write setODCD4;
  14266. property ODCD5 : TBits_1 read getODCD5 write setODCD5;
  14267. property ODCD6 : TBits_1 read getODCD6 write setODCD6;
  14268. property ODCD7 : TBits_1 read getODCD7 write setODCD7;
  14269. property ODCD8 : TBits_1 read getODCD8 write setODCD8;
  14270. property ODCD9 : TBits_1 read getODCD9 write setODCD9;
  14271. property w : TBits_32 read getw write setw;
  14272. end;
  14273. type
  14274. TPORTDRegisters = record
  14275. TRISDbits : TPORTD_TRISD;
  14276. TRISD : longWord;
  14277. TRISDCLR : longWord;
  14278. TRISDSET : longWord;
  14279. TRISDINV : longWord;
  14280. PORTDbits : TPORTD_PORTD;
  14281. PORTD : longWord;
  14282. PORTDCLR : longWord;
  14283. PORTDSET : longWord;
  14284. PORTDINV : longWord;
  14285. LATDbits : TPORTD_LATD;
  14286. LATD : longWord;
  14287. LATDCLR : longWord;
  14288. LATDSET : longWord;
  14289. LATDINV : longWord;
  14290. ODCDbits : TPORTD_ODCD;
  14291. ODCD : longWord;
  14292. ODCDCLR : longWord;
  14293. ODCDSET : longWord;
  14294. ODCDINV : longWord;
  14295. end;
  14296. TPORTE_TRISE = record
  14297. private
  14298. function getTRISE0 : TBits_1; inline;
  14299. function getTRISE1 : TBits_1; inline;
  14300. function getTRISE2 : TBits_1; inline;
  14301. function getTRISE3 : TBits_1; inline;
  14302. function getTRISE4 : TBits_1; inline;
  14303. function getTRISE5 : TBits_1; inline;
  14304. function getTRISE6 : TBits_1; inline;
  14305. function getTRISE7 : TBits_1; inline;
  14306. function getTRISE8 : TBits_1; inline;
  14307. function getTRISE9 : TBits_1; inline;
  14308. function getw : TBits_32; inline;
  14309. procedure setTRISE0(thebits : TBits_1); inline;
  14310. procedure setTRISE1(thebits : TBits_1); inline;
  14311. procedure setTRISE2(thebits : TBits_1); inline;
  14312. procedure setTRISE3(thebits : TBits_1); inline;
  14313. procedure setTRISE4(thebits : TBits_1); inline;
  14314. procedure setTRISE5(thebits : TBits_1); inline;
  14315. procedure setTRISE6(thebits : TBits_1); inline;
  14316. procedure setTRISE7(thebits : TBits_1); inline;
  14317. procedure setTRISE8(thebits : TBits_1); inline;
  14318. procedure setTRISE9(thebits : TBits_1); inline;
  14319. procedure setw(thebits : TBits_32); inline;
  14320. public
  14321. procedure clearTRISE0; inline;
  14322. procedure clearTRISE1; inline;
  14323. procedure clearTRISE2; inline;
  14324. procedure clearTRISE3; inline;
  14325. procedure clearTRISE4; inline;
  14326. procedure clearTRISE5; inline;
  14327. procedure clearTRISE6; inline;
  14328. procedure clearTRISE7; inline;
  14329. procedure clearTRISE8; inline;
  14330. procedure clearTRISE9; inline;
  14331. procedure setTRISE0; inline;
  14332. procedure setTRISE1; inline;
  14333. procedure setTRISE2; inline;
  14334. procedure setTRISE3; inline;
  14335. procedure setTRISE4; inline;
  14336. procedure setTRISE5; inline;
  14337. procedure setTRISE6; inline;
  14338. procedure setTRISE7; inline;
  14339. procedure setTRISE8; inline;
  14340. procedure setTRISE9; inline;
  14341. property TRISE0 : TBits_1 read getTRISE0 write setTRISE0;
  14342. property TRISE1 : TBits_1 read getTRISE1 write setTRISE1;
  14343. property TRISE2 : TBits_1 read getTRISE2 write setTRISE2;
  14344. property TRISE3 : TBits_1 read getTRISE3 write setTRISE3;
  14345. property TRISE4 : TBits_1 read getTRISE4 write setTRISE4;
  14346. property TRISE5 : TBits_1 read getTRISE5 write setTRISE5;
  14347. property TRISE6 : TBits_1 read getTRISE6 write setTRISE6;
  14348. property TRISE7 : TBits_1 read getTRISE7 write setTRISE7;
  14349. property TRISE8 : TBits_1 read getTRISE8 write setTRISE8;
  14350. property TRISE9 : TBits_1 read getTRISE9 write setTRISE9;
  14351. property w : TBits_32 read getw write setw;
  14352. end;
  14353. TPORTE_PORTE = record
  14354. private
  14355. function getRE0 : TBits_1; inline;
  14356. function getRE1 : TBits_1; inline;
  14357. function getRE2 : TBits_1; inline;
  14358. function getRE3 : TBits_1; inline;
  14359. function getRE4 : TBits_1; inline;
  14360. function getRE5 : TBits_1; inline;
  14361. function getRE6 : TBits_1; inline;
  14362. function getRE7 : TBits_1; inline;
  14363. function getRE8 : TBits_1; inline;
  14364. function getRE9 : TBits_1; inline;
  14365. function getw : TBits_32; inline;
  14366. procedure setRE0(thebits : TBits_1); inline;
  14367. procedure setRE1(thebits : TBits_1); inline;
  14368. procedure setRE2(thebits : TBits_1); inline;
  14369. procedure setRE3(thebits : TBits_1); inline;
  14370. procedure setRE4(thebits : TBits_1); inline;
  14371. procedure setRE5(thebits : TBits_1); inline;
  14372. procedure setRE6(thebits : TBits_1); inline;
  14373. procedure setRE7(thebits : TBits_1); inline;
  14374. procedure setRE8(thebits : TBits_1); inline;
  14375. procedure setRE9(thebits : TBits_1); inline;
  14376. procedure setw(thebits : TBits_32); inline;
  14377. public
  14378. procedure clearRE0; inline;
  14379. procedure clearRE1; inline;
  14380. procedure clearRE2; inline;
  14381. procedure clearRE3; inline;
  14382. procedure clearRE4; inline;
  14383. procedure clearRE5; inline;
  14384. procedure clearRE6; inline;
  14385. procedure clearRE7; inline;
  14386. procedure clearRE8; inline;
  14387. procedure clearRE9; inline;
  14388. procedure setRE0; inline;
  14389. procedure setRE1; inline;
  14390. procedure setRE2; inline;
  14391. procedure setRE3; inline;
  14392. procedure setRE4; inline;
  14393. procedure setRE5; inline;
  14394. procedure setRE6; inline;
  14395. procedure setRE7; inline;
  14396. procedure setRE8; inline;
  14397. procedure setRE9; inline;
  14398. property RE0 : TBits_1 read getRE0 write setRE0;
  14399. property RE1 : TBits_1 read getRE1 write setRE1;
  14400. property RE2 : TBits_1 read getRE2 write setRE2;
  14401. property RE3 : TBits_1 read getRE3 write setRE3;
  14402. property RE4 : TBits_1 read getRE4 write setRE4;
  14403. property RE5 : TBits_1 read getRE5 write setRE5;
  14404. property RE6 : TBits_1 read getRE6 write setRE6;
  14405. property RE7 : TBits_1 read getRE7 write setRE7;
  14406. property RE8 : TBits_1 read getRE8 write setRE8;
  14407. property RE9 : TBits_1 read getRE9 write setRE9;
  14408. property w : TBits_32 read getw write setw;
  14409. end;
  14410. TPortE_bits=(RE0=0,RE1=1,RE2=2,RE3=3,RE4=4,RE5=5,RE6=6,RE7=7,RE8=8,RE9=9);
  14411. TPortE_bitset = set of TPortE_bits;
  14412. TPORTE_LATE = record
  14413. private
  14414. function getLATE0 : TBits_1; inline;
  14415. function getLATE1 : TBits_1; inline;
  14416. function getLATE2 : TBits_1; inline;
  14417. function getLATE3 : TBits_1; inline;
  14418. function getLATE4 : TBits_1; inline;
  14419. function getLATE5 : TBits_1; inline;
  14420. function getLATE6 : TBits_1; inline;
  14421. function getLATE7 : TBits_1; inline;
  14422. function getLATE8 : TBits_1; inline;
  14423. function getLATE9 : TBits_1; inline;
  14424. function getw : TBits_32; inline;
  14425. procedure setLATE0(thebits : TBits_1); inline;
  14426. procedure setLATE1(thebits : TBits_1); inline;
  14427. procedure setLATE2(thebits : TBits_1); inline;
  14428. procedure setLATE3(thebits : TBits_1); inline;
  14429. procedure setLATE4(thebits : TBits_1); inline;
  14430. procedure setLATE5(thebits : TBits_1); inline;
  14431. procedure setLATE6(thebits : TBits_1); inline;
  14432. procedure setLATE7(thebits : TBits_1); inline;
  14433. procedure setLATE8(thebits : TBits_1); inline;
  14434. procedure setLATE9(thebits : TBits_1); inline;
  14435. procedure setw(thebits : TBits_32); inline;
  14436. public
  14437. procedure clearLATE0; inline;
  14438. procedure clearLATE1; inline;
  14439. procedure clearLATE2; inline;
  14440. procedure clearLATE3; inline;
  14441. procedure clearLATE4; inline;
  14442. procedure clearLATE5; inline;
  14443. procedure clearLATE6; inline;
  14444. procedure clearLATE7; inline;
  14445. procedure clearLATE8; inline;
  14446. procedure clearLATE9; inline;
  14447. procedure setLATE0; inline;
  14448. procedure setLATE1; inline;
  14449. procedure setLATE2; inline;
  14450. procedure setLATE3; inline;
  14451. procedure setLATE4; inline;
  14452. procedure setLATE5; inline;
  14453. procedure setLATE6; inline;
  14454. procedure setLATE7; inline;
  14455. procedure setLATE8; inline;
  14456. procedure setLATE9; inline;
  14457. property LATE0 : TBits_1 read getLATE0 write setLATE0;
  14458. property LATE1 : TBits_1 read getLATE1 write setLATE1;
  14459. property LATE2 : TBits_1 read getLATE2 write setLATE2;
  14460. property LATE3 : TBits_1 read getLATE3 write setLATE3;
  14461. property LATE4 : TBits_1 read getLATE4 write setLATE4;
  14462. property LATE5 : TBits_1 read getLATE5 write setLATE5;
  14463. property LATE6 : TBits_1 read getLATE6 write setLATE6;
  14464. property LATE7 : TBits_1 read getLATE7 write setLATE7;
  14465. property LATE8 : TBits_1 read getLATE8 write setLATE8;
  14466. property LATE9 : TBits_1 read getLATE9 write setLATE9;
  14467. property w : TBits_32 read getw write setw;
  14468. end;
  14469. TPORTE_ODCE = record
  14470. private
  14471. function getODCE0 : TBits_1; inline;
  14472. function getODCE1 : TBits_1; inline;
  14473. function getODCE2 : TBits_1; inline;
  14474. function getODCE3 : TBits_1; inline;
  14475. function getODCE4 : TBits_1; inline;
  14476. function getODCE5 : TBits_1; inline;
  14477. function getODCE6 : TBits_1; inline;
  14478. function getODCE7 : TBits_1; inline;
  14479. function getODCE8 : TBits_1; inline;
  14480. function getODCE9 : TBits_1; inline;
  14481. function getw : TBits_32; inline;
  14482. procedure setODCE0(thebits : TBits_1); inline;
  14483. procedure setODCE1(thebits : TBits_1); inline;
  14484. procedure setODCE2(thebits : TBits_1); inline;
  14485. procedure setODCE3(thebits : TBits_1); inline;
  14486. procedure setODCE4(thebits : TBits_1); inline;
  14487. procedure setODCE5(thebits : TBits_1); inline;
  14488. procedure setODCE6(thebits : TBits_1); inline;
  14489. procedure setODCE7(thebits : TBits_1); inline;
  14490. procedure setODCE8(thebits : TBits_1); inline;
  14491. procedure setODCE9(thebits : TBits_1); inline;
  14492. procedure setw(thebits : TBits_32); inline;
  14493. public
  14494. procedure clearODCE0; inline;
  14495. procedure clearODCE1; inline;
  14496. procedure clearODCE2; inline;
  14497. procedure clearODCE3; inline;
  14498. procedure clearODCE4; inline;
  14499. procedure clearODCE5; inline;
  14500. procedure clearODCE6; inline;
  14501. procedure clearODCE7; inline;
  14502. procedure clearODCE8; inline;
  14503. procedure clearODCE9; inline;
  14504. procedure setODCE0; inline;
  14505. procedure setODCE1; inline;
  14506. procedure setODCE2; inline;
  14507. procedure setODCE3; inline;
  14508. procedure setODCE4; inline;
  14509. procedure setODCE5; inline;
  14510. procedure setODCE6; inline;
  14511. procedure setODCE7; inline;
  14512. procedure setODCE8; inline;
  14513. procedure setODCE9; inline;
  14514. property ODCE0 : TBits_1 read getODCE0 write setODCE0;
  14515. property ODCE1 : TBits_1 read getODCE1 write setODCE1;
  14516. property ODCE2 : TBits_1 read getODCE2 write setODCE2;
  14517. property ODCE3 : TBits_1 read getODCE3 write setODCE3;
  14518. property ODCE4 : TBits_1 read getODCE4 write setODCE4;
  14519. property ODCE5 : TBits_1 read getODCE5 write setODCE5;
  14520. property ODCE6 : TBits_1 read getODCE6 write setODCE6;
  14521. property ODCE7 : TBits_1 read getODCE7 write setODCE7;
  14522. property ODCE8 : TBits_1 read getODCE8 write setODCE8;
  14523. property ODCE9 : TBits_1 read getODCE9 write setODCE9;
  14524. property w : TBits_32 read getw write setw;
  14525. end;
  14526. type
  14527. TPORTERegisters = record
  14528. TRISEbits : TPORTE_TRISE;
  14529. TRISE : longWord;
  14530. TRISECLR : longWord;
  14531. TRISESET : longWord;
  14532. TRISEINV : longWord;
  14533. PORTEbits : TPORTE_PORTE;
  14534. PORTE : longWord;
  14535. PORTECLR : longWord;
  14536. PORTESET : longWord;
  14537. PORTEINV : longWord;
  14538. LATEbits : TPORTE_LATE;
  14539. LATE : longWord;
  14540. LATECLR : longWord;
  14541. LATESET : longWord;
  14542. LATEINV : longWord;
  14543. ODCEbits : TPORTE_ODCE;
  14544. ODCE : longWord;
  14545. ODCECLR : longWord;
  14546. ODCESET : longWord;
  14547. ODCEINV : longWord;
  14548. end;
  14549. TPORTF_TRISF = record
  14550. private
  14551. function getTRISF0 : TBits_1; inline;
  14552. function getTRISF1 : TBits_1; inline;
  14553. function getTRISF12 : TBits_1; inline;
  14554. function getTRISF13 : TBits_1; inline;
  14555. function getTRISF2 : TBits_1; inline;
  14556. function getTRISF3 : TBits_1; inline;
  14557. function getTRISF4 : TBits_1; inline;
  14558. function getTRISF5 : TBits_1; inline;
  14559. function getTRISF8 : TBits_1; inline;
  14560. function getw : TBits_32; inline;
  14561. procedure setTRISF0(thebits : TBits_1); inline;
  14562. procedure setTRISF1(thebits : TBits_1); inline;
  14563. procedure setTRISF12(thebits : TBits_1); inline;
  14564. procedure setTRISF13(thebits : TBits_1); inline;
  14565. procedure setTRISF2(thebits : TBits_1); inline;
  14566. procedure setTRISF3(thebits : TBits_1); inline;
  14567. procedure setTRISF4(thebits : TBits_1); inline;
  14568. procedure setTRISF5(thebits : TBits_1); inline;
  14569. procedure setTRISF8(thebits : TBits_1); inline;
  14570. procedure setw(thebits : TBits_32); inline;
  14571. public
  14572. procedure clearTRISF0; inline;
  14573. procedure clearTRISF12; inline;
  14574. procedure clearTRISF13; inline;
  14575. procedure clearTRISF1; inline;
  14576. procedure clearTRISF2; inline;
  14577. procedure clearTRISF3; inline;
  14578. procedure clearTRISF4; inline;
  14579. procedure clearTRISF5; inline;
  14580. procedure clearTRISF8; inline;
  14581. procedure setTRISF0; inline;
  14582. procedure setTRISF12; inline;
  14583. procedure setTRISF13; inline;
  14584. procedure setTRISF1; inline;
  14585. procedure setTRISF2; inline;
  14586. procedure setTRISF3; inline;
  14587. procedure setTRISF4; inline;
  14588. procedure setTRISF5; inline;
  14589. procedure setTRISF8; inline;
  14590. property TRISF0 : TBits_1 read getTRISF0 write setTRISF0;
  14591. property TRISF1 : TBits_1 read getTRISF1 write setTRISF1;
  14592. property TRISF12 : TBits_1 read getTRISF12 write setTRISF12;
  14593. property TRISF13 : TBits_1 read getTRISF13 write setTRISF13;
  14594. property TRISF2 : TBits_1 read getTRISF2 write setTRISF2;
  14595. property TRISF3 : TBits_1 read getTRISF3 write setTRISF3;
  14596. property TRISF4 : TBits_1 read getTRISF4 write setTRISF4;
  14597. property TRISF5 : TBits_1 read getTRISF5 write setTRISF5;
  14598. property TRISF8 : TBits_1 read getTRISF8 write setTRISF8;
  14599. property w : TBits_32 read getw write setw;
  14600. end;
  14601. TPORTF_PORTF = record
  14602. private
  14603. function getRF0 : TBits_1; inline;
  14604. function getRF1 : TBits_1; inline;
  14605. function getRF12 : TBits_1; inline;
  14606. function getRF13 : TBits_1; inline;
  14607. function getRF2 : TBits_1; inline;
  14608. function getRF3 : TBits_1; inline;
  14609. function getRF4 : TBits_1; inline;
  14610. function getRF5 : TBits_1; inline;
  14611. function getRF8 : TBits_1; inline;
  14612. function getw : TBits_32; inline;
  14613. procedure setRF0(thebits : TBits_1); inline;
  14614. procedure setRF1(thebits : TBits_1); inline;
  14615. procedure setRF12(thebits : TBits_1); inline;
  14616. procedure setRF13(thebits : TBits_1); inline;
  14617. procedure setRF2(thebits : TBits_1); inline;
  14618. procedure setRF3(thebits : TBits_1); inline;
  14619. procedure setRF4(thebits : TBits_1); inline;
  14620. procedure setRF5(thebits : TBits_1); inline;
  14621. procedure setRF8(thebits : TBits_1); inline;
  14622. procedure setw(thebits : TBits_32); inline;
  14623. public
  14624. procedure clearRF0; inline;
  14625. procedure clearRF12; inline;
  14626. procedure clearRF13; inline;
  14627. procedure clearRF1; inline;
  14628. procedure clearRF2; inline;
  14629. procedure clearRF3; inline;
  14630. procedure clearRF4; inline;
  14631. procedure clearRF5; inline;
  14632. procedure clearRF8; inline;
  14633. procedure setRF0; inline;
  14634. procedure setRF12; inline;
  14635. procedure setRF13; inline;
  14636. procedure setRF1; inline;
  14637. procedure setRF2; inline;
  14638. procedure setRF3; inline;
  14639. procedure setRF4; inline;
  14640. procedure setRF5; inline;
  14641. procedure setRF8; inline;
  14642. property RF0 : TBits_1 read getRF0 write setRF0;
  14643. property RF1 : TBits_1 read getRF1 write setRF1;
  14644. property RF12 : TBits_1 read getRF12 write setRF12;
  14645. property RF13 : TBits_1 read getRF13 write setRF13;
  14646. property RF2 : TBits_1 read getRF2 write setRF2;
  14647. property RF3 : TBits_1 read getRF3 write setRF3;
  14648. property RF4 : TBits_1 read getRF4 write setRF4;
  14649. property RF5 : TBits_1 read getRF5 write setRF5;
  14650. property RF8 : TBits_1 read getRF8 write setRF8;
  14651. property w : TBits_32 read getw write setw;
  14652. end;
  14653. TPortF_bits=(RF0=0,RF1=1,RF2=2,RF3=3,RF4=4,RF5=5,RF8=8,RF12=12,RF13=13);
  14654. TPortF_bitset = set of TPortF_bits;
  14655. TPORTF_LATF = record
  14656. private
  14657. function getLATF0 : TBits_1; inline;
  14658. function getLATF1 : TBits_1; inline;
  14659. function getLATF12 : TBits_1; inline;
  14660. function getLATF13 : TBits_1; inline;
  14661. function getLATF2 : TBits_1; inline;
  14662. function getLATF3 : TBits_1; inline;
  14663. function getLATF4 : TBits_1; inline;
  14664. function getLATF5 : TBits_1; inline;
  14665. function getLATF8 : TBits_1; inline;
  14666. function getw : TBits_32; inline;
  14667. procedure setLATF0(thebits : TBits_1); inline;
  14668. procedure setLATF1(thebits : TBits_1); inline;
  14669. procedure setLATF12(thebits : TBits_1); inline;
  14670. procedure setLATF13(thebits : TBits_1); inline;
  14671. procedure setLATF2(thebits : TBits_1); inline;
  14672. procedure setLATF3(thebits : TBits_1); inline;
  14673. procedure setLATF4(thebits : TBits_1); inline;
  14674. procedure setLATF5(thebits : TBits_1); inline;
  14675. procedure setLATF8(thebits : TBits_1); inline;
  14676. procedure setw(thebits : TBits_32); inline;
  14677. public
  14678. procedure clearLATF0; inline;
  14679. procedure clearLATF12; inline;
  14680. procedure clearLATF13; inline;
  14681. procedure clearLATF1; inline;
  14682. procedure clearLATF2; inline;
  14683. procedure clearLATF3; inline;
  14684. procedure clearLATF4; inline;
  14685. procedure clearLATF5; inline;
  14686. procedure clearLATF8; inline;
  14687. procedure setLATF0; inline;
  14688. procedure setLATF12; inline;
  14689. procedure setLATF13; inline;
  14690. procedure setLATF1; inline;
  14691. procedure setLATF2; inline;
  14692. procedure setLATF3; inline;
  14693. procedure setLATF4; inline;
  14694. procedure setLATF5; inline;
  14695. procedure setLATF8; inline;
  14696. property LATF0 : TBits_1 read getLATF0 write setLATF0;
  14697. property LATF1 : TBits_1 read getLATF1 write setLATF1;
  14698. property LATF12 : TBits_1 read getLATF12 write setLATF12;
  14699. property LATF13 : TBits_1 read getLATF13 write setLATF13;
  14700. property LATF2 : TBits_1 read getLATF2 write setLATF2;
  14701. property LATF3 : TBits_1 read getLATF3 write setLATF3;
  14702. property LATF4 : TBits_1 read getLATF4 write setLATF4;
  14703. property LATF5 : TBits_1 read getLATF5 write setLATF5;
  14704. property LATF8 : TBits_1 read getLATF8 write setLATF8;
  14705. property w : TBits_32 read getw write setw;
  14706. end;
  14707. TPORTF_ODCF = record
  14708. private
  14709. function getODCF0 : TBits_1; inline;
  14710. function getODCF1 : TBits_1; inline;
  14711. function getODCF12 : TBits_1; inline;
  14712. function getODCF13 : TBits_1; inline;
  14713. function getODCF2 : TBits_1; inline;
  14714. function getODCF3 : TBits_1; inline;
  14715. function getODCF4 : TBits_1; inline;
  14716. function getODCF5 : TBits_1; inline;
  14717. function getODCF8 : TBits_1; inline;
  14718. function getw : TBits_32; inline;
  14719. procedure setODCF0(thebits : TBits_1); inline;
  14720. procedure setODCF1(thebits : TBits_1); inline;
  14721. procedure setODCF12(thebits : TBits_1); inline;
  14722. procedure setODCF13(thebits : TBits_1); inline;
  14723. procedure setODCF2(thebits : TBits_1); inline;
  14724. procedure setODCF3(thebits : TBits_1); inline;
  14725. procedure setODCF4(thebits : TBits_1); inline;
  14726. procedure setODCF5(thebits : TBits_1); inline;
  14727. procedure setODCF8(thebits : TBits_1); inline;
  14728. procedure setw(thebits : TBits_32); inline;
  14729. public
  14730. procedure clearODCF0; inline;
  14731. procedure clearODCF12; inline;
  14732. procedure clearODCF13; inline;
  14733. procedure clearODCF1; inline;
  14734. procedure clearODCF2; inline;
  14735. procedure clearODCF3; inline;
  14736. procedure clearODCF4; inline;
  14737. procedure clearODCF5; inline;
  14738. procedure clearODCF8; inline;
  14739. procedure setODCF0; inline;
  14740. procedure setODCF12; inline;
  14741. procedure setODCF13; inline;
  14742. procedure setODCF1; inline;
  14743. procedure setODCF2; inline;
  14744. procedure setODCF3; inline;
  14745. procedure setODCF4; inline;
  14746. procedure setODCF5; inline;
  14747. procedure setODCF8; inline;
  14748. property ODCF0 : TBits_1 read getODCF0 write setODCF0;
  14749. property ODCF1 : TBits_1 read getODCF1 write setODCF1;
  14750. property ODCF12 : TBits_1 read getODCF12 write setODCF12;
  14751. property ODCF13 : TBits_1 read getODCF13 write setODCF13;
  14752. property ODCF2 : TBits_1 read getODCF2 write setODCF2;
  14753. property ODCF3 : TBits_1 read getODCF3 write setODCF3;
  14754. property ODCF4 : TBits_1 read getODCF4 write setODCF4;
  14755. property ODCF5 : TBits_1 read getODCF5 write setODCF5;
  14756. property ODCF8 : TBits_1 read getODCF8 write setODCF8;
  14757. property w : TBits_32 read getw write setw;
  14758. end;
  14759. type
  14760. TPORTFRegisters = record
  14761. TRISFbits : TPORTF_TRISF;
  14762. TRISF : longWord;
  14763. TRISFCLR : longWord;
  14764. TRISFSET : longWord;
  14765. TRISFINV : longWord;
  14766. PORTFbits : TPORTF_PORTF;
  14767. PORTF : longWord;
  14768. PORTFCLR : longWord;
  14769. PORTFSET : longWord;
  14770. PORTFINV : longWord;
  14771. LATFbits : TPORTF_LATF;
  14772. LATF : longWord;
  14773. LATFCLR : longWord;
  14774. LATFSET : longWord;
  14775. LATFINV : longWord;
  14776. ODCFbits : TPORTF_ODCF;
  14777. ODCF : longWord;
  14778. ODCFCLR : longWord;
  14779. ODCFSET : longWord;
  14780. ODCFINV : longWord;
  14781. end;
  14782. TPORTG_TRISG = record
  14783. private
  14784. function getTRISG0 : TBits_1; inline;
  14785. function getTRISG1 : TBits_1; inline;
  14786. function getTRISG12 : TBits_1; inline;
  14787. function getTRISG13 : TBits_1; inline;
  14788. function getTRISG14 : TBits_1; inline;
  14789. function getTRISG15 : TBits_1; inline;
  14790. function getTRISG2 : TBits_1; inline;
  14791. function getTRISG3 : TBits_1; inline;
  14792. function getTRISG6 : TBits_1; inline;
  14793. function getTRISG7 : TBits_1; inline;
  14794. function getTRISG8 : TBits_1; inline;
  14795. function getTRISG9 : TBits_1; inline;
  14796. function getw : TBits_32; inline;
  14797. procedure setTRISG0(thebits : TBits_1); inline;
  14798. procedure setTRISG1(thebits : TBits_1); inline;
  14799. procedure setTRISG12(thebits : TBits_1); inline;
  14800. procedure setTRISG13(thebits : TBits_1); inline;
  14801. procedure setTRISG14(thebits : TBits_1); inline;
  14802. procedure setTRISG15(thebits : TBits_1); inline;
  14803. procedure setTRISG2(thebits : TBits_1); inline;
  14804. procedure setTRISG3(thebits : TBits_1); inline;
  14805. procedure setTRISG6(thebits : TBits_1); inline;
  14806. procedure setTRISG7(thebits : TBits_1); inline;
  14807. procedure setTRISG8(thebits : TBits_1); inline;
  14808. procedure setTRISG9(thebits : TBits_1); inline;
  14809. procedure setw(thebits : TBits_32); inline;
  14810. public
  14811. procedure clearTRISG0; inline;
  14812. procedure clearTRISG12; inline;
  14813. procedure clearTRISG13; inline;
  14814. procedure clearTRISG14; inline;
  14815. procedure clearTRISG15; inline;
  14816. procedure clearTRISG1; inline;
  14817. procedure clearTRISG2; inline;
  14818. procedure clearTRISG3; inline;
  14819. procedure clearTRISG6; inline;
  14820. procedure clearTRISG7; inline;
  14821. procedure clearTRISG8; inline;
  14822. procedure clearTRISG9; inline;
  14823. procedure setTRISG0; inline;
  14824. procedure setTRISG12; inline;
  14825. procedure setTRISG13; inline;
  14826. procedure setTRISG14; inline;
  14827. procedure setTRISG15; inline;
  14828. procedure setTRISG1; inline;
  14829. procedure setTRISG2; inline;
  14830. procedure setTRISG3; inline;
  14831. procedure setTRISG6; inline;
  14832. procedure setTRISG7; inline;
  14833. procedure setTRISG8; inline;
  14834. procedure setTRISG9; inline;
  14835. property TRISG0 : TBits_1 read getTRISG0 write setTRISG0;
  14836. property TRISG1 : TBits_1 read getTRISG1 write setTRISG1;
  14837. property TRISG12 : TBits_1 read getTRISG12 write setTRISG12;
  14838. property TRISG13 : TBits_1 read getTRISG13 write setTRISG13;
  14839. property TRISG14 : TBits_1 read getTRISG14 write setTRISG14;
  14840. property TRISG15 : TBits_1 read getTRISG15 write setTRISG15;
  14841. property TRISG2 : TBits_1 read getTRISG2 write setTRISG2;
  14842. property TRISG3 : TBits_1 read getTRISG3 write setTRISG3;
  14843. property TRISG6 : TBits_1 read getTRISG6 write setTRISG6;
  14844. property TRISG7 : TBits_1 read getTRISG7 write setTRISG7;
  14845. property TRISG8 : TBits_1 read getTRISG8 write setTRISG8;
  14846. property TRISG9 : TBits_1 read getTRISG9 write setTRISG9;
  14847. property w : TBits_32 read getw write setw;
  14848. end;
  14849. TPORTG_PORTG = record
  14850. private
  14851. function getRG0 : TBits_1; inline;
  14852. function getRG1 : TBits_1; inline;
  14853. function getRG12 : TBits_1; inline;
  14854. function getRG13 : TBits_1; inline;
  14855. function getRG14 : TBits_1; inline;
  14856. function getRG15 : TBits_1; inline;
  14857. function getRG2 : TBits_1; inline;
  14858. function getRG3 : TBits_1; inline;
  14859. function getRG6 : TBits_1; inline;
  14860. function getRG7 : TBits_1; inline;
  14861. function getRG8 : TBits_1; inline;
  14862. function getRG9 : TBits_1; inline;
  14863. function getw : TBits_32; inline;
  14864. procedure setRG0(thebits : TBits_1); inline;
  14865. procedure setRG1(thebits : TBits_1); inline;
  14866. procedure setRG12(thebits : TBits_1); inline;
  14867. procedure setRG13(thebits : TBits_1); inline;
  14868. procedure setRG14(thebits : TBits_1); inline;
  14869. procedure setRG15(thebits : TBits_1); inline;
  14870. procedure setRG2(thebits : TBits_1); inline;
  14871. procedure setRG3(thebits : TBits_1); inline;
  14872. procedure setRG6(thebits : TBits_1); inline;
  14873. procedure setRG7(thebits : TBits_1); inline;
  14874. procedure setRG8(thebits : TBits_1); inline;
  14875. procedure setRG9(thebits : TBits_1); inline;
  14876. procedure setw(thebits : TBits_32); inline;
  14877. public
  14878. procedure clearRG0; inline;
  14879. procedure clearRG12; inline;
  14880. procedure clearRG13; inline;
  14881. procedure clearRG14; inline;
  14882. procedure clearRG15; inline;
  14883. procedure clearRG1; inline;
  14884. procedure clearRG2; inline;
  14885. procedure clearRG3; inline;
  14886. procedure clearRG6; inline;
  14887. procedure clearRG7; inline;
  14888. procedure clearRG8; inline;
  14889. procedure clearRG9; inline;
  14890. procedure setRG0; inline;
  14891. procedure setRG12; inline;
  14892. procedure setRG13; inline;
  14893. procedure setRG14; inline;
  14894. procedure setRG15; inline;
  14895. procedure setRG1; inline;
  14896. procedure setRG2; inline;
  14897. procedure setRG3; inline;
  14898. procedure setRG6; inline;
  14899. procedure setRG7; inline;
  14900. procedure setRG8; inline;
  14901. procedure setRG9; inline;
  14902. property RG0 : TBits_1 read getRG0 write setRG0;
  14903. property RG1 : TBits_1 read getRG1 write setRG1;
  14904. property RG12 : TBits_1 read getRG12 write setRG12;
  14905. property RG13 : TBits_1 read getRG13 write setRG13;
  14906. property RG14 : TBits_1 read getRG14 write setRG14;
  14907. property RG15 : TBits_1 read getRG15 write setRG15;
  14908. property RG2 : TBits_1 read getRG2 write setRG2;
  14909. property RG3 : TBits_1 read getRG3 write setRG3;
  14910. property RG6 : TBits_1 read getRG6 write setRG6;
  14911. property RG7 : TBits_1 read getRG7 write setRG7;
  14912. property RG8 : TBits_1 read getRG8 write setRG8;
  14913. property RG9 : TBits_1 read getRG9 write setRG9;
  14914. property w : TBits_32 read getw write setw;
  14915. end;
  14916. TPortG_bits=(RG0=0,RG1=1,RG2=2,RG3=3,RG6=6,RG7=7,RG8=8,RG9=9,RG12=12,RG13=13,RG14=14,RG15=15);
  14917. TPortG_bitset = set of TPortG_bits;
  14918. TPORTG_LATG = record
  14919. private
  14920. function getLATG0 : TBits_1; inline;
  14921. function getLATG1 : TBits_1; inline;
  14922. function getLATG12 : TBits_1; inline;
  14923. function getLATG13 : TBits_1; inline;
  14924. function getLATG14 : TBits_1; inline;
  14925. function getLATG15 : TBits_1; inline;
  14926. function getLATG2 : TBits_1; inline;
  14927. function getLATG3 : TBits_1; inline;
  14928. function getLATG6 : TBits_1; inline;
  14929. function getLATG7 : TBits_1; inline;
  14930. function getLATG8 : TBits_1; inline;
  14931. function getLATG9 : TBits_1; inline;
  14932. function getw : TBits_32; inline;
  14933. procedure setLATG0(thebits : TBits_1); inline;
  14934. procedure setLATG1(thebits : TBits_1); inline;
  14935. procedure setLATG12(thebits : TBits_1); inline;
  14936. procedure setLATG13(thebits : TBits_1); inline;
  14937. procedure setLATG14(thebits : TBits_1); inline;
  14938. procedure setLATG15(thebits : TBits_1); inline;
  14939. procedure setLATG2(thebits : TBits_1); inline;
  14940. procedure setLATG3(thebits : TBits_1); inline;
  14941. procedure setLATG6(thebits : TBits_1); inline;
  14942. procedure setLATG7(thebits : TBits_1); inline;
  14943. procedure setLATG8(thebits : TBits_1); inline;
  14944. procedure setLATG9(thebits : TBits_1); inline;
  14945. procedure setw(thebits : TBits_32); inline;
  14946. public
  14947. procedure clearLATG0; inline;
  14948. procedure clearLATG12; inline;
  14949. procedure clearLATG13; inline;
  14950. procedure clearLATG14; inline;
  14951. procedure clearLATG15; inline;
  14952. procedure clearLATG1; inline;
  14953. procedure clearLATG2; inline;
  14954. procedure clearLATG3; inline;
  14955. procedure clearLATG6; inline;
  14956. procedure clearLATG7; inline;
  14957. procedure clearLATG8; inline;
  14958. procedure clearLATG9; inline;
  14959. procedure setLATG0; inline;
  14960. procedure setLATG12; inline;
  14961. procedure setLATG13; inline;
  14962. procedure setLATG14; inline;
  14963. procedure setLATG15; inline;
  14964. procedure setLATG1; inline;
  14965. procedure setLATG2; inline;
  14966. procedure setLATG3; inline;
  14967. procedure setLATG6; inline;
  14968. procedure setLATG7; inline;
  14969. procedure setLATG8; inline;
  14970. procedure setLATG9; inline;
  14971. property LATG0 : TBits_1 read getLATG0 write setLATG0;
  14972. property LATG1 : TBits_1 read getLATG1 write setLATG1;
  14973. property LATG12 : TBits_1 read getLATG12 write setLATG12;
  14974. property LATG13 : TBits_1 read getLATG13 write setLATG13;
  14975. property LATG14 : TBits_1 read getLATG14 write setLATG14;
  14976. property LATG15 : TBits_1 read getLATG15 write setLATG15;
  14977. property LATG2 : TBits_1 read getLATG2 write setLATG2;
  14978. property LATG3 : TBits_1 read getLATG3 write setLATG3;
  14979. property LATG6 : TBits_1 read getLATG6 write setLATG6;
  14980. property LATG7 : TBits_1 read getLATG7 write setLATG7;
  14981. property LATG8 : TBits_1 read getLATG8 write setLATG8;
  14982. property LATG9 : TBits_1 read getLATG9 write setLATG9;
  14983. property w : TBits_32 read getw write setw;
  14984. end;
  14985. TPORTG_ODCG = record
  14986. private
  14987. function getODCG0 : TBits_1; inline;
  14988. function getODCG1 : TBits_1; inline;
  14989. function getODCG12 : TBits_1; inline;
  14990. function getODCG13 : TBits_1; inline;
  14991. function getODCG14 : TBits_1; inline;
  14992. function getODCG15 : TBits_1; inline;
  14993. function getODCG2 : TBits_1; inline;
  14994. function getODCG3 : TBits_1; inline;
  14995. function getODCG6 : TBits_1; inline;
  14996. function getODCG7 : TBits_1; inline;
  14997. function getODCG8 : TBits_1; inline;
  14998. function getODCG9 : TBits_1; inline;
  14999. function getw : TBits_32; inline;
  15000. procedure setODCG0(thebits : TBits_1); inline;
  15001. procedure setODCG1(thebits : TBits_1); inline;
  15002. procedure setODCG12(thebits : TBits_1); inline;
  15003. procedure setODCG13(thebits : TBits_1); inline;
  15004. procedure setODCG14(thebits : TBits_1); inline;
  15005. procedure setODCG15(thebits : TBits_1); inline;
  15006. procedure setODCG2(thebits : TBits_1); inline;
  15007. procedure setODCG3(thebits : TBits_1); inline;
  15008. procedure setODCG6(thebits : TBits_1); inline;
  15009. procedure setODCG7(thebits : TBits_1); inline;
  15010. procedure setODCG8(thebits : TBits_1); inline;
  15011. procedure setODCG9(thebits : TBits_1); inline;
  15012. procedure setw(thebits : TBits_32); inline;
  15013. public
  15014. procedure clearODCG0; inline;
  15015. procedure clearODCG12; inline;
  15016. procedure clearODCG13; inline;
  15017. procedure clearODCG14; inline;
  15018. procedure clearODCG15; inline;
  15019. procedure clearODCG1; inline;
  15020. procedure clearODCG2; inline;
  15021. procedure clearODCG3; inline;
  15022. procedure clearODCG6; inline;
  15023. procedure clearODCG7; inline;
  15024. procedure clearODCG8; inline;
  15025. procedure clearODCG9; inline;
  15026. procedure setODCG0; inline;
  15027. procedure setODCG12; inline;
  15028. procedure setODCG13; inline;
  15029. procedure setODCG14; inline;
  15030. procedure setODCG15; inline;
  15031. procedure setODCG1; inline;
  15032. procedure setODCG2; inline;
  15033. procedure setODCG3; inline;
  15034. procedure setODCG6; inline;
  15035. procedure setODCG7; inline;
  15036. procedure setODCG8; inline;
  15037. procedure setODCG9; inline;
  15038. property ODCG0 : TBits_1 read getODCG0 write setODCG0;
  15039. property ODCG1 : TBits_1 read getODCG1 write setODCG1;
  15040. property ODCG12 : TBits_1 read getODCG12 write setODCG12;
  15041. property ODCG13 : TBits_1 read getODCG13 write setODCG13;
  15042. property ODCG14 : TBits_1 read getODCG14 write setODCG14;
  15043. property ODCG15 : TBits_1 read getODCG15 write setODCG15;
  15044. property ODCG2 : TBits_1 read getODCG2 write setODCG2;
  15045. property ODCG3 : TBits_1 read getODCG3 write setODCG3;
  15046. property ODCG6 : TBits_1 read getODCG6 write setODCG6;
  15047. property ODCG7 : TBits_1 read getODCG7 write setODCG7;
  15048. property ODCG8 : TBits_1 read getODCG8 write setODCG8;
  15049. property ODCG9 : TBits_1 read getODCG9 write setODCG9;
  15050. property w : TBits_32 read getw write setw;
  15051. end;
  15052. TPORTG_CNCON = record
  15053. private
  15054. function getON : TBits_1; inline;
  15055. function getSIDL : TBits_1; inline;
  15056. function getw : TBits_32; inline;
  15057. procedure setON(thebits : TBits_1); inline;
  15058. procedure setSIDL(thebits : TBits_1); inline;
  15059. procedure setw(thebits : TBits_32); inline;
  15060. public
  15061. procedure clearON; inline;
  15062. procedure clearSIDL; inline;
  15063. procedure setON; inline;
  15064. procedure setSIDL; inline;
  15065. property ON : TBits_1 read getON write setON;
  15066. property SIDL : TBits_1 read getSIDL write setSIDL;
  15067. property w : TBits_32 read getw write setw;
  15068. end;
  15069. TPORTG_CNEN = record
  15070. private
  15071. function getCNEN0 : TBits_1; inline;
  15072. function getCNEN1 : TBits_1; inline;
  15073. function getCNEN10 : TBits_1; inline;
  15074. function getCNEN11 : TBits_1; inline;
  15075. function getCNEN12 : TBits_1; inline;
  15076. function getCNEN13 : TBits_1; inline;
  15077. function getCNEN14 : TBits_1; inline;
  15078. function getCNEN15 : TBits_1; inline;
  15079. function getCNEN16 : TBits_1; inline;
  15080. function getCNEN17 : TBits_1; inline;
  15081. function getCNEN18 : TBits_1; inline;
  15082. function getCNEN19 : TBits_1; inline;
  15083. function getCNEN2 : TBits_1; inline;
  15084. function getCNEN20 : TBits_1; inline;
  15085. function getCNEN21 : TBits_1; inline;
  15086. function getCNEN3 : TBits_1; inline;
  15087. function getCNEN4 : TBits_1; inline;
  15088. function getCNEN5 : TBits_1; inline;
  15089. function getCNEN6 : TBits_1; inline;
  15090. function getCNEN7 : TBits_1; inline;
  15091. function getCNEN8 : TBits_1; inline;
  15092. function getCNEN9 : TBits_1; inline;
  15093. function getw : TBits_32; inline;
  15094. procedure setCNEN0(thebits : TBits_1); inline;
  15095. procedure setCNEN1(thebits : TBits_1); inline;
  15096. procedure setCNEN10(thebits : TBits_1); inline;
  15097. procedure setCNEN11(thebits : TBits_1); inline;
  15098. procedure setCNEN12(thebits : TBits_1); inline;
  15099. procedure setCNEN13(thebits : TBits_1); inline;
  15100. procedure setCNEN14(thebits : TBits_1); inline;
  15101. procedure setCNEN15(thebits : TBits_1); inline;
  15102. procedure setCNEN16(thebits : TBits_1); inline;
  15103. procedure setCNEN17(thebits : TBits_1); inline;
  15104. procedure setCNEN18(thebits : TBits_1); inline;
  15105. procedure setCNEN19(thebits : TBits_1); inline;
  15106. procedure setCNEN2(thebits : TBits_1); inline;
  15107. procedure setCNEN20(thebits : TBits_1); inline;
  15108. procedure setCNEN21(thebits : TBits_1); inline;
  15109. procedure setCNEN3(thebits : TBits_1); inline;
  15110. procedure setCNEN4(thebits : TBits_1); inline;
  15111. procedure setCNEN5(thebits : TBits_1); inline;
  15112. procedure setCNEN6(thebits : TBits_1); inline;
  15113. procedure setCNEN7(thebits : TBits_1); inline;
  15114. procedure setCNEN8(thebits : TBits_1); inline;
  15115. procedure setCNEN9(thebits : TBits_1); inline;
  15116. procedure setw(thebits : TBits_32); inline;
  15117. public
  15118. procedure clearCNEN0; inline;
  15119. procedure clearCNEN10; inline;
  15120. procedure clearCNEN11; inline;
  15121. procedure clearCNEN12; inline;
  15122. procedure clearCNEN13; inline;
  15123. procedure clearCNEN14; inline;
  15124. procedure clearCNEN15; inline;
  15125. procedure clearCNEN16; inline;
  15126. procedure clearCNEN17; inline;
  15127. procedure clearCNEN18; inline;
  15128. procedure clearCNEN19; inline;
  15129. procedure clearCNEN1; inline;
  15130. procedure clearCNEN20; inline;
  15131. procedure clearCNEN21; inline;
  15132. procedure clearCNEN2; inline;
  15133. procedure clearCNEN3; inline;
  15134. procedure clearCNEN4; inline;
  15135. procedure clearCNEN5; inline;
  15136. procedure clearCNEN6; inline;
  15137. procedure clearCNEN7; inline;
  15138. procedure clearCNEN8; inline;
  15139. procedure clearCNEN9; inline;
  15140. procedure setCNEN0; inline;
  15141. procedure setCNEN10; inline;
  15142. procedure setCNEN11; inline;
  15143. procedure setCNEN12; inline;
  15144. procedure setCNEN13; inline;
  15145. procedure setCNEN14; inline;
  15146. procedure setCNEN15; inline;
  15147. procedure setCNEN16; inline;
  15148. procedure setCNEN17; inline;
  15149. procedure setCNEN18; inline;
  15150. procedure setCNEN19; inline;
  15151. procedure setCNEN1; inline;
  15152. procedure setCNEN20; inline;
  15153. procedure setCNEN21; inline;
  15154. procedure setCNEN2; inline;
  15155. procedure setCNEN3; inline;
  15156. procedure setCNEN4; inline;
  15157. procedure setCNEN5; inline;
  15158. procedure setCNEN6; inline;
  15159. procedure setCNEN7; inline;
  15160. procedure setCNEN8; inline;
  15161. procedure setCNEN9; inline;
  15162. property CNEN0 : TBits_1 read getCNEN0 write setCNEN0;
  15163. property CNEN1 : TBits_1 read getCNEN1 write setCNEN1;
  15164. property CNEN10 : TBits_1 read getCNEN10 write setCNEN10;
  15165. property CNEN11 : TBits_1 read getCNEN11 write setCNEN11;
  15166. property CNEN12 : TBits_1 read getCNEN12 write setCNEN12;
  15167. property CNEN13 : TBits_1 read getCNEN13 write setCNEN13;
  15168. property CNEN14 : TBits_1 read getCNEN14 write setCNEN14;
  15169. property CNEN15 : TBits_1 read getCNEN15 write setCNEN15;
  15170. property CNEN16 : TBits_1 read getCNEN16 write setCNEN16;
  15171. property CNEN17 : TBits_1 read getCNEN17 write setCNEN17;
  15172. property CNEN18 : TBits_1 read getCNEN18 write setCNEN18;
  15173. property CNEN19 : TBits_1 read getCNEN19 write setCNEN19;
  15174. property CNEN2 : TBits_1 read getCNEN2 write setCNEN2;
  15175. property CNEN20 : TBits_1 read getCNEN20 write setCNEN20;
  15176. property CNEN21 : TBits_1 read getCNEN21 write setCNEN21;
  15177. property CNEN3 : TBits_1 read getCNEN3 write setCNEN3;
  15178. property CNEN4 : TBits_1 read getCNEN4 write setCNEN4;
  15179. property CNEN5 : TBits_1 read getCNEN5 write setCNEN5;
  15180. property CNEN6 : TBits_1 read getCNEN6 write setCNEN6;
  15181. property CNEN7 : TBits_1 read getCNEN7 write setCNEN7;
  15182. property CNEN8 : TBits_1 read getCNEN8 write setCNEN8;
  15183. property CNEN9 : TBits_1 read getCNEN9 write setCNEN9;
  15184. property w : TBits_32 read getw write setw;
  15185. end;
  15186. TPORTG_CNPUE = record
  15187. private
  15188. function getCNPUE0 : TBits_1; inline;
  15189. function getCNPUE1 : TBits_1; inline;
  15190. function getCNPUE10 : TBits_1; inline;
  15191. function getCNPUE11 : TBits_1; inline;
  15192. function getCNPUE12 : TBits_1; inline;
  15193. function getCNPUE13 : TBits_1; inline;
  15194. function getCNPUE14 : TBits_1; inline;
  15195. function getCNPUE15 : TBits_1; inline;
  15196. function getCNPUE16 : TBits_1; inline;
  15197. function getCNPUE17 : TBits_1; inline;
  15198. function getCNPUE18 : TBits_1; inline;
  15199. function getCNPUE19 : TBits_1; inline;
  15200. function getCNPUE2 : TBits_1; inline;
  15201. function getCNPUE20 : TBits_1; inline;
  15202. function getCNPUE21 : TBits_1; inline;
  15203. function getCNPUE3 : TBits_1; inline;
  15204. function getCNPUE4 : TBits_1; inline;
  15205. function getCNPUE5 : TBits_1; inline;
  15206. function getCNPUE6 : TBits_1; inline;
  15207. function getCNPUE7 : TBits_1; inline;
  15208. function getCNPUE8 : TBits_1; inline;
  15209. function getCNPUE9 : TBits_1; inline;
  15210. function getw : TBits_32; inline;
  15211. procedure setCNPUE0(thebits : TBits_1); inline;
  15212. procedure setCNPUE1(thebits : TBits_1); inline;
  15213. procedure setCNPUE10(thebits : TBits_1); inline;
  15214. procedure setCNPUE11(thebits : TBits_1); inline;
  15215. procedure setCNPUE12(thebits : TBits_1); inline;
  15216. procedure setCNPUE13(thebits : TBits_1); inline;
  15217. procedure setCNPUE14(thebits : TBits_1); inline;
  15218. procedure setCNPUE15(thebits : TBits_1); inline;
  15219. procedure setCNPUE16(thebits : TBits_1); inline;
  15220. procedure setCNPUE17(thebits : TBits_1); inline;
  15221. procedure setCNPUE18(thebits : TBits_1); inline;
  15222. procedure setCNPUE19(thebits : TBits_1); inline;
  15223. procedure setCNPUE2(thebits : TBits_1); inline;
  15224. procedure setCNPUE20(thebits : TBits_1); inline;
  15225. procedure setCNPUE21(thebits : TBits_1); inline;
  15226. procedure setCNPUE3(thebits : TBits_1); inline;
  15227. procedure setCNPUE4(thebits : TBits_1); inline;
  15228. procedure setCNPUE5(thebits : TBits_1); inline;
  15229. procedure setCNPUE6(thebits : TBits_1); inline;
  15230. procedure setCNPUE7(thebits : TBits_1); inline;
  15231. procedure setCNPUE8(thebits : TBits_1); inline;
  15232. procedure setCNPUE9(thebits : TBits_1); inline;
  15233. procedure setw(thebits : TBits_32); inline;
  15234. public
  15235. procedure clearCNPUE0; inline;
  15236. procedure clearCNPUE10; inline;
  15237. procedure clearCNPUE11; inline;
  15238. procedure clearCNPUE12; inline;
  15239. procedure clearCNPUE13; inline;
  15240. procedure clearCNPUE14; inline;
  15241. procedure clearCNPUE15; inline;
  15242. procedure clearCNPUE16; inline;
  15243. procedure clearCNPUE17; inline;
  15244. procedure clearCNPUE18; inline;
  15245. procedure clearCNPUE19; inline;
  15246. procedure clearCNPUE1; inline;
  15247. procedure clearCNPUE20; inline;
  15248. procedure clearCNPUE21; inline;
  15249. procedure clearCNPUE2; inline;
  15250. procedure clearCNPUE3; inline;
  15251. procedure clearCNPUE4; inline;
  15252. procedure clearCNPUE5; inline;
  15253. procedure clearCNPUE6; inline;
  15254. procedure clearCNPUE7; inline;
  15255. procedure clearCNPUE8; inline;
  15256. procedure clearCNPUE9; inline;
  15257. procedure setCNPUE0; inline;
  15258. procedure setCNPUE10; inline;
  15259. procedure setCNPUE11; inline;
  15260. procedure setCNPUE12; inline;
  15261. procedure setCNPUE13; inline;
  15262. procedure setCNPUE14; inline;
  15263. procedure setCNPUE15; inline;
  15264. procedure setCNPUE16; inline;
  15265. procedure setCNPUE17; inline;
  15266. procedure setCNPUE18; inline;
  15267. procedure setCNPUE19; inline;
  15268. procedure setCNPUE1; inline;
  15269. procedure setCNPUE20; inline;
  15270. procedure setCNPUE21; inline;
  15271. procedure setCNPUE2; inline;
  15272. procedure setCNPUE3; inline;
  15273. procedure setCNPUE4; inline;
  15274. procedure setCNPUE5; inline;
  15275. procedure setCNPUE6; inline;
  15276. procedure setCNPUE7; inline;
  15277. procedure setCNPUE8; inline;
  15278. procedure setCNPUE9; inline;
  15279. property CNPUE0 : TBits_1 read getCNPUE0 write setCNPUE0;
  15280. property CNPUE1 : TBits_1 read getCNPUE1 write setCNPUE1;
  15281. property CNPUE10 : TBits_1 read getCNPUE10 write setCNPUE10;
  15282. property CNPUE11 : TBits_1 read getCNPUE11 write setCNPUE11;
  15283. property CNPUE12 : TBits_1 read getCNPUE12 write setCNPUE12;
  15284. property CNPUE13 : TBits_1 read getCNPUE13 write setCNPUE13;
  15285. property CNPUE14 : TBits_1 read getCNPUE14 write setCNPUE14;
  15286. property CNPUE15 : TBits_1 read getCNPUE15 write setCNPUE15;
  15287. property CNPUE16 : TBits_1 read getCNPUE16 write setCNPUE16;
  15288. property CNPUE17 : TBits_1 read getCNPUE17 write setCNPUE17;
  15289. property CNPUE18 : TBits_1 read getCNPUE18 write setCNPUE18;
  15290. property CNPUE19 : TBits_1 read getCNPUE19 write setCNPUE19;
  15291. property CNPUE2 : TBits_1 read getCNPUE2 write setCNPUE2;
  15292. property CNPUE20 : TBits_1 read getCNPUE20 write setCNPUE20;
  15293. property CNPUE21 : TBits_1 read getCNPUE21 write setCNPUE21;
  15294. property CNPUE3 : TBits_1 read getCNPUE3 write setCNPUE3;
  15295. property CNPUE4 : TBits_1 read getCNPUE4 write setCNPUE4;
  15296. property CNPUE5 : TBits_1 read getCNPUE5 write setCNPUE5;
  15297. property CNPUE6 : TBits_1 read getCNPUE6 write setCNPUE6;
  15298. property CNPUE7 : TBits_1 read getCNPUE7 write setCNPUE7;
  15299. property CNPUE8 : TBits_1 read getCNPUE8 write setCNPUE8;
  15300. property CNPUE9 : TBits_1 read getCNPUE9 write setCNPUE9;
  15301. property w : TBits_32 read getw write setw;
  15302. end;
  15303. type
  15304. TPORTGRegisters = record
  15305. TRISGbits : TPORTG_TRISG;
  15306. TRISG : longWord;
  15307. TRISGCLR : longWord;
  15308. TRISGSET : longWord;
  15309. TRISGINV : longWord;
  15310. PORTGbits : TPORTG_PORTG;
  15311. PORTG : longWord;
  15312. PORTGCLR : longWord;
  15313. PORTGSET : longWord;
  15314. PORTGINV : longWord;
  15315. LATGbits : TPORTG_LATG;
  15316. LATG : longWord;
  15317. LATGCLR : longWord;
  15318. LATGSET : longWord;
  15319. LATGINV : longWord;
  15320. ODCGbits : TPORTG_ODCG;
  15321. ODCG : longWord;
  15322. ODCGCLR : longWord;
  15323. ODCGSET : longWord;
  15324. ODCGINV : longWord;
  15325. CNCONbits : TPORTG_CNCON;
  15326. CNCON : longWord;
  15327. CNCONCLR : longWord;
  15328. CNCONSET : longWord;
  15329. CNCONINV : longWord;
  15330. CNENbits : TPORTG_CNEN;
  15331. CNEN : longWord;
  15332. CNENCLR : longWord;
  15333. CNENSET : longWord;
  15334. CNENINV : longWord;
  15335. CNPUEbits : TPORTG_CNPUE;
  15336. CNPUE : longWord;
  15337. CNPUECLR : longWord;
  15338. CNPUESET : longWord;
  15339. CNPUEINV : longWord;
  15340. end;
  15341. TETH_ETHCON1 = record
  15342. private
  15343. function getAUTOFC : TBits_1; inline;
  15344. function getBUFCDEC : TBits_1; inline;
  15345. function getMANFC : TBits_1; inline;
  15346. function getON : TBits_1; inline;
  15347. function getPTV : TBits_16; inline;
  15348. function getRXEN : TBits_1; inline;
  15349. function getSIDL : TBits_1; inline;
  15350. function getTXRTS : TBits_1; inline;
  15351. function getw : TBits_32; inline;
  15352. procedure setAUTOFC(thebits : TBits_1); inline;
  15353. procedure setBUFCDEC(thebits : TBits_1); inline;
  15354. procedure setMANFC(thebits : TBits_1); inline;
  15355. procedure setON(thebits : TBits_1); inline;
  15356. procedure setPTV(thebits : TBits_16); inline;
  15357. procedure setRXEN(thebits : TBits_1); inline;
  15358. procedure setSIDL(thebits : TBits_1); inline;
  15359. procedure setTXRTS(thebits : TBits_1); inline;
  15360. procedure setw(thebits : TBits_32); inline;
  15361. public
  15362. procedure clearAUTOFC; inline;
  15363. procedure clearBUFCDEC; inline;
  15364. procedure clearMANFC; inline;
  15365. procedure clearON; inline;
  15366. procedure clearRXEN; inline;
  15367. procedure clearSIDL; inline;
  15368. procedure clearTXRTS; inline;
  15369. procedure setAUTOFC; inline;
  15370. procedure setBUFCDEC; inline;
  15371. procedure setMANFC; inline;
  15372. procedure setON; inline;
  15373. procedure setRXEN; inline;
  15374. procedure setSIDL; inline;
  15375. procedure setTXRTS; inline;
  15376. property AUTOFC : TBits_1 read getAUTOFC write setAUTOFC;
  15377. property BUFCDEC : TBits_1 read getBUFCDEC write setBUFCDEC;
  15378. property MANFC : TBits_1 read getMANFC write setMANFC;
  15379. property ON : TBits_1 read getON write setON;
  15380. property PTV : TBits_16 read getPTV write setPTV;
  15381. property RXEN : TBits_1 read getRXEN write setRXEN;
  15382. property SIDL : TBits_1 read getSIDL write setSIDL;
  15383. property TXRTS : TBits_1 read getTXRTS write setTXRTS;
  15384. property w : TBits_32 read getw write setw;
  15385. end;
  15386. TETH_ETHCON2 = record
  15387. private
  15388. function getRXBUF_SZ : TBits_7; inline;
  15389. function getw : TBits_32; inline;
  15390. procedure setRXBUF_SZ(thebits : TBits_7); inline;
  15391. procedure setw(thebits : TBits_32); inline;
  15392. public
  15393. property RXBUF_SZ : TBits_7 read getRXBUF_SZ write setRXBUF_SZ;
  15394. property w : TBits_32 read getw write setw;
  15395. end;
  15396. TETH_ETHTXST = record
  15397. private
  15398. function getTXSTADDR : TBits_30; inline;
  15399. function getw : TBits_32; inline;
  15400. procedure setTXSTADDR(thebits : TBits_30); inline;
  15401. procedure setw(thebits : TBits_32); inline;
  15402. public
  15403. property TXSTADDR : TBits_30 read getTXSTADDR write setTXSTADDR;
  15404. property w : TBits_32 read getw write setw;
  15405. end;
  15406. TETH_ETHRXST = record
  15407. private
  15408. function getRXSTADDR : TBits_30; inline;
  15409. function getw : TBits_32; inline;
  15410. procedure setRXSTADDR(thebits : TBits_30); inline;
  15411. procedure setw(thebits : TBits_32); inline;
  15412. public
  15413. property RXSTADDR : TBits_30 read getRXSTADDR write setRXSTADDR;
  15414. property w : TBits_32 read getw write setw;
  15415. end;
  15416. TETH_ETHHT0 = record
  15417. private
  15418. function getHTLOWER : TBits_32; inline;
  15419. function getw : TBits_32; inline;
  15420. procedure setHTLOWER(thebits : TBits_32); inline;
  15421. procedure setw(thebits : TBits_32); inline;
  15422. public
  15423. property HTLOWER : TBits_32 read getHTLOWER write setHTLOWER;
  15424. property w : TBits_32 read getw write setw;
  15425. end;
  15426. TETH_ETHHT1 = record
  15427. private
  15428. function getHTUPPER : TBits_32; inline;
  15429. function getw : TBits_32; inline;
  15430. procedure setHTUPPER(thebits : TBits_32); inline;
  15431. procedure setw(thebits : TBits_32); inline;
  15432. public
  15433. property HTUPPER : TBits_32 read getHTUPPER write setHTUPPER;
  15434. property w : TBits_32 read getw write setw;
  15435. end;
  15436. TETH_ETHPMM0 = record
  15437. private
  15438. function getPMMLOWER : TBits_32; inline;
  15439. function getw : TBits_32; inline;
  15440. procedure setPMMLOWER(thebits : TBits_32); inline;
  15441. procedure setw(thebits : TBits_32); inline;
  15442. public
  15443. property PMMLOWER : TBits_32 read getPMMLOWER write setPMMLOWER;
  15444. property w : TBits_32 read getw write setw;
  15445. end;
  15446. TETH_ETHPMM1 = record
  15447. private
  15448. function getPMMUPPER : TBits_32; inline;
  15449. function getw : TBits_32; inline;
  15450. procedure setPMMUPPER(thebits : TBits_32); inline;
  15451. procedure setw(thebits : TBits_32); inline;
  15452. public
  15453. property PMMUPPER : TBits_32 read getPMMUPPER write setPMMUPPER;
  15454. property w : TBits_32 read getw write setw;
  15455. end;
  15456. TETH_ETHPMCS = record
  15457. private
  15458. function getPMCS : TBits_16; inline;
  15459. function getw : TBits_32; inline;
  15460. procedure setPMCS(thebits : TBits_16); inline;
  15461. procedure setw(thebits : TBits_32); inline;
  15462. public
  15463. property PMCS : TBits_16 read getPMCS write setPMCS;
  15464. property w : TBits_32 read getw write setw;
  15465. end;
  15466. TETH_ETHPMO = record
  15467. private
  15468. function getPMO : TBits_16; inline;
  15469. function getw : TBits_32; inline;
  15470. procedure setPMO(thebits : TBits_16); inline;
  15471. procedure setw(thebits : TBits_32); inline;
  15472. public
  15473. property PMO : TBits_16 read getPMO write setPMO;
  15474. property w : TBits_32 read getw write setw;
  15475. end;
  15476. TETH_ETHRXFC = record
  15477. private
  15478. function getBCEN : TBits_1; inline;
  15479. function getCRCERREN : TBits_1; inline;
  15480. function getCRCOKEN : TBits_1; inline;
  15481. function getHTEN : TBits_1; inline;
  15482. function getMCEN : TBits_1; inline;
  15483. function getMPEN : TBits_1; inline;
  15484. function getNOTMEEN : TBits_1; inline;
  15485. function getNOTPM : TBits_1; inline;
  15486. function getPMMODE : TBits_4; inline;
  15487. function getRUNTEN : TBits_1; inline;
  15488. function getRUNTERREN : TBits_1; inline;
  15489. function getUCEN : TBits_1; inline;
  15490. function getw : TBits_32; inline;
  15491. procedure setBCEN(thebits : TBits_1); inline;
  15492. procedure setCRCERREN(thebits : TBits_1); inline;
  15493. procedure setCRCOKEN(thebits : TBits_1); inline;
  15494. procedure setHTEN(thebits : TBits_1); inline;
  15495. procedure setMCEN(thebits : TBits_1); inline;
  15496. procedure setMPEN(thebits : TBits_1); inline;
  15497. procedure setNOTMEEN(thebits : TBits_1); inline;
  15498. procedure setNOTPM(thebits : TBits_1); inline;
  15499. procedure setPMMODE(thebits : TBits_4); inline;
  15500. procedure setRUNTEN(thebits : TBits_1); inline;
  15501. procedure setRUNTERREN(thebits : TBits_1); inline;
  15502. procedure setUCEN(thebits : TBits_1); inline;
  15503. procedure setw(thebits : TBits_32); inline;
  15504. public
  15505. procedure clearBCEN; inline;
  15506. procedure clearCRCERREN; inline;
  15507. procedure clearCRCOKEN; inline;
  15508. procedure clearHTEN; inline;
  15509. procedure clearMCEN; inline;
  15510. procedure clearMPEN; inline;
  15511. procedure clearNOTMEEN; inline;
  15512. procedure clearNOTPM; inline;
  15513. procedure clearRUNTEN; inline;
  15514. procedure clearRUNTERREN; inline;
  15515. procedure clearUCEN; inline;
  15516. procedure setBCEN; inline;
  15517. procedure setCRCERREN; inline;
  15518. procedure setCRCOKEN; inline;
  15519. procedure setHTEN; inline;
  15520. procedure setMCEN; inline;
  15521. procedure setMPEN; inline;
  15522. procedure setNOTMEEN; inline;
  15523. procedure setNOTPM; inline;
  15524. procedure setRUNTEN; inline;
  15525. procedure setRUNTERREN; inline;
  15526. procedure setUCEN; inline;
  15527. property BCEN : TBits_1 read getBCEN write setBCEN;
  15528. property CRCERREN : TBits_1 read getCRCERREN write setCRCERREN;
  15529. property CRCOKEN : TBits_1 read getCRCOKEN write setCRCOKEN;
  15530. property HTEN : TBits_1 read getHTEN write setHTEN;
  15531. property MCEN : TBits_1 read getMCEN write setMCEN;
  15532. property MPEN : TBits_1 read getMPEN write setMPEN;
  15533. property NOTMEEN : TBits_1 read getNOTMEEN write setNOTMEEN;
  15534. property NOTPM : TBits_1 read getNOTPM write setNOTPM;
  15535. property PMMODE : TBits_4 read getPMMODE write setPMMODE;
  15536. property RUNTEN : TBits_1 read getRUNTEN write setRUNTEN;
  15537. property RUNTERREN : TBits_1 read getRUNTERREN write setRUNTERREN;
  15538. property UCEN : TBits_1 read getUCEN write setUCEN;
  15539. property w : TBits_32 read getw write setw;
  15540. end;
  15541. TETH_ETHRXWM = record
  15542. private
  15543. function getRXEWM : TBits_8; inline;
  15544. function getRXFWM : TBits_8; inline;
  15545. function getw : TBits_32; inline;
  15546. procedure setRXEWM(thebits : TBits_8); inline;
  15547. procedure setRXFWM(thebits : TBits_8); inline;
  15548. procedure setw(thebits : TBits_32); inline;
  15549. public
  15550. property RXEWM : TBits_8 read getRXEWM write setRXEWM;
  15551. property RXFWM : TBits_8 read getRXFWM write setRXFWM;
  15552. property w : TBits_32 read getw write setw;
  15553. end;
  15554. TETH_ETHIEN = record
  15555. private
  15556. function getEWMARKIE : TBits_1; inline;
  15557. function getFWMARKIE : TBits_1; inline;
  15558. function getPKTPENDIE : TBits_1; inline;
  15559. function getRXACTIE : TBits_1; inline;
  15560. function getRXBUFNAIE : TBits_1; inline;
  15561. function getRXBUSEIE : TBits_1; inline;
  15562. function getRXDONEIE : TBits_1; inline;
  15563. function getRXOVFLWIE : TBits_1; inline;
  15564. function getTXABORTIE : TBits_1; inline;
  15565. function getTXBUSEIE : TBits_1; inline;
  15566. function getTXDONEIE : TBits_1; inline;
  15567. function getw : TBits_32; inline;
  15568. procedure setEWMARKIE(thebits : TBits_1); inline;
  15569. procedure setFWMARKIE(thebits : TBits_1); inline;
  15570. procedure setPKTPENDIE(thebits : TBits_1); inline;
  15571. procedure setRXACTIE(thebits : TBits_1); inline;
  15572. procedure setRXBUFNAIE(thebits : TBits_1); inline;
  15573. procedure setRXBUSEIE(thebits : TBits_1); inline;
  15574. procedure setRXDONEIE(thebits : TBits_1); inline;
  15575. procedure setRXOVFLWIE(thebits : TBits_1); inline;
  15576. procedure setTXABORTIE(thebits : TBits_1); inline;
  15577. procedure setTXBUSEIE(thebits : TBits_1); inline;
  15578. procedure setTXDONEIE(thebits : TBits_1); inline;
  15579. procedure setw(thebits : TBits_32); inline;
  15580. public
  15581. procedure clearEWMARKIE; inline;
  15582. procedure clearFWMARKIE; inline;
  15583. procedure clearPKTPENDIE; inline;
  15584. procedure clearRXACTIE; inline;
  15585. procedure clearRXBUFNAIE; inline;
  15586. procedure clearRXBUSEIE; inline;
  15587. procedure clearRXDONEIE; inline;
  15588. procedure clearRXOVFLWIE; inline;
  15589. procedure clearTXABORTIE; inline;
  15590. procedure clearTXBUSEIE; inline;
  15591. procedure clearTXDONEIE; inline;
  15592. procedure setEWMARKIE; inline;
  15593. procedure setFWMARKIE; inline;
  15594. procedure setPKTPENDIE; inline;
  15595. procedure setRXACTIE; inline;
  15596. procedure setRXBUFNAIE; inline;
  15597. procedure setRXBUSEIE; inline;
  15598. procedure setRXDONEIE; inline;
  15599. procedure setRXOVFLWIE; inline;
  15600. procedure setTXABORTIE; inline;
  15601. procedure setTXBUSEIE; inline;
  15602. procedure setTXDONEIE; inline;
  15603. property EWMARKIE : TBits_1 read getEWMARKIE write setEWMARKIE;
  15604. property FWMARKIE : TBits_1 read getFWMARKIE write setFWMARKIE;
  15605. property PKTPENDIE : TBits_1 read getPKTPENDIE write setPKTPENDIE;
  15606. property RXACTIE : TBits_1 read getRXACTIE write setRXACTIE;
  15607. property RXBUFNAIE : TBits_1 read getRXBUFNAIE write setRXBUFNAIE;
  15608. property RXBUSEIE : TBits_1 read getRXBUSEIE write setRXBUSEIE;
  15609. property RXDONEIE : TBits_1 read getRXDONEIE write setRXDONEIE;
  15610. property RXOVFLWIE : TBits_1 read getRXOVFLWIE write setRXOVFLWIE;
  15611. property TXABORTIE : TBits_1 read getTXABORTIE write setTXABORTIE;
  15612. property TXBUSEIE : TBits_1 read getTXBUSEIE write setTXBUSEIE;
  15613. property TXDONEIE : TBits_1 read getTXDONEIE write setTXDONEIE;
  15614. property w : TBits_32 read getw write setw;
  15615. end;
  15616. TETH_ETHIRQ = record
  15617. private
  15618. function getEWMARK : TBits_1; inline;
  15619. function getFWMARK : TBits_1; inline;
  15620. function getPKTPEND : TBits_1; inline;
  15621. function getRXACT : TBits_1; inline;
  15622. function getRXBUFNA : TBits_1; inline;
  15623. function getRXBUSE : TBits_1; inline;
  15624. function getRXDONE : TBits_1; inline;
  15625. function getRXOVFLW : TBits_1; inline;
  15626. function getTXABORT : TBits_1; inline;
  15627. function getTXBUSE : TBits_1; inline;
  15628. function getTXDONE : TBits_1; inline;
  15629. function getw : TBits_32; inline;
  15630. procedure setEWMARK(thebits : TBits_1); inline;
  15631. procedure setFWMARK(thebits : TBits_1); inline;
  15632. procedure setPKTPEND(thebits : TBits_1); inline;
  15633. procedure setRXACT(thebits : TBits_1); inline;
  15634. procedure setRXBUFNA(thebits : TBits_1); inline;
  15635. procedure setRXBUSE(thebits : TBits_1); inline;
  15636. procedure setRXDONE(thebits : TBits_1); inline;
  15637. procedure setRXOVFLW(thebits : TBits_1); inline;
  15638. procedure setTXABORT(thebits : TBits_1); inline;
  15639. procedure setTXBUSE(thebits : TBits_1); inline;
  15640. procedure setTXDONE(thebits : TBits_1); inline;
  15641. procedure setw(thebits : TBits_32); inline;
  15642. public
  15643. procedure clearEWMARK; inline;
  15644. procedure clearFWMARK; inline;
  15645. procedure clearPKTPEND; inline;
  15646. procedure clearRXACT; inline;
  15647. procedure clearRXBUFNA; inline;
  15648. procedure clearRXBUSE; inline;
  15649. procedure clearRXDONE; inline;
  15650. procedure clearRXOVFLW; inline;
  15651. procedure clearTXABORT; inline;
  15652. procedure clearTXBUSE; inline;
  15653. procedure clearTXDONE; inline;
  15654. procedure setEWMARK; inline;
  15655. procedure setFWMARK; inline;
  15656. procedure setPKTPEND; inline;
  15657. procedure setRXACT; inline;
  15658. procedure setRXBUFNA; inline;
  15659. procedure setRXBUSE; inline;
  15660. procedure setRXDONE; inline;
  15661. procedure setRXOVFLW; inline;
  15662. procedure setTXABORT; inline;
  15663. procedure setTXBUSE; inline;
  15664. procedure setTXDONE; inline;
  15665. property EWMARK : TBits_1 read getEWMARK write setEWMARK;
  15666. property FWMARK : TBits_1 read getFWMARK write setFWMARK;
  15667. property PKTPEND : TBits_1 read getPKTPEND write setPKTPEND;
  15668. property RXACT : TBits_1 read getRXACT write setRXACT;
  15669. property RXBUFNA : TBits_1 read getRXBUFNA write setRXBUFNA;
  15670. property RXBUSE : TBits_1 read getRXBUSE write setRXBUSE;
  15671. property RXDONE : TBits_1 read getRXDONE write setRXDONE;
  15672. property RXOVFLW : TBits_1 read getRXOVFLW write setRXOVFLW;
  15673. property TXABORT : TBits_1 read getTXABORT write setTXABORT;
  15674. property TXBUSE : TBits_1 read getTXBUSE write setTXBUSE;
  15675. property TXDONE : TBits_1 read getTXDONE write setTXDONE;
  15676. property w : TBits_32 read getw write setw;
  15677. end;
  15678. TETH_ETHSTAT = record
  15679. private
  15680. function getBUFCNT : TBits_8; inline;
  15681. function getBUSY : TBits_1; inline;
  15682. function getETHBUSY : TBits_1; inline;
  15683. function getRXBUSY : TBits_1; inline;
  15684. function getTXBUSY : TBits_1; inline;
  15685. function getw : TBits_32; inline;
  15686. procedure setBUFCNT(thebits : TBits_8); inline;
  15687. procedure setBUSY(thebits : TBits_1); inline;
  15688. procedure setETHBUSY(thebits : TBits_1); inline;
  15689. procedure setRXBUSY(thebits : TBits_1); inline;
  15690. procedure setTXBUSY(thebits : TBits_1); inline;
  15691. procedure setw(thebits : TBits_32); inline;
  15692. public
  15693. procedure clearBUSY; inline;
  15694. procedure clearETHBUSY; inline;
  15695. procedure clearRXBUSY; inline;
  15696. procedure clearTXBUSY; inline;
  15697. procedure setBUSY; inline;
  15698. procedure setETHBUSY; inline;
  15699. procedure setRXBUSY; inline;
  15700. procedure setTXBUSY; inline;
  15701. property BUFCNT : TBits_8 read getBUFCNT write setBUFCNT;
  15702. property BUSY : TBits_1 read getBUSY write setBUSY;
  15703. property ETHBUSY : TBits_1 read getETHBUSY write setETHBUSY;
  15704. property RXBUSY : TBits_1 read getRXBUSY write setRXBUSY;
  15705. property TXBUSY : TBits_1 read getTXBUSY write setTXBUSY;
  15706. property w : TBits_32 read getw write setw;
  15707. end;
  15708. TETH_ETHRXOVFLOW = record
  15709. private
  15710. function getRXOVFLWCNT : TBits_16; inline;
  15711. function getw : TBits_32; inline;
  15712. procedure setRXOVFLWCNT(thebits : TBits_16); inline;
  15713. procedure setw(thebits : TBits_32); inline;
  15714. public
  15715. property RXOVFLWCNT : TBits_16 read getRXOVFLWCNT write setRXOVFLWCNT;
  15716. property w : TBits_32 read getw write setw;
  15717. end;
  15718. TETH_ETHFRMTXOK = record
  15719. private
  15720. function getFRMTXOKCNT : TBits_16; inline;
  15721. function getw : TBits_32; inline;
  15722. procedure setFRMTXOKCNT(thebits : TBits_16); inline;
  15723. procedure setw(thebits : TBits_32); inline;
  15724. public
  15725. property FRMTXOKCNT : TBits_16 read getFRMTXOKCNT write setFRMTXOKCNT;
  15726. property w : TBits_32 read getw write setw;
  15727. end;
  15728. TETH_ETHSCOLFRM = record
  15729. private
  15730. function getSCOLFRMCNT : TBits_16; inline;
  15731. function getw : TBits_32; inline;
  15732. procedure setSCOLFRMCNT(thebits : TBits_16); inline;
  15733. procedure setw(thebits : TBits_32); inline;
  15734. public
  15735. property SCOLFRMCNT : TBits_16 read getSCOLFRMCNT write setSCOLFRMCNT;
  15736. property w : TBits_32 read getw write setw;
  15737. end;
  15738. TETH_ETHMCOLFRM = record
  15739. private
  15740. function getMCOLFRMCNT : TBits_16; inline;
  15741. function getMCOLFRM_CNT : TBits_16; inline;
  15742. function getw : TBits_32; inline;
  15743. procedure setMCOLFRMCNT(thebits : TBits_16); inline;
  15744. procedure setMCOLFRM_CNT(thebits : TBits_16); inline;
  15745. procedure setw(thebits : TBits_32); inline;
  15746. public
  15747. property MCOLFRMCNT : TBits_16 read getMCOLFRMCNT write setMCOLFRMCNT;
  15748. property MCOLFRM_CNT : TBits_16 read getMCOLFRM_CNT write setMCOLFRM_CNT;
  15749. property w : TBits_32 read getw write setw;
  15750. end;
  15751. TETH_ETHFRMRXOK = record
  15752. private
  15753. function getFRMRXOKCNT : TBits_16; inline;
  15754. function getw : TBits_32; inline;
  15755. procedure setFRMRXOKCNT(thebits : TBits_16); inline;
  15756. procedure setw(thebits : TBits_32); inline;
  15757. public
  15758. property FRMRXOKCNT : TBits_16 read getFRMRXOKCNT write setFRMRXOKCNT;
  15759. property w : TBits_32 read getw write setw;
  15760. end;
  15761. TETH_ETHFCSERR = record
  15762. private
  15763. function getFCSERRCNT : TBits_16; inline;
  15764. function getw : TBits_32; inline;
  15765. procedure setFCSERRCNT(thebits : TBits_16); inline;
  15766. procedure setw(thebits : TBits_32); inline;
  15767. public
  15768. property FCSERRCNT : TBits_16 read getFCSERRCNT write setFCSERRCNT;
  15769. property w : TBits_32 read getw write setw;
  15770. end;
  15771. TETH_ETHALGNERR = record
  15772. private
  15773. function getALGNERRCNT : TBits_16; inline;
  15774. function getw : TBits_32; inline;
  15775. procedure setALGNERRCNT(thebits : TBits_16); inline;
  15776. procedure setw(thebits : TBits_32); inline;
  15777. public
  15778. property ALGNERRCNT : TBits_16 read getALGNERRCNT write setALGNERRCNT;
  15779. property w : TBits_32 read getw write setw;
  15780. end;
  15781. TETH_EMAC1CFG1 = record
  15782. private
  15783. function getLOOPBACK : TBits_1; inline;
  15784. function getPASSALL : TBits_1; inline;
  15785. function getRESETRFUN : TBits_1; inline;
  15786. function getRESETRMCS : TBits_1; inline;
  15787. function getRESETTFUN : TBits_1; inline;
  15788. function getRESETTMCS : TBits_1; inline;
  15789. function getRXENABLE : TBits_1; inline;
  15790. function getRXPAUSE : TBits_1; inline;
  15791. function getSIMRESET : TBits_1; inline;
  15792. function getSOFTRESET : TBits_1; inline;
  15793. function getTXPAUSE : TBits_1; inline;
  15794. function getw : TBits_32; inline;
  15795. procedure setLOOPBACK(thebits : TBits_1); inline;
  15796. procedure setPASSALL(thebits : TBits_1); inline;
  15797. procedure setRESETRFUN(thebits : TBits_1); inline;
  15798. procedure setRESETRMCS(thebits : TBits_1); inline;
  15799. procedure setRESETTFUN(thebits : TBits_1); inline;
  15800. procedure setRESETTMCS(thebits : TBits_1); inline;
  15801. procedure setRXENABLE(thebits : TBits_1); inline;
  15802. procedure setRXPAUSE(thebits : TBits_1); inline;
  15803. procedure setSIMRESET(thebits : TBits_1); inline;
  15804. procedure setSOFTRESET(thebits : TBits_1); inline;
  15805. procedure setTXPAUSE(thebits : TBits_1); inline;
  15806. procedure setw(thebits : TBits_32); inline;
  15807. public
  15808. procedure clearLOOPBACK; inline;
  15809. procedure clearPASSALL; inline;
  15810. procedure clearRESETRFUN; inline;
  15811. procedure clearRESETRMCS; inline;
  15812. procedure clearRESETTFUN; inline;
  15813. procedure clearRESETTMCS; inline;
  15814. procedure clearRXENABLE; inline;
  15815. procedure clearRXPAUSE; inline;
  15816. procedure clearSIMRESET; inline;
  15817. procedure clearSOFTRESET; inline;
  15818. procedure clearTXPAUSE; inline;
  15819. procedure setLOOPBACK; inline;
  15820. procedure setPASSALL; inline;
  15821. procedure setRESETRFUN; inline;
  15822. procedure setRESETRMCS; inline;
  15823. procedure setRESETTFUN; inline;
  15824. procedure setRESETTMCS; inline;
  15825. procedure setRXENABLE; inline;
  15826. procedure setRXPAUSE; inline;
  15827. procedure setSIMRESET; inline;
  15828. procedure setSOFTRESET; inline;
  15829. procedure setTXPAUSE; inline;
  15830. property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
  15831. property PASSALL : TBits_1 read getPASSALL write setPASSALL;
  15832. property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
  15833. property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
  15834. property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
  15835. property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
  15836. property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
  15837. property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
  15838. property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
  15839. property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
  15840. property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
  15841. property w : TBits_32 read getw write setw;
  15842. end;
  15843. TETH_EMACxCFG1 = record
  15844. private
  15845. function getLOOPBACK : TBits_1; inline;
  15846. function getPASSALL : TBits_1; inline;
  15847. function getRESETRFUN : TBits_1; inline;
  15848. function getRESETRMCS : TBits_1; inline;
  15849. function getRESETTFUN : TBits_1; inline;
  15850. function getRESETTMCS : TBits_1; inline;
  15851. function getRXENABLE : TBits_1; inline;
  15852. function getRXPAUSE : TBits_1; inline;
  15853. function getSIMRESET : TBits_1; inline;
  15854. function getSOFTRESET : TBits_1; inline;
  15855. function getTXPAUSE : TBits_1; inline;
  15856. function getw : TBits_32; inline;
  15857. procedure setLOOPBACK(thebits : TBits_1); inline;
  15858. procedure setPASSALL(thebits : TBits_1); inline;
  15859. procedure setRESETRFUN(thebits : TBits_1); inline;
  15860. procedure setRESETRMCS(thebits : TBits_1); inline;
  15861. procedure setRESETTFUN(thebits : TBits_1); inline;
  15862. procedure setRESETTMCS(thebits : TBits_1); inline;
  15863. procedure setRXENABLE(thebits : TBits_1); inline;
  15864. procedure setRXPAUSE(thebits : TBits_1); inline;
  15865. procedure setSIMRESET(thebits : TBits_1); inline;
  15866. procedure setSOFTRESET(thebits : TBits_1); inline;
  15867. procedure setTXPAUSE(thebits : TBits_1); inline;
  15868. procedure setw(thebits : TBits_32); inline;
  15869. public
  15870. procedure clearLOOPBACK; inline;
  15871. procedure clearPASSALL; inline;
  15872. procedure clearRESETRFUN; inline;
  15873. procedure clearRESETRMCS; inline;
  15874. procedure clearRESETTFUN; inline;
  15875. procedure clearRESETTMCS; inline;
  15876. procedure clearRXENABLE; inline;
  15877. procedure clearRXPAUSE; inline;
  15878. procedure clearSIMRESET; inline;
  15879. procedure clearSOFTRESET; inline;
  15880. procedure clearTXPAUSE; inline;
  15881. procedure setLOOPBACK; inline;
  15882. procedure setPASSALL; inline;
  15883. procedure setRESETRFUN; inline;
  15884. procedure setRESETRMCS; inline;
  15885. procedure setRESETTFUN; inline;
  15886. procedure setRESETTMCS; inline;
  15887. procedure setRXENABLE; inline;
  15888. procedure setRXPAUSE; inline;
  15889. procedure setSIMRESET; inline;
  15890. procedure setSOFTRESET; inline;
  15891. procedure setTXPAUSE; inline;
  15892. property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
  15893. property PASSALL : TBits_1 read getPASSALL write setPASSALL;
  15894. property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
  15895. property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
  15896. property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
  15897. property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
  15898. property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
  15899. property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
  15900. property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
  15901. property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
  15902. property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
  15903. property w : TBits_32 read getw write setw;
  15904. end;
  15905. TETH_EMAC1CFG2 = record
  15906. private
  15907. function getAUTOPAD : TBits_1; inline;
  15908. function getBPNOBKOFF : TBits_1; inline;
  15909. function getCRCENABLE : TBits_1; inline;
  15910. function getDELAYCRC : TBits_1; inline;
  15911. function getEXCESSDFR : TBits_1; inline;
  15912. function getFULLDPLX : TBits_1; inline;
  15913. function getHUGEFRM : TBits_1; inline;
  15914. function getLENGTHCK : TBits_1; inline;
  15915. function getLONGPRE : TBits_1; inline;
  15916. function getNOBKOFF : TBits_1; inline;
  15917. function getPADENABLE : TBits_1; inline;
  15918. function getPUREPRE : TBits_1; inline;
  15919. function getVLANPAD : TBits_1; inline;
  15920. function getw : TBits_32; inline;
  15921. procedure setAUTOPAD(thebits : TBits_1); inline;
  15922. procedure setBPNOBKOFF(thebits : TBits_1); inline;
  15923. procedure setCRCENABLE(thebits : TBits_1); inline;
  15924. procedure setDELAYCRC(thebits : TBits_1); inline;
  15925. procedure setEXCESSDFR(thebits : TBits_1); inline;
  15926. procedure setFULLDPLX(thebits : TBits_1); inline;
  15927. procedure setHUGEFRM(thebits : TBits_1); inline;
  15928. procedure setLENGTHCK(thebits : TBits_1); inline;
  15929. procedure setLONGPRE(thebits : TBits_1); inline;
  15930. procedure setNOBKOFF(thebits : TBits_1); inline;
  15931. procedure setPADENABLE(thebits : TBits_1); inline;
  15932. procedure setPUREPRE(thebits : TBits_1); inline;
  15933. procedure setVLANPAD(thebits : TBits_1); inline;
  15934. procedure setw(thebits : TBits_32); inline;
  15935. public
  15936. procedure clearAUTOPAD; inline;
  15937. procedure clearBPNOBKOFF; inline;
  15938. procedure clearCRCENABLE; inline;
  15939. procedure clearDELAYCRC; inline;
  15940. procedure clearEXCESSDFR; inline;
  15941. procedure clearFULLDPLX; inline;
  15942. procedure clearHUGEFRM; inline;
  15943. procedure clearLENGTHCK; inline;
  15944. procedure clearLONGPRE; inline;
  15945. procedure clearNOBKOFF; inline;
  15946. procedure clearPADENABLE; inline;
  15947. procedure clearPUREPRE; inline;
  15948. procedure clearVLANPAD; inline;
  15949. procedure setAUTOPAD; inline;
  15950. procedure setBPNOBKOFF; inline;
  15951. procedure setCRCENABLE; inline;
  15952. procedure setDELAYCRC; inline;
  15953. procedure setEXCESSDFR; inline;
  15954. procedure setFULLDPLX; inline;
  15955. procedure setHUGEFRM; inline;
  15956. procedure setLENGTHCK; inline;
  15957. procedure setLONGPRE; inline;
  15958. procedure setNOBKOFF; inline;
  15959. procedure setPADENABLE; inline;
  15960. procedure setPUREPRE; inline;
  15961. procedure setVLANPAD; inline;
  15962. property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
  15963. property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
  15964. property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
  15965. property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
  15966. property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
  15967. property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
  15968. property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
  15969. property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
  15970. property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
  15971. property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
  15972. property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
  15973. property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
  15974. property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
  15975. property w : TBits_32 read getw write setw;
  15976. end;
  15977. TETH_EMACxCFG2 = record
  15978. private
  15979. function getAUTOPAD : TBits_1; inline;
  15980. function getBPNOBKOFF : TBits_1; inline;
  15981. function getCRCENABLE : TBits_1; inline;
  15982. function getDELAYCRC : TBits_1; inline;
  15983. function getEXCESSDFR : TBits_1; inline;
  15984. function getFULLDPLX : TBits_1; inline;
  15985. function getHUGEFRM : TBits_1; inline;
  15986. function getLENGTHCK : TBits_1; inline;
  15987. function getLONGPRE : TBits_1; inline;
  15988. function getNOBKOFF : TBits_1; inline;
  15989. function getPADENABLE : TBits_1; inline;
  15990. function getPUREPRE : TBits_1; inline;
  15991. function getVLANPAD : TBits_1; inline;
  15992. function getw : TBits_32; inline;
  15993. procedure setAUTOPAD(thebits : TBits_1); inline;
  15994. procedure setBPNOBKOFF(thebits : TBits_1); inline;
  15995. procedure setCRCENABLE(thebits : TBits_1); inline;
  15996. procedure setDELAYCRC(thebits : TBits_1); inline;
  15997. procedure setEXCESSDFR(thebits : TBits_1); inline;
  15998. procedure setFULLDPLX(thebits : TBits_1); inline;
  15999. procedure setHUGEFRM(thebits : TBits_1); inline;
  16000. procedure setLENGTHCK(thebits : TBits_1); inline;
  16001. procedure setLONGPRE(thebits : TBits_1); inline;
  16002. procedure setNOBKOFF(thebits : TBits_1); inline;
  16003. procedure setPADENABLE(thebits : TBits_1); inline;
  16004. procedure setPUREPRE(thebits : TBits_1); inline;
  16005. procedure setVLANPAD(thebits : TBits_1); inline;
  16006. procedure setw(thebits : TBits_32); inline;
  16007. public
  16008. procedure clearAUTOPAD; inline;
  16009. procedure clearBPNOBKOFF; inline;
  16010. procedure clearCRCENABLE; inline;
  16011. procedure clearDELAYCRC; inline;
  16012. procedure clearEXCESSDFR; inline;
  16013. procedure clearFULLDPLX; inline;
  16014. procedure clearHUGEFRM; inline;
  16015. procedure clearLENGTHCK; inline;
  16016. procedure clearLONGPRE; inline;
  16017. procedure clearNOBKOFF; inline;
  16018. procedure clearPADENABLE; inline;
  16019. procedure clearPUREPRE; inline;
  16020. procedure clearVLANPAD; inline;
  16021. procedure setAUTOPAD; inline;
  16022. procedure setBPNOBKOFF; inline;
  16023. procedure setCRCENABLE; inline;
  16024. procedure setDELAYCRC; inline;
  16025. procedure setEXCESSDFR; inline;
  16026. procedure setFULLDPLX; inline;
  16027. procedure setHUGEFRM; inline;
  16028. procedure setLENGTHCK; inline;
  16029. procedure setLONGPRE; inline;
  16030. procedure setNOBKOFF; inline;
  16031. procedure setPADENABLE; inline;
  16032. procedure setPUREPRE; inline;
  16033. procedure setVLANPAD; inline;
  16034. property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
  16035. property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
  16036. property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
  16037. property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
  16038. property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
  16039. property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
  16040. property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
  16041. property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
  16042. property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
  16043. property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
  16044. property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
  16045. property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
  16046. property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
  16047. property w : TBits_32 read getw write setw;
  16048. end;
  16049. TETH_EMAC1IPGT = record
  16050. private
  16051. function getB2BIPKTGP : TBits_7; inline;
  16052. function getw : TBits_32; inline;
  16053. procedure setB2BIPKTGP(thebits : TBits_7); inline;
  16054. procedure setw(thebits : TBits_32); inline;
  16055. public
  16056. property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
  16057. property w : TBits_32 read getw write setw;
  16058. end;
  16059. TETH_EMACxIPGT = record
  16060. private
  16061. function getB2BIPKTGP : TBits_7; inline;
  16062. function getw : TBits_32; inline;
  16063. procedure setB2BIPKTGP(thebits : TBits_7); inline;
  16064. procedure setw(thebits : TBits_32); inline;
  16065. public
  16066. property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
  16067. property w : TBits_32 read getw write setw;
  16068. end;
  16069. TETH_EMAC1IPGR = record
  16070. private
  16071. function getNB2BIPKTGP1 : TBits_7; inline;
  16072. function getNB2BIPKTGP2 : TBits_7; inline;
  16073. function getw : TBits_32; inline;
  16074. procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
  16075. procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
  16076. procedure setw(thebits : TBits_32); inline;
  16077. public
  16078. property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
  16079. property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
  16080. property w : TBits_32 read getw write setw;
  16081. end;
  16082. TETH_EMACxIPGR = record
  16083. private
  16084. function getNB2BIPKTGP1 : TBits_7; inline;
  16085. function getNB2BIPKTGP2 : TBits_7; inline;
  16086. function getw : TBits_32; inline;
  16087. procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
  16088. procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
  16089. procedure setw(thebits : TBits_32); inline;
  16090. public
  16091. property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
  16092. property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
  16093. property w : TBits_32 read getw write setw;
  16094. end;
  16095. TETH_EMAC1CLRT = record
  16096. private
  16097. function getCWINDOW : TBits_6; inline;
  16098. function getRETX : TBits_4; inline;
  16099. function getw : TBits_32; inline;
  16100. procedure setCWINDOW(thebits : TBits_6); inline;
  16101. procedure setRETX(thebits : TBits_4); inline;
  16102. procedure setw(thebits : TBits_32); inline;
  16103. public
  16104. property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
  16105. property RETX : TBits_4 read getRETX write setRETX;
  16106. property w : TBits_32 read getw write setw;
  16107. end;
  16108. TETH_EMACxCLRT = record
  16109. private
  16110. function getCWINDOW : TBits_6; inline;
  16111. function getRETX : TBits_4; inline;
  16112. function getw : TBits_32; inline;
  16113. procedure setCWINDOW(thebits : TBits_6); inline;
  16114. procedure setRETX(thebits : TBits_4); inline;
  16115. procedure setw(thebits : TBits_32); inline;
  16116. public
  16117. property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
  16118. property RETX : TBits_4 read getRETX write setRETX;
  16119. property w : TBits_32 read getw write setw;
  16120. end;
  16121. TETH_EMAC1MAXF = record
  16122. private
  16123. function getMACMAXF : TBits_16; inline;
  16124. function getw : TBits_32; inline;
  16125. procedure setMACMAXF(thebits : TBits_16); inline;
  16126. procedure setw(thebits : TBits_32); inline;
  16127. public
  16128. property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
  16129. property w : TBits_32 read getw write setw;
  16130. end;
  16131. TETH_EMACxMAXF = record
  16132. private
  16133. function getMACMAXF : TBits_16; inline;
  16134. function getw : TBits_32; inline;
  16135. procedure setMACMAXF(thebits : TBits_16); inline;
  16136. procedure setw(thebits : TBits_32); inline;
  16137. public
  16138. property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
  16139. property w : TBits_32 read getw write setw;
  16140. end;
  16141. TETH_EMAC1SUPP = record
  16142. private
  16143. function getRESETRMII : TBits_1; inline;
  16144. function getSPEEDRMII : TBits_1; inline;
  16145. function getw : TBits_32; inline;
  16146. procedure setRESETRMII(thebits : TBits_1); inline;
  16147. procedure setSPEEDRMII(thebits : TBits_1); inline;
  16148. procedure setw(thebits : TBits_32); inline;
  16149. public
  16150. procedure clearRESETRMII; inline;
  16151. procedure clearSPEEDRMII; inline;
  16152. procedure setRESETRMII; inline;
  16153. procedure setSPEEDRMII; inline;
  16154. property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
  16155. property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
  16156. property w : TBits_32 read getw write setw;
  16157. end;
  16158. TETH_EMACxSUPP = record
  16159. private
  16160. function getRESETRMII : TBits_1; inline;
  16161. function getSPEEDRMII : TBits_1; inline;
  16162. function getw : TBits_32; inline;
  16163. procedure setRESETRMII(thebits : TBits_1); inline;
  16164. procedure setSPEEDRMII(thebits : TBits_1); inline;
  16165. procedure setw(thebits : TBits_32); inline;
  16166. public
  16167. procedure clearRESETRMII; inline;
  16168. procedure clearSPEEDRMII; inline;
  16169. procedure setRESETRMII; inline;
  16170. procedure setSPEEDRMII; inline;
  16171. property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
  16172. property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
  16173. property w : TBits_32 read getw write setw;
  16174. end;
  16175. TETH_EMAC1TEST = record
  16176. private
  16177. function getSHRTQNTA : TBits_1; inline;
  16178. function getTESTBP : TBits_1; inline;
  16179. function getTESTPAUSE : TBits_1; inline;
  16180. function getw : TBits_32; inline;
  16181. procedure setSHRTQNTA(thebits : TBits_1); inline;
  16182. procedure setTESTBP(thebits : TBits_1); inline;
  16183. procedure setTESTPAUSE(thebits : TBits_1); inline;
  16184. procedure setw(thebits : TBits_32); inline;
  16185. public
  16186. procedure clearSHRTQNTA; inline;
  16187. procedure clearTESTBP; inline;
  16188. procedure clearTESTPAUSE; inline;
  16189. procedure setSHRTQNTA; inline;
  16190. procedure setTESTBP; inline;
  16191. procedure setTESTPAUSE; inline;
  16192. property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
  16193. property TESTBP : TBits_1 read getTESTBP write setTESTBP;
  16194. property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
  16195. property w : TBits_32 read getw write setw;
  16196. end;
  16197. TETH_EMACxTEST = record
  16198. private
  16199. function getSHRTQNTA : TBits_1; inline;
  16200. function getTESTBP : TBits_1; inline;
  16201. function getTESTPAUSE : TBits_1; inline;
  16202. function getw : TBits_32; inline;
  16203. procedure setSHRTQNTA(thebits : TBits_1); inline;
  16204. procedure setTESTBP(thebits : TBits_1); inline;
  16205. procedure setTESTPAUSE(thebits : TBits_1); inline;
  16206. procedure setw(thebits : TBits_32); inline;
  16207. public
  16208. procedure clearSHRTQNTA; inline;
  16209. procedure clearTESTBP; inline;
  16210. procedure clearTESTPAUSE; inline;
  16211. procedure setSHRTQNTA; inline;
  16212. procedure setTESTBP; inline;
  16213. procedure setTESTPAUSE; inline;
  16214. property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
  16215. property TESTBP : TBits_1 read getTESTBP write setTESTBP;
  16216. property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
  16217. property w : TBits_32 read getw write setw;
  16218. end;
  16219. TETH_EMAC1MCFG = record
  16220. private
  16221. function getCLKSEL : TBits_4; inline;
  16222. function getNOPRE : TBits_1; inline;
  16223. function getRESETMGMT : TBits_1; inline;
  16224. function getSCANINC : TBits_1; inline;
  16225. function getw : TBits_32; inline;
  16226. procedure setCLKSEL(thebits : TBits_4); inline;
  16227. procedure setNOPRE(thebits : TBits_1); inline;
  16228. procedure setRESETMGMT(thebits : TBits_1); inline;
  16229. procedure setSCANINC(thebits : TBits_1); inline;
  16230. procedure setw(thebits : TBits_32); inline;
  16231. public
  16232. procedure clearNOPRE; inline;
  16233. procedure clearRESETMGMT; inline;
  16234. procedure clearSCANINC; inline;
  16235. procedure setNOPRE; inline;
  16236. procedure setRESETMGMT; inline;
  16237. procedure setSCANINC; inline;
  16238. property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
  16239. property NOPRE : TBits_1 read getNOPRE write setNOPRE;
  16240. property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
  16241. property SCANINC : TBits_1 read getSCANINC write setSCANINC;
  16242. property w : TBits_32 read getw write setw;
  16243. end;
  16244. TETH_EMACxMCFG = record
  16245. private
  16246. function getCLKSEL : TBits_4; inline;
  16247. function getNOPRE : TBits_1; inline;
  16248. function getRESETMGMT : TBits_1; inline;
  16249. function getSCANINC : TBits_1; inline;
  16250. function getw : TBits_32; inline;
  16251. procedure setCLKSEL(thebits : TBits_4); inline;
  16252. procedure setNOPRE(thebits : TBits_1); inline;
  16253. procedure setRESETMGMT(thebits : TBits_1); inline;
  16254. procedure setSCANINC(thebits : TBits_1); inline;
  16255. procedure setw(thebits : TBits_32); inline;
  16256. public
  16257. procedure clearNOPRE; inline;
  16258. procedure clearRESETMGMT; inline;
  16259. procedure clearSCANINC; inline;
  16260. procedure setNOPRE; inline;
  16261. procedure setRESETMGMT; inline;
  16262. procedure setSCANINC; inline;
  16263. property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
  16264. property NOPRE : TBits_1 read getNOPRE write setNOPRE;
  16265. property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
  16266. property SCANINC : TBits_1 read getSCANINC write setSCANINC;
  16267. property w : TBits_32 read getw write setw;
  16268. end;
  16269. TETH_EMAC1MCMD = record
  16270. private
  16271. function getREAD : TBits_1; inline;
  16272. function getSCAN : TBits_1; inline;
  16273. function getw : TBits_32; inline;
  16274. procedure setREAD(thebits : TBits_1); inline;
  16275. procedure setSCAN(thebits : TBits_1); inline;
  16276. procedure setw(thebits : TBits_32); inline;
  16277. public
  16278. procedure clearREAD; inline;
  16279. procedure clearSCAN; inline;
  16280. procedure setREAD; inline;
  16281. procedure setSCAN; inline;
  16282. property READ : TBits_1 read getREAD write setREAD;
  16283. property SCAN : TBits_1 read getSCAN write setSCAN;
  16284. property w : TBits_32 read getw write setw;
  16285. end;
  16286. TETH_EMACxMCMD = record
  16287. private
  16288. function getREAD : TBits_1; inline;
  16289. function getSCAN : TBits_1; inline;
  16290. function getw : TBits_32; inline;
  16291. procedure setREAD(thebits : TBits_1); inline;
  16292. procedure setSCAN(thebits : TBits_1); inline;
  16293. procedure setw(thebits : TBits_32); inline;
  16294. public
  16295. procedure clearREAD; inline;
  16296. procedure clearSCAN; inline;
  16297. procedure setREAD; inline;
  16298. procedure setSCAN; inline;
  16299. property READ : TBits_1 read getREAD write setREAD;
  16300. property SCAN : TBits_1 read getSCAN write setSCAN;
  16301. property w : TBits_32 read getw write setw;
  16302. end;
  16303. TETH_EMAC1MADR = record
  16304. private
  16305. function getPHYADDR : TBits_5; inline;
  16306. function getREGADDR : TBits_5; inline;
  16307. function getw : TBits_32; inline;
  16308. procedure setPHYADDR(thebits : TBits_5); inline;
  16309. procedure setREGADDR(thebits : TBits_5); inline;
  16310. procedure setw(thebits : TBits_32); inline;
  16311. public
  16312. property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
  16313. property REGADDR : TBits_5 read getREGADDR write setREGADDR;
  16314. property w : TBits_32 read getw write setw;
  16315. end;
  16316. TETH_EMACxMADR = record
  16317. private
  16318. function getPHYADDR : TBits_5; inline;
  16319. function getREGADDR : TBits_5; inline;
  16320. function getw : TBits_32; inline;
  16321. procedure setPHYADDR(thebits : TBits_5); inline;
  16322. procedure setREGADDR(thebits : TBits_5); inline;
  16323. procedure setw(thebits : TBits_32); inline;
  16324. public
  16325. property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
  16326. property REGADDR : TBits_5 read getREGADDR write setREGADDR;
  16327. property w : TBits_32 read getw write setw;
  16328. end;
  16329. TETH_EMAC1MWTD = record
  16330. private
  16331. function getMWTD : TBits_16; inline;
  16332. function getw : TBits_32; inline;
  16333. procedure setMWTD(thebits : TBits_16); inline;
  16334. procedure setw(thebits : TBits_32); inline;
  16335. public
  16336. property MWTD : TBits_16 read getMWTD write setMWTD;
  16337. property w : TBits_32 read getw write setw;
  16338. end;
  16339. TETH_EMACxMWTD = record
  16340. private
  16341. function getMWTD : TBits_16; inline;
  16342. function getw : TBits_32; inline;
  16343. procedure setMWTD(thebits : TBits_16); inline;
  16344. procedure setw(thebits : TBits_32); inline;
  16345. public
  16346. property MWTD : TBits_16 read getMWTD write setMWTD;
  16347. property w : TBits_32 read getw write setw;
  16348. end;
  16349. TETH_EMAC1MRDD = record
  16350. private
  16351. function getMRDD : TBits_16; inline;
  16352. function getw : TBits_32; inline;
  16353. procedure setMRDD(thebits : TBits_16); inline;
  16354. procedure setw(thebits : TBits_32); inline;
  16355. public
  16356. property MRDD : TBits_16 read getMRDD write setMRDD;
  16357. property w : TBits_32 read getw write setw;
  16358. end;
  16359. TETH_EMACxMRDD = record
  16360. private
  16361. function getMRDD : TBits_16; inline;
  16362. function getw : TBits_32; inline;
  16363. procedure setMRDD(thebits : TBits_16); inline;
  16364. procedure setw(thebits : TBits_32); inline;
  16365. public
  16366. property MRDD : TBits_16 read getMRDD write setMRDD;
  16367. property w : TBits_32 read getw write setw;
  16368. end;
  16369. TETH_EMAC1MIND = record
  16370. private
  16371. function getLINKFAIL : TBits_1; inline;
  16372. function getMIIMBUSY : TBits_1; inline;
  16373. function getNOTVALID : TBits_1; inline;
  16374. function getSCAN : TBits_1; inline;
  16375. function getw : TBits_32; inline;
  16376. procedure setLINKFAIL(thebits : TBits_1); inline;
  16377. procedure setMIIMBUSY(thebits : TBits_1); inline;
  16378. procedure setNOTVALID(thebits : TBits_1); inline;
  16379. procedure setSCAN(thebits : TBits_1); inline;
  16380. procedure setw(thebits : TBits_32); inline;
  16381. public
  16382. procedure clearLINKFAIL; inline;
  16383. procedure clearMIIMBUSY; inline;
  16384. procedure clearNOTVALID; inline;
  16385. procedure clearSCAN; inline;
  16386. procedure setLINKFAIL; inline;
  16387. procedure setMIIMBUSY; inline;
  16388. procedure setNOTVALID; inline;
  16389. procedure setSCAN; inline;
  16390. property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
  16391. property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
  16392. property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
  16393. property SCAN : TBits_1 read getSCAN write setSCAN;
  16394. property w : TBits_32 read getw write setw;
  16395. end;
  16396. TETH_EMACxMIND = record
  16397. private
  16398. function getLINKFAIL : TBits_1; inline;
  16399. function getMIIMBUSY : TBits_1; inline;
  16400. function getNOTVALID : TBits_1; inline;
  16401. function getSCAN : TBits_1; inline;
  16402. function getw : TBits_32; inline;
  16403. procedure setLINKFAIL(thebits : TBits_1); inline;
  16404. procedure setMIIMBUSY(thebits : TBits_1); inline;
  16405. procedure setNOTVALID(thebits : TBits_1); inline;
  16406. procedure setSCAN(thebits : TBits_1); inline;
  16407. procedure setw(thebits : TBits_32); inline;
  16408. public
  16409. procedure clearLINKFAIL; inline;
  16410. procedure clearMIIMBUSY; inline;
  16411. procedure clearNOTVALID; inline;
  16412. procedure clearSCAN; inline;
  16413. procedure setLINKFAIL; inline;
  16414. procedure setMIIMBUSY; inline;
  16415. procedure setNOTVALID; inline;
  16416. procedure setSCAN; inline;
  16417. property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
  16418. property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
  16419. property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
  16420. property SCAN : TBits_1 read getSCAN write setSCAN;
  16421. property w : TBits_32 read getw write setw;
  16422. end;
  16423. TETH_EMAC1SA0 = record
  16424. private
  16425. function getSTNADDR5 : TBits_8; inline;
  16426. function getSTNADDR6 : TBits_8; inline;
  16427. function getw : TBits_32; inline;
  16428. procedure setSTNADDR5(thebits : TBits_8); inline;
  16429. procedure setSTNADDR6(thebits : TBits_8); inline;
  16430. procedure setw(thebits : TBits_32); inline;
  16431. public
  16432. property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
  16433. property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
  16434. property w : TBits_32 read getw write setw;
  16435. end;
  16436. TETH_EMACxSA0 = record
  16437. private
  16438. function getSTNADDR5 : TBits_8; inline;
  16439. function getSTNADDR6 : TBits_8; inline;
  16440. function getw : TBits_32; inline;
  16441. procedure setSTNADDR5(thebits : TBits_8); inline;
  16442. procedure setSTNADDR6(thebits : TBits_8); inline;
  16443. procedure setw(thebits : TBits_32); inline;
  16444. public
  16445. property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
  16446. property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
  16447. property w : TBits_32 read getw write setw;
  16448. end;
  16449. TETH_EMAC1SA1 = record
  16450. private
  16451. function getSTNADDR3 : TBits_8; inline;
  16452. function getSTNADDR4 : TBits_8; inline;
  16453. function getw : TBits_32; inline;
  16454. procedure setSTNADDR3(thebits : TBits_8); inline;
  16455. procedure setSTNADDR4(thebits : TBits_8); inline;
  16456. procedure setw(thebits : TBits_32); inline;
  16457. public
  16458. property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
  16459. property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
  16460. property w : TBits_32 read getw write setw;
  16461. end;
  16462. TETH_EMACxSA1 = record
  16463. private
  16464. function getSTNADDR3 : TBits_8; inline;
  16465. function getSTNADDR4 : TBits_8; inline;
  16466. function getw : TBits_32; inline;
  16467. procedure setSTNADDR3(thebits : TBits_8); inline;
  16468. procedure setSTNADDR4(thebits : TBits_8); inline;
  16469. procedure setw(thebits : TBits_32); inline;
  16470. public
  16471. property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
  16472. property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
  16473. property w : TBits_32 read getw write setw;
  16474. end;
  16475. TETH_EMAC1SA2 = record
  16476. private
  16477. function getSTNADDR1 : TBits_8; inline;
  16478. function getSTNADDR2 : TBits_8; inline;
  16479. function getw : TBits_32; inline;
  16480. procedure setSTNADDR1(thebits : TBits_8); inline;
  16481. procedure setSTNADDR2(thebits : TBits_8); inline;
  16482. procedure setw(thebits : TBits_32); inline;
  16483. public
  16484. property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
  16485. property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
  16486. property w : TBits_32 read getw write setw;
  16487. end;
  16488. TETH_EMACxSA2 = record
  16489. private
  16490. function getSTNADDR1 : TBits_8; inline;
  16491. function getSTNADDR2 : TBits_8; inline;
  16492. function getw : TBits_32; inline;
  16493. procedure setSTNADDR1(thebits : TBits_8); inline;
  16494. procedure setSTNADDR2(thebits : TBits_8); inline;
  16495. procedure setw(thebits : TBits_32); inline;
  16496. public
  16497. property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
  16498. property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
  16499. property w : TBits_32 read getw write setw;
  16500. end;
  16501. type
  16502. TETHRegisters = record
  16503. ETHCON1bits : TETH_ETHCON1;
  16504. ETHCON1 : longWord;
  16505. ETHCON1CLR : longWord;
  16506. ETHCON1SET : longWord;
  16507. ETHCON1INV : longWord;
  16508. ETHCON2bits : TETH_ETHCON2;
  16509. ETHCON2 : longWord;
  16510. ETHCON2CLR : longWord;
  16511. ETHCON2SET : longWord;
  16512. ETHCON2INV : longWord;
  16513. ETHTXSTbits : TETH_ETHTXST;
  16514. ETHTXST : longWord;
  16515. ETHTXSTCLR : longWord;
  16516. ETHTXSTSET : longWord;
  16517. ETHTXSTINV : longWord;
  16518. ETHRXSTbits : TETH_ETHRXST;
  16519. ETHRXST : longWord;
  16520. ETHRXSTCLR : longWord;
  16521. ETHRXSTSET : longWord;
  16522. ETHRXSTINV : longWord;
  16523. ETHHT0bits : TETH_ETHHT0;
  16524. ETHHT0 : longWord;
  16525. ETHHT0CLR : longWord;
  16526. ETHHT0SET : longWord;
  16527. ETHHT0INV : longWord;
  16528. ETHHT1bits : TETH_ETHHT1;
  16529. ETHHT1 : longWord;
  16530. ETHHT1CLR : longWord;
  16531. ETHHT1SET : longWord;
  16532. ETHHT1INV : longWord;
  16533. ETHPMM0bits : TETH_ETHPMM0;
  16534. ETHPMM0 : longWord;
  16535. ETHPMM0CLR : longWord;
  16536. ETHPMM0SET : longWord;
  16537. ETHPMM0INV : longWord;
  16538. ETHPMM1bits : TETH_ETHPMM1;
  16539. ETHPMM1 : longWord;
  16540. ETHPMM1CLR : longWord;
  16541. ETHPMM1SET : longWord;
  16542. ETHPMM1INV : longWord;
  16543. ETHPMCSbits : TETH_ETHPMCS;
  16544. ETHPMCS : longWord;
  16545. ETHPMCSCLR : longWord;
  16546. ETHPMCSSET : longWord;
  16547. ETHPMCSINV : longWord;
  16548. ETHPMObits : TETH_ETHPMO;
  16549. ETHPMO : longWord;
  16550. ETHPMOCLR : longWord;
  16551. ETHPMOSET : longWord;
  16552. ETHPMOINV : longWord;
  16553. ETHRXFCbits : TETH_ETHRXFC;
  16554. ETHRXFC : longWord;
  16555. ETHRXFCCLR : longWord;
  16556. ETHRXFCSET : longWord;
  16557. ETHRXFCINV : longWord;
  16558. ETHRXWMbits : TETH_ETHRXWM;
  16559. ETHRXWM : longWord;
  16560. ETHRXWMCLR : longWord;
  16561. ETHRXWMSET : longWord;
  16562. ETHRXWMINV : longWord;
  16563. ETHIENbits : TETH_ETHIEN;
  16564. ETHIEN : longWord;
  16565. ETHIENCLR : longWord;
  16566. ETHIENSET : longWord;
  16567. ETHIENINV : longWord;
  16568. ETHIRQbits : TETH_ETHIRQ;
  16569. ETHIRQ : longWord;
  16570. ETHIRQCLR : longWord;
  16571. ETHIRQSET : longWord;
  16572. ETHIRQINV : longWord;
  16573. ETHSTATbits : TETH_ETHSTAT;
  16574. ETHSTAT : longWord;
  16575. ETHSTATCLR : longWord;
  16576. ETHSTATSET : longWord;
  16577. ETHSTATINV : longWord;
  16578. ETHRXOVFLOWbits : TETH_ETHRXOVFLOW;
  16579. ETHRXOVFLOW : longWord;
  16580. ETHRXOVFLOWCLR : longWord;
  16581. ETHRXOVFLOWSET : longWord;
  16582. ETHRXOVFLOWINV : longWord;
  16583. ETHFRMTXOKbits : TETH_ETHFRMTXOK;
  16584. ETHFRMTXOK : longWord;
  16585. ETHFRMTXOKCLR : longWord;
  16586. ETHFRMTXOKSET : longWord;
  16587. ETHFRMTXOKINV : longWord;
  16588. ETHSCOLFRMbits : TETH_ETHSCOLFRM;
  16589. ETHSCOLFRM : longWord;
  16590. ETHSCOLFRMCLR : longWord;
  16591. ETHSCOLFRMSET : longWord;
  16592. ETHSCOLFRMINV : longWord;
  16593. ETHMCOLFRMbits : TETH_ETHMCOLFRM;
  16594. ETHMCOLFRM : longWord;
  16595. ETHMCOLFRMCLR : longWord;
  16596. ETHMCOLFRMSET : longWord;
  16597. ETHMCOLFRMINV : longWord;
  16598. ETHFRMRXOKbits : TETH_ETHFRMRXOK;
  16599. ETHFRMRXOK : longWord;
  16600. ETHFRMRXOKCLR : longWord;
  16601. ETHFRMRXOKSET : longWord;
  16602. ETHFRMRXOKINV : longWord;
  16603. ETHFCSERRbits : TETH_ETHFCSERR;
  16604. ETHFCSERR : longWord;
  16605. ETHFCSERRCLR : longWord;
  16606. ETHFCSERRSET : longWord;
  16607. ETHFCSERRINV : longWord;
  16608. ETHALGNERRbits : TETH_ETHALGNERR;
  16609. ETHALGNERR : longWord;
  16610. ETHALGNERRCLR : longWord;
  16611. ETHALGNERRSET : longWord;
  16612. ETHALGNERRINV : longWord;
  16613. EMAC1CFG1bits : TETH_EMAC1CFG1;
  16614. EMAC1CFG1 : longWord;
  16615. EMACxCFG1bits : TETH_EMACxCFG1;
  16616. EMACxCFG1 : longWord;
  16617. EMAC1CFG1CLR : longWord;
  16618. EMACxCFG1CLR : longWord;
  16619. EMAC1CFG1SET : longWord;
  16620. EMACxCFG1SET : longWord;
  16621. EMAC1CFG1INV : longWord;
  16622. EMACxCFG1INV : longWord;
  16623. EMAC1CFG2bits : TETH_EMAC1CFG2;
  16624. EMAC1CFG2 : longWord;
  16625. EMACxCFG2bits : TETH_EMACxCFG2;
  16626. EMACxCFG2 : longWord;
  16627. EMAC1CFG2CLR : longWord;
  16628. EMACxCFG2CLR : longWord;
  16629. EMAC1CFG2SET : longWord;
  16630. EMACxCFG2SET : longWord;
  16631. EMAC1CFG2INV : longWord;
  16632. EMACxCFG2INV : longWord;
  16633. EMAC1IPGTbits : TETH_EMAC1IPGT;
  16634. EMAC1IPGT : longWord;
  16635. EMACxIPGTbits : TETH_EMACxIPGT;
  16636. EMACxIPGT : longWord;
  16637. EMAC1IPGTCLR : longWord;
  16638. EMACxIPGTCLR : longWord;
  16639. EMAC1IPGTSET : longWord;
  16640. EMACxIPGTSET : longWord;
  16641. EMAC1IPGTINV : longWord;
  16642. EMACxIPGTINV : longWord;
  16643. EMAC1IPGRbits : TETH_EMAC1IPGR;
  16644. EMAC1IPGR : longWord;
  16645. EMACxIPGRbits : TETH_EMACxIPGR;
  16646. EMACxIPGR : longWord;
  16647. EMAC1IPGRCLR : longWord;
  16648. EMACxIPGRCLR : longWord;
  16649. EMAC1IPGRSET : longWord;
  16650. EMACxIPGRSET : longWord;
  16651. EMAC1IPGRINV : longWord;
  16652. EMACxIPGRINV : longWord;
  16653. EMAC1CLRTbits : TETH_EMAC1CLRT;
  16654. EMAC1CLRT : longWord;
  16655. EMACxCLRTbits : TETH_EMACxCLRT;
  16656. EMACxCLRT : longWord;
  16657. EMAC1CLRTCLR : longWord;
  16658. EMACxCLRTCLR : longWord;
  16659. EMAC1CLRTSET : longWord;
  16660. EMACxCLRTSET : longWord;
  16661. EMAC1CLRTINV : longWord;
  16662. EMACxCLRTINV : longWord;
  16663. EMAC1MAXFbits : TETH_EMAC1MAXF;
  16664. EMAC1MAXF : longWord;
  16665. EMACxMAXFbits : TETH_EMACxMAXF;
  16666. EMACxMAXF : longWord;
  16667. EMAC1MAXFCLR : longWord;
  16668. EMACxMAXFCLR : longWord;
  16669. EMAC1MAXFSET : longWord;
  16670. EMACxMAXFSET : longWord;
  16671. EMAC1MAXFINV : longWord;
  16672. EMACxMAXFINV : longWord;
  16673. EMAC1SUPPbits : TETH_EMAC1SUPP;
  16674. EMAC1SUPP : longWord;
  16675. EMACxSUPPbits : TETH_EMACxSUPP;
  16676. EMACxSUPP : longWord;
  16677. EMAC1SUPPCLR : longWord;
  16678. EMACxSUPPCLR : longWord;
  16679. EMAC1SUPPSET : longWord;
  16680. EMACxSUPPSET : longWord;
  16681. EMAC1SUPPINV : longWord;
  16682. EMACxSUPPINV : longWord;
  16683. EMAC1TESTbits : TETH_EMAC1TEST;
  16684. EMAC1TEST : longWord;
  16685. EMACxTESTbits : TETH_EMACxTEST;
  16686. EMACxTEST : longWord;
  16687. EMAC1TESTCLR : longWord;
  16688. EMACxTESTCLR : longWord;
  16689. EMAC1TESTSET : longWord;
  16690. EMACxTESTSET : longWord;
  16691. EMAC1TESTINV : longWord;
  16692. EMACxTESTINV : longWord;
  16693. EMAC1MCFGbits : TETH_EMAC1MCFG;
  16694. EMAC1MCFG : longWord;
  16695. EMACxMCFGbits : TETH_EMACxMCFG;
  16696. EMACxMCFG : longWord;
  16697. EMAC1MCFGCLR : longWord;
  16698. EMACxMCFGCLR : longWord;
  16699. EMAC1MCFGSET : longWord;
  16700. EMACxMCFGSET : longWord;
  16701. EMAC1MCFGINV : longWord;
  16702. EMACxMCFGINV : longWord;
  16703. EMAC1MCMDbits : TETH_EMAC1MCMD;
  16704. EMAC1MCMD : longWord;
  16705. EMACxMCMDbits : TETH_EMACxMCMD;
  16706. EMACxMCMD : longWord;
  16707. EMAC1MCMDCLR : longWord;
  16708. EMACxMCMDCLR : longWord;
  16709. EMAC1MCMDSET : longWord;
  16710. EMACxMCMDSET : longWord;
  16711. EMAC1MCMDINV : longWord;
  16712. EMACxMCMDINV : longWord;
  16713. EMAC1MADRbits : TETH_EMAC1MADR;
  16714. EMAC1MADR : longWord;
  16715. EMACxMADRbits : TETH_EMACxMADR;
  16716. EMACxMADR : longWord;
  16717. EMAC1MADRCLR : longWord;
  16718. EMACxMADRCLR : longWord;
  16719. EMAC1MADRSET : longWord;
  16720. EMACxMADRSET : longWord;
  16721. EMAC1MADRINV : longWord;
  16722. EMACxMADRINV : longWord;
  16723. EMAC1MWTDbits : TETH_EMAC1MWTD;
  16724. EMAC1MWTD : longWord;
  16725. EMACxMWTDbits : TETH_EMACxMWTD;
  16726. EMACxMWTD : longWord;
  16727. EMAC1MWTDCLR : longWord;
  16728. EMACxMWTDCLR : longWord;
  16729. EMAC1MWTDSET : longWord;
  16730. EMACxMWTDSET : longWord;
  16731. EMAC1MWTDINV : longWord;
  16732. EMACxMWTDINV : longWord;
  16733. EMAC1MRDDbits : TETH_EMAC1MRDD;
  16734. EMAC1MRDD : longWord;
  16735. EMACxMRDDbits : TETH_EMACxMRDD;
  16736. EMACxMRDD : longWord;
  16737. EMAC1MRDDCLR : longWord;
  16738. EMACxMRDDCLR : longWord;
  16739. EMAC1MRDDSET : longWord;
  16740. EMACxMRDDSET : longWord;
  16741. EMAC1MRDDINV : longWord;
  16742. EMACxMRDDINV : longWord;
  16743. EMAC1MINDbits : TETH_EMAC1MIND;
  16744. EMAC1MIND : longWord;
  16745. EMACxMINDbits : TETH_EMACxMIND;
  16746. EMACxMIND : longWord;
  16747. EMAC1MINDCLR : longWord;
  16748. EMACxMINDCLR : longWord;
  16749. EMAC1MINDSET : longWord;
  16750. EMACxMINDSET : longWord;
  16751. EMAC1MINDINV : longWord;
  16752. EMACxMINDINV : longWord;
  16753. EMAC1SA0bits : TETH_EMAC1SA0;
  16754. EMAC1SA0 : longWord;
  16755. EMACxSA0bits : TETH_EMACxSA0;
  16756. EMACxSA0 : longWord;
  16757. EMAC1SA0CLR : longWord;
  16758. EMACxSA0CLR : longWord;
  16759. EMAC1SA0SET : longWord;
  16760. EMACxSA0SET : longWord;
  16761. EMAC1SA0INV : longWord;
  16762. EMACxSA0INV : longWord;
  16763. EMAC1SA1bits : TETH_EMAC1SA1;
  16764. EMAC1SA1 : longWord;
  16765. EMACxSA1bits : TETH_EMACxSA1;
  16766. EMACxSA1 : longWord;
  16767. EMAC1SA1CLR : longWord;
  16768. EMACxSA1CLR : longWord;
  16769. EMAC1SA1SET : longWord;
  16770. EMACxSA1SET : longWord;
  16771. EMAC1SA1INV : longWord;
  16772. EMACxSA1INV : longWord;
  16773. EMAC1SA2bits : TETH_EMAC1SA2;
  16774. EMAC1SA2 : longWord;
  16775. EMACxSA2bits : TETH_EMACxSA2;
  16776. EMACxSA2 : longWord;
  16777. EMAC1SA2CLR : longWord;
  16778. EMACxSA2CLR : longWord;
  16779. EMAC1SA2SET : longWord;
  16780. EMACxSA2SET : longWord;
  16781. EMAC1SA2INV : longWord;
  16782. EMACxSA2INV : longWord;
  16783. end;
  16784. TCAN1_C1CON = record
  16785. private
  16786. function getABAT : TBits_1; inline;
  16787. function getCANBUSY : TBits_1; inline;
  16788. function getCANCAP : TBits_1; inline;
  16789. function getDNCNT : TBits_5; inline;
  16790. function getON : TBits_1; inline;
  16791. function getOPMOD : TBits_3; inline;
  16792. function getREQOP : TBits_3; inline;
  16793. function getSIDL : TBits_1; inline;
  16794. function getw : TBits_32; inline;
  16795. procedure setABAT(thebits : TBits_1); inline;
  16796. procedure setCANBUSY(thebits : TBits_1); inline;
  16797. procedure setCANCAP(thebits : TBits_1); inline;
  16798. procedure setDNCNT(thebits : TBits_5); inline;
  16799. procedure setON(thebits : TBits_1); inline;
  16800. procedure setOPMOD(thebits : TBits_3); inline;
  16801. procedure setREQOP(thebits : TBits_3); inline;
  16802. procedure setSIDL(thebits : TBits_1); inline;
  16803. procedure setw(thebits : TBits_32); inline;
  16804. public
  16805. procedure clearABAT; inline;
  16806. procedure clearCANBUSY; inline;
  16807. procedure clearCANCAP; inline;
  16808. procedure clearON; inline;
  16809. procedure clearSIDL; inline;
  16810. procedure setABAT; inline;
  16811. procedure setCANBUSY; inline;
  16812. procedure setCANCAP; inline;
  16813. procedure setON; inline;
  16814. procedure setSIDL; inline;
  16815. property ABAT : TBits_1 read getABAT write setABAT;
  16816. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  16817. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  16818. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  16819. property ON : TBits_1 read getON write setON;
  16820. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  16821. property REQOP : TBits_3 read getREQOP write setREQOP;
  16822. property SIDL : TBits_1 read getSIDL write setSIDL;
  16823. property w : TBits_32 read getw write setw;
  16824. end;
  16825. TCAN1_C1CFG = record
  16826. private
  16827. function getBRP : TBits_6; inline;
  16828. function getPRSEG : TBits_3; inline;
  16829. function getSAM : TBits_1; inline;
  16830. function getSEG1PH : TBits_3; inline;
  16831. function getSEG2PH : TBits_3; inline;
  16832. function getSEG2PHTS : TBits_1; inline;
  16833. function getSJW : TBits_2; inline;
  16834. function getWAKFIL : TBits_1; inline;
  16835. function getw : TBits_32; inline;
  16836. procedure setBRP(thebits : TBits_6); inline;
  16837. procedure setPRSEG(thebits : TBits_3); inline;
  16838. procedure setSAM(thebits : TBits_1); inline;
  16839. procedure setSEG1PH(thebits : TBits_3); inline;
  16840. procedure setSEG2PH(thebits : TBits_3); inline;
  16841. procedure setSEG2PHTS(thebits : TBits_1); inline;
  16842. procedure setSJW(thebits : TBits_2); inline;
  16843. procedure setWAKFIL(thebits : TBits_1); inline;
  16844. procedure setw(thebits : TBits_32); inline;
  16845. public
  16846. procedure clearSAM; inline;
  16847. procedure clearSEG2PHTS; inline;
  16848. procedure clearWAKFIL; inline;
  16849. procedure setSAM; inline;
  16850. procedure setSEG2PHTS; inline;
  16851. procedure setWAKFIL; inline;
  16852. property BRP : TBits_6 read getBRP write setBRP;
  16853. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  16854. property SAM : TBits_1 read getSAM write setSAM;
  16855. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  16856. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  16857. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  16858. property SJW : TBits_2 read getSJW write setSJW;
  16859. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  16860. property w : TBits_32 read getw write setw;
  16861. end;
  16862. TCAN1_C1INT = record
  16863. private
  16864. function getCERRIE : TBits_1; inline;
  16865. function getCERRIF : TBits_1; inline;
  16866. function getCTMRIE : TBits_1; inline;
  16867. function getCTMRIF : TBits_1; inline;
  16868. function getIVRIE : TBits_1; inline;
  16869. function getIVRIF : TBits_1; inline;
  16870. function getMODIE : TBits_1; inline;
  16871. function getMODIF : TBits_1; inline;
  16872. function getRBIE : TBits_1; inline;
  16873. function getRBIF : TBits_1; inline;
  16874. function getRBOVIE : TBits_1; inline;
  16875. function getRBOVIF : TBits_1; inline;
  16876. function getSERRIE : TBits_1; inline;
  16877. function getSERRIF : TBits_1; inline;
  16878. function getTBIE : TBits_1; inline;
  16879. function getTBIF : TBits_1; inline;
  16880. function getWAKIE : TBits_1; inline;
  16881. function getWAKIF : TBits_1; inline;
  16882. function getw : TBits_32; inline;
  16883. procedure setCERRIE(thebits : TBits_1); inline;
  16884. procedure setCERRIF(thebits : TBits_1); inline;
  16885. procedure setCTMRIE(thebits : TBits_1); inline;
  16886. procedure setCTMRIF(thebits : TBits_1); inline;
  16887. procedure setIVRIE(thebits : TBits_1); inline;
  16888. procedure setIVRIF(thebits : TBits_1); inline;
  16889. procedure setMODIE(thebits : TBits_1); inline;
  16890. procedure setMODIF(thebits : TBits_1); inline;
  16891. procedure setRBIE(thebits : TBits_1); inline;
  16892. procedure setRBIF(thebits : TBits_1); inline;
  16893. procedure setRBOVIE(thebits : TBits_1); inline;
  16894. procedure setRBOVIF(thebits : TBits_1); inline;
  16895. procedure setSERRIE(thebits : TBits_1); inline;
  16896. procedure setSERRIF(thebits : TBits_1); inline;
  16897. procedure setTBIE(thebits : TBits_1); inline;
  16898. procedure setTBIF(thebits : TBits_1); inline;
  16899. procedure setWAKIE(thebits : TBits_1); inline;
  16900. procedure setWAKIF(thebits : TBits_1); inline;
  16901. procedure setw(thebits : TBits_32); inline;
  16902. public
  16903. procedure clearCERRIE; inline;
  16904. procedure clearCERRIF; inline;
  16905. procedure clearCTMRIE; inline;
  16906. procedure clearCTMRIF; inline;
  16907. procedure clearIVRIE; inline;
  16908. procedure clearIVRIF; inline;
  16909. procedure clearMODIE; inline;
  16910. procedure clearMODIF; inline;
  16911. procedure clearRBIE; inline;
  16912. procedure clearRBIF; inline;
  16913. procedure clearRBOVIE; inline;
  16914. procedure clearRBOVIF; inline;
  16915. procedure clearSERRIE; inline;
  16916. procedure clearSERRIF; inline;
  16917. procedure clearTBIE; inline;
  16918. procedure clearTBIF; inline;
  16919. procedure clearWAKIE; inline;
  16920. procedure clearWAKIF; inline;
  16921. procedure setCERRIE; inline;
  16922. procedure setCERRIF; inline;
  16923. procedure setCTMRIE; inline;
  16924. procedure setCTMRIF; inline;
  16925. procedure setIVRIE; inline;
  16926. procedure setIVRIF; inline;
  16927. procedure setMODIE; inline;
  16928. procedure setMODIF; inline;
  16929. procedure setRBIE; inline;
  16930. procedure setRBIF; inline;
  16931. procedure setRBOVIE; inline;
  16932. procedure setRBOVIF; inline;
  16933. procedure setSERRIE; inline;
  16934. procedure setSERRIF; inline;
  16935. procedure setTBIE; inline;
  16936. procedure setTBIF; inline;
  16937. procedure setWAKIE; inline;
  16938. procedure setWAKIF; inline;
  16939. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  16940. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  16941. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  16942. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  16943. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  16944. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  16945. property MODIE : TBits_1 read getMODIE write setMODIE;
  16946. property MODIF : TBits_1 read getMODIF write setMODIF;
  16947. property RBIE : TBits_1 read getRBIE write setRBIE;
  16948. property RBIF : TBits_1 read getRBIF write setRBIF;
  16949. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  16950. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  16951. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  16952. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  16953. property TBIE : TBits_1 read getTBIE write setTBIE;
  16954. property TBIF : TBits_1 read getTBIF write setTBIF;
  16955. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  16956. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  16957. property w : TBits_32 read getw write setw;
  16958. end;
  16959. TCAN1_C1VEC = record
  16960. private
  16961. function getFILHIT : TBits_5; inline;
  16962. function getICODE : TBits_7; inline;
  16963. function getw : TBits_32; inline;
  16964. procedure setFILHIT(thebits : TBits_5); inline;
  16965. procedure setICODE(thebits : TBits_7); inline;
  16966. procedure setw(thebits : TBits_32); inline;
  16967. public
  16968. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  16969. property ICODE : TBits_7 read getICODE write setICODE;
  16970. property w : TBits_32 read getw write setw;
  16971. end;
  16972. TCAN1_C1TREC = record
  16973. private
  16974. function getEWARN : TBits_1; inline;
  16975. function getRERRCNT : TBits_8; inline;
  16976. function getRXBP : TBits_1; inline;
  16977. function getRXWARN : TBits_1; inline;
  16978. function getTERRCNT : TBits_8; inline;
  16979. function getTXBO : TBits_1; inline;
  16980. function getTXBP : TBits_1; inline;
  16981. function getTXWARN : TBits_1; inline;
  16982. function getw : TBits_32; inline;
  16983. procedure setEWARN(thebits : TBits_1); inline;
  16984. procedure setRERRCNT(thebits : TBits_8); inline;
  16985. procedure setRXBP(thebits : TBits_1); inline;
  16986. procedure setRXWARN(thebits : TBits_1); inline;
  16987. procedure setTERRCNT(thebits : TBits_8); inline;
  16988. procedure setTXBO(thebits : TBits_1); inline;
  16989. procedure setTXBP(thebits : TBits_1); inline;
  16990. procedure setTXWARN(thebits : TBits_1); inline;
  16991. procedure setw(thebits : TBits_32); inline;
  16992. public
  16993. procedure clearEWARN; inline;
  16994. procedure clearRXBP; inline;
  16995. procedure clearRXWARN; inline;
  16996. procedure clearTXBO; inline;
  16997. procedure clearTXBP; inline;
  16998. procedure clearTXWARN; inline;
  16999. procedure setEWARN; inline;
  17000. procedure setRXBP; inline;
  17001. procedure setRXWARN; inline;
  17002. procedure setTXBO; inline;
  17003. procedure setTXBP; inline;
  17004. procedure setTXWARN; inline;
  17005. property EWARN : TBits_1 read getEWARN write setEWARN;
  17006. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  17007. property RXBP : TBits_1 read getRXBP write setRXBP;
  17008. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  17009. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  17010. property TXBO : TBits_1 read getTXBO write setTXBO;
  17011. property TXBP : TBits_1 read getTXBP write setTXBP;
  17012. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  17013. property w : TBits_32 read getw write setw;
  17014. end;
  17015. TCAN1_C1FSTAT = record
  17016. private
  17017. function getFIFOIP : TBits_32; inline;
  17018. function getFIFOIP0 : TBits_1; inline;
  17019. function getFIFOIP1 : TBits_1; inline;
  17020. function getFIFOIP10 : TBits_1; inline;
  17021. function getFIFOIP11 : TBits_1; inline;
  17022. function getFIFOIP12 : TBits_1; inline;
  17023. function getFIFOIP13 : TBits_1; inline;
  17024. function getFIFOIP14 : TBits_1; inline;
  17025. function getFIFOIP15 : TBits_1; inline;
  17026. function getFIFOIP16 : TBits_1; inline;
  17027. function getFIFOIP17 : TBits_1; inline;
  17028. function getFIFOIP18 : TBits_1; inline;
  17029. function getFIFOIP19 : TBits_1; inline;
  17030. function getFIFOIP2 : TBits_1; inline;
  17031. function getFIFOIP20 : TBits_1; inline;
  17032. function getFIFOIP21 : TBits_1; inline;
  17033. function getFIFOIP22 : TBits_1; inline;
  17034. function getFIFOIP23 : TBits_1; inline;
  17035. function getFIFOIP24 : TBits_1; inline;
  17036. function getFIFOIP25 : TBits_1; inline;
  17037. function getFIFOIP26 : TBits_1; inline;
  17038. function getFIFOIP27 : TBits_1; inline;
  17039. function getFIFOIP28 : TBits_1; inline;
  17040. function getFIFOIP29 : TBits_1; inline;
  17041. function getFIFOIP3 : TBits_1; inline;
  17042. function getFIFOIP30 : TBits_1; inline;
  17043. function getFIFOIP31 : TBits_1; inline;
  17044. function getFIFOIP4 : TBits_1; inline;
  17045. function getFIFOIP5 : TBits_1; inline;
  17046. function getFIFOIP6 : TBits_1; inline;
  17047. function getFIFOIP7 : TBits_1; inline;
  17048. function getFIFOIP8 : TBits_1; inline;
  17049. function getFIFOIP9 : TBits_1; inline;
  17050. function getw : TBits_32; inline;
  17051. procedure setFIFOIP(thebits : TBits_32); inline;
  17052. procedure setFIFOIP0(thebits : TBits_1); inline;
  17053. procedure setFIFOIP1(thebits : TBits_1); inline;
  17054. procedure setFIFOIP10(thebits : TBits_1); inline;
  17055. procedure setFIFOIP11(thebits : TBits_1); inline;
  17056. procedure setFIFOIP12(thebits : TBits_1); inline;
  17057. procedure setFIFOIP13(thebits : TBits_1); inline;
  17058. procedure setFIFOIP14(thebits : TBits_1); inline;
  17059. procedure setFIFOIP15(thebits : TBits_1); inline;
  17060. procedure setFIFOIP16(thebits : TBits_1); inline;
  17061. procedure setFIFOIP17(thebits : TBits_1); inline;
  17062. procedure setFIFOIP18(thebits : TBits_1); inline;
  17063. procedure setFIFOIP19(thebits : TBits_1); inline;
  17064. procedure setFIFOIP2(thebits : TBits_1); inline;
  17065. procedure setFIFOIP20(thebits : TBits_1); inline;
  17066. procedure setFIFOIP21(thebits : TBits_1); inline;
  17067. procedure setFIFOIP22(thebits : TBits_1); inline;
  17068. procedure setFIFOIP23(thebits : TBits_1); inline;
  17069. procedure setFIFOIP24(thebits : TBits_1); inline;
  17070. procedure setFIFOIP25(thebits : TBits_1); inline;
  17071. procedure setFIFOIP26(thebits : TBits_1); inline;
  17072. procedure setFIFOIP27(thebits : TBits_1); inline;
  17073. procedure setFIFOIP28(thebits : TBits_1); inline;
  17074. procedure setFIFOIP29(thebits : TBits_1); inline;
  17075. procedure setFIFOIP3(thebits : TBits_1); inline;
  17076. procedure setFIFOIP30(thebits : TBits_1); inline;
  17077. procedure setFIFOIP31(thebits : TBits_1); inline;
  17078. procedure setFIFOIP4(thebits : TBits_1); inline;
  17079. procedure setFIFOIP5(thebits : TBits_1); inline;
  17080. procedure setFIFOIP6(thebits : TBits_1); inline;
  17081. procedure setFIFOIP7(thebits : TBits_1); inline;
  17082. procedure setFIFOIP8(thebits : TBits_1); inline;
  17083. procedure setFIFOIP9(thebits : TBits_1); inline;
  17084. procedure setw(thebits : TBits_32); inline;
  17085. public
  17086. procedure clearFIFOIP0; inline;
  17087. procedure clearFIFOIP10; inline;
  17088. procedure clearFIFOIP11; inline;
  17089. procedure clearFIFOIP12; inline;
  17090. procedure clearFIFOIP13; inline;
  17091. procedure clearFIFOIP14; inline;
  17092. procedure clearFIFOIP15; inline;
  17093. procedure clearFIFOIP16; inline;
  17094. procedure clearFIFOIP17; inline;
  17095. procedure clearFIFOIP18; inline;
  17096. procedure clearFIFOIP19; inline;
  17097. procedure clearFIFOIP1; inline;
  17098. procedure clearFIFOIP20; inline;
  17099. procedure clearFIFOIP21; inline;
  17100. procedure clearFIFOIP22; inline;
  17101. procedure clearFIFOIP23; inline;
  17102. procedure clearFIFOIP24; inline;
  17103. procedure clearFIFOIP25; inline;
  17104. procedure clearFIFOIP26; inline;
  17105. procedure clearFIFOIP27; inline;
  17106. procedure clearFIFOIP28; inline;
  17107. procedure clearFIFOIP29; inline;
  17108. procedure clearFIFOIP2; inline;
  17109. procedure clearFIFOIP30; inline;
  17110. procedure clearFIFOIP31; inline;
  17111. procedure clearFIFOIP3; inline;
  17112. procedure clearFIFOIP4; inline;
  17113. procedure clearFIFOIP5; inline;
  17114. procedure clearFIFOIP6; inline;
  17115. procedure clearFIFOIP7; inline;
  17116. procedure clearFIFOIP8; inline;
  17117. procedure clearFIFOIP9; inline;
  17118. procedure setFIFOIP0; inline;
  17119. procedure setFIFOIP10; inline;
  17120. procedure setFIFOIP11; inline;
  17121. procedure setFIFOIP12; inline;
  17122. procedure setFIFOIP13; inline;
  17123. procedure setFIFOIP14; inline;
  17124. procedure setFIFOIP15; inline;
  17125. procedure setFIFOIP16; inline;
  17126. procedure setFIFOIP17; inline;
  17127. procedure setFIFOIP18; inline;
  17128. procedure setFIFOIP19; inline;
  17129. procedure setFIFOIP1; inline;
  17130. procedure setFIFOIP20; inline;
  17131. procedure setFIFOIP21; inline;
  17132. procedure setFIFOIP22; inline;
  17133. procedure setFIFOIP23; inline;
  17134. procedure setFIFOIP24; inline;
  17135. procedure setFIFOIP25; inline;
  17136. procedure setFIFOIP26; inline;
  17137. procedure setFIFOIP27; inline;
  17138. procedure setFIFOIP28; inline;
  17139. procedure setFIFOIP29; inline;
  17140. procedure setFIFOIP2; inline;
  17141. procedure setFIFOIP30; inline;
  17142. procedure setFIFOIP31; inline;
  17143. procedure setFIFOIP3; inline;
  17144. procedure setFIFOIP4; inline;
  17145. procedure setFIFOIP5; inline;
  17146. procedure setFIFOIP6; inline;
  17147. procedure setFIFOIP7; inline;
  17148. procedure setFIFOIP8; inline;
  17149. procedure setFIFOIP9; inline;
  17150. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  17151. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  17152. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  17153. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  17154. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  17155. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  17156. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  17157. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  17158. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  17159. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  17160. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  17161. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  17162. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  17163. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  17164. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  17165. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  17166. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  17167. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  17168. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  17169. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  17170. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  17171. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  17172. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  17173. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  17174. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  17175. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  17176. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  17177. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  17178. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  17179. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  17180. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  17181. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  17182. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  17183. property w : TBits_32 read getw write setw;
  17184. end;
  17185. TCAN1_C1RXOVF = record
  17186. private
  17187. function getRXOVF : TBits_32; inline;
  17188. function getRXOVF0 : TBits_1; inline;
  17189. function getRXOVF1 : TBits_1; inline;
  17190. function getRXOVF10 : TBits_1; inline;
  17191. function getRXOVF11 : TBits_1; inline;
  17192. function getRXOVF12 : TBits_1; inline;
  17193. function getRXOVF13 : TBits_1; inline;
  17194. function getRXOVF14 : TBits_1; inline;
  17195. function getRXOVF15 : TBits_1; inline;
  17196. function getRXOVF16 : TBits_1; inline;
  17197. function getRXOVF17 : TBits_1; inline;
  17198. function getRXOVF18 : TBits_1; inline;
  17199. function getRXOVF19 : TBits_1; inline;
  17200. function getRXOVF2 : TBits_1; inline;
  17201. function getRXOVF20 : TBits_1; inline;
  17202. function getRXOVF21 : TBits_1; inline;
  17203. function getRXOVF22 : TBits_1; inline;
  17204. function getRXOVF23 : TBits_1; inline;
  17205. function getRXOVF24 : TBits_1; inline;
  17206. function getRXOVF25 : TBits_1; inline;
  17207. function getRXOVF26 : TBits_1; inline;
  17208. function getRXOVF27 : TBits_1; inline;
  17209. function getRXOVF28 : TBits_1; inline;
  17210. function getRXOVF29 : TBits_1; inline;
  17211. function getRXOVF3 : TBits_1; inline;
  17212. function getRXOVF30 : TBits_1; inline;
  17213. function getRXOVF31 : TBits_1; inline;
  17214. function getRXOVF4 : TBits_1; inline;
  17215. function getRXOVF5 : TBits_1; inline;
  17216. function getRXOVF6 : TBits_1; inline;
  17217. function getRXOVF7 : TBits_1; inline;
  17218. function getRXOVF8 : TBits_1; inline;
  17219. function getRXOVF9 : TBits_1; inline;
  17220. function getw : TBits_32; inline;
  17221. procedure setRXOVF(thebits : TBits_32); inline;
  17222. procedure setRXOVF0(thebits : TBits_1); inline;
  17223. procedure setRXOVF1(thebits : TBits_1); inline;
  17224. procedure setRXOVF10(thebits : TBits_1); inline;
  17225. procedure setRXOVF11(thebits : TBits_1); inline;
  17226. procedure setRXOVF12(thebits : TBits_1); inline;
  17227. procedure setRXOVF13(thebits : TBits_1); inline;
  17228. procedure setRXOVF14(thebits : TBits_1); inline;
  17229. procedure setRXOVF15(thebits : TBits_1); inline;
  17230. procedure setRXOVF16(thebits : TBits_1); inline;
  17231. procedure setRXOVF17(thebits : TBits_1); inline;
  17232. procedure setRXOVF18(thebits : TBits_1); inline;
  17233. procedure setRXOVF19(thebits : TBits_1); inline;
  17234. procedure setRXOVF2(thebits : TBits_1); inline;
  17235. procedure setRXOVF20(thebits : TBits_1); inline;
  17236. procedure setRXOVF21(thebits : TBits_1); inline;
  17237. procedure setRXOVF22(thebits : TBits_1); inline;
  17238. procedure setRXOVF23(thebits : TBits_1); inline;
  17239. procedure setRXOVF24(thebits : TBits_1); inline;
  17240. procedure setRXOVF25(thebits : TBits_1); inline;
  17241. procedure setRXOVF26(thebits : TBits_1); inline;
  17242. procedure setRXOVF27(thebits : TBits_1); inline;
  17243. procedure setRXOVF28(thebits : TBits_1); inline;
  17244. procedure setRXOVF29(thebits : TBits_1); inline;
  17245. procedure setRXOVF3(thebits : TBits_1); inline;
  17246. procedure setRXOVF30(thebits : TBits_1); inline;
  17247. procedure setRXOVF31(thebits : TBits_1); inline;
  17248. procedure setRXOVF4(thebits : TBits_1); inline;
  17249. procedure setRXOVF5(thebits : TBits_1); inline;
  17250. procedure setRXOVF6(thebits : TBits_1); inline;
  17251. procedure setRXOVF7(thebits : TBits_1); inline;
  17252. procedure setRXOVF8(thebits : TBits_1); inline;
  17253. procedure setRXOVF9(thebits : TBits_1); inline;
  17254. procedure setw(thebits : TBits_32); inline;
  17255. public
  17256. procedure clearRXOVF0; inline;
  17257. procedure clearRXOVF10; inline;
  17258. procedure clearRXOVF11; inline;
  17259. procedure clearRXOVF12; inline;
  17260. procedure clearRXOVF13; inline;
  17261. procedure clearRXOVF14; inline;
  17262. procedure clearRXOVF15; inline;
  17263. procedure clearRXOVF16; inline;
  17264. procedure clearRXOVF17; inline;
  17265. procedure clearRXOVF18; inline;
  17266. procedure clearRXOVF19; inline;
  17267. procedure clearRXOVF1; inline;
  17268. procedure clearRXOVF20; inline;
  17269. procedure clearRXOVF21; inline;
  17270. procedure clearRXOVF22; inline;
  17271. procedure clearRXOVF23; inline;
  17272. procedure clearRXOVF24; inline;
  17273. procedure clearRXOVF25; inline;
  17274. procedure clearRXOVF26; inline;
  17275. procedure clearRXOVF27; inline;
  17276. procedure clearRXOVF28; inline;
  17277. procedure clearRXOVF29; inline;
  17278. procedure clearRXOVF2; inline;
  17279. procedure clearRXOVF30; inline;
  17280. procedure clearRXOVF31; inline;
  17281. procedure clearRXOVF3; inline;
  17282. procedure clearRXOVF4; inline;
  17283. procedure clearRXOVF5; inline;
  17284. procedure clearRXOVF6; inline;
  17285. procedure clearRXOVF7; inline;
  17286. procedure clearRXOVF8; inline;
  17287. procedure clearRXOVF9; inline;
  17288. procedure setRXOVF0; inline;
  17289. procedure setRXOVF10; inline;
  17290. procedure setRXOVF11; inline;
  17291. procedure setRXOVF12; inline;
  17292. procedure setRXOVF13; inline;
  17293. procedure setRXOVF14; inline;
  17294. procedure setRXOVF15; inline;
  17295. procedure setRXOVF16; inline;
  17296. procedure setRXOVF17; inline;
  17297. procedure setRXOVF18; inline;
  17298. procedure setRXOVF19; inline;
  17299. procedure setRXOVF1; inline;
  17300. procedure setRXOVF20; inline;
  17301. procedure setRXOVF21; inline;
  17302. procedure setRXOVF22; inline;
  17303. procedure setRXOVF23; inline;
  17304. procedure setRXOVF24; inline;
  17305. procedure setRXOVF25; inline;
  17306. procedure setRXOVF26; inline;
  17307. procedure setRXOVF27; inline;
  17308. procedure setRXOVF28; inline;
  17309. procedure setRXOVF29; inline;
  17310. procedure setRXOVF2; inline;
  17311. procedure setRXOVF30; inline;
  17312. procedure setRXOVF31; inline;
  17313. procedure setRXOVF3; inline;
  17314. procedure setRXOVF4; inline;
  17315. procedure setRXOVF5; inline;
  17316. procedure setRXOVF6; inline;
  17317. procedure setRXOVF7; inline;
  17318. procedure setRXOVF8; inline;
  17319. procedure setRXOVF9; inline;
  17320. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  17321. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  17322. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  17323. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  17324. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  17325. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  17326. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  17327. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  17328. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  17329. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  17330. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  17331. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  17332. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  17333. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  17334. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  17335. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  17336. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  17337. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  17338. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  17339. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  17340. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  17341. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  17342. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  17343. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  17344. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  17345. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  17346. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  17347. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  17348. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  17349. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  17350. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  17351. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  17352. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  17353. property w : TBits_32 read getw write setw;
  17354. end;
  17355. TCAN1_C1TMR = record
  17356. private
  17357. function getCANTS : TBits_16; inline;
  17358. function getCANTSPRE : TBits_16; inline;
  17359. function getw : TBits_32; inline;
  17360. procedure setCANTS(thebits : TBits_16); inline;
  17361. procedure setCANTSPRE(thebits : TBits_16); inline;
  17362. procedure setw(thebits : TBits_32); inline;
  17363. public
  17364. property CANTS : TBits_16 read getCANTS write setCANTS;
  17365. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  17366. property w : TBits_32 read getw write setw;
  17367. end;
  17368. TCAN1_C1RXM0 = record
  17369. private
  17370. function getEID : TBits_18; inline;
  17371. function getMIDE : TBits_1; inline;
  17372. function getSID : TBits_11; inline;
  17373. function getw : TBits_32; inline;
  17374. procedure setEID(thebits : TBits_18); inline;
  17375. procedure setMIDE(thebits : TBits_1); inline;
  17376. procedure setSID(thebits : TBits_11); inline;
  17377. procedure setw(thebits : TBits_32); inline;
  17378. public
  17379. procedure clearMIDE; inline;
  17380. procedure setMIDE; inline;
  17381. property EID : TBits_18 read getEID write setEID;
  17382. property MIDE : TBits_1 read getMIDE write setMIDE;
  17383. property SID : TBits_11 read getSID write setSID;
  17384. property w : TBits_32 read getw write setw;
  17385. end;
  17386. TCAN1_C1RXM1 = record
  17387. private
  17388. function getEID : TBits_18; inline;
  17389. function getMIDE : TBits_1; inline;
  17390. function getSID : TBits_11; inline;
  17391. function getw : TBits_32; inline;
  17392. procedure setEID(thebits : TBits_18); inline;
  17393. procedure setMIDE(thebits : TBits_1); inline;
  17394. procedure setSID(thebits : TBits_11); inline;
  17395. procedure setw(thebits : TBits_32); inline;
  17396. public
  17397. procedure clearMIDE; inline;
  17398. procedure setMIDE; inline;
  17399. property EID : TBits_18 read getEID write setEID;
  17400. property MIDE : TBits_1 read getMIDE write setMIDE;
  17401. property SID : TBits_11 read getSID write setSID;
  17402. property w : TBits_32 read getw write setw;
  17403. end;
  17404. TCAN1_C1RXM2 = record
  17405. private
  17406. function getEID : TBits_18; inline;
  17407. function getMIDE : TBits_1; inline;
  17408. function getSID : TBits_11; inline;
  17409. function getw : TBits_32; inline;
  17410. procedure setEID(thebits : TBits_18); inline;
  17411. procedure setMIDE(thebits : TBits_1); inline;
  17412. procedure setSID(thebits : TBits_11); inline;
  17413. procedure setw(thebits : TBits_32); inline;
  17414. public
  17415. procedure clearMIDE; inline;
  17416. procedure setMIDE; inline;
  17417. property EID : TBits_18 read getEID write setEID;
  17418. property MIDE : TBits_1 read getMIDE write setMIDE;
  17419. property SID : TBits_11 read getSID write setSID;
  17420. property w : TBits_32 read getw write setw;
  17421. end;
  17422. TCAN1_C1RXM3 = record
  17423. private
  17424. function getEID : TBits_18; inline;
  17425. function getMIDE : TBits_1; inline;
  17426. function getSID : TBits_11; inline;
  17427. function getw : TBits_32; inline;
  17428. procedure setEID(thebits : TBits_18); inline;
  17429. procedure setMIDE(thebits : TBits_1); inline;
  17430. procedure setSID(thebits : TBits_11); inline;
  17431. procedure setw(thebits : TBits_32); inline;
  17432. public
  17433. procedure clearMIDE; inline;
  17434. procedure setMIDE; inline;
  17435. property EID : TBits_18 read getEID write setEID;
  17436. property MIDE : TBits_1 read getMIDE write setMIDE;
  17437. property SID : TBits_11 read getSID write setSID;
  17438. property w : TBits_32 read getw write setw;
  17439. end;
  17440. TCAN1_C1FLTCON0 = record
  17441. private
  17442. function getFLTEN0 : TBits_1; inline;
  17443. function getFLTEN1 : TBits_1; inline;
  17444. function getFLTEN2 : TBits_1; inline;
  17445. function getFLTEN3 : TBits_1; inline;
  17446. function getFSEL0 : TBits_5; inline;
  17447. function getFSEL1 : TBits_5; inline;
  17448. function getFSEL2 : TBits_5; inline;
  17449. function getFSEL3 : TBits_5; inline;
  17450. function getMSEL0 : TBits_2; inline;
  17451. function getMSEL1 : TBits_2; inline;
  17452. function getMSEL2 : TBits_2; inline;
  17453. function getMSEL3 : TBits_2; inline;
  17454. function getw : TBits_32; inline;
  17455. procedure setFLTEN0(thebits : TBits_1); inline;
  17456. procedure setFLTEN1(thebits : TBits_1); inline;
  17457. procedure setFLTEN2(thebits : TBits_1); inline;
  17458. procedure setFLTEN3(thebits : TBits_1); inline;
  17459. procedure setFSEL0(thebits : TBits_5); inline;
  17460. procedure setFSEL1(thebits : TBits_5); inline;
  17461. procedure setFSEL2(thebits : TBits_5); inline;
  17462. procedure setFSEL3(thebits : TBits_5); inline;
  17463. procedure setMSEL0(thebits : TBits_2); inline;
  17464. procedure setMSEL1(thebits : TBits_2); inline;
  17465. procedure setMSEL2(thebits : TBits_2); inline;
  17466. procedure setMSEL3(thebits : TBits_2); inline;
  17467. procedure setw(thebits : TBits_32); inline;
  17468. public
  17469. procedure clearFLTEN0; inline;
  17470. procedure clearFLTEN1; inline;
  17471. procedure clearFLTEN2; inline;
  17472. procedure clearFLTEN3; inline;
  17473. procedure setFLTEN0; inline;
  17474. procedure setFLTEN1; inline;
  17475. procedure setFLTEN2; inline;
  17476. procedure setFLTEN3; inline;
  17477. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  17478. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  17479. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  17480. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  17481. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  17482. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  17483. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  17484. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  17485. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  17486. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  17487. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  17488. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  17489. property w : TBits_32 read getw write setw;
  17490. end;
  17491. TCAN1_C1FLTCON1 = record
  17492. private
  17493. function getFLTEN4 : TBits_1; inline;
  17494. function getFLTEN5 : TBits_1; inline;
  17495. function getFLTEN6 : TBits_1; inline;
  17496. function getFLTEN7 : TBits_1; inline;
  17497. function getFSEL4 : TBits_5; inline;
  17498. function getFSEL5 : TBits_5; inline;
  17499. function getFSEL6 : TBits_5; inline;
  17500. function getFSEL7 : TBits_5; inline;
  17501. function getMSEL4 : TBits_2; inline;
  17502. function getMSEL5 : TBits_2; inline;
  17503. function getMSEL6 : TBits_2; inline;
  17504. function getMSEL7 : TBits_2; inline;
  17505. function getw : TBits_32; inline;
  17506. procedure setFLTEN4(thebits : TBits_1); inline;
  17507. procedure setFLTEN5(thebits : TBits_1); inline;
  17508. procedure setFLTEN6(thebits : TBits_1); inline;
  17509. procedure setFLTEN7(thebits : TBits_1); inline;
  17510. procedure setFSEL4(thebits : TBits_5); inline;
  17511. procedure setFSEL5(thebits : TBits_5); inline;
  17512. procedure setFSEL6(thebits : TBits_5); inline;
  17513. procedure setFSEL7(thebits : TBits_5); inline;
  17514. procedure setMSEL4(thebits : TBits_2); inline;
  17515. procedure setMSEL5(thebits : TBits_2); inline;
  17516. procedure setMSEL6(thebits : TBits_2); inline;
  17517. procedure setMSEL7(thebits : TBits_2); inline;
  17518. procedure setw(thebits : TBits_32); inline;
  17519. public
  17520. procedure clearFLTEN4; inline;
  17521. procedure clearFLTEN5; inline;
  17522. procedure clearFLTEN6; inline;
  17523. procedure clearFLTEN7; inline;
  17524. procedure setFLTEN4; inline;
  17525. procedure setFLTEN5; inline;
  17526. procedure setFLTEN6; inline;
  17527. procedure setFLTEN7; inline;
  17528. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  17529. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  17530. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  17531. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  17532. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  17533. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  17534. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  17535. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  17536. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  17537. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  17538. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  17539. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  17540. property w : TBits_32 read getw write setw;
  17541. end;
  17542. TCAN1_C1FLTCON2 = record
  17543. private
  17544. function getFLTEN10 : TBits_1; inline;
  17545. function getFLTEN11 : TBits_1; inline;
  17546. function getFLTEN8 : TBits_1; inline;
  17547. function getFLTEN9 : TBits_1; inline;
  17548. function getFSEL10 : TBits_5; inline;
  17549. function getFSEL11 : TBits_5; inline;
  17550. function getFSEL8 : TBits_5; inline;
  17551. function getFSEL9 : TBits_5; inline;
  17552. function getMSEL10 : TBits_2; inline;
  17553. function getMSEL11 : TBits_2; inline;
  17554. function getMSEL8 : TBits_2; inline;
  17555. function getMSEL9 : TBits_2; inline;
  17556. function getw : TBits_32; inline;
  17557. procedure setFLTEN10(thebits : TBits_1); inline;
  17558. procedure setFLTEN11(thebits : TBits_1); inline;
  17559. procedure setFLTEN8(thebits : TBits_1); inline;
  17560. procedure setFLTEN9(thebits : TBits_1); inline;
  17561. procedure setFSEL10(thebits : TBits_5); inline;
  17562. procedure setFSEL11(thebits : TBits_5); inline;
  17563. procedure setFSEL8(thebits : TBits_5); inline;
  17564. procedure setFSEL9(thebits : TBits_5); inline;
  17565. procedure setMSEL10(thebits : TBits_2); inline;
  17566. procedure setMSEL11(thebits : TBits_2); inline;
  17567. procedure setMSEL8(thebits : TBits_2); inline;
  17568. procedure setMSEL9(thebits : TBits_2); inline;
  17569. procedure setw(thebits : TBits_32); inline;
  17570. public
  17571. procedure clearFLTEN10; inline;
  17572. procedure clearFLTEN11; inline;
  17573. procedure clearFLTEN8; inline;
  17574. procedure clearFLTEN9; inline;
  17575. procedure setFLTEN10; inline;
  17576. procedure setFLTEN11; inline;
  17577. procedure setFLTEN8; inline;
  17578. procedure setFLTEN9; inline;
  17579. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  17580. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  17581. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  17582. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  17583. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  17584. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  17585. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  17586. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  17587. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  17588. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  17589. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  17590. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  17591. property w : TBits_32 read getw write setw;
  17592. end;
  17593. TCAN1_C1FLTCON3 = record
  17594. private
  17595. function getFLTEN12 : TBits_1; inline;
  17596. function getFLTEN13 : TBits_1; inline;
  17597. function getFLTEN14 : TBits_1; inline;
  17598. function getFLTEN15 : TBits_1; inline;
  17599. function getFSEL12 : TBits_5; inline;
  17600. function getFSEL13 : TBits_5; inline;
  17601. function getFSEL14 : TBits_5; inline;
  17602. function getFSEL15 : TBits_5; inline;
  17603. function getMSEL12 : TBits_2; inline;
  17604. function getMSEL13 : TBits_2; inline;
  17605. function getMSEL14 : TBits_2; inline;
  17606. function getMSEL15 : TBits_2; inline;
  17607. function getw : TBits_32; inline;
  17608. procedure setFLTEN12(thebits : TBits_1); inline;
  17609. procedure setFLTEN13(thebits : TBits_1); inline;
  17610. procedure setFLTEN14(thebits : TBits_1); inline;
  17611. procedure setFLTEN15(thebits : TBits_1); inline;
  17612. procedure setFSEL12(thebits : TBits_5); inline;
  17613. procedure setFSEL13(thebits : TBits_5); inline;
  17614. procedure setFSEL14(thebits : TBits_5); inline;
  17615. procedure setFSEL15(thebits : TBits_5); inline;
  17616. procedure setMSEL12(thebits : TBits_2); inline;
  17617. procedure setMSEL13(thebits : TBits_2); inline;
  17618. procedure setMSEL14(thebits : TBits_2); inline;
  17619. procedure setMSEL15(thebits : TBits_2); inline;
  17620. procedure setw(thebits : TBits_32); inline;
  17621. public
  17622. procedure clearFLTEN12; inline;
  17623. procedure clearFLTEN13; inline;
  17624. procedure clearFLTEN14; inline;
  17625. procedure clearFLTEN15; inline;
  17626. procedure setFLTEN12; inline;
  17627. procedure setFLTEN13; inline;
  17628. procedure setFLTEN14; inline;
  17629. procedure setFLTEN15; inline;
  17630. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  17631. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  17632. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  17633. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  17634. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  17635. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  17636. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  17637. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  17638. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  17639. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  17640. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  17641. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  17642. property w : TBits_32 read getw write setw;
  17643. end;
  17644. TCAN1_C1FLTCON4 = record
  17645. private
  17646. function getFLTEN16 : TBits_1; inline;
  17647. function getFLTEN17 : TBits_1; inline;
  17648. function getFLTEN18 : TBits_1; inline;
  17649. function getFLTEN19 : TBits_1; inline;
  17650. function getFSEL16 : TBits_5; inline;
  17651. function getFSEL17 : TBits_5; inline;
  17652. function getFSEL18 : TBits_5; inline;
  17653. function getFSEL19 : TBits_5; inline;
  17654. function getMSEL16 : TBits_2; inline;
  17655. function getMSEL17 : TBits_2; inline;
  17656. function getMSEL18 : TBits_2; inline;
  17657. function getMSEL19 : TBits_2; inline;
  17658. function getw : TBits_32; inline;
  17659. procedure setFLTEN16(thebits : TBits_1); inline;
  17660. procedure setFLTEN17(thebits : TBits_1); inline;
  17661. procedure setFLTEN18(thebits : TBits_1); inline;
  17662. procedure setFLTEN19(thebits : TBits_1); inline;
  17663. procedure setFSEL16(thebits : TBits_5); inline;
  17664. procedure setFSEL17(thebits : TBits_5); inline;
  17665. procedure setFSEL18(thebits : TBits_5); inline;
  17666. procedure setFSEL19(thebits : TBits_5); inline;
  17667. procedure setMSEL16(thebits : TBits_2); inline;
  17668. procedure setMSEL17(thebits : TBits_2); inline;
  17669. procedure setMSEL18(thebits : TBits_2); inline;
  17670. procedure setMSEL19(thebits : TBits_2); inline;
  17671. procedure setw(thebits : TBits_32); inline;
  17672. public
  17673. procedure clearFLTEN16; inline;
  17674. procedure clearFLTEN17; inline;
  17675. procedure clearFLTEN18; inline;
  17676. procedure clearFLTEN19; inline;
  17677. procedure setFLTEN16; inline;
  17678. procedure setFLTEN17; inline;
  17679. procedure setFLTEN18; inline;
  17680. procedure setFLTEN19; inline;
  17681. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  17682. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  17683. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  17684. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  17685. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  17686. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  17687. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  17688. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  17689. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  17690. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  17691. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  17692. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  17693. property w : TBits_32 read getw write setw;
  17694. end;
  17695. TCAN1_C1FLTCON5 = record
  17696. private
  17697. function getFLTEN20 : TBits_1; inline;
  17698. function getFLTEN21 : TBits_1; inline;
  17699. function getFLTEN22 : TBits_1; inline;
  17700. function getFLTEN23 : TBits_1; inline;
  17701. function getFSEL20 : TBits_5; inline;
  17702. function getFSEL21 : TBits_5; inline;
  17703. function getFSEL22 : TBits_5; inline;
  17704. function getFSEL23 : TBits_5; inline;
  17705. function getMSEL20 : TBits_2; inline;
  17706. function getMSEL21 : TBits_2; inline;
  17707. function getMSEL22 : TBits_2; inline;
  17708. function getMSEL23 : TBits_2; inline;
  17709. function getw : TBits_32; inline;
  17710. procedure setFLTEN20(thebits : TBits_1); inline;
  17711. procedure setFLTEN21(thebits : TBits_1); inline;
  17712. procedure setFLTEN22(thebits : TBits_1); inline;
  17713. procedure setFLTEN23(thebits : TBits_1); inline;
  17714. procedure setFSEL20(thebits : TBits_5); inline;
  17715. procedure setFSEL21(thebits : TBits_5); inline;
  17716. procedure setFSEL22(thebits : TBits_5); inline;
  17717. procedure setFSEL23(thebits : TBits_5); inline;
  17718. procedure setMSEL20(thebits : TBits_2); inline;
  17719. procedure setMSEL21(thebits : TBits_2); inline;
  17720. procedure setMSEL22(thebits : TBits_2); inline;
  17721. procedure setMSEL23(thebits : TBits_2); inline;
  17722. procedure setw(thebits : TBits_32); inline;
  17723. public
  17724. procedure clearFLTEN20; inline;
  17725. procedure clearFLTEN21; inline;
  17726. procedure clearFLTEN22; inline;
  17727. procedure clearFLTEN23; inline;
  17728. procedure setFLTEN20; inline;
  17729. procedure setFLTEN21; inline;
  17730. procedure setFLTEN22; inline;
  17731. procedure setFLTEN23; inline;
  17732. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  17733. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  17734. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  17735. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  17736. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  17737. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  17738. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  17739. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  17740. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  17741. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  17742. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  17743. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  17744. property w : TBits_32 read getw write setw;
  17745. end;
  17746. TCAN1_C1FLTCON6 = record
  17747. private
  17748. function getFLTEN24 : TBits_1; inline;
  17749. function getFLTEN25 : TBits_1; inline;
  17750. function getFLTEN26 : TBits_1; inline;
  17751. function getFLTEN27 : TBits_1; inline;
  17752. function getFSEL24 : TBits_5; inline;
  17753. function getFSEL25 : TBits_5; inline;
  17754. function getFSEL26 : TBits_5; inline;
  17755. function getFSEL27 : TBits_5; inline;
  17756. function getMSEL24 : TBits_2; inline;
  17757. function getMSEL25 : TBits_2; inline;
  17758. function getMSEL26 : TBits_2; inline;
  17759. function getMSEL27 : TBits_2; inline;
  17760. function getw : TBits_32; inline;
  17761. procedure setFLTEN24(thebits : TBits_1); inline;
  17762. procedure setFLTEN25(thebits : TBits_1); inline;
  17763. procedure setFLTEN26(thebits : TBits_1); inline;
  17764. procedure setFLTEN27(thebits : TBits_1); inline;
  17765. procedure setFSEL24(thebits : TBits_5); inline;
  17766. procedure setFSEL25(thebits : TBits_5); inline;
  17767. procedure setFSEL26(thebits : TBits_5); inline;
  17768. procedure setFSEL27(thebits : TBits_5); inline;
  17769. procedure setMSEL24(thebits : TBits_2); inline;
  17770. procedure setMSEL25(thebits : TBits_2); inline;
  17771. procedure setMSEL26(thebits : TBits_2); inline;
  17772. procedure setMSEL27(thebits : TBits_2); inline;
  17773. procedure setw(thebits : TBits_32); inline;
  17774. public
  17775. procedure clearFLTEN24; inline;
  17776. procedure clearFLTEN25; inline;
  17777. procedure clearFLTEN26; inline;
  17778. procedure clearFLTEN27; inline;
  17779. procedure setFLTEN24; inline;
  17780. procedure setFLTEN25; inline;
  17781. procedure setFLTEN26; inline;
  17782. procedure setFLTEN27; inline;
  17783. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  17784. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  17785. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  17786. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  17787. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  17788. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  17789. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  17790. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  17791. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  17792. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  17793. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  17794. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  17795. property w : TBits_32 read getw write setw;
  17796. end;
  17797. TCAN1_C1FLTCON7 = record
  17798. private
  17799. function getFLTEN28 : TBits_1; inline;
  17800. function getFLTEN29 : TBits_1; inline;
  17801. function getFLTEN30 : TBits_1; inline;
  17802. function getFLTEN31 : TBits_1; inline;
  17803. function getFSEL28 : TBits_5; inline;
  17804. function getFSEL29 : TBits_5; inline;
  17805. function getFSEL30 : TBits_5; inline;
  17806. function getFSEL31 : TBits_5; inline;
  17807. function getMSEL28 : TBits_2; inline;
  17808. function getMSEL29 : TBits_2; inline;
  17809. function getMSEL30 : TBits_2; inline;
  17810. function getMSEL31 : TBits_2; inline;
  17811. function getw : TBits_32; inline;
  17812. procedure setFLTEN28(thebits : TBits_1); inline;
  17813. procedure setFLTEN29(thebits : TBits_1); inline;
  17814. procedure setFLTEN30(thebits : TBits_1); inline;
  17815. procedure setFLTEN31(thebits : TBits_1); inline;
  17816. procedure setFSEL28(thebits : TBits_5); inline;
  17817. procedure setFSEL29(thebits : TBits_5); inline;
  17818. procedure setFSEL30(thebits : TBits_5); inline;
  17819. procedure setFSEL31(thebits : TBits_5); inline;
  17820. procedure setMSEL28(thebits : TBits_2); inline;
  17821. procedure setMSEL29(thebits : TBits_2); inline;
  17822. procedure setMSEL30(thebits : TBits_2); inline;
  17823. procedure setMSEL31(thebits : TBits_2); inline;
  17824. procedure setw(thebits : TBits_32); inline;
  17825. public
  17826. procedure clearFLTEN28; inline;
  17827. procedure clearFLTEN29; inline;
  17828. procedure clearFLTEN30; inline;
  17829. procedure clearFLTEN31; inline;
  17830. procedure setFLTEN28; inline;
  17831. procedure setFLTEN29; inline;
  17832. procedure setFLTEN30; inline;
  17833. procedure setFLTEN31; inline;
  17834. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  17835. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  17836. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  17837. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  17838. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  17839. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  17840. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  17841. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  17842. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  17843. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  17844. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  17845. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  17846. property w : TBits_32 read getw write setw;
  17847. end;
  17848. TCAN1_C1RXF0 = record
  17849. private
  17850. function getEID : TBits_18; inline;
  17851. function getEXID : TBits_1; inline;
  17852. function getSID : TBits_11; inline;
  17853. function getw : TBits_32; inline;
  17854. procedure setEID(thebits : TBits_18); inline;
  17855. procedure setEXID(thebits : TBits_1); inline;
  17856. procedure setSID(thebits : TBits_11); inline;
  17857. procedure setw(thebits : TBits_32); inline;
  17858. public
  17859. procedure clearEXID; inline;
  17860. procedure setEXID; inline;
  17861. property EID : TBits_18 read getEID write setEID;
  17862. property EXID : TBits_1 read getEXID write setEXID;
  17863. property SID : TBits_11 read getSID write setSID;
  17864. property w : TBits_32 read getw write setw;
  17865. end;
  17866. TCAN1_C1RXF1 = record
  17867. private
  17868. function getEID : TBits_18; inline;
  17869. function getEXID : TBits_1; inline;
  17870. function getSID : TBits_11; inline;
  17871. function getw : TBits_32; inline;
  17872. procedure setEID(thebits : TBits_18); inline;
  17873. procedure setEXID(thebits : TBits_1); inline;
  17874. procedure setSID(thebits : TBits_11); inline;
  17875. procedure setw(thebits : TBits_32); inline;
  17876. public
  17877. procedure clearEXID; inline;
  17878. procedure setEXID; inline;
  17879. property EID : TBits_18 read getEID write setEID;
  17880. property EXID : TBits_1 read getEXID write setEXID;
  17881. property SID : TBits_11 read getSID write setSID;
  17882. property w : TBits_32 read getw write setw;
  17883. end;
  17884. TCAN1_C1RXF2 = record
  17885. private
  17886. function getEID : TBits_18; inline;
  17887. function getEXID : TBits_1; inline;
  17888. function getSID : TBits_11; inline;
  17889. function getw : TBits_32; inline;
  17890. procedure setEID(thebits : TBits_18); inline;
  17891. procedure setEXID(thebits : TBits_1); inline;
  17892. procedure setSID(thebits : TBits_11); inline;
  17893. procedure setw(thebits : TBits_32); inline;
  17894. public
  17895. procedure clearEXID; inline;
  17896. procedure setEXID; inline;
  17897. property EID : TBits_18 read getEID write setEID;
  17898. property EXID : TBits_1 read getEXID write setEXID;
  17899. property SID : TBits_11 read getSID write setSID;
  17900. property w : TBits_32 read getw write setw;
  17901. end;
  17902. TCAN1_C1RXF3 = record
  17903. private
  17904. function getEID : TBits_18; inline;
  17905. function getEXID : TBits_1; inline;
  17906. function getSID : TBits_11; inline;
  17907. function getw : TBits_32; inline;
  17908. procedure setEID(thebits : TBits_18); inline;
  17909. procedure setEXID(thebits : TBits_1); inline;
  17910. procedure setSID(thebits : TBits_11); inline;
  17911. procedure setw(thebits : TBits_32); inline;
  17912. public
  17913. procedure clearEXID; inline;
  17914. procedure setEXID; inline;
  17915. property EID : TBits_18 read getEID write setEID;
  17916. property EXID : TBits_1 read getEXID write setEXID;
  17917. property SID : TBits_11 read getSID write setSID;
  17918. property w : TBits_32 read getw write setw;
  17919. end;
  17920. TCAN1_C1RXF4 = record
  17921. private
  17922. function getEID : TBits_18; inline;
  17923. function getEXID : TBits_1; inline;
  17924. function getSID : TBits_11; inline;
  17925. function getw : TBits_32; inline;
  17926. procedure setEID(thebits : TBits_18); inline;
  17927. procedure setEXID(thebits : TBits_1); inline;
  17928. procedure setSID(thebits : TBits_11); inline;
  17929. procedure setw(thebits : TBits_32); inline;
  17930. public
  17931. procedure clearEXID; inline;
  17932. procedure setEXID; inline;
  17933. property EID : TBits_18 read getEID write setEID;
  17934. property EXID : TBits_1 read getEXID write setEXID;
  17935. property SID : TBits_11 read getSID write setSID;
  17936. property w : TBits_32 read getw write setw;
  17937. end;
  17938. TCAN1_C1RXF5 = record
  17939. private
  17940. function getEID : TBits_18; inline;
  17941. function getEXID : TBits_1; inline;
  17942. function getSID : TBits_11; inline;
  17943. function getw : TBits_32; inline;
  17944. procedure setEID(thebits : TBits_18); inline;
  17945. procedure setEXID(thebits : TBits_1); inline;
  17946. procedure setSID(thebits : TBits_11); inline;
  17947. procedure setw(thebits : TBits_32); inline;
  17948. public
  17949. procedure clearEXID; inline;
  17950. procedure setEXID; inline;
  17951. property EID : TBits_18 read getEID write setEID;
  17952. property EXID : TBits_1 read getEXID write setEXID;
  17953. property SID : TBits_11 read getSID write setSID;
  17954. property w : TBits_32 read getw write setw;
  17955. end;
  17956. TCAN1_C1RXF6 = record
  17957. private
  17958. function getEID : TBits_18; inline;
  17959. function getEXID : TBits_1; inline;
  17960. function getSID : TBits_11; inline;
  17961. function getw : TBits_32; inline;
  17962. procedure setEID(thebits : TBits_18); inline;
  17963. procedure setEXID(thebits : TBits_1); inline;
  17964. procedure setSID(thebits : TBits_11); inline;
  17965. procedure setw(thebits : TBits_32); inline;
  17966. public
  17967. procedure clearEXID; inline;
  17968. procedure setEXID; inline;
  17969. property EID : TBits_18 read getEID write setEID;
  17970. property EXID : TBits_1 read getEXID write setEXID;
  17971. property SID : TBits_11 read getSID write setSID;
  17972. property w : TBits_32 read getw write setw;
  17973. end;
  17974. TCAN1_C1RXF7 = record
  17975. private
  17976. function getEID : TBits_18; inline;
  17977. function getEXID : TBits_1; inline;
  17978. function getSID : TBits_11; inline;
  17979. function getw : TBits_32; inline;
  17980. procedure setEID(thebits : TBits_18); inline;
  17981. procedure setEXID(thebits : TBits_1); inline;
  17982. procedure setSID(thebits : TBits_11); inline;
  17983. procedure setw(thebits : TBits_32); inline;
  17984. public
  17985. procedure clearEXID; inline;
  17986. procedure setEXID; inline;
  17987. property EID : TBits_18 read getEID write setEID;
  17988. property EXID : TBits_1 read getEXID write setEXID;
  17989. property SID : TBits_11 read getSID write setSID;
  17990. property w : TBits_32 read getw write setw;
  17991. end;
  17992. TCAN1_C1RXF8 = record
  17993. private
  17994. function getEID : TBits_18; inline;
  17995. function getEXID : TBits_1; inline;
  17996. function getSID : TBits_11; inline;
  17997. function getw : TBits_32; inline;
  17998. procedure setEID(thebits : TBits_18); inline;
  17999. procedure setEXID(thebits : TBits_1); inline;
  18000. procedure setSID(thebits : TBits_11); inline;
  18001. procedure setw(thebits : TBits_32); inline;
  18002. public
  18003. procedure clearEXID; inline;
  18004. procedure setEXID; inline;
  18005. property EID : TBits_18 read getEID write setEID;
  18006. property EXID : TBits_1 read getEXID write setEXID;
  18007. property SID : TBits_11 read getSID write setSID;
  18008. property w : TBits_32 read getw write setw;
  18009. end;
  18010. TCAN1_C1RXF9 = record
  18011. private
  18012. function getEID : TBits_18; inline;
  18013. function getEXID : TBits_1; inline;
  18014. function getSID : TBits_11; inline;
  18015. function getw : TBits_32; inline;
  18016. procedure setEID(thebits : TBits_18); inline;
  18017. procedure setEXID(thebits : TBits_1); inline;
  18018. procedure setSID(thebits : TBits_11); inline;
  18019. procedure setw(thebits : TBits_32); inline;
  18020. public
  18021. procedure clearEXID; inline;
  18022. procedure setEXID; inline;
  18023. property EID : TBits_18 read getEID write setEID;
  18024. property EXID : TBits_1 read getEXID write setEXID;
  18025. property SID : TBits_11 read getSID write setSID;
  18026. property w : TBits_32 read getw write setw;
  18027. end;
  18028. TCAN1_C1RXF10 = record
  18029. private
  18030. function getEID : TBits_18; inline;
  18031. function getEXID : TBits_1; inline;
  18032. function getSID : TBits_11; inline;
  18033. function getw : TBits_32; inline;
  18034. procedure setEID(thebits : TBits_18); inline;
  18035. procedure setEXID(thebits : TBits_1); inline;
  18036. procedure setSID(thebits : TBits_11); inline;
  18037. procedure setw(thebits : TBits_32); inline;
  18038. public
  18039. procedure clearEXID; inline;
  18040. procedure setEXID; inline;
  18041. property EID : TBits_18 read getEID write setEID;
  18042. property EXID : TBits_1 read getEXID write setEXID;
  18043. property SID : TBits_11 read getSID write setSID;
  18044. property w : TBits_32 read getw write setw;
  18045. end;
  18046. TCAN1_C1RXF11 = record
  18047. private
  18048. function getEID : TBits_18; inline;
  18049. function getEXID : TBits_1; inline;
  18050. function getSID : TBits_11; inline;
  18051. function getw : TBits_32; inline;
  18052. procedure setEID(thebits : TBits_18); inline;
  18053. procedure setEXID(thebits : TBits_1); inline;
  18054. procedure setSID(thebits : TBits_11); inline;
  18055. procedure setw(thebits : TBits_32); inline;
  18056. public
  18057. procedure clearEXID; inline;
  18058. procedure setEXID; inline;
  18059. property EID : TBits_18 read getEID write setEID;
  18060. property EXID : TBits_1 read getEXID write setEXID;
  18061. property SID : TBits_11 read getSID write setSID;
  18062. property w : TBits_32 read getw write setw;
  18063. end;
  18064. TCAN1_C1RXF12 = record
  18065. private
  18066. function getEID : TBits_18; inline;
  18067. function getEXID : TBits_1; inline;
  18068. function getSID : TBits_11; inline;
  18069. function getw : TBits_32; inline;
  18070. procedure setEID(thebits : TBits_18); inline;
  18071. procedure setEXID(thebits : TBits_1); inline;
  18072. procedure setSID(thebits : TBits_11); inline;
  18073. procedure setw(thebits : TBits_32); inline;
  18074. public
  18075. procedure clearEXID; inline;
  18076. procedure setEXID; inline;
  18077. property EID : TBits_18 read getEID write setEID;
  18078. property EXID : TBits_1 read getEXID write setEXID;
  18079. property SID : TBits_11 read getSID write setSID;
  18080. property w : TBits_32 read getw write setw;
  18081. end;
  18082. TCAN1_C1RXF13 = record
  18083. private
  18084. function getEID : TBits_18; inline;
  18085. function getEXID : TBits_1; inline;
  18086. function getSID : TBits_11; inline;
  18087. function getw : TBits_32; inline;
  18088. procedure setEID(thebits : TBits_18); inline;
  18089. procedure setEXID(thebits : TBits_1); inline;
  18090. procedure setSID(thebits : TBits_11); inline;
  18091. procedure setw(thebits : TBits_32); inline;
  18092. public
  18093. procedure clearEXID; inline;
  18094. procedure setEXID; inline;
  18095. property EID : TBits_18 read getEID write setEID;
  18096. property EXID : TBits_1 read getEXID write setEXID;
  18097. property SID : TBits_11 read getSID write setSID;
  18098. property w : TBits_32 read getw write setw;
  18099. end;
  18100. TCAN1_C1RXF14 = record
  18101. private
  18102. function getEID : TBits_18; inline;
  18103. function getEXID : TBits_1; inline;
  18104. function getSID : TBits_11; inline;
  18105. function getw : TBits_32; inline;
  18106. procedure setEID(thebits : TBits_18); inline;
  18107. procedure setEXID(thebits : TBits_1); inline;
  18108. procedure setSID(thebits : TBits_11); inline;
  18109. procedure setw(thebits : TBits_32); inline;
  18110. public
  18111. procedure clearEXID; inline;
  18112. procedure setEXID; inline;
  18113. property EID : TBits_18 read getEID write setEID;
  18114. property EXID : TBits_1 read getEXID write setEXID;
  18115. property SID : TBits_11 read getSID write setSID;
  18116. property w : TBits_32 read getw write setw;
  18117. end;
  18118. TCAN1_C1RXF15 = record
  18119. private
  18120. function getEID : TBits_18; inline;
  18121. function getEXID : TBits_1; inline;
  18122. function getSID : TBits_11; inline;
  18123. function getw : TBits_32; inline;
  18124. procedure setEID(thebits : TBits_18); inline;
  18125. procedure setEXID(thebits : TBits_1); inline;
  18126. procedure setSID(thebits : TBits_11); inline;
  18127. procedure setw(thebits : TBits_32); inline;
  18128. public
  18129. procedure clearEXID; inline;
  18130. procedure setEXID; inline;
  18131. property EID : TBits_18 read getEID write setEID;
  18132. property EXID : TBits_1 read getEXID write setEXID;
  18133. property SID : TBits_11 read getSID write setSID;
  18134. property w : TBits_32 read getw write setw;
  18135. end;
  18136. TCAN1_C1RXF16 = record
  18137. private
  18138. function getEID : TBits_18; inline;
  18139. function getEXID : TBits_1; inline;
  18140. function getSID : TBits_11; inline;
  18141. function getw : TBits_32; inline;
  18142. procedure setEID(thebits : TBits_18); inline;
  18143. procedure setEXID(thebits : TBits_1); inline;
  18144. procedure setSID(thebits : TBits_11); inline;
  18145. procedure setw(thebits : TBits_32); inline;
  18146. public
  18147. procedure clearEXID; inline;
  18148. procedure setEXID; inline;
  18149. property EID : TBits_18 read getEID write setEID;
  18150. property EXID : TBits_1 read getEXID write setEXID;
  18151. property SID : TBits_11 read getSID write setSID;
  18152. property w : TBits_32 read getw write setw;
  18153. end;
  18154. TCAN1_C1RXF17 = record
  18155. private
  18156. function getEID : TBits_18; inline;
  18157. function getEXID : TBits_1; inline;
  18158. function getSID : TBits_11; inline;
  18159. function getw : TBits_32; inline;
  18160. procedure setEID(thebits : TBits_18); inline;
  18161. procedure setEXID(thebits : TBits_1); inline;
  18162. procedure setSID(thebits : TBits_11); inline;
  18163. procedure setw(thebits : TBits_32); inline;
  18164. public
  18165. procedure clearEXID; inline;
  18166. procedure setEXID; inline;
  18167. property EID : TBits_18 read getEID write setEID;
  18168. property EXID : TBits_1 read getEXID write setEXID;
  18169. property SID : TBits_11 read getSID write setSID;
  18170. property w : TBits_32 read getw write setw;
  18171. end;
  18172. TCAN1_C1RXF18 = record
  18173. private
  18174. function getEID : TBits_18; inline;
  18175. function getEXID : TBits_1; inline;
  18176. function getSID : TBits_11; inline;
  18177. function getw : TBits_32; inline;
  18178. procedure setEID(thebits : TBits_18); inline;
  18179. procedure setEXID(thebits : TBits_1); inline;
  18180. procedure setSID(thebits : TBits_11); inline;
  18181. procedure setw(thebits : TBits_32); inline;
  18182. public
  18183. procedure clearEXID; inline;
  18184. procedure setEXID; inline;
  18185. property EID : TBits_18 read getEID write setEID;
  18186. property EXID : TBits_1 read getEXID write setEXID;
  18187. property SID : TBits_11 read getSID write setSID;
  18188. property w : TBits_32 read getw write setw;
  18189. end;
  18190. TCAN1_C1RXF19 = record
  18191. private
  18192. function getEID : TBits_18; inline;
  18193. function getEXID : TBits_1; inline;
  18194. function getSID : TBits_11; inline;
  18195. function getw : TBits_32; inline;
  18196. procedure setEID(thebits : TBits_18); inline;
  18197. procedure setEXID(thebits : TBits_1); inline;
  18198. procedure setSID(thebits : TBits_11); inline;
  18199. procedure setw(thebits : TBits_32); inline;
  18200. public
  18201. procedure clearEXID; inline;
  18202. procedure setEXID; inline;
  18203. property EID : TBits_18 read getEID write setEID;
  18204. property EXID : TBits_1 read getEXID write setEXID;
  18205. property SID : TBits_11 read getSID write setSID;
  18206. property w : TBits_32 read getw write setw;
  18207. end;
  18208. TCAN1_C1RXF20 = record
  18209. private
  18210. function getEID : TBits_18; inline;
  18211. function getEXID : TBits_1; inline;
  18212. function getSID : TBits_11; inline;
  18213. function getw : TBits_32; inline;
  18214. procedure setEID(thebits : TBits_18); inline;
  18215. procedure setEXID(thebits : TBits_1); inline;
  18216. procedure setSID(thebits : TBits_11); inline;
  18217. procedure setw(thebits : TBits_32); inline;
  18218. public
  18219. procedure clearEXID; inline;
  18220. procedure setEXID; inline;
  18221. property EID : TBits_18 read getEID write setEID;
  18222. property EXID : TBits_1 read getEXID write setEXID;
  18223. property SID : TBits_11 read getSID write setSID;
  18224. property w : TBits_32 read getw write setw;
  18225. end;
  18226. TCAN1_C1RXF21 = record
  18227. private
  18228. function getEID : TBits_18; inline;
  18229. function getEXID : TBits_1; inline;
  18230. function getSID : TBits_11; inline;
  18231. function getw : TBits_32; inline;
  18232. procedure setEID(thebits : TBits_18); inline;
  18233. procedure setEXID(thebits : TBits_1); inline;
  18234. procedure setSID(thebits : TBits_11); inline;
  18235. procedure setw(thebits : TBits_32); inline;
  18236. public
  18237. procedure clearEXID; inline;
  18238. procedure setEXID; inline;
  18239. property EID : TBits_18 read getEID write setEID;
  18240. property EXID : TBits_1 read getEXID write setEXID;
  18241. property SID : TBits_11 read getSID write setSID;
  18242. property w : TBits_32 read getw write setw;
  18243. end;
  18244. TCAN1_C1RXF22 = record
  18245. private
  18246. function getEID : TBits_18; inline;
  18247. function getEXID : TBits_1; inline;
  18248. function getSID : TBits_11; inline;
  18249. function getw : TBits_32; inline;
  18250. procedure setEID(thebits : TBits_18); inline;
  18251. procedure setEXID(thebits : TBits_1); inline;
  18252. procedure setSID(thebits : TBits_11); inline;
  18253. procedure setw(thebits : TBits_32); inline;
  18254. public
  18255. procedure clearEXID; inline;
  18256. procedure setEXID; inline;
  18257. property EID : TBits_18 read getEID write setEID;
  18258. property EXID : TBits_1 read getEXID write setEXID;
  18259. property SID : TBits_11 read getSID write setSID;
  18260. property w : TBits_32 read getw write setw;
  18261. end;
  18262. TCAN1_C1RXF23 = record
  18263. private
  18264. function getEID : TBits_18; inline;
  18265. function getEXID : TBits_1; inline;
  18266. function getSID : TBits_11; inline;
  18267. function getw : TBits_32; inline;
  18268. procedure setEID(thebits : TBits_18); inline;
  18269. procedure setEXID(thebits : TBits_1); inline;
  18270. procedure setSID(thebits : TBits_11); inline;
  18271. procedure setw(thebits : TBits_32); inline;
  18272. public
  18273. procedure clearEXID; inline;
  18274. procedure setEXID; inline;
  18275. property EID : TBits_18 read getEID write setEID;
  18276. property EXID : TBits_1 read getEXID write setEXID;
  18277. property SID : TBits_11 read getSID write setSID;
  18278. property w : TBits_32 read getw write setw;
  18279. end;
  18280. TCAN1_C1RXF24 = record
  18281. private
  18282. function getEID : TBits_18; inline;
  18283. function getEXID : TBits_1; inline;
  18284. function getSID : TBits_11; inline;
  18285. function getw : TBits_32; inline;
  18286. procedure setEID(thebits : TBits_18); inline;
  18287. procedure setEXID(thebits : TBits_1); inline;
  18288. procedure setSID(thebits : TBits_11); inline;
  18289. procedure setw(thebits : TBits_32); inline;
  18290. public
  18291. procedure clearEXID; inline;
  18292. procedure setEXID; inline;
  18293. property EID : TBits_18 read getEID write setEID;
  18294. property EXID : TBits_1 read getEXID write setEXID;
  18295. property SID : TBits_11 read getSID write setSID;
  18296. property w : TBits_32 read getw write setw;
  18297. end;
  18298. TCAN1_C1RXF25 = record
  18299. private
  18300. function getEID : TBits_18; inline;
  18301. function getEXID : TBits_1; inline;
  18302. function getSID : TBits_11; inline;
  18303. function getw : TBits_32; inline;
  18304. procedure setEID(thebits : TBits_18); inline;
  18305. procedure setEXID(thebits : TBits_1); inline;
  18306. procedure setSID(thebits : TBits_11); inline;
  18307. procedure setw(thebits : TBits_32); inline;
  18308. public
  18309. procedure clearEXID; inline;
  18310. procedure setEXID; inline;
  18311. property EID : TBits_18 read getEID write setEID;
  18312. property EXID : TBits_1 read getEXID write setEXID;
  18313. property SID : TBits_11 read getSID write setSID;
  18314. property w : TBits_32 read getw write setw;
  18315. end;
  18316. TCAN1_C1RXF26 = record
  18317. private
  18318. function getEID : TBits_18; inline;
  18319. function getEXID : TBits_1; inline;
  18320. function getSID : TBits_11; inline;
  18321. function getw : TBits_32; inline;
  18322. procedure setEID(thebits : TBits_18); inline;
  18323. procedure setEXID(thebits : TBits_1); inline;
  18324. procedure setSID(thebits : TBits_11); inline;
  18325. procedure setw(thebits : TBits_32); inline;
  18326. public
  18327. procedure clearEXID; inline;
  18328. procedure setEXID; inline;
  18329. property EID : TBits_18 read getEID write setEID;
  18330. property EXID : TBits_1 read getEXID write setEXID;
  18331. property SID : TBits_11 read getSID write setSID;
  18332. property w : TBits_32 read getw write setw;
  18333. end;
  18334. TCAN1_C1RXF27 = record
  18335. private
  18336. function getEID : TBits_18; inline;
  18337. function getEXID : TBits_1; inline;
  18338. function getSID : TBits_11; inline;
  18339. function getw : TBits_32; inline;
  18340. procedure setEID(thebits : TBits_18); inline;
  18341. procedure setEXID(thebits : TBits_1); inline;
  18342. procedure setSID(thebits : TBits_11); inline;
  18343. procedure setw(thebits : TBits_32); inline;
  18344. public
  18345. procedure clearEXID; inline;
  18346. procedure setEXID; inline;
  18347. property EID : TBits_18 read getEID write setEID;
  18348. property EXID : TBits_1 read getEXID write setEXID;
  18349. property SID : TBits_11 read getSID write setSID;
  18350. property w : TBits_32 read getw write setw;
  18351. end;
  18352. TCAN1_C1RXF28 = record
  18353. private
  18354. function getEID : TBits_18; inline;
  18355. function getEXID : TBits_1; inline;
  18356. function getSID : TBits_11; inline;
  18357. function getw : TBits_32; inline;
  18358. procedure setEID(thebits : TBits_18); inline;
  18359. procedure setEXID(thebits : TBits_1); inline;
  18360. procedure setSID(thebits : TBits_11); inline;
  18361. procedure setw(thebits : TBits_32); inline;
  18362. public
  18363. procedure clearEXID; inline;
  18364. procedure setEXID; inline;
  18365. property EID : TBits_18 read getEID write setEID;
  18366. property EXID : TBits_1 read getEXID write setEXID;
  18367. property SID : TBits_11 read getSID write setSID;
  18368. property w : TBits_32 read getw write setw;
  18369. end;
  18370. TCAN1_C1RXF29 = record
  18371. private
  18372. function getEID : TBits_18; inline;
  18373. function getEXID : TBits_1; inline;
  18374. function getSID : TBits_11; inline;
  18375. function getw : TBits_32; inline;
  18376. procedure setEID(thebits : TBits_18); inline;
  18377. procedure setEXID(thebits : TBits_1); inline;
  18378. procedure setSID(thebits : TBits_11); inline;
  18379. procedure setw(thebits : TBits_32); inline;
  18380. public
  18381. procedure clearEXID; inline;
  18382. procedure setEXID; inline;
  18383. property EID : TBits_18 read getEID write setEID;
  18384. property EXID : TBits_1 read getEXID write setEXID;
  18385. property SID : TBits_11 read getSID write setSID;
  18386. property w : TBits_32 read getw write setw;
  18387. end;
  18388. TCAN1_C1RXF30 = record
  18389. private
  18390. function getEID : TBits_18; inline;
  18391. function getEXID : TBits_1; inline;
  18392. function getSID : TBits_11; inline;
  18393. function getw : TBits_32; inline;
  18394. procedure setEID(thebits : TBits_18); inline;
  18395. procedure setEXID(thebits : TBits_1); inline;
  18396. procedure setSID(thebits : TBits_11); inline;
  18397. procedure setw(thebits : TBits_32); inline;
  18398. public
  18399. procedure clearEXID; inline;
  18400. procedure setEXID; inline;
  18401. property EID : TBits_18 read getEID write setEID;
  18402. property EXID : TBits_1 read getEXID write setEXID;
  18403. property SID : TBits_11 read getSID write setSID;
  18404. property w : TBits_32 read getw write setw;
  18405. end;
  18406. TCAN1_C1RXF31 = record
  18407. private
  18408. function getEID : TBits_18; inline;
  18409. function getEXID : TBits_1; inline;
  18410. function getSID : TBits_11; inline;
  18411. function getw : TBits_32; inline;
  18412. procedure setEID(thebits : TBits_18); inline;
  18413. procedure setEXID(thebits : TBits_1); inline;
  18414. procedure setSID(thebits : TBits_11); inline;
  18415. procedure setw(thebits : TBits_32); inline;
  18416. public
  18417. procedure clearEXID; inline;
  18418. procedure setEXID; inline;
  18419. property EID : TBits_18 read getEID write setEID;
  18420. property EXID : TBits_1 read getEXID write setEXID;
  18421. property SID : TBits_11 read getSID write setSID;
  18422. property w : TBits_32 read getw write setw;
  18423. end;
  18424. TCAN1_C1FIFOCON0 = record
  18425. private
  18426. function getDONLY : TBits_1; inline;
  18427. function getFRESET : TBits_1; inline;
  18428. function getFSIZE : TBits_5; inline;
  18429. function getRTREN : TBits_1; inline;
  18430. function getTXABAT : TBits_1; inline;
  18431. function getTXEN : TBits_1; inline;
  18432. function getTXERR : TBits_1; inline;
  18433. function getTXLARB : TBits_1; inline;
  18434. function getTXPRI : TBits_2; inline;
  18435. function getTXREQ : TBits_1; inline;
  18436. function getUINC : TBits_1; inline;
  18437. function getw : TBits_32; inline;
  18438. procedure setDONLY(thebits : TBits_1); inline;
  18439. procedure setFRESET(thebits : TBits_1); inline;
  18440. procedure setFSIZE(thebits : TBits_5); inline;
  18441. procedure setRTREN(thebits : TBits_1); inline;
  18442. procedure setTXABAT(thebits : TBits_1); inline;
  18443. procedure setTXEN(thebits : TBits_1); inline;
  18444. procedure setTXERR(thebits : TBits_1); inline;
  18445. procedure setTXLARB(thebits : TBits_1); inline;
  18446. procedure setTXPRI(thebits : TBits_2); inline;
  18447. procedure setTXREQ(thebits : TBits_1); inline;
  18448. procedure setUINC(thebits : TBits_1); inline;
  18449. procedure setw(thebits : TBits_32); inline;
  18450. public
  18451. procedure clearDONLY; inline;
  18452. procedure clearFRESET; inline;
  18453. procedure clearRTREN; inline;
  18454. procedure clearTXABAT; inline;
  18455. procedure clearTXEN; inline;
  18456. procedure clearTXERR; inline;
  18457. procedure clearTXLARB; inline;
  18458. procedure clearTXREQ; inline;
  18459. procedure clearUINC; inline;
  18460. procedure setDONLY; inline;
  18461. procedure setFRESET; inline;
  18462. procedure setRTREN; inline;
  18463. procedure setTXABAT; inline;
  18464. procedure setTXEN; inline;
  18465. procedure setTXERR; inline;
  18466. procedure setTXLARB; inline;
  18467. procedure setTXREQ; inline;
  18468. procedure setUINC; inline;
  18469. property DONLY : TBits_1 read getDONLY write setDONLY;
  18470. property FRESET : TBits_1 read getFRESET write setFRESET;
  18471. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18472. property RTREN : TBits_1 read getRTREN write setRTREN;
  18473. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18474. property TXEN : TBits_1 read getTXEN write setTXEN;
  18475. property TXERR : TBits_1 read getTXERR write setTXERR;
  18476. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18477. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18478. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18479. property UINC : TBits_1 read getUINC write setUINC;
  18480. property w : TBits_32 read getw write setw;
  18481. end;
  18482. TCAN1_C1FIFOINT0 = record
  18483. private
  18484. function getRXFULLIE : TBits_1; inline;
  18485. function getRXFULLIF : TBits_1; inline;
  18486. function getRXHALFIE : TBits_1; inline;
  18487. function getRXHALFIF : TBits_1; inline;
  18488. function getRXNEMPTYIE : TBits_1; inline;
  18489. function getRXNEMPTYIF : TBits_1; inline;
  18490. function getRXOVFLIE : TBits_1; inline;
  18491. function getRXOVFLIF : TBits_1; inline;
  18492. function getTXEMPTYIE : TBits_1; inline;
  18493. function getTXEMPTYIF : TBits_1; inline;
  18494. function getTXHALFIE : TBits_1; inline;
  18495. function getTXHALFIF : TBits_1; inline;
  18496. function getTXNFULLIE : TBits_1; inline;
  18497. function getTXNFULLIF : TBits_1; inline;
  18498. function getw : TBits_32; inline;
  18499. procedure setRXFULLIE(thebits : TBits_1); inline;
  18500. procedure setRXFULLIF(thebits : TBits_1); inline;
  18501. procedure setRXHALFIE(thebits : TBits_1); inline;
  18502. procedure setRXHALFIF(thebits : TBits_1); inline;
  18503. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18504. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18505. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18506. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18507. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18508. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18509. procedure setTXHALFIE(thebits : TBits_1); inline;
  18510. procedure setTXHALFIF(thebits : TBits_1); inline;
  18511. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18512. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18513. procedure setw(thebits : TBits_32); inline;
  18514. public
  18515. procedure clearRXFULLIE; inline;
  18516. procedure clearRXFULLIF; inline;
  18517. procedure clearRXHALFIE; inline;
  18518. procedure clearRXHALFIF; inline;
  18519. procedure clearRXNEMPTYIE; inline;
  18520. procedure clearRXNEMPTYIF; inline;
  18521. procedure clearRXOVFLIE; inline;
  18522. procedure clearRXOVFLIF; inline;
  18523. procedure clearTXEMPTYIE; inline;
  18524. procedure clearTXEMPTYIF; inline;
  18525. procedure clearTXHALFIE; inline;
  18526. procedure clearTXHALFIF; inline;
  18527. procedure clearTXNFULLIE; inline;
  18528. procedure clearTXNFULLIF; inline;
  18529. procedure setRXFULLIE; inline;
  18530. procedure setRXFULLIF; inline;
  18531. procedure setRXHALFIE; inline;
  18532. procedure setRXHALFIF; inline;
  18533. procedure setRXNEMPTYIE; inline;
  18534. procedure setRXNEMPTYIF; inline;
  18535. procedure setRXOVFLIE; inline;
  18536. procedure setRXOVFLIF; inline;
  18537. procedure setTXEMPTYIE; inline;
  18538. procedure setTXEMPTYIF; inline;
  18539. procedure setTXHALFIE; inline;
  18540. procedure setTXHALFIF; inline;
  18541. procedure setTXNFULLIE; inline;
  18542. procedure setTXNFULLIF; inline;
  18543. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18544. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18545. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18546. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18547. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18548. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18549. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18550. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18551. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18552. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18553. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18554. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18555. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18556. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18557. property w : TBits_32 read getw write setw;
  18558. end;
  18559. TCAN1_C1FIFOCI0 = record
  18560. private
  18561. function getCFIFOCI : TBits_5; inline;
  18562. function getw : TBits_32; inline;
  18563. procedure setCFIFOCI(thebits : TBits_5); inline;
  18564. procedure setw(thebits : TBits_32); inline;
  18565. public
  18566. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18567. property w : TBits_32 read getw write setw;
  18568. end;
  18569. TCAN1_C1FIFOCON1 = record
  18570. private
  18571. function getDONLY : TBits_1; inline;
  18572. function getFRESET : TBits_1; inline;
  18573. function getFSIZE : TBits_5; inline;
  18574. function getRTREN : TBits_1; inline;
  18575. function getTXABAT : TBits_1; inline;
  18576. function getTXEN : TBits_1; inline;
  18577. function getTXERR : TBits_1; inline;
  18578. function getTXLARB : TBits_1; inline;
  18579. function getTXPRI : TBits_2; inline;
  18580. function getTXREQ : TBits_1; inline;
  18581. function getUINC : TBits_1; inline;
  18582. function getw : TBits_32; inline;
  18583. procedure setDONLY(thebits : TBits_1); inline;
  18584. procedure setFRESET(thebits : TBits_1); inline;
  18585. procedure setFSIZE(thebits : TBits_5); inline;
  18586. procedure setRTREN(thebits : TBits_1); inline;
  18587. procedure setTXABAT(thebits : TBits_1); inline;
  18588. procedure setTXEN(thebits : TBits_1); inline;
  18589. procedure setTXERR(thebits : TBits_1); inline;
  18590. procedure setTXLARB(thebits : TBits_1); inline;
  18591. procedure setTXPRI(thebits : TBits_2); inline;
  18592. procedure setTXREQ(thebits : TBits_1); inline;
  18593. procedure setUINC(thebits : TBits_1); inline;
  18594. procedure setw(thebits : TBits_32); inline;
  18595. public
  18596. procedure clearDONLY; inline;
  18597. procedure clearFRESET; inline;
  18598. procedure clearRTREN; inline;
  18599. procedure clearTXABAT; inline;
  18600. procedure clearTXEN; inline;
  18601. procedure clearTXERR; inline;
  18602. procedure clearTXLARB; inline;
  18603. procedure clearTXREQ; inline;
  18604. procedure clearUINC; inline;
  18605. procedure setDONLY; inline;
  18606. procedure setFRESET; inline;
  18607. procedure setRTREN; inline;
  18608. procedure setTXABAT; inline;
  18609. procedure setTXEN; inline;
  18610. procedure setTXERR; inline;
  18611. procedure setTXLARB; inline;
  18612. procedure setTXREQ; inline;
  18613. procedure setUINC; inline;
  18614. property DONLY : TBits_1 read getDONLY write setDONLY;
  18615. property FRESET : TBits_1 read getFRESET write setFRESET;
  18616. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18617. property RTREN : TBits_1 read getRTREN write setRTREN;
  18618. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18619. property TXEN : TBits_1 read getTXEN write setTXEN;
  18620. property TXERR : TBits_1 read getTXERR write setTXERR;
  18621. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18622. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18623. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18624. property UINC : TBits_1 read getUINC write setUINC;
  18625. property w : TBits_32 read getw write setw;
  18626. end;
  18627. TCAN1_C1FIFOINT1 = record
  18628. private
  18629. function getRXFULLIE : TBits_1; inline;
  18630. function getRXFULLIF : TBits_1; inline;
  18631. function getRXHALFIE : TBits_1; inline;
  18632. function getRXHALFIF : TBits_1; inline;
  18633. function getRXNEMPTYIE : TBits_1; inline;
  18634. function getRXNEMPTYIF : TBits_1; inline;
  18635. function getRXOVFLIE : TBits_1; inline;
  18636. function getRXOVFLIF : TBits_1; inline;
  18637. function getTXEMPTYIE : TBits_1; inline;
  18638. function getTXEMPTYIF : TBits_1; inline;
  18639. function getTXHALFIE : TBits_1; inline;
  18640. function getTXHALFIF : TBits_1; inline;
  18641. function getTXNFULLIE : TBits_1; inline;
  18642. function getTXNFULLIF : TBits_1; inline;
  18643. function getw : TBits_32; inline;
  18644. procedure setRXFULLIE(thebits : TBits_1); inline;
  18645. procedure setRXFULLIF(thebits : TBits_1); inline;
  18646. procedure setRXHALFIE(thebits : TBits_1); inline;
  18647. procedure setRXHALFIF(thebits : TBits_1); inline;
  18648. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18649. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18650. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18651. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18652. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18653. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18654. procedure setTXHALFIE(thebits : TBits_1); inline;
  18655. procedure setTXHALFIF(thebits : TBits_1); inline;
  18656. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18657. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18658. procedure setw(thebits : TBits_32); inline;
  18659. public
  18660. procedure clearRXFULLIE; inline;
  18661. procedure clearRXFULLIF; inline;
  18662. procedure clearRXHALFIE; inline;
  18663. procedure clearRXHALFIF; inline;
  18664. procedure clearRXNEMPTYIE; inline;
  18665. procedure clearRXNEMPTYIF; inline;
  18666. procedure clearRXOVFLIE; inline;
  18667. procedure clearRXOVFLIF; inline;
  18668. procedure clearTXEMPTYIE; inline;
  18669. procedure clearTXEMPTYIF; inline;
  18670. procedure clearTXHALFIE; inline;
  18671. procedure clearTXHALFIF; inline;
  18672. procedure clearTXNFULLIE; inline;
  18673. procedure clearTXNFULLIF; inline;
  18674. procedure setRXFULLIE; inline;
  18675. procedure setRXFULLIF; inline;
  18676. procedure setRXHALFIE; inline;
  18677. procedure setRXHALFIF; inline;
  18678. procedure setRXNEMPTYIE; inline;
  18679. procedure setRXNEMPTYIF; inline;
  18680. procedure setRXOVFLIE; inline;
  18681. procedure setRXOVFLIF; inline;
  18682. procedure setTXEMPTYIE; inline;
  18683. procedure setTXEMPTYIF; inline;
  18684. procedure setTXHALFIE; inline;
  18685. procedure setTXHALFIF; inline;
  18686. procedure setTXNFULLIE; inline;
  18687. procedure setTXNFULLIF; inline;
  18688. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18689. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18690. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18691. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18692. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18693. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18694. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18695. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18696. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18697. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18698. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18699. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18700. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18701. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18702. property w : TBits_32 read getw write setw;
  18703. end;
  18704. TCAN1_C1FIFOCI1 = record
  18705. private
  18706. function getCFIFOCI : TBits_5; inline;
  18707. function getw : TBits_32; inline;
  18708. procedure setCFIFOCI(thebits : TBits_5); inline;
  18709. procedure setw(thebits : TBits_32); inline;
  18710. public
  18711. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18712. property w : TBits_32 read getw write setw;
  18713. end;
  18714. TCAN1_C1FIFOCON2 = record
  18715. private
  18716. function getDONLY : TBits_1; inline;
  18717. function getFRESET : TBits_1; inline;
  18718. function getFSIZE : TBits_5; inline;
  18719. function getRTREN : TBits_1; inline;
  18720. function getTXABAT : TBits_1; inline;
  18721. function getTXEN : TBits_1; inline;
  18722. function getTXERR : TBits_1; inline;
  18723. function getTXLARB : TBits_1; inline;
  18724. function getTXPRI : TBits_2; inline;
  18725. function getTXREQ : TBits_1; inline;
  18726. function getUINC : TBits_1; inline;
  18727. function getw : TBits_32; inline;
  18728. procedure setDONLY(thebits : TBits_1); inline;
  18729. procedure setFRESET(thebits : TBits_1); inline;
  18730. procedure setFSIZE(thebits : TBits_5); inline;
  18731. procedure setRTREN(thebits : TBits_1); inline;
  18732. procedure setTXABAT(thebits : TBits_1); inline;
  18733. procedure setTXEN(thebits : TBits_1); inline;
  18734. procedure setTXERR(thebits : TBits_1); inline;
  18735. procedure setTXLARB(thebits : TBits_1); inline;
  18736. procedure setTXPRI(thebits : TBits_2); inline;
  18737. procedure setTXREQ(thebits : TBits_1); inline;
  18738. procedure setUINC(thebits : TBits_1); inline;
  18739. procedure setw(thebits : TBits_32); inline;
  18740. public
  18741. procedure clearDONLY; inline;
  18742. procedure clearFRESET; inline;
  18743. procedure clearRTREN; inline;
  18744. procedure clearTXABAT; inline;
  18745. procedure clearTXEN; inline;
  18746. procedure clearTXERR; inline;
  18747. procedure clearTXLARB; inline;
  18748. procedure clearTXREQ; inline;
  18749. procedure clearUINC; inline;
  18750. procedure setDONLY; inline;
  18751. procedure setFRESET; inline;
  18752. procedure setRTREN; inline;
  18753. procedure setTXABAT; inline;
  18754. procedure setTXEN; inline;
  18755. procedure setTXERR; inline;
  18756. procedure setTXLARB; inline;
  18757. procedure setTXREQ; inline;
  18758. procedure setUINC; inline;
  18759. property DONLY : TBits_1 read getDONLY write setDONLY;
  18760. property FRESET : TBits_1 read getFRESET write setFRESET;
  18761. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18762. property RTREN : TBits_1 read getRTREN write setRTREN;
  18763. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18764. property TXEN : TBits_1 read getTXEN write setTXEN;
  18765. property TXERR : TBits_1 read getTXERR write setTXERR;
  18766. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18767. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18768. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18769. property UINC : TBits_1 read getUINC write setUINC;
  18770. property w : TBits_32 read getw write setw;
  18771. end;
  18772. TCAN1_C1FIFOINT2 = record
  18773. private
  18774. function getRXFULLIE : TBits_1; inline;
  18775. function getRXFULLIF : TBits_1; inline;
  18776. function getRXHALFIE : TBits_1; inline;
  18777. function getRXHALFIF : TBits_1; inline;
  18778. function getRXNEMPTYIE : TBits_1; inline;
  18779. function getRXNEMPTYIF : TBits_1; inline;
  18780. function getRXOVFLIE : TBits_1; inline;
  18781. function getRXOVFLIF : TBits_1; inline;
  18782. function getTXEMPTYIE : TBits_1; inline;
  18783. function getTXEMPTYIF : TBits_1; inline;
  18784. function getTXHALFIE : TBits_1; inline;
  18785. function getTXHALFIF : TBits_1; inline;
  18786. function getTXNFULLIE : TBits_1; inline;
  18787. function getTXNFULLIF : TBits_1; inline;
  18788. function getw : TBits_32; inline;
  18789. procedure setRXFULLIE(thebits : TBits_1); inline;
  18790. procedure setRXFULLIF(thebits : TBits_1); inline;
  18791. procedure setRXHALFIE(thebits : TBits_1); inline;
  18792. procedure setRXHALFIF(thebits : TBits_1); inline;
  18793. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18794. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18795. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18796. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18797. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18798. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18799. procedure setTXHALFIE(thebits : TBits_1); inline;
  18800. procedure setTXHALFIF(thebits : TBits_1); inline;
  18801. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18802. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18803. procedure setw(thebits : TBits_32); inline;
  18804. public
  18805. procedure clearRXFULLIE; inline;
  18806. procedure clearRXFULLIF; inline;
  18807. procedure clearRXHALFIE; inline;
  18808. procedure clearRXHALFIF; inline;
  18809. procedure clearRXNEMPTYIE; inline;
  18810. procedure clearRXNEMPTYIF; inline;
  18811. procedure clearRXOVFLIE; inline;
  18812. procedure clearRXOVFLIF; inline;
  18813. procedure clearTXEMPTYIE; inline;
  18814. procedure clearTXEMPTYIF; inline;
  18815. procedure clearTXHALFIE; inline;
  18816. procedure clearTXHALFIF; inline;
  18817. procedure clearTXNFULLIE; inline;
  18818. procedure clearTXNFULLIF; inline;
  18819. procedure setRXFULLIE; inline;
  18820. procedure setRXFULLIF; inline;
  18821. procedure setRXHALFIE; inline;
  18822. procedure setRXHALFIF; inline;
  18823. procedure setRXNEMPTYIE; inline;
  18824. procedure setRXNEMPTYIF; inline;
  18825. procedure setRXOVFLIE; inline;
  18826. procedure setRXOVFLIF; inline;
  18827. procedure setTXEMPTYIE; inline;
  18828. procedure setTXEMPTYIF; inline;
  18829. procedure setTXHALFIE; inline;
  18830. procedure setTXHALFIF; inline;
  18831. procedure setTXNFULLIE; inline;
  18832. procedure setTXNFULLIF; inline;
  18833. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18834. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18835. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18836. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18837. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18838. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18839. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18840. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18841. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18842. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18843. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18844. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18845. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18846. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18847. property w : TBits_32 read getw write setw;
  18848. end;
  18849. TCAN1_C1FIFOCI2 = record
  18850. private
  18851. function getCFIFOCI : TBits_5; inline;
  18852. function getw : TBits_32; inline;
  18853. procedure setCFIFOCI(thebits : TBits_5); inline;
  18854. procedure setw(thebits : TBits_32); inline;
  18855. public
  18856. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18857. property w : TBits_32 read getw write setw;
  18858. end;
  18859. TCAN1_C1FIFOCON3 = record
  18860. private
  18861. function getDONLY : TBits_1; inline;
  18862. function getFRESET : TBits_1; inline;
  18863. function getFSIZE : TBits_5; inline;
  18864. function getRTREN : TBits_1; inline;
  18865. function getTXABAT : TBits_1; inline;
  18866. function getTXEN : TBits_1; inline;
  18867. function getTXERR : TBits_1; inline;
  18868. function getTXLARB : TBits_1; inline;
  18869. function getTXPRI : TBits_2; inline;
  18870. function getTXREQ : TBits_1; inline;
  18871. function getUINC : TBits_1; inline;
  18872. function getw : TBits_32; inline;
  18873. procedure setDONLY(thebits : TBits_1); inline;
  18874. procedure setFRESET(thebits : TBits_1); inline;
  18875. procedure setFSIZE(thebits : TBits_5); inline;
  18876. procedure setRTREN(thebits : TBits_1); inline;
  18877. procedure setTXABAT(thebits : TBits_1); inline;
  18878. procedure setTXEN(thebits : TBits_1); inline;
  18879. procedure setTXERR(thebits : TBits_1); inline;
  18880. procedure setTXLARB(thebits : TBits_1); inline;
  18881. procedure setTXPRI(thebits : TBits_2); inline;
  18882. procedure setTXREQ(thebits : TBits_1); inline;
  18883. procedure setUINC(thebits : TBits_1); inline;
  18884. procedure setw(thebits : TBits_32); inline;
  18885. public
  18886. procedure clearDONLY; inline;
  18887. procedure clearFRESET; inline;
  18888. procedure clearRTREN; inline;
  18889. procedure clearTXABAT; inline;
  18890. procedure clearTXEN; inline;
  18891. procedure clearTXERR; inline;
  18892. procedure clearTXLARB; inline;
  18893. procedure clearTXREQ; inline;
  18894. procedure clearUINC; inline;
  18895. procedure setDONLY; inline;
  18896. procedure setFRESET; inline;
  18897. procedure setRTREN; inline;
  18898. procedure setTXABAT; inline;
  18899. procedure setTXEN; inline;
  18900. procedure setTXERR; inline;
  18901. procedure setTXLARB; inline;
  18902. procedure setTXREQ; inline;
  18903. procedure setUINC; inline;
  18904. property DONLY : TBits_1 read getDONLY write setDONLY;
  18905. property FRESET : TBits_1 read getFRESET write setFRESET;
  18906. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18907. property RTREN : TBits_1 read getRTREN write setRTREN;
  18908. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18909. property TXEN : TBits_1 read getTXEN write setTXEN;
  18910. property TXERR : TBits_1 read getTXERR write setTXERR;
  18911. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18912. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18913. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18914. property UINC : TBits_1 read getUINC write setUINC;
  18915. property w : TBits_32 read getw write setw;
  18916. end;
  18917. TCAN1_C1FIFOINT3 = record
  18918. private
  18919. function getRXFULLIE : TBits_1; inline;
  18920. function getRXFULLIF : TBits_1; inline;
  18921. function getRXHALFIE : TBits_1; inline;
  18922. function getRXHALFIF : TBits_1; inline;
  18923. function getRXNEMPTYIE : TBits_1; inline;
  18924. function getRXNEMPTYIF : TBits_1; inline;
  18925. function getRXOVFLIE : TBits_1; inline;
  18926. function getRXOVFLIF : TBits_1; inline;
  18927. function getTXEMPTYIE : TBits_1; inline;
  18928. function getTXEMPTYIF : TBits_1; inline;
  18929. function getTXHALFIE : TBits_1; inline;
  18930. function getTXHALFIF : TBits_1; inline;
  18931. function getTXNFULLIE : TBits_1; inline;
  18932. function getTXNFULLIF : TBits_1; inline;
  18933. function getw : TBits_32; inline;
  18934. procedure setRXFULLIE(thebits : TBits_1); inline;
  18935. procedure setRXFULLIF(thebits : TBits_1); inline;
  18936. procedure setRXHALFIE(thebits : TBits_1); inline;
  18937. procedure setRXHALFIF(thebits : TBits_1); inline;
  18938. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18939. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18940. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18941. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18942. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18943. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18944. procedure setTXHALFIE(thebits : TBits_1); inline;
  18945. procedure setTXHALFIF(thebits : TBits_1); inline;
  18946. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18947. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18948. procedure setw(thebits : TBits_32); inline;
  18949. public
  18950. procedure clearRXFULLIE; inline;
  18951. procedure clearRXFULLIF; inline;
  18952. procedure clearRXHALFIE; inline;
  18953. procedure clearRXHALFIF; inline;
  18954. procedure clearRXNEMPTYIE; inline;
  18955. procedure clearRXNEMPTYIF; inline;
  18956. procedure clearRXOVFLIE; inline;
  18957. procedure clearRXOVFLIF; inline;
  18958. procedure clearTXEMPTYIE; inline;
  18959. procedure clearTXEMPTYIF; inline;
  18960. procedure clearTXHALFIE; inline;
  18961. procedure clearTXHALFIF; inline;
  18962. procedure clearTXNFULLIE; inline;
  18963. procedure clearTXNFULLIF; inline;
  18964. procedure setRXFULLIE; inline;
  18965. procedure setRXFULLIF; inline;
  18966. procedure setRXHALFIE; inline;
  18967. procedure setRXHALFIF; inline;
  18968. procedure setRXNEMPTYIE; inline;
  18969. procedure setRXNEMPTYIF; inline;
  18970. procedure setRXOVFLIE; inline;
  18971. procedure setRXOVFLIF; inline;
  18972. procedure setTXEMPTYIE; inline;
  18973. procedure setTXEMPTYIF; inline;
  18974. procedure setTXHALFIE; inline;
  18975. procedure setTXHALFIF; inline;
  18976. procedure setTXNFULLIE; inline;
  18977. procedure setTXNFULLIF; inline;
  18978. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18979. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18980. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18981. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18982. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18983. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18984. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18985. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18986. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18987. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18988. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18989. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18990. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18991. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18992. property w : TBits_32 read getw write setw;
  18993. end;
  18994. TCAN1_C1FIFOCI3 = record
  18995. private
  18996. function getCFIFOCI : TBits_5; inline;
  18997. function getw : TBits_32; inline;
  18998. procedure setCFIFOCI(thebits : TBits_5); inline;
  18999. procedure setw(thebits : TBits_32); inline;
  19000. public
  19001. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19002. property w : TBits_32 read getw write setw;
  19003. end;
  19004. TCAN1_C1FIFOCON4 = record
  19005. private
  19006. function getDONLY : TBits_1; inline;
  19007. function getFRESET : TBits_1; inline;
  19008. function getFSIZE : TBits_5; inline;
  19009. function getRTREN : TBits_1; inline;
  19010. function getTXABAT : TBits_1; inline;
  19011. function getTXEN : TBits_1; inline;
  19012. function getTXERR : TBits_1; inline;
  19013. function getTXLARB : TBits_1; inline;
  19014. function getTXPRI : TBits_2; inline;
  19015. function getTXREQ : TBits_1; inline;
  19016. function getUINC : TBits_1; inline;
  19017. function getw : TBits_32; inline;
  19018. procedure setDONLY(thebits : TBits_1); inline;
  19019. procedure setFRESET(thebits : TBits_1); inline;
  19020. procedure setFSIZE(thebits : TBits_5); inline;
  19021. procedure setRTREN(thebits : TBits_1); inline;
  19022. procedure setTXABAT(thebits : TBits_1); inline;
  19023. procedure setTXEN(thebits : TBits_1); inline;
  19024. procedure setTXERR(thebits : TBits_1); inline;
  19025. procedure setTXLARB(thebits : TBits_1); inline;
  19026. procedure setTXPRI(thebits : TBits_2); inline;
  19027. procedure setTXREQ(thebits : TBits_1); inline;
  19028. procedure setUINC(thebits : TBits_1); inline;
  19029. procedure setw(thebits : TBits_32); inline;
  19030. public
  19031. procedure clearDONLY; inline;
  19032. procedure clearFRESET; inline;
  19033. procedure clearRTREN; inline;
  19034. procedure clearTXABAT; inline;
  19035. procedure clearTXEN; inline;
  19036. procedure clearTXERR; inline;
  19037. procedure clearTXLARB; inline;
  19038. procedure clearTXREQ; inline;
  19039. procedure clearUINC; inline;
  19040. procedure setDONLY; inline;
  19041. procedure setFRESET; inline;
  19042. procedure setRTREN; inline;
  19043. procedure setTXABAT; inline;
  19044. procedure setTXEN; inline;
  19045. procedure setTXERR; inline;
  19046. procedure setTXLARB; inline;
  19047. procedure setTXREQ; inline;
  19048. procedure setUINC; inline;
  19049. property DONLY : TBits_1 read getDONLY write setDONLY;
  19050. property FRESET : TBits_1 read getFRESET write setFRESET;
  19051. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19052. property RTREN : TBits_1 read getRTREN write setRTREN;
  19053. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19054. property TXEN : TBits_1 read getTXEN write setTXEN;
  19055. property TXERR : TBits_1 read getTXERR write setTXERR;
  19056. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19057. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19058. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19059. property UINC : TBits_1 read getUINC write setUINC;
  19060. property w : TBits_32 read getw write setw;
  19061. end;
  19062. TCAN1_C1FIFOINT4 = record
  19063. private
  19064. function getRXFULLIE : TBits_1; inline;
  19065. function getRXFULLIF : TBits_1; inline;
  19066. function getRXHALFIE : TBits_1; inline;
  19067. function getRXHALFIF : TBits_1; inline;
  19068. function getRXNEMPTYIE : TBits_1; inline;
  19069. function getRXNEMPTYIF : TBits_1; inline;
  19070. function getRXOVFLIE : TBits_1; inline;
  19071. function getRXOVFLIF : TBits_1; inline;
  19072. function getTXEMPTYIE : TBits_1; inline;
  19073. function getTXEMPTYIF : TBits_1; inline;
  19074. function getTXHALFIE : TBits_1; inline;
  19075. function getTXHALFIF : TBits_1; inline;
  19076. function getTXNFULLIE : TBits_1; inline;
  19077. function getTXNFULLIF : TBits_1; inline;
  19078. function getw : TBits_32; inline;
  19079. procedure setRXFULLIE(thebits : TBits_1); inline;
  19080. procedure setRXFULLIF(thebits : TBits_1); inline;
  19081. procedure setRXHALFIE(thebits : TBits_1); inline;
  19082. procedure setRXHALFIF(thebits : TBits_1); inline;
  19083. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19084. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19085. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19086. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19087. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19088. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19089. procedure setTXHALFIE(thebits : TBits_1); inline;
  19090. procedure setTXHALFIF(thebits : TBits_1); inline;
  19091. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19092. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19093. procedure setw(thebits : TBits_32); inline;
  19094. public
  19095. procedure clearRXFULLIE; inline;
  19096. procedure clearRXFULLIF; inline;
  19097. procedure clearRXHALFIE; inline;
  19098. procedure clearRXHALFIF; inline;
  19099. procedure clearRXNEMPTYIE; inline;
  19100. procedure clearRXNEMPTYIF; inline;
  19101. procedure clearRXOVFLIE; inline;
  19102. procedure clearRXOVFLIF; inline;
  19103. procedure clearTXEMPTYIE; inline;
  19104. procedure clearTXEMPTYIF; inline;
  19105. procedure clearTXHALFIE; inline;
  19106. procedure clearTXHALFIF; inline;
  19107. procedure clearTXNFULLIE; inline;
  19108. procedure clearTXNFULLIF; inline;
  19109. procedure setRXFULLIE; inline;
  19110. procedure setRXFULLIF; inline;
  19111. procedure setRXHALFIE; inline;
  19112. procedure setRXHALFIF; inline;
  19113. procedure setRXNEMPTYIE; inline;
  19114. procedure setRXNEMPTYIF; inline;
  19115. procedure setRXOVFLIE; inline;
  19116. procedure setRXOVFLIF; inline;
  19117. procedure setTXEMPTYIE; inline;
  19118. procedure setTXEMPTYIF; inline;
  19119. procedure setTXHALFIE; inline;
  19120. procedure setTXHALFIF; inline;
  19121. procedure setTXNFULLIE; inline;
  19122. procedure setTXNFULLIF; inline;
  19123. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19124. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19125. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19126. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19127. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19128. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19129. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19130. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19131. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19132. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19133. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19134. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19135. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19136. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19137. property w : TBits_32 read getw write setw;
  19138. end;
  19139. TCAN1_C1FIFOCI4 = record
  19140. private
  19141. function getCFIFOCI : TBits_5; inline;
  19142. function getw : TBits_32; inline;
  19143. procedure setCFIFOCI(thebits : TBits_5); inline;
  19144. procedure setw(thebits : TBits_32); inline;
  19145. public
  19146. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19147. property w : TBits_32 read getw write setw;
  19148. end;
  19149. TCAN1_C1FIFOCON5 = record
  19150. private
  19151. function getDONLY : TBits_1; inline;
  19152. function getFRESET : TBits_1; inline;
  19153. function getFSIZE : TBits_5; inline;
  19154. function getRTREN : TBits_1; inline;
  19155. function getTXABAT : TBits_1; inline;
  19156. function getTXEN : TBits_1; inline;
  19157. function getTXERR : TBits_1; inline;
  19158. function getTXLARB : TBits_1; inline;
  19159. function getTXPRI : TBits_2; inline;
  19160. function getTXREQ : TBits_1; inline;
  19161. function getUINC : TBits_1; inline;
  19162. function getw : TBits_32; inline;
  19163. procedure setDONLY(thebits : TBits_1); inline;
  19164. procedure setFRESET(thebits : TBits_1); inline;
  19165. procedure setFSIZE(thebits : TBits_5); inline;
  19166. procedure setRTREN(thebits : TBits_1); inline;
  19167. procedure setTXABAT(thebits : TBits_1); inline;
  19168. procedure setTXEN(thebits : TBits_1); inline;
  19169. procedure setTXERR(thebits : TBits_1); inline;
  19170. procedure setTXLARB(thebits : TBits_1); inline;
  19171. procedure setTXPRI(thebits : TBits_2); inline;
  19172. procedure setTXREQ(thebits : TBits_1); inline;
  19173. procedure setUINC(thebits : TBits_1); inline;
  19174. procedure setw(thebits : TBits_32); inline;
  19175. public
  19176. procedure clearDONLY; inline;
  19177. procedure clearFRESET; inline;
  19178. procedure clearRTREN; inline;
  19179. procedure clearTXABAT; inline;
  19180. procedure clearTXEN; inline;
  19181. procedure clearTXERR; inline;
  19182. procedure clearTXLARB; inline;
  19183. procedure clearTXREQ; inline;
  19184. procedure clearUINC; inline;
  19185. procedure setDONLY; inline;
  19186. procedure setFRESET; inline;
  19187. procedure setRTREN; inline;
  19188. procedure setTXABAT; inline;
  19189. procedure setTXEN; inline;
  19190. procedure setTXERR; inline;
  19191. procedure setTXLARB; inline;
  19192. procedure setTXREQ; inline;
  19193. procedure setUINC; inline;
  19194. property DONLY : TBits_1 read getDONLY write setDONLY;
  19195. property FRESET : TBits_1 read getFRESET write setFRESET;
  19196. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19197. property RTREN : TBits_1 read getRTREN write setRTREN;
  19198. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19199. property TXEN : TBits_1 read getTXEN write setTXEN;
  19200. property TXERR : TBits_1 read getTXERR write setTXERR;
  19201. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19202. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19203. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19204. property UINC : TBits_1 read getUINC write setUINC;
  19205. property w : TBits_32 read getw write setw;
  19206. end;
  19207. TCAN1_C1FIFOINT5 = record
  19208. private
  19209. function getRXFULLIE : TBits_1; inline;
  19210. function getRXFULLIF : TBits_1; inline;
  19211. function getRXHALFIE : TBits_1; inline;
  19212. function getRXHALFIF : TBits_1; inline;
  19213. function getRXNEMPTYIE : TBits_1; inline;
  19214. function getRXNEMPTYIF : TBits_1; inline;
  19215. function getRXOVFLIE : TBits_1; inline;
  19216. function getRXOVFLIF : TBits_1; inline;
  19217. function getTXEMPTYIE : TBits_1; inline;
  19218. function getTXEMPTYIF : TBits_1; inline;
  19219. function getTXHALFIE : TBits_1; inline;
  19220. function getTXHALFIF : TBits_1; inline;
  19221. function getTXNFULLIE : TBits_1; inline;
  19222. function getTXNFULLIF : TBits_1; inline;
  19223. function getw : TBits_32; inline;
  19224. procedure setRXFULLIE(thebits : TBits_1); inline;
  19225. procedure setRXFULLIF(thebits : TBits_1); inline;
  19226. procedure setRXHALFIE(thebits : TBits_1); inline;
  19227. procedure setRXHALFIF(thebits : TBits_1); inline;
  19228. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19229. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19230. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19231. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19232. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19233. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19234. procedure setTXHALFIE(thebits : TBits_1); inline;
  19235. procedure setTXHALFIF(thebits : TBits_1); inline;
  19236. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19237. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19238. procedure setw(thebits : TBits_32); inline;
  19239. public
  19240. procedure clearRXFULLIE; inline;
  19241. procedure clearRXFULLIF; inline;
  19242. procedure clearRXHALFIE; inline;
  19243. procedure clearRXHALFIF; inline;
  19244. procedure clearRXNEMPTYIE; inline;
  19245. procedure clearRXNEMPTYIF; inline;
  19246. procedure clearRXOVFLIE; inline;
  19247. procedure clearRXOVFLIF; inline;
  19248. procedure clearTXEMPTYIE; inline;
  19249. procedure clearTXEMPTYIF; inline;
  19250. procedure clearTXHALFIE; inline;
  19251. procedure clearTXHALFIF; inline;
  19252. procedure clearTXNFULLIE; inline;
  19253. procedure clearTXNFULLIF; inline;
  19254. procedure setRXFULLIE; inline;
  19255. procedure setRXFULLIF; inline;
  19256. procedure setRXHALFIE; inline;
  19257. procedure setRXHALFIF; inline;
  19258. procedure setRXNEMPTYIE; inline;
  19259. procedure setRXNEMPTYIF; inline;
  19260. procedure setRXOVFLIE; inline;
  19261. procedure setRXOVFLIF; inline;
  19262. procedure setTXEMPTYIE; inline;
  19263. procedure setTXEMPTYIF; inline;
  19264. procedure setTXHALFIE; inline;
  19265. procedure setTXHALFIF; inline;
  19266. procedure setTXNFULLIE; inline;
  19267. procedure setTXNFULLIF; inline;
  19268. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19269. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19270. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19271. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19272. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19273. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19274. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19275. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19276. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19277. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19278. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19279. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19280. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19281. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19282. property w : TBits_32 read getw write setw;
  19283. end;
  19284. TCAN1_C1FIFOCI5 = record
  19285. private
  19286. function getCFIFOCI : TBits_5; inline;
  19287. function getw : TBits_32; inline;
  19288. procedure setCFIFOCI(thebits : TBits_5); inline;
  19289. procedure setw(thebits : TBits_32); inline;
  19290. public
  19291. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19292. property w : TBits_32 read getw write setw;
  19293. end;
  19294. TCAN1_C1FIFOCON6 = record
  19295. private
  19296. function getDONLY : TBits_1; inline;
  19297. function getFRESET : TBits_1; inline;
  19298. function getFSIZE : TBits_5; inline;
  19299. function getRTREN : TBits_1; inline;
  19300. function getTXABAT : TBits_1; inline;
  19301. function getTXEN : TBits_1; inline;
  19302. function getTXERR : TBits_1; inline;
  19303. function getTXLARB : TBits_1; inline;
  19304. function getTXPRI : TBits_2; inline;
  19305. function getTXREQ : TBits_1; inline;
  19306. function getUINC : TBits_1; inline;
  19307. function getw : TBits_32; inline;
  19308. procedure setDONLY(thebits : TBits_1); inline;
  19309. procedure setFRESET(thebits : TBits_1); inline;
  19310. procedure setFSIZE(thebits : TBits_5); inline;
  19311. procedure setRTREN(thebits : TBits_1); inline;
  19312. procedure setTXABAT(thebits : TBits_1); inline;
  19313. procedure setTXEN(thebits : TBits_1); inline;
  19314. procedure setTXERR(thebits : TBits_1); inline;
  19315. procedure setTXLARB(thebits : TBits_1); inline;
  19316. procedure setTXPRI(thebits : TBits_2); inline;
  19317. procedure setTXREQ(thebits : TBits_1); inline;
  19318. procedure setUINC(thebits : TBits_1); inline;
  19319. procedure setw(thebits : TBits_32); inline;
  19320. public
  19321. procedure clearDONLY; inline;
  19322. procedure clearFRESET; inline;
  19323. procedure clearRTREN; inline;
  19324. procedure clearTXABAT; inline;
  19325. procedure clearTXEN; inline;
  19326. procedure clearTXERR; inline;
  19327. procedure clearTXLARB; inline;
  19328. procedure clearTXREQ; inline;
  19329. procedure clearUINC; inline;
  19330. procedure setDONLY; inline;
  19331. procedure setFRESET; inline;
  19332. procedure setRTREN; inline;
  19333. procedure setTXABAT; inline;
  19334. procedure setTXEN; inline;
  19335. procedure setTXERR; inline;
  19336. procedure setTXLARB; inline;
  19337. procedure setTXREQ; inline;
  19338. procedure setUINC; inline;
  19339. property DONLY : TBits_1 read getDONLY write setDONLY;
  19340. property FRESET : TBits_1 read getFRESET write setFRESET;
  19341. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19342. property RTREN : TBits_1 read getRTREN write setRTREN;
  19343. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19344. property TXEN : TBits_1 read getTXEN write setTXEN;
  19345. property TXERR : TBits_1 read getTXERR write setTXERR;
  19346. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19347. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19348. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19349. property UINC : TBits_1 read getUINC write setUINC;
  19350. property w : TBits_32 read getw write setw;
  19351. end;
  19352. TCAN1_C1FIFOINT6 = record
  19353. private
  19354. function getRXFULLIE : TBits_1; inline;
  19355. function getRXFULLIF : TBits_1; inline;
  19356. function getRXHALFIE : TBits_1; inline;
  19357. function getRXHALFIF : TBits_1; inline;
  19358. function getRXNEMPTYIE : TBits_1; inline;
  19359. function getRXNEMPTYIF : TBits_1; inline;
  19360. function getRXOVFLIE : TBits_1; inline;
  19361. function getRXOVFLIF : TBits_1; inline;
  19362. function getTXEMPTYIE : TBits_1; inline;
  19363. function getTXEMPTYIF : TBits_1; inline;
  19364. function getTXHALFIE : TBits_1; inline;
  19365. function getTXHALFIF : TBits_1; inline;
  19366. function getTXNFULLIE : TBits_1; inline;
  19367. function getTXNFULLIF : TBits_1; inline;
  19368. function getw : TBits_32; inline;
  19369. procedure setRXFULLIE(thebits : TBits_1); inline;
  19370. procedure setRXFULLIF(thebits : TBits_1); inline;
  19371. procedure setRXHALFIE(thebits : TBits_1); inline;
  19372. procedure setRXHALFIF(thebits : TBits_1); inline;
  19373. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19374. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19375. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19376. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19377. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19378. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19379. procedure setTXHALFIE(thebits : TBits_1); inline;
  19380. procedure setTXHALFIF(thebits : TBits_1); inline;
  19381. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19382. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19383. procedure setw(thebits : TBits_32); inline;
  19384. public
  19385. procedure clearRXFULLIE; inline;
  19386. procedure clearRXFULLIF; inline;
  19387. procedure clearRXHALFIE; inline;
  19388. procedure clearRXHALFIF; inline;
  19389. procedure clearRXNEMPTYIE; inline;
  19390. procedure clearRXNEMPTYIF; inline;
  19391. procedure clearRXOVFLIE; inline;
  19392. procedure clearRXOVFLIF; inline;
  19393. procedure clearTXEMPTYIE; inline;
  19394. procedure clearTXEMPTYIF; inline;
  19395. procedure clearTXHALFIE; inline;
  19396. procedure clearTXHALFIF; inline;
  19397. procedure clearTXNFULLIE; inline;
  19398. procedure clearTXNFULLIF; inline;
  19399. procedure setRXFULLIE; inline;
  19400. procedure setRXFULLIF; inline;
  19401. procedure setRXHALFIE; inline;
  19402. procedure setRXHALFIF; inline;
  19403. procedure setRXNEMPTYIE; inline;
  19404. procedure setRXNEMPTYIF; inline;
  19405. procedure setRXOVFLIE; inline;
  19406. procedure setRXOVFLIF; inline;
  19407. procedure setTXEMPTYIE; inline;
  19408. procedure setTXEMPTYIF; inline;
  19409. procedure setTXHALFIE; inline;
  19410. procedure setTXHALFIF; inline;
  19411. procedure setTXNFULLIE; inline;
  19412. procedure setTXNFULLIF; inline;
  19413. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19414. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19415. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19416. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19417. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19418. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19419. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19420. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19421. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19422. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19423. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19424. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19425. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19426. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19427. property w : TBits_32 read getw write setw;
  19428. end;
  19429. TCAN1_C1FIFOCI6 = record
  19430. private
  19431. function getCFIFOCI : TBits_5; inline;
  19432. function getw : TBits_32; inline;
  19433. procedure setCFIFOCI(thebits : TBits_5); inline;
  19434. procedure setw(thebits : TBits_32); inline;
  19435. public
  19436. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19437. property w : TBits_32 read getw write setw;
  19438. end;
  19439. TCAN1_C1FIFOCON7 = record
  19440. private
  19441. function getDONLY : TBits_1; inline;
  19442. function getFRESET : TBits_1; inline;
  19443. function getFSIZE : TBits_5; inline;
  19444. function getRTREN : TBits_1; inline;
  19445. function getTXABAT : TBits_1; inline;
  19446. function getTXEN : TBits_1; inline;
  19447. function getTXERR : TBits_1; inline;
  19448. function getTXLARB : TBits_1; inline;
  19449. function getTXPRI : TBits_2; inline;
  19450. function getTXREQ : TBits_1; inline;
  19451. function getUINC : TBits_1; inline;
  19452. function getw : TBits_32; inline;
  19453. procedure setDONLY(thebits : TBits_1); inline;
  19454. procedure setFRESET(thebits : TBits_1); inline;
  19455. procedure setFSIZE(thebits : TBits_5); inline;
  19456. procedure setRTREN(thebits : TBits_1); inline;
  19457. procedure setTXABAT(thebits : TBits_1); inline;
  19458. procedure setTXEN(thebits : TBits_1); inline;
  19459. procedure setTXERR(thebits : TBits_1); inline;
  19460. procedure setTXLARB(thebits : TBits_1); inline;
  19461. procedure setTXPRI(thebits : TBits_2); inline;
  19462. procedure setTXREQ(thebits : TBits_1); inline;
  19463. procedure setUINC(thebits : TBits_1); inline;
  19464. procedure setw(thebits : TBits_32); inline;
  19465. public
  19466. procedure clearDONLY; inline;
  19467. procedure clearFRESET; inline;
  19468. procedure clearRTREN; inline;
  19469. procedure clearTXABAT; inline;
  19470. procedure clearTXEN; inline;
  19471. procedure clearTXERR; inline;
  19472. procedure clearTXLARB; inline;
  19473. procedure clearTXREQ; inline;
  19474. procedure clearUINC; inline;
  19475. procedure setDONLY; inline;
  19476. procedure setFRESET; inline;
  19477. procedure setRTREN; inline;
  19478. procedure setTXABAT; inline;
  19479. procedure setTXEN; inline;
  19480. procedure setTXERR; inline;
  19481. procedure setTXLARB; inline;
  19482. procedure setTXREQ; inline;
  19483. procedure setUINC; inline;
  19484. property DONLY : TBits_1 read getDONLY write setDONLY;
  19485. property FRESET : TBits_1 read getFRESET write setFRESET;
  19486. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19487. property RTREN : TBits_1 read getRTREN write setRTREN;
  19488. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19489. property TXEN : TBits_1 read getTXEN write setTXEN;
  19490. property TXERR : TBits_1 read getTXERR write setTXERR;
  19491. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19492. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19493. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19494. property UINC : TBits_1 read getUINC write setUINC;
  19495. property w : TBits_32 read getw write setw;
  19496. end;
  19497. TCAN1_C1FIFOINT7 = record
  19498. private
  19499. function getRXFULLIE : TBits_1; inline;
  19500. function getRXFULLIF : TBits_1; inline;
  19501. function getRXHALFIE : TBits_1; inline;
  19502. function getRXHALFIF : TBits_1; inline;
  19503. function getRXNEMPTYIE : TBits_1; inline;
  19504. function getRXNEMPTYIF : TBits_1; inline;
  19505. function getRXOVFLIE : TBits_1; inline;
  19506. function getRXOVFLIF : TBits_1; inline;
  19507. function getTXEMPTYIE : TBits_1; inline;
  19508. function getTXEMPTYIF : TBits_1; inline;
  19509. function getTXHALFIE : TBits_1; inline;
  19510. function getTXHALFIF : TBits_1; inline;
  19511. function getTXNFULLIE : TBits_1; inline;
  19512. function getTXNFULLIF : TBits_1; inline;
  19513. function getw : TBits_32; inline;
  19514. procedure setRXFULLIE(thebits : TBits_1); inline;
  19515. procedure setRXFULLIF(thebits : TBits_1); inline;
  19516. procedure setRXHALFIE(thebits : TBits_1); inline;
  19517. procedure setRXHALFIF(thebits : TBits_1); inline;
  19518. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19519. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19520. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19521. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19522. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19523. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19524. procedure setTXHALFIE(thebits : TBits_1); inline;
  19525. procedure setTXHALFIF(thebits : TBits_1); inline;
  19526. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19527. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19528. procedure setw(thebits : TBits_32); inline;
  19529. public
  19530. procedure clearRXFULLIE; inline;
  19531. procedure clearRXFULLIF; inline;
  19532. procedure clearRXHALFIE; inline;
  19533. procedure clearRXHALFIF; inline;
  19534. procedure clearRXNEMPTYIE; inline;
  19535. procedure clearRXNEMPTYIF; inline;
  19536. procedure clearRXOVFLIE; inline;
  19537. procedure clearRXOVFLIF; inline;
  19538. procedure clearTXEMPTYIE; inline;
  19539. procedure clearTXEMPTYIF; inline;
  19540. procedure clearTXHALFIE; inline;
  19541. procedure clearTXHALFIF; inline;
  19542. procedure clearTXNFULLIE; inline;
  19543. procedure clearTXNFULLIF; inline;
  19544. procedure setRXFULLIE; inline;
  19545. procedure setRXFULLIF; inline;
  19546. procedure setRXHALFIE; inline;
  19547. procedure setRXHALFIF; inline;
  19548. procedure setRXNEMPTYIE; inline;
  19549. procedure setRXNEMPTYIF; inline;
  19550. procedure setRXOVFLIE; inline;
  19551. procedure setRXOVFLIF; inline;
  19552. procedure setTXEMPTYIE; inline;
  19553. procedure setTXEMPTYIF; inline;
  19554. procedure setTXHALFIE; inline;
  19555. procedure setTXHALFIF; inline;
  19556. procedure setTXNFULLIE; inline;
  19557. procedure setTXNFULLIF; inline;
  19558. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19559. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19560. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19561. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19562. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19563. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19564. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19565. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19566. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19567. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19568. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19569. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19570. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19571. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19572. property w : TBits_32 read getw write setw;
  19573. end;
  19574. TCAN1_C1FIFOCI7 = record
  19575. private
  19576. function getCFIFOCI : TBits_5; inline;
  19577. function getw : TBits_32; inline;
  19578. procedure setCFIFOCI(thebits : TBits_5); inline;
  19579. procedure setw(thebits : TBits_32); inline;
  19580. public
  19581. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19582. property w : TBits_32 read getw write setw;
  19583. end;
  19584. TCAN1_C1FIFOCON8 = record
  19585. private
  19586. function getDONLY : TBits_1; inline;
  19587. function getFRESET : TBits_1; inline;
  19588. function getFSIZE : TBits_5; inline;
  19589. function getRTREN : TBits_1; inline;
  19590. function getTXABAT : TBits_1; inline;
  19591. function getTXEN : TBits_1; inline;
  19592. function getTXERR : TBits_1; inline;
  19593. function getTXLARB : TBits_1; inline;
  19594. function getTXPRI : TBits_2; inline;
  19595. function getTXREQ : TBits_1; inline;
  19596. function getUINC : TBits_1; inline;
  19597. function getw : TBits_32; inline;
  19598. procedure setDONLY(thebits : TBits_1); inline;
  19599. procedure setFRESET(thebits : TBits_1); inline;
  19600. procedure setFSIZE(thebits : TBits_5); inline;
  19601. procedure setRTREN(thebits : TBits_1); inline;
  19602. procedure setTXABAT(thebits : TBits_1); inline;
  19603. procedure setTXEN(thebits : TBits_1); inline;
  19604. procedure setTXERR(thebits : TBits_1); inline;
  19605. procedure setTXLARB(thebits : TBits_1); inline;
  19606. procedure setTXPRI(thebits : TBits_2); inline;
  19607. procedure setTXREQ(thebits : TBits_1); inline;
  19608. procedure setUINC(thebits : TBits_1); inline;
  19609. procedure setw(thebits : TBits_32); inline;
  19610. public
  19611. procedure clearDONLY; inline;
  19612. procedure clearFRESET; inline;
  19613. procedure clearRTREN; inline;
  19614. procedure clearTXABAT; inline;
  19615. procedure clearTXEN; inline;
  19616. procedure clearTXERR; inline;
  19617. procedure clearTXLARB; inline;
  19618. procedure clearTXREQ; inline;
  19619. procedure clearUINC; inline;
  19620. procedure setDONLY; inline;
  19621. procedure setFRESET; inline;
  19622. procedure setRTREN; inline;
  19623. procedure setTXABAT; inline;
  19624. procedure setTXEN; inline;
  19625. procedure setTXERR; inline;
  19626. procedure setTXLARB; inline;
  19627. procedure setTXREQ; inline;
  19628. procedure setUINC; inline;
  19629. property DONLY : TBits_1 read getDONLY write setDONLY;
  19630. property FRESET : TBits_1 read getFRESET write setFRESET;
  19631. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19632. property RTREN : TBits_1 read getRTREN write setRTREN;
  19633. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19634. property TXEN : TBits_1 read getTXEN write setTXEN;
  19635. property TXERR : TBits_1 read getTXERR write setTXERR;
  19636. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19637. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19638. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19639. property UINC : TBits_1 read getUINC write setUINC;
  19640. property w : TBits_32 read getw write setw;
  19641. end;
  19642. TCAN1_C1FIFOINT8 = record
  19643. private
  19644. function getRXFULLIE : TBits_1; inline;
  19645. function getRXFULLIF : TBits_1; inline;
  19646. function getRXHALFIE : TBits_1; inline;
  19647. function getRXHALFIF : TBits_1; inline;
  19648. function getRXNEMPTYIE : TBits_1; inline;
  19649. function getRXNEMPTYIF : TBits_1; inline;
  19650. function getRXOVFLIE : TBits_1; inline;
  19651. function getRXOVFLIF : TBits_1; inline;
  19652. function getTXEMPTYIE : TBits_1; inline;
  19653. function getTXEMPTYIF : TBits_1; inline;
  19654. function getTXHALFIE : TBits_1; inline;
  19655. function getTXHALFIF : TBits_1; inline;
  19656. function getTXNFULLIE : TBits_1; inline;
  19657. function getTXNFULLIF : TBits_1; inline;
  19658. function getw : TBits_32; inline;
  19659. procedure setRXFULLIE(thebits : TBits_1); inline;
  19660. procedure setRXFULLIF(thebits : TBits_1); inline;
  19661. procedure setRXHALFIE(thebits : TBits_1); inline;
  19662. procedure setRXHALFIF(thebits : TBits_1); inline;
  19663. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19664. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19665. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19666. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19667. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19668. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19669. procedure setTXHALFIE(thebits : TBits_1); inline;
  19670. procedure setTXHALFIF(thebits : TBits_1); inline;
  19671. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19672. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19673. procedure setw(thebits : TBits_32); inline;
  19674. public
  19675. procedure clearRXFULLIE; inline;
  19676. procedure clearRXFULLIF; inline;
  19677. procedure clearRXHALFIE; inline;
  19678. procedure clearRXHALFIF; inline;
  19679. procedure clearRXNEMPTYIE; inline;
  19680. procedure clearRXNEMPTYIF; inline;
  19681. procedure clearRXOVFLIE; inline;
  19682. procedure clearRXOVFLIF; inline;
  19683. procedure clearTXEMPTYIE; inline;
  19684. procedure clearTXEMPTYIF; inline;
  19685. procedure clearTXHALFIE; inline;
  19686. procedure clearTXHALFIF; inline;
  19687. procedure clearTXNFULLIE; inline;
  19688. procedure clearTXNFULLIF; inline;
  19689. procedure setRXFULLIE; inline;
  19690. procedure setRXFULLIF; inline;
  19691. procedure setRXHALFIE; inline;
  19692. procedure setRXHALFIF; inline;
  19693. procedure setRXNEMPTYIE; inline;
  19694. procedure setRXNEMPTYIF; inline;
  19695. procedure setRXOVFLIE; inline;
  19696. procedure setRXOVFLIF; inline;
  19697. procedure setTXEMPTYIE; inline;
  19698. procedure setTXEMPTYIF; inline;
  19699. procedure setTXHALFIE; inline;
  19700. procedure setTXHALFIF; inline;
  19701. procedure setTXNFULLIE; inline;
  19702. procedure setTXNFULLIF; inline;
  19703. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19704. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19705. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19706. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19707. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19708. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19709. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19710. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19711. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19712. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19713. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19714. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19715. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19716. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19717. property w : TBits_32 read getw write setw;
  19718. end;
  19719. TCAN1_C1FIFOCI8 = record
  19720. private
  19721. function getCFIFOCI : TBits_5; inline;
  19722. function getw : TBits_32; inline;
  19723. procedure setCFIFOCI(thebits : TBits_5); inline;
  19724. procedure setw(thebits : TBits_32); inline;
  19725. public
  19726. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19727. property w : TBits_32 read getw write setw;
  19728. end;
  19729. TCAN1_C1FIFOCON9 = record
  19730. private
  19731. function getDONLY : TBits_1; inline;
  19732. function getFRESET : TBits_1; inline;
  19733. function getFSIZE : TBits_5; inline;
  19734. function getRTREN : TBits_1; inline;
  19735. function getTXABAT : TBits_1; inline;
  19736. function getTXEN : TBits_1; inline;
  19737. function getTXERR : TBits_1; inline;
  19738. function getTXLARB : TBits_1; inline;
  19739. function getTXPRI : TBits_2; inline;
  19740. function getTXREQ : TBits_1; inline;
  19741. function getUINC : TBits_1; inline;
  19742. function getw : TBits_32; inline;
  19743. procedure setDONLY(thebits : TBits_1); inline;
  19744. procedure setFRESET(thebits : TBits_1); inline;
  19745. procedure setFSIZE(thebits : TBits_5); inline;
  19746. procedure setRTREN(thebits : TBits_1); inline;
  19747. procedure setTXABAT(thebits : TBits_1); inline;
  19748. procedure setTXEN(thebits : TBits_1); inline;
  19749. procedure setTXERR(thebits : TBits_1); inline;
  19750. procedure setTXLARB(thebits : TBits_1); inline;
  19751. procedure setTXPRI(thebits : TBits_2); inline;
  19752. procedure setTXREQ(thebits : TBits_1); inline;
  19753. procedure setUINC(thebits : TBits_1); inline;
  19754. procedure setw(thebits : TBits_32); inline;
  19755. public
  19756. procedure clearDONLY; inline;
  19757. procedure clearFRESET; inline;
  19758. procedure clearRTREN; inline;
  19759. procedure clearTXABAT; inline;
  19760. procedure clearTXEN; inline;
  19761. procedure clearTXERR; inline;
  19762. procedure clearTXLARB; inline;
  19763. procedure clearTXREQ; inline;
  19764. procedure clearUINC; inline;
  19765. procedure setDONLY; inline;
  19766. procedure setFRESET; inline;
  19767. procedure setRTREN; inline;
  19768. procedure setTXABAT; inline;
  19769. procedure setTXEN; inline;
  19770. procedure setTXERR; inline;
  19771. procedure setTXLARB; inline;
  19772. procedure setTXREQ; inline;
  19773. procedure setUINC; inline;
  19774. property DONLY : TBits_1 read getDONLY write setDONLY;
  19775. property FRESET : TBits_1 read getFRESET write setFRESET;
  19776. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19777. property RTREN : TBits_1 read getRTREN write setRTREN;
  19778. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19779. property TXEN : TBits_1 read getTXEN write setTXEN;
  19780. property TXERR : TBits_1 read getTXERR write setTXERR;
  19781. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19782. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19783. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19784. property UINC : TBits_1 read getUINC write setUINC;
  19785. property w : TBits_32 read getw write setw;
  19786. end;
  19787. TCAN1_C1FIFOINT9 = record
  19788. private
  19789. function getRXFULLIE : TBits_1; inline;
  19790. function getRXFULLIF : TBits_1; inline;
  19791. function getRXHALFIE : TBits_1; inline;
  19792. function getRXHALFIF : TBits_1; inline;
  19793. function getRXNEMPTYIE : TBits_1; inline;
  19794. function getRXNEMPTYIF : TBits_1; inline;
  19795. function getRXOVFLIE : TBits_1; inline;
  19796. function getRXOVFLIF : TBits_1; inline;
  19797. function getTXEMPTYIE : TBits_1; inline;
  19798. function getTXEMPTYIF : TBits_1; inline;
  19799. function getTXHALFIE : TBits_1; inline;
  19800. function getTXHALFIF : TBits_1; inline;
  19801. function getTXNFULLIE : TBits_1; inline;
  19802. function getTXNFULLIF : TBits_1; inline;
  19803. function getw : TBits_32; inline;
  19804. procedure setRXFULLIE(thebits : TBits_1); inline;
  19805. procedure setRXFULLIF(thebits : TBits_1); inline;
  19806. procedure setRXHALFIE(thebits : TBits_1); inline;
  19807. procedure setRXHALFIF(thebits : TBits_1); inline;
  19808. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19809. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19810. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19811. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19812. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19813. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19814. procedure setTXHALFIE(thebits : TBits_1); inline;
  19815. procedure setTXHALFIF(thebits : TBits_1); inline;
  19816. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19817. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19818. procedure setw(thebits : TBits_32); inline;
  19819. public
  19820. procedure clearRXFULLIE; inline;
  19821. procedure clearRXFULLIF; inline;
  19822. procedure clearRXHALFIE; inline;
  19823. procedure clearRXHALFIF; inline;
  19824. procedure clearRXNEMPTYIE; inline;
  19825. procedure clearRXNEMPTYIF; inline;
  19826. procedure clearRXOVFLIE; inline;
  19827. procedure clearRXOVFLIF; inline;
  19828. procedure clearTXEMPTYIE; inline;
  19829. procedure clearTXEMPTYIF; inline;
  19830. procedure clearTXHALFIE; inline;
  19831. procedure clearTXHALFIF; inline;
  19832. procedure clearTXNFULLIE; inline;
  19833. procedure clearTXNFULLIF; inline;
  19834. procedure setRXFULLIE; inline;
  19835. procedure setRXFULLIF; inline;
  19836. procedure setRXHALFIE; inline;
  19837. procedure setRXHALFIF; inline;
  19838. procedure setRXNEMPTYIE; inline;
  19839. procedure setRXNEMPTYIF; inline;
  19840. procedure setRXOVFLIE; inline;
  19841. procedure setRXOVFLIF; inline;
  19842. procedure setTXEMPTYIE; inline;
  19843. procedure setTXEMPTYIF; inline;
  19844. procedure setTXHALFIE; inline;
  19845. procedure setTXHALFIF; inline;
  19846. procedure setTXNFULLIE; inline;
  19847. procedure setTXNFULLIF; inline;
  19848. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19849. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19850. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19851. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19852. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19853. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19854. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19855. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19856. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19857. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19858. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19859. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19860. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19861. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19862. property w : TBits_32 read getw write setw;
  19863. end;
  19864. TCAN1_C1FIFOCI9 = record
  19865. private
  19866. function getCFIFOCI : TBits_5; inline;
  19867. function getw : TBits_32; inline;
  19868. procedure setCFIFOCI(thebits : TBits_5); inline;
  19869. procedure setw(thebits : TBits_32); inline;
  19870. public
  19871. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19872. property w : TBits_32 read getw write setw;
  19873. end;
  19874. TCAN1_C1FIFOCON10 = record
  19875. private
  19876. function getDONLY : TBits_1; inline;
  19877. function getFRESET : TBits_1; inline;
  19878. function getFSIZE : TBits_5; inline;
  19879. function getRTREN : TBits_1; inline;
  19880. function getTXABAT : TBits_1; inline;
  19881. function getTXEN : TBits_1; inline;
  19882. function getTXERR : TBits_1; inline;
  19883. function getTXLARB : TBits_1; inline;
  19884. function getTXPRI : TBits_2; inline;
  19885. function getTXREQ : TBits_1; inline;
  19886. function getUINC : TBits_1; inline;
  19887. function getw : TBits_32; inline;
  19888. procedure setDONLY(thebits : TBits_1); inline;
  19889. procedure setFRESET(thebits : TBits_1); inline;
  19890. procedure setFSIZE(thebits : TBits_5); inline;
  19891. procedure setRTREN(thebits : TBits_1); inline;
  19892. procedure setTXABAT(thebits : TBits_1); inline;
  19893. procedure setTXEN(thebits : TBits_1); inline;
  19894. procedure setTXERR(thebits : TBits_1); inline;
  19895. procedure setTXLARB(thebits : TBits_1); inline;
  19896. procedure setTXPRI(thebits : TBits_2); inline;
  19897. procedure setTXREQ(thebits : TBits_1); inline;
  19898. procedure setUINC(thebits : TBits_1); inline;
  19899. procedure setw(thebits : TBits_32); inline;
  19900. public
  19901. procedure clearDONLY; inline;
  19902. procedure clearFRESET; inline;
  19903. procedure clearRTREN; inline;
  19904. procedure clearTXABAT; inline;
  19905. procedure clearTXEN; inline;
  19906. procedure clearTXERR; inline;
  19907. procedure clearTXLARB; inline;
  19908. procedure clearTXREQ; inline;
  19909. procedure clearUINC; inline;
  19910. procedure setDONLY; inline;
  19911. procedure setFRESET; inline;
  19912. procedure setRTREN; inline;
  19913. procedure setTXABAT; inline;
  19914. procedure setTXEN; inline;
  19915. procedure setTXERR; inline;
  19916. procedure setTXLARB; inline;
  19917. procedure setTXREQ; inline;
  19918. procedure setUINC; inline;
  19919. property DONLY : TBits_1 read getDONLY write setDONLY;
  19920. property FRESET : TBits_1 read getFRESET write setFRESET;
  19921. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19922. property RTREN : TBits_1 read getRTREN write setRTREN;
  19923. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19924. property TXEN : TBits_1 read getTXEN write setTXEN;
  19925. property TXERR : TBits_1 read getTXERR write setTXERR;
  19926. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19927. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19928. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19929. property UINC : TBits_1 read getUINC write setUINC;
  19930. property w : TBits_32 read getw write setw;
  19931. end;
  19932. TCAN1_C1FIFOINT10 = record
  19933. private
  19934. function getRXFULLIE : TBits_1; inline;
  19935. function getRXFULLIF : TBits_1; inline;
  19936. function getRXHALFIE : TBits_1; inline;
  19937. function getRXHALFIF : TBits_1; inline;
  19938. function getRXNEMPTYIE : TBits_1; inline;
  19939. function getRXNEMPTYIF : TBits_1; inline;
  19940. function getRXOVFLIE : TBits_1; inline;
  19941. function getRXOVFLIF : TBits_1; inline;
  19942. function getTXEMPTYIE : TBits_1; inline;
  19943. function getTXEMPTYIF : TBits_1; inline;
  19944. function getTXHALFIE : TBits_1; inline;
  19945. function getTXHALFIF : TBits_1; inline;
  19946. function getTXNFULLIE : TBits_1; inline;
  19947. function getTXNFULLIF : TBits_1; inline;
  19948. function getw : TBits_32; inline;
  19949. procedure setRXFULLIE(thebits : TBits_1); inline;
  19950. procedure setRXFULLIF(thebits : TBits_1); inline;
  19951. procedure setRXHALFIE(thebits : TBits_1); inline;
  19952. procedure setRXHALFIF(thebits : TBits_1); inline;
  19953. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19954. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19955. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19956. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19957. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19958. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19959. procedure setTXHALFIE(thebits : TBits_1); inline;
  19960. procedure setTXHALFIF(thebits : TBits_1); inline;
  19961. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19962. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19963. procedure setw(thebits : TBits_32); inline;
  19964. public
  19965. procedure clearRXFULLIE; inline;
  19966. procedure clearRXFULLIF; inline;
  19967. procedure clearRXHALFIE; inline;
  19968. procedure clearRXHALFIF; inline;
  19969. procedure clearRXNEMPTYIE; inline;
  19970. procedure clearRXNEMPTYIF; inline;
  19971. procedure clearRXOVFLIE; inline;
  19972. procedure clearRXOVFLIF; inline;
  19973. procedure clearTXEMPTYIE; inline;
  19974. procedure clearTXEMPTYIF; inline;
  19975. procedure clearTXHALFIE; inline;
  19976. procedure clearTXHALFIF; inline;
  19977. procedure clearTXNFULLIE; inline;
  19978. procedure clearTXNFULLIF; inline;
  19979. procedure setRXFULLIE; inline;
  19980. procedure setRXFULLIF; inline;
  19981. procedure setRXHALFIE; inline;
  19982. procedure setRXHALFIF; inline;
  19983. procedure setRXNEMPTYIE; inline;
  19984. procedure setRXNEMPTYIF; inline;
  19985. procedure setRXOVFLIE; inline;
  19986. procedure setRXOVFLIF; inline;
  19987. procedure setTXEMPTYIE; inline;
  19988. procedure setTXEMPTYIF; inline;
  19989. procedure setTXHALFIE; inline;
  19990. procedure setTXHALFIF; inline;
  19991. procedure setTXNFULLIE; inline;
  19992. procedure setTXNFULLIF; inline;
  19993. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19994. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19995. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19996. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19997. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19998. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19999. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20000. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20001. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20002. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20003. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20004. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20005. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20006. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20007. property w : TBits_32 read getw write setw;
  20008. end;
  20009. TCAN1_C1FIFOCI10 = record
  20010. private
  20011. function getCFIFOCI : TBits_5; inline;
  20012. function getw : TBits_32; inline;
  20013. procedure setCFIFOCI(thebits : TBits_5); inline;
  20014. procedure setw(thebits : TBits_32); inline;
  20015. public
  20016. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20017. property w : TBits_32 read getw write setw;
  20018. end;
  20019. TCAN1_C1FIFOCON11 = record
  20020. private
  20021. function getDONLY : TBits_1; inline;
  20022. function getFRESET : TBits_1; inline;
  20023. function getFSIZE : TBits_5; inline;
  20024. function getRTREN : TBits_1; inline;
  20025. function getTXABAT : TBits_1; inline;
  20026. function getTXEN : TBits_1; inline;
  20027. function getTXERR : TBits_1; inline;
  20028. function getTXLARB : TBits_1; inline;
  20029. function getTXPRI : TBits_2; inline;
  20030. function getTXREQ : TBits_1; inline;
  20031. function getUINC : TBits_1; inline;
  20032. function getw : TBits_32; inline;
  20033. procedure setDONLY(thebits : TBits_1); inline;
  20034. procedure setFRESET(thebits : TBits_1); inline;
  20035. procedure setFSIZE(thebits : TBits_5); inline;
  20036. procedure setRTREN(thebits : TBits_1); inline;
  20037. procedure setTXABAT(thebits : TBits_1); inline;
  20038. procedure setTXEN(thebits : TBits_1); inline;
  20039. procedure setTXERR(thebits : TBits_1); inline;
  20040. procedure setTXLARB(thebits : TBits_1); inline;
  20041. procedure setTXPRI(thebits : TBits_2); inline;
  20042. procedure setTXREQ(thebits : TBits_1); inline;
  20043. procedure setUINC(thebits : TBits_1); inline;
  20044. procedure setw(thebits : TBits_32); inline;
  20045. public
  20046. procedure clearDONLY; inline;
  20047. procedure clearFRESET; inline;
  20048. procedure clearRTREN; inline;
  20049. procedure clearTXABAT; inline;
  20050. procedure clearTXEN; inline;
  20051. procedure clearTXERR; inline;
  20052. procedure clearTXLARB; inline;
  20053. procedure clearTXREQ; inline;
  20054. procedure clearUINC; inline;
  20055. procedure setDONLY; inline;
  20056. procedure setFRESET; inline;
  20057. procedure setRTREN; inline;
  20058. procedure setTXABAT; inline;
  20059. procedure setTXEN; inline;
  20060. procedure setTXERR; inline;
  20061. procedure setTXLARB; inline;
  20062. procedure setTXREQ; inline;
  20063. procedure setUINC; inline;
  20064. property DONLY : TBits_1 read getDONLY write setDONLY;
  20065. property FRESET : TBits_1 read getFRESET write setFRESET;
  20066. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20067. property RTREN : TBits_1 read getRTREN write setRTREN;
  20068. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20069. property TXEN : TBits_1 read getTXEN write setTXEN;
  20070. property TXERR : TBits_1 read getTXERR write setTXERR;
  20071. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20072. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20073. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20074. property UINC : TBits_1 read getUINC write setUINC;
  20075. property w : TBits_32 read getw write setw;
  20076. end;
  20077. TCAN1_C1FIFOINT11 = record
  20078. private
  20079. function getRXFULLIE : TBits_1; inline;
  20080. function getRXFULLIF : TBits_1; inline;
  20081. function getRXHALFIE : TBits_1; inline;
  20082. function getRXHALFIF : TBits_1; inline;
  20083. function getRXNEMPTYIE : TBits_1; inline;
  20084. function getRXNEMPTYIF : TBits_1; inline;
  20085. function getRXOVFLIE : TBits_1; inline;
  20086. function getRXOVFLIF : TBits_1; inline;
  20087. function getTXEMPTYIE : TBits_1; inline;
  20088. function getTXEMPTYIF : TBits_1; inline;
  20089. function getTXHALFIE : TBits_1; inline;
  20090. function getTXHALFIF : TBits_1; inline;
  20091. function getTXNFULLIE : TBits_1; inline;
  20092. function getTXNFULLIF : TBits_1; inline;
  20093. function getw : TBits_32; inline;
  20094. procedure setRXFULLIE(thebits : TBits_1); inline;
  20095. procedure setRXFULLIF(thebits : TBits_1); inline;
  20096. procedure setRXHALFIE(thebits : TBits_1); inline;
  20097. procedure setRXHALFIF(thebits : TBits_1); inline;
  20098. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20099. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20100. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20101. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20102. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20103. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20104. procedure setTXHALFIE(thebits : TBits_1); inline;
  20105. procedure setTXHALFIF(thebits : TBits_1); inline;
  20106. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20107. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20108. procedure setw(thebits : TBits_32); inline;
  20109. public
  20110. procedure clearRXFULLIE; inline;
  20111. procedure clearRXFULLIF; inline;
  20112. procedure clearRXHALFIE; inline;
  20113. procedure clearRXHALFIF; inline;
  20114. procedure clearRXNEMPTYIE; inline;
  20115. procedure clearRXNEMPTYIF; inline;
  20116. procedure clearRXOVFLIE; inline;
  20117. procedure clearRXOVFLIF; inline;
  20118. procedure clearTXEMPTYIE; inline;
  20119. procedure clearTXEMPTYIF; inline;
  20120. procedure clearTXHALFIE; inline;
  20121. procedure clearTXHALFIF; inline;
  20122. procedure clearTXNFULLIE; inline;
  20123. procedure clearTXNFULLIF; inline;
  20124. procedure setRXFULLIE; inline;
  20125. procedure setRXFULLIF; inline;
  20126. procedure setRXHALFIE; inline;
  20127. procedure setRXHALFIF; inline;
  20128. procedure setRXNEMPTYIE; inline;
  20129. procedure setRXNEMPTYIF; inline;
  20130. procedure setRXOVFLIE; inline;
  20131. procedure setRXOVFLIF; inline;
  20132. procedure setTXEMPTYIE; inline;
  20133. procedure setTXEMPTYIF; inline;
  20134. procedure setTXHALFIE; inline;
  20135. procedure setTXHALFIF; inline;
  20136. procedure setTXNFULLIE; inline;
  20137. procedure setTXNFULLIF; inline;
  20138. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20139. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20140. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20141. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20142. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20143. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20144. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20145. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20146. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20147. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20148. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20149. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20150. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20151. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20152. property w : TBits_32 read getw write setw;
  20153. end;
  20154. TCAN1_C1FIFOCI11 = record
  20155. private
  20156. function getCFIFOCI : TBits_5; inline;
  20157. function getw : TBits_32; inline;
  20158. procedure setCFIFOCI(thebits : TBits_5); inline;
  20159. procedure setw(thebits : TBits_32); inline;
  20160. public
  20161. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20162. property w : TBits_32 read getw write setw;
  20163. end;
  20164. TCAN1_C1FIFOCON12 = record
  20165. private
  20166. function getDONLY : TBits_1; inline;
  20167. function getFRESET : TBits_1; inline;
  20168. function getFSIZE : TBits_5; inline;
  20169. function getRTREN : TBits_1; inline;
  20170. function getTXABAT : TBits_1; inline;
  20171. function getTXEN : TBits_1; inline;
  20172. function getTXERR : TBits_1; inline;
  20173. function getTXLARB : TBits_1; inline;
  20174. function getTXPRI : TBits_2; inline;
  20175. function getTXREQ : TBits_1; inline;
  20176. function getUINC : TBits_1; inline;
  20177. function getw : TBits_32; inline;
  20178. procedure setDONLY(thebits : TBits_1); inline;
  20179. procedure setFRESET(thebits : TBits_1); inline;
  20180. procedure setFSIZE(thebits : TBits_5); inline;
  20181. procedure setRTREN(thebits : TBits_1); inline;
  20182. procedure setTXABAT(thebits : TBits_1); inline;
  20183. procedure setTXEN(thebits : TBits_1); inline;
  20184. procedure setTXERR(thebits : TBits_1); inline;
  20185. procedure setTXLARB(thebits : TBits_1); inline;
  20186. procedure setTXPRI(thebits : TBits_2); inline;
  20187. procedure setTXREQ(thebits : TBits_1); inline;
  20188. procedure setUINC(thebits : TBits_1); inline;
  20189. procedure setw(thebits : TBits_32); inline;
  20190. public
  20191. procedure clearDONLY; inline;
  20192. procedure clearFRESET; inline;
  20193. procedure clearRTREN; inline;
  20194. procedure clearTXABAT; inline;
  20195. procedure clearTXEN; inline;
  20196. procedure clearTXERR; inline;
  20197. procedure clearTXLARB; inline;
  20198. procedure clearTXREQ; inline;
  20199. procedure clearUINC; inline;
  20200. procedure setDONLY; inline;
  20201. procedure setFRESET; inline;
  20202. procedure setRTREN; inline;
  20203. procedure setTXABAT; inline;
  20204. procedure setTXEN; inline;
  20205. procedure setTXERR; inline;
  20206. procedure setTXLARB; inline;
  20207. procedure setTXREQ; inline;
  20208. procedure setUINC; inline;
  20209. property DONLY : TBits_1 read getDONLY write setDONLY;
  20210. property FRESET : TBits_1 read getFRESET write setFRESET;
  20211. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20212. property RTREN : TBits_1 read getRTREN write setRTREN;
  20213. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20214. property TXEN : TBits_1 read getTXEN write setTXEN;
  20215. property TXERR : TBits_1 read getTXERR write setTXERR;
  20216. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20217. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20218. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20219. property UINC : TBits_1 read getUINC write setUINC;
  20220. property w : TBits_32 read getw write setw;
  20221. end;
  20222. TCAN1_C1FIFOINT12 = record
  20223. private
  20224. function getRXFULLIE : TBits_1; inline;
  20225. function getRXFULLIF : TBits_1; inline;
  20226. function getRXHALFIE : TBits_1; inline;
  20227. function getRXHALFIF : TBits_1; inline;
  20228. function getRXNEMPTYIE : TBits_1; inline;
  20229. function getRXNEMPTYIF : TBits_1; inline;
  20230. function getRXOVFLIE : TBits_1; inline;
  20231. function getRXOVFLIF : TBits_1; inline;
  20232. function getTXEMPTYIE : TBits_1; inline;
  20233. function getTXEMPTYIF : TBits_1; inline;
  20234. function getTXHALFIE : TBits_1; inline;
  20235. function getTXHALFIF : TBits_1; inline;
  20236. function getTXNFULLIE : TBits_1; inline;
  20237. function getTXNFULLIF : TBits_1; inline;
  20238. function getw : TBits_32; inline;
  20239. procedure setRXFULLIE(thebits : TBits_1); inline;
  20240. procedure setRXFULLIF(thebits : TBits_1); inline;
  20241. procedure setRXHALFIE(thebits : TBits_1); inline;
  20242. procedure setRXHALFIF(thebits : TBits_1); inline;
  20243. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20244. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20245. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20246. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20247. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20248. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20249. procedure setTXHALFIE(thebits : TBits_1); inline;
  20250. procedure setTXHALFIF(thebits : TBits_1); inline;
  20251. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20252. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20253. procedure setw(thebits : TBits_32); inline;
  20254. public
  20255. procedure clearRXFULLIE; inline;
  20256. procedure clearRXFULLIF; inline;
  20257. procedure clearRXHALFIE; inline;
  20258. procedure clearRXHALFIF; inline;
  20259. procedure clearRXNEMPTYIE; inline;
  20260. procedure clearRXNEMPTYIF; inline;
  20261. procedure clearRXOVFLIE; inline;
  20262. procedure clearRXOVFLIF; inline;
  20263. procedure clearTXEMPTYIE; inline;
  20264. procedure clearTXEMPTYIF; inline;
  20265. procedure clearTXHALFIE; inline;
  20266. procedure clearTXHALFIF; inline;
  20267. procedure clearTXNFULLIE; inline;
  20268. procedure clearTXNFULLIF; inline;
  20269. procedure setRXFULLIE; inline;
  20270. procedure setRXFULLIF; inline;
  20271. procedure setRXHALFIE; inline;
  20272. procedure setRXHALFIF; inline;
  20273. procedure setRXNEMPTYIE; inline;
  20274. procedure setRXNEMPTYIF; inline;
  20275. procedure setRXOVFLIE; inline;
  20276. procedure setRXOVFLIF; inline;
  20277. procedure setTXEMPTYIE; inline;
  20278. procedure setTXEMPTYIF; inline;
  20279. procedure setTXHALFIE; inline;
  20280. procedure setTXHALFIF; inline;
  20281. procedure setTXNFULLIE; inline;
  20282. procedure setTXNFULLIF; inline;
  20283. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20284. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20285. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20286. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20287. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20288. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20289. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20290. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20291. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20292. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20293. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20294. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20295. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20296. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20297. property w : TBits_32 read getw write setw;
  20298. end;
  20299. TCAN1_C1FIFOCI12 = record
  20300. private
  20301. function getCFIFOCI : TBits_5; inline;
  20302. function getw : TBits_32; inline;
  20303. procedure setCFIFOCI(thebits : TBits_5); inline;
  20304. procedure setw(thebits : TBits_32); inline;
  20305. public
  20306. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20307. property w : TBits_32 read getw write setw;
  20308. end;
  20309. TCAN1_C1FIFOCON13 = record
  20310. private
  20311. function getDONLY : TBits_1; inline;
  20312. function getFRESET : TBits_1; inline;
  20313. function getFSIZE : TBits_5; inline;
  20314. function getRTREN : TBits_1; inline;
  20315. function getTXABAT : TBits_1; inline;
  20316. function getTXEN : TBits_1; inline;
  20317. function getTXERR : TBits_1; inline;
  20318. function getTXLARB : TBits_1; inline;
  20319. function getTXPRI : TBits_2; inline;
  20320. function getTXREQ : TBits_1; inline;
  20321. function getUINC : TBits_1; inline;
  20322. function getw : TBits_32; inline;
  20323. procedure setDONLY(thebits : TBits_1); inline;
  20324. procedure setFRESET(thebits : TBits_1); inline;
  20325. procedure setFSIZE(thebits : TBits_5); inline;
  20326. procedure setRTREN(thebits : TBits_1); inline;
  20327. procedure setTXABAT(thebits : TBits_1); inline;
  20328. procedure setTXEN(thebits : TBits_1); inline;
  20329. procedure setTXERR(thebits : TBits_1); inline;
  20330. procedure setTXLARB(thebits : TBits_1); inline;
  20331. procedure setTXPRI(thebits : TBits_2); inline;
  20332. procedure setTXREQ(thebits : TBits_1); inline;
  20333. procedure setUINC(thebits : TBits_1); inline;
  20334. procedure setw(thebits : TBits_32); inline;
  20335. public
  20336. procedure clearDONLY; inline;
  20337. procedure clearFRESET; inline;
  20338. procedure clearRTREN; inline;
  20339. procedure clearTXABAT; inline;
  20340. procedure clearTXEN; inline;
  20341. procedure clearTXERR; inline;
  20342. procedure clearTXLARB; inline;
  20343. procedure clearTXREQ; inline;
  20344. procedure clearUINC; inline;
  20345. procedure setDONLY; inline;
  20346. procedure setFRESET; inline;
  20347. procedure setRTREN; inline;
  20348. procedure setTXABAT; inline;
  20349. procedure setTXEN; inline;
  20350. procedure setTXERR; inline;
  20351. procedure setTXLARB; inline;
  20352. procedure setTXREQ; inline;
  20353. procedure setUINC; inline;
  20354. property DONLY : TBits_1 read getDONLY write setDONLY;
  20355. property FRESET : TBits_1 read getFRESET write setFRESET;
  20356. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20357. property RTREN : TBits_1 read getRTREN write setRTREN;
  20358. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20359. property TXEN : TBits_1 read getTXEN write setTXEN;
  20360. property TXERR : TBits_1 read getTXERR write setTXERR;
  20361. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20362. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20363. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20364. property UINC : TBits_1 read getUINC write setUINC;
  20365. property w : TBits_32 read getw write setw;
  20366. end;
  20367. TCAN1_C1FIFOINT13 = record
  20368. private
  20369. function getRXFULLIE : TBits_1; inline;
  20370. function getRXFULLIF : TBits_1; inline;
  20371. function getRXHALFIE : TBits_1; inline;
  20372. function getRXHALFIF : TBits_1; inline;
  20373. function getRXNEMPTYIE : TBits_1; inline;
  20374. function getRXNEMPTYIF : TBits_1; inline;
  20375. function getRXOVFLIE : TBits_1; inline;
  20376. function getRXOVFLIF : TBits_1; inline;
  20377. function getTXEMPTYIE : TBits_1; inline;
  20378. function getTXEMPTYIF : TBits_1; inline;
  20379. function getTXHALFIE : TBits_1; inline;
  20380. function getTXHALFIF : TBits_1; inline;
  20381. function getTXNFULLIE : TBits_1; inline;
  20382. function getTXNFULLIF : TBits_1; inline;
  20383. function getw : TBits_32; inline;
  20384. procedure setRXFULLIE(thebits : TBits_1); inline;
  20385. procedure setRXFULLIF(thebits : TBits_1); inline;
  20386. procedure setRXHALFIE(thebits : TBits_1); inline;
  20387. procedure setRXHALFIF(thebits : TBits_1); inline;
  20388. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20389. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20390. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20391. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20392. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20393. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20394. procedure setTXHALFIE(thebits : TBits_1); inline;
  20395. procedure setTXHALFIF(thebits : TBits_1); inline;
  20396. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20397. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20398. procedure setw(thebits : TBits_32); inline;
  20399. public
  20400. procedure clearRXFULLIE; inline;
  20401. procedure clearRXFULLIF; inline;
  20402. procedure clearRXHALFIE; inline;
  20403. procedure clearRXHALFIF; inline;
  20404. procedure clearRXNEMPTYIE; inline;
  20405. procedure clearRXNEMPTYIF; inline;
  20406. procedure clearRXOVFLIE; inline;
  20407. procedure clearRXOVFLIF; inline;
  20408. procedure clearTXEMPTYIE; inline;
  20409. procedure clearTXEMPTYIF; inline;
  20410. procedure clearTXHALFIE; inline;
  20411. procedure clearTXHALFIF; inline;
  20412. procedure clearTXNFULLIE; inline;
  20413. procedure clearTXNFULLIF; inline;
  20414. procedure setRXFULLIE; inline;
  20415. procedure setRXFULLIF; inline;
  20416. procedure setRXHALFIE; inline;
  20417. procedure setRXHALFIF; inline;
  20418. procedure setRXNEMPTYIE; inline;
  20419. procedure setRXNEMPTYIF; inline;
  20420. procedure setRXOVFLIE; inline;
  20421. procedure setRXOVFLIF; inline;
  20422. procedure setTXEMPTYIE; inline;
  20423. procedure setTXEMPTYIF; inline;
  20424. procedure setTXHALFIE; inline;
  20425. procedure setTXHALFIF; inline;
  20426. procedure setTXNFULLIE; inline;
  20427. procedure setTXNFULLIF; inline;
  20428. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20429. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20430. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20431. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20432. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20433. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20434. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20435. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20436. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20437. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20438. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20439. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20440. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20441. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20442. property w : TBits_32 read getw write setw;
  20443. end;
  20444. TCAN1_C1FIFOCI13 = record
  20445. private
  20446. function getCFIFOCI : TBits_5; inline;
  20447. function getw : TBits_32; inline;
  20448. procedure setCFIFOCI(thebits : TBits_5); inline;
  20449. procedure setw(thebits : TBits_32); inline;
  20450. public
  20451. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20452. property w : TBits_32 read getw write setw;
  20453. end;
  20454. TCAN1_C1FIFOCON14 = record
  20455. private
  20456. function getDONLY : TBits_1; inline;
  20457. function getFRESET : TBits_1; inline;
  20458. function getFSIZE : TBits_5; inline;
  20459. function getRTREN : TBits_1; inline;
  20460. function getTXABAT : TBits_1; inline;
  20461. function getTXEN : TBits_1; inline;
  20462. function getTXERR : TBits_1; inline;
  20463. function getTXLARB : TBits_1; inline;
  20464. function getTXPRI : TBits_2; inline;
  20465. function getTXREQ : TBits_1; inline;
  20466. function getUINC : TBits_1; inline;
  20467. function getw : TBits_32; inline;
  20468. procedure setDONLY(thebits : TBits_1); inline;
  20469. procedure setFRESET(thebits : TBits_1); inline;
  20470. procedure setFSIZE(thebits : TBits_5); inline;
  20471. procedure setRTREN(thebits : TBits_1); inline;
  20472. procedure setTXABAT(thebits : TBits_1); inline;
  20473. procedure setTXEN(thebits : TBits_1); inline;
  20474. procedure setTXERR(thebits : TBits_1); inline;
  20475. procedure setTXLARB(thebits : TBits_1); inline;
  20476. procedure setTXPRI(thebits : TBits_2); inline;
  20477. procedure setTXREQ(thebits : TBits_1); inline;
  20478. procedure setUINC(thebits : TBits_1); inline;
  20479. procedure setw(thebits : TBits_32); inline;
  20480. public
  20481. procedure clearDONLY; inline;
  20482. procedure clearFRESET; inline;
  20483. procedure clearRTREN; inline;
  20484. procedure clearTXABAT; inline;
  20485. procedure clearTXEN; inline;
  20486. procedure clearTXERR; inline;
  20487. procedure clearTXLARB; inline;
  20488. procedure clearTXREQ; inline;
  20489. procedure clearUINC; inline;
  20490. procedure setDONLY; inline;
  20491. procedure setFRESET; inline;
  20492. procedure setRTREN; inline;
  20493. procedure setTXABAT; inline;
  20494. procedure setTXEN; inline;
  20495. procedure setTXERR; inline;
  20496. procedure setTXLARB; inline;
  20497. procedure setTXREQ; inline;
  20498. procedure setUINC; inline;
  20499. property DONLY : TBits_1 read getDONLY write setDONLY;
  20500. property FRESET : TBits_1 read getFRESET write setFRESET;
  20501. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20502. property RTREN : TBits_1 read getRTREN write setRTREN;
  20503. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20504. property TXEN : TBits_1 read getTXEN write setTXEN;
  20505. property TXERR : TBits_1 read getTXERR write setTXERR;
  20506. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20507. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20508. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20509. property UINC : TBits_1 read getUINC write setUINC;
  20510. property w : TBits_32 read getw write setw;
  20511. end;
  20512. TCAN1_C1FIFOINT14 = record
  20513. private
  20514. function getRXFULLIE : TBits_1; inline;
  20515. function getRXFULLIF : TBits_1; inline;
  20516. function getRXHALFIE : TBits_1; inline;
  20517. function getRXHALFIF : TBits_1; inline;
  20518. function getRXNEMPTYIE : TBits_1; inline;
  20519. function getRXNEMPTYIF : TBits_1; inline;
  20520. function getRXOVFLIE : TBits_1; inline;
  20521. function getRXOVFLIF : TBits_1; inline;
  20522. function getTXEMPTYIE : TBits_1; inline;
  20523. function getTXEMPTYIF : TBits_1; inline;
  20524. function getTXHALFIE : TBits_1; inline;
  20525. function getTXHALFIF : TBits_1; inline;
  20526. function getTXNFULLIE : TBits_1; inline;
  20527. function getTXNFULLIF : TBits_1; inline;
  20528. function getw : TBits_32; inline;
  20529. procedure setRXFULLIE(thebits : TBits_1); inline;
  20530. procedure setRXFULLIF(thebits : TBits_1); inline;
  20531. procedure setRXHALFIE(thebits : TBits_1); inline;
  20532. procedure setRXHALFIF(thebits : TBits_1); inline;
  20533. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20534. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20535. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20536. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20537. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20538. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20539. procedure setTXHALFIE(thebits : TBits_1); inline;
  20540. procedure setTXHALFIF(thebits : TBits_1); inline;
  20541. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20542. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20543. procedure setw(thebits : TBits_32); inline;
  20544. public
  20545. procedure clearRXFULLIE; inline;
  20546. procedure clearRXFULLIF; inline;
  20547. procedure clearRXHALFIE; inline;
  20548. procedure clearRXHALFIF; inline;
  20549. procedure clearRXNEMPTYIE; inline;
  20550. procedure clearRXNEMPTYIF; inline;
  20551. procedure clearRXOVFLIE; inline;
  20552. procedure clearRXOVFLIF; inline;
  20553. procedure clearTXEMPTYIE; inline;
  20554. procedure clearTXEMPTYIF; inline;
  20555. procedure clearTXHALFIE; inline;
  20556. procedure clearTXHALFIF; inline;
  20557. procedure clearTXNFULLIE; inline;
  20558. procedure clearTXNFULLIF; inline;
  20559. procedure setRXFULLIE; inline;
  20560. procedure setRXFULLIF; inline;
  20561. procedure setRXHALFIE; inline;
  20562. procedure setRXHALFIF; inline;
  20563. procedure setRXNEMPTYIE; inline;
  20564. procedure setRXNEMPTYIF; inline;
  20565. procedure setRXOVFLIE; inline;
  20566. procedure setRXOVFLIF; inline;
  20567. procedure setTXEMPTYIE; inline;
  20568. procedure setTXEMPTYIF; inline;
  20569. procedure setTXHALFIE; inline;
  20570. procedure setTXHALFIF; inline;
  20571. procedure setTXNFULLIE; inline;
  20572. procedure setTXNFULLIF; inline;
  20573. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20574. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20575. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20576. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20577. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20578. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20579. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20580. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20581. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20582. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20583. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20584. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20585. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20586. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20587. property w : TBits_32 read getw write setw;
  20588. end;
  20589. TCAN1_C1FIFOCI14 = record
  20590. private
  20591. function getCFIFOCI : TBits_5; inline;
  20592. function getw : TBits_32; inline;
  20593. procedure setCFIFOCI(thebits : TBits_5); inline;
  20594. procedure setw(thebits : TBits_32); inline;
  20595. public
  20596. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20597. property w : TBits_32 read getw write setw;
  20598. end;
  20599. TCAN1_C1FIFOCON15 = record
  20600. private
  20601. function getDONLY : TBits_1; inline;
  20602. function getFRESET : TBits_1; inline;
  20603. function getFSIZE : TBits_5; inline;
  20604. function getRTREN : TBits_1; inline;
  20605. function getTXABAT : TBits_1; inline;
  20606. function getTXEN : TBits_1; inline;
  20607. function getTXERR : TBits_1; inline;
  20608. function getTXLARB : TBits_1; inline;
  20609. function getTXPRI : TBits_2; inline;
  20610. function getTXREQ : TBits_1; inline;
  20611. function getUINC : TBits_1; inline;
  20612. function getw : TBits_32; inline;
  20613. procedure setDONLY(thebits : TBits_1); inline;
  20614. procedure setFRESET(thebits : TBits_1); inline;
  20615. procedure setFSIZE(thebits : TBits_5); inline;
  20616. procedure setRTREN(thebits : TBits_1); inline;
  20617. procedure setTXABAT(thebits : TBits_1); inline;
  20618. procedure setTXEN(thebits : TBits_1); inline;
  20619. procedure setTXERR(thebits : TBits_1); inline;
  20620. procedure setTXLARB(thebits : TBits_1); inline;
  20621. procedure setTXPRI(thebits : TBits_2); inline;
  20622. procedure setTXREQ(thebits : TBits_1); inline;
  20623. procedure setUINC(thebits : TBits_1); inline;
  20624. procedure setw(thebits : TBits_32); inline;
  20625. public
  20626. procedure clearDONLY; inline;
  20627. procedure clearFRESET; inline;
  20628. procedure clearRTREN; inline;
  20629. procedure clearTXABAT; inline;
  20630. procedure clearTXEN; inline;
  20631. procedure clearTXERR; inline;
  20632. procedure clearTXLARB; inline;
  20633. procedure clearTXREQ; inline;
  20634. procedure clearUINC; inline;
  20635. procedure setDONLY; inline;
  20636. procedure setFRESET; inline;
  20637. procedure setRTREN; inline;
  20638. procedure setTXABAT; inline;
  20639. procedure setTXEN; inline;
  20640. procedure setTXERR; inline;
  20641. procedure setTXLARB; inline;
  20642. procedure setTXREQ; inline;
  20643. procedure setUINC; inline;
  20644. property DONLY : TBits_1 read getDONLY write setDONLY;
  20645. property FRESET : TBits_1 read getFRESET write setFRESET;
  20646. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20647. property RTREN : TBits_1 read getRTREN write setRTREN;
  20648. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20649. property TXEN : TBits_1 read getTXEN write setTXEN;
  20650. property TXERR : TBits_1 read getTXERR write setTXERR;
  20651. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20652. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20653. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20654. property UINC : TBits_1 read getUINC write setUINC;
  20655. property w : TBits_32 read getw write setw;
  20656. end;
  20657. TCAN1_C1FIFOINT15 = record
  20658. private
  20659. function getRXFULLIE : TBits_1; inline;
  20660. function getRXFULLIF : TBits_1; inline;
  20661. function getRXHALFIE : TBits_1; inline;
  20662. function getRXHALFIF : TBits_1; inline;
  20663. function getRXNEMPTYIE : TBits_1; inline;
  20664. function getRXNEMPTYIF : TBits_1; inline;
  20665. function getRXOVFLIE : TBits_1; inline;
  20666. function getRXOVFLIF : TBits_1; inline;
  20667. function getTXEMPTYIE : TBits_1; inline;
  20668. function getTXEMPTYIF : TBits_1; inline;
  20669. function getTXHALFIE : TBits_1; inline;
  20670. function getTXHALFIF : TBits_1; inline;
  20671. function getTXNFULLIE : TBits_1; inline;
  20672. function getTXNFULLIF : TBits_1; inline;
  20673. function getw : TBits_32; inline;
  20674. procedure setRXFULLIE(thebits : TBits_1); inline;
  20675. procedure setRXFULLIF(thebits : TBits_1); inline;
  20676. procedure setRXHALFIE(thebits : TBits_1); inline;
  20677. procedure setRXHALFIF(thebits : TBits_1); inline;
  20678. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20679. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20680. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20681. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20682. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20683. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20684. procedure setTXHALFIE(thebits : TBits_1); inline;
  20685. procedure setTXHALFIF(thebits : TBits_1); inline;
  20686. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20687. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20688. procedure setw(thebits : TBits_32); inline;
  20689. public
  20690. procedure clearRXFULLIE; inline;
  20691. procedure clearRXFULLIF; inline;
  20692. procedure clearRXHALFIE; inline;
  20693. procedure clearRXHALFIF; inline;
  20694. procedure clearRXNEMPTYIE; inline;
  20695. procedure clearRXNEMPTYIF; inline;
  20696. procedure clearRXOVFLIE; inline;
  20697. procedure clearRXOVFLIF; inline;
  20698. procedure clearTXEMPTYIE; inline;
  20699. procedure clearTXEMPTYIF; inline;
  20700. procedure clearTXHALFIE; inline;
  20701. procedure clearTXHALFIF; inline;
  20702. procedure clearTXNFULLIE; inline;
  20703. procedure clearTXNFULLIF; inline;
  20704. procedure setRXFULLIE; inline;
  20705. procedure setRXFULLIF; inline;
  20706. procedure setRXHALFIE; inline;
  20707. procedure setRXHALFIF; inline;
  20708. procedure setRXNEMPTYIE; inline;
  20709. procedure setRXNEMPTYIF; inline;
  20710. procedure setRXOVFLIE; inline;
  20711. procedure setRXOVFLIF; inline;
  20712. procedure setTXEMPTYIE; inline;
  20713. procedure setTXEMPTYIF; inline;
  20714. procedure setTXHALFIE; inline;
  20715. procedure setTXHALFIF; inline;
  20716. procedure setTXNFULLIE; inline;
  20717. procedure setTXNFULLIF; inline;
  20718. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20719. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20720. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20721. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20722. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20723. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20724. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20725. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20726. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20727. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20728. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20729. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20730. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20731. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20732. property w : TBits_32 read getw write setw;
  20733. end;
  20734. TCAN1_C1FIFOCI15 = record
  20735. private
  20736. function getCFIFOCI : TBits_5; inline;
  20737. function getw : TBits_32; inline;
  20738. procedure setCFIFOCI(thebits : TBits_5); inline;
  20739. procedure setw(thebits : TBits_32); inline;
  20740. public
  20741. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20742. property w : TBits_32 read getw write setw;
  20743. end;
  20744. TCAN1_C1FIFOCON16 = record
  20745. private
  20746. function getDONLY : TBits_1; inline;
  20747. function getFRESET : TBits_1; inline;
  20748. function getFSIZE : TBits_5; inline;
  20749. function getRTREN : TBits_1; inline;
  20750. function getTXABAT : TBits_1; inline;
  20751. function getTXEN : TBits_1; inline;
  20752. function getTXERR : TBits_1; inline;
  20753. function getTXLARB : TBits_1; inline;
  20754. function getTXPRI : TBits_2; inline;
  20755. function getTXREQ : TBits_1; inline;
  20756. function getUINC : TBits_1; inline;
  20757. function getw : TBits_32; inline;
  20758. procedure setDONLY(thebits : TBits_1); inline;
  20759. procedure setFRESET(thebits : TBits_1); inline;
  20760. procedure setFSIZE(thebits : TBits_5); inline;
  20761. procedure setRTREN(thebits : TBits_1); inline;
  20762. procedure setTXABAT(thebits : TBits_1); inline;
  20763. procedure setTXEN(thebits : TBits_1); inline;
  20764. procedure setTXERR(thebits : TBits_1); inline;
  20765. procedure setTXLARB(thebits : TBits_1); inline;
  20766. procedure setTXPRI(thebits : TBits_2); inline;
  20767. procedure setTXREQ(thebits : TBits_1); inline;
  20768. procedure setUINC(thebits : TBits_1); inline;
  20769. procedure setw(thebits : TBits_32); inline;
  20770. public
  20771. procedure clearDONLY; inline;
  20772. procedure clearFRESET; inline;
  20773. procedure clearRTREN; inline;
  20774. procedure clearTXABAT; inline;
  20775. procedure clearTXEN; inline;
  20776. procedure clearTXERR; inline;
  20777. procedure clearTXLARB; inline;
  20778. procedure clearTXREQ; inline;
  20779. procedure clearUINC; inline;
  20780. procedure setDONLY; inline;
  20781. procedure setFRESET; inline;
  20782. procedure setRTREN; inline;
  20783. procedure setTXABAT; inline;
  20784. procedure setTXEN; inline;
  20785. procedure setTXERR; inline;
  20786. procedure setTXLARB; inline;
  20787. procedure setTXREQ; inline;
  20788. procedure setUINC; inline;
  20789. property DONLY : TBits_1 read getDONLY write setDONLY;
  20790. property FRESET : TBits_1 read getFRESET write setFRESET;
  20791. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20792. property RTREN : TBits_1 read getRTREN write setRTREN;
  20793. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20794. property TXEN : TBits_1 read getTXEN write setTXEN;
  20795. property TXERR : TBits_1 read getTXERR write setTXERR;
  20796. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20797. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20798. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20799. property UINC : TBits_1 read getUINC write setUINC;
  20800. property w : TBits_32 read getw write setw;
  20801. end;
  20802. TCAN1_C1FIFOINT16 = record
  20803. private
  20804. function getRXFULLIE : TBits_1; inline;
  20805. function getRXFULLIF : TBits_1; inline;
  20806. function getRXHALFIE : TBits_1; inline;
  20807. function getRXHALFIF : TBits_1; inline;
  20808. function getRXNEMPTYIE : TBits_1; inline;
  20809. function getRXNEMPTYIF : TBits_1; inline;
  20810. function getRXOVFLIE : TBits_1; inline;
  20811. function getRXOVFLIF : TBits_1; inline;
  20812. function getTXEMPTYIE : TBits_1; inline;
  20813. function getTXEMPTYIF : TBits_1; inline;
  20814. function getTXHALFIE : TBits_1; inline;
  20815. function getTXHALFIF : TBits_1; inline;
  20816. function getTXNFULLIE : TBits_1; inline;
  20817. function getTXNFULLIF : TBits_1; inline;
  20818. function getw : TBits_32; inline;
  20819. procedure setRXFULLIE(thebits : TBits_1); inline;
  20820. procedure setRXFULLIF(thebits : TBits_1); inline;
  20821. procedure setRXHALFIE(thebits : TBits_1); inline;
  20822. procedure setRXHALFIF(thebits : TBits_1); inline;
  20823. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20824. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20825. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20826. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20827. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20828. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20829. procedure setTXHALFIE(thebits : TBits_1); inline;
  20830. procedure setTXHALFIF(thebits : TBits_1); inline;
  20831. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20832. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20833. procedure setw(thebits : TBits_32); inline;
  20834. public
  20835. procedure clearRXFULLIE; inline;
  20836. procedure clearRXFULLIF; inline;
  20837. procedure clearRXHALFIE; inline;
  20838. procedure clearRXHALFIF; inline;
  20839. procedure clearRXNEMPTYIE; inline;
  20840. procedure clearRXNEMPTYIF; inline;
  20841. procedure clearRXOVFLIE; inline;
  20842. procedure clearRXOVFLIF; inline;
  20843. procedure clearTXEMPTYIE; inline;
  20844. procedure clearTXEMPTYIF; inline;
  20845. procedure clearTXHALFIE; inline;
  20846. procedure clearTXHALFIF; inline;
  20847. procedure clearTXNFULLIE; inline;
  20848. procedure clearTXNFULLIF; inline;
  20849. procedure setRXFULLIE; inline;
  20850. procedure setRXFULLIF; inline;
  20851. procedure setRXHALFIE; inline;
  20852. procedure setRXHALFIF; inline;
  20853. procedure setRXNEMPTYIE; inline;
  20854. procedure setRXNEMPTYIF; inline;
  20855. procedure setRXOVFLIE; inline;
  20856. procedure setRXOVFLIF; inline;
  20857. procedure setTXEMPTYIE; inline;
  20858. procedure setTXEMPTYIF; inline;
  20859. procedure setTXHALFIE; inline;
  20860. procedure setTXHALFIF; inline;
  20861. procedure setTXNFULLIE; inline;
  20862. procedure setTXNFULLIF; inline;
  20863. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20864. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20865. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20866. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20867. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20868. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20869. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20870. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20871. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20872. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20873. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20874. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20875. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20876. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20877. property w : TBits_32 read getw write setw;
  20878. end;
  20879. TCAN1_C1FIFOCI16 = record
  20880. private
  20881. function getCFIFOCI : TBits_5; inline;
  20882. function getw : TBits_32; inline;
  20883. procedure setCFIFOCI(thebits : TBits_5); inline;
  20884. procedure setw(thebits : TBits_32); inline;
  20885. public
  20886. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20887. property w : TBits_32 read getw write setw;
  20888. end;
  20889. TCAN1_C1FIFOCON17 = record
  20890. private
  20891. function getDONLY : TBits_1; inline;
  20892. function getFRESET : TBits_1; inline;
  20893. function getFSIZE : TBits_5; inline;
  20894. function getRTREN : TBits_1; inline;
  20895. function getTXABAT : TBits_1; inline;
  20896. function getTXEN : TBits_1; inline;
  20897. function getTXERR : TBits_1; inline;
  20898. function getTXLARB : TBits_1; inline;
  20899. function getTXPRI : TBits_2; inline;
  20900. function getTXREQ : TBits_1; inline;
  20901. function getUINC : TBits_1; inline;
  20902. function getw : TBits_32; inline;
  20903. procedure setDONLY(thebits : TBits_1); inline;
  20904. procedure setFRESET(thebits : TBits_1); inline;
  20905. procedure setFSIZE(thebits : TBits_5); inline;
  20906. procedure setRTREN(thebits : TBits_1); inline;
  20907. procedure setTXABAT(thebits : TBits_1); inline;
  20908. procedure setTXEN(thebits : TBits_1); inline;
  20909. procedure setTXERR(thebits : TBits_1); inline;
  20910. procedure setTXLARB(thebits : TBits_1); inline;
  20911. procedure setTXPRI(thebits : TBits_2); inline;
  20912. procedure setTXREQ(thebits : TBits_1); inline;
  20913. procedure setUINC(thebits : TBits_1); inline;
  20914. procedure setw(thebits : TBits_32); inline;
  20915. public
  20916. procedure clearDONLY; inline;
  20917. procedure clearFRESET; inline;
  20918. procedure clearRTREN; inline;
  20919. procedure clearTXABAT; inline;
  20920. procedure clearTXEN; inline;
  20921. procedure clearTXERR; inline;
  20922. procedure clearTXLARB; inline;
  20923. procedure clearTXREQ; inline;
  20924. procedure clearUINC; inline;
  20925. procedure setDONLY; inline;
  20926. procedure setFRESET; inline;
  20927. procedure setRTREN; inline;
  20928. procedure setTXABAT; inline;
  20929. procedure setTXEN; inline;
  20930. procedure setTXERR; inline;
  20931. procedure setTXLARB; inline;
  20932. procedure setTXREQ; inline;
  20933. procedure setUINC; inline;
  20934. property DONLY : TBits_1 read getDONLY write setDONLY;
  20935. property FRESET : TBits_1 read getFRESET write setFRESET;
  20936. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20937. property RTREN : TBits_1 read getRTREN write setRTREN;
  20938. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20939. property TXEN : TBits_1 read getTXEN write setTXEN;
  20940. property TXERR : TBits_1 read getTXERR write setTXERR;
  20941. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20942. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20943. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20944. property UINC : TBits_1 read getUINC write setUINC;
  20945. property w : TBits_32 read getw write setw;
  20946. end;
  20947. TCAN1_C1FIFOINT17 = record
  20948. private
  20949. function getRXFULLIE : TBits_1; inline;
  20950. function getRXFULLIF : TBits_1; inline;
  20951. function getRXHALFIE : TBits_1; inline;
  20952. function getRXHALFIF : TBits_1; inline;
  20953. function getRXNEMPTYIE : TBits_1; inline;
  20954. function getRXNEMPTYIF : TBits_1; inline;
  20955. function getRXOVFLIE : TBits_1; inline;
  20956. function getRXOVFLIF : TBits_1; inline;
  20957. function getTXEMPTYIE : TBits_1; inline;
  20958. function getTXEMPTYIF : TBits_1; inline;
  20959. function getTXHALFIE : TBits_1; inline;
  20960. function getTXHALFIF : TBits_1; inline;
  20961. function getTXNFULLIE : TBits_1; inline;
  20962. function getTXNFULLIF : TBits_1; inline;
  20963. function getw : TBits_32; inline;
  20964. procedure setRXFULLIE(thebits : TBits_1); inline;
  20965. procedure setRXFULLIF(thebits : TBits_1); inline;
  20966. procedure setRXHALFIE(thebits : TBits_1); inline;
  20967. procedure setRXHALFIF(thebits : TBits_1); inline;
  20968. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20969. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20970. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20971. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20972. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20973. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20974. procedure setTXHALFIE(thebits : TBits_1); inline;
  20975. procedure setTXHALFIF(thebits : TBits_1); inline;
  20976. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20977. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20978. procedure setw(thebits : TBits_32); inline;
  20979. public
  20980. procedure clearRXFULLIE; inline;
  20981. procedure clearRXFULLIF; inline;
  20982. procedure clearRXHALFIE; inline;
  20983. procedure clearRXHALFIF; inline;
  20984. procedure clearRXNEMPTYIE; inline;
  20985. procedure clearRXNEMPTYIF; inline;
  20986. procedure clearRXOVFLIE; inline;
  20987. procedure clearRXOVFLIF; inline;
  20988. procedure clearTXEMPTYIE; inline;
  20989. procedure clearTXEMPTYIF; inline;
  20990. procedure clearTXHALFIE; inline;
  20991. procedure clearTXHALFIF; inline;
  20992. procedure clearTXNFULLIE; inline;
  20993. procedure clearTXNFULLIF; inline;
  20994. procedure setRXFULLIE; inline;
  20995. procedure setRXFULLIF; inline;
  20996. procedure setRXHALFIE; inline;
  20997. procedure setRXHALFIF; inline;
  20998. procedure setRXNEMPTYIE; inline;
  20999. procedure setRXNEMPTYIF; inline;
  21000. procedure setRXOVFLIE; inline;
  21001. procedure setRXOVFLIF; inline;
  21002. procedure setTXEMPTYIE; inline;
  21003. procedure setTXEMPTYIF; inline;
  21004. procedure setTXHALFIE; inline;
  21005. procedure setTXHALFIF; inline;
  21006. procedure setTXNFULLIE; inline;
  21007. procedure setTXNFULLIF; inline;
  21008. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21009. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21010. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21011. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21012. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21013. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21014. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21015. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21016. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21017. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21018. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21019. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21020. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21021. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21022. property w : TBits_32 read getw write setw;
  21023. end;
  21024. TCAN1_C1FIFOCI17 = record
  21025. private
  21026. function getCFIFOCI : TBits_5; inline;
  21027. function getw : TBits_32; inline;
  21028. procedure setCFIFOCI(thebits : TBits_5); inline;
  21029. procedure setw(thebits : TBits_32); inline;
  21030. public
  21031. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21032. property w : TBits_32 read getw write setw;
  21033. end;
  21034. TCAN1_C1FIFOCON18 = record
  21035. private
  21036. function getDONLY : TBits_1; inline;
  21037. function getFRESET : TBits_1; inline;
  21038. function getFSIZE : TBits_5; inline;
  21039. function getRTREN : TBits_1; inline;
  21040. function getTXABAT : TBits_1; inline;
  21041. function getTXEN : TBits_1; inline;
  21042. function getTXERR : TBits_1; inline;
  21043. function getTXLARB : TBits_1; inline;
  21044. function getTXPRI : TBits_2; inline;
  21045. function getTXREQ : TBits_1; inline;
  21046. function getUINC : TBits_1; inline;
  21047. function getw : TBits_32; inline;
  21048. procedure setDONLY(thebits : TBits_1); inline;
  21049. procedure setFRESET(thebits : TBits_1); inline;
  21050. procedure setFSIZE(thebits : TBits_5); inline;
  21051. procedure setRTREN(thebits : TBits_1); inline;
  21052. procedure setTXABAT(thebits : TBits_1); inline;
  21053. procedure setTXEN(thebits : TBits_1); inline;
  21054. procedure setTXERR(thebits : TBits_1); inline;
  21055. procedure setTXLARB(thebits : TBits_1); inline;
  21056. procedure setTXPRI(thebits : TBits_2); inline;
  21057. procedure setTXREQ(thebits : TBits_1); inline;
  21058. procedure setUINC(thebits : TBits_1); inline;
  21059. procedure setw(thebits : TBits_32); inline;
  21060. public
  21061. procedure clearDONLY; inline;
  21062. procedure clearFRESET; inline;
  21063. procedure clearRTREN; inline;
  21064. procedure clearTXABAT; inline;
  21065. procedure clearTXEN; inline;
  21066. procedure clearTXERR; inline;
  21067. procedure clearTXLARB; inline;
  21068. procedure clearTXREQ; inline;
  21069. procedure clearUINC; inline;
  21070. procedure setDONLY; inline;
  21071. procedure setFRESET; inline;
  21072. procedure setRTREN; inline;
  21073. procedure setTXABAT; inline;
  21074. procedure setTXEN; inline;
  21075. procedure setTXERR; inline;
  21076. procedure setTXLARB; inline;
  21077. procedure setTXREQ; inline;
  21078. procedure setUINC; inline;
  21079. property DONLY : TBits_1 read getDONLY write setDONLY;
  21080. property FRESET : TBits_1 read getFRESET write setFRESET;
  21081. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21082. property RTREN : TBits_1 read getRTREN write setRTREN;
  21083. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21084. property TXEN : TBits_1 read getTXEN write setTXEN;
  21085. property TXERR : TBits_1 read getTXERR write setTXERR;
  21086. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21087. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21088. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21089. property UINC : TBits_1 read getUINC write setUINC;
  21090. property w : TBits_32 read getw write setw;
  21091. end;
  21092. TCAN1_C1FIFOINT18 = record
  21093. private
  21094. function getRXFULLIE : TBits_1; inline;
  21095. function getRXFULLIF : TBits_1; inline;
  21096. function getRXHALFIE : TBits_1; inline;
  21097. function getRXHALFIF : TBits_1; inline;
  21098. function getRXNEMPTYIE : TBits_1; inline;
  21099. function getRXNEMPTYIF : TBits_1; inline;
  21100. function getRXOVFLIE : TBits_1; inline;
  21101. function getRXOVFLIF : TBits_1; inline;
  21102. function getTXEMPTYIE : TBits_1; inline;
  21103. function getTXEMPTYIF : TBits_1; inline;
  21104. function getTXHALFIE : TBits_1; inline;
  21105. function getTXHALFIF : TBits_1; inline;
  21106. function getTXNFULLIE : TBits_1; inline;
  21107. function getTXNFULLIF : TBits_1; inline;
  21108. function getw : TBits_32; inline;
  21109. procedure setRXFULLIE(thebits : TBits_1); inline;
  21110. procedure setRXFULLIF(thebits : TBits_1); inline;
  21111. procedure setRXHALFIE(thebits : TBits_1); inline;
  21112. procedure setRXHALFIF(thebits : TBits_1); inline;
  21113. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21114. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21115. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21116. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21117. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21118. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21119. procedure setTXHALFIE(thebits : TBits_1); inline;
  21120. procedure setTXHALFIF(thebits : TBits_1); inline;
  21121. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21122. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21123. procedure setw(thebits : TBits_32); inline;
  21124. public
  21125. procedure clearRXFULLIE; inline;
  21126. procedure clearRXFULLIF; inline;
  21127. procedure clearRXHALFIE; inline;
  21128. procedure clearRXHALFIF; inline;
  21129. procedure clearRXNEMPTYIE; inline;
  21130. procedure clearRXNEMPTYIF; inline;
  21131. procedure clearRXOVFLIE; inline;
  21132. procedure clearRXOVFLIF; inline;
  21133. procedure clearTXEMPTYIE; inline;
  21134. procedure clearTXEMPTYIF; inline;
  21135. procedure clearTXHALFIE; inline;
  21136. procedure clearTXHALFIF; inline;
  21137. procedure clearTXNFULLIE; inline;
  21138. procedure clearTXNFULLIF; inline;
  21139. procedure setRXFULLIE; inline;
  21140. procedure setRXFULLIF; inline;
  21141. procedure setRXHALFIE; inline;
  21142. procedure setRXHALFIF; inline;
  21143. procedure setRXNEMPTYIE; inline;
  21144. procedure setRXNEMPTYIF; inline;
  21145. procedure setRXOVFLIE; inline;
  21146. procedure setRXOVFLIF; inline;
  21147. procedure setTXEMPTYIE; inline;
  21148. procedure setTXEMPTYIF; inline;
  21149. procedure setTXHALFIE; inline;
  21150. procedure setTXHALFIF; inline;
  21151. procedure setTXNFULLIE; inline;
  21152. procedure setTXNFULLIF; inline;
  21153. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21154. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21155. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21156. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21157. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21158. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21159. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21160. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21161. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21162. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21163. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21164. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21165. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21166. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21167. property w : TBits_32 read getw write setw;
  21168. end;
  21169. TCAN1_C1FIFOCI18 = record
  21170. private
  21171. function getCFIFOCI : TBits_5; inline;
  21172. function getw : TBits_32; inline;
  21173. procedure setCFIFOCI(thebits : TBits_5); inline;
  21174. procedure setw(thebits : TBits_32); inline;
  21175. public
  21176. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21177. property w : TBits_32 read getw write setw;
  21178. end;
  21179. TCAN1_C1FIFOCON19 = record
  21180. private
  21181. function getDONLY : TBits_1; inline;
  21182. function getFRESET : TBits_1; inline;
  21183. function getFSIZE : TBits_5; inline;
  21184. function getRTREN : TBits_1; inline;
  21185. function getTXABAT : TBits_1; inline;
  21186. function getTXEN : TBits_1; inline;
  21187. function getTXERR : TBits_1; inline;
  21188. function getTXLARB : TBits_1; inline;
  21189. function getTXPRI : TBits_2; inline;
  21190. function getTXREQ : TBits_1; inline;
  21191. function getUINC : TBits_1; inline;
  21192. function getw : TBits_32; inline;
  21193. procedure setDONLY(thebits : TBits_1); inline;
  21194. procedure setFRESET(thebits : TBits_1); inline;
  21195. procedure setFSIZE(thebits : TBits_5); inline;
  21196. procedure setRTREN(thebits : TBits_1); inline;
  21197. procedure setTXABAT(thebits : TBits_1); inline;
  21198. procedure setTXEN(thebits : TBits_1); inline;
  21199. procedure setTXERR(thebits : TBits_1); inline;
  21200. procedure setTXLARB(thebits : TBits_1); inline;
  21201. procedure setTXPRI(thebits : TBits_2); inline;
  21202. procedure setTXREQ(thebits : TBits_1); inline;
  21203. procedure setUINC(thebits : TBits_1); inline;
  21204. procedure setw(thebits : TBits_32); inline;
  21205. public
  21206. procedure clearDONLY; inline;
  21207. procedure clearFRESET; inline;
  21208. procedure clearRTREN; inline;
  21209. procedure clearTXABAT; inline;
  21210. procedure clearTXEN; inline;
  21211. procedure clearTXERR; inline;
  21212. procedure clearTXLARB; inline;
  21213. procedure clearTXREQ; inline;
  21214. procedure clearUINC; inline;
  21215. procedure setDONLY; inline;
  21216. procedure setFRESET; inline;
  21217. procedure setRTREN; inline;
  21218. procedure setTXABAT; inline;
  21219. procedure setTXEN; inline;
  21220. procedure setTXERR; inline;
  21221. procedure setTXLARB; inline;
  21222. procedure setTXREQ; inline;
  21223. procedure setUINC; inline;
  21224. property DONLY : TBits_1 read getDONLY write setDONLY;
  21225. property FRESET : TBits_1 read getFRESET write setFRESET;
  21226. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21227. property RTREN : TBits_1 read getRTREN write setRTREN;
  21228. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21229. property TXEN : TBits_1 read getTXEN write setTXEN;
  21230. property TXERR : TBits_1 read getTXERR write setTXERR;
  21231. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21232. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21233. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21234. property UINC : TBits_1 read getUINC write setUINC;
  21235. property w : TBits_32 read getw write setw;
  21236. end;
  21237. TCAN1_C1FIFOINT19 = record
  21238. private
  21239. function getRXFULLIE : TBits_1; inline;
  21240. function getRXFULLIF : TBits_1; inline;
  21241. function getRXHALFIE : TBits_1; inline;
  21242. function getRXHALFIF : TBits_1; inline;
  21243. function getRXNEMPTYIE : TBits_1; inline;
  21244. function getRXNEMPTYIF : TBits_1; inline;
  21245. function getRXOVFLIE : TBits_1; inline;
  21246. function getRXOVFLIF : TBits_1; inline;
  21247. function getTXEMPTYIE : TBits_1; inline;
  21248. function getTXEMPTYIF : TBits_1; inline;
  21249. function getTXHALFIE : TBits_1; inline;
  21250. function getTXHALFIF : TBits_1; inline;
  21251. function getTXNFULLIE : TBits_1; inline;
  21252. function getTXNFULLIF : TBits_1; inline;
  21253. function getw : TBits_32; inline;
  21254. procedure setRXFULLIE(thebits : TBits_1); inline;
  21255. procedure setRXFULLIF(thebits : TBits_1); inline;
  21256. procedure setRXHALFIE(thebits : TBits_1); inline;
  21257. procedure setRXHALFIF(thebits : TBits_1); inline;
  21258. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21259. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21260. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21261. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21262. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21263. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21264. procedure setTXHALFIE(thebits : TBits_1); inline;
  21265. procedure setTXHALFIF(thebits : TBits_1); inline;
  21266. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21267. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21268. procedure setw(thebits : TBits_32); inline;
  21269. public
  21270. procedure clearRXFULLIE; inline;
  21271. procedure clearRXFULLIF; inline;
  21272. procedure clearRXHALFIE; inline;
  21273. procedure clearRXHALFIF; inline;
  21274. procedure clearRXNEMPTYIE; inline;
  21275. procedure clearRXNEMPTYIF; inline;
  21276. procedure clearRXOVFLIE; inline;
  21277. procedure clearRXOVFLIF; inline;
  21278. procedure clearTXEMPTYIE; inline;
  21279. procedure clearTXEMPTYIF; inline;
  21280. procedure clearTXHALFIE; inline;
  21281. procedure clearTXHALFIF; inline;
  21282. procedure clearTXNFULLIE; inline;
  21283. procedure clearTXNFULLIF; inline;
  21284. procedure setRXFULLIE; inline;
  21285. procedure setRXFULLIF; inline;
  21286. procedure setRXHALFIE; inline;
  21287. procedure setRXHALFIF; inline;
  21288. procedure setRXNEMPTYIE; inline;
  21289. procedure setRXNEMPTYIF; inline;
  21290. procedure setRXOVFLIE; inline;
  21291. procedure setRXOVFLIF; inline;
  21292. procedure setTXEMPTYIE; inline;
  21293. procedure setTXEMPTYIF; inline;
  21294. procedure setTXHALFIE; inline;
  21295. procedure setTXHALFIF; inline;
  21296. procedure setTXNFULLIE; inline;
  21297. procedure setTXNFULLIF; inline;
  21298. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21299. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21300. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21301. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21302. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21303. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21304. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21305. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21306. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21307. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21308. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21309. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21310. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21311. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21312. property w : TBits_32 read getw write setw;
  21313. end;
  21314. TCAN1_C1FIFOCI19 = record
  21315. private
  21316. function getCFIFOCI : TBits_5; inline;
  21317. function getw : TBits_32; inline;
  21318. procedure setCFIFOCI(thebits : TBits_5); inline;
  21319. procedure setw(thebits : TBits_32); inline;
  21320. public
  21321. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21322. property w : TBits_32 read getw write setw;
  21323. end;
  21324. TCAN1_C1FIFOCON20 = record
  21325. private
  21326. function getDONLY : TBits_1; inline;
  21327. function getFRESET : TBits_1; inline;
  21328. function getFSIZE : TBits_5; inline;
  21329. function getRTREN : TBits_1; inline;
  21330. function getTXABAT : TBits_1; inline;
  21331. function getTXEN : TBits_1; inline;
  21332. function getTXERR : TBits_1; inline;
  21333. function getTXLARB : TBits_1; inline;
  21334. function getTXPRI : TBits_2; inline;
  21335. function getTXREQ : TBits_1; inline;
  21336. function getUINC : TBits_1; inline;
  21337. function getw : TBits_32; inline;
  21338. procedure setDONLY(thebits : TBits_1); inline;
  21339. procedure setFRESET(thebits : TBits_1); inline;
  21340. procedure setFSIZE(thebits : TBits_5); inline;
  21341. procedure setRTREN(thebits : TBits_1); inline;
  21342. procedure setTXABAT(thebits : TBits_1); inline;
  21343. procedure setTXEN(thebits : TBits_1); inline;
  21344. procedure setTXERR(thebits : TBits_1); inline;
  21345. procedure setTXLARB(thebits : TBits_1); inline;
  21346. procedure setTXPRI(thebits : TBits_2); inline;
  21347. procedure setTXREQ(thebits : TBits_1); inline;
  21348. procedure setUINC(thebits : TBits_1); inline;
  21349. procedure setw(thebits : TBits_32); inline;
  21350. public
  21351. procedure clearDONLY; inline;
  21352. procedure clearFRESET; inline;
  21353. procedure clearRTREN; inline;
  21354. procedure clearTXABAT; inline;
  21355. procedure clearTXEN; inline;
  21356. procedure clearTXERR; inline;
  21357. procedure clearTXLARB; inline;
  21358. procedure clearTXREQ; inline;
  21359. procedure clearUINC; inline;
  21360. procedure setDONLY; inline;
  21361. procedure setFRESET; inline;
  21362. procedure setRTREN; inline;
  21363. procedure setTXABAT; inline;
  21364. procedure setTXEN; inline;
  21365. procedure setTXERR; inline;
  21366. procedure setTXLARB; inline;
  21367. procedure setTXREQ; inline;
  21368. procedure setUINC; inline;
  21369. property DONLY : TBits_1 read getDONLY write setDONLY;
  21370. property FRESET : TBits_1 read getFRESET write setFRESET;
  21371. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21372. property RTREN : TBits_1 read getRTREN write setRTREN;
  21373. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21374. property TXEN : TBits_1 read getTXEN write setTXEN;
  21375. property TXERR : TBits_1 read getTXERR write setTXERR;
  21376. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21377. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21378. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21379. property UINC : TBits_1 read getUINC write setUINC;
  21380. property w : TBits_32 read getw write setw;
  21381. end;
  21382. TCAN1_C1FIFOINT20 = record
  21383. private
  21384. function getRXFULLIE : TBits_1; inline;
  21385. function getRXFULLIF : TBits_1; inline;
  21386. function getRXHALFIE : TBits_1; inline;
  21387. function getRXHALFIF : TBits_1; inline;
  21388. function getRXNEMPTYIE : TBits_1; inline;
  21389. function getRXNEMPTYIF : TBits_1; inline;
  21390. function getRXOVFLIE : TBits_1; inline;
  21391. function getRXOVFLIF : TBits_1; inline;
  21392. function getTXEMPTYIE : TBits_1; inline;
  21393. function getTXEMPTYIF : TBits_1; inline;
  21394. function getTXHALFIE : TBits_1; inline;
  21395. function getTXHALFIF : TBits_1; inline;
  21396. function getTXNFULLIE : TBits_1; inline;
  21397. function getTXNFULLIF : TBits_1; inline;
  21398. function getw : TBits_32; inline;
  21399. procedure setRXFULLIE(thebits : TBits_1); inline;
  21400. procedure setRXFULLIF(thebits : TBits_1); inline;
  21401. procedure setRXHALFIE(thebits : TBits_1); inline;
  21402. procedure setRXHALFIF(thebits : TBits_1); inline;
  21403. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21404. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21405. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21406. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21407. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21408. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21409. procedure setTXHALFIE(thebits : TBits_1); inline;
  21410. procedure setTXHALFIF(thebits : TBits_1); inline;
  21411. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21412. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21413. procedure setw(thebits : TBits_32); inline;
  21414. public
  21415. procedure clearRXFULLIE; inline;
  21416. procedure clearRXFULLIF; inline;
  21417. procedure clearRXHALFIE; inline;
  21418. procedure clearRXHALFIF; inline;
  21419. procedure clearRXNEMPTYIE; inline;
  21420. procedure clearRXNEMPTYIF; inline;
  21421. procedure clearRXOVFLIE; inline;
  21422. procedure clearRXOVFLIF; inline;
  21423. procedure clearTXEMPTYIE; inline;
  21424. procedure clearTXEMPTYIF; inline;
  21425. procedure clearTXHALFIE; inline;
  21426. procedure clearTXHALFIF; inline;
  21427. procedure clearTXNFULLIE; inline;
  21428. procedure clearTXNFULLIF; inline;
  21429. procedure setRXFULLIE; inline;
  21430. procedure setRXFULLIF; inline;
  21431. procedure setRXHALFIE; inline;
  21432. procedure setRXHALFIF; inline;
  21433. procedure setRXNEMPTYIE; inline;
  21434. procedure setRXNEMPTYIF; inline;
  21435. procedure setRXOVFLIE; inline;
  21436. procedure setRXOVFLIF; inline;
  21437. procedure setTXEMPTYIE; inline;
  21438. procedure setTXEMPTYIF; inline;
  21439. procedure setTXHALFIE; inline;
  21440. procedure setTXHALFIF; inline;
  21441. procedure setTXNFULLIE; inline;
  21442. procedure setTXNFULLIF; inline;
  21443. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21444. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21445. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21446. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21447. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21448. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21449. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21450. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21451. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21452. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21453. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21454. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21455. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21456. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21457. property w : TBits_32 read getw write setw;
  21458. end;
  21459. TCAN1_C1FIFOCI20 = record
  21460. private
  21461. function getCFIFOCI : TBits_5; inline;
  21462. function getw : TBits_32; inline;
  21463. procedure setCFIFOCI(thebits : TBits_5); inline;
  21464. procedure setw(thebits : TBits_32); inline;
  21465. public
  21466. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21467. property w : TBits_32 read getw write setw;
  21468. end;
  21469. TCAN1_C1FIFOCON21 = record
  21470. private
  21471. function getDONLY : TBits_1; inline;
  21472. function getFRESET : TBits_1; inline;
  21473. function getFSIZE : TBits_5; inline;
  21474. function getRTREN : TBits_1; inline;
  21475. function getTXABAT : TBits_1; inline;
  21476. function getTXEN : TBits_1; inline;
  21477. function getTXERR : TBits_1; inline;
  21478. function getTXLARB : TBits_1; inline;
  21479. function getTXPRI : TBits_2; inline;
  21480. function getTXREQ : TBits_1; inline;
  21481. function getUINC : TBits_1; inline;
  21482. function getw : TBits_32; inline;
  21483. procedure setDONLY(thebits : TBits_1); inline;
  21484. procedure setFRESET(thebits : TBits_1); inline;
  21485. procedure setFSIZE(thebits : TBits_5); inline;
  21486. procedure setRTREN(thebits : TBits_1); inline;
  21487. procedure setTXABAT(thebits : TBits_1); inline;
  21488. procedure setTXEN(thebits : TBits_1); inline;
  21489. procedure setTXERR(thebits : TBits_1); inline;
  21490. procedure setTXLARB(thebits : TBits_1); inline;
  21491. procedure setTXPRI(thebits : TBits_2); inline;
  21492. procedure setTXREQ(thebits : TBits_1); inline;
  21493. procedure setUINC(thebits : TBits_1); inline;
  21494. procedure setw(thebits : TBits_32); inline;
  21495. public
  21496. procedure clearDONLY; inline;
  21497. procedure clearFRESET; inline;
  21498. procedure clearRTREN; inline;
  21499. procedure clearTXABAT; inline;
  21500. procedure clearTXEN; inline;
  21501. procedure clearTXERR; inline;
  21502. procedure clearTXLARB; inline;
  21503. procedure clearTXREQ; inline;
  21504. procedure clearUINC; inline;
  21505. procedure setDONLY; inline;
  21506. procedure setFRESET; inline;
  21507. procedure setRTREN; inline;
  21508. procedure setTXABAT; inline;
  21509. procedure setTXEN; inline;
  21510. procedure setTXERR; inline;
  21511. procedure setTXLARB; inline;
  21512. procedure setTXREQ; inline;
  21513. procedure setUINC; inline;
  21514. property DONLY : TBits_1 read getDONLY write setDONLY;
  21515. property FRESET : TBits_1 read getFRESET write setFRESET;
  21516. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21517. property RTREN : TBits_1 read getRTREN write setRTREN;
  21518. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21519. property TXEN : TBits_1 read getTXEN write setTXEN;
  21520. property TXERR : TBits_1 read getTXERR write setTXERR;
  21521. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21522. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21523. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21524. property UINC : TBits_1 read getUINC write setUINC;
  21525. property w : TBits_32 read getw write setw;
  21526. end;
  21527. TCAN1_C1FIFOINT21 = record
  21528. private
  21529. function getRXFULLIE : TBits_1; inline;
  21530. function getRXFULLIF : TBits_1; inline;
  21531. function getRXHALFIE : TBits_1; inline;
  21532. function getRXHALFIF : TBits_1; inline;
  21533. function getRXNEMPTYIE : TBits_1; inline;
  21534. function getRXNEMPTYIF : TBits_1; inline;
  21535. function getRXOVFLIE : TBits_1; inline;
  21536. function getRXOVFLIF : TBits_1; inline;
  21537. function getTXEMPTYIE : TBits_1; inline;
  21538. function getTXEMPTYIF : TBits_1; inline;
  21539. function getTXHALFIE : TBits_1; inline;
  21540. function getTXHALFIF : TBits_1; inline;
  21541. function getTXNFULLIE : TBits_1; inline;
  21542. function getTXNFULLIF : TBits_1; inline;
  21543. function getw : TBits_32; inline;
  21544. procedure setRXFULLIE(thebits : TBits_1); inline;
  21545. procedure setRXFULLIF(thebits : TBits_1); inline;
  21546. procedure setRXHALFIE(thebits : TBits_1); inline;
  21547. procedure setRXHALFIF(thebits : TBits_1); inline;
  21548. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21549. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21550. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21551. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21552. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21553. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21554. procedure setTXHALFIE(thebits : TBits_1); inline;
  21555. procedure setTXHALFIF(thebits : TBits_1); inline;
  21556. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21557. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21558. procedure setw(thebits : TBits_32); inline;
  21559. public
  21560. procedure clearRXFULLIE; inline;
  21561. procedure clearRXFULLIF; inline;
  21562. procedure clearRXHALFIE; inline;
  21563. procedure clearRXHALFIF; inline;
  21564. procedure clearRXNEMPTYIE; inline;
  21565. procedure clearRXNEMPTYIF; inline;
  21566. procedure clearRXOVFLIE; inline;
  21567. procedure clearRXOVFLIF; inline;
  21568. procedure clearTXEMPTYIE; inline;
  21569. procedure clearTXEMPTYIF; inline;
  21570. procedure clearTXHALFIE; inline;
  21571. procedure clearTXHALFIF; inline;
  21572. procedure clearTXNFULLIE; inline;
  21573. procedure clearTXNFULLIF; inline;
  21574. procedure setRXFULLIE; inline;
  21575. procedure setRXFULLIF; inline;
  21576. procedure setRXHALFIE; inline;
  21577. procedure setRXHALFIF; inline;
  21578. procedure setRXNEMPTYIE; inline;
  21579. procedure setRXNEMPTYIF; inline;
  21580. procedure setRXOVFLIE; inline;
  21581. procedure setRXOVFLIF; inline;
  21582. procedure setTXEMPTYIE; inline;
  21583. procedure setTXEMPTYIF; inline;
  21584. procedure setTXHALFIE; inline;
  21585. procedure setTXHALFIF; inline;
  21586. procedure setTXNFULLIE; inline;
  21587. procedure setTXNFULLIF; inline;
  21588. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21589. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21590. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21591. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21592. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21593. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21594. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21595. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21596. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21597. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21598. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21599. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21600. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21601. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21602. property w : TBits_32 read getw write setw;
  21603. end;
  21604. TCAN1_C1FIFOCI21 = record
  21605. private
  21606. function getCFIFOCI : TBits_5; inline;
  21607. function getw : TBits_32; inline;
  21608. procedure setCFIFOCI(thebits : TBits_5); inline;
  21609. procedure setw(thebits : TBits_32); inline;
  21610. public
  21611. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21612. property w : TBits_32 read getw write setw;
  21613. end;
  21614. TCAN1_C1FIFOCON22 = record
  21615. private
  21616. function getDONLY : TBits_1; inline;
  21617. function getFRESET : TBits_1; inline;
  21618. function getFSIZE : TBits_5; inline;
  21619. function getRTREN : TBits_1; inline;
  21620. function getTXABAT : TBits_1; inline;
  21621. function getTXEN : TBits_1; inline;
  21622. function getTXERR : TBits_1; inline;
  21623. function getTXLARB : TBits_1; inline;
  21624. function getTXPRI : TBits_2; inline;
  21625. function getTXREQ : TBits_1; inline;
  21626. function getUINC : TBits_1; inline;
  21627. function getw : TBits_32; inline;
  21628. procedure setDONLY(thebits : TBits_1); inline;
  21629. procedure setFRESET(thebits : TBits_1); inline;
  21630. procedure setFSIZE(thebits : TBits_5); inline;
  21631. procedure setRTREN(thebits : TBits_1); inline;
  21632. procedure setTXABAT(thebits : TBits_1); inline;
  21633. procedure setTXEN(thebits : TBits_1); inline;
  21634. procedure setTXERR(thebits : TBits_1); inline;
  21635. procedure setTXLARB(thebits : TBits_1); inline;
  21636. procedure setTXPRI(thebits : TBits_2); inline;
  21637. procedure setTXREQ(thebits : TBits_1); inline;
  21638. procedure setUINC(thebits : TBits_1); inline;
  21639. procedure setw(thebits : TBits_32); inline;
  21640. public
  21641. procedure clearDONLY; inline;
  21642. procedure clearFRESET; inline;
  21643. procedure clearRTREN; inline;
  21644. procedure clearTXABAT; inline;
  21645. procedure clearTXEN; inline;
  21646. procedure clearTXERR; inline;
  21647. procedure clearTXLARB; inline;
  21648. procedure clearTXREQ; inline;
  21649. procedure clearUINC; inline;
  21650. procedure setDONLY; inline;
  21651. procedure setFRESET; inline;
  21652. procedure setRTREN; inline;
  21653. procedure setTXABAT; inline;
  21654. procedure setTXEN; inline;
  21655. procedure setTXERR; inline;
  21656. procedure setTXLARB; inline;
  21657. procedure setTXREQ; inline;
  21658. procedure setUINC; inline;
  21659. property DONLY : TBits_1 read getDONLY write setDONLY;
  21660. property FRESET : TBits_1 read getFRESET write setFRESET;
  21661. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21662. property RTREN : TBits_1 read getRTREN write setRTREN;
  21663. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21664. property TXEN : TBits_1 read getTXEN write setTXEN;
  21665. property TXERR : TBits_1 read getTXERR write setTXERR;
  21666. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21667. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21668. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21669. property UINC : TBits_1 read getUINC write setUINC;
  21670. property w : TBits_32 read getw write setw;
  21671. end;
  21672. TCAN1_C1FIFOINT22 = record
  21673. private
  21674. function getRXFULLIE : TBits_1; inline;
  21675. function getRXFULLIF : TBits_1; inline;
  21676. function getRXHALFIE : TBits_1; inline;
  21677. function getRXHALFIF : TBits_1; inline;
  21678. function getRXNEMPTYIE : TBits_1; inline;
  21679. function getRXNEMPTYIF : TBits_1; inline;
  21680. function getRXOVFLIE : TBits_1; inline;
  21681. function getRXOVFLIF : TBits_1; inline;
  21682. function getTXEMPTYIE : TBits_1; inline;
  21683. function getTXEMPTYIF : TBits_1; inline;
  21684. function getTXHALFIE : TBits_1; inline;
  21685. function getTXHALFIF : TBits_1; inline;
  21686. function getTXNFULLIE : TBits_1; inline;
  21687. function getTXNFULLIF : TBits_1; inline;
  21688. function getw : TBits_32; inline;
  21689. procedure setRXFULLIE(thebits : TBits_1); inline;
  21690. procedure setRXFULLIF(thebits : TBits_1); inline;
  21691. procedure setRXHALFIE(thebits : TBits_1); inline;
  21692. procedure setRXHALFIF(thebits : TBits_1); inline;
  21693. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21694. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21695. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21696. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21697. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21698. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21699. procedure setTXHALFIE(thebits : TBits_1); inline;
  21700. procedure setTXHALFIF(thebits : TBits_1); inline;
  21701. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21702. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21703. procedure setw(thebits : TBits_32); inline;
  21704. public
  21705. procedure clearRXFULLIE; inline;
  21706. procedure clearRXFULLIF; inline;
  21707. procedure clearRXHALFIE; inline;
  21708. procedure clearRXHALFIF; inline;
  21709. procedure clearRXNEMPTYIE; inline;
  21710. procedure clearRXNEMPTYIF; inline;
  21711. procedure clearRXOVFLIE; inline;
  21712. procedure clearRXOVFLIF; inline;
  21713. procedure clearTXEMPTYIE; inline;
  21714. procedure clearTXEMPTYIF; inline;
  21715. procedure clearTXHALFIE; inline;
  21716. procedure clearTXHALFIF; inline;
  21717. procedure clearTXNFULLIE; inline;
  21718. procedure clearTXNFULLIF; inline;
  21719. procedure setRXFULLIE; inline;
  21720. procedure setRXFULLIF; inline;
  21721. procedure setRXHALFIE; inline;
  21722. procedure setRXHALFIF; inline;
  21723. procedure setRXNEMPTYIE; inline;
  21724. procedure setRXNEMPTYIF; inline;
  21725. procedure setRXOVFLIE; inline;
  21726. procedure setRXOVFLIF; inline;
  21727. procedure setTXEMPTYIE; inline;
  21728. procedure setTXEMPTYIF; inline;
  21729. procedure setTXHALFIE; inline;
  21730. procedure setTXHALFIF; inline;
  21731. procedure setTXNFULLIE; inline;
  21732. procedure setTXNFULLIF; inline;
  21733. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21734. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21735. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21736. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21737. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21738. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21739. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21740. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21741. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21742. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21743. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21744. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21745. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21746. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21747. property w : TBits_32 read getw write setw;
  21748. end;
  21749. TCAN1_C1FIFOCI22 = record
  21750. private
  21751. function getCFIFOCI : TBits_5; inline;
  21752. function getw : TBits_32; inline;
  21753. procedure setCFIFOCI(thebits : TBits_5); inline;
  21754. procedure setw(thebits : TBits_32); inline;
  21755. public
  21756. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21757. property w : TBits_32 read getw write setw;
  21758. end;
  21759. TCAN1_C1FIFOCON23 = record
  21760. private
  21761. function getDONLY : TBits_1; inline;
  21762. function getFRESET : TBits_1; inline;
  21763. function getFSIZE : TBits_5; inline;
  21764. function getRTREN : TBits_1; inline;
  21765. function getTXABAT : TBits_1; inline;
  21766. function getTXEN : TBits_1; inline;
  21767. function getTXERR : TBits_1; inline;
  21768. function getTXLARB : TBits_1; inline;
  21769. function getTXPRI : TBits_2; inline;
  21770. function getTXREQ : TBits_1; inline;
  21771. function getUINC : TBits_1; inline;
  21772. function getw : TBits_32; inline;
  21773. procedure setDONLY(thebits : TBits_1); inline;
  21774. procedure setFRESET(thebits : TBits_1); inline;
  21775. procedure setFSIZE(thebits : TBits_5); inline;
  21776. procedure setRTREN(thebits : TBits_1); inline;
  21777. procedure setTXABAT(thebits : TBits_1); inline;
  21778. procedure setTXEN(thebits : TBits_1); inline;
  21779. procedure setTXERR(thebits : TBits_1); inline;
  21780. procedure setTXLARB(thebits : TBits_1); inline;
  21781. procedure setTXPRI(thebits : TBits_2); inline;
  21782. procedure setTXREQ(thebits : TBits_1); inline;
  21783. procedure setUINC(thebits : TBits_1); inline;
  21784. procedure setw(thebits : TBits_32); inline;
  21785. public
  21786. procedure clearDONLY; inline;
  21787. procedure clearFRESET; inline;
  21788. procedure clearRTREN; inline;
  21789. procedure clearTXABAT; inline;
  21790. procedure clearTXEN; inline;
  21791. procedure clearTXERR; inline;
  21792. procedure clearTXLARB; inline;
  21793. procedure clearTXREQ; inline;
  21794. procedure clearUINC; inline;
  21795. procedure setDONLY; inline;
  21796. procedure setFRESET; inline;
  21797. procedure setRTREN; inline;
  21798. procedure setTXABAT; inline;
  21799. procedure setTXEN; inline;
  21800. procedure setTXERR; inline;
  21801. procedure setTXLARB; inline;
  21802. procedure setTXREQ; inline;
  21803. procedure setUINC; inline;
  21804. property DONLY : TBits_1 read getDONLY write setDONLY;
  21805. property FRESET : TBits_1 read getFRESET write setFRESET;
  21806. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21807. property RTREN : TBits_1 read getRTREN write setRTREN;
  21808. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21809. property TXEN : TBits_1 read getTXEN write setTXEN;
  21810. property TXERR : TBits_1 read getTXERR write setTXERR;
  21811. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21812. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21813. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21814. property UINC : TBits_1 read getUINC write setUINC;
  21815. property w : TBits_32 read getw write setw;
  21816. end;
  21817. TCAN1_C1FIFOINT23 = record
  21818. private
  21819. function getRXFULLIE : TBits_1; inline;
  21820. function getRXFULLIF : TBits_1; inline;
  21821. function getRXHALFIE : TBits_1; inline;
  21822. function getRXHALFIF : TBits_1; inline;
  21823. function getRXNEMPTYIE : TBits_1; inline;
  21824. function getRXNEMPTYIF : TBits_1; inline;
  21825. function getRXOVFLIE : TBits_1; inline;
  21826. function getRXOVFLIF : TBits_1; inline;
  21827. function getTXEMPTYIE : TBits_1; inline;
  21828. function getTXEMPTYIF : TBits_1; inline;
  21829. function getTXHALFIE : TBits_1; inline;
  21830. function getTXHALFIF : TBits_1; inline;
  21831. function getTXNFULLIE : TBits_1; inline;
  21832. function getTXNFULLIF : TBits_1; inline;
  21833. function getw : TBits_32; inline;
  21834. procedure setRXFULLIE(thebits : TBits_1); inline;
  21835. procedure setRXFULLIF(thebits : TBits_1); inline;
  21836. procedure setRXHALFIE(thebits : TBits_1); inline;
  21837. procedure setRXHALFIF(thebits : TBits_1); inline;
  21838. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21839. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21840. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21841. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21842. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21843. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21844. procedure setTXHALFIE(thebits : TBits_1); inline;
  21845. procedure setTXHALFIF(thebits : TBits_1); inline;
  21846. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21847. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21848. procedure setw(thebits : TBits_32); inline;
  21849. public
  21850. procedure clearRXFULLIE; inline;
  21851. procedure clearRXFULLIF; inline;
  21852. procedure clearRXHALFIE; inline;
  21853. procedure clearRXHALFIF; inline;
  21854. procedure clearRXNEMPTYIE; inline;
  21855. procedure clearRXNEMPTYIF; inline;
  21856. procedure clearRXOVFLIE; inline;
  21857. procedure clearRXOVFLIF; inline;
  21858. procedure clearTXEMPTYIE; inline;
  21859. procedure clearTXEMPTYIF; inline;
  21860. procedure clearTXHALFIE; inline;
  21861. procedure clearTXHALFIF; inline;
  21862. procedure clearTXNFULLIE; inline;
  21863. procedure clearTXNFULLIF; inline;
  21864. procedure setRXFULLIE; inline;
  21865. procedure setRXFULLIF; inline;
  21866. procedure setRXHALFIE; inline;
  21867. procedure setRXHALFIF; inline;
  21868. procedure setRXNEMPTYIE; inline;
  21869. procedure setRXNEMPTYIF; inline;
  21870. procedure setRXOVFLIE; inline;
  21871. procedure setRXOVFLIF; inline;
  21872. procedure setTXEMPTYIE; inline;
  21873. procedure setTXEMPTYIF; inline;
  21874. procedure setTXHALFIE; inline;
  21875. procedure setTXHALFIF; inline;
  21876. procedure setTXNFULLIE; inline;
  21877. procedure setTXNFULLIF; inline;
  21878. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21879. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21880. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21881. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21882. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21883. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21884. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21885. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21886. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21887. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21888. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21889. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21890. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21891. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21892. property w : TBits_32 read getw write setw;
  21893. end;
  21894. TCAN1_C1FIFOCI23 = record
  21895. private
  21896. function getCFIFOCI : TBits_5; inline;
  21897. function getw : TBits_32; inline;
  21898. procedure setCFIFOCI(thebits : TBits_5); inline;
  21899. procedure setw(thebits : TBits_32); inline;
  21900. public
  21901. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21902. property w : TBits_32 read getw write setw;
  21903. end;
  21904. TCAN1_C1FIFOCON24 = record
  21905. private
  21906. function getDONLY : TBits_1; inline;
  21907. function getFRESET : TBits_1; inline;
  21908. function getFSIZE : TBits_5; inline;
  21909. function getRTREN : TBits_1; inline;
  21910. function getTXABAT : TBits_1; inline;
  21911. function getTXEN : TBits_1; inline;
  21912. function getTXERR : TBits_1; inline;
  21913. function getTXLARB : TBits_1; inline;
  21914. function getTXPRI : TBits_2; inline;
  21915. function getTXREQ : TBits_1; inline;
  21916. function getUINC : TBits_1; inline;
  21917. function getw : TBits_32; inline;
  21918. procedure setDONLY(thebits : TBits_1); inline;
  21919. procedure setFRESET(thebits : TBits_1); inline;
  21920. procedure setFSIZE(thebits : TBits_5); inline;
  21921. procedure setRTREN(thebits : TBits_1); inline;
  21922. procedure setTXABAT(thebits : TBits_1); inline;
  21923. procedure setTXEN(thebits : TBits_1); inline;
  21924. procedure setTXERR(thebits : TBits_1); inline;
  21925. procedure setTXLARB(thebits : TBits_1); inline;
  21926. procedure setTXPRI(thebits : TBits_2); inline;
  21927. procedure setTXREQ(thebits : TBits_1); inline;
  21928. procedure setUINC(thebits : TBits_1); inline;
  21929. procedure setw(thebits : TBits_32); inline;
  21930. public
  21931. procedure clearDONLY; inline;
  21932. procedure clearFRESET; inline;
  21933. procedure clearRTREN; inline;
  21934. procedure clearTXABAT; inline;
  21935. procedure clearTXEN; inline;
  21936. procedure clearTXERR; inline;
  21937. procedure clearTXLARB; inline;
  21938. procedure clearTXREQ; inline;
  21939. procedure clearUINC; inline;
  21940. procedure setDONLY; inline;
  21941. procedure setFRESET; inline;
  21942. procedure setRTREN; inline;
  21943. procedure setTXABAT; inline;
  21944. procedure setTXEN; inline;
  21945. procedure setTXERR; inline;
  21946. procedure setTXLARB; inline;
  21947. procedure setTXREQ; inline;
  21948. procedure setUINC; inline;
  21949. property DONLY : TBits_1 read getDONLY write setDONLY;
  21950. property FRESET : TBits_1 read getFRESET write setFRESET;
  21951. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21952. property RTREN : TBits_1 read getRTREN write setRTREN;
  21953. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21954. property TXEN : TBits_1 read getTXEN write setTXEN;
  21955. property TXERR : TBits_1 read getTXERR write setTXERR;
  21956. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21957. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21958. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21959. property UINC : TBits_1 read getUINC write setUINC;
  21960. property w : TBits_32 read getw write setw;
  21961. end;
  21962. TCAN1_C1FIFOINT24 = record
  21963. private
  21964. function getRXFULLIE : TBits_1; inline;
  21965. function getRXFULLIF : TBits_1; inline;
  21966. function getRXHALFIE : TBits_1; inline;
  21967. function getRXHALFIF : TBits_1; inline;
  21968. function getRXNEMPTYIE : TBits_1; inline;
  21969. function getRXNEMPTYIF : TBits_1; inline;
  21970. function getRXOVFLIE : TBits_1; inline;
  21971. function getRXOVFLIF : TBits_1; inline;
  21972. function getTXEMPTYIE : TBits_1; inline;
  21973. function getTXEMPTYIF : TBits_1; inline;
  21974. function getTXHALFIE : TBits_1; inline;
  21975. function getTXHALFIF : TBits_1; inline;
  21976. function getTXNFULLIE : TBits_1; inline;
  21977. function getTXNFULLIF : TBits_1; inline;
  21978. function getw : TBits_32; inline;
  21979. procedure setRXFULLIE(thebits : TBits_1); inline;
  21980. procedure setRXFULLIF(thebits : TBits_1); inline;
  21981. procedure setRXHALFIE(thebits : TBits_1); inline;
  21982. procedure setRXHALFIF(thebits : TBits_1); inline;
  21983. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21984. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21985. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21986. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21987. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21988. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21989. procedure setTXHALFIE(thebits : TBits_1); inline;
  21990. procedure setTXHALFIF(thebits : TBits_1); inline;
  21991. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21992. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21993. procedure setw(thebits : TBits_32); inline;
  21994. public
  21995. procedure clearRXFULLIE; inline;
  21996. procedure clearRXFULLIF; inline;
  21997. procedure clearRXHALFIE; inline;
  21998. procedure clearRXHALFIF; inline;
  21999. procedure clearRXNEMPTYIE; inline;
  22000. procedure clearRXNEMPTYIF; inline;
  22001. procedure clearRXOVFLIE; inline;
  22002. procedure clearRXOVFLIF; inline;
  22003. procedure clearTXEMPTYIE; inline;
  22004. procedure clearTXEMPTYIF; inline;
  22005. procedure clearTXHALFIE; inline;
  22006. procedure clearTXHALFIF; inline;
  22007. procedure clearTXNFULLIE; inline;
  22008. procedure clearTXNFULLIF; inline;
  22009. procedure setRXFULLIE; inline;
  22010. procedure setRXFULLIF; inline;
  22011. procedure setRXHALFIE; inline;
  22012. procedure setRXHALFIF; inline;
  22013. procedure setRXNEMPTYIE; inline;
  22014. procedure setRXNEMPTYIF; inline;
  22015. procedure setRXOVFLIE; inline;
  22016. procedure setRXOVFLIF; inline;
  22017. procedure setTXEMPTYIE; inline;
  22018. procedure setTXEMPTYIF; inline;
  22019. procedure setTXHALFIE; inline;
  22020. procedure setTXHALFIF; inline;
  22021. procedure setTXNFULLIE; inline;
  22022. procedure setTXNFULLIF; inline;
  22023. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22024. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22025. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22026. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22027. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22028. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22029. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22030. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22031. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22032. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22033. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22034. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22035. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22036. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22037. property w : TBits_32 read getw write setw;
  22038. end;
  22039. TCAN1_C1FIFOCI24 = record
  22040. private
  22041. function getCFIFOCI : TBits_5; inline;
  22042. function getw : TBits_32; inline;
  22043. procedure setCFIFOCI(thebits : TBits_5); inline;
  22044. procedure setw(thebits : TBits_32); inline;
  22045. public
  22046. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22047. property w : TBits_32 read getw write setw;
  22048. end;
  22049. TCAN1_C1FIFOCON25 = record
  22050. private
  22051. function getDONLY : TBits_1; inline;
  22052. function getFRESET : TBits_1; inline;
  22053. function getFSIZE : TBits_5; inline;
  22054. function getRTREN : TBits_1; inline;
  22055. function getTXABAT : TBits_1; inline;
  22056. function getTXEN : TBits_1; inline;
  22057. function getTXERR : TBits_1; inline;
  22058. function getTXLARB : TBits_1; inline;
  22059. function getTXPRI : TBits_2; inline;
  22060. function getTXREQ : TBits_1; inline;
  22061. function getUINC : TBits_1; inline;
  22062. function getw : TBits_32; inline;
  22063. procedure setDONLY(thebits : TBits_1); inline;
  22064. procedure setFRESET(thebits : TBits_1); inline;
  22065. procedure setFSIZE(thebits : TBits_5); inline;
  22066. procedure setRTREN(thebits : TBits_1); inline;
  22067. procedure setTXABAT(thebits : TBits_1); inline;
  22068. procedure setTXEN(thebits : TBits_1); inline;
  22069. procedure setTXERR(thebits : TBits_1); inline;
  22070. procedure setTXLARB(thebits : TBits_1); inline;
  22071. procedure setTXPRI(thebits : TBits_2); inline;
  22072. procedure setTXREQ(thebits : TBits_1); inline;
  22073. procedure setUINC(thebits : TBits_1); inline;
  22074. procedure setw(thebits : TBits_32); inline;
  22075. public
  22076. procedure clearDONLY; inline;
  22077. procedure clearFRESET; inline;
  22078. procedure clearRTREN; inline;
  22079. procedure clearTXABAT; inline;
  22080. procedure clearTXEN; inline;
  22081. procedure clearTXERR; inline;
  22082. procedure clearTXLARB; inline;
  22083. procedure clearTXREQ; inline;
  22084. procedure clearUINC; inline;
  22085. procedure setDONLY; inline;
  22086. procedure setFRESET; inline;
  22087. procedure setRTREN; inline;
  22088. procedure setTXABAT; inline;
  22089. procedure setTXEN; inline;
  22090. procedure setTXERR; inline;
  22091. procedure setTXLARB; inline;
  22092. procedure setTXREQ; inline;
  22093. procedure setUINC; inline;
  22094. property DONLY : TBits_1 read getDONLY write setDONLY;
  22095. property FRESET : TBits_1 read getFRESET write setFRESET;
  22096. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22097. property RTREN : TBits_1 read getRTREN write setRTREN;
  22098. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22099. property TXEN : TBits_1 read getTXEN write setTXEN;
  22100. property TXERR : TBits_1 read getTXERR write setTXERR;
  22101. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22102. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22103. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22104. property UINC : TBits_1 read getUINC write setUINC;
  22105. property w : TBits_32 read getw write setw;
  22106. end;
  22107. TCAN1_C1FIFOINT25 = record
  22108. private
  22109. function getRXFULLIE : TBits_1; inline;
  22110. function getRXFULLIF : TBits_1; inline;
  22111. function getRXHALFIE : TBits_1; inline;
  22112. function getRXHALFIF : TBits_1; inline;
  22113. function getRXNEMPTYIE : TBits_1; inline;
  22114. function getRXNEMPTYIF : TBits_1; inline;
  22115. function getRXOVFLIE : TBits_1; inline;
  22116. function getRXOVFLIF : TBits_1; inline;
  22117. function getTXEMPTYIE : TBits_1; inline;
  22118. function getTXEMPTYIF : TBits_1; inline;
  22119. function getTXHALFIE : TBits_1; inline;
  22120. function getTXHALFIF : TBits_1; inline;
  22121. function getTXNFULLIE : TBits_1; inline;
  22122. function getTXNFULLIF : TBits_1; inline;
  22123. function getw : TBits_32; inline;
  22124. procedure setRXFULLIE(thebits : TBits_1); inline;
  22125. procedure setRXFULLIF(thebits : TBits_1); inline;
  22126. procedure setRXHALFIE(thebits : TBits_1); inline;
  22127. procedure setRXHALFIF(thebits : TBits_1); inline;
  22128. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22129. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  22130. procedure setRXOVFLIE(thebits : TBits_1); inline;
  22131. procedure setRXOVFLIF(thebits : TBits_1); inline;
  22132. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  22133. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  22134. procedure setTXHALFIE(thebits : TBits_1); inline;
  22135. procedure setTXHALFIF(thebits : TBits_1); inline;
  22136. procedure setTXNFULLIE(thebits : TBits_1); inline;
  22137. procedure setTXNFULLIF(thebits : TBits_1); inline;
  22138. procedure setw(thebits : TBits_32); inline;
  22139. public
  22140. procedure clearRXFULLIE; inline;
  22141. procedure clearRXFULLIF; inline;
  22142. procedure clearRXHALFIE; inline;
  22143. procedure clearRXHALFIF; inline;
  22144. procedure clearRXNEMPTYIE; inline;
  22145. procedure clearRXNEMPTYIF; inline;
  22146. procedure clearRXOVFLIE; inline;
  22147. procedure clearRXOVFLIF; inline;
  22148. procedure clearTXEMPTYIE; inline;
  22149. procedure clearTXEMPTYIF; inline;
  22150. procedure clearTXHALFIE; inline;
  22151. procedure clearTXHALFIF; inline;
  22152. procedure clearTXNFULLIE; inline;
  22153. procedure clearTXNFULLIF; inline;
  22154. procedure setRXFULLIE; inline;
  22155. procedure setRXFULLIF; inline;
  22156. procedure setRXHALFIE; inline;
  22157. procedure setRXHALFIF; inline;
  22158. procedure setRXNEMPTYIE; inline;
  22159. procedure setRXNEMPTYIF; inline;
  22160. procedure setRXOVFLIE; inline;
  22161. procedure setRXOVFLIF; inline;
  22162. procedure setTXEMPTYIE; inline;
  22163. procedure setTXEMPTYIF; inline;
  22164. procedure setTXHALFIE; inline;
  22165. procedure setTXHALFIF; inline;
  22166. procedure setTXNFULLIE; inline;
  22167. procedure setTXNFULLIF; inline;
  22168. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22169. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22170. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22171. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22172. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22173. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22174. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22175. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22176. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22177. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22178. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22179. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22180. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22181. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22182. property w : TBits_32 read getw write setw;
  22183. end;
  22184. TCAN1_C1FIFOCI25 = record
  22185. private
  22186. function getCFIFOCI : TBits_5; inline;
  22187. function getw : TBits_32; inline;
  22188. procedure setCFIFOCI(thebits : TBits_5); inline;
  22189. procedure setw(thebits : TBits_32); inline;
  22190. public
  22191. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22192. property w : TBits_32 read getw write setw;
  22193. end;
  22194. TCAN1_C1FIFOCON26 = record
  22195. private
  22196. function getDONLY : TBits_1; inline;
  22197. function getFRESET : TBits_1; inline;
  22198. function getFSIZE : TBits_5; inline;
  22199. function getRTREN : TBits_1; inline;
  22200. function getTXABAT : TBits_1; inline;
  22201. function getTXEN : TBits_1; inline;
  22202. function getTXERR : TBits_1; inline;
  22203. function getTXLARB : TBits_1; inline;
  22204. function getTXPRI : TBits_2; inline;
  22205. function getTXREQ : TBits_1; inline;
  22206. function getUINC : TBits_1; inline;
  22207. function getw : TBits_32; inline;
  22208. procedure setDONLY(thebits : TBits_1); inline;
  22209. procedure setFRESET(thebits : TBits_1); inline;
  22210. procedure setFSIZE(thebits : TBits_5); inline;
  22211. procedure setRTREN(thebits : TBits_1); inline;
  22212. procedure setTXABAT(thebits : TBits_1); inline;
  22213. procedure setTXEN(thebits : TBits_1); inline;
  22214. procedure setTXERR(thebits : TBits_1); inline;
  22215. procedure setTXLARB(thebits : TBits_1); inline;
  22216. procedure setTXPRI(thebits : TBits_2); inline;
  22217. procedure setTXREQ(thebits : TBits_1); inline;
  22218. procedure setUINC(thebits : TBits_1); inline;
  22219. procedure setw(thebits : TBits_32); inline;
  22220. public
  22221. procedure clearDONLY; inline;
  22222. procedure clearFRESET; inline;
  22223. procedure clearRTREN; inline;
  22224. procedure clearTXABAT; inline;
  22225. procedure clearTXEN; inline;
  22226. procedure clearTXERR; inline;
  22227. procedure clearTXLARB; inline;
  22228. procedure clearTXREQ; inline;
  22229. procedure clearUINC; inline;
  22230. procedure setDONLY; inline;
  22231. procedure setFRESET; inline;
  22232. procedure setRTREN; inline;
  22233. procedure setTXABAT; inline;
  22234. procedure setTXEN; inline;
  22235. procedure setTXERR; inline;
  22236. procedure setTXLARB; inline;
  22237. procedure setTXREQ; inline;
  22238. procedure setUINC; inline;
  22239. property DONLY : TBits_1 read getDONLY write setDONLY;
  22240. property FRESET : TBits_1 read getFRESET write setFRESET;
  22241. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22242. property RTREN : TBits_1 read getRTREN write setRTREN;
  22243. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22244. property TXEN : TBits_1 read getTXEN write setTXEN;
  22245. property TXERR : TBits_1 read getTXERR write setTXERR;
  22246. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22247. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22248. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22249. property UINC : TBits_1 read getUINC write setUINC;
  22250. property w : TBits_32 read getw write setw;
  22251. end;
  22252. TCAN1_C1FIFOINT26 = record
  22253. private
  22254. function getRXFULLIE : TBits_1; inline;
  22255. function getRXFULLIF : TBits_1; inline;
  22256. function getRXHALFIE : TBits_1; inline;
  22257. function getRXHALFIF : TBits_1; inline;
  22258. function getRXNEMPTYIE : TBits_1; inline;
  22259. function getRXNEMPTYIF : TBits_1; inline;
  22260. function getRXOVFLIE : TBits_1; inline;
  22261. function getRXOVFLIF : TBits_1; inline;
  22262. function getTXEMPTYIE : TBits_1; inline;
  22263. function getTXEMPTYIF : TBits_1; inline;
  22264. function getTXHALFIE : TBits_1; inline;
  22265. function getTXHALFIF : TBits_1; inline;
  22266. function getTXNFULLIE : TBits_1; inline;
  22267. function getTXNFULLIF : TBits_1; inline;
  22268. function getw : TBits_32; inline;
  22269. procedure setRXFULLIE(thebits : TBits_1); inline;
  22270. procedure setRXFULLIF(thebits : TBits_1); inline;
  22271. procedure setRXHALFIE(thebits : TBits_1); inline;
  22272. procedure setRXHALFIF(thebits : TBits_1); inline;
  22273. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22274. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  22275. procedure setRXOVFLIE(thebits : TBits_1); inline;
  22276. procedure setRXOVFLIF(thebits : TBits_1); inline;
  22277. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  22278. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  22279. procedure setTXHALFIE(thebits : TBits_1); inline;
  22280. procedure setTXHALFIF(thebits : TBits_1); inline;
  22281. procedure setTXNFULLIE(thebits : TBits_1); inline;
  22282. procedure setTXNFULLIF(thebits : TBits_1); inline;
  22283. procedure setw(thebits : TBits_32); inline;
  22284. public
  22285. procedure clearRXFULLIE; inline;
  22286. procedure clearRXFULLIF; inline;
  22287. procedure clearRXHALFIE; inline;
  22288. procedure clearRXHALFIF; inline;
  22289. procedure clearRXNEMPTYIE; inline;
  22290. procedure clearRXNEMPTYIF; inline;
  22291. procedure clearRXOVFLIE; inline;
  22292. procedure clearRXOVFLIF; inline;
  22293. procedure clearTXEMPTYIE; inline;
  22294. procedure clearTXEMPTYIF; inline;
  22295. procedure clearTXHALFIE; inline;
  22296. procedure clearTXHALFIF; inline;
  22297. procedure clearTXNFULLIE; inline;
  22298. procedure clearTXNFULLIF; inline;
  22299. procedure setRXFULLIE; inline;
  22300. procedure setRXFULLIF; inline;
  22301. procedure setRXHALFIE; inline;
  22302. procedure setRXHALFIF; inline;
  22303. procedure setRXNEMPTYIE; inline;
  22304. procedure setRXNEMPTYIF; inline;
  22305. procedure setRXOVFLIE; inline;
  22306. procedure setRXOVFLIF; inline;
  22307. procedure setTXEMPTYIE; inline;
  22308. procedure setTXEMPTYIF; inline;
  22309. procedure setTXHALFIE; inline;
  22310. procedure setTXHALFIF; inline;
  22311. procedure setTXNFULLIE; inline;
  22312. procedure setTXNFULLIF; inline;
  22313. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22314. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22315. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22316. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22317. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22318. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22319. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22320. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22321. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22322. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22323. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22324. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22325. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22326. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22327. property w : TBits_32 read getw write setw;
  22328. end;
  22329. TCAN1_C1FIFOCI26 = record
  22330. private
  22331. function getCFIFOCI : TBits_5; inline;
  22332. function getw : TBits_32; inline;
  22333. procedure setCFIFOCI(thebits : TBits_5); inline;
  22334. procedure setw(thebits : TBits_32); inline;
  22335. public
  22336. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22337. property w : TBits_32 read getw write setw;
  22338. end;
  22339. TCAN1_C1FIFOCON27 = record
  22340. private
  22341. function getDONLY : TBits_1; inline;
  22342. function getFRESET : TBits_1; inline;
  22343. function getFSIZE : TBits_5; inline;
  22344. function getRTREN : TBits_1; inline;
  22345. function getTXABAT : TBits_1; inline;
  22346. function getTXEN : TBits_1; inline;
  22347. function getTXERR : TBits_1; inline;
  22348. function getTXLARB : TBits_1; inline;
  22349. function getTXPRI : TBits_2; inline;
  22350. function getTXREQ : TBits_1; inline;
  22351. function getUINC : TBits_1; inline;
  22352. function getw : TBits_32; inline;
  22353. procedure setDONLY(thebits : TBits_1); inline;
  22354. procedure setFRESET(thebits : TBits_1); inline;
  22355. procedure setFSIZE(thebits : TBits_5); inline;
  22356. procedure setRTREN(thebits : TBits_1); inline;
  22357. procedure setTXABAT(thebits : TBits_1); inline;
  22358. procedure setTXEN(thebits : TBits_1); inline;
  22359. procedure setTXERR(thebits : TBits_1); inline;
  22360. procedure setTXLARB(thebits : TBits_1); inline;
  22361. procedure setTXPRI(thebits : TBits_2); inline;
  22362. procedure setTXREQ(thebits : TBits_1); inline;
  22363. procedure setUINC(thebits : TBits_1); inline;
  22364. procedure setw(thebits : TBits_32); inline;
  22365. public
  22366. procedure clearDONLY; inline;
  22367. procedure clearFRESET; inline;
  22368. procedure clearRTREN; inline;
  22369. procedure clearTXABAT; inline;
  22370. procedure clearTXEN; inline;
  22371. procedure clearTXERR; inline;
  22372. procedure clearTXLARB; inline;
  22373. procedure clearTXREQ; inline;
  22374. procedure clearUINC; inline;
  22375. procedure setDONLY; inline;
  22376. procedure setFRESET; inline;
  22377. procedure setRTREN; inline;
  22378. procedure setTXABAT; inline;
  22379. procedure setTXEN; inline;
  22380. procedure setTXERR; inline;
  22381. procedure setTXLARB; inline;
  22382. procedure setTXREQ; inline;
  22383. procedure setUINC; inline;
  22384. property DONLY : TBits_1 read getDONLY write setDONLY;
  22385. property FRESET : TBits_1 read getFRESET write setFRESET;
  22386. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22387. property RTREN : TBits_1 read getRTREN write setRTREN;
  22388. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22389. property TXEN : TBits_1 read getTXEN write setTXEN;
  22390. property TXERR : TBits_1 read getTXERR write setTXERR;
  22391. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22392. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22393. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22394. property UINC : TBits_1 read getUINC write setUINC;
  22395. property w : TBits_32 read getw write setw;
  22396. end;
  22397. TCAN1_C1FIFOINT27 = record
  22398. private
  22399. function getRXFULLIE : TBits_1; inline;
  22400. function getRXFULLIF : TBits_1; inline;
  22401. function getRXHALFIE : TBits_1; inline;
  22402. function getRXHALFIF : TBits_1; inline;
  22403. function getRXNEMPTYIE : TBits_1; inline;
  22404. function getRXNEMPTYIF : TBits_1; inline;
  22405. function getRXOVFLIE : TBits_1; inline;
  22406. function getRXOVFLIF : TBits_1; inline;
  22407. function getTXEMPTYIE : TBits_1; inline;
  22408. function getTXEMPTYIF : TBits_1; inline;
  22409. function getTXHALFIE : TBits_1; inline;
  22410. function getTXHALFIF : TBits_1; inline;
  22411. function getTXNFULLIE : TBits_1; inline;
  22412. function getTXNFULLIF : TBits_1; inline;
  22413. function getw : TBits_32; inline;
  22414. procedure setRXFULLIE(thebits : TBits_1); inline;
  22415. procedure setRXFULLIF(thebits : TBits_1); inline;
  22416. procedure setRXHALFIE(thebits : TBits_1); inline;
  22417. procedure setRXHALFIF(thebits : TBits_1); inline;
  22418. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22419. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  22420. procedure setRXOVFLIE(thebits : TBits_1); inline;
  22421. procedure setRXOVFLIF(thebits : TBits_1); inline;
  22422. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  22423. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  22424. procedure setTXHALFIE(thebits : TBits_1); inline;
  22425. procedure setTXHALFIF(thebits : TBits_1); inline;
  22426. procedure setTXNFULLIE(thebits : TBits_1); inline;
  22427. procedure setTXNFULLIF(thebits : TBits_1); inline;
  22428. procedure setw(thebits : TBits_32); inline;
  22429. public
  22430. procedure clearRXFULLIE; inline;
  22431. procedure clearRXFULLIF; inline;
  22432. procedure clearRXHALFIE; inline;
  22433. procedure clearRXHALFIF; inline;
  22434. procedure clearRXNEMPTYIE; inline;
  22435. procedure clearRXNEMPTYIF; inline;
  22436. procedure clearRXOVFLIE; inline;
  22437. procedure clearRXOVFLIF; inline;
  22438. procedure clearTXEMPTYIE; inline;
  22439. procedure clearTXEMPTYIF; inline;
  22440. procedure clearTXHALFIE; inline;
  22441. procedure clearTXHALFIF; inline;
  22442. procedure clearTXNFULLIE; inline;
  22443. procedure clearTXNFULLIF; inline;
  22444. procedure setRXFULLIE; inline;
  22445. procedure setRXFULLIF; inline;
  22446. procedure setRXHALFIE; inline;
  22447. procedure setRXHALFIF; inline;
  22448. procedure setRXNEMPTYIE; inline;
  22449. procedure setRXNEMPTYIF; inline;
  22450. procedure setRXOVFLIE; inline;
  22451. procedure setRXOVFLIF; inline;
  22452. procedure setTXEMPTYIE; inline;
  22453. procedure setTXEMPTYIF; inline;
  22454. procedure setTXHALFIE; inline;
  22455. procedure setTXHALFIF; inline;
  22456. procedure setTXNFULLIE; inline;
  22457. procedure setTXNFULLIF; inline;
  22458. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22459. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22460. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22461. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22462. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22463. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22464. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22465. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22466. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22467. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22468. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22469. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22470. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22471. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22472. property w : TBits_32 read getw write setw;
  22473. end;
  22474. TCAN1_C1FIFOCI27 = record
  22475. private
  22476. function getCFIFOCI : TBits_5; inline;
  22477. function getw : TBits_32; inline;
  22478. procedure setCFIFOCI(thebits : TBits_5); inline;
  22479. procedure setw(thebits : TBits_32); inline;
  22480. public
  22481. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22482. property w : TBits_32 read getw write setw;
  22483. end;
  22484. TCAN1_C1FIFOCON28 = record
  22485. private
  22486. function getDONLY : TBits_1; inline;
  22487. function getFRESET : TBits_1; inline;
  22488. function getFSIZE : TBits_5; inline;
  22489. function getRTREN : TBits_1; inline;
  22490. function getTXABAT : TBits_1; inline;
  22491. function getTXEN : TBits_1; inline;
  22492. function getTXERR : TBits_1; inline;
  22493. function getTXLARB : TBits_1; inline;
  22494. function getTXPRI : TBits_2; inline;
  22495. function getTXREQ : TBits_1; inline;
  22496. function getUINC : TBits_1; inline;
  22497. function getw : TBits_32; inline;
  22498. procedure setDONLY(thebits : TBits_1); inline;
  22499. procedure setFRESET(thebits : TBits_1); inline;
  22500. procedure setFSIZE(thebits : TBits_5); inline;
  22501. procedure setRTREN(thebits : TBits_1); inline;
  22502. procedure setTXABAT(thebits : TBits_1); inline;
  22503. procedure setTXEN(thebits : TBits_1); inline;
  22504. procedure setTXERR(thebits : TBits_1); inline;
  22505. procedure setTXLARB(thebits : TBits_1); inline;
  22506. procedure setTXPRI(thebits : TBits_2); inline;
  22507. procedure setTXREQ(thebits : TBits_1); inline;
  22508. procedure setUINC(thebits : TBits_1); inline;
  22509. procedure setw(thebits : TBits_32); inline;
  22510. public
  22511. procedure clearDONLY; inline;
  22512. procedure clearFRESET; inline;
  22513. procedure clearRTREN; inline;
  22514. procedure clearTXABAT; inline;
  22515. procedure clearTXEN; inline;
  22516. procedure clearTXERR; inline;
  22517. procedure clearTXLARB; inline;
  22518. procedure clearTXREQ; inline;
  22519. procedure clearUINC; inline;
  22520. procedure setDONLY; inline;
  22521. procedure setFRESET; inline;
  22522. procedure setRTREN; inline;
  22523. procedure setTXABAT; inline;
  22524. procedure setTXEN; inline;
  22525. procedure setTXERR; inline;
  22526. procedure setTXLARB; inline;
  22527. procedure setTXREQ; inline;
  22528. procedure setUINC; inline;
  22529. property DONLY : TBits_1 read getDONLY write setDONLY;
  22530. property FRESET : TBits_1 read getFRESET write setFRESET;
  22531. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22532. property RTREN : TBits_1 read getRTREN write setRTREN;
  22533. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22534. property TXEN : TBits_1 read getTXEN write setTXEN;
  22535. property TXERR : TBits_1 read getTXERR write setTXERR;
  22536. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22537. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22538. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22539. property UINC : TBits_1 read getUINC write setUINC;
  22540. property w : TBits_32 read getw write setw;
  22541. end;
  22542. TCAN1_C1FIFOINT28 = record
  22543. private
  22544. function getRXFULLIE : TBits_1; inline;
  22545. function getRXFULLIF : TBits_1; inline;
  22546. function getRXHALFIE : TBits_1; inline;
  22547. function getRXHALFIF : TBits_1; inline;
  22548. function getRXNEMPTYIE : TBits_1; inline;
  22549. function getRXNEMPTYIF : TBits_1; inline;
  22550. function getRXOVFLIE : TBits_1; inline;
  22551. function getRXOVFLIF : TBits_1; inline;
  22552. function getTXEMPTYIE : TBits_1; inline;
  22553. function getTXEMPTYIF : TBits_1; inline;
  22554. function getTXHALFIE : TBits_1; inline;
  22555. function getTXHALFIF : TBits_1; inline;
  22556. function getTXNFULLIE : TBits_1; inline;
  22557. function getTXNFULLIF : TBits_1; inline;
  22558. function getw : TBits_32; inline;
  22559. procedure setRXFULLIE(thebits : TBits_1); inline;
  22560. procedure setRXFULLIF(thebits : TBits_1); inline;
  22561. procedure setRXHALFIE(thebits : TBits_1); inline;
  22562. procedure setRXHALFIF(thebits : TBits_1); inline;
  22563. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22564. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  22565. procedure setRXOVFLIE(thebits : TBits_1); inline;
  22566. procedure setRXOVFLIF(thebits : TBits_1); inline;
  22567. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  22568. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  22569. procedure setTXHALFIE(thebits : TBits_1); inline;
  22570. procedure setTXHALFIF(thebits : TBits_1); inline;
  22571. procedure setTXNFULLIE(thebits : TBits_1); inline;
  22572. procedure setTXNFULLIF(thebits : TBits_1); inline;
  22573. procedure setw(thebits : TBits_32); inline;
  22574. public
  22575. procedure clearRXFULLIE; inline;
  22576. procedure clearRXFULLIF; inline;
  22577. procedure clearRXHALFIE; inline;
  22578. procedure clearRXHALFIF; inline;
  22579. procedure clearRXNEMPTYIE; inline;
  22580. procedure clearRXNEMPTYIF; inline;
  22581. procedure clearRXOVFLIE; inline;
  22582. procedure clearRXOVFLIF; inline;
  22583. procedure clearTXEMPTYIE; inline;
  22584. procedure clearTXEMPTYIF; inline;
  22585. procedure clearTXHALFIE; inline;
  22586. procedure clearTXHALFIF; inline;
  22587. procedure clearTXNFULLIE; inline;
  22588. procedure clearTXNFULLIF; inline;
  22589. procedure setRXFULLIE; inline;
  22590. procedure setRXFULLIF; inline;
  22591. procedure setRXHALFIE; inline;
  22592. procedure setRXHALFIF; inline;
  22593. procedure setRXNEMPTYIE; inline;
  22594. procedure setRXNEMPTYIF; inline;
  22595. procedure setRXOVFLIE; inline;
  22596. procedure setRXOVFLIF; inline;
  22597. procedure setTXEMPTYIE; inline;
  22598. procedure setTXEMPTYIF; inline;
  22599. procedure setTXHALFIE; inline;
  22600. procedure setTXHALFIF; inline;
  22601. procedure setTXNFULLIE; inline;
  22602. procedure setTXNFULLIF; inline;
  22603. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22604. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22605. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22606. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22607. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22608. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22609. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22610. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22611. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22612. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22613. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22614. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22615. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22616. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22617. property w : TBits_32 read getw write setw;
  22618. end;
  22619. TCAN1_C1FIFOCI28 = record
  22620. private
  22621. function getCFIFOCI : TBits_5; inline;
  22622. function getw : TBits_32; inline;
  22623. procedure setCFIFOCI(thebits : TBits_5); inline;
  22624. procedure setw(thebits : TBits_32); inline;
  22625. public
  22626. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22627. property w : TBits_32 read getw write setw;
  22628. end;
  22629. TCAN1_C1FIFOCON29 = record
  22630. private
  22631. function getDONLY : TBits_1; inline;
  22632. function getFRESET : TBits_1; inline;
  22633. function getFSIZE : TBits_5; inline;
  22634. function getRTREN : TBits_1; inline;
  22635. function getTXABAT : TBits_1; inline;
  22636. function getTXEN : TBits_1; inline;
  22637. function getTXERR : TBits_1; inline;
  22638. function getTXLARB : TBits_1; inline;
  22639. function getTXPRI : TBits_2; inline;
  22640. function getTXREQ : TBits_1; inline;
  22641. function getUINC : TBits_1; inline;
  22642. function getw : TBits_32; inline;
  22643. procedure setDONLY(thebits : TBits_1); inline;
  22644. procedure setFRESET(thebits : TBits_1); inline;
  22645. procedure setFSIZE(thebits : TBits_5); inline;
  22646. procedure setRTREN(thebits : TBits_1); inline;
  22647. procedure setTXABAT(thebits : TBits_1); inline;
  22648. procedure setTXEN(thebits : TBits_1); inline;
  22649. procedure setTXERR(thebits : TBits_1); inline;
  22650. procedure setTXLARB(thebits : TBits_1); inline;
  22651. procedure setTXPRI(thebits : TBits_2); inline;
  22652. procedure setTXREQ(thebits : TBits_1); inline;
  22653. procedure setUINC(thebits : TBits_1); inline;
  22654. procedure setw(thebits : TBits_32); inline;
  22655. public
  22656. procedure clearDONLY; inline;
  22657. procedure clearFRESET; inline;
  22658. procedure clearRTREN; inline;
  22659. procedure clearTXABAT; inline;
  22660. procedure clearTXEN; inline;
  22661. procedure clearTXERR; inline;
  22662. procedure clearTXLARB; inline;
  22663. procedure clearTXREQ; inline;
  22664. procedure clearUINC; inline;
  22665. procedure setDONLY; inline;
  22666. procedure setFRESET; inline;
  22667. procedure setRTREN; inline;
  22668. procedure setTXABAT; inline;
  22669. procedure setTXEN; inline;
  22670. procedure setTXERR; inline;
  22671. procedure setTXLARB; inline;
  22672. procedure setTXREQ; inline;
  22673. procedure setUINC; inline;
  22674. property DONLY : TBits_1 read getDONLY write setDONLY;
  22675. property FRESET : TBits_1 read getFRESET write setFRESET;
  22676. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22677. property RTREN : TBits_1 read getRTREN write setRTREN;
  22678. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22679. property TXEN : TBits_1 read getTXEN write setTXEN;
  22680. property TXERR : TBits_1 read getTXERR write setTXERR;
  22681. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22682. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22683. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22684. property UINC : TBits_1 read getUINC write setUINC;
  22685. property w : TBits_32 read getw write setw;
  22686. end;
  22687. TCAN1_C1FIFOINT29 = record
  22688. private
  22689. function getRXFULLIE : TBits_1; inline;
  22690. function getRXFULLIF : TBits_1; inline;
  22691. function getRXHALFIE : TBits_1; inline;
  22692. function getRXHALFIF : TBits_1; inline;
  22693. function getRXNEMPTYIE : TBits_1; inline;
  22694. function getRXNEMPTYIF : TBits_1; inline;
  22695. function getRXOVFLIE : TBits_1; inline;
  22696. function getRXOVFLIF : TBits_1; inline;
  22697. function getTXEMPTYIE : TBits_1; inline;
  22698. function getTXEMPTYIF : TBits_1; inline;
  22699. function getTXHALFIE : TBits_1; inline;
  22700. function getTXHALFIF : TBits_1; inline;
  22701. function getTXNFULLIE : TBits_1; inline;
  22702. function getTXNFULLIF : TBits_1; inline;
  22703. function getw : TBits_32; inline;
  22704. procedure setRXFULLIE(thebits : TBits_1); inline;
  22705. procedure setRXFULLIF(thebits : TBits_1); inline;
  22706. procedure setRXHALFIE(thebits : TBits_1); inline;
  22707. procedure setRXHALFIF(thebits : TBits_1); inline;
  22708. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22709. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  22710. procedure setRXOVFLIE(thebits : TBits_1); inline;
  22711. procedure setRXOVFLIF(thebits : TBits_1); inline;
  22712. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  22713. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  22714. procedure setTXHALFIE(thebits : TBits_1); inline;
  22715. procedure setTXHALFIF(thebits : TBits_1); inline;
  22716. procedure setTXNFULLIE(thebits : TBits_1); inline;
  22717. procedure setTXNFULLIF(thebits : TBits_1); inline;
  22718. procedure setw(thebits : TBits_32); inline;
  22719. public
  22720. procedure clearRXFULLIE; inline;
  22721. procedure clearRXFULLIF; inline;
  22722. procedure clearRXHALFIE; inline;
  22723. procedure clearRXHALFIF; inline;
  22724. procedure clearRXNEMPTYIE; inline;
  22725. procedure clearRXNEMPTYIF; inline;
  22726. procedure clearRXOVFLIE; inline;
  22727. procedure clearRXOVFLIF; inline;
  22728. procedure clearTXEMPTYIE; inline;
  22729. procedure clearTXEMPTYIF; inline;
  22730. procedure clearTXHALFIE; inline;
  22731. procedure clearTXHALFIF; inline;
  22732. procedure clearTXNFULLIE; inline;
  22733. procedure clearTXNFULLIF; inline;
  22734. procedure setRXFULLIE; inline;
  22735. procedure setRXFULLIF; inline;
  22736. procedure setRXHALFIE; inline;
  22737. procedure setRXHALFIF; inline;
  22738. procedure setRXNEMPTYIE; inline;
  22739. procedure setRXNEMPTYIF; inline;
  22740. procedure setRXOVFLIE; inline;
  22741. procedure setRXOVFLIF; inline;
  22742. procedure setTXEMPTYIE; inline;
  22743. procedure setTXEMPTYIF; inline;
  22744. procedure setTXHALFIE; inline;
  22745. procedure setTXHALFIF; inline;
  22746. procedure setTXNFULLIE; inline;
  22747. procedure setTXNFULLIF; inline;
  22748. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22749. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22750. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22751. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22752. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22753. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22754. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22755. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22756. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22757. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22758. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22759. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22760. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22761. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22762. property w : TBits_32 read getw write setw;
  22763. end;
  22764. TCAN1_C1FIFOCI29 = record
  22765. private
  22766. function getCFIFOCI : TBits_5; inline;
  22767. function getw : TBits_32; inline;
  22768. procedure setCFIFOCI(thebits : TBits_5); inline;
  22769. procedure setw(thebits : TBits_32); inline;
  22770. public
  22771. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22772. property w : TBits_32 read getw write setw;
  22773. end;
  22774. TCAN1_C1FIFOCON30 = record
  22775. private
  22776. function getDONLY : TBits_1; inline;
  22777. function getFRESET : TBits_1; inline;
  22778. function getFSIZE : TBits_5; inline;
  22779. function getRTREN : TBits_1; inline;
  22780. function getTXABAT : TBits_1; inline;
  22781. function getTXEN : TBits_1; inline;
  22782. function getTXERR : TBits_1; inline;
  22783. function getTXLARB : TBits_1; inline;
  22784. function getTXPRI : TBits_2; inline;
  22785. function getTXREQ : TBits_1; inline;
  22786. function getUINC : TBits_1; inline;
  22787. function getw : TBits_32; inline;
  22788. procedure setDONLY(thebits : TBits_1); inline;
  22789. procedure setFRESET(thebits : TBits_1); inline;
  22790. procedure setFSIZE(thebits : TBits_5); inline;
  22791. procedure setRTREN(thebits : TBits_1); inline;
  22792. procedure setTXABAT(thebits : TBits_1); inline;
  22793. procedure setTXEN(thebits : TBits_1); inline;
  22794. procedure setTXERR(thebits : TBits_1); inline;
  22795. procedure setTXLARB(thebits : TBits_1); inline;
  22796. procedure setTXPRI(thebits : TBits_2); inline;
  22797. procedure setTXREQ(thebits : TBits_1); inline;
  22798. procedure setUINC(thebits : TBits_1); inline;
  22799. procedure setw(thebits : TBits_32); inline;
  22800. public
  22801. procedure clearDONLY; inline;
  22802. procedure clearFRESET; inline;
  22803. procedure clearRTREN; inline;
  22804. procedure clearTXABAT; inline;
  22805. procedure clearTXEN; inline;
  22806. procedure clearTXERR; inline;
  22807. procedure clearTXLARB; inline;
  22808. procedure clearTXREQ; inline;
  22809. procedure clearUINC; inline;
  22810. procedure setDONLY; inline;
  22811. procedure setFRESET; inline;
  22812. procedure setRTREN; inline;
  22813. procedure setTXABAT; inline;
  22814. procedure setTXEN; inline;
  22815. procedure setTXERR; inline;
  22816. procedure setTXLARB; inline;
  22817. procedure setTXREQ; inline;
  22818. procedure setUINC; inline;
  22819. property DONLY : TBits_1 read getDONLY write setDONLY;
  22820. property FRESET : TBits_1 read getFRESET write setFRESET;
  22821. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22822. property RTREN : TBits_1 read getRTREN write setRTREN;
  22823. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22824. property TXEN : TBits_1 read getTXEN write setTXEN;
  22825. property TXERR : TBits_1 read getTXERR write setTXERR;
  22826. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22827. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22828. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22829. property UINC : TBits_1 read getUINC write setUINC;
  22830. property w : TBits_32 read getw write setw;
  22831. end;
  22832. TCAN1_C1FIFOINT30 = record
  22833. private
  22834. function getRXFULLIE : TBits_1; inline;
  22835. function getRXFULLIF : TBits_1; inline;
  22836. function getRXHALFIE : TBits_1; inline;
  22837. function getRXHALFIF : TBits_1; inline;
  22838. function getRXNEMPTYIE : TBits_1; inline;
  22839. function getRXNEMPTYIF : TBits_1; inline;
  22840. function getRXOVFLIE : TBits_1; inline;
  22841. function getRXOVFLIF : TBits_1; inline;
  22842. function getTXEMPTYIE : TBits_1; inline;
  22843. function getTXEMPTYIF : TBits_1; inline;
  22844. function getTXHALFIE : TBits_1; inline;
  22845. function getTXHALFIF : TBits_1; inline;
  22846. function getTXNFULLIE : TBits_1; inline;
  22847. function getTXNFULLIF : TBits_1; inline;
  22848. function getw : TBits_32; inline;
  22849. procedure setRXFULLIE(thebits : TBits_1); inline;
  22850. procedure setRXFULLIF(thebits : TBits_1); inline;
  22851. procedure setRXHALFIE(thebits : TBits_1); inline;
  22852. procedure setRXHALFIF(thebits : TBits_1); inline;
  22853. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22854. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  22855. procedure setRXOVFLIE(thebits : TBits_1); inline;
  22856. procedure setRXOVFLIF(thebits : TBits_1); inline;
  22857. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  22858. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  22859. procedure setTXHALFIE(thebits : TBits_1); inline;
  22860. procedure setTXHALFIF(thebits : TBits_1); inline;
  22861. procedure setTXNFULLIE(thebits : TBits_1); inline;
  22862. procedure setTXNFULLIF(thebits : TBits_1); inline;
  22863. procedure setw(thebits : TBits_32); inline;
  22864. public
  22865. procedure clearRXFULLIE; inline;
  22866. procedure clearRXFULLIF; inline;
  22867. procedure clearRXHALFIE; inline;
  22868. procedure clearRXHALFIF; inline;
  22869. procedure clearRXNEMPTYIE; inline;
  22870. procedure clearRXNEMPTYIF; inline;
  22871. procedure clearRXOVFLIE; inline;
  22872. procedure clearRXOVFLIF; inline;
  22873. procedure clearTXEMPTYIE; inline;
  22874. procedure clearTXEMPTYIF; inline;
  22875. procedure clearTXHALFIE; inline;
  22876. procedure clearTXHALFIF; inline;
  22877. procedure clearTXNFULLIE; inline;
  22878. procedure clearTXNFULLIF; inline;
  22879. procedure setRXFULLIE; inline;
  22880. procedure setRXFULLIF; inline;
  22881. procedure setRXHALFIE; inline;
  22882. procedure setRXHALFIF; inline;
  22883. procedure setRXNEMPTYIE; inline;
  22884. procedure setRXNEMPTYIF; inline;
  22885. procedure setRXOVFLIE; inline;
  22886. procedure setRXOVFLIF; inline;
  22887. procedure setTXEMPTYIE; inline;
  22888. procedure setTXEMPTYIF; inline;
  22889. procedure setTXHALFIE; inline;
  22890. procedure setTXHALFIF; inline;
  22891. procedure setTXNFULLIE; inline;
  22892. procedure setTXNFULLIF; inline;
  22893. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  22894. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  22895. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  22896. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  22897. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  22898. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  22899. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  22900. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  22901. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  22902. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  22903. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  22904. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  22905. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  22906. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  22907. property w : TBits_32 read getw write setw;
  22908. end;
  22909. TCAN1_C1FIFOCI30 = record
  22910. private
  22911. function getCFIFOCI : TBits_5; inline;
  22912. function getw : TBits_32; inline;
  22913. procedure setCFIFOCI(thebits : TBits_5); inline;
  22914. procedure setw(thebits : TBits_32); inline;
  22915. public
  22916. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  22917. property w : TBits_32 read getw write setw;
  22918. end;
  22919. TCAN1_C1FIFOCON31 = record
  22920. private
  22921. function getDONLY : TBits_1; inline;
  22922. function getFRESET : TBits_1; inline;
  22923. function getFSIZE : TBits_5; inline;
  22924. function getRTREN : TBits_1; inline;
  22925. function getTXABAT : TBits_1; inline;
  22926. function getTXEN : TBits_1; inline;
  22927. function getTXERR : TBits_1; inline;
  22928. function getTXLARB : TBits_1; inline;
  22929. function getTXPRI : TBits_2; inline;
  22930. function getTXREQ : TBits_1; inline;
  22931. function getUINC : TBits_1; inline;
  22932. function getw : TBits_32; inline;
  22933. procedure setDONLY(thebits : TBits_1); inline;
  22934. procedure setFRESET(thebits : TBits_1); inline;
  22935. procedure setFSIZE(thebits : TBits_5); inline;
  22936. procedure setRTREN(thebits : TBits_1); inline;
  22937. procedure setTXABAT(thebits : TBits_1); inline;
  22938. procedure setTXEN(thebits : TBits_1); inline;
  22939. procedure setTXERR(thebits : TBits_1); inline;
  22940. procedure setTXLARB(thebits : TBits_1); inline;
  22941. procedure setTXPRI(thebits : TBits_2); inline;
  22942. procedure setTXREQ(thebits : TBits_1); inline;
  22943. procedure setUINC(thebits : TBits_1); inline;
  22944. procedure setw(thebits : TBits_32); inline;
  22945. public
  22946. procedure clearDONLY; inline;
  22947. procedure clearFRESET; inline;
  22948. procedure clearRTREN; inline;
  22949. procedure clearTXABAT; inline;
  22950. procedure clearTXEN; inline;
  22951. procedure clearTXERR; inline;
  22952. procedure clearTXLARB; inline;
  22953. procedure clearTXREQ; inline;
  22954. procedure clearUINC; inline;
  22955. procedure setDONLY; inline;
  22956. procedure setFRESET; inline;
  22957. procedure setRTREN; inline;
  22958. procedure setTXABAT; inline;
  22959. procedure setTXEN; inline;
  22960. procedure setTXERR; inline;
  22961. procedure setTXLARB; inline;
  22962. procedure setTXREQ; inline;
  22963. procedure setUINC; inline;
  22964. property DONLY : TBits_1 read getDONLY write setDONLY;
  22965. property FRESET : TBits_1 read getFRESET write setFRESET;
  22966. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  22967. property RTREN : TBits_1 read getRTREN write setRTREN;
  22968. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  22969. property TXEN : TBits_1 read getTXEN write setTXEN;
  22970. property TXERR : TBits_1 read getTXERR write setTXERR;
  22971. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  22972. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  22973. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  22974. property UINC : TBits_1 read getUINC write setUINC;
  22975. property w : TBits_32 read getw write setw;
  22976. end;
  22977. TCAN1_C1FIFOINT31 = record
  22978. private
  22979. function getRXFULLIE : TBits_1; inline;
  22980. function getRXFULLIF : TBits_1; inline;
  22981. function getRXHALFIE : TBits_1; inline;
  22982. function getRXHALFIF : TBits_1; inline;
  22983. function getRXNEMPTYIE : TBits_1; inline;
  22984. function getRXNEMPTYIF : TBits_1; inline;
  22985. function getRXOVFLIE : TBits_1; inline;
  22986. function getRXOVFLIF : TBits_1; inline;
  22987. function getTXEMPTYIE : TBits_1; inline;
  22988. function getTXEMPTYIF : TBits_1; inline;
  22989. function getTXHALFIE : TBits_1; inline;
  22990. function getTXHALFIF : TBits_1; inline;
  22991. function getTXNFULLIE : TBits_1; inline;
  22992. function getTXNFULLIF : TBits_1; inline;
  22993. function getw : TBits_32; inline;
  22994. procedure setRXFULLIE(thebits : TBits_1); inline;
  22995. procedure setRXFULLIF(thebits : TBits_1); inline;
  22996. procedure setRXHALFIE(thebits : TBits_1); inline;
  22997. procedure setRXHALFIF(thebits : TBits_1); inline;
  22998. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  22999. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  23000. procedure setRXOVFLIE(thebits : TBits_1); inline;
  23001. procedure setRXOVFLIF(thebits : TBits_1); inline;
  23002. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  23003. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  23004. procedure setTXHALFIE(thebits : TBits_1); inline;
  23005. procedure setTXHALFIF(thebits : TBits_1); inline;
  23006. procedure setTXNFULLIE(thebits : TBits_1); inline;
  23007. procedure setTXNFULLIF(thebits : TBits_1); inline;
  23008. procedure setw(thebits : TBits_32); inline;
  23009. public
  23010. procedure clearRXFULLIE; inline;
  23011. procedure clearRXFULLIF; inline;
  23012. procedure clearRXHALFIE; inline;
  23013. procedure clearRXHALFIF; inline;
  23014. procedure clearRXNEMPTYIE; inline;
  23015. procedure clearRXNEMPTYIF; inline;
  23016. procedure clearRXOVFLIE; inline;
  23017. procedure clearRXOVFLIF; inline;
  23018. procedure clearTXEMPTYIE; inline;
  23019. procedure clearTXEMPTYIF; inline;
  23020. procedure clearTXHALFIE; inline;
  23021. procedure clearTXHALFIF; inline;
  23022. procedure clearTXNFULLIE; inline;
  23023. procedure clearTXNFULLIF; inline;
  23024. procedure setRXFULLIE; inline;
  23025. procedure setRXFULLIF; inline;
  23026. procedure setRXHALFIE; inline;
  23027. procedure setRXHALFIF; inline;
  23028. procedure setRXNEMPTYIE; inline;
  23029. procedure setRXNEMPTYIF; inline;
  23030. procedure setRXOVFLIE; inline;
  23031. procedure setRXOVFLIF; inline;
  23032. procedure setTXEMPTYIE; inline;
  23033. procedure setTXEMPTYIF; inline;
  23034. procedure setTXHALFIE; inline;
  23035. procedure setTXHALFIF; inline;
  23036. procedure setTXNFULLIE; inline;
  23037. procedure setTXNFULLIF; inline;
  23038. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  23039. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  23040. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  23041. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  23042. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  23043. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  23044. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  23045. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  23046. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  23047. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  23048. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  23049. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  23050. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  23051. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  23052. property w : TBits_32 read getw write setw;
  23053. end;
  23054. TCAN1_C1FIFOCI31 = record
  23055. private
  23056. function getCFIFOCI : TBits_5; inline;
  23057. function getw : TBits_32; inline;
  23058. procedure setCFIFOCI(thebits : TBits_5); inline;
  23059. procedure setw(thebits : TBits_32); inline;
  23060. public
  23061. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  23062. property w : TBits_32 read getw write setw;
  23063. end;
  23064. type
  23065. TCAN1Registers = record
  23066. C1CONbits : TCAN1_C1CON;
  23067. C1CON : longWord;
  23068. C1CONCLR : longWord;
  23069. C1CONSET : longWord;
  23070. C1CONINV : longWord;
  23071. C1CFGbits : TCAN1_C1CFG;
  23072. C1CFG : longWord;
  23073. C1CFGCLR : longWord;
  23074. C1CFGSET : longWord;
  23075. C1CFGINV : longWord;
  23076. C1INTbits : TCAN1_C1INT;
  23077. C1INT : longWord;
  23078. C1INTCLR : longWord;
  23079. C1INTSET : longWord;
  23080. C1INTINV : longWord;
  23081. C1VECbits : TCAN1_C1VEC;
  23082. C1VEC : longWord;
  23083. C1VECCLR : longWord;
  23084. C1VECSET : longWord;
  23085. C1VECINV : longWord;
  23086. C1TRECbits : TCAN1_C1TREC;
  23087. C1TREC : longWord;
  23088. C1TRECCLR : longWord;
  23089. C1TRECSET : longWord;
  23090. C1TRECINV : longWord;
  23091. C1FSTATbits : TCAN1_C1FSTAT;
  23092. C1FSTAT : longWord;
  23093. C1FSTATCLR : longWord;
  23094. C1FSTATSET : longWord;
  23095. C1FSTATINV : longWord;
  23096. C1RXOVFbits : TCAN1_C1RXOVF;
  23097. C1RXOVF : longWord;
  23098. C1RXOVFCLR : longWord;
  23099. C1RXOVFSET : longWord;
  23100. C1RXOVFINV : longWord;
  23101. C1TMRbits : TCAN1_C1TMR;
  23102. C1TMR : longWord;
  23103. C1TMRCLR : longWord;
  23104. C1TMRSET : longWord;
  23105. C1TMRINV : longWord;
  23106. C1RXM0bits : TCAN1_C1RXM0;
  23107. C1RXM0 : longWord;
  23108. C1RXM0CLR : longWord;
  23109. C1RXM0SET : longWord;
  23110. C1RXM0INV : longWord;
  23111. C1RXM1bits : TCAN1_C1RXM1;
  23112. C1RXM1 : longWord;
  23113. C1RXM1CLR : longWord;
  23114. C1RXM1SET : longWord;
  23115. C1RXM1INV : longWord;
  23116. C1RXM2bits : TCAN1_C1RXM2;
  23117. C1RXM2 : longWord;
  23118. C1RXM2CLR : longWord;
  23119. C1RXM2SET : longWord;
  23120. C1RXM2INV : longWord;
  23121. C1RXM3bits : TCAN1_C1RXM3;
  23122. C1RXM3 : longWord;
  23123. C1RXM3CLR : longWord;
  23124. C1RXM3SET : longWord;
  23125. C1RXM3INV : longWord;
  23126. C1FLTCON0bits : TCAN1_C1FLTCON0;
  23127. C1FLTCON0 : longWord;
  23128. C1FLTCON0CLR : longWord;
  23129. C1FLTCON0SET : longWord;
  23130. C1FLTCON0INV : longWord;
  23131. C1FLTCON1bits : TCAN1_C1FLTCON1;
  23132. C1FLTCON1 : longWord;
  23133. C1FLTCON1CLR : longWord;
  23134. C1FLTCON1SET : longWord;
  23135. C1FLTCON1INV : longWord;
  23136. C1FLTCON2bits : TCAN1_C1FLTCON2;
  23137. C1FLTCON2 : longWord;
  23138. C1FLTCON2CLR : longWord;
  23139. C1FLTCON2SET : longWord;
  23140. C1FLTCON2INV : longWord;
  23141. C1FLTCON3bits : TCAN1_C1FLTCON3;
  23142. C1FLTCON3 : longWord;
  23143. C1FLTCON3CLR : longWord;
  23144. C1FLTCON3SET : longWord;
  23145. C1FLTCON3INV : longWord;
  23146. C1FLTCON4bits : TCAN1_C1FLTCON4;
  23147. C1FLTCON4 : longWord;
  23148. C1FLTCON4CLR : longWord;
  23149. C1FLTCON4SET : longWord;
  23150. C1FLTCON4INV : longWord;
  23151. C1FLTCON5bits : TCAN1_C1FLTCON5;
  23152. C1FLTCON5 : longWord;
  23153. C1FLTCON5CLR : longWord;
  23154. C1FLTCON5SET : longWord;
  23155. C1FLTCON5INV : longWord;
  23156. C1FLTCON6bits : TCAN1_C1FLTCON6;
  23157. C1FLTCON6 : longWord;
  23158. C1FLTCON6CLR : longWord;
  23159. C1FLTCON6SET : longWord;
  23160. C1FLTCON6INV : longWord;
  23161. C1FLTCON7bits : TCAN1_C1FLTCON7;
  23162. C1FLTCON7 : longWord;
  23163. C1FLTCON7CLR : longWord;
  23164. C1FLTCON7SET : longWord;
  23165. C1FLTCON7INV : longWord;
  23166. C1RXF0bits : TCAN1_C1RXF0;
  23167. C1RXF0 : longWord;
  23168. C1RXF0CLR : longWord;
  23169. C1RXF0SET : longWord;
  23170. C1RXF0INV : longWord;
  23171. C1RXF1bits : TCAN1_C1RXF1;
  23172. C1RXF1 : longWord;
  23173. C1RXF1CLR : longWord;
  23174. C1RXF1SET : longWord;
  23175. C1RXF1INV : longWord;
  23176. C1RXF2bits : TCAN1_C1RXF2;
  23177. C1RXF2 : longWord;
  23178. C1RXF2CLR : longWord;
  23179. C1RXF2SET : longWord;
  23180. C1RXF2INV : longWord;
  23181. C1RXF3bits : TCAN1_C1RXF3;
  23182. C1RXF3 : longWord;
  23183. C1RXF3CLR : longWord;
  23184. C1RXF3SET : longWord;
  23185. C1RXF3INV : longWord;
  23186. C1RXF4bits : TCAN1_C1RXF4;
  23187. C1RXF4 : longWord;
  23188. C1RXF4CLR : longWord;
  23189. C1RXF4SET : longWord;
  23190. C1RXF4INV : longWord;
  23191. C1RXF5bits : TCAN1_C1RXF5;
  23192. C1RXF5 : longWord;
  23193. C1RXF5CLR : longWord;
  23194. C1RXF5SET : longWord;
  23195. C1RXF5INV : longWord;
  23196. C1RXF6bits : TCAN1_C1RXF6;
  23197. C1RXF6 : longWord;
  23198. C1RXF6CLR : longWord;
  23199. C1RXF6SET : longWord;
  23200. C1RXF6INV : longWord;
  23201. C1RXF7bits : TCAN1_C1RXF7;
  23202. C1RXF7 : longWord;
  23203. C1RXF7CLR : longWord;
  23204. C1RXF7SET : longWord;
  23205. C1RXF7INV : longWord;
  23206. C1RXF8bits : TCAN1_C1RXF8;
  23207. C1RXF8 : longWord;
  23208. C1RXF8CLR : longWord;
  23209. C1RXF8SET : longWord;
  23210. C1RXF8INV : longWord;
  23211. C1RXF9bits : TCAN1_C1RXF9;
  23212. C1RXF9 : longWord;
  23213. C1RXF9CLR : longWord;
  23214. C1RXF9SET : longWord;
  23215. C1RXF9INV : longWord;
  23216. C1RXF10bits : TCAN1_C1RXF10;
  23217. C1RXF10 : longWord;
  23218. C1RXF10CLR : longWord;
  23219. C1RXF10SET : longWord;
  23220. C1RXF10INV : longWord;
  23221. C1RXF11bits : TCAN1_C1RXF11;
  23222. C1RXF11 : longWord;
  23223. C1RXF11CLR : longWord;
  23224. C1RXF11SET : longWord;
  23225. C1RXF11INV : longWord;
  23226. C1RXF12bits : TCAN1_C1RXF12;
  23227. C1RXF12 : longWord;
  23228. C1RXF12CLR : longWord;
  23229. C1RXF12SET : longWord;
  23230. C1RXF12INV : longWord;
  23231. C1RXF13bits : TCAN1_C1RXF13;
  23232. C1RXF13 : longWord;
  23233. C1RXF13CLR : longWord;
  23234. C1RXF13SET : longWord;
  23235. C1RXF13INV : longWord;
  23236. C1RXF14bits : TCAN1_C1RXF14;
  23237. C1RXF14 : longWord;
  23238. C1RXF14CLR : longWord;
  23239. C1RXF14SET : longWord;
  23240. C1RXF14INV : longWord;
  23241. C1RXF15bits : TCAN1_C1RXF15;
  23242. C1RXF15 : longWord;
  23243. C1RXF15CLR : longWord;
  23244. C1RXF15SET : longWord;
  23245. C1RXF15INV : longWord;
  23246. C1RXF16bits : TCAN1_C1RXF16;
  23247. C1RXF16 : longWord;
  23248. C1RXF16CLR : longWord;
  23249. C1RXF16SET : longWord;
  23250. C1RXF16INV : longWord;
  23251. C1RXF17bits : TCAN1_C1RXF17;
  23252. C1RXF17 : longWord;
  23253. C1RXF17CLR : longWord;
  23254. C1RXF17SET : longWord;
  23255. C1RXF17INV : longWord;
  23256. C1RXF18bits : TCAN1_C1RXF18;
  23257. C1RXF18 : longWord;
  23258. C1RXF18CLR : longWord;
  23259. C1RXF18SET : longWord;
  23260. C1RXF18INV : longWord;
  23261. C1RXF19bits : TCAN1_C1RXF19;
  23262. C1RXF19 : longWord;
  23263. C1RXF19CLR : longWord;
  23264. C1RXF19SET : longWord;
  23265. C1RXF19INV : longWord;
  23266. C1RXF20bits : TCAN1_C1RXF20;
  23267. C1RXF20 : longWord;
  23268. C1RXF20CLR : longWord;
  23269. C1RXF20SET : longWord;
  23270. C1RXF20INV : longWord;
  23271. C1RXF21bits : TCAN1_C1RXF21;
  23272. C1RXF21 : longWord;
  23273. C1RXF21CLR : longWord;
  23274. C1RXF21SET : longWord;
  23275. C1RXF21INV : longWord;
  23276. C1RXF22bits : TCAN1_C1RXF22;
  23277. C1RXF22 : longWord;
  23278. C1RXF22CLR : longWord;
  23279. C1RXF22SET : longWord;
  23280. C1RXF22INV : longWord;
  23281. C1RXF23bits : TCAN1_C1RXF23;
  23282. C1RXF23 : longWord;
  23283. C1RXF23CLR : longWord;
  23284. C1RXF23SET : longWord;
  23285. C1RXF23INV : longWord;
  23286. C1RXF24bits : TCAN1_C1RXF24;
  23287. C1RXF24 : longWord;
  23288. C1RXF24CLR : longWord;
  23289. C1RXF24SET : longWord;
  23290. C1RXF24INV : longWord;
  23291. C1RXF25bits : TCAN1_C1RXF25;
  23292. C1RXF25 : longWord;
  23293. C1RXF25CLR : longWord;
  23294. C1RXF25SET : longWord;
  23295. C1RXF25INV : longWord;
  23296. C1RXF26bits : TCAN1_C1RXF26;
  23297. C1RXF26 : longWord;
  23298. C1RXF26CLR : longWord;
  23299. C1RXF26SET : longWord;
  23300. C1RXF26INV : longWord;
  23301. C1RXF27bits : TCAN1_C1RXF27;
  23302. C1RXF27 : longWord;
  23303. C1RXF27CLR : longWord;
  23304. C1RXF27SET : longWord;
  23305. C1RXF27INV : longWord;
  23306. C1RXF28bits : TCAN1_C1RXF28;
  23307. C1RXF28 : longWord;
  23308. C1RXF28CLR : longWord;
  23309. C1RXF28SET : longWord;
  23310. C1RXF28INV : longWord;
  23311. C1RXF29bits : TCAN1_C1RXF29;
  23312. C1RXF29 : longWord;
  23313. C1RXF29CLR : longWord;
  23314. C1RXF29SET : longWord;
  23315. C1RXF29INV : longWord;
  23316. C1RXF30bits : TCAN1_C1RXF30;
  23317. C1RXF30 : longWord;
  23318. C1RXF30CLR : longWord;
  23319. C1RXF30SET : longWord;
  23320. C1RXF30INV : longWord;
  23321. C1RXF31bits : TCAN1_C1RXF31;
  23322. C1RXF31 : longWord;
  23323. C1RXF31CLR : longWord;
  23324. C1RXF31SET : longWord;
  23325. C1RXF31INV : longWord;
  23326. C1FIFOBA : longWord;
  23327. C1FIFOBACLR : longWord;
  23328. C1FIFOBASET : longWord;
  23329. C1FIFOBAINV : longWord;
  23330. C1FIFOCON0bits : TCAN1_C1FIFOCON0;
  23331. C1FIFOCON0 : longWord;
  23332. C1FIFOCON0CLR : longWord;
  23333. C1FIFOCON0SET : longWord;
  23334. C1FIFOCON0INV : longWord;
  23335. C1FIFOINT0bits : TCAN1_C1FIFOINT0;
  23336. C1FIFOINT0 : longWord;
  23337. C1FIFOINT0CLR : longWord;
  23338. C1FIFOINT0SET : longWord;
  23339. C1FIFOINT0INV : longWord;
  23340. C1FIFOUA0 : longWord;
  23341. C1FIFOUA0CLR : longWord;
  23342. C1FIFOUA0SET : longWord;
  23343. C1FIFOUA0INV : longWord;
  23344. C1FIFOCI0bits : TCAN1_C1FIFOCI0;
  23345. C1FIFOCI0 : longWord;
  23346. C1FIFOCI0CLR : longWord;
  23347. C1FIFOCI0SET : longWord;
  23348. C1FIFOCI0INV : longWord;
  23349. C1FIFOCON1bits : TCAN1_C1FIFOCON1;
  23350. C1FIFOCON1 : longWord;
  23351. C1FIFOCON1CLR : longWord;
  23352. C1FIFOCON1SET : longWord;
  23353. C1FIFOCON1INV : longWord;
  23354. C1FIFOINT1bits : TCAN1_C1FIFOINT1;
  23355. C1FIFOINT1 : longWord;
  23356. C1FIFOINT1CLR : longWord;
  23357. C1FIFOINT1SET : longWord;
  23358. C1FIFOINT1INV : longWord;
  23359. C1FIFOUA1 : longWord;
  23360. C1FIFOUA1CLR : longWord;
  23361. C1FIFOUA1SET : longWord;
  23362. C1FIFOUA1INV : longWord;
  23363. C1FIFOCI1bits : TCAN1_C1FIFOCI1;
  23364. C1FIFOCI1 : longWord;
  23365. C1FIFOCI1CLR : longWord;
  23366. C1FIFOCI1SET : longWord;
  23367. C1FIFOCI1INV : longWord;
  23368. C1FIFOCON2bits : TCAN1_C1FIFOCON2;
  23369. C1FIFOCON2 : longWord;
  23370. C1FIFOCON2CLR : longWord;
  23371. C1FIFOCON2SET : longWord;
  23372. C1FIFOCON2INV : longWord;
  23373. C1FIFOINT2bits : TCAN1_C1FIFOINT2;
  23374. C1FIFOINT2 : longWord;
  23375. C1FIFOINT2CLR : longWord;
  23376. C1FIFOINT2SET : longWord;
  23377. C1FIFOINT2INV : longWord;
  23378. C1FIFOUA2 : longWord;
  23379. C1FIFOUA2CLR : longWord;
  23380. C1FIFOUA2SET : longWord;
  23381. C1FIFOUA2INV : longWord;
  23382. C1FIFOCI2bits : TCAN1_C1FIFOCI2;
  23383. C1FIFOCI2 : longWord;
  23384. C1FIFOCI2CLR : longWord;
  23385. C1FIFOCI2SET : longWord;
  23386. C1FIFOCI2INV : longWord;
  23387. C1FIFOCON3bits : TCAN1_C1FIFOCON3;
  23388. C1FIFOCON3 : longWord;
  23389. C1FIFOCON3CLR : longWord;
  23390. C1FIFOCON3SET : longWord;
  23391. C1FIFOCON3INV : longWord;
  23392. C1FIFOINT3bits : TCAN1_C1FIFOINT3;
  23393. C1FIFOINT3 : longWord;
  23394. C1FIFOINT3CLR : longWord;
  23395. C1FIFOINT3SET : longWord;
  23396. C1FIFOINT3INV : longWord;
  23397. C1FIFOUA3 : longWord;
  23398. C1FIFOUA3CLR : longWord;
  23399. C1FIFOUA3SET : longWord;
  23400. C1FIFOUA3INV : longWord;
  23401. C1FIFOCI3bits : TCAN1_C1FIFOCI3;
  23402. C1FIFOCI3 : longWord;
  23403. C1FIFOCI3CLR : longWord;
  23404. C1FIFOCI3SET : longWord;
  23405. C1FIFOCI3INV : longWord;
  23406. C1FIFOCON4bits : TCAN1_C1FIFOCON4;
  23407. C1FIFOCON4 : longWord;
  23408. C1FIFOCON4CLR : longWord;
  23409. C1FIFOCON4SET : longWord;
  23410. C1FIFOCON4INV : longWord;
  23411. C1FIFOINT4bits : TCAN1_C1FIFOINT4;
  23412. C1FIFOINT4 : longWord;
  23413. C1FIFOINT4CLR : longWord;
  23414. C1FIFOINT4SET : longWord;
  23415. C1FIFOINT4INV : longWord;
  23416. C1FIFOUA4 : longWord;
  23417. C1FIFOUA4CLR : longWord;
  23418. C1FIFOUA4SET : longWord;
  23419. C1FIFOUA4INV : longWord;
  23420. C1FIFOCI4bits : TCAN1_C1FIFOCI4;
  23421. C1FIFOCI4 : longWord;
  23422. C1FIFOCI4CLR : longWord;
  23423. C1FIFOCI4SET : longWord;
  23424. C1FIFOCI4INV : longWord;
  23425. C1FIFOCON5bits : TCAN1_C1FIFOCON5;
  23426. C1FIFOCON5 : longWord;
  23427. C1FIFOCON5CLR : longWord;
  23428. C1FIFOCON5SET : longWord;
  23429. C1FIFOCON5INV : longWord;
  23430. C1FIFOINT5bits : TCAN1_C1FIFOINT5;
  23431. C1FIFOINT5 : longWord;
  23432. C1FIFOINT5CLR : longWord;
  23433. C1FIFOINT5SET : longWord;
  23434. C1FIFOINT5INV : longWord;
  23435. C1FIFOUA5 : longWord;
  23436. C1FIFOUA5CLR : longWord;
  23437. C1FIFOUA5SET : longWord;
  23438. C1FIFOUA5INV : longWord;
  23439. C1FIFOCI5bits : TCAN1_C1FIFOCI5;
  23440. C1FIFOCI5 : longWord;
  23441. C1FIFOCI5CLR : longWord;
  23442. C1FIFOCI5SET : longWord;
  23443. C1FIFOCI5INV : longWord;
  23444. C1FIFOCON6bits : TCAN1_C1FIFOCON6;
  23445. C1FIFOCON6 : longWord;
  23446. C1FIFOCON6CLR : longWord;
  23447. C1FIFOCON6SET : longWord;
  23448. C1FIFOCON6INV : longWord;
  23449. C1FIFOINT6bits : TCAN1_C1FIFOINT6;
  23450. C1FIFOINT6 : longWord;
  23451. C1FIFOINT6CLR : longWord;
  23452. C1FIFOINT6SET : longWord;
  23453. C1FIFOINT6INV : longWord;
  23454. C1FIFOUA6 : longWord;
  23455. C1FIFOUA6CLR : longWord;
  23456. C1FIFOUA6SET : longWord;
  23457. C1FIFOUA6INV : longWord;
  23458. C1FIFOCI6bits : TCAN1_C1FIFOCI6;
  23459. C1FIFOCI6 : longWord;
  23460. C1FIFOCI6CLR : longWord;
  23461. C1FIFOCI6SET : longWord;
  23462. C1FIFOCI6INV : longWord;
  23463. C1FIFOCON7bits : TCAN1_C1FIFOCON7;
  23464. C1FIFOCON7 : longWord;
  23465. C1FIFOCON7CLR : longWord;
  23466. C1FIFOCON7SET : longWord;
  23467. C1FIFOCON7INV : longWord;
  23468. C1FIFOINT7bits : TCAN1_C1FIFOINT7;
  23469. C1FIFOINT7 : longWord;
  23470. C1FIFOINT7CLR : longWord;
  23471. C1FIFOINT7SET : longWord;
  23472. C1FIFOINT7INV : longWord;
  23473. C1FIFOUA7 : longWord;
  23474. C1FIFOUA7CLR : longWord;
  23475. C1FIFOUA7SET : longWord;
  23476. C1FIFOUA7INV : longWord;
  23477. C1FIFOCI7bits : TCAN1_C1FIFOCI7;
  23478. C1FIFOCI7 : longWord;
  23479. C1FIFOCI7CLR : longWord;
  23480. C1FIFOCI7SET : longWord;
  23481. C1FIFOCI7INV : longWord;
  23482. C1FIFOCON8bits : TCAN1_C1FIFOCON8;
  23483. C1FIFOCON8 : longWord;
  23484. C1FIFOCON8CLR : longWord;
  23485. C1FIFOCON8SET : longWord;
  23486. C1FIFOCON8INV : longWord;
  23487. C1FIFOINT8bits : TCAN1_C1FIFOINT8;
  23488. C1FIFOINT8 : longWord;
  23489. C1FIFOINT8CLR : longWord;
  23490. C1FIFOINT8SET : longWord;
  23491. C1FIFOINT8INV : longWord;
  23492. C1FIFOUA8 : longWord;
  23493. C1FIFOUA8CLR : longWord;
  23494. C1FIFOUA8SET : longWord;
  23495. C1FIFOUA8INV : longWord;
  23496. C1FIFOCI8bits : TCAN1_C1FIFOCI8;
  23497. C1FIFOCI8 : longWord;
  23498. C1FIFOCI8CLR : longWord;
  23499. C1FIFOCI8SET : longWord;
  23500. C1FIFOCI8INV : longWord;
  23501. C1FIFOCON9bits : TCAN1_C1FIFOCON9;
  23502. C1FIFOCON9 : longWord;
  23503. C1FIFOCON9CLR : longWord;
  23504. C1FIFOCON9SET : longWord;
  23505. C1FIFOCON9INV : longWord;
  23506. C1FIFOINT9bits : TCAN1_C1FIFOINT9;
  23507. C1FIFOINT9 : longWord;
  23508. C1FIFOINT9CLR : longWord;
  23509. C1FIFOINT9SET : longWord;
  23510. C1FIFOINT9INV : longWord;
  23511. C1FIFOUA9 : longWord;
  23512. C1FIFOUA9CLR : longWord;
  23513. C1FIFOUA9SET : longWord;
  23514. C1FIFOUA9INV : longWord;
  23515. C1FIFOCI9bits : TCAN1_C1FIFOCI9;
  23516. C1FIFOCI9 : longWord;
  23517. C1FIFOCI9CLR : longWord;
  23518. C1FIFOCI9SET : longWord;
  23519. C1FIFOCI9INV : longWord;
  23520. C1FIFOCON10bits : TCAN1_C1FIFOCON10;
  23521. C1FIFOCON10 : longWord;
  23522. C1FIFOCON10CLR : longWord;
  23523. C1FIFOCON10SET : longWord;
  23524. C1FIFOCON10INV : longWord;
  23525. C1FIFOINT10bits : TCAN1_C1FIFOINT10;
  23526. C1FIFOINT10 : longWord;
  23527. C1FIFOINT10CLR : longWord;
  23528. C1FIFOINT10SET : longWord;
  23529. C1FIFOINT10INV : longWord;
  23530. C1FIFOUA10 : longWord;
  23531. C1FIFOUA10CLR : longWord;
  23532. C1FIFOUA10SET : longWord;
  23533. C1FIFOUA10INV : longWord;
  23534. C1FIFOCI10bits : TCAN1_C1FIFOCI10;
  23535. C1FIFOCI10 : longWord;
  23536. C1FIFOCI10CLR : longWord;
  23537. C1FIFOCI10SET : longWord;
  23538. C1FIFOCI10INV : longWord;
  23539. C1FIFOCON11bits : TCAN1_C1FIFOCON11;
  23540. C1FIFOCON11 : longWord;
  23541. C1FIFOCON11CLR : longWord;
  23542. C1FIFOCON11SET : longWord;
  23543. C1FIFOCON11INV : longWord;
  23544. C1FIFOINT11bits : TCAN1_C1FIFOINT11;
  23545. C1FIFOINT11 : longWord;
  23546. C1FIFOINT11CLR : longWord;
  23547. C1FIFOINT11SET : longWord;
  23548. C1FIFOINT11INV : longWord;
  23549. C1FIFOUA11 : longWord;
  23550. C1FIFOUA11CLR : longWord;
  23551. C1FIFOUA11SET : longWord;
  23552. C1FIFOUA11INV : longWord;
  23553. C1FIFOCI11bits : TCAN1_C1FIFOCI11;
  23554. C1FIFOCI11 : longWord;
  23555. C1FIFOCI11CLR : longWord;
  23556. C1FIFOCI11SET : longWord;
  23557. C1FIFOCI11INV : longWord;
  23558. C1FIFOCON12bits : TCAN1_C1FIFOCON12;
  23559. C1FIFOCON12 : longWord;
  23560. C1FIFOCON12CLR : longWord;
  23561. C1FIFOCON12SET : longWord;
  23562. C1FIFOCON12INV : longWord;
  23563. C1FIFOINT12bits : TCAN1_C1FIFOINT12;
  23564. C1FIFOINT12 : longWord;
  23565. C1FIFOINT12CLR : longWord;
  23566. C1FIFOINT12SET : longWord;
  23567. C1FIFOINT12INV : longWord;
  23568. C1FIFOUA12 : longWord;
  23569. C1FIFOUA12CLR : longWord;
  23570. C1FIFOUA12SET : longWord;
  23571. C1FIFOUA12INV : longWord;
  23572. C1FIFOCI12bits : TCAN1_C1FIFOCI12;
  23573. C1FIFOCI12 : longWord;
  23574. C1FIFOCI12CLR : longWord;
  23575. C1FIFOCI12SET : longWord;
  23576. C1FIFOCI12INV : longWord;
  23577. C1FIFOCON13bits : TCAN1_C1FIFOCON13;
  23578. C1FIFOCON13 : longWord;
  23579. C1FIFOCON13CLR : longWord;
  23580. C1FIFOCON13SET : longWord;
  23581. C1FIFOCON13INV : longWord;
  23582. C1FIFOINT13bits : TCAN1_C1FIFOINT13;
  23583. C1FIFOINT13 : longWord;
  23584. C1FIFOINT13CLR : longWord;
  23585. C1FIFOINT13SET : longWord;
  23586. C1FIFOINT13INV : longWord;
  23587. C1FIFOUA13 : longWord;
  23588. C1FIFOUA13CLR : longWord;
  23589. C1FIFOUA13SET : longWord;
  23590. C1FIFOUA13INV : longWord;
  23591. C1FIFOCI13bits : TCAN1_C1FIFOCI13;
  23592. C1FIFOCI13 : longWord;
  23593. C1FIFOCI13CLR : longWord;
  23594. C1FIFOCI13SET : longWord;
  23595. C1FIFOCI13INV : longWord;
  23596. C1FIFOCON14bits : TCAN1_C1FIFOCON14;
  23597. C1FIFOCON14 : longWord;
  23598. C1FIFOCON14CLR : longWord;
  23599. C1FIFOCON14SET : longWord;
  23600. C1FIFOCON14INV : longWord;
  23601. C1FIFOINT14bits : TCAN1_C1FIFOINT14;
  23602. C1FIFOINT14 : longWord;
  23603. C1FIFOINT14CLR : longWord;
  23604. C1FIFOINT14SET : longWord;
  23605. C1FIFOINT14INV : longWord;
  23606. C1FIFOUA14 : longWord;
  23607. C1FIFOUA14CLR : longWord;
  23608. C1FIFOUA14SET : longWord;
  23609. C1FIFOUA14INV : longWord;
  23610. C1FIFOCI14bits : TCAN1_C1FIFOCI14;
  23611. C1FIFOCI14 : longWord;
  23612. C1FIFOCI14CLR : longWord;
  23613. C1FIFOCI14SET : longWord;
  23614. C1FIFOCI14INV : longWord;
  23615. C1FIFOCON15bits : TCAN1_C1FIFOCON15;
  23616. C1FIFOCON15 : longWord;
  23617. C1FIFOCON15CLR : longWord;
  23618. C1FIFOCON15SET : longWord;
  23619. C1FIFOCON15INV : longWord;
  23620. C1FIFOINT15bits : TCAN1_C1FIFOINT15;
  23621. C1FIFOINT15 : longWord;
  23622. C1FIFOINT15CLR : longWord;
  23623. C1FIFOINT15SET : longWord;
  23624. C1FIFOINT15INV : longWord;
  23625. C1FIFOUA15 : longWord;
  23626. C1FIFOUA15CLR : longWord;
  23627. C1FIFOUA15SET : longWord;
  23628. C1FIFOUA15INV : longWord;
  23629. C1FIFOCI15bits : TCAN1_C1FIFOCI15;
  23630. C1FIFOCI15 : longWord;
  23631. C1FIFOCI15CLR : longWord;
  23632. C1FIFOCI15SET : longWord;
  23633. C1FIFOCI15INV : longWord;
  23634. C1FIFOCON16bits : TCAN1_C1FIFOCON16;
  23635. C1FIFOCON16 : longWord;
  23636. C1FIFOCON16CLR : longWord;
  23637. C1FIFOCON16SET : longWord;
  23638. C1FIFOCON16INV : longWord;
  23639. C1FIFOINT16bits : TCAN1_C1FIFOINT16;
  23640. C1FIFOINT16 : longWord;
  23641. C1FIFOINT16CLR : longWord;
  23642. C1FIFOINT16SET : longWord;
  23643. C1FIFOINT16INV : longWord;
  23644. C1FIFOUA16 : longWord;
  23645. C1FIFOUA16CLR : longWord;
  23646. C1FIFOUA16SET : longWord;
  23647. C1FIFOUA16INV : longWord;
  23648. C1FIFOCI16bits : TCAN1_C1FIFOCI16;
  23649. C1FIFOCI16 : longWord;
  23650. C1FIFOCI16CLR : longWord;
  23651. C1FIFOCI16SET : longWord;
  23652. C1FIFOCI16INV : longWord;
  23653. C1FIFOCON17bits : TCAN1_C1FIFOCON17;
  23654. C1FIFOCON17 : longWord;
  23655. C1FIFOCON17CLR : longWord;
  23656. C1FIFOCON17SET : longWord;
  23657. C1FIFOCON17INV : longWord;
  23658. C1FIFOINT17bits : TCAN1_C1FIFOINT17;
  23659. C1FIFOINT17 : longWord;
  23660. C1FIFOINT17CLR : longWord;
  23661. C1FIFOINT17SET : longWord;
  23662. C1FIFOINT17INV : longWord;
  23663. C1FIFOUA17 : longWord;
  23664. C1FIFOUA17CLR : longWord;
  23665. C1FIFOUA17SET : longWord;
  23666. C1FIFOUA17INV : longWord;
  23667. C1FIFOCI17bits : TCAN1_C1FIFOCI17;
  23668. C1FIFOCI17 : longWord;
  23669. C1FIFOCI17CLR : longWord;
  23670. C1FIFOCI17SET : longWord;
  23671. C1FIFOCI17INV : longWord;
  23672. C1FIFOCON18bits : TCAN1_C1FIFOCON18;
  23673. C1FIFOCON18 : longWord;
  23674. C1FIFOCON18CLR : longWord;
  23675. C1FIFOCON18SET : longWord;
  23676. C1FIFOCON18INV : longWord;
  23677. C1FIFOINT18bits : TCAN1_C1FIFOINT18;
  23678. C1FIFOINT18 : longWord;
  23679. C1FIFOINT18CLR : longWord;
  23680. C1FIFOINT18SET : longWord;
  23681. C1FIFOINT18INV : longWord;
  23682. C1FIFOUA18 : longWord;
  23683. C1FIFOUA18CLR : longWord;
  23684. C1FIFOUA18SET : longWord;
  23685. C1FIFOUA18INV : longWord;
  23686. C1FIFOCI18bits : TCAN1_C1FIFOCI18;
  23687. C1FIFOCI18 : longWord;
  23688. C1FIFOCI18CLR : longWord;
  23689. C1FIFOCI18SET : longWord;
  23690. C1FIFOCI18INV : longWord;
  23691. C1FIFOCON19bits : TCAN1_C1FIFOCON19;
  23692. C1FIFOCON19 : longWord;
  23693. C1FIFOCON19CLR : longWord;
  23694. C1FIFOCON19SET : longWord;
  23695. C1FIFOCON19INV : longWord;
  23696. C1FIFOINT19bits : TCAN1_C1FIFOINT19;
  23697. C1FIFOINT19 : longWord;
  23698. C1FIFOINT19CLR : longWord;
  23699. C1FIFOINT19SET : longWord;
  23700. C1FIFOINT19INV : longWord;
  23701. C1FIFOUA19 : longWord;
  23702. C1FIFOUA19CLR : longWord;
  23703. C1FIFOUA19SET : longWord;
  23704. C1FIFOUA19INV : longWord;
  23705. C1FIFOCI19bits : TCAN1_C1FIFOCI19;
  23706. C1FIFOCI19 : longWord;
  23707. C1FIFOCI19CLR : longWord;
  23708. C1FIFOCI19SET : longWord;
  23709. C1FIFOCI19INV : longWord;
  23710. C1FIFOCON20bits : TCAN1_C1FIFOCON20;
  23711. C1FIFOCON20 : longWord;
  23712. C1FIFOCON20CLR : longWord;
  23713. C1FIFOCON20SET : longWord;
  23714. C1FIFOCON20INV : longWord;
  23715. C1FIFOINT20bits : TCAN1_C1FIFOINT20;
  23716. C1FIFOINT20 : longWord;
  23717. C1FIFOINT20CLR : longWord;
  23718. C1FIFOINT20SET : longWord;
  23719. C1FIFOINT20INV : longWord;
  23720. C1FIFOUA20 : longWord;
  23721. C1FIFOUA20CLR : longWord;
  23722. C1FIFOUA20SET : longWord;
  23723. C1FIFOUA20INV : longWord;
  23724. C1FIFOCI20bits : TCAN1_C1FIFOCI20;
  23725. C1FIFOCI20 : longWord;
  23726. C1FIFOCI20CLR : longWord;
  23727. C1FIFOCI20SET : longWord;
  23728. C1FIFOCI20INV : longWord;
  23729. C1FIFOCON21bits : TCAN1_C1FIFOCON21;
  23730. C1FIFOCON21 : longWord;
  23731. C1FIFOCON21CLR : longWord;
  23732. C1FIFOCON21SET : longWord;
  23733. C1FIFOCON21INV : longWord;
  23734. C1FIFOINT21bits : TCAN1_C1FIFOINT21;
  23735. C1FIFOINT21 : longWord;
  23736. C1FIFOINT21CLR : longWord;
  23737. C1FIFOINT21SET : longWord;
  23738. C1FIFOINT21INV : longWord;
  23739. C1FIFOUA21 : longWord;
  23740. C1FIFOUA21CLR : longWord;
  23741. C1FIFOUA21SET : longWord;
  23742. C1FIFOUA21INV : longWord;
  23743. C1FIFOCI21bits : TCAN1_C1FIFOCI21;
  23744. C1FIFOCI21 : longWord;
  23745. C1FIFOCI21CLR : longWord;
  23746. C1FIFOCI21SET : longWord;
  23747. C1FIFOCI21INV : longWord;
  23748. C1FIFOCON22bits : TCAN1_C1FIFOCON22;
  23749. C1FIFOCON22 : longWord;
  23750. C1FIFOCON22CLR : longWord;
  23751. C1FIFOCON22SET : longWord;
  23752. C1FIFOCON22INV : longWord;
  23753. C1FIFOINT22bits : TCAN1_C1FIFOINT22;
  23754. C1FIFOINT22 : longWord;
  23755. C1FIFOINT22CLR : longWord;
  23756. C1FIFOINT22SET : longWord;
  23757. C1FIFOINT22INV : longWord;
  23758. C1FIFOUA22 : longWord;
  23759. C1FIFOUA22CLR : longWord;
  23760. C1FIFOUA22SET : longWord;
  23761. C1FIFOUA22INV : longWord;
  23762. C1FIFOCI22bits : TCAN1_C1FIFOCI22;
  23763. C1FIFOCI22 : longWord;
  23764. C1FIFOCI22CLR : longWord;
  23765. C1FIFOCI22SET : longWord;
  23766. C1FIFOCI22INV : longWord;
  23767. C1FIFOCON23bits : TCAN1_C1FIFOCON23;
  23768. C1FIFOCON23 : longWord;
  23769. C1FIFOCON23CLR : longWord;
  23770. C1FIFOCON23SET : longWord;
  23771. C1FIFOCON23INV : longWord;
  23772. C1FIFOINT23bits : TCAN1_C1FIFOINT23;
  23773. C1FIFOINT23 : longWord;
  23774. C1FIFOINT23CLR : longWord;
  23775. C1FIFOINT23SET : longWord;
  23776. C1FIFOINT23INV : longWord;
  23777. C1FIFOUA23 : longWord;
  23778. C1FIFOUA23CLR : longWord;
  23779. C1FIFOUA23SET : longWord;
  23780. C1FIFOUA23INV : longWord;
  23781. C1FIFOCI23bits : TCAN1_C1FIFOCI23;
  23782. C1FIFOCI23 : longWord;
  23783. C1FIFOCI23CLR : longWord;
  23784. C1FIFOCI23SET : longWord;
  23785. C1FIFOCI23INV : longWord;
  23786. C1FIFOCON24bits : TCAN1_C1FIFOCON24;
  23787. C1FIFOCON24 : longWord;
  23788. C1FIFOCON24CLR : longWord;
  23789. C1FIFOCON24SET : longWord;
  23790. C1FIFOCON24INV : longWord;
  23791. C1FIFOINT24bits : TCAN1_C1FIFOINT24;
  23792. C1FIFOINT24 : longWord;
  23793. C1FIFOINT24CLR : longWord;
  23794. C1FIFOINT24SET : longWord;
  23795. C1FIFOINT24INV : longWord;
  23796. C1FIFOUA24 : longWord;
  23797. C1FIFOUA24CLR : longWord;
  23798. C1FIFOUA24SET : longWord;
  23799. C1FIFOUA24INV : longWord;
  23800. C1FIFOCI24bits : TCAN1_C1FIFOCI24;
  23801. C1FIFOCI24 : longWord;
  23802. C1FIFOCI24CLR : longWord;
  23803. C1FIFOCI24SET : longWord;
  23804. C1FIFOCI24INV : longWord;
  23805. C1FIFOCON25bits : TCAN1_C1FIFOCON25;
  23806. C1FIFOCON25 : longWord;
  23807. C1FIFOCON25CLR : longWord;
  23808. C1FIFOCON25SET : longWord;
  23809. C1FIFOCON25INV : longWord;
  23810. C1FIFOINT25bits : TCAN1_C1FIFOINT25;
  23811. C1FIFOINT25 : longWord;
  23812. C1FIFOINT25CLR : longWord;
  23813. C1FIFOINT25SET : longWord;
  23814. C1FIFOINT25INV : longWord;
  23815. C1FIFOUA25 : longWord;
  23816. C1FIFOUA25CLR : longWord;
  23817. C1FIFOUA25SET : longWord;
  23818. C1FIFOUA25INV : longWord;
  23819. C1FIFOCI25bits : TCAN1_C1FIFOCI25;
  23820. C1FIFOCI25 : longWord;
  23821. C1FIFOCI25CLR : longWord;
  23822. C1FIFOCI25SET : longWord;
  23823. C1FIFOCI25INV : longWord;
  23824. C1FIFOCON26bits : TCAN1_C1FIFOCON26;
  23825. C1FIFOCON26 : longWord;
  23826. C1FIFOCON26CLR : longWord;
  23827. C1FIFOCON26SET : longWord;
  23828. C1FIFOCON26INV : longWord;
  23829. C1FIFOINT26bits : TCAN1_C1FIFOINT26;
  23830. C1FIFOINT26 : longWord;
  23831. C1FIFOINT26CLR : longWord;
  23832. C1FIFOINT26SET : longWord;
  23833. C1FIFOINT26INV : longWord;
  23834. C1FIFOUA26 : longWord;
  23835. C1FIFOUA26CLR : longWord;
  23836. C1FIFOUA26SET : longWord;
  23837. C1FIFOUA26INV : longWord;
  23838. C1FIFOCI26bits : TCAN1_C1FIFOCI26;
  23839. C1FIFOCI26 : longWord;
  23840. C1FIFOCI26CLR : longWord;
  23841. C1FIFOCI26SET : longWord;
  23842. C1FIFOCI26INV : longWord;
  23843. C1FIFOCON27bits : TCAN1_C1FIFOCON27;
  23844. C1FIFOCON27 : longWord;
  23845. C1FIFOCON27CLR : longWord;
  23846. C1FIFOCON27SET : longWord;
  23847. C1FIFOCON27INV : longWord;
  23848. C1FIFOINT27bits : TCAN1_C1FIFOINT27;
  23849. C1FIFOINT27 : longWord;
  23850. C1FIFOINT27CLR : longWord;
  23851. C1FIFOINT27SET : longWord;
  23852. C1FIFOINT27INV : longWord;
  23853. C1FIFOUA27 : longWord;
  23854. C1FIFOUA27CLR : longWord;
  23855. C1FIFOUA27SET : longWord;
  23856. C1FIFOUA27INV : longWord;
  23857. C1FIFOCI27bits : TCAN1_C1FIFOCI27;
  23858. C1FIFOCI27 : longWord;
  23859. C1FIFOCI27CLR : longWord;
  23860. C1FIFOCI27SET : longWord;
  23861. C1FIFOCI27INV : longWord;
  23862. C1FIFOCON28bits : TCAN1_C1FIFOCON28;
  23863. C1FIFOCON28 : longWord;
  23864. C1FIFOCON28CLR : longWord;
  23865. C1FIFOCON28SET : longWord;
  23866. C1FIFOCON28INV : longWord;
  23867. C1FIFOINT28bits : TCAN1_C1FIFOINT28;
  23868. C1FIFOINT28 : longWord;
  23869. C1FIFOINT28CLR : longWord;
  23870. C1FIFOINT28SET : longWord;
  23871. C1FIFOINT28INV : longWord;
  23872. C1FIFOUA28 : longWord;
  23873. C1FIFOUA28CLR : longWord;
  23874. C1FIFOUA28SET : longWord;
  23875. C1FIFOUA28INV : longWord;
  23876. C1FIFOCI28bits : TCAN1_C1FIFOCI28;
  23877. C1FIFOCI28 : longWord;
  23878. C1FIFOCI28CLR : longWord;
  23879. C1FIFOCI28SET : longWord;
  23880. C1FIFOCI28INV : longWord;
  23881. C1FIFOCON29bits : TCAN1_C1FIFOCON29;
  23882. C1FIFOCON29 : longWord;
  23883. C1FIFOCON29CLR : longWord;
  23884. C1FIFOCON29SET : longWord;
  23885. C1FIFOCON29INV : longWord;
  23886. C1FIFOINT29bits : TCAN1_C1FIFOINT29;
  23887. C1FIFOINT29 : longWord;
  23888. C1FIFOINT29CLR : longWord;
  23889. C1FIFOINT29SET : longWord;
  23890. C1FIFOINT29INV : longWord;
  23891. C1FIFOUA29 : longWord;
  23892. C1FIFOUA29CLR : longWord;
  23893. C1FIFOUA29SET : longWord;
  23894. C1FIFOUA29INV : longWord;
  23895. C1FIFOCI29bits : TCAN1_C1FIFOCI29;
  23896. C1FIFOCI29 : longWord;
  23897. C1FIFOCI29CLR : longWord;
  23898. C1FIFOCI29SET : longWord;
  23899. C1FIFOCI29INV : longWord;
  23900. C1FIFOCON30bits : TCAN1_C1FIFOCON30;
  23901. C1FIFOCON30 : longWord;
  23902. C1FIFOCON30CLR : longWord;
  23903. C1FIFOCON30SET : longWord;
  23904. C1FIFOCON30INV : longWord;
  23905. C1FIFOINT30bits : TCAN1_C1FIFOINT30;
  23906. C1FIFOINT30 : longWord;
  23907. C1FIFOINT30CLR : longWord;
  23908. C1FIFOINT30SET : longWord;
  23909. C1FIFOINT30INV : longWord;
  23910. C1FIFOUA30 : longWord;
  23911. C1FIFOUA30CLR : longWord;
  23912. C1FIFOUA30SET : longWord;
  23913. C1FIFOUA30INV : longWord;
  23914. C1FIFOCI30bits : TCAN1_C1FIFOCI30;
  23915. C1FIFOCI30 : longWord;
  23916. C1FIFOCI30CLR : longWord;
  23917. C1FIFOCI30SET : longWord;
  23918. C1FIFOCI30INV : longWord;
  23919. C1FIFOCON31bits : TCAN1_C1FIFOCON31;
  23920. C1FIFOCON31 : longWord;
  23921. C1FIFOCON31CLR : longWord;
  23922. C1FIFOCON31SET : longWord;
  23923. C1FIFOCON31INV : longWord;
  23924. C1FIFOINT31bits : TCAN1_C1FIFOINT31;
  23925. C1FIFOINT31 : longWord;
  23926. C1FIFOINT31CLR : longWord;
  23927. C1FIFOINT31SET : longWord;
  23928. C1FIFOINT31INV : longWord;
  23929. C1FIFOUA31 : longWord;
  23930. C1FIFOUA31CLR : longWord;
  23931. C1FIFOUA31SET : longWord;
  23932. C1FIFOUA31INV : longWord;
  23933. C1FIFOCI31bits : TCAN1_C1FIFOCI31;
  23934. C1FIFOCI31 : longWord;
  23935. C1FIFOCI31CLR : longWord;
  23936. C1FIFOCI31SET : longWord;
  23937. C1FIFOCI31INV : longWord;
  23938. end;
  23939. TCAN2_C2CON = record
  23940. private
  23941. function getABAT : TBits_1; inline;
  23942. function getCANBUSY : TBits_1; inline;
  23943. function getCANCAP : TBits_1; inline;
  23944. function getDNCNT : TBits_5; inline;
  23945. function getON : TBits_1; inline;
  23946. function getOPMOD : TBits_3; inline;
  23947. function getREQOP : TBits_3; inline;
  23948. function getSIDL : TBits_1; inline;
  23949. function getw : TBits_32; inline;
  23950. procedure setABAT(thebits : TBits_1); inline;
  23951. procedure setCANBUSY(thebits : TBits_1); inline;
  23952. procedure setCANCAP(thebits : TBits_1); inline;
  23953. procedure setDNCNT(thebits : TBits_5); inline;
  23954. procedure setON(thebits : TBits_1); inline;
  23955. procedure setOPMOD(thebits : TBits_3); inline;
  23956. procedure setREQOP(thebits : TBits_3); inline;
  23957. procedure setSIDL(thebits : TBits_1); inline;
  23958. procedure setw(thebits : TBits_32); inline;
  23959. public
  23960. procedure clearABAT; inline;
  23961. procedure clearCANBUSY; inline;
  23962. procedure clearCANCAP; inline;
  23963. procedure clearON; inline;
  23964. procedure clearSIDL; inline;
  23965. procedure setABAT; inline;
  23966. procedure setCANBUSY; inline;
  23967. procedure setCANCAP; inline;
  23968. procedure setON; inline;
  23969. procedure setSIDL; inline;
  23970. property ABAT : TBits_1 read getABAT write setABAT;
  23971. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  23972. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  23973. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  23974. property ON : TBits_1 read getON write setON;
  23975. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  23976. property REQOP : TBits_3 read getREQOP write setREQOP;
  23977. property SIDL : TBits_1 read getSIDL write setSIDL;
  23978. property w : TBits_32 read getw write setw;
  23979. end;
  23980. TCAN2_C2CFG = record
  23981. private
  23982. function getBRP : TBits_6; inline;
  23983. function getPRSEG : TBits_3; inline;
  23984. function getSAM : TBits_1; inline;
  23985. function getSEG1PH : TBits_3; inline;
  23986. function getSEG2PH : TBits_3; inline;
  23987. function getSEG2PHTS : TBits_1; inline;
  23988. function getSJW : TBits_2; inline;
  23989. function getWAKFIL : TBits_1; inline;
  23990. function getw : TBits_32; inline;
  23991. procedure setBRP(thebits : TBits_6); inline;
  23992. procedure setPRSEG(thebits : TBits_3); inline;
  23993. procedure setSAM(thebits : TBits_1); inline;
  23994. procedure setSEG1PH(thebits : TBits_3); inline;
  23995. procedure setSEG2PH(thebits : TBits_3); inline;
  23996. procedure setSEG2PHTS(thebits : TBits_1); inline;
  23997. procedure setSJW(thebits : TBits_2); inline;
  23998. procedure setWAKFIL(thebits : TBits_1); inline;
  23999. procedure setw(thebits : TBits_32); inline;
  24000. public
  24001. procedure clearSAM; inline;
  24002. procedure clearSEG2PHTS; inline;
  24003. procedure clearWAKFIL; inline;
  24004. procedure setSAM; inline;
  24005. procedure setSEG2PHTS; inline;
  24006. procedure setWAKFIL; inline;
  24007. property BRP : TBits_6 read getBRP write setBRP;
  24008. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  24009. property SAM : TBits_1 read getSAM write setSAM;
  24010. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  24011. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  24012. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  24013. property SJW : TBits_2 read getSJW write setSJW;
  24014. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  24015. property w : TBits_32 read getw write setw;
  24016. end;
  24017. TCAN2_C2INT = record
  24018. private
  24019. function getCERRIE : TBits_1; inline;
  24020. function getCERRIF : TBits_1; inline;
  24021. function getCTMRIE : TBits_1; inline;
  24022. function getCTMRIF : TBits_1; inline;
  24023. function getIVRIE : TBits_1; inline;
  24024. function getIVRIF : TBits_1; inline;
  24025. function getMODIE : TBits_1; inline;
  24026. function getMODIF : TBits_1; inline;
  24027. function getRBIE : TBits_1; inline;
  24028. function getRBIF : TBits_1; inline;
  24029. function getRBOVIE : TBits_1; inline;
  24030. function getRBOVIF : TBits_1; inline;
  24031. function getSERRIE : TBits_1; inline;
  24032. function getSERRIF : TBits_1; inline;
  24033. function getTBIE : TBits_1; inline;
  24034. function getTBIF : TBits_1; inline;
  24035. function getWAKIE : TBits_1; inline;
  24036. function getWAKIF : TBits_1; inline;
  24037. function getw : TBits_32; inline;
  24038. procedure setCERRIE(thebits : TBits_1); inline;
  24039. procedure setCERRIF(thebits : TBits_1); inline;
  24040. procedure setCTMRIE(thebits : TBits_1); inline;
  24041. procedure setCTMRIF(thebits : TBits_1); inline;
  24042. procedure setIVRIE(thebits : TBits_1); inline;
  24043. procedure setIVRIF(thebits : TBits_1); inline;
  24044. procedure setMODIE(thebits : TBits_1); inline;
  24045. procedure setMODIF(thebits : TBits_1); inline;
  24046. procedure setRBIE(thebits : TBits_1); inline;
  24047. procedure setRBIF(thebits : TBits_1); inline;
  24048. procedure setRBOVIE(thebits : TBits_1); inline;
  24049. procedure setRBOVIF(thebits : TBits_1); inline;
  24050. procedure setSERRIE(thebits : TBits_1); inline;
  24051. procedure setSERRIF(thebits : TBits_1); inline;
  24052. procedure setTBIE(thebits : TBits_1); inline;
  24053. procedure setTBIF(thebits : TBits_1); inline;
  24054. procedure setWAKIE(thebits : TBits_1); inline;
  24055. procedure setWAKIF(thebits : TBits_1); inline;
  24056. procedure setw(thebits : TBits_32); inline;
  24057. public
  24058. procedure clearCERRIE; inline;
  24059. procedure clearCERRIF; inline;
  24060. procedure clearCTMRIE; inline;
  24061. procedure clearCTMRIF; inline;
  24062. procedure clearIVRIE; inline;
  24063. procedure clearIVRIF; inline;
  24064. procedure clearMODIE; inline;
  24065. procedure clearMODIF; inline;
  24066. procedure clearRBIE; inline;
  24067. procedure clearRBIF; inline;
  24068. procedure clearRBOVIE; inline;
  24069. procedure clearRBOVIF; inline;
  24070. procedure clearSERRIE; inline;
  24071. procedure clearSERRIF; inline;
  24072. procedure clearTBIE; inline;
  24073. procedure clearTBIF; inline;
  24074. procedure clearWAKIE; inline;
  24075. procedure clearWAKIF; inline;
  24076. procedure setCERRIE; inline;
  24077. procedure setCERRIF; inline;
  24078. procedure setCTMRIE; inline;
  24079. procedure setCTMRIF; inline;
  24080. procedure setIVRIE; inline;
  24081. procedure setIVRIF; inline;
  24082. procedure setMODIE; inline;
  24083. procedure setMODIF; inline;
  24084. procedure setRBIE; inline;
  24085. procedure setRBIF; inline;
  24086. procedure setRBOVIE; inline;
  24087. procedure setRBOVIF; inline;
  24088. procedure setSERRIE; inline;
  24089. procedure setSERRIF; inline;
  24090. procedure setTBIE; inline;
  24091. procedure setTBIF; inline;
  24092. procedure setWAKIE; inline;
  24093. procedure setWAKIF; inline;
  24094. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  24095. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  24096. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  24097. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  24098. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  24099. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  24100. property MODIE : TBits_1 read getMODIE write setMODIE;
  24101. property MODIF : TBits_1 read getMODIF write setMODIF;
  24102. property RBIE : TBits_1 read getRBIE write setRBIE;
  24103. property RBIF : TBits_1 read getRBIF write setRBIF;
  24104. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  24105. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  24106. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  24107. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  24108. property TBIE : TBits_1 read getTBIE write setTBIE;
  24109. property TBIF : TBits_1 read getTBIF write setTBIF;
  24110. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  24111. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  24112. property w : TBits_32 read getw write setw;
  24113. end;
  24114. TCAN2_C2VEC = record
  24115. private
  24116. function getFILHIT : TBits_5; inline;
  24117. function getICODE : TBits_7; inline;
  24118. function getw : TBits_32; inline;
  24119. procedure setFILHIT(thebits : TBits_5); inline;
  24120. procedure setICODE(thebits : TBits_7); inline;
  24121. procedure setw(thebits : TBits_32); inline;
  24122. public
  24123. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  24124. property ICODE : TBits_7 read getICODE write setICODE;
  24125. property w : TBits_32 read getw write setw;
  24126. end;
  24127. TCAN2_C2TREC = record
  24128. private
  24129. function getEWARN : TBits_1; inline;
  24130. function getRERRCNT : TBits_8; inline;
  24131. function getRXBP : TBits_1; inline;
  24132. function getRXWARN : TBits_1; inline;
  24133. function getTERRCNT : TBits_8; inline;
  24134. function getTXBO : TBits_1; inline;
  24135. function getTXBP : TBits_1; inline;
  24136. function getTXWARN : TBits_1; inline;
  24137. function getw : TBits_32; inline;
  24138. procedure setEWARN(thebits : TBits_1); inline;
  24139. procedure setRERRCNT(thebits : TBits_8); inline;
  24140. procedure setRXBP(thebits : TBits_1); inline;
  24141. procedure setRXWARN(thebits : TBits_1); inline;
  24142. procedure setTERRCNT(thebits : TBits_8); inline;
  24143. procedure setTXBO(thebits : TBits_1); inline;
  24144. procedure setTXBP(thebits : TBits_1); inline;
  24145. procedure setTXWARN(thebits : TBits_1); inline;
  24146. procedure setw(thebits : TBits_32); inline;
  24147. public
  24148. procedure clearEWARN; inline;
  24149. procedure clearRXBP; inline;
  24150. procedure clearRXWARN; inline;
  24151. procedure clearTXBO; inline;
  24152. procedure clearTXBP; inline;
  24153. procedure clearTXWARN; inline;
  24154. procedure setEWARN; inline;
  24155. procedure setRXBP; inline;
  24156. procedure setRXWARN; inline;
  24157. procedure setTXBO; inline;
  24158. procedure setTXBP; inline;
  24159. procedure setTXWARN; inline;
  24160. property EWARN : TBits_1 read getEWARN write setEWARN;
  24161. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  24162. property RXBP : TBits_1 read getRXBP write setRXBP;
  24163. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  24164. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  24165. property TXBO : TBits_1 read getTXBO write setTXBO;
  24166. property TXBP : TBits_1 read getTXBP write setTXBP;
  24167. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  24168. property w : TBits_32 read getw write setw;
  24169. end;
  24170. TCAN2_C2FSTAT = record
  24171. private
  24172. function getFIFOIP : TBits_32; inline;
  24173. function getFIFOIP0 : TBits_1; inline;
  24174. function getFIFOIP1 : TBits_1; inline;
  24175. function getFIFOIP10 : TBits_1; inline;
  24176. function getFIFOIP11 : TBits_1; inline;
  24177. function getFIFOIP12 : TBits_1; inline;
  24178. function getFIFOIP13 : TBits_1; inline;
  24179. function getFIFOIP14 : TBits_1; inline;
  24180. function getFIFOIP15 : TBits_1; inline;
  24181. function getFIFOIP16 : TBits_1; inline;
  24182. function getFIFOIP17 : TBits_1; inline;
  24183. function getFIFOIP18 : TBits_1; inline;
  24184. function getFIFOIP19 : TBits_1; inline;
  24185. function getFIFOIP2 : TBits_1; inline;
  24186. function getFIFOIP20 : TBits_1; inline;
  24187. function getFIFOIP21 : TBits_1; inline;
  24188. function getFIFOIP22 : TBits_1; inline;
  24189. function getFIFOIP23 : TBits_1; inline;
  24190. function getFIFOIP24 : TBits_1; inline;
  24191. function getFIFOIP25 : TBits_1; inline;
  24192. function getFIFOIP26 : TBits_1; inline;
  24193. function getFIFOIP27 : TBits_1; inline;
  24194. function getFIFOIP28 : TBits_1; inline;
  24195. function getFIFOIP29 : TBits_1; inline;
  24196. function getFIFOIP3 : TBits_1; inline;
  24197. function getFIFOIP30 : TBits_1; inline;
  24198. function getFIFOIP31 : TBits_1; inline;
  24199. function getFIFOIP4 : TBits_1; inline;
  24200. function getFIFOIP5 : TBits_1; inline;
  24201. function getFIFOIP6 : TBits_1; inline;
  24202. function getFIFOIP7 : TBits_1; inline;
  24203. function getFIFOIP8 : TBits_1; inline;
  24204. function getFIFOIP9 : TBits_1; inline;
  24205. function getw : TBits_32; inline;
  24206. procedure setFIFOIP(thebits : TBits_32); inline;
  24207. procedure setFIFOIP0(thebits : TBits_1); inline;
  24208. procedure setFIFOIP1(thebits : TBits_1); inline;
  24209. procedure setFIFOIP10(thebits : TBits_1); inline;
  24210. procedure setFIFOIP11(thebits : TBits_1); inline;
  24211. procedure setFIFOIP12(thebits : TBits_1); inline;
  24212. procedure setFIFOIP13(thebits : TBits_1); inline;
  24213. procedure setFIFOIP14(thebits : TBits_1); inline;
  24214. procedure setFIFOIP15(thebits : TBits_1); inline;
  24215. procedure setFIFOIP16(thebits : TBits_1); inline;
  24216. procedure setFIFOIP17(thebits : TBits_1); inline;
  24217. procedure setFIFOIP18(thebits : TBits_1); inline;
  24218. procedure setFIFOIP19(thebits : TBits_1); inline;
  24219. procedure setFIFOIP2(thebits : TBits_1); inline;
  24220. procedure setFIFOIP20(thebits : TBits_1); inline;
  24221. procedure setFIFOIP21(thebits : TBits_1); inline;
  24222. procedure setFIFOIP22(thebits : TBits_1); inline;
  24223. procedure setFIFOIP23(thebits : TBits_1); inline;
  24224. procedure setFIFOIP24(thebits : TBits_1); inline;
  24225. procedure setFIFOIP25(thebits : TBits_1); inline;
  24226. procedure setFIFOIP26(thebits : TBits_1); inline;
  24227. procedure setFIFOIP27(thebits : TBits_1); inline;
  24228. procedure setFIFOIP28(thebits : TBits_1); inline;
  24229. procedure setFIFOIP29(thebits : TBits_1); inline;
  24230. procedure setFIFOIP3(thebits : TBits_1); inline;
  24231. procedure setFIFOIP30(thebits : TBits_1); inline;
  24232. procedure setFIFOIP31(thebits : TBits_1); inline;
  24233. procedure setFIFOIP4(thebits : TBits_1); inline;
  24234. procedure setFIFOIP5(thebits : TBits_1); inline;
  24235. procedure setFIFOIP6(thebits : TBits_1); inline;
  24236. procedure setFIFOIP7(thebits : TBits_1); inline;
  24237. procedure setFIFOIP8(thebits : TBits_1); inline;
  24238. procedure setFIFOIP9(thebits : TBits_1); inline;
  24239. procedure setw(thebits : TBits_32); inline;
  24240. public
  24241. procedure clearFIFOIP0; inline;
  24242. procedure clearFIFOIP10; inline;
  24243. procedure clearFIFOIP11; inline;
  24244. procedure clearFIFOIP12; inline;
  24245. procedure clearFIFOIP13; inline;
  24246. procedure clearFIFOIP14; inline;
  24247. procedure clearFIFOIP15; inline;
  24248. procedure clearFIFOIP16; inline;
  24249. procedure clearFIFOIP17; inline;
  24250. procedure clearFIFOIP18; inline;
  24251. procedure clearFIFOIP19; inline;
  24252. procedure clearFIFOIP1; inline;
  24253. procedure clearFIFOIP20; inline;
  24254. procedure clearFIFOIP21; inline;
  24255. procedure clearFIFOIP22; inline;
  24256. procedure clearFIFOIP23; inline;
  24257. procedure clearFIFOIP24; inline;
  24258. procedure clearFIFOIP25; inline;
  24259. procedure clearFIFOIP26; inline;
  24260. procedure clearFIFOIP27; inline;
  24261. procedure clearFIFOIP28; inline;
  24262. procedure clearFIFOIP29; inline;
  24263. procedure clearFIFOIP2; inline;
  24264. procedure clearFIFOIP30; inline;
  24265. procedure clearFIFOIP31; inline;
  24266. procedure clearFIFOIP3; inline;
  24267. procedure clearFIFOIP4; inline;
  24268. procedure clearFIFOIP5; inline;
  24269. procedure clearFIFOIP6; inline;
  24270. procedure clearFIFOIP7; inline;
  24271. procedure clearFIFOIP8; inline;
  24272. procedure clearFIFOIP9; inline;
  24273. procedure setFIFOIP0; inline;
  24274. procedure setFIFOIP10; inline;
  24275. procedure setFIFOIP11; inline;
  24276. procedure setFIFOIP12; inline;
  24277. procedure setFIFOIP13; inline;
  24278. procedure setFIFOIP14; inline;
  24279. procedure setFIFOIP15; inline;
  24280. procedure setFIFOIP16; inline;
  24281. procedure setFIFOIP17; inline;
  24282. procedure setFIFOIP18; inline;
  24283. procedure setFIFOIP19; inline;
  24284. procedure setFIFOIP1; inline;
  24285. procedure setFIFOIP20; inline;
  24286. procedure setFIFOIP21; inline;
  24287. procedure setFIFOIP22; inline;
  24288. procedure setFIFOIP23; inline;
  24289. procedure setFIFOIP24; inline;
  24290. procedure setFIFOIP25; inline;
  24291. procedure setFIFOIP26; inline;
  24292. procedure setFIFOIP27; inline;
  24293. procedure setFIFOIP28; inline;
  24294. procedure setFIFOIP29; inline;
  24295. procedure setFIFOIP2; inline;
  24296. procedure setFIFOIP30; inline;
  24297. procedure setFIFOIP31; inline;
  24298. procedure setFIFOIP3; inline;
  24299. procedure setFIFOIP4; inline;
  24300. procedure setFIFOIP5; inline;
  24301. procedure setFIFOIP6; inline;
  24302. procedure setFIFOIP7; inline;
  24303. procedure setFIFOIP8; inline;
  24304. procedure setFIFOIP9; inline;
  24305. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  24306. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  24307. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  24308. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  24309. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  24310. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  24311. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  24312. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  24313. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  24314. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  24315. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  24316. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  24317. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  24318. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  24319. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  24320. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  24321. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  24322. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  24323. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  24324. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  24325. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  24326. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  24327. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  24328. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  24329. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  24330. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  24331. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  24332. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  24333. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  24334. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  24335. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  24336. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  24337. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  24338. property w : TBits_32 read getw write setw;
  24339. end;
  24340. TCAN2_C2RXOVF = record
  24341. private
  24342. function getRXOVF : TBits_32; inline;
  24343. function getRXOVF0 : TBits_1; inline;
  24344. function getRXOVF1 : TBits_1; inline;
  24345. function getRXOVF10 : TBits_1; inline;
  24346. function getRXOVF11 : TBits_1; inline;
  24347. function getRXOVF12 : TBits_1; inline;
  24348. function getRXOVF13 : TBits_1; inline;
  24349. function getRXOVF14 : TBits_1; inline;
  24350. function getRXOVF15 : TBits_1; inline;
  24351. function getRXOVF16 : TBits_1; inline;
  24352. function getRXOVF17 : TBits_1; inline;
  24353. function getRXOVF18 : TBits_1; inline;
  24354. function getRXOVF19 : TBits_1; inline;
  24355. function getRXOVF2 : TBits_1; inline;
  24356. function getRXOVF20 : TBits_1; inline;
  24357. function getRXOVF21 : TBits_1; inline;
  24358. function getRXOVF22 : TBits_1; inline;
  24359. function getRXOVF23 : TBits_1; inline;
  24360. function getRXOVF24 : TBits_1; inline;
  24361. function getRXOVF25 : TBits_1; inline;
  24362. function getRXOVF26 : TBits_1; inline;
  24363. function getRXOVF27 : TBits_1; inline;
  24364. function getRXOVF28 : TBits_1; inline;
  24365. function getRXOVF29 : TBits_1; inline;
  24366. function getRXOVF3 : TBits_1; inline;
  24367. function getRXOVF30 : TBits_1; inline;
  24368. function getRXOVF31 : TBits_1; inline;
  24369. function getRXOVF4 : TBits_1; inline;
  24370. function getRXOVF5 : TBits_1; inline;
  24371. function getRXOVF6 : TBits_1; inline;
  24372. function getRXOVF7 : TBits_1; inline;
  24373. function getRXOVF8 : TBits_1; inline;
  24374. function getRXOVF9 : TBits_1; inline;
  24375. function getw : TBits_32; inline;
  24376. procedure setRXOVF(thebits : TBits_32); inline;
  24377. procedure setRXOVF0(thebits : TBits_1); inline;
  24378. procedure setRXOVF1(thebits : TBits_1); inline;
  24379. procedure setRXOVF10(thebits : TBits_1); inline;
  24380. procedure setRXOVF11(thebits : TBits_1); inline;
  24381. procedure setRXOVF12(thebits : TBits_1); inline;
  24382. procedure setRXOVF13(thebits : TBits_1); inline;
  24383. procedure setRXOVF14(thebits : TBits_1); inline;
  24384. procedure setRXOVF15(thebits : TBits_1); inline;
  24385. procedure setRXOVF16(thebits : TBits_1); inline;
  24386. procedure setRXOVF17(thebits : TBits_1); inline;
  24387. procedure setRXOVF18(thebits : TBits_1); inline;
  24388. procedure setRXOVF19(thebits : TBits_1); inline;
  24389. procedure setRXOVF2(thebits : TBits_1); inline;
  24390. procedure setRXOVF20(thebits : TBits_1); inline;
  24391. procedure setRXOVF21(thebits : TBits_1); inline;
  24392. procedure setRXOVF22(thebits : TBits_1); inline;
  24393. procedure setRXOVF23(thebits : TBits_1); inline;
  24394. procedure setRXOVF24(thebits : TBits_1); inline;
  24395. procedure setRXOVF25(thebits : TBits_1); inline;
  24396. procedure setRXOVF26(thebits : TBits_1); inline;
  24397. procedure setRXOVF27(thebits : TBits_1); inline;
  24398. procedure setRXOVF28(thebits : TBits_1); inline;
  24399. procedure setRXOVF29(thebits : TBits_1); inline;
  24400. procedure setRXOVF3(thebits : TBits_1); inline;
  24401. procedure setRXOVF30(thebits : TBits_1); inline;
  24402. procedure setRXOVF31(thebits : TBits_1); inline;
  24403. procedure setRXOVF4(thebits : TBits_1); inline;
  24404. procedure setRXOVF5(thebits : TBits_1); inline;
  24405. procedure setRXOVF6(thebits : TBits_1); inline;
  24406. procedure setRXOVF7(thebits : TBits_1); inline;
  24407. procedure setRXOVF8(thebits : TBits_1); inline;
  24408. procedure setRXOVF9(thebits : TBits_1); inline;
  24409. procedure setw(thebits : TBits_32); inline;
  24410. public
  24411. procedure clearRXOVF0; inline;
  24412. procedure clearRXOVF10; inline;
  24413. procedure clearRXOVF11; inline;
  24414. procedure clearRXOVF12; inline;
  24415. procedure clearRXOVF13; inline;
  24416. procedure clearRXOVF14; inline;
  24417. procedure clearRXOVF15; inline;
  24418. procedure clearRXOVF16; inline;
  24419. procedure clearRXOVF17; inline;
  24420. procedure clearRXOVF18; inline;
  24421. procedure clearRXOVF19; inline;
  24422. procedure clearRXOVF1; inline;
  24423. procedure clearRXOVF20; inline;
  24424. procedure clearRXOVF21; inline;
  24425. procedure clearRXOVF22; inline;
  24426. procedure clearRXOVF23; inline;
  24427. procedure clearRXOVF24; inline;
  24428. procedure clearRXOVF25; inline;
  24429. procedure clearRXOVF26; inline;
  24430. procedure clearRXOVF27; inline;
  24431. procedure clearRXOVF28; inline;
  24432. procedure clearRXOVF29; inline;
  24433. procedure clearRXOVF2; inline;
  24434. procedure clearRXOVF30; inline;
  24435. procedure clearRXOVF31; inline;
  24436. procedure clearRXOVF3; inline;
  24437. procedure clearRXOVF4; inline;
  24438. procedure clearRXOVF5; inline;
  24439. procedure clearRXOVF6; inline;
  24440. procedure clearRXOVF7; inline;
  24441. procedure clearRXOVF8; inline;
  24442. procedure clearRXOVF9; inline;
  24443. procedure setRXOVF0; inline;
  24444. procedure setRXOVF10; inline;
  24445. procedure setRXOVF11; inline;
  24446. procedure setRXOVF12; inline;
  24447. procedure setRXOVF13; inline;
  24448. procedure setRXOVF14; inline;
  24449. procedure setRXOVF15; inline;
  24450. procedure setRXOVF16; inline;
  24451. procedure setRXOVF17; inline;
  24452. procedure setRXOVF18; inline;
  24453. procedure setRXOVF19; inline;
  24454. procedure setRXOVF1; inline;
  24455. procedure setRXOVF20; inline;
  24456. procedure setRXOVF21; inline;
  24457. procedure setRXOVF22; inline;
  24458. procedure setRXOVF23; inline;
  24459. procedure setRXOVF24; inline;
  24460. procedure setRXOVF25; inline;
  24461. procedure setRXOVF26; inline;
  24462. procedure setRXOVF27; inline;
  24463. procedure setRXOVF28; inline;
  24464. procedure setRXOVF29; inline;
  24465. procedure setRXOVF2; inline;
  24466. procedure setRXOVF30; inline;
  24467. procedure setRXOVF31; inline;
  24468. procedure setRXOVF3; inline;
  24469. procedure setRXOVF4; inline;
  24470. procedure setRXOVF5; inline;
  24471. procedure setRXOVF6; inline;
  24472. procedure setRXOVF7; inline;
  24473. procedure setRXOVF8; inline;
  24474. procedure setRXOVF9; inline;
  24475. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  24476. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  24477. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  24478. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  24479. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  24480. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  24481. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  24482. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  24483. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  24484. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  24485. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  24486. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  24487. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  24488. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  24489. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  24490. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  24491. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  24492. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  24493. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  24494. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  24495. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  24496. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  24497. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  24498. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  24499. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  24500. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  24501. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  24502. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  24503. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  24504. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  24505. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  24506. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  24507. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  24508. property w : TBits_32 read getw write setw;
  24509. end;
  24510. TCAN2_C2TMR = record
  24511. private
  24512. function getCANTS : TBits_16; inline;
  24513. function getCANTSPRE : TBits_16; inline;
  24514. function getw : TBits_32; inline;
  24515. procedure setCANTS(thebits : TBits_16); inline;
  24516. procedure setCANTSPRE(thebits : TBits_16); inline;
  24517. procedure setw(thebits : TBits_32); inline;
  24518. public
  24519. property CANTS : TBits_16 read getCANTS write setCANTS;
  24520. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  24521. property w : TBits_32 read getw write setw;
  24522. end;
  24523. TCAN2_C2RXM0 = record
  24524. private
  24525. function getEID : TBits_18; inline;
  24526. function getMIDE : TBits_1; inline;
  24527. function getSID : TBits_11; inline;
  24528. function getw : TBits_32; inline;
  24529. procedure setEID(thebits : TBits_18); inline;
  24530. procedure setMIDE(thebits : TBits_1); inline;
  24531. procedure setSID(thebits : TBits_11); inline;
  24532. procedure setw(thebits : TBits_32); inline;
  24533. public
  24534. procedure clearMIDE; inline;
  24535. procedure setMIDE; inline;
  24536. property EID : TBits_18 read getEID write setEID;
  24537. property MIDE : TBits_1 read getMIDE write setMIDE;
  24538. property SID : TBits_11 read getSID write setSID;
  24539. property w : TBits_32 read getw write setw;
  24540. end;
  24541. TCAN2_C2RXM1 = record
  24542. private
  24543. function getEID : TBits_18; inline;
  24544. function getMIDE : TBits_1; inline;
  24545. function getSID : TBits_11; inline;
  24546. function getw : TBits_32; inline;
  24547. procedure setEID(thebits : TBits_18); inline;
  24548. procedure setMIDE(thebits : TBits_1); inline;
  24549. procedure setSID(thebits : TBits_11); inline;
  24550. procedure setw(thebits : TBits_32); inline;
  24551. public
  24552. procedure clearMIDE; inline;
  24553. procedure setMIDE; inline;
  24554. property EID : TBits_18 read getEID write setEID;
  24555. property MIDE : TBits_1 read getMIDE write setMIDE;
  24556. property SID : TBits_11 read getSID write setSID;
  24557. property w : TBits_32 read getw write setw;
  24558. end;
  24559. TCAN2_C2RXM2 = record
  24560. private
  24561. function getEID : TBits_18; inline;
  24562. function getMIDE : TBits_1; inline;
  24563. function getSID : TBits_11; inline;
  24564. function getw : TBits_32; inline;
  24565. procedure setEID(thebits : TBits_18); inline;
  24566. procedure setMIDE(thebits : TBits_1); inline;
  24567. procedure setSID(thebits : TBits_11); inline;
  24568. procedure setw(thebits : TBits_32); inline;
  24569. public
  24570. procedure clearMIDE; inline;
  24571. procedure setMIDE; inline;
  24572. property EID : TBits_18 read getEID write setEID;
  24573. property MIDE : TBits_1 read getMIDE write setMIDE;
  24574. property SID : TBits_11 read getSID write setSID;
  24575. property w : TBits_32 read getw write setw;
  24576. end;
  24577. TCAN2_C2RXM3 = record
  24578. private
  24579. function getEID : TBits_18; inline;
  24580. function getMIDE : TBits_1; inline;
  24581. function getSID : TBits_11; inline;
  24582. function getw : TBits_32; inline;
  24583. procedure setEID(thebits : TBits_18); inline;
  24584. procedure setMIDE(thebits : TBits_1); inline;
  24585. procedure setSID(thebits : TBits_11); inline;
  24586. procedure setw(thebits : TBits_32); inline;
  24587. public
  24588. procedure clearMIDE; inline;
  24589. procedure setMIDE; inline;
  24590. property EID : TBits_18 read getEID write setEID;
  24591. property MIDE : TBits_1 read getMIDE write setMIDE;
  24592. property SID : TBits_11 read getSID write setSID;
  24593. property w : TBits_32 read getw write setw;
  24594. end;
  24595. TCAN2_C2FLTCON0 = record
  24596. private
  24597. function getFLTEN0 : TBits_1; inline;
  24598. function getFLTEN1 : TBits_1; inline;
  24599. function getFLTEN2 : TBits_1; inline;
  24600. function getFLTEN3 : TBits_1; inline;
  24601. function getFSEL0 : TBits_5; inline;
  24602. function getFSEL1 : TBits_5; inline;
  24603. function getFSEL2 : TBits_5; inline;
  24604. function getFSEL3 : TBits_5; inline;
  24605. function getMSEL0 : TBits_2; inline;
  24606. function getMSEL1 : TBits_2; inline;
  24607. function getMSEL2 : TBits_2; inline;
  24608. function getMSEL3 : TBits_2; inline;
  24609. function getw : TBits_32; inline;
  24610. procedure setFLTEN0(thebits : TBits_1); inline;
  24611. procedure setFLTEN1(thebits : TBits_1); inline;
  24612. procedure setFLTEN2(thebits : TBits_1); inline;
  24613. procedure setFLTEN3(thebits : TBits_1); inline;
  24614. procedure setFSEL0(thebits : TBits_5); inline;
  24615. procedure setFSEL1(thebits : TBits_5); inline;
  24616. procedure setFSEL2(thebits : TBits_5); inline;
  24617. procedure setFSEL3(thebits : TBits_5); inline;
  24618. procedure setMSEL0(thebits : TBits_2); inline;
  24619. procedure setMSEL1(thebits : TBits_2); inline;
  24620. procedure setMSEL2(thebits : TBits_2); inline;
  24621. procedure setMSEL3(thebits : TBits_2); inline;
  24622. procedure setw(thebits : TBits_32); inline;
  24623. public
  24624. procedure clearFLTEN0; inline;
  24625. procedure clearFLTEN1; inline;
  24626. procedure clearFLTEN2; inline;
  24627. procedure clearFLTEN3; inline;
  24628. procedure setFLTEN0; inline;
  24629. procedure setFLTEN1; inline;
  24630. procedure setFLTEN2; inline;
  24631. procedure setFLTEN3; inline;
  24632. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  24633. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  24634. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  24635. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  24636. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  24637. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  24638. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  24639. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  24640. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  24641. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  24642. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  24643. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  24644. property w : TBits_32 read getw write setw;
  24645. end;
  24646. TCAN2_C2FLTCON1 = record
  24647. private
  24648. function getFLTEN4 : TBits_1; inline;
  24649. function getFLTEN5 : TBits_1; inline;
  24650. function getFLTEN6 : TBits_1; inline;
  24651. function getFLTEN7 : TBits_1; inline;
  24652. function getFSEL4 : TBits_5; inline;
  24653. function getFSEL5 : TBits_5; inline;
  24654. function getFSEL6 : TBits_5; inline;
  24655. function getFSEL7 : TBits_5; inline;
  24656. function getMSEL4 : TBits_2; inline;
  24657. function getMSEL5 : TBits_2; inline;
  24658. function getMSEL6 : TBits_2; inline;
  24659. function getMSEL7 : TBits_2; inline;
  24660. function getw : TBits_32; inline;
  24661. procedure setFLTEN4(thebits : TBits_1); inline;
  24662. procedure setFLTEN5(thebits : TBits_1); inline;
  24663. procedure setFLTEN6(thebits : TBits_1); inline;
  24664. procedure setFLTEN7(thebits : TBits_1); inline;
  24665. procedure setFSEL4(thebits : TBits_5); inline;
  24666. procedure setFSEL5(thebits : TBits_5); inline;
  24667. procedure setFSEL6(thebits : TBits_5); inline;
  24668. procedure setFSEL7(thebits : TBits_5); inline;
  24669. procedure setMSEL4(thebits : TBits_2); inline;
  24670. procedure setMSEL5(thebits : TBits_2); inline;
  24671. procedure setMSEL6(thebits : TBits_2); inline;
  24672. procedure setMSEL7(thebits : TBits_2); inline;
  24673. procedure setw(thebits : TBits_32); inline;
  24674. public
  24675. procedure clearFLTEN4; inline;
  24676. procedure clearFLTEN5; inline;
  24677. procedure clearFLTEN6; inline;
  24678. procedure clearFLTEN7; inline;
  24679. procedure setFLTEN4; inline;
  24680. procedure setFLTEN5; inline;
  24681. procedure setFLTEN6; inline;
  24682. procedure setFLTEN7; inline;
  24683. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  24684. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  24685. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  24686. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  24687. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  24688. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  24689. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  24690. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  24691. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  24692. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  24693. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  24694. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  24695. property w : TBits_32 read getw write setw;
  24696. end;
  24697. TCAN2_C2FLTCON2 = record
  24698. private
  24699. function getFLTEN10 : TBits_1; inline;
  24700. function getFLTEN11 : TBits_1; inline;
  24701. function getFLTEN8 : TBits_1; inline;
  24702. function getFLTEN9 : TBits_1; inline;
  24703. function getFSEL10 : TBits_5; inline;
  24704. function getFSEL11 : TBits_5; inline;
  24705. function getFSEL8 : TBits_5; inline;
  24706. function getFSEL9 : TBits_5; inline;
  24707. function getMSEL10 : TBits_2; inline;
  24708. function getMSEL11 : TBits_2; inline;
  24709. function getMSEL8 : TBits_2; inline;
  24710. function getMSEL9 : TBits_2; inline;
  24711. function getw : TBits_32; inline;
  24712. procedure setFLTEN10(thebits : TBits_1); inline;
  24713. procedure setFLTEN11(thebits : TBits_1); inline;
  24714. procedure setFLTEN8(thebits : TBits_1); inline;
  24715. procedure setFLTEN9(thebits : TBits_1); inline;
  24716. procedure setFSEL10(thebits : TBits_5); inline;
  24717. procedure setFSEL11(thebits : TBits_5); inline;
  24718. procedure setFSEL8(thebits : TBits_5); inline;
  24719. procedure setFSEL9(thebits : TBits_5); inline;
  24720. procedure setMSEL10(thebits : TBits_2); inline;
  24721. procedure setMSEL11(thebits : TBits_2); inline;
  24722. procedure setMSEL8(thebits : TBits_2); inline;
  24723. procedure setMSEL9(thebits : TBits_2); inline;
  24724. procedure setw(thebits : TBits_32); inline;
  24725. public
  24726. procedure clearFLTEN10; inline;
  24727. procedure clearFLTEN11; inline;
  24728. procedure clearFLTEN8; inline;
  24729. procedure clearFLTEN9; inline;
  24730. procedure setFLTEN10; inline;
  24731. procedure setFLTEN11; inline;
  24732. procedure setFLTEN8; inline;
  24733. procedure setFLTEN9; inline;
  24734. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  24735. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  24736. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  24737. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  24738. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  24739. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  24740. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  24741. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  24742. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  24743. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  24744. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  24745. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  24746. property w : TBits_32 read getw write setw;
  24747. end;
  24748. TCAN2_C2FLTCON3 = record
  24749. private
  24750. function getFLTEN12 : TBits_1; inline;
  24751. function getFLTEN13 : TBits_1; inline;
  24752. function getFLTEN14 : TBits_1; inline;
  24753. function getFLTEN15 : TBits_1; inline;
  24754. function getFSEL12 : TBits_5; inline;
  24755. function getFSEL13 : TBits_5; inline;
  24756. function getFSEL14 : TBits_5; inline;
  24757. function getFSEL15 : TBits_5; inline;
  24758. function getMSEL12 : TBits_2; inline;
  24759. function getMSEL13 : TBits_2; inline;
  24760. function getMSEL14 : TBits_2; inline;
  24761. function getMSEL15 : TBits_2; inline;
  24762. function getw : TBits_32; inline;
  24763. procedure setFLTEN12(thebits : TBits_1); inline;
  24764. procedure setFLTEN13(thebits : TBits_1); inline;
  24765. procedure setFLTEN14(thebits : TBits_1); inline;
  24766. procedure setFLTEN15(thebits : TBits_1); inline;
  24767. procedure setFSEL12(thebits : TBits_5); inline;
  24768. procedure setFSEL13(thebits : TBits_5); inline;
  24769. procedure setFSEL14(thebits : TBits_5); inline;
  24770. procedure setFSEL15(thebits : TBits_5); inline;
  24771. procedure setMSEL12(thebits : TBits_2); inline;
  24772. procedure setMSEL13(thebits : TBits_2); inline;
  24773. procedure setMSEL14(thebits : TBits_2); inline;
  24774. procedure setMSEL15(thebits : TBits_2); inline;
  24775. procedure setw(thebits : TBits_32); inline;
  24776. public
  24777. procedure clearFLTEN12; inline;
  24778. procedure clearFLTEN13; inline;
  24779. procedure clearFLTEN14; inline;
  24780. procedure clearFLTEN15; inline;
  24781. procedure setFLTEN12; inline;
  24782. procedure setFLTEN13; inline;
  24783. procedure setFLTEN14; inline;
  24784. procedure setFLTEN15; inline;
  24785. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  24786. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  24787. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  24788. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  24789. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  24790. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  24791. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  24792. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  24793. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  24794. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  24795. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  24796. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  24797. property w : TBits_32 read getw write setw;
  24798. end;
  24799. TCAN2_C2FLTCON4 = record
  24800. private
  24801. function getFLTEN16 : TBits_1; inline;
  24802. function getFLTEN17 : TBits_1; inline;
  24803. function getFLTEN18 : TBits_1; inline;
  24804. function getFLTEN19 : TBits_1; inline;
  24805. function getFSEL16 : TBits_5; inline;
  24806. function getFSEL17 : TBits_5; inline;
  24807. function getFSEL18 : TBits_5; inline;
  24808. function getFSEL19 : TBits_5; inline;
  24809. function getMSEL16 : TBits_2; inline;
  24810. function getMSEL17 : TBits_2; inline;
  24811. function getMSEL18 : TBits_2; inline;
  24812. function getMSEL19 : TBits_2; inline;
  24813. function getw : TBits_32; inline;
  24814. procedure setFLTEN16(thebits : TBits_1); inline;
  24815. procedure setFLTEN17(thebits : TBits_1); inline;
  24816. procedure setFLTEN18(thebits : TBits_1); inline;
  24817. procedure setFLTEN19(thebits : TBits_1); inline;
  24818. procedure setFSEL16(thebits : TBits_5); inline;
  24819. procedure setFSEL17(thebits : TBits_5); inline;
  24820. procedure setFSEL18(thebits : TBits_5); inline;
  24821. procedure setFSEL19(thebits : TBits_5); inline;
  24822. procedure setMSEL16(thebits : TBits_2); inline;
  24823. procedure setMSEL17(thebits : TBits_2); inline;
  24824. procedure setMSEL18(thebits : TBits_2); inline;
  24825. procedure setMSEL19(thebits : TBits_2); inline;
  24826. procedure setw(thebits : TBits_32); inline;
  24827. public
  24828. procedure clearFLTEN16; inline;
  24829. procedure clearFLTEN17; inline;
  24830. procedure clearFLTEN18; inline;
  24831. procedure clearFLTEN19; inline;
  24832. procedure setFLTEN16; inline;
  24833. procedure setFLTEN17; inline;
  24834. procedure setFLTEN18; inline;
  24835. procedure setFLTEN19; inline;
  24836. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  24837. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  24838. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  24839. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  24840. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  24841. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  24842. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  24843. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  24844. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  24845. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  24846. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  24847. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  24848. property w : TBits_32 read getw write setw;
  24849. end;
  24850. TCAN2_C2FLTCON5 = record
  24851. private
  24852. function getFLTEN20 : TBits_1; inline;
  24853. function getFLTEN21 : TBits_1; inline;
  24854. function getFLTEN22 : TBits_1; inline;
  24855. function getFLTEN23 : TBits_1; inline;
  24856. function getFSEL20 : TBits_5; inline;
  24857. function getFSEL21 : TBits_5; inline;
  24858. function getFSEL22 : TBits_5; inline;
  24859. function getFSEL23 : TBits_5; inline;
  24860. function getMSEL20 : TBits_2; inline;
  24861. function getMSEL21 : TBits_2; inline;
  24862. function getMSEL22 : TBits_2; inline;
  24863. function getMSEL23 : TBits_2; inline;
  24864. function getw : TBits_32; inline;
  24865. procedure setFLTEN20(thebits : TBits_1); inline;
  24866. procedure setFLTEN21(thebits : TBits_1); inline;
  24867. procedure setFLTEN22(thebits : TBits_1); inline;
  24868. procedure setFLTEN23(thebits : TBits_1); inline;
  24869. procedure setFSEL20(thebits : TBits_5); inline;
  24870. procedure setFSEL21(thebits : TBits_5); inline;
  24871. procedure setFSEL22(thebits : TBits_5); inline;
  24872. procedure setFSEL23(thebits : TBits_5); inline;
  24873. procedure setMSEL20(thebits : TBits_2); inline;
  24874. procedure setMSEL21(thebits : TBits_2); inline;
  24875. procedure setMSEL22(thebits : TBits_2); inline;
  24876. procedure setMSEL23(thebits : TBits_2); inline;
  24877. procedure setw(thebits : TBits_32); inline;
  24878. public
  24879. procedure clearFLTEN20; inline;
  24880. procedure clearFLTEN21; inline;
  24881. procedure clearFLTEN22; inline;
  24882. procedure clearFLTEN23; inline;
  24883. procedure setFLTEN20; inline;
  24884. procedure setFLTEN21; inline;
  24885. procedure setFLTEN22; inline;
  24886. procedure setFLTEN23; inline;
  24887. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  24888. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  24889. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  24890. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  24891. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  24892. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  24893. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  24894. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  24895. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  24896. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  24897. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  24898. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  24899. property w : TBits_32 read getw write setw;
  24900. end;
  24901. TCAN2_C2FLTCON6 = record
  24902. private
  24903. function getFLTEN24 : TBits_1; inline;
  24904. function getFLTEN25 : TBits_1; inline;
  24905. function getFLTEN26 : TBits_1; inline;
  24906. function getFLTEN27 : TBits_1; inline;
  24907. function getFSEL24 : TBits_5; inline;
  24908. function getFSEL25 : TBits_5; inline;
  24909. function getFSEL26 : TBits_5; inline;
  24910. function getFSEL27 : TBits_5; inline;
  24911. function getMSEL24 : TBits_2; inline;
  24912. function getMSEL25 : TBits_2; inline;
  24913. function getMSEL26 : TBits_2; inline;
  24914. function getMSEL27 : TBits_2; inline;
  24915. function getw : TBits_32; inline;
  24916. procedure setFLTEN24(thebits : TBits_1); inline;
  24917. procedure setFLTEN25(thebits : TBits_1); inline;
  24918. procedure setFLTEN26(thebits : TBits_1); inline;
  24919. procedure setFLTEN27(thebits : TBits_1); inline;
  24920. procedure setFSEL24(thebits : TBits_5); inline;
  24921. procedure setFSEL25(thebits : TBits_5); inline;
  24922. procedure setFSEL26(thebits : TBits_5); inline;
  24923. procedure setFSEL27(thebits : TBits_5); inline;
  24924. procedure setMSEL24(thebits : TBits_2); inline;
  24925. procedure setMSEL25(thebits : TBits_2); inline;
  24926. procedure setMSEL26(thebits : TBits_2); inline;
  24927. procedure setMSEL27(thebits : TBits_2); inline;
  24928. procedure setw(thebits : TBits_32); inline;
  24929. public
  24930. procedure clearFLTEN24; inline;
  24931. procedure clearFLTEN25; inline;
  24932. procedure clearFLTEN26; inline;
  24933. procedure clearFLTEN27; inline;
  24934. procedure setFLTEN24; inline;
  24935. procedure setFLTEN25; inline;
  24936. procedure setFLTEN26; inline;
  24937. procedure setFLTEN27; inline;
  24938. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  24939. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  24940. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  24941. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  24942. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  24943. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  24944. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  24945. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  24946. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  24947. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  24948. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  24949. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  24950. property w : TBits_32 read getw write setw;
  24951. end;
  24952. TCAN2_C2FLTCON7 = record
  24953. private
  24954. function getFLTEN28 : TBits_1; inline;
  24955. function getFLTEN29 : TBits_1; inline;
  24956. function getFLTEN30 : TBits_1; inline;
  24957. function getFLTEN31 : TBits_1; inline;
  24958. function getFSEL28 : TBits_5; inline;
  24959. function getFSEL29 : TBits_5; inline;
  24960. function getFSEL30 : TBits_5; inline;
  24961. function getFSEL31 : TBits_5; inline;
  24962. function getMSEL28 : TBits_2; inline;
  24963. function getMSEL29 : TBits_2; inline;
  24964. function getMSEL30 : TBits_2; inline;
  24965. function getMSEL31 : TBits_2; inline;
  24966. function getw : TBits_32; inline;
  24967. procedure setFLTEN28(thebits : TBits_1); inline;
  24968. procedure setFLTEN29(thebits : TBits_1); inline;
  24969. procedure setFLTEN30(thebits : TBits_1); inline;
  24970. procedure setFLTEN31(thebits : TBits_1); inline;
  24971. procedure setFSEL28(thebits : TBits_5); inline;
  24972. procedure setFSEL29(thebits : TBits_5); inline;
  24973. procedure setFSEL30(thebits : TBits_5); inline;
  24974. procedure setFSEL31(thebits : TBits_5); inline;
  24975. procedure setMSEL28(thebits : TBits_2); inline;
  24976. procedure setMSEL29(thebits : TBits_2); inline;
  24977. procedure setMSEL30(thebits : TBits_2); inline;
  24978. procedure setMSEL31(thebits : TBits_2); inline;
  24979. procedure setw(thebits : TBits_32); inline;
  24980. public
  24981. procedure clearFLTEN28; inline;
  24982. procedure clearFLTEN29; inline;
  24983. procedure clearFLTEN30; inline;
  24984. procedure clearFLTEN31; inline;
  24985. procedure setFLTEN28; inline;
  24986. procedure setFLTEN29; inline;
  24987. procedure setFLTEN30; inline;
  24988. procedure setFLTEN31; inline;
  24989. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  24990. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  24991. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  24992. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  24993. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  24994. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  24995. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  24996. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  24997. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  24998. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  24999. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  25000. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  25001. property w : TBits_32 read getw write setw;
  25002. end;
  25003. TCAN2_C2RXF0 = record
  25004. private
  25005. function getEID : TBits_18; inline;
  25006. function getEXID : TBits_1; inline;
  25007. function getSID : TBits_11; inline;
  25008. function getw : TBits_32; inline;
  25009. procedure setEID(thebits : TBits_18); inline;
  25010. procedure setEXID(thebits : TBits_1); inline;
  25011. procedure setSID(thebits : TBits_11); inline;
  25012. procedure setw(thebits : TBits_32); inline;
  25013. public
  25014. procedure clearEXID; inline;
  25015. procedure setEXID; inline;
  25016. property EID : TBits_18 read getEID write setEID;
  25017. property EXID : TBits_1 read getEXID write setEXID;
  25018. property SID : TBits_11 read getSID write setSID;
  25019. property w : TBits_32 read getw write setw;
  25020. end;
  25021. TCAN2_C2RXF1 = record
  25022. private
  25023. function getEID : TBits_18; inline;
  25024. function getEXID : TBits_1; inline;
  25025. function getSID : TBits_11; inline;
  25026. function getw : TBits_32; inline;
  25027. procedure setEID(thebits : TBits_18); inline;
  25028. procedure setEXID(thebits : TBits_1); inline;
  25029. procedure setSID(thebits : TBits_11); inline;
  25030. procedure setw(thebits : TBits_32); inline;
  25031. public
  25032. procedure clearEXID; inline;
  25033. procedure setEXID; inline;
  25034. property EID : TBits_18 read getEID write setEID;
  25035. property EXID : TBits_1 read getEXID write setEXID;
  25036. property SID : TBits_11 read getSID write setSID;
  25037. property w : TBits_32 read getw write setw;
  25038. end;
  25039. TCAN2_C2RXF2 = record
  25040. private
  25041. function getEID : TBits_18; inline;
  25042. function getEXID : TBits_1; inline;
  25043. function getSID : TBits_11; inline;
  25044. function getw : TBits_32; inline;
  25045. procedure setEID(thebits : TBits_18); inline;
  25046. procedure setEXID(thebits : TBits_1); inline;
  25047. procedure setSID(thebits : TBits_11); inline;
  25048. procedure setw(thebits : TBits_32); inline;
  25049. public
  25050. procedure clearEXID; inline;
  25051. procedure setEXID; inline;
  25052. property EID : TBits_18 read getEID write setEID;
  25053. property EXID : TBits_1 read getEXID write setEXID;
  25054. property SID : TBits_11 read getSID write setSID;
  25055. property w : TBits_32 read getw write setw;
  25056. end;
  25057. TCAN2_C2RXF3 = record
  25058. private
  25059. function getEID : TBits_18; inline;
  25060. function getEXID : TBits_1; inline;
  25061. function getSID : TBits_11; inline;
  25062. function getw : TBits_32; inline;
  25063. procedure setEID(thebits : TBits_18); inline;
  25064. procedure setEXID(thebits : TBits_1); inline;
  25065. procedure setSID(thebits : TBits_11); inline;
  25066. procedure setw(thebits : TBits_32); inline;
  25067. public
  25068. procedure clearEXID; inline;
  25069. procedure setEXID; inline;
  25070. property EID : TBits_18 read getEID write setEID;
  25071. property EXID : TBits_1 read getEXID write setEXID;
  25072. property SID : TBits_11 read getSID write setSID;
  25073. property w : TBits_32 read getw write setw;
  25074. end;
  25075. TCAN2_C2RXF4 = record
  25076. private
  25077. function getEID : TBits_18; inline;
  25078. function getEXID : TBits_1; inline;
  25079. function getSID : TBits_11; inline;
  25080. function getw : TBits_32; inline;
  25081. procedure setEID(thebits : TBits_18); inline;
  25082. procedure setEXID(thebits : TBits_1); inline;
  25083. procedure setSID(thebits : TBits_11); inline;
  25084. procedure setw(thebits : TBits_32); inline;
  25085. public
  25086. procedure clearEXID; inline;
  25087. procedure setEXID; inline;
  25088. property EID : TBits_18 read getEID write setEID;
  25089. property EXID : TBits_1 read getEXID write setEXID;
  25090. property SID : TBits_11 read getSID write setSID;
  25091. property w : TBits_32 read getw write setw;
  25092. end;
  25093. TCAN2_C2RXF5 = record
  25094. private
  25095. function getEID : TBits_18; inline;
  25096. function getEXID : TBits_1; inline;
  25097. function getSID : TBits_11; inline;
  25098. function getw : TBits_32; inline;
  25099. procedure setEID(thebits : TBits_18); inline;
  25100. procedure setEXID(thebits : TBits_1); inline;
  25101. procedure setSID(thebits : TBits_11); inline;
  25102. procedure setw(thebits : TBits_32); inline;
  25103. public
  25104. procedure clearEXID; inline;
  25105. procedure setEXID; inline;
  25106. property EID : TBits_18 read getEID write setEID;
  25107. property EXID : TBits_1 read getEXID write setEXID;
  25108. property SID : TBits_11 read getSID write setSID;
  25109. property w : TBits_32 read getw write setw;
  25110. end;
  25111. TCAN2_C2RXF6 = record
  25112. private
  25113. function getEID : TBits_18; inline;
  25114. function getEXID : TBits_1; inline;
  25115. function getSID : TBits_11; inline;
  25116. function getw : TBits_32; inline;
  25117. procedure setEID(thebits : TBits_18); inline;
  25118. procedure setEXID(thebits : TBits_1); inline;
  25119. procedure setSID(thebits : TBits_11); inline;
  25120. procedure setw(thebits : TBits_32); inline;
  25121. public
  25122. procedure clearEXID; inline;
  25123. procedure setEXID; inline;
  25124. property EID : TBits_18 read getEID write setEID;
  25125. property EXID : TBits_1 read getEXID write setEXID;
  25126. property SID : TBits_11 read getSID write setSID;
  25127. property w : TBits_32 read getw write setw;
  25128. end;
  25129. TCAN2_C2RXF7 = record
  25130. private
  25131. function getEID : TBits_18; inline;
  25132. function getEXID : TBits_1; inline;
  25133. function getSID : TBits_11; inline;
  25134. function getw : TBits_32; inline;
  25135. procedure setEID(thebits : TBits_18); inline;
  25136. procedure setEXID(thebits : TBits_1); inline;
  25137. procedure setSID(thebits : TBits_11); inline;
  25138. procedure setw(thebits : TBits_32); inline;
  25139. public
  25140. procedure clearEXID; inline;
  25141. procedure setEXID; inline;
  25142. property EID : TBits_18 read getEID write setEID;
  25143. property EXID : TBits_1 read getEXID write setEXID;
  25144. property SID : TBits_11 read getSID write setSID;
  25145. property w : TBits_32 read getw write setw;
  25146. end;
  25147. TCAN2_C2RXF8 = record
  25148. private
  25149. function getEID : TBits_18; inline;
  25150. function getEXID : TBits_1; inline;
  25151. function getSID : TBits_11; inline;
  25152. function getw : TBits_32; inline;
  25153. procedure setEID(thebits : TBits_18); inline;
  25154. procedure setEXID(thebits : TBits_1); inline;
  25155. procedure setSID(thebits : TBits_11); inline;
  25156. procedure setw(thebits : TBits_32); inline;
  25157. public
  25158. procedure clearEXID; inline;
  25159. procedure setEXID; inline;
  25160. property EID : TBits_18 read getEID write setEID;
  25161. property EXID : TBits_1 read getEXID write setEXID;
  25162. property SID : TBits_11 read getSID write setSID;
  25163. property w : TBits_32 read getw write setw;
  25164. end;
  25165. TCAN2_C2RXF9 = record
  25166. private
  25167. function getEID : TBits_18; inline;
  25168. function getEXID : TBits_1; inline;
  25169. function getSID : TBits_11; inline;
  25170. function getw : TBits_32; inline;
  25171. procedure setEID(thebits : TBits_18); inline;
  25172. procedure setEXID(thebits : TBits_1); inline;
  25173. procedure setSID(thebits : TBits_11); inline;
  25174. procedure setw(thebits : TBits_32); inline;
  25175. public
  25176. procedure clearEXID; inline;
  25177. procedure setEXID; inline;
  25178. property EID : TBits_18 read getEID write setEID;
  25179. property EXID : TBits_1 read getEXID write setEXID;
  25180. property SID : TBits_11 read getSID write setSID;
  25181. property w : TBits_32 read getw write setw;
  25182. end;
  25183. TCAN2_C2RXF10 = record
  25184. private
  25185. function getEID : TBits_18; inline;
  25186. function getEXID : TBits_1; inline;
  25187. function getSID : TBits_11; inline;
  25188. function getw : TBits_32; inline;
  25189. procedure setEID(thebits : TBits_18); inline;
  25190. procedure setEXID(thebits : TBits_1); inline;
  25191. procedure setSID(thebits : TBits_11); inline;
  25192. procedure setw(thebits : TBits_32); inline;
  25193. public
  25194. procedure clearEXID; inline;
  25195. procedure setEXID; inline;
  25196. property EID : TBits_18 read getEID write setEID;
  25197. property EXID : TBits_1 read getEXID write setEXID;
  25198. property SID : TBits_11 read getSID write setSID;
  25199. property w : TBits_32 read getw write setw;
  25200. end;
  25201. TCAN2_C2RXF11 = record
  25202. private
  25203. function getEID : TBits_18; inline;
  25204. function getEXID : TBits_1; inline;
  25205. function getSID : TBits_11; inline;
  25206. function getw : TBits_32; inline;
  25207. procedure setEID(thebits : TBits_18); inline;
  25208. procedure setEXID(thebits : TBits_1); inline;
  25209. procedure setSID(thebits : TBits_11); inline;
  25210. procedure setw(thebits : TBits_32); inline;
  25211. public
  25212. procedure clearEXID; inline;
  25213. procedure setEXID; inline;
  25214. property EID : TBits_18 read getEID write setEID;
  25215. property EXID : TBits_1 read getEXID write setEXID;
  25216. property SID : TBits_11 read getSID write setSID;
  25217. property w : TBits_32 read getw write setw;
  25218. end;
  25219. TCAN2_C2RXF12 = record
  25220. private
  25221. function getEID : TBits_18; inline;
  25222. function getEXID : TBits_1; inline;
  25223. function getSID : TBits_11; inline;
  25224. function getw : TBits_32; inline;
  25225. procedure setEID(thebits : TBits_18); inline;
  25226. procedure setEXID(thebits : TBits_1); inline;
  25227. procedure setSID(thebits : TBits_11); inline;
  25228. procedure setw(thebits : TBits_32); inline;
  25229. public
  25230. procedure clearEXID; inline;
  25231. procedure setEXID; inline;
  25232. property EID : TBits_18 read getEID write setEID;
  25233. property EXID : TBits_1 read getEXID write setEXID;
  25234. property SID : TBits_11 read getSID write setSID;
  25235. property w : TBits_32 read getw write setw;
  25236. end;
  25237. TCAN2_C2RXF13 = record
  25238. private
  25239. function getEID : TBits_18; inline;
  25240. function getEXID : TBits_1; inline;
  25241. function getSID : TBits_11; inline;
  25242. function getw : TBits_32; inline;
  25243. procedure setEID(thebits : TBits_18); inline;
  25244. procedure setEXID(thebits : TBits_1); inline;
  25245. procedure setSID(thebits : TBits_11); inline;
  25246. procedure setw(thebits : TBits_32); inline;
  25247. public
  25248. procedure clearEXID; inline;
  25249. procedure setEXID; inline;
  25250. property EID : TBits_18 read getEID write setEID;
  25251. property EXID : TBits_1 read getEXID write setEXID;
  25252. property SID : TBits_11 read getSID write setSID;
  25253. property w : TBits_32 read getw write setw;
  25254. end;
  25255. TCAN2_C2RXF14 = record
  25256. private
  25257. function getEID : TBits_18; inline;
  25258. function getEXID : TBits_1; inline;
  25259. function getSID : TBits_11; inline;
  25260. function getw : TBits_32; inline;
  25261. procedure setEID(thebits : TBits_18); inline;
  25262. procedure setEXID(thebits : TBits_1); inline;
  25263. procedure setSID(thebits : TBits_11); inline;
  25264. procedure setw(thebits : TBits_32); inline;
  25265. public
  25266. procedure clearEXID; inline;
  25267. procedure setEXID; inline;
  25268. property EID : TBits_18 read getEID write setEID;
  25269. property EXID : TBits_1 read getEXID write setEXID;
  25270. property SID : TBits_11 read getSID write setSID;
  25271. property w : TBits_32 read getw write setw;
  25272. end;
  25273. TCAN2_C2RXF15 = record
  25274. private
  25275. function getEID : TBits_18; inline;
  25276. function getEXID : TBits_1; inline;
  25277. function getSID : TBits_11; inline;
  25278. function getw : TBits_32; inline;
  25279. procedure setEID(thebits : TBits_18); inline;
  25280. procedure setEXID(thebits : TBits_1); inline;
  25281. procedure setSID(thebits : TBits_11); inline;
  25282. procedure setw(thebits : TBits_32); inline;
  25283. public
  25284. procedure clearEXID; inline;
  25285. procedure setEXID; inline;
  25286. property EID : TBits_18 read getEID write setEID;
  25287. property EXID : TBits_1 read getEXID write setEXID;
  25288. property SID : TBits_11 read getSID write setSID;
  25289. property w : TBits_32 read getw write setw;
  25290. end;
  25291. TCAN2_C2RXF16 = record
  25292. private
  25293. function getEID : TBits_18; inline;
  25294. function getEXID : TBits_1; inline;
  25295. function getSID : TBits_11; inline;
  25296. function getw : TBits_32; inline;
  25297. procedure setEID(thebits : TBits_18); inline;
  25298. procedure setEXID(thebits : TBits_1); inline;
  25299. procedure setSID(thebits : TBits_11); inline;
  25300. procedure setw(thebits : TBits_32); inline;
  25301. public
  25302. procedure clearEXID; inline;
  25303. procedure setEXID; inline;
  25304. property EID : TBits_18 read getEID write setEID;
  25305. property EXID : TBits_1 read getEXID write setEXID;
  25306. property SID : TBits_11 read getSID write setSID;
  25307. property w : TBits_32 read getw write setw;
  25308. end;
  25309. TCAN2_C2RXF17 = record
  25310. private
  25311. function getEID : TBits_18; inline;
  25312. function getEXID : TBits_1; inline;
  25313. function getSID : TBits_11; inline;
  25314. function getw : TBits_32; inline;
  25315. procedure setEID(thebits : TBits_18); inline;
  25316. procedure setEXID(thebits : TBits_1); inline;
  25317. procedure setSID(thebits : TBits_11); inline;
  25318. procedure setw(thebits : TBits_32); inline;
  25319. public
  25320. procedure clearEXID; inline;
  25321. procedure setEXID; inline;
  25322. property EID : TBits_18 read getEID write setEID;
  25323. property EXID : TBits_1 read getEXID write setEXID;
  25324. property SID : TBits_11 read getSID write setSID;
  25325. property w : TBits_32 read getw write setw;
  25326. end;
  25327. TCAN2_C2RXF18 = record
  25328. private
  25329. function getEID : TBits_18; inline;
  25330. function getEXID : TBits_1; inline;
  25331. function getSID : TBits_11; inline;
  25332. function getw : TBits_32; inline;
  25333. procedure setEID(thebits : TBits_18); inline;
  25334. procedure setEXID(thebits : TBits_1); inline;
  25335. procedure setSID(thebits : TBits_11); inline;
  25336. procedure setw(thebits : TBits_32); inline;
  25337. public
  25338. procedure clearEXID; inline;
  25339. procedure setEXID; inline;
  25340. property EID : TBits_18 read getEID write setEID;
  25341. property EXID : TBits_1 read getEXID write setEXID;
  25342. property SID : TBits_11 read getSID write setSID;
  25343. property w : TBits_32 read getw write setw;
  25344. end;
  25345. TCAN2_C2RXF19 = record
  25346. private
  25347. function getEID : TBits_18; inline;
  25348. function getEXID : TBits_1; inline;
  25349. function getSID : TBits_11; inline;
  25350. function getw : TBits_32; inline;
  25351. procedure setEID(thebits : TBits_18); inline;
  25352. procedure setEXID(thebits : TBits_1); inline;
  25353. procedure setSID(thebits : TBits_11); inline;
  25354. procedure setw(thebits : TBits_32); inline;
  25355. public
  25356. procedure clearEXID; inline;
  25357. procedure setEXID; inline;
  25358. property EID : TBits_18 read getEID write setEID;
  25359. property EXID : TBits_1 read getEXID write setEXID;
  25360. property SID : TBits_11 read getSID write setSID;
  25361. property w : TBits_32 read getw write setw;
  25362. end;
  25363. TCAN2_C2RXF20 = record
  25364. private
  25365. function getEID : TBits_18; inline;
  25366. function getEXID : TBits_1; inline;
  25367. function getSID : TBits_11; inline;
  25368. function getw : TBits_32; inline;
  25369. procedure setEID(thebits : TBits_18); inline;
  25370. procedure setEXID(thebits : TBits_1); inline;
  25371. procedure setSID(thebits : TBits_11); inline;
  25372. procedure setw(thebits : TBits_32); inline;
  25373. public
  25374. procedure clearEXID; inline;
  25375. procedure setEXID; inline;
  25376. property EID : TBits_18 read getEID write setEID;
  25377. property EXID : TBits_1 read getEXID write setEXID;
  25378. property SID : TBits_11 read getSID write setSID;
  25379. property w : TBits_32 read getw write setw;
  25380. end;
  25381. TCAN2_C2RXF21 = record
  25382. private
  25383. function getEID : TBits_18; inline;
  25384. function getEXID : TBits_1; inline;
  25385. function getSID : TBits_11; inline;
  25386. function getw : TBits_32; inline;
  25387. procedure setEID(thebits : TBits_18); inline;
  25388. procedure setEXID(thebits : TBits_1); inline;
  25389. procedure setSID(thebits : TBits_11); inline;
  25390. procedure setw(thebits : TBits_32); inline;
  25391. public
  25392. procedure clearEXID; inline;
  25393. procedure setEXID; inline;
  25394. property EID : TBits_18 read getEID write setEID;
  25395. property EXID : TBits_1 read getEXID write setEXID;
  25396. property SID : TBits_11 read getSID write setSID;
  25397. property w : TBits_32 read getw write setw;
  25398. end;
  25399. TCAN2_C2RXF22 = record
  25400. private
  25401. function getEID : TBits_18; inline;
  25402. function getEXID : TBits_1; inline;
  25403. function getSID : TBits_11; inline;
  25404. function getw : TBits_32; inline;
  25405. procedure setEID(thebits : TBits_18); inline;
  25406. procedure setEXID(thebits : TBits_1); inline;
  25407. procedure setSID(thebits : TBits_11); inline;
  25408. procedure setw(thebits : TBits_32); inline;
  25409. public
  25410. procedure clearEXID; inline;
  25411. procedure setEXID; inline;
  25412. property EID : TBits_18 read getEID write setEID;
  25413. property EXID : TBits_1 read getEXID write setEXID;
  25414. property SID : TBits_11 read getSID write setSID;
  25415. property w : TBits_32 read getw write setw;
  25416. end;
  25417. TCAN2_C2RXF23 = record
  25418. private
  25419. function getEID : TBits_18; inline;
  25420. function getEXID : TBits_1; inline;
  25421. function getSID : TBits_11; inline;
  25422. function getw : TBits_32; inline;
  25423. procedure setEID(thebits : TBits_18); inline;
  25424. procedure setEXID(thebits : TBits_1); inline;
  25425. procedure setSID(thebits : TBits_11); inline;
  25426. procedure setw(thebits : TBits_32); inline;
  25427. public
  25428. procedure clearEXID; inline;
  25429. procedure setEXID; inline;
  25430. property EID : TBits_18 read getEID write setEID;
  25431. property EXID : TBits_1 read getEXID write setEXID;
  25432. property SID : TBits_11 read getSID write setSID;
  25433. property w : TBits_32 read getw write setw;
  25434. end;
  25435. TCAN2_C2RXF24 = record
  25436. private
  25437. function getEID : TBits_18; inline;
  25438. function getEXID : TBits_1; inline;
  25439. function getSID : TBits_11; inline;
  25440. function getw : TBits_32; inline;
  25441. procedure setEID(thebits : TBits_18); inline;
  25442. procedure setEXID(thebits : TBits_1); inline;
  25443. procedure setSID(thebits : TBits_11); inline;
  25444. procedure setw(thebits : TBits_32); inline;
  25445. public
  25446. procedure clearEXID; inline;
  25447. procedure setEXID; inline;
  25448. property EID : TBits_18 read getEID write setEID;
  25449. property EXID : TBits_1 read getEXID write setEXID;
  25450. property SID : TBits_11 read getSID write setSID;
  25451. property w : TBits_32 read getw write setw;
  25452. end;
  25453. TCAN2_C2RXF25 = record
  25454. private
  25455. function getEID : TBits_18; inline;
  25456. function getEXID : TBits_1; inline;
  25457. function getSID : TBits_11; inline;
  25458. function getw : TBits_32; inline;
  25459. procedure setEID(thebits : TBits_18); inline;
  25460. procedure setEXID(thebits : TBits_1); inline;
  25461. procedure setSID(thebits : TBits_11); inline;
  25462. procedure setw(thebits : TBits_32); inline;
  25463. public
  25464. procedure clearEXID; inline;
  25465. procedure setEXID; inline;
  25466. property EID : TBits_18 read getEID write setEID;
  25467. property EXID : TBits_1 read getEXID write setEXID;
  25468. property SID : TBits_11 read getSID write setSID;
  25469. property w : TBits_32 read getw write setw;
  25470. end;
  25471. TCAN2_C2RXF26 = record
  25472. private
  25473. function getEID : TBits_18; inline;
  25474. function getEXID : TBits_1; inline;
  25475. function getSID : TBits_11; inline;
  25476. function getw : TBits_32; inline;
  25477. procedure setEID(thebits : TBits_18); inline;
  25478. procedure setEXID(thebits : TBits_1); inline;
  25479. procedure setSID(thebits : TBits_11); inline;
  25480. procedure setw(thebits : TBits_32); inline;
  25481. public
  25482. procedure clearEXID; inline;
  25483. procedure setEXID; inline;
  25484. property EID : TBits_18 read getEID write setEID;
  25485. property EXID : TBits_1 read getEXID write setEXID;
  25486. property SID : TBits_11 read getSID write setSID;
  25487. property w : TBits_32 read getw write setw;
  25488. end;
  25489. TCAN2_C2RXF27 = record
  25490. private
  25491. function getEID : TBits_18; inline;
  25492. function getEXID : TBits_1; inline;
  25493. function getSID : TBits_11; inline;
  25494. function getw : TBits_32; inline;
  25495. procedure setEID(thebits : TBits_18); inline;
  25496. procedure setEXID(thebits : TBits_1); inline;
  25497. procedure setSID(thebits : TBits_11); inline;
  25498. procedure setw(thebits : TBits_32); inline;
  25499. public
  25500. procedure clearEXID; inline;
  25501. procedure setEXID; inline;
  25502. property EID : TBits_18 read getEID write setEID;
  25503. property EXID : TBits_1 read getEXID write setEXID;
  25504. property SID : TBits_11 read getSID write setSID;
  25505. property w : TBits_32 read getw write setw;
  25506. end;
  25507. TCAN2_C2RXF28 = record
  25508. private
  25509. function getEID : TBits_18; inline;
  25510. function getEXID : TBits_1; inline;
  25511. function getSID : TBits_11; inline;
  25512. function getw : TBits_32; inline;
  25513. procedure setEID(thebits : TBits_18); inline;
  25514. procedure setEXID(thebits : TBits_1); inline;
  25515. procedure setSID(thebits : TBits_11); inline;
  25516. procedure setw(thebits : TBits_32); inline;
  25517. public
  25518. procedure clearEXID; inline;
  25519. procedure setEXID; inline;
  25520. property EID : TBits_18 read getEID write setEID;
  25521. property EXID : TBits_1 read getEXID write setEXID;
  25522. property SID : TBits_11 read getSID write setSID;
  25523. property w : TBits_32 read getw write setw;
  25524. end;
  25525. TCAN2_C2RXF29 = record
  25526. private
  25527. function getEID : TBits_18; inline;
  25528. function getEXID : TBits_1; inline;
  25529. function getSID : TBits_11; inline;
  25530. function getw : TBits_32; inline;
  25531. procedure setEID(thebits : TBits_18); inline;
  25532. procedure setEXID(thebits : TBits_1); inline;
  25533. procedure setSID(thebits : TBits_11); inline;
  25534. procedure setw(thebits : TBits_32); inline;
  25535. public
  25536. procedure clearEXID; inline;
  25537. procedure setEXID; inline;
  25538. property EID : TBits_18 read getEID write setEID;
  25539. property EXID : TBits_1 read getEXID write setEXID;
  25540. property SID : TBits_11 read getSID write setSID;
  25541. property w : TBits_32 read getw write setw;
  25542. end;
  25543. TCAN2_C2RXF30 = record
  25544. private
  25545. function getEID : TBits_18; inline;
  25546. function getEXID : TBits_1; inline;
  25547. function getSID : TBits_11; inline;
  25548. function getw : TBits_32; inline;
  25549. procedure setEID(thebits : TBits_18); inline;
  25550. procedure setEXID(thebits : TBits_1); inline;
  25551. procedure setSID(thebits : TBits_11); inline;
  25552. procedure setw(thebits : TBits_32); inline;
  25553. public
  25554. procedure clearEXID; inline;
  25555. procedure setEXID; inline;
  25556. property EID : TBits_18 read getEID write setEID;
  25557. property EXID : TBits_1 read getEXID write setEXID;
  25558. property SID : TBits_11 read getSID write setSID;
  25559. property w : TBits_32 read getw write setw;
  25560. end;
  25561. TCAN2_C2RXF31 = record
  25562. private
  25563. function getEID : TBits_18; inline;
  25564. function getEXID : TBits_1; inline;
  25565. function getSID : TBits_11; inline;
  25566. function getw : TBits_32; inline;
  25567. procedure setEID(thebits : TBits_18); inline;
  25568. procedure setEXID(thebits : TBits_1); inline;
  25569. procedure setSID(thebits : TBits_11); inline;
  25570. procedure setw(thebits : TBits_32); inline;
  25571. public
  25572. procedure clearEXID; inline;
  25573. procedure setEXID; inline;
  25574. property EID : TBits_18 read getEID write setEID;
  25575. property EXID : TBits_1 read getEXID write setEXID;
  25576. property SID : TBits_11 read getSID write setSID;
  25577. property w : TBits_32 read getw write setw;
  25578. end;
  25579. TCAN2_C2FIFOCON0 = record
  25580. private
  25581. function getDONLY : TBits_1; inline;
  25582. function getFRESET : TBits_1; inline;
  25583. function getFSIZE : TBits_5; inline;
  25584. function getRTREN : TBits_1; inline;
  25585. function getTXABAT : TBits_1; inline;
  25586. function getTXEN : TBits_1; inline;
  25587. function getTXERR : TBits_1; inline;
  25588. function getTXLARB : TBits_1; inline;
  25589. function getTXPRI : TBits_2; inline;
  25590. function getTXREQ : TBits_1; inline;
  25591. function getUINC : TBits_1; inline;
  25592. function getw : TBits_32; inline;
  25593. procedure setDONLY(thebits : TBits_1); inline;
  25594. procedure setFRESET(thebits : TBits_1); inline;
  25595. procedure setFSIZE(thebits : TBits_5); inline;
  25596. procedure setRTREN(thebits : TBits_1); inline;
  25597. procedure setTXABAT(thebits : TBits_1); inline;
  25598. procedure setTXEN(thebits : TBits_1); inline;
  25599. procedure setTXERR(thebits : TBits_1); inline;
  25600. procedure setTXLARB(thebits : TBits_1); inline;
  25601. procedure setTXPRI(thebits : TBits_2); inline;
  25602. procedure setTXREQ(thebits : TBits_1); inline;
  25603. procedure setUINC(thebits : TBits_1); inline;
  25604. procedure setw(thebits : TBits_32); inline;
  25605. public
  25606. procedure clearDONLY; inline;
  25607. procedure clearFRESET; inline;
  25608. procedure clearRTREN; inline;
  25609. procedure clearTXABAT; inline;
  25610. procedure clearTXEN; inline;
  25611. procedure clearTXERR; inline;
  25612. procedure clearTXLARB; inline;
  25613. procedure clearTXREQ; inline;
  25614. procedure clearUINC; inline;
  25615. procedure setDONLY; inline;
  25616. procedure setFRESET; inline;
  25617. procedure setRTREN; inline;
  25618. procedure setTXABAT; inline;
  25619. procedure setTXEN; inline;
  25620. procedure setTXERR; inline;
  25621. procedure setTXLARB; inline;
  25622. procedure setTXREQ; inline;
  25623. procedure setUINC; inline;
  25624. property DONLY : TBits_1 read getDONLY write setDONLY;
  25625. property FRESET : TBits_1 read getFRESET write setFRESET;
  25626. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25627. property RTREN : TBits_1 read getRTREN write setRTREN;
  25628. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25629. property TXEN : TBits_1 read getTXEN write setTXEN;
  25630. property TXERR : TBits_1 read getTXERR write setTXERR;
  25631. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25632. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25633. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25634. property UINC : TBits_1 read getUINC write setUINC;
  25635. property w : TBits_32 read getw write setw;
  25636. end;
  25637. TCAN2_C2FIFOINT0 = record
  25638. private
  25639. function getRXFULLIE : TBits_1; inline;
  25640. function getRXFULLIF : TBits_1; inline;
  25641. function getRXHALFIE : TBits_1; inline;
  25642. function getRXHALFIF : TBits_1; inline;
  25643. function getRXNEMPTYIE : TBits_1; inline;
  25644. function getRXNEMPTYIF : TBits_1; inline;
  25645. function getRXOVFLIE : TBits_1; inline;
  25646. function getRXOVFLIF : TBits_1; inline;
  25647. function getTXEMPTYIE : TBits_1; inline;
  25648. function getTXEMPTYIF : TBits_1; inline;
  25649. function getTXHALFIE : TBits_1; inline;
  25650. function getTXHALFIF : TBits_1; inline;
  25651. function getTXNFULLIE : TBits_1; inline;
  25652. function getTXNFULLIF : TBits_1; inline;
  25653. function getw : TBits_32; inline;
  25654. procedure setRXFULLIE(thebits : TBits_1); inline;
  25655. procedure setRXFULLIF(thebits : TBits_1); inline;
  25656. procedure setRXHALFIE(thebits : TBits_1); inline;
  25657. procedure setRXHALFIF(thebits : TBits_1); inline;
  25658. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25659. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25660. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25661. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25662. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25663. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25664. procedure setTXHALFIE(thebits : TBits_1); inline;
  25665. procedure setTXHALFIF(thebits : TBits_1); inline;
  25666. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25667. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25668. procedure setw(thebits : TBits_32); inline;
  25669. public
  25670. procedure clearRXFULLIE; inline;
  25671. procedure clearRXFULLIF; inline;
  25672. procedure clearRXHALFIE; inline;
  25673. procedure clearRXHALFIF; inline;
  25674. procedure clearRXNEMPTYIE; inline;
  25675. procedure clearRXNEMPTYIF; inline;
  25676. procedure clearRXOVFLIE; inline;
  25677. procedure clearRXOVFLIF; inline;
  25678. procedure clearTXEMPTYIE; inline;
  25679. procedure clearTXEMPTYIF; inline;
  25680. procedure clearTXHALFIE; inline;
  25681. procedure clearTXHALFIF; inline;
  25682. procedure clearTXNFULLIE; inline;
  25683. procedure clearTXNFULLIF; inline;
  25684. procedure setRXFULLIE; inline;
  25685. procedure setRXFULLIF; inline;
  25686. procedure setRXHALFIE; inline;
  25687. procedure setRXHALFIF; inline;
  25688. procedure setRXNEMPTYIE; inline;
  25689. procedure setRXNEMPTYIF; inline;
  25690. procedure setRXOVFLIE; inline;
  25691. procedure setRXOVFLIF; inline;
  25692. procedure setTXEMPTYIE; inline;
  25693. procedure setTXEMPTYIF; inline;
  25694. procedure setTXHALFIE; inline;
  25695. procedure setTXHALFIF; inline;
  25696. procedure setTXNFULLIE; inline;
  25697. procedure setTXNFULLIF; inline;
  25698. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25699. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25700. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25701. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25702. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25703. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25704. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25705. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25706. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25707. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25708. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25709. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25710. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25711. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25712. property w : TBits_32 read getw write setw;
  25713. end;
  25714. TCAN2_C2FIFOCI0 = record
  25715. private
  25716. function getCFIFOCI : TBits_5; inline;
  25717. function getw : TBits_32; inline;
  25718. procedure setCFIFOCI(thebits : TBits_5); inline;
  25719. procedure setw(thebits : TBits_32); inline;
  25720. public
  25721. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25722. property w : TBits_32 read getw write setw;
  25723. end;
  25724. TCAN2_C2FIFOCON1 = record
  25725. private
  25726. function getDONLY : TBits_1; inline;
  25727. function getFRESET : TBits_1; inline;
  25728. function getFSIZE : TBits_5; inline;
  25729. function getRTREN : TBits_1; inline;
  25730. function getTXABAT : TBits_1; inline;
  25731. function getTXEN : TBits_1; inline;
  25732. function getTXERR : TBits_1; inline;
  25733. function getTXLARB : TBits_1; inline;
  25734. function getTXPRI : TBits_2; inline;
  25735. function getTXREQ : TBits_1; inline;
  25736. function getUINC : TBits_1; inline;
  25737. function getw : TBits_32; inline;
  25738. procedure setDONLY(thebits : TBits_1); inline;
  25739. procedure setFRESET(thebits : TBits_1); inline;
  25740. procedure setFSIZE(thebits : TBits_5); inline;
  25741. procedure setRTREN(thebits : TBits_1); inline;
  25742. procedure setTXABAT(thebits : TBits_1); inline;
  25743. procedure setTXEN(thebits : TBits_1); inline;
  25744. procedure setTXERR(thebits : TBits_1); inline;
  25745. procedure setTXLARB(thebits : TBits_1); inline;
  25746. procedure setTXPRI(thebits : TBits_2); inline;
  25747. procedure setTXREQ(thebits : TBits_1); inline;
  25748. procedure setUINC(thebits : TBits_1); inline;
  25749. procedure setw(thebits : TBits_32); inline;
  25750. public
  25751. procedure clearDONLY; inline;
  25752. procedure clearFRESET; inline;
  25753. procedure clearRTREN; inline;
  25754. procedure clearTXABAT; inline;
  25755. procedure clearTXEN; inline;
  25756. procedure clearTXERR; inline;
  25757. procedure clearTXLARB; inline;
  25758. procedure clearTXREQ; inline;
  25759. procedure clearUINC; inline;
  25760. procedure setDONLY; inline;
  25761. procedure setFRESET; inline;
  25762. procedure setRTREN; inline;
  25763. procedure setTXABAT; inline;
  25764. procedure setTXEN; inline;
  25765. procedure setTXERR; inline;
  25766. procedure setTXLARB; inline;
  25767. procedure setTXREQ; inline;
  25768. procedure setUINC; inline;
  25769. property DONLY : TBits_1 read getDONLY write setDONLY;
  25770. property FRESET : TBits_1 read getFRESET write setFRESET;
  25771. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25772. property RTREN : TBits_1 read getRTREN write setRTREN;
  25773. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25774. property TXEN : TBits_1 read getTXEN write setTXEN;
  25775. property TXERR : TBits_1 read getTXERR write setTXERR;
  25776. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25777. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25778. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25779. property UINC : TBits_1 read getUINC write setUINC;
  25780. property w : TBits_32 read getw write setw;
  25781. end;
  25782. TCAN2_C2FIFOINT1 = record
  25783. private
  25784. function getRXFULLIE : TBits_1; inline;
  25785. function getRXFULLIF : TBits_1; inline;
  25786. function getRXHALFIE : TBits_1; inline;
  25787. function getRXHALFIF : TBits_1; inline;
  25788. function getRXNEMPTYIE : TBits_1; inline;
  25789. function getRXNEMPTYIF : TBits_1; inline;
  25790. function getRXOVFLIE : TBits_1; inline;
  25791. function getRXOVFLIF : TBits_1; inline;
  25792. function getTXEMPTYIE : TBits_1; inline;
  25793. function getTXEMPTYIF : TBits_1; inline;
  25794. function getTXHALFIE : TBits_1; inline;
  25795. function getTXHALFIF : TBits_1; inline;
  25796. function getTXNFULLIE : TBits_1; inline;
  25797. function getTXNFULLIF : TBits_1; inline;
  25798. function getw : TBits_32; inline;
  25799. procedure setRXFULLIE(thebits : TBits_1); inline;
  25800. procedure setRXFULLIF(thebits : TBits_1); inline;
  25801. procedure setRXHALFIE(thebits : TBits_1); inline;
  25802. procedure setRXHALFIF(thebits : TBits_1); inline;
  25803. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25804. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25805. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25806. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25807. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25808. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25809. procedure setTXHALFIE(thebits : TBits_1); inline;
  25810. procedure setTXHALFIF(thebits : TBits_1); inline;
  25811. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25812. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25813. procedure setw(thebits : TBits_32); inline;
  25814. public
  25815. procedure clearRXFULLIE; inline;
  25816. procedure clearRXFULLIF; inline;
  25817. procedure clearRXHALFIE; inline;
  25818. procedure clearRXHALFIF; inline;
  25819. procedure clearRXNEMPTYIE; inline;
  25820. procedure clearRXNEMPTYIF; inline;
  25821. procedure clearRXOVFLIE; inline;
  25822. procedure clearRXOVFLIF; inline;
  25823. procedure clearTXEMPTYIE; inline;
  25824. procedure clearTXEMPTYIF; inline;
  25825. procedure clearTXHALFIE; inline;
  25826. procedure clearTXHALFIF; inline;
  25827. procedure clearTXNFULLIE; inline;
  25828. procedure clearTXNFULLIF; inline;
  25829. procedure setRXFULLIE; inline;
  25830. procedure setRXFULLIF; inline;
  25831. procedure setRXHALFIE; inline;
  25832. procedure setRXHALFIF; inline;
  25833. procedure setRXNEMPTYIE; inline;
  25834. procedure setRXNEMPTYIF; inline;
  25835. procedure setRXOVFLIE; inline;
  25836. procedure setRXOVFLIF; inline;
  25837. procedure setTXEMPTYIE; inline;
  25838. procedure setTXEMPTYIF; inline;
  25839. procedure setTXHALFIE; inline;
  25840. procedure setTXHALFIF; inline;
  25841. procedure setTXNFULLIE; inline;
  25842. procedure setTXNFULLIF; inline;
  25843. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25844. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25845. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25846. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25847. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25848. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25849. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25850. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25851. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25852. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25853. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25854. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25855. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25856. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25857. property w : TBits_32 read getw write setw;
  25858. end;
  25859. TCAN2_C2FIFOCI1 = record
  25860. private
  25861. function getCFIFOCI : TBits_5; inline;
  25862. function getw : TBits_32; inline;
  25863. procedure setCFIFOCI(thebits : TBits_5); inline;
  25864. procedure setw(thebits : TBits_32); inline;
  25865. public
  25866. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25867. property w : TBits_32 read getw write setw;
  25868. end;
  25869. TCAN2_C2FIFOCON2 = record
  25870. private
  25871. function getDONLY : TBits_1; inline;
  25872. function getFRESET : TBits_1; inline;
  25873. function getFSIZE : TBits_5; inline;
  25874. function getRTREN : TBits_1; inline;
  25875. function getTXABAT : TBits_1; inline;
  25876. function getTXEN : TBits_1; inline;
  25877. function getTXERR : TBits_1; inline;
  25878. function getTXLARB : TBits_1; inline;
  25879. function getTXPRI : TBits_2; inline;
  25880. function getTXREQ : TBits_1; inline;
  25881. function getUINC : TBits_1; inline;
  25882. function getw : TBits_32; inline;
  25883. procedure setDONLY(thebits : TBits_1); inline;
  25884. procedure setFRESET(thebits : TBits_1); inline;
  25885. procedure setFSIZE(thebits : TBits_5); inline;
  25886. procedure setRTREN(thebits : TBits_1); inline;
  25887. procedure setTXABAT(thebits : TBits_1); inline;
  25888. procedure setTXEN(thebits : TBits_1); inline;
  25889. procedure setTXERR(thebits : TBits_1); inline;
  25890. procedure setTXLARB(thebits : TBits_1); inline;
  25891. procedure setTXPRI(thebits : TBits_2); inline;
  25892. procedure setTXREQ(thebits : TBits_1); inline;
  25893. procedure setUINC(thebits : TBits_1); inline;
  25894. procedure setw(thebits : TBits_32); inline;
  25895. public
  25896. procedure clearDONLY; inline;
  25897. procedure clearFRESET; inline;
  25898. procedure clearRTREN; inline;
  25899. procedure clearTXABAT; inline;
  25900. procedure clearTXEN; inline;
  25901. procedure clearTXERR; inline;
  25902. procedure clearTXLARB; inline;
  25903. procedure clearTXREQ; inline;
  25904. procedure clearUINC; inline;
  25905. procedure setDONLY; inline;
  25906. procedure setFRESET; inline;
  25907. procedure setRTREN; inline;
  25908. procedure setTXABAT; inline;
  25909. procedure setTXEN; inline;
  25910. procedure setTXERR; inline;
  25911. procedure setTXLARB; inline;
  25912. procedure setTXREQ; inline;
  25913. procedure setUINC; inline;
  25914. property DONLY : TBits_1 read getDONLY write setDONLY;
  25915. property FRESET : TBits_1 read getFRESET write setFRESET;
  25916. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25917. property RTREN : TBits_1 read getRTREN write setRTREN;
  25918. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25919. property TXEN : TBits_1 read getTXEN write setTXEN;
  25920. property TXERR : TBits_1 read getTXERR write setTXERR;
  25921. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25922. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25923. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25924. property UINC : TBits_1 read getUINC write setUINC;
  25925. property w : TBits_32 read getw write setw;
  25926. end;
  25927. TCAN2_C2FIFOINT2 = record
  25928. private
  25929. function getRXFULLIE : TBits_1; inline;
  25930. function getRXFULLIF : TBits_1; inline;
  25931. function getRXHALFIE : TBits_1; inline;
  25932. function getRXHALFIF : TBits_1; inline;
  25933. function getRXNEMPTYIE : TBits_1; inline;
  25934. function getRXNEMPTYIF : TBits_1; inline;
  25935. function getRXOVFLIE : TBits_1; inline;
  25936. function getRXOVFLIF : TBits_1; inline;
  25937. function getTXEMPTYIE : TBits_1; inline;
  25938. function getTXEMPTYIF : TBits_1; inline;
  25939. function getTXHALFIE : TBits_1; inline;
  25940. function getTXHALFIF : TBits_1; inline;
  25941. function getTXNFULLIE : TBits_1; inline;
  25942. function getTXNFULLIF : TBits_1; inline;
  25943. function getw : TBits_32; inline;
  25944. procedure setRXFULLIE(thebits : TBits_1); inline;
  25945. procedure setRXFULLIF(thebits : TBits_1); inline;
  25946. procedure setRXHALFIE(thebits : TBits_1); inline;
  25947. procedure setRXHALFIF(thebits : TBits_1); inline;
  25948. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25949. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25950. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25951. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25952. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25953. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25954. procedure setTXHALFIE(thebits : TBits_1); inline;
  25955. procedure setTXHALFIF(thebits : TBits_1); inline;
  25956. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25957. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25958. procedure setw(thebits : TBits_32); inline;
  25959. public
  25960. procedure clearRXFULLIE; inline;
  25961. procedure clearRXFULLIF; inline;
  25962. procedure clearRXHALFIE; inline;
  25963. procedure clearRXHALFIF; inline;
  25964. procedure clearRXNEMPTYIE; inline;
  25965. procedure clearRXNEMPTYIF; inline;
  25966. procedure clearRXOVFLIE; inline;
  25967. procedure clearRXOVFLIF; inline;
  25968. procedure clearTXEMPTYIE; inline;
  25969. procedure clearTXEMPTYIF; inline;
  25970. procedure clearTXHALFIE; inline;
  25971. procedure clearTXHALFIF; inline;
  25972. procedure clearTXNFULLIE; inline;
  25973. procedure clearTXNFULLIF; inline;
  25974. procedure setRXFULLIE; inline;
  25975. procedure setRXFULLIF; inline;
  25976. procedure setRXHALFIE; inline;
  25977. procedure setRXHALFIF; inline;
  25978. procedure setRXNEMPTYIE; inline;
  25979. procedure setRXNEMPTYIF; inline;
  25980. procedure setRXOVFLIE; inline;
  25981. procedure setRXOVFLIF; inline;
  25982. procedure setTXEMPTYIE; inline;
  25983. procedure setTXEMPTYIF; inline;
  25984. procedure setTXHALFIE; inline;
  25985. procedure setTXHALFIF; inline;
  25986. procedure setTXNFULLIE; inline;
  25987. procedure setTXNFULLIF; inline;
  25988. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25989. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25990. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25991. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25992. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25993. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25994. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25995. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25996. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25997. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25998. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25999. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26000. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26001. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26002. property w : TBits_32 read getw write setw;
  26003. end;
  26004. TCAN2_C2FIFOCI2 = record
  26005. private
  26006. function getCFIFOCI : TBits_5; inline;
  26007. function getw : TBits_32; inline;
  26008. procedure setCFIFOCI(thebits : TBits_5); inline;
  26009. procedure setw(thebits : TBits_32); inline;
  26010. public
  26011. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26012. property w : TBits_32 read getw write setw;
  26013. end;
  26014. TCAN2_C2FIFOCON3 = record
  26015. private
  26016. function getDONLY : TBits_1; inline;
  26017. function getFRESET : TBits_1; inline;
  26018. function getFSIZE : TBits_5; inline;
  26019. function getRTREN : TBits_1; inline;
  26020. function getTXABAT : TBits_1; inline;
  26021. function getTXEN : TBits_1; inline;
  26022. function getTXERR : TBits_1; inline;
  26023. function getTXLARB : TBits_1; inline;
  26024. function getTXPRI : TBits_2; inline;
  26025. function getTXREQ : TBits_1; inline;
  26026. function getUINC : TBits_1; inline;
  26027. function getw : TBits_32; inline;
  26028. procedure setDONLY(thebits : TBits_1); inline;
  26029. procedure setFRESET(thebits : TBits_1); inline;
  26030. procedure setFSIZE(thebits : TBits_5); inline;
  26031. procedure setRTREN(thebits : TBits_1); inline;
  26032. procedure setTXABAT(thebits : TBits_1); inline;
  26033. procedure setTXEN(thebits : TBits_1); inline;
  26034. procedure setTXERR(thebits : TBits_1); inline;
  26035. procedure setTXLARB(thebits : TBits_1); inline;
  26036. procedure setTXPRI(thebits : TBits_2); inline;
  26037. procedure setTXREQ(thebits : TBits_1); inline;
  26038. procedure setUINC(thebits : TBits_1); inline;
  26039. procedure setw(thebits : TBits_32); inline;
  26040. public
  26041. procedure clearDONLY; inline;
  26042. procedure clearFRESET; inline;
  26043. procedure clearRTREN; inline;
  26044. procedure clearTXABAT; inline;
  26045. procedure clearTXEN; inline;
  26046. procedure clearTXERR; inline;
  26047. procedure clearTXLARB; inline;
  26048. procedure clearTXREQ; inline;
  26049. procedure clearUINC; inline;
  26050. procedure setDONLY; inline;
  26051. procedure setFRESET; inline;
  26052. procedure setRTREN; inline;
  26053. procedure setTXABAT; inline;
  26054. procedure setTXEN; inline;
  26055. procedure setTXERR; inline;
  26056. procedure setTXLARB; inline;
  26057. procedure setTXREQ; inline;
  26058. procedure setUINC; inline;
  26059. property DONLY : TBits_1 read getDONLY write setDONLY;
  26060. property FRESET : TBits_1 read getFRESET write setFRESET;
  26061. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26062. property RTREN : TBits_1 read getRTREN write setRTREN;
  26063. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26064. property TXEN : TBits_1 read getTXEN write setTXEN;
  26065. property TXERR : TBits_1 read getTXERR write setTXERR;
  26066. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26067. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26068. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26069. property UINC : TBits_1 read getUINC write setUINC;
  26070. property w : TBits_32 read getw write setw;
  26071. end;
  26072. TCAN2_C2FIFOINT3 = record
  26073. private
  26074. function getRXFULLIE : TBits_1; inline;
  26075. function getRXFULLIF : TBits_1; inline;
  26076. function getRXHALFIE : TBits_1; inline;
  26077. function getRXHALFIF : TBits_1; inline;
  26078. function getRXNEMPTYIE : TBits_1; inline;
  26079. function getRXNEMPTYIF : TBits_1; inline;
  26080. function getRXOVFLIE : TBits_1; inline;
  26081. function getRXOVFLIF : TBits_1; inline;
  26082. function getTXEMPTYIE : TBits_1; inline;
  26083. function getTXEMPTYIF : TBits_1; inline;
  26084. function getTXHALFIE : TBits_1; inline;
  26085. function getTXHALFIF : TBits_1; inline;
  26086. function getTXNFULLIE : TBits_1; inline;
  26087. function getTXNFULLIF : TBits_1; inline;
  26088. function getw : TBits_32; inline;
  26089. procedure setRXFULLIE(thebits : TBits_1); inline;
  26090. procedure setRXFULLIF(thebits : TBits_1); inline;
  26091. procedure setRXHALFIE(thebits : TBits_1); inline;
  26092. procedure setRXHALFIF(thebits : TBits_1); inline;
  26093. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26094. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26095. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26096. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26097. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26098. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26099. procedure setTXHALFIE(thebits : TBits_1); inline;
  26100. procedure setTXHALFIF(thebits : TBits_1); inline;
  26101. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26102. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26103. procedure setw(thebits : TBits_32); inline;
  26104. public
  26105. procedure clearRXFULLIE; inline;
  26106. procedure clearRXFULLIF; inline;
  26107. procedure clearRXHALFIE; inline;
  26108. procedure clearRXHALFIF; inline;
  26109. procedure clearRXNEMPTYIE; inline;
  26110. procedure clearRXNEMPTYIF; inline;
  26111. procedure clearRXOVFLIE; inline;
  26112. procedure clearRXOVFLIF; inline;
  26113. procedure clearTXEMPTYIE; inline;
  26114. procedure clearTXEMPTYIF; inline;
  26115. procedure clearTXHALFIE; inline;
  26116. procedure clearTXHALFIF; inline;
  26117. procedure clearTXNFULLIE; inline;
  26118. procedure clearTXNFULLIF; inline;
  26119. procedure setRXFULLIE; inline;
  26120. procedure setRXFULLIF; inline;
  26121. procedure setRXHALFIE; inline;
  26122. procedure setRXHALFIF; inline;
  26123. procedure setRXNEMPTYIE; inline;
  26124. procedure setRXNEMPTYIF; inline;
  26125. procedure setRXOVFLIE; inline;
  26126. procedure setRXOVFLIF; inline;
  26127. procedure setTXEMPTYIE; inline;
  26128. procedure setTXEMPTYIF; inline;
  26129. procedure setTXHALFIE; inline;
  26130. procedure setTXHALFIF; inline;
  26131. procedure setTXNFULLIE; inline;
  26132. procedure setTXNFULLIF; inline;
  26133. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26134. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26135. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26136. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26137. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26138. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26139. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26140. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26141. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26142. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26143. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26144. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26145. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26146. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26147. property w : TBits_32 read getw write setw;
  26148. end;
  26149. TCAN2_C2FIFOCI3 = record
  26150. private
  26151. function getCFIFOCI : TBits_5; inline;
  26152. function getw : TBits_32; inline;
  26153. procedure setCFIFOCI(thebits : TBits_5); inline;
  26154. procedure setw(thebits : TBits_32); inline;
  26155. public
  26156. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26157. property w : TBits_32 read getw write setw;
  26158. end;
  26159. TCAN2_C2FIFOCON4 = record
  26160. private
  26161. function getDONLY : TBits_1; inline;
  26162. function getFRESET : TBits_1; inline;
  26163. function getFSIZE : TBits_5; inline;
  26164. function getRTREN : TBits_1; inline;
  26165. function getTXABAT : TBits_1; inline;
  26166. function getTXEN : TBits_1; inline;
  26167. function getTXERR : TBits_1; inline;
  26168. function getTXLARB : TBits_1; inline;
  26169. function getTXPRI : TBits_2; inline;
  26170. function getTXREQ : TBits_1; inline;
  26171. function getUINC : TBits_1; inline;
  26172. function getw : TBits_32; inline;
  26173. procedure setDONLY(thebits : TBits_1); inline;
  26174. procedure setFRESET(thebits : TBits_1); inline;
  26175. procedure setFSIZE(thebits : TBits_5); inline;
  26176. procedure setRTREN(thebits : TBits_1); inline;
  26177. procedure setTXABAT(thebits : TBits_1); inline;
  26178. procedure setTXEN(thebits : TBits_1); inline;
  26179. procedure setTXERR(thebits : TBits_1); inline;
  26180. procedure setTXLARB(thebits : TBits_1); inline;
  26181. procedure setTXPRI(thebits : TBits_2); inline;
  26182. procedure setTXREQ(thebits : TBits_1); inline;
  26183. procedure setUINC(thebits : TBits_1); inline;
  26184. procedure setw(thebits : TBits_32); inline;
  26185. public
  26186. procedure clearDONLY; inline;
  26187. procedure clearFRESET; inline;
  26188. procedure clearRTREN; inline;
  26189. procedure clearTXABAT; inline;
  26190. procedure clearTXEN; inline;
  26191. procedure clearTXERR; inline;
  26192. procedure clearTXLARB; inline;
  26193. procedure clearTXREQ; inline;
  26194. procedure clearUINC; inline;
  26195. procedure setDONLY; inline;
  26196. procedure setFRESET; inline;
  26197. procedure setRTREN; inline;
  26198. procedure setTXABAT; inline;
  26199. procedure setTXEN; inline;
  26200. procedure setTXERR; inline;
  26201. procedure setTXLARB; inline;
  26202. procedure setTXREQ; inline;
  26203. procedure setUINC; inline;
  26204. property DONLY : TBits_1 read getDONLY write setDONLY;
  26205. property FRESET : TBits_1 read getFRESET write setFRESET;
  26206. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26207. property RTREN : TBits_1 read getRTREN write setRTREN;
  26208. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26209. property TXEN : TBits_1 read getTXEN write setTXEN;
  26210. property TXERR : TBits_1 read getTXERR write setTXERR;
  26211. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26212. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26213. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26214. property UINC : TBits_1 read getUINC write setUINC;
  26215. property w : TBits_32 read getw write setw;
  26216. end;
  26217. TCAN2_C2FIFOINT4 = record
  26218. private
  26219. function getRXFULLIE : TBits_1; inline;
  26220. function getRXFULLIF : TBits_1; inline;
  26221. function getRXHALFIE : TBits_1; inline;
  26222. function getRXHALFIF : TBits_1; inline;
  26223. function getRXNEMPTYIE : TBits_1; inline;
  26224. function getRXNEMPTYIF : TBits_1; inline;
  26225. function getRXOVFLIE : TBits_1; inline;
  26226. function getRXOVFLIF : TBits_1; inline;
  26227. function getTXEMPTYIE : TBits_1; inline;
  26228. function getTXEMPTYIF : TBits_1; inline;
  26229. function getTXHALFIE : TBits_1; inline;
  26230. function getTXHALFIF : TBits_1; inline;
  26231. function getTXNFULLIE : TBits_1; inline;
  26232. function getTXNFULLIF : TBits_1; inline;
  26233. function getw : TBits_32; inline;
  26234. procedure setRXFULLIE(thebits : TBits_1); inline;
  26235. procedure setRXFULLIF(thebits : TBits_1); inline;
  26236. procedure setRXHALFIE(thebits : TBits_1); inline;
  26237. procedure setRXHALFIF(thebits : TBits_1); inline;
  26238. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26239. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26240. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26241. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26242. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26243. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26244. procedure setTXHALFIE(thebits : TBits_1); inline;
  26245. procedure setTXHALFIF(thebits : TBits_1); inline;
  26246. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26247. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26248. procedure setw(thebits : TBits_32); inline;
  26249. public
  26250. procedure clearRXFULLIE; inline;
  26251. procedure clearRXFULLIF; inline;
  26252. procedure clearRXHALFIE; inline;
  26253. procedure clearRXHALFIF; inline;
  26254. procedure clearRXNEMPTYIE; inline;
  26255. procedure clearRXNEMPTYIF; inline;
  26256. procedure clearRXOVFLIE; inline;
  26257. procedure clearRXOVFLIF; inline;
  26258. procedure clearTXEMPTYIE; inline;
  26259. procedure clearTXEMPTYIF; inline;
  26260. procedure clearTXHALFIE; inline;
  26261. procedure clearTXHALFIF; inline;
  26262. procedure clearTXNFULLIE; inline;
  26263. procedure clearTXNFULLIF; inline;
  26264. procedure setRXFULLIE; inline;
  26265. procedure setRXFULLIF; inline;
  26266. procedure setRXHALFIE; inline;
  26267. procedure setRXHALFIF; inline;
  26268. procedure setRXNEMPTYIE; inline;
  26269. procedure setRXNEMPTYIF; inline;
  26270. procedure setRXOVFLIE; inline;
  26271. procedure setRXOVFLIF; inline;
  26272. procedure setTXEMPTYIE; inline;
  26273. procedure setTXEMPTYIF; inline;
  26274. procedure setTXHALFIE; inline;
  26275. procedure setTXHALFIF; inline;
  26276. procedure setTXNFULLIE; inline;
  26277. procedure setTXNFULLIF; inline;
  26278. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26279. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26280. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26281. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26282. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26283. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26284. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26285. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26286. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26287. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26288. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26289. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26290. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26291. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26292. property w : TBits_32 read getw write setw;
  26293. end;
  26294. TCAN2_C2FIFOCI4 = record
  26295. private
  26296. function getCFIFOCI : TBits_5; inline;
  26297. function getw : TBits_32; inline;
  26298. procedure setCFIFOCI(thebits : TBits_5); inline;
  26299. procedure setw(thebits : TBits_32); inline;
  26300. public
  26301. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26302. property w : TBits_32 read getw write setw;
  26303. end;
  26304. TCAN2_C2FIFOCON5 = record
  26305. private
  26306. function getDONLY : TBits_1; inline;
  26307. function getFRESET : TBits_1; inline;
  26308. function getFSIZE : TBits_5; inline;
  26309. function getRTREN : TBits_1; inline;
  26310. function getTXABAT : TBits_1; inline;
  26311. function getTXEN : TBits_1; inline;
  26312. function getTXERR : TBits_1; inline;
  26313. function getTXLARB : TBits_1; inline;
  26314. function getTXPRI : TBits_2; inline;
  26315. function getTXREQ : TBits_1; inline;
  26316. function getUINC : TBits_1; inline;
  26317. function getw : TBits_32; inline;
  26318. procedure setDONLY(thebits : TBits_1); inline;
  26319. procedure setFRESET(thebits : TBits_1); inline;
  26320. procedure setFSIZE(thebits : TBits_5); inline;
  26321. procedure setRTREN(thebits : TBits_1); inline;
  26322. procedure setTXABAT(thebits : TBits_1); inline;
  26323. procedure setTXEN(thebits : TBits_1); inline;
  26324. procedure setTXERR(thebits : TBits_1); inline;
  26325. procedure setTXLARB(thebits : TBits_1); inline;
  26326. procedure setTXPRI(thebits : TBits_2); inline;
  26327. procedure setTXREQ(thebits : TBits_1); inline;
  26328. procedure setUINC(thebits : TBits_1); inline;
  26329. procedure setw(thebits : TBits_32); inline;
  26330. public
  26331. procedure clearDONLY; inline;
  26332. procedure clearFRESET; inline;
  26333. procedure clearRTREN; inline;
  26334. procedure clearTXABAT; inline;
  26335. procedure clearTXEN; inline;
  26336. procedure clearTXERR; inline;
  26337. procedure clearTXLARB; inline;
  26338. procedure clearTXREQ; inline;
  26339. procedure clearUINC; inline;
  26340. procedure setDONLY; inline;
  26341. procedure setFRESET; inline;
  26342. procedure setRTREN; inline;
  26343. procedure setTXABAT; inline;
  26344. procedure setTXEN; inline;
  26345. procedure setTXERR; inline;
  26346. procedure setTXLARB; inline;
  26347. procedure setTXREQ; inline;
  26348. procedure setUINC; inline;
  26349. property DONLY : TBits_1 read getDONLY write setDONLY;
  26350. property FRESET : TBits_1 read getFRESET write setFRESET;
  26351. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26352. property RTREN : TBits_1 read getRTREN write setRTREN;
  26353. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26354. property TXEN : TBits_1 read getTXEN write setTXEN;
  26355. property TXERR : TBits_1 read getTXERR write setTXERR;
  26356. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26357. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26358. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26359. property UINC : TBits_1 read getUINC write setUINC;
  26360. property w : TBits_32 read getw write setw;
  26361. end;
  26362. TCAN2_C2FIFOINT5 = record
  26363. private
  26364. function getRXFULLIE : TBits_1; inline;
  26365. function getRXFULLIF : TBits_1; inline;
  26366. function getRXHALFIE : TBits_1; inline;
  26367. function getRXHALFIF : TBits_1; inline;
  26368. function getRXNEMPTYIE : TBits_1; inline;
  26369. function getRXNEMPTYIF : TBits_1; inline;
  26370. function getRXOVFLIE : TBits_1; inline;
  26371. function getRXOVFLIF : TBits_1; inline;
  26372. function getTXEMPTYIE : TBits_1; inline;
  26373. function getTXEMPTYIF : TBits_1; inline;
  26374. function getTXHALFIE : TBits_1; inline;
  26375. function getTXHALFIF : TBits_1; inline;
  26376. function getTXNFULLIE : TBits_1; inline;
  26377. function getTXNFULLIF : TBits_1; inline;
  26378. function getw : TBits_32; inline;
  26379. procedure setRXFULLIE(thebits : TBits_1); inline;
  26380. procedure setRXFULLIF(thebits : TBits_1); inline;
  26381. procedure setRXHALFIE(thebits : TBits_1); inline;
  26382. procedure setRXHALFIF(thebits : TBits_1); inline;
  26383. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26384. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26385. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26386. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26387. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26388. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26389. procedure setTXHALFIE(thebits : TBits_1); inline;
  26390. procedure setTXHALFIF(thebits : TBits_1); inline;
  26391. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26392. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26393. procedure setw(thebits : TBits_32); inline;
  26394. public
  26395. procedure clearRXFULLIE; inline;
  26396. procedure clearRXFULLIF; inline;
  26397. procedure clearRXHALFIE; inline;
  26398. procedure clearRXHALFIF; inline;
  26399. procedure clearRXNEMPTYIE; inline;
  26400. procedure clearRXNEMPTYIF; inline;
  26401. procedure clearRXOVFLIE; inline;
  26402. procedure clearRXOVFLIF; inline;
  26403. procedure clearTXEMPTYIE; inline;
  26404. procedure clearTXEMPTYIF; inline;
  26405. procedure clearTXHALFIE; inline;
  26406. procedure clearTXHALFIF; inline;
  26407. procedure clearTXNFULLIE; inline;
  26408. procedure clearTXNFULLIF; inline;
  26409. procedure setRXFULLIE; inline;
  26410. procedure setRXFULLIF; inline;
  26411. procedure setRXHALFIE; inline;
  26412. procedure setRXHALFIF; inline;
  26413. procedure setRXNEMPTYIE; inline;
  26414. procedure setRXNEMPTYIF; inline;
  26415. procedure setRXOVFLIE; inline;
  26416. procedure setRXOVFLIF; inline;
  26417. procedure setTXEMPTYIE; inline;
  26418. procedure setTXEMPTYIF; inline;
  26419. procedure setTXHALFIE; inline;
  26420. procedure setTXHALFIF; inline;
  26421. procedure setTXNFULLIE; inline;
  26422. procedure setTXNFULLIF; inline;
  26423. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26424. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26425. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26426. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26427. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26428. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26429. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26430. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26431. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26432. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26433. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26434. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26435. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26436. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26437. property w : TBits_32 read getw write setw;
  26438. end;
  26439. TCAN2_C2FIFOCI5 = record
  26440. private
  26441. function getCFIFOCI : TBits_5; inline;
  26442. function getw : TBits_32; inline;
  26443. procedure setCFIFOCI(thebits : TBits_5); inline;
  26444. procedure setw(thebits : TBits_32); inline;
  26445. public
  26446. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26447. property w : TBits_32 read getw write setw;
  26448. end;
  26449. TCAN2_C2FIFOCON6 = record
  26450. private
  26451. function getDONLY : TBits_1; inline;
  26452. function getFRESET : TBits_1; inline;
  26453. function getFSIZE : TBits_5; inline;
  26454. function getRTREN : TBits_1; inline;
  26455. function getTXABAT : TBits_1; inline;
  26456. function getTXEN : TBits_1; inline;
  26457. function getTXERR : TBits_1; inline;
  26458. function getTXLARB : TBits_1; inline;
  26459. function getTXPRI : TBits_2; inline;
  26460. function getTXREQ : TBits_1; inline;
  26461. function getUINC : TBits_1; inline;
  26462. function getw : TBits_32; inline;
  26463. procedure setDONLY(thebits : TBits_1); inline;
  26464. procedure setFRESET(thebits : TBits_1); inline;
  26465. procedure setFSIZE(thebits : TBits_5); inline;
  26466. procedure setRTREN(thebits : TBits_1); inline;
  26467. procedure setTXABAT(thebits : TBits_1); inline;
  26468. procedure setTXEN(thebits : TBits_1); inline;
  26469. procedure setTXERR(thebits : TBits_1); inline;
  26470. procedure setTXLARB(thebits : TBits_1); inline;
  26471. procedure setTXPRI(thebits : TBits_2); inline;
  26472. procedure setTXREQ(thebits : TBits_1); inline;
  26473. procedure setUINC(thebits : TBits_1); inline;
  26474. procedure setw(thebits : TBits_32); inline;
  26475. public
  26476. procedure clearDONLY; inline;
  26477. procedure clearFRESET; inline;
  26478. procedure clearRTREN; inline;
  26479. procedure clearTXABAT; inline;
  26480. procedure clearTXEN; inline;
  26481. procedure clearTXERR; inline;
  26482. procedure clearTXLARB; inline;
  26483. procedure clearTXREQ; inline;
  26484. procedure clearUINC; inline;
  26485. procedure setDONLY; inline;
  26486. procedure setFRESET; inline;
  26487. procedure setRTREN; inline;
  26488. procedure setTXABAT; inline;
  26489. procedure setTXEN; inline;
  26490. procedure setTXERR; inline;
  26491. procedure setTXLARB; inline;
  26492. procedure setTXREQ; inline;
  26493. procedure setUINC; inline;
  26494. property DONLY : TBits_1 read getDONLY write setDONLY;
  26495. property FRESET : TBits_1 read getFRESET write setFRESET;
  26496. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26497. property RTREN : TBits_1 read getRTREN write setRTREN;
  26498. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26499. property TXEN : TBits_1 read getTXEN write setTXEN;
  26500. property TXERR : TBits_1 read getTXERR write setTXERR;
  26501. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26502. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26503. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26504. property UINC : TBits_1 read getUINC write setUINC;
  26505. property w : TBits_32 read getw write setw;
  26506. end;
  26507. TCAN2_C2FIFOINT6 = record
  26508. private
  26509. function getRXFULLIE : TBits_1; inline;
  26510. function getRXFULLIF : TBits_1; inline;
  26511. function getRXHALFIE : TBits_1; inline;
  26512. function getRXHALFIF : TBits_1; inline;
  26513. function getRXNEMPTYIE : TBits_1; inline;
  26514. function getRXNEMPTYIF : TBits_1; inline;
  26515. function getRXOVFLIE : TBits_1; inline;
  26516. function getRXOVFLIF : TBits_1; inline;
  26517. function getTXEMPTYIE : TBits_1; inline;
  26518. function getTXEMPTYIF : TBits_1; inline;
  26519. function getTXHALFIE : TBits_1; inline;
  26520. function getTXHALFIF : TBits_1; inline;
  26521. function getTXNFULLIE : TBits_1; inline;
  26522. function getTXNFULLIF : TBits_1; inline;
  26523. function getw : TBits_32; inline;
  26524. procedure setRXFULLIE(thebits : TBits_1); inline;
  26525. procedure setRXFULLIF(thebits : TBits_1); inline;
  26526. procedure setRXHALFIE(thebits : TBits_1); inline;
  26527. procedure setRXHALFIF(thebits : TBits_1); inline;
  26528. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26529. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26530. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26531. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26532. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26533. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26534. procedure setTXHALFIE(thebits : TBits_1); inline;
  26535. procedure setTXHALFIF(thebits : TBits_1); inline;
  26536. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26537. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26538. procedure setw(thebits : TBits_32); inline;
  26539. public
  26540. procedure clearRXFULLIE; inline;
  26541. procedure clearRXFULLIF; inline;
  26542. procedure clearRXHALFIE; inline;
  26543. procedure clearRXHALFIF; inline;
  26544. procedure clearRXNEMPTYIE; inline;
  26545. procedure clearRXNEMPTYIF; inline;
  26546. procedure clearRXOVFLIE; inline;
  26547. procedure clearRXOVFLIF; inline;
  26548. procedure clearTXEMPTYIE; inline;
  26549. procedure clearTXEMPTYIF; inline;
  26550. procedure clearTXHALFIE; inline;
  26551. procedure clearTXHALFIF; inline;
  26552. procedure clearTXNFULLIE; inline;
  26553. procedure clearTXNFULLIF; inline;
  26554. procedure setRXFULLIE; inline;
  26555. procedure setRXFULLIF; inline;
  26556. procedure setRXHALFIE; inline;
  26557. procedure setRXHALFIF; inline;
  26558. procedure setRXNEMPTYIE; inline;
  26559. procedure setRXNEMPTYIF; inline;
  26560. procedure setRXOVFLIE; inline;
  26561. procedure setRXOVFLIF; inline;
  26562. procedure setTXEMPTYIE; inline;
  26563. procedure setTXEMPTYIF; inline;
  26564. procedure setTXHALFIE; inline;
  26565. procedure setTXHALFIF; inline;
  26566. procedure setTXNFULLIE; inline;
  26567. procedure setTXNFULLIF; inline;
  26568. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26569. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26570. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26571. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26572. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26573. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26574. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26575. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26576. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26577. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26578. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26579. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26580. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26581. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26582. property w : TBits_32 read getw write setw;
  26583. end;
  26584. TCAN2_C2FIFOCI6 = record
  26585. private
  26586. function getCFIFOCI : TBits_5; inline;
  26587. function getw : TBits_32; inline;
  26588. procedure setCFIFOCI(thebits : TBits_5); inline;
  26589. procedure setw(thebits : TBits_32); inline;
  26590. public
  26591. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26592. property w : TBits_32 read getw write setw;
  26593. end;
  26594. TCAN2_C2FIFOCON7 = record
  26595. private
  26596. function getDONLY : TBits_1; inline;
  26597. function getFRESET : TBits_1; inline;
  26598. function getFSIZE : TBits_5; inline;
  26599. function getRTREN : TBits_1; inline;
  26600. function getTXABAT : TBits_1; inline;
  26601. function getTXEN : TBits_1; inline;
  26602. function getTXERR : TBits_1; inline;
  26603. function getTXLARB : TBits_1; inline;
  26604. function getTXPRI : TBits_2; inline;
  26605. function getTXREQ : TBits_1; inline;
  26606. function getUINC : TBits_1; inline;
  26607. function getw : TBits_32; inline;
  26608. procedure setDONLY(thebits : TBits_1); inline;
  26609. procedure setFRESET(thebits : TBits_1); inline;
  26610. procedure setFSIZE(thebits : TBits_5); inline;
  26611. procedure setRTREN(thebits : TBits_1); inline;
  26612. procedure setTXABAT(thebits : TBits_1); inline;
  26613. procedure setTXEN(thebits : TBits_1); inline;
  26614. procedure setTXERR(thebits : TBits_1); inline;
  26615. procedure setTXLARB(thebits : TBits_1); inline;
  26616. procedure setTXPRI(thebits : TBits_2); inline;
  26617. procedure setTXREQ(thebits : TBits_1); inline;
  26618. procedure setUINC(thebits : TBits_1); inline;
  26619. procedure setw(thebits : TBits_32); inline;
  26620. public
  26621. procedure clearDONLY; inline;
  26622. procedure clearFRESET; inline;
  26623. procedure clearRTREN; inline;
  26624. procedure clearTXABAT; inline;
  26625. procedure clearTXEN; inline;
  26626. procedure clearTXERR; inline;
  26627. procedure clearTXLARB; inline;
  26628. procedure clearTXREQ; inline;
  26629. procedure clearUINC; inline;
  26630. procedure setDONLY; inline;
  26631. procedure setFRESET; inline;
  26632. procedure setRTREN; inline;
  26633. procedure setTXABAT; inline;
  26634. procedure setTXEN; inline;
  26635. procedure setTXERR; inline;
  26636. procedure setTXLARB; inline;
  26637. procedure setTXREQ; inline;
  26638. procedure setUINC; inline;
  26639. property DONLY : TBits_1 read getDONLY write setDONLY;
  26640. property FRESET : TBits_1 read getFRESET write setFRESET;
  26641. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26642. property RTREN : TBits_1 read getRTREN write setRTREN;
  26643. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26644. property TXEN : TBits_1 read getTXEN write setTXEN;
  26645. property TXERR : TBits_1 read getTXERR write setTXERR;
  26646. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26647. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26648. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26649. property UINC : TBits_1 read getUINC write setUINC;
  26650. property w : TBits_32 read getw write setw;
  26651. end;
  26652. TCAN2_C2FIFOINT7 = record
  26653. private
  26654. function getRXFULLIE : TBits_1; inline;
  26655. function getRXFULLIF : TBits_1; inline;
  26656. function getRXHALFIE : TBits_1; inline;
  26657. function getRXHALFIF : TBits_1; inline;
  26658. function getRXNEMPTYIE : TBits_1; inline;
  26659. function getRXNEMPTYIF : TBits_1; inline;
  26660. function getRXOVFLIE : TBits_1; inline;
  26661. function getRXOVFLIF : TBits_1; inline;
  26662. function getTXEMPTYIE : TBits_1; inline;
  26663. function getTXEMPTYIF : TBits_1; inline;
  26664. function getTXHALFIE : TBits_1; inline;
  26665. function getTXHALFIF : TBits_1; inline;
  26666. function getTXNFULLIE : TBits_1; inline;
  26667. function getTXNFULLIF : TBits_1; inline;
  26668. function getw : TBits_32; inline;
  26669. procedure setRXFULLIE(thebits : TBits_1); inline;
  26670. procedure setRXFULLIF(thebits : TBits_1); inline;
  26671. procedure setRXHALFIE(thebits : TBits_1); inline;
  26672. procedure setRXHALFIF(thebits : TBits_1); inline;
  26673. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26674. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26675. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26676. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26677. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26678. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26679. procedure setTXHALFIE(thebits : TBits_1); inline;
  26680. procedure setTXHALFIF(thebits : TBits_1); inline;
  26681. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26682. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26683. procedure setw(thebits : TBits_32); inline;
  26684. public
  26685. procedure clearRXFULLIE; inline;
  26686. procedure clearRXFULLIF; inline;
  26687. procedure clearRXHALFIE; inline;
  26688. procedure clearRXHALFIF; inline;
  26689. procedure clearRXNEMPTYIE; inline;
  26690. procedure clearRXNEMPTYIF; inline;
  26691. procedure clearRXOVFLIE; inline;
  26692. procedure clearRXOVFLIF; inline;
  26693. procedure clearTXEMPTYIE; inline;
  26694. procedure clearTXEMPTYIF; inline;
  26695. procedure clearTXHALFIE; inline;
  26696. procedure clearTXHALFIF; inline;
  26697. procedure clearTXNFULLIE; inline;
  26698. procedure clearTXNFULLIF; inline;
  26699. procedure setRXFULLIE; inline;
  26700. procedure setRXFULLIF; inline;
  26701. procedure setRXHALFIE; inline;
  26702. procedure setRXHALFIF; inline;
  26703. procedure setRXNEMPTYIE; inline;
  26704. procedure setRXNEMPTYIF; inline;
  26705. procedure setRXOVFLIE; inline;
  26706. procedure setRXOVFLIF; inline;
  26707. procedure setTXEMPTYIE; inline;
  26708. procedure setTXEMPTYIF; inline;
  26709. procedure setTXHALFIE; inline;
  26710. procedure setTXHALFIF; inline;
  26711. procedure setTXNFULLIE; inline;
  26712. procedure setTXNFULLIF; inline;
  26713. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26714. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26715. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26716. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26717. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26718. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26719. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26720. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26721. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26722. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26723. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26724. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26725. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26726. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26727. property w : TBits_32 read getw write setw;
  26728. end;
  26729. TCAN2_C2FIFOCI7 = record
  26730. private
  26731. function getCFIFOCI : TBits_5; inline;
  26732. function getw : TBits_32; inline;
  26733. procedure setCFIFOCI(thebits : TBits_5); inline;
  26734. procedure setw(thebits : TBits_32); inline;
  26735. public
  26736. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26737. property w : TBits_32 read getw write setw;
  26738. end;
  26739. TCAN2_C2FIFOCON8 = record
  26740. private
  26741. function getDONLY : TBits_1; inline;
  26742. function getFRESET : TBits_1; inline;
  26743. function getFSIZE : TBits_5; inline;
  26744. function getRTREN : TBits_1; inline;
  26745. function getTXABAT : TBits_1; inline;
  26746. function getTXEN : TBits_1; inline;
  26747. function getTXERR : TBits_1; inline;
  26748. function getTXLARB : TBits_1; inline;
  26749. function getTXPRI : TBits_2; inline;
  26750. function getTXREQ : TBits_1; inline;
  26751. function getUINC : TBits_1; inline;
  26752. function getw : TBits_32; inline;
  26753. procedure setDONLY(thebits : TBits_1); inline;
  26754. procedure setFRESET(thebits : TBits_1); inline;
  26755. procedure setFSIZE(thebits : TBits_5); inline;
  26756. procedure setRTREN(thebits : TBits_1); inline;
  26757. procedure setTXABAT(thebits : TBits_1); inline;
  26758. procedure setTXEN(thebits : TBits_1); inline;
  26759. procedure setTXERR(thebits : TBits_1); inline;
  26760. procedure setTXLARB(thebits : TBits_1); inline;
  26761. procedure setTXPRI(thebits : TBits_2); inline;
  26762. procedure setTXREQ(thebits : TBits_1); inline;
  26763. procedure setUINC(thebits : TBits_1); inline;
  26764. procedure setw(thebits : TBits_32); inline;
  26765. public
  26766. procedure clearDONLY; inline;
  26767. procedure clearFRESET; inline;
  26768. procedure clearRTREN; inline;
  26769. procedure clearTXABAT; inline;
  26770. procedure clearTXEN; inline;
  26771. procedure clearTXERR; inline;
  26772. procedure clearTXLARB; inline;
  26773. procedure clearTXREQ; inline;
  26774. procedure clearUINC; inline;
  26775. procedure setDONLY; inline;
  26776. procedure setFRESET; inline;
  26777. procedure setRTREN; inline;
  26778. procedure setTXABAT; inline;
  26779. procedure setTXEN; inline;
  26780. procedure setTXERR; inline;
  26781. procedure setTXLARB; inline;
  26782. procedure setTXREQ; inline;
  26783. procedure setUINC; inline;
  26784. property DONLY : TBits_1 read getDONLY write setDONLY;
  26785. property FRESET : TBits_1 read getFRESET write setFRESET;
  26786. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26787. property RTREN : TBits_1 read getRTREN write setRTREN;
  26788. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26789. property TXEN : TBits_1 read getTXEN write setTXEN;
  26790. property TXERR : TBits_1 read getTXERR write setTXERR;
  26791. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26792. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26793. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26794. property UINC : TBits_1 read getUINC write setUINC;
  26795. property w : TBits_32 read getw write setw;
  26796. end;
  26797. TCAN2_C2FIFOINT8 = record
  26798. private
  26799. function getRXFULLIE : TBits_1; inline;
  26800. function getRXFULLIF : TBits_1; inline;
  26801. function getRXHALFIE : TBits_1; inline;
  26802. function getRXHALFIF : TBits_1; inline;
  26803. function getRXNEMPTYIE : TBits_1; inline;
  26804. function getRXNEMPTYIF : TBits_1; inline;
  26805. function getRXOVFLIE : TBits_1; inline;
  26806. function getRXOVFLIF : TBits_1; inline;
  26807. function getTXEMPTYIE : TBits_1; inline;
  26808. function getTXEMPTYIF : TBits_1; inline;
  26809. function getTXHALFIE : TBits_1; inline;
  26810. function getTXHALFIF : TBits_1; inline;
  26811. function getTXNFULLIE : TBits_1; inline;
  26812. function getTXNFULLIF : TBits_1; inline;
  26813. function getw : TBits_32; inline;
  26814. procedure setRXFULLIE(thebits : TBits_1); inline;
  26815. procedure setRXFULLIF(thebits : TBits_1); inline;
  26816. procedure setRXHALFIE(thebits : TBits_1); inline;
  26817. procedure setRXHALFIF(thebits : TBits_1); inline;
  26818. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26819. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26820. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26821. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26822. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26823. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26824. procedure setTXHALFIE(thebits : TBits_1); inline;
  26825. procedure setTXHALFIF(thebits : TBits_1); inline;
  26826. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26827. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26828. procedure setw(thebits : TBits_32); inline;
  26829. public
  26830. procedure clearRXFULLIE; inline;
  26831. procedure clearRXFULLIF; inline;
  26832. procedure clearRXHALFIE; inline;
  26833. procedure clearRXHALFIF; inline;
  26834. procedure clearRXNEMPTYIE; inline;
  26835. procedure clearRXNEMPTYIF; inline;
  26836. procedure clearRXOVFLIE; inline;
  26837. procedure clearRXOVFLIF; inline;
  26838. procedure clearTXEMPTYIE; inline;
  26839. procedure clearTXEMPTYIF; inline;
  26840. procedure clearTXHALFIE; inline;
  26841. procedure clearTXHALFIF; inline;
  26842. procedure clearTXNFULLIE; inline;
  26843. procedure clearTXNFULLIF; inline;
  26844. procedure setRXFULLIE; inline;
  26845. procedure setRXFULLIF; inline;
  26846. procedure setRXHALFIE; inline;
  26847. procedure setRXHALFIF; inline;
  26848. procedure setRXNEMPTYIE; inline;
  26849. procedure setRXNEMPTYIF; inline;
  26850. procedure setRXOVFLIE; inline;
  26851. procedure setRXOVFLIF; inline;
  26852. procedure setTXEMPTYIE; inline;
  26853. procedure setTXEMPTYIF; inline;
  26854. procedure setTXHALFIE; inline;
  26855. procedure setTXHALFIF; inline;
  26856. procedure setTXNFULLIE; inline;
  26857. procedure setTXNFULLIF; inline;
  26858. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26859. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26860. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26861. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26862. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26863. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26864. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26865. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26866. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26867. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26868. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26869. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26870. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26871. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26872. property w : TBits_32 read getw write setw;
  26873. end;
  26874. TCAN2_C2FIFOCI8 = record
  26875. private
  26876. function getCFIFOCI : TBits_5; inline;
  26877. function getw : TBits_32; inline;
  26878. procedure setCFIFOCI(thebits : TBits_5); inline;
  26879. procedure setw(thebits : TBits_32); inline;
  26880. public
  26881. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26882. property w : TBits_32 read getw write setw;
  26883. end;
  26884. TCAN2_C2FIFOCON9 = record
  26885. private
  26886. function getDONLY : TBits_1; inline;
  26887. function getFRESET : TBits_1; inline;
  26888. function getFSIZE : TBits_5; inline;
  26889. function getRTREN : TBits_1; inline;
  26890. function getTXABAT : TBits_1; inline;
  26891. function getTXEN : TBits_1; inline;
  26892. function getTXERR : TBits_1; inline;
  26893. function getTXLARB : TBits_1; inline;
  26894. function getTXPRI : TBits_2; inline;
  26895. function getTXREQ : TBits_1; inline;
  26896. function getUINC : TBits_1; inline;
  26897. function getw : TBits_32; inline;
  26898. procedure setDONLY(thebits : TBits_1); inline;
  26899. procedure setFRESET(thebits : TBits_1); inline;
  26900. procedure setFSIZE(thebits : TBits_5); inline;
  26901. procedure setRTREN(thebits : TBits_1); inline;
  26902. procedure setTXABAT(thebits : TBits_1); inline;
  26903. procedure setTXEN(thebits : TBits_1); inline;
  26904. procedure setTXERR(thebits : TBits_1); inline;
  26905. procedure setTXLARB(thebits : TBits_1); inline;
  26906. procedure setTXPRI(thebits : TBits_2); inline;
  26907. procedure setTXREQ(thebits : TBits_1); inline;
  26908. procedure setUINC(thebits : TBits_1); inline;
  26909. procedure setw(thebits : TBits_32); inline;
  26910. public
  26911. procedure clearDONLY; inline;
  26912. procedure clearFRESET; inline;
  26913. procedure clearRTREN; inline;
  26914. procedure clearTXABAT; inline;
  26915. procedure clearTXEN; inline;
  26916. procedure clearTXERR; inline;
  26917. procedure clearTXLARB; inline;
  26918. procedure clearTXREQ; inline;
  26919. procedure clearUINC; inline;
  26920. procedure setDONLY; inline;
  26921. procedure setFRESET; inline;
  26922. procedure setRTREN; inline;
  26923. procedure setTXABAT; inline;
  26924. procedure setTXEN; inline;
  26925. procedure setTXERR; inline;
  26926. procedure setTXLARB; inline;
  26927. procedure setTXREQ; inline;
  26928. procedure setUINC; inline;
  26929. property DONLY : TBits_1 read getDONLY write setDONLY;
  26930. property FRESET : TBits_1 read getFRESET write setFRESET;
  26931. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26932. property RTREN : TBits_1 read getRTREN write setRTREN;
  26933. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26934. property TXEN : TBits_1 read getTXEN write setTXEN;
  26935. property TXERR : TBits_1 read getTXERR write setTXERR;
  26936. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26937. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26938. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26939. property UINC : TBits_1 read getUINC write setUINC;
  26940. property w : TBits_32 read getw write setw;
  26941. end;
  26942. TCAN2_C2FIFOINT9 = record
  26943. private
  26944. function getRXFULLIE : TBits_1; inline;
  26945. function getRXFULLIF : TBits_1; inline;
  26946. function getRXHALFIE : TBits_1; inline;
  26947. function getRXHALFIF : TBits_1; inline;
  26948. function getRXNEMPTYIE : TBits_1; inline;
  26949. function getRXNEMPTYIF : TBits_1; inline;
  26950. function getRXOVFLIE : TBits_1; inline;
  26951. function getRXOVFLIF : TBits_1; inline;
  26952. function getTXEMPTYIE : TBits_1; inline;
  26953. function getTXEMPTYIF : TBits_1; inline;
  26954. function getTXHALFIE : TBits_1; inline;
  26955. function getTXHALFIF : TBits_1; inline;
  26956. function getTXNFULLIE : TBits_1; inline;
  26957. function getTXNFULLIF : TBits_1; inline;
  26958. function getw : TBits_32; inline;
  26959. procedure setRXFULLIE(thebits : TBits_1); inline;
  26960. procedure setRXFULLIF(thebits : TBits_1); inline;
  26961. procedure setRXHALFIE(thebits : TBits_1); inline;
  26962. procedure setRXHALFIF(thebits : TBits_1); inline;
  26963. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26964. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26965. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26966. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26967. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26968. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26969. procedure setTXHALFIE(thebits : TBits_1); inline;
  26970. procedure setTXHALFIF(thebits : TBits_1); inline;
  26971. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26972. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26973. procedure setw(thebits : TBits_32); inline;
  26974. public
  26975. procedure clearRXFULLIE; inline;
  26976. procedure clearRXFULLIF; inline;
  26977. procedure clearRXHALFIE; inline;
  26978. procedure clearRXHALFIF; inline;
  26979. procedure clearRXNEMPTYIE; inline;
  26980. procedure clearRXNEMPTYIF; inline;
  26981. procedure clearRXOVFLIE; inline;
  26982. procedure clearRXOVFLIF; inline;
  26983. procedure clearTXEMPTYIE; inline;
  26984. procedure clearTXEMPTYIF; inline;
  26985. procedure clearTXHALFIE; inline;
  26986. procedure clearTXHALFIF; inline;
  26987. procedure clearTXNFULLIE; inline;
  26988. procedure clearTXNFULLIF; inline;
  26989. procedure setRXFULLIE; inline;
  26990. procedure setRXFULLIF; inline;
  26991. procedure setRXHALFIE; inline;
  26992. procedure setRXHALFIF; inline;
  26993. procedure setRXNEMPTYIE; inline;
  26994. procedure setRXNEMPTYIF; inline;
  26995. procedure setRXOVFLIE; inline;
  26996. procedure setRXOVFLIF; inline;
  26997. procedure setTXEMPTYIE; inline;
  26998. procedure setTXEMPTYIF; inline;
  26999. procedure setTXHALFIE; inline;
  27000. procedure setTXHALFIF; inline;
  27001. procedure setTXNFULLIE; inline;
  27002. procedure setTXNFULLIF; inline;
  27003. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27004. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27005. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27006. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27007. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27008. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27009. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27010. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27011. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27012. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27013. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27014. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27015. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27016. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27017. property w : TBits_32 read getw write setw;
  27018. end;
  27019. TCAN2_C2FIFOCI9 = record
  27020. private
  27021. function getCFIFOCI : TBits_5; inline;
  27022. function getw : TBits_32; inline;
  27023. procedure setCFIFOCI(thebits : TBits_5); inline;
  27024. procedure setw(thebits : TBits_32); inline;
  27025. public
  27026. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27027. property w : TBits_32 read getw write setw;
  27028. end;
  27029. TCAN2_C2FIFOCON10 = record
  27030. private
  27031. function getDONLY : TBits_1; inline;
  27032. function getFRESET : TBits_1; inline;
  27033. function getFSIZE : TBits_5; inline;
  27034. function getRTREN : TBits_1; inline;
  27035. function getTXABAT : TBits_1; inline;
  27036. function getTXEN : TBits_1; inline;
  27037. function getTXERR : TBits_1; inline;
  27038. function getTXLARB : TBits_1; inline;
  27039. function getTXPRI : TBits_2; inline;
  27040. function getTXREQ : TBits_1; inline;
  27041. function getUINC : TBits_1; inline;
  27042. function getw : TBits_32; inline;
  27043. procedure setDONLY(thebits : TBits_1); inline;
  27044. procedure setFRESET(thebits : TBits_1); inline;
  27045. procedure setFSIZE(thebits : TBits_5); inline;
  27046. procedure setRTREN(thebits : TBits_1); inline;
  27047. procedure setTXABAT(thebits : TBits_1); inline;
  27048. procedure setTXEN(thebits : TBits_1); inline;
  27049. procedure setTXERR(thebits : TBits_1); inline;
  27050. procedure setTXLARB(thebits : TBits_1); inline;
  27051. procedure setTXPRI(thebits : TBits_2); inline;
  27052. procedure setTXREQ(thebits : TBits_1); inline;
  27053. procedure setUINC(thebits : TBits_1); inline;
  27054. procedure setw(thebits : TBits_32); inline;
  27055. public
  27056. procedure clearDONLY; inline;
  27057. procedure clearFRESET; inline;
  27058. procedure clearRTREN; inline;
  27059. procedure clearTXABAT; inline;
  27060. procedure clearTXEN; inline;
  27061. procedure clearTXERR; inline;
  27062. procedure clearTXLARB; inline;
  27063. procedure clearTXREQ; inline;
  27064. procedure clearUINC; inline;
  27065. procedure setDONLY; inline;
  27066. procedure setFRESET; inline;
  27067. procedure setRTREN; inline;
  27068. procedure setTXABAT; inline;
  27069. procedure setTXEN; inline;
  27070. procedure setTXERR; inline;
  27071. procedure setTXLARB; inline;
  27072. procedure setTXREQ; inline;
  27073. procedure setUINC; inline;
  27074. property DONLY : TBits_1 read getDONLY write setDONLY;
  27075. property FRESET : TBits_1 read getFRESET write setFRESET;
  27076. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27077. property RTREN : TBits_1 read getRTREN write setRTREN;
  27078. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27079. property TXEN : TBits_1 read getTXEN write setTXEN;
  27080. property TXERR : TBits_1 read getTXERR write setTXERR;
  27081. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27082. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27083. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27084. property UINC : TBits_1 read getUINC write setUINC;
  27085. property w : TBits_32 read getw write setw;
  27086. end;
  27087. TCAN2_C2FIFOINT10 = record
  27088. private
  27089. function getRXFULLIE : TBits_1; inline;
  27090. function getRXFULLIF : TBits_1; inline;
  27091. function getRXHALFIE : TBits_1; inline;
  27092. function getRXHALFIF : TBits_1; inline;
  27093. function getRXNEMPTYIE : TBits_1; inline;
  27094. function getRXNEMPTYIF : TBits_1; inline;
  27095. function getRXOVFLIE : TBits_1; inline;
  27096. function getRXOVFLIF : TBits_1; inline;
  27097. function getTXEMPTYIE : TBits_1; inline;
  27098. function getTXEMPTYIF : TBits_1; inline;
  27099. function getTXHALFIE : TBits_1; inline;
  27100. function getTXHALFIF : TBits_1; inline;
  27101. function getTXNFULLIE : TBits_1; inline;
  27102. function getTXNFULLIF : TBits_1; inline;
  27103. function getw : TBits_32; inline;
  27104. procedure setRXFULLIE(thebits : TBits_1); inline;
  27105. procedure setRXFULLIF(thebits : TBits_1); inline;
  27106. procedure setRXHALFIE(thebits : TBits_1); inline;
  27107. procedure setRXHALFIF(thebits : TBits_1); inline;
  27108. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27109. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27110. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27111. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27112. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27113. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27114. procedure setTXHALFIE(thebits : TBits_1); inline;
  27115. procedure setTXHALFIF(thebits : TBits_1); inline;
  27116. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27117. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27118. procedure setw(thebits : TBits_32); inline;
  27119. public
  27120. procedure clearRXFULLIE; inline;
  27121. procedure clearRXFULLIF; inline;
  27122. procedure clearRXHALFIE; inline;
  27123. procedure clearRXHALFIF; inline;
  27124. procedure clearRXNEMPTYIE; inline;
  27125. procedure clearRXNEMPTYIF; inline;
  27126. procedure clearRXOVFLIE; inline;
  27127. procedure clearRXOVFLIF; inline;
  27128. procedure clearTXEMPTYIE; inline;
  27129. procedure clearTXEMPTYIF; inline;
  27130. procedure clearTXHALFIE; inline;
  27131. procedure clearTXHALFIF; inline;
  27132. procedure clearTXNFULLIE; inline;
  27133. procedure clearTXNFULLIF; inline;
  27134. procedure setRXFULLIE; inline;
  27135. procedure setRXFULLIF; inline;
  27136. procedure setRXHALFIE; inline;
  27137. procedure setRXHALFIF; inline;
  27138. procedure setRXNEMPTYIE; inline;
  27139. procedure setRXNEMPTYIF; inline;
  27140. procedure setRXOVFLIE; inline;
  27141. procedure setRXOVFLIF; inline;
  27142. procedure setTXEMPTYIE; inline;
  27143. procedure setTXEMPTYIF; inline;
  27144. procedure setTXHALFIE; inline;
  27145. procedure setTXHALFIF; inline;
  27146. procedure setTXNFULLIE; inline;
  27147. procedure setTXNFULLIF; inline;
  27148. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27149. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27150. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27151. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27152. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27153. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27154. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27155. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27156. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27157. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27158. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27159. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27160. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27161. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27162. property w : TBits_32 read getw write setw;
  27163. end;
  27164. TCAN2_C2FIFOCI10 = record
  27165. private
  27166. function getCFIFOCI : TBits_5; inline;
  27167. function getw : TBits_32; inline;
  27168. procedure setCFIFOCI(thebits : TBits_5); inline;
  27169. procedure setw(thebits : TBits_32); inline;
  27170. public
  27171. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27172. property w : TBits_32 read getw write setw;
  27173. end;
  27174. TCAN2_C2FIFOCON11 = record
  27175. private
  27176. function getDONLY : TBits_1; inline;
  27177. function getFRESET : TBits_1; inline;
  27178. function getFSIZE : TBits_5; inline;
  27179. function getRTREN : TBits_1; inline;
  27180. function getTXABAT : TBits_1; inline;
  27181. function getTXEN : TBits_1; inline;
  27182. function getTXERR : TBits_1; inline;
  27183. function getTXLARB : TBits_1; inline;
  27184. function getTXPRI : TBits_2; inline;
  27185. function getTXREQ : TBits_1; inline;
  27186. function getUINC : TBits_1; inline;
  27187. function getw : TBits_32; inline;
  27188. procedure setDONLY(thebits : TBits_1); inline;
  27189. procedure setFRESET(thebits : TBits_1); inline;
  27190. procedure setFSIZE(thebits : TBits_5); inline;
  27191. procedure setRTREN(thebits : TBits_1); inline;
  27192. procedure setTXABAT(thebits : TBits_1); inline;
  27193. procedure setTXEN(thebits : TBits_1); inline;
  27194. procedure setTXERR(thebits : TBits_1); inline;
  27195. procedure setTXLARB(thebits : TBits_1); inline;
  27196. procedure setTXPRI(thebits : TBits_2); inline;
  27197. procedure setTXREQ(thebits : TBits_1); inline;
  27198. procedure setUINC(thebits : TBits_1); inline;
  27199. procedure setw(thebits : TBits_32); inline;
  27200. public
  27201. procedure clearDONLY; inline;
  27202. procedure clearFRESET; inline;
  27203. procedure clearRTREN; inline;
  27204. procedure clearTXABAT; inline;
  27205. procedure clearTXEN; inline;
  27206. procedure clearTXERR; inline;
  27207. procedure clearTXLARB; inline;
  27208. procedure clearTXREQ; inline;
  27209. procedure clearUINC; inline;
  27210. procedure setDONLY; inline;
  27211. procedure setFRESET; inline;
  27212. procedure setRTREN; inline;
  27213. procedure setTXABAT; inline;
  27214. procedure setTXEN; inline;
  27215. procedure setTXERR; inline;
  27216. procedure setTXLARB; inline;
  27217. procedure setTXREQ; inline;
  27218. procedure setUINC; inline;
  27219. property DONLY : TBits_1 read getDONLY write setDONLY;
  27220. property FRESET : TBits_1 read getFRESET write setFRESET;
  27221. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27222. property RTREN : TBits_1 read getRTREN write setRTREN;
  27223. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27224. property TXEN : TBits_1 read getTXEN write setTXEN;
  27225. property TXERR : TBits_1 read getTXERR write setTXERR;
  27226. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27227. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27228. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27229. property UINC : TBits_1 read getUINC write setUINC;
  27230. property w : TBits_32 read getw write setw;
  27231. end;
  27232. TCAN2_C2FIFOINT11 = record
  27233. private
  27234. function getRXFULLIE : TBits_1; inline;
  27235. function getRXFULLIF : TBits_1; inline;
  27236. function getRXHALFIE : TBits_1; inline;
  27237. function getRXHALFIF : TBits_1; inline;
  27238. function getRXNEMPTYIE : TBits_1; inline;
  27239. function getRXNEMPTYIF : TBits_1; inline;
  27240. function getRXOVFLIE : TBits_1; inline;
  27241. function getRXOVFLIF : TBits_1; inline;
  27242. function getTXEMPTYIE : TBits_1; inline;
  27243. function getTXEMPTYIF : TBits_1; inline;
  27244. function getTXHALFIE : TBits_1; inline;
  27245. function getTXHALFIF : TBits_1; inline;
  27246. function getTXNFULLIE : TBits_1; inline;
  27247. function getTXNFULLIF : TBits_1; inline;
  27248. function getw : TBits_32; inline;
  27249. procedure setRXFULLIE(thebits : TBits_1); inline;
  27250. procedure setRXFULLIF(thebits : TBits_1); inline;
  27251. procedure setRXHALFIE(thebits : TBits_1); inline;
  27252. procedure setRXHALFIF(thebits : TBits_1); inline;
  27253. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27254. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27255. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27256. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27257. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27258. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27259. procedure setTXHALFIE(thebits : TBits_1); inline;
  27260. procedure setTXHALFIF(thebits : TBits_1); inline;
  27261. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27262. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27263. procedure setw(thebits : TBits_32); inline;
  27264. public
  27265. procedure clearRXFULLIE; inline;
  27266. procedure clearRXFULLIF; inline;
  27267. procedure clearRXHALFIE; inline;
  27268. procedure clearRXHALFIF; inline;
  27269. procedure clearRXNEMPTYIE; inline;
  27270. procedure clearRXNEMPTYIF; inline;
  27271. procedure clearRXOVFLIE; inline;
  27272. procedure clearRXOVFLIF; inline;
  27273. procedure clearTXEMPTYIE; inline;
  27274. procedure clearTXEMPTYIF; inline;
  27275. procedure clearTXHALFIE; inline;
  27276. procedure clearTXHALFIF; inline;
  27277. procedure clearTXNFULLIE; inline;
  27278. procedure clearTXNFULLIF; inline;
  27279. procedure setRXFULLIE; inline;
  27280. procedure setRXFULLIF; inline;
  27281. procedure setRXHALFIE; inline;
  27282. procedure setRXHALFIF; inline;
  27283. procedure setRXNEMPTYIE; inline;
  27284. procedure setRXNEMPTYIF; inline;
  27285. procedure setRXOVFLIE; inline;
  27286. procedure setRXOVFLIF; inline;
  27287. procedure setTXEMPTYIE; inline;
  27288. procedure setTXEMPTYIF; inline;
  27289. procedure setTXHALFIE; inline;
  27290. procedure setTXHALFIF; inline;
  27291. procedure setTXNFULLIE; inline;
  27292. procedure setTXNFULLIF; inline;
  27293. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27294. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27295. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27296. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27297. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27298. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27299. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27300. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27301. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27302. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27303. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27304. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27305. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27306. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27307. property w : TBits_32 read getw write setw;
  27308. end;
  27309. TCAN2_C2FIFOCI11 = record
  27310. private
  27311. function getCFIFOCI : TBits_5; inline;
  27312. function getw : TBits_32; inline;
  27313. procedure setCFIFOCI(thebits : TBits_5); inline;
  27314. procedure setw(thebits : TBits_32); inline;
  27315. public
  27316. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27317. property w : TBits_32 read getw write setw;
  27318. end;
  27319. TCAN2_C2FIFOCON12 = record
  27320. private
  27321. function getDONLY : TBits_1; inline;
  27322. function getFRESET : TBits_1; inline;
  27323. function getFSIZE : TBits_5; inline;
  27324. function getRTREN : TBits_1; inline;
  27325. function getTXABAT : TBits_1; inline;
  27326. function getTXEN : TBits_1; inline;
  27327. function getTXERR : TBits_1; inline;
  27328. function getTXLARB : TBits_1; inline;
  27329. function getTXPRI : TBits_2; inline;
  27330. function getTXREQ : TBits_1; inline;
  27331. function getUINC : TBits_1; inline;
  27332. function getw : TBits_32; inline;
  27333. procedure setDONLY(thebits : TBits_1); inline;
  27334. procedure setFRESET(thebits : TBits_1); inline;
  27335. procedure setFSIZE(thebits : TBits_5); inline;
  27336. procedure setRTREN(thebits : TBits_1); inline;
  27337. procedure setTXABAT(thebits : TBits_1); inline;
  27338. procedure setTXEN(thebits : TBits_1); inline;
  27339. procedure setTXERR(thebits : TBits_1); inline;
  27340. procedure setTXLARB(thebits : TBits_1); inline;
  27341. procedure setTXPRI(thebits : TBits_2); inline;
  27342. procedure setTXREQ(thebits : TBits_1); inline;
  27343. procedure setUINC(thebits : TBits_1); inline;
  27344. procedure setw(thebits : TBits_32); inline;
  27345. public
  27346. procedure clearDONLY; inline;
  27347. procedure clearFRESET; inline;
  27348. procedure clearRTREN; inline;
  27349. procedure clearTXABAT; inline;
  27350. procedure clearTXEN; inline;
  27351. procedure clearTXERR; inline;
  27352. procedure clearTXLARB; inline;
  27353. procedure clearTXREQ; inline;
  27354. procedure clearUINC; inline;
  27355. procedure setDONLY; inline;
  27356. procedure setFRESET; inline;
  27357. procedure setRTREN; inline;
  27358. procedure setTXABAT; inline;
  27359. procedure setTXEN; inline;
  27360. procedure setTXERR; inline;
  27361. procedure setTXLARB; inline;
  27362. procedure setTXREQ; inline;
  27363. procedure setUINC; inline;
  27364. property DONLY : TBits_1 read getDONLY write setDONLY;
  27365. property FRESET : TBits_1 read getFRESET write setFRESET;
  27366. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27367. property RTREN : TBits_1 read getRTREN write setRTREN;
  27368. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27369. property TXEN : TBits_1 read getTXEN write setTXEN;
  27370. property TXERR : TBits_1 read getTXERR write setTXERR;
  27371. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27372. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27373. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27374. property UINC : TBits_1 read getUINC write setUINC;
  27375. property w : TBits_32 read getw write setw;
  27376. end;
  27377. TCAN2_C2FIFOINT12 = record
  27378. private
  27379. function getRXFULLIE : TBits_1; inline;
  27380. function getRXFULLIF : TBits_1; inline;
  27381. function getRXHALFIE : TBits_1; inline;
  27382. function getRXHALFIF : TBits_1; inline;
  27383. function getRXNEMPTYIE : TBits_1; inline;
  27384. function getRXNEMPTYIF : TBits_1; inline;
  27385. function getRXOVFLIE : TBits_1; inline;
  27386. function getRXOVFLIF : TBits_1; inline;
  27387. function getTXEMPTYIE : TBits_1; inline;
  27388. function getTXEMPTYIF : TBits_1; inline;
  27389. function getTXHALFIE : TBits_1; inline;
  27390. function getTXHALFIF : TBits_1; inline;
  27391. function getTXNFULLIE : TBits_1; inline;
  27392. function getTXNFULLIF : TBits_1; inline;
  27393. function getw : TBits_32; inline;
  27394. procedure setRXFULLIE(thebits : TBits_1); inline;
  27395. procedure setRXFULLIF(thebits : TBits_1); inline;
  27396. procedure setRXHALFIE(thebits : TBits_1); inline;
  27397. procedure setRXHALFIF(thebits : TBits_1); inline;
  27398. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27399. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27400. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27401. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27402. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27403. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27404. procedure setTXHALFIE(thebits : TBits_1); inline;
  27405. procedure setTXHALFIF(thebits : TBits_1); inline;
  27406. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27407. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27408. procedure setw(thebits : TBits_32); inline;
  27409. public
  27410. procedure clearRXFULLIE; inline;
  27411. procedure clearRXFULLIF; inline;
  27412. procedure clearRXHALFIE; inline;
  27413. procedure clearRXHALFIF; inline;
  27414. procedure clearRXNEMPTYIE; inline;
  27415. procedure clearRXNEMPTYIF; inline;
  27416. procedure clearRXOVFLIE; inline;
  27417. procedure clearRXOVFLIF; inline;
  27418. procedure clearTXEMPTYIE; inline;
  27419. procedure clearTXEMPTYIF; inline;
  27420. procedure clearTXHALFIE; inline;
  27421. procedure clearTXHALFIF; inline;
  27422. procedure clearTXNFULLIE; inline;
  27423. procedure clearTXNFULLIF; inline;
  27424. procedure setRXFULLIE; inline;
  27425. procedure setRXFULLIF; inline;
  27426. procedure setRXHALFIE; inline;
  27427. procedure setRXHALFIF; inline;
  27428. procedure setRXNEMPTYIE; inline;
  27429. procedure setRXNEMPTYIF; inline;
  27430. procedure setRXOVFLIE; inline;
  27431. procedure setRXOVFLIF; inline;
  27432. procedure setTXEMPTYIE; inline;
  27433. procedure setTXEMPTYIF; inline;
  27434. procedure setTXHALFIE; inline;
  27435. procedure setTXHALFIF; inline;
  27436. procedure setTXNFULLIE; inline;
  27437. procedure setTXNFULLIF; inline;
  27438. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27439. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27440. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27441. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27442. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27443. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27444. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27445. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27446. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27447. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27448. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27449. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27450. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27451. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27452. property w : TBits_32 read getw write setw;
  27453. end;
  27454. TCAN2_C2FIFOCI12 = record
  27455. private
  27456. function getCFIFOCI : TBits_5; inline;
  27457. function getw : TBits_32; inline;
  27458. procedure setCFIFOCI(thebits : TBits_5); inline;
  27459. procedure setw(thebits : TBits_32); inline;
  27460. public
  27461. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27462. property w : TBits_32 read getw write setw;
  27463. end;
  27464. TCAN2_C2FIFOCON13 = record
  27465. private
  27466. function getDONLY : TBits_1; inline;
  27467. function getFRESET : TBits_1; inline;
  27468. function getFSIZE : TBits_5; inline;
  27469. function getRTREN : TBits_1; inline;
  27470. function getTXABAT : TBits_1; inline;
  27471. function getTXEN : TBits_1; inline;
  27472. function getTXERR : TBits_1; inline;
  27473. function getTXLARB : TBits_1; inline;
  27474. function getTXPRI : TBits_2; inline;
  27475. function getTXREQ : TBits_1; inline;
  27476. function getUINC : TBits_1; inline;
  27477. function getw : TBits_32; inline;
  27478. procedure setDONLY(thebits : TBits_1); inline;
  27479. procedure setFRESET(thebits : TBits_1); inline;
  27480. procedure setFSIZE(thebits : TBits_5); inline;
  27481. procedure setRTREN(thebits : TBits_1); inline;
  27482. procedure setTXABAT(thebits : TBits_1); inline;
  27483. procedure setTXEN(thebits : TBits_1); inline;
  27484. procedure setTXERR(thebits : TBits_1); inline;
  27485. procedure setTXLARB(thebits : TBits_1); inline;
  27486. procedure setTXPRI(thebits : TBits_2); inline;
  27487. procedure setTXREQ(thebits : TBits_1); inline;
  27488. procedure setUINC(thebits : TBits_1); inline;
  27489. procedure setw(thebits : TBits_32); inline;
  27490. public
  27491. procedure clearDONLY; inline;
  27492. procedure clearFRESET; inline;
  27493. procedure clearRTREN; inline;
  27494. procedure clearTXABAT; inline;
  27495. procedure clearTXEN; inline;
  27496. procedure clearTXERR; inline;
  27497. procedure clearTXLARB; inline;
  27498. procedure clearTXREQ; inline;
  27499. procedure clearUINC; inline;
  27500. procedure setDONLY; inline;
  27501. procedure setFRESET; inline;
  27502. procedure setRTREN; inline;
  27503. procedure setTXABAT; inline;
  27504. procedure setTXEN; inline;
  27505. procedure setTXERR; inline;
  27506. procedure setTXLARB; inline;
  27507. procedure setTXREQ; inline;
  27508. procedure setUINC; inline;
  27509. property DONLY : TBits_1 read getDONLY write setDONLY;
  27510. property FRESET : TBits_1 read getFRESET write setFRESET;
  27511. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27512. property RTREN : TBits_1 read getRTREN write setRTREN;
  27513. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27514. property TXEN : TBits_1 read getTXEN write setTXEN;
  27515. property TXERR : TBits_1 read getTXERR write setTXERR;
  27516. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27517. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27518. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27519. property UINC : TBits_1 read getUINC write setUINC;
  27520. property w : TBits_32 read getw write setw;
  27521. end;
  27522. TCAN2_C2FIFOINT13 = record
  27523. private
  27524. function getRXFULLIE : TBits_1; inline;
  27525. function getRXFULLIF : TBits_1; inline;
  27526. function getRXHALFIE : TBits_1; inline;
  27527. function getRXHALFIF : TBits_1; inline;
  27528. function getRXNEMPTYIE : TBits_1; inline;
  27529. function getRXNEMPTYIF : TBits_1; inline;
  27530. function getRXOVFLIE : TBits_1; inline;
  27531. function getRXOVFLIF : TBits_1; inline;
  27532. function getTXEMPTYIE : TBits_1; inline;
  27533. function getTXEMPTYIF : TBits_1; inline;
  27534. function getTXHALFIE : TBits_1; inline;
  27535. function getTXHALFIF : TBits_1; inline;
  27536. function getTXNFULLIE : TBits_1; inline;
  27537. function getTXNFULLIF : TBits_1; inline;
  27538. function getw : TBits_32; inline;
  27539. procedure setRXFULLIE(thebits : TBits_1); inline;
  27540. procedure setRXFULLIF(thebits : TBits_1); inline;
  27541. procedure setRXHALFIE(thebits : TBits_1); inline;
  27542. procedure setRXHALFIF(thebits : TBits_1); inline;
  27543. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27544. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27545. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27546. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27547. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27548. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27549. procedure setTXHALFIE(thebits : TBits_1); inline;
  27550. procedure setTXHALFIF(thebits : TBits_1); inline;
  27551. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27552. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27553. procedure setw(thebits : TBits_32); inline;
  27554. public
  27555. procedure clearRXFULLIE; inline;
  27556. procedure clearRXFULLIF; inline;
  27557. procedure clearRXHALFIE; inline;
  27558. procedure clearRXHALFIF; inline;
  27559. procedure clearRXNEMPTYIE; inline;
  27560. procedure clearRXNEMPTYIF; inline;
  27561. procedure clearRXOVFLIE; inline;
  27562. procedure clearRXOVFLIF; inline;
  27563. procedure clearTXEMPTYIE; inline;
  27564. procedure clearTXEMPTYIF; inline;
  27565. procedure clearTXHALFIE; inline;
  27566. procedure clearTXHALFIF; inline;
  27567. procedure clearTXNFULLIE; inline;
  27568. procedure clearTXNFULLIF; inline;
  27569. procedure setRXFULLIE; inline;
  27570. procedure setRXFULLIF; inline;
  27571. procedure setRXHALFIE; inline;
  27572. procedure setRXHALFIF; inline;
  27573. procedure setRXNEMPTYIE; inline;
  27574. procedure setRXNEMPTYIF; inline;
  27575. procedure setRXOVFLIE; inline;
  27576. procedure setRXOVFLIF; inline;
  27577. procedure setTXEMPTYIE; inline;
  27578. procedure setTXEMPTYIF; inline;
  27579. procedure setTXHALFIE; inline;
  27580. procedure setTXHALFIF; inline;
  27581. procedure setTXNFULLIE; inline;
  27582. procedure setTXNFULLIF; inline;
  27583. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27584. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27585. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27586. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27587. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27588. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27589. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27590. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27591. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27592. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27593. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27594. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27595. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27596. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27597. property w : TBits_32 read getw write setw;
  27598. end;
  27599. TCAN2_C2FIFOCI13 = record
  27600. private
  27601. function getCFIFOCI : TBits_5; inline;
  27602. function getw : TBits_32; inline;
  27603. procedure setCFIFOCI(thebits : TBits_5); inline;
  27604. procedure setw(thebits : TBits_32); inline;
  27605. public
  27606. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27607. property w : TBits_32 read getw write setw;
  27608. end;
  27609. TCAN2_C2FIFOCON14 = record
  27610. private
  27611. function getDONLY : TBits_1; inline;
  27612. function getFRESET : TBits_1; inline;
  27613. function getFSIZE : TBits_5; inline;
  27614. function getRTREN : TBits_1; inline;
  27615. function getTXABAT : TBits_1; inline;
  27616. function getTXEN : TBits_1; inline;
  27617. function getTXERR : TBits_1; inline;
  27618. function getTXLARB : TBits_1; inline;
  27619. function getTXPRI : TBits_2; inline;
  27620. function getTXREQ : TBits_1; inline;
  27621. function getUINC : TBits_1; inline;
  27622. function getw : TBits_32; inline;
  27623. procedure setDONLY(thebits : TBits_1); inline;
  27624. procedure setFRESET(thebits : TBits_1); inline;
  27625. procedure setFSIZE(thebits : TBits_5); inline;
  27626. procedure setRTREN(thebits : TBits_1); inline;
  27627. procedure setTXABAT(thebits : TBits_1); inline;
  27628. procedure setTXEN(thebits : TBits_1); inline;
  27629. procedure setTXERR(thebits : TBits_1); inline;
  27630. procedure setTXLARB(thebits : TBits_1); inline;
  27631. procedure setTXPRI(thebits : TBits_2); inline;
  27632. procedure setTXREQ(thebits : TBits_1); inline;
  27633. procedure setUINC(thebits : TBits_1); inline;
  27634. procedure setw(thebits : TBits_32); inline;
  27635. public
  27636. procedure clearDONLY; inline;
  27637. procedure clearFRESET; inline;
  27638. procedure clearRTREN; inline;
  27639. procedure clearTXABAT; inline;
  27640. procedure clearTXEN; inline;
  27641. procedure clearTXERR; inline;
  27642. procedure clearTXLARB; inline;
  27643. procedure clearTXREQ; inline;
  27644. procedure clearUINC; inline;
  27645. procedure setDONLY; inline;
  27646. procedure setFRESET; inline;
  27647. procedure setRTREN; inline;
  27648. procedure setTXABAT; inline;
  27649. procedure setTXEN; inline;
  27650. procedure setTXERR; inline;
  27651. procedure setTXLARB; inline;
  27652. procedure setTXREQ; inline;
  27653. procedure setUINC; inline;
  27654. property DONLY : TBits_1 read getDONLY write setDONLY;
  27655. property FRESET : TBits_1 read getFRESET write setFRESET;
  27656. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27657. property RTREN : TBits_1 read getRTREN write setRTREN;
  27658. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27659. property TXEN : TBits_1 read getTXEN write setTXEN;
  27660. property TXERR : TBits_1 read getTXERR write setTXERR;
  27661. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27662. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27663. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27664. property UINC : TBits_1 read getUINC write setUINC;
  27665. property w : TBits_32 read getw write setw;
  27666. end;
  27667. TCAN2_C2FIFOINT14 = record
  27668. private
  27669. function getRXFULLIE : TBits_1; inline;
  27670. function getRXFULLIF : TBits_1; inline;
  27671. function getRXHALFIE : TBits_1; inline;
  27672. function getRXHALFIF : TBits_1; inline;
  27673. function getRXNEMPTYIE : TBits_1; inline;
  27674. function getRXNEMPTYIF : TBits_1; inline;
  27675. function getRXOVFLIE : TBits_1; inline;
  27676. function getRXOVFLIF : TBits_1; inline;
  27677. function getTXEMPTYIE : TBits_1; inline;
  27678. function getTXEMPTYIF : TBits_1; inline;
  27679. function getTXHALFIE : TBits_1; inline;
  27680. function getTXHALFIF : TBits_1; inline;
  27681. function getTXNFULLIE : TBits_1; inline;
  27682. function getTXNFULLIF : TBits_1; inline;
  27683. function getw : TBits_32; inline;
  27684. procedure setRXFULLIE(thebits : TBits_1); inline;
  27685. procedure setRXFULLIF(thebits : TBits_1); inline;
  27686. procedure setRXHALFIE(thebits : TBits_1); inline;
  27687. procedure setRXHALFIF(thebits : TBits_1); inline;
  27688. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27689. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27690. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27691. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27692. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27693. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27694. procedure setTXHALFIE(thebits : TBits_1); inline;
  27695. procedure setTXHALFIF(thebits : TBits_1); inline;
  27696. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27697. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27698. procedure setw(thebits : TBits_32); inline;
  27699. public
  27700. procedure clearRXFULLIE; inline;
  27701. procedure clearRXFULLIF; inline;
  27702. procedure clearRXHALFIE; inline;
  27703. procedure clearRXHALFIF; inline;
  27704. procedure clearRXNEMPTYIE; inline;
  27705. procedure clearRXNEMPTYIF; inline;
  27706. procedure clearRXOVFLIE; inline;
  27707. procedure clearRXOVFLIF; inline;
  27708. procedure clearTXEMPTYIE; inline;
  27709. procedure clearTXEMPTYIF; inline;
  27710. procedure clearTXHALFIE; inline;
  27711. procedure clearTXHALFIF; inline;
  27712. procedure clearTXNFULLIE; inline;
  27713. procedure clearTXNFULLIF; inline;
  27714. procedure setRXFULLIE; inline;
  27715. procedure setRXFULLIF; inline;
  27716. procedure setRXHALFIE; inline;
  27717. procedure setRXHALFIF; inline;
  27718. procedure setRXNEMPTYIE; inline;
  27719. procedure setRXNEMPTYIF; inline;
  27720. procedure setRXOVFLIE; inline;
  27721. procedure setRXOVFLIF; inline;
  27722. procedure setTXEMPTYIE; inline;
  27723. procedure setTXEMPTYIF; inline;
  27724. procedure setTXHALFIE; inline;
  27725. procedure setTXHALFIF; inline;
  27726. procedure setTXNFULLIE; inline;
  27727. procedure setTXNFULLIF; inline;
  27728. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27729. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27730. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27731. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27732. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27733. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27734. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27735. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27736. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27737. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27738. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27739. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27740. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27741. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27742. property w : TBits_32 read getw write setw;
  27743. end;
  27744. TCAN2_C2FIFOCI14 = record
  27745. private
  27746. function getCFIFOCI : TBits_5; inline;
  27747. function getw : TBits_32; inline;
  27748. procedure setCFIFOCI(thebits : TBits_5); inline;
  27749. procedure setw(thebits : TBits_32); inline;
  27750. public
  27751. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27752. property w : TBits_32 read getw write setw;
  27753. end;
  27754. TCAN2_C2FIFOCON15 = record
  27755. private
  27756. function getDONLY : TBits_1; inline;
  27757. function getFRESET : TBits_1; inline;
  27758. function getFSIZE : TBits_5; inline;
  27759. function getRTREN : TBits_1; inline;
  27760. function getTXABAT : TBits_1; inline;
  27761. function getTXEN : TBits_1; inline;
  27762. function getTXERR : TBits_1; inline;
  27763. function getTXLARB : TBits_1; inline;
  27764. function getTXPRI : TBits_2; inline;
  27765. function getTXREQ : TBits_1; inline;
  27766. function getUINC : TBits_1; inline;
  27767. function getw : TBits_32; inline;
  27768. procedure setDONLY(thebits : TBits_1); inline;
  27769. procedure setFRESET(thebits : TBits_1); inline;
  27770. procedure setFSIZE(thebits : TBits_5); inline;
  27771. procedure setRTREN(thebits : TBits_1); inline;
  27772. procedure setTXABAT(thebits : TBits_1); inline;
  27773. procedure setTXEN(thebits : TBits_1); inline;
  27774. procedure setTXERR(thebits : TBits_1); inline;
  27775. procedure setTXLARB(thebits : TBits_1); inline;
  27776. procedure setTXPRI(thebits : TBits_2); inline;
  27777. procedure setTXREQ(thebits : TBits_1); inline;
  27778. procedure setUINC(thebits : TBits_1); inline;
  27779. procedure setw(thebits : TBits_32); inline;
  27780. public
  27781. procedure clearDONLY; inline;
  27782. procedure clearFRESET; inline;
  27783. procedure clearRTREN; inline;
  27784. procedure clearTXABAT; inline;
  27785. procedure clearTXEN; inline;
  27786. procedure clearTXERR; inline;
  27787. procedure clearTXLARB; inline;
  27788. procedure clearTXREQ; inline;
  27789. procedure clearUINC; inline;
  27790. procedure setDONLY; inline;
  27791. procedure setFRESET; inline;
  27792. procedure setRTREN; inline;
  27793. procedure setTXABAT; inline;
  27794. procedure setTXEN; inline;
  27795. procedure setTXERR; inline;
  27796. procedure setTXLARB; inline;
  27797. procedure setTXREQ; inline;
  27798. procedure setUINC; inline;
  27799. property DONLY : TBits_1 read getDONLY write setDONLY;
  27800. property FRESET : TBits_1 read getFRESET write setFRESET;
  27801. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27802. property RTREN : TBits_1 read getRTREN write setRTREN;
  27803. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27804. property TXEN : TBits_1 read getTXEN write setTXEN;
  27805. property TXERR : TBits_1 read getTXERR write setTXERR;
  27806. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27807. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27808. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27809. property UINC : TBits_1 read getUINC write setUINC;
  27810. property w : TBits_32 read getw write setw;
  27811. end;
  27812. TCAN2_C2FIFOINT15 = record
  27813. private
  27814. function getRXFULLIE : TBits_1; inline;
  27815. function getRXFULLIF : TBits_1; inline;
  27816. function getRXHALFIE : TBits_1; inline;
  27817. function getRXHALFIF : TBits_1; inline;
  27818. function getRXNEMPTYIE : TBits_1; inline;
  27819. function getRXNEMPTYIF : TBits_1; inline;
  27820. function getRXOVFLIE : TBits_1; inline;
  27821. function getRXOVFLIF : TBits_1; inline;
  27822. function getTXEMPTYIE : TBits_1; inline;
  27823. function getTXEMPTYIF : TBits_1; inline;
  27824. function getTXHALFIE : TBits_1; inline;
  27825. function getTXHALFIF : TBits_1; inline;
  27826. function getTXNFULLIE : TBits_1; inline;
  27827. function getTXNFULLIF : TBits_1; inline;
  27828. function getw : TBits_32; inline;
  27829. procedure setRXFULLIE(thebits : TBits_1); inline;
  27830. procedure setRXFULLIF(thebits : TBits_1); inline;
  27831. procedure setRXHALFIE(thebits : TBits_1); inline;
  27832. procedure setRXHALFIF(thebits : TBits_1); inline;
  27833. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27834. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27835. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27836. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27837. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27838. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27839. procedure setTXHALFIE(thebits : TBits_1); inline;
  27840. procedure setTXHALFIF(thebits : TBits_1); inline;
  27841. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27842. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27843. procedure setw(thebits : TBits_32); inline;
  27844. public
  27845. procedure clearRXFULLIE; inline;
  27846. procedure clearRXFULLIF; inline;
  27847. procedure clearRXHALFIE; inline;
  27848. procedure clearRXHALFIF; inline;
  27849. procedure clearRXNEMPTYIE; inline;
  27850. procedure clearRXNEMPTYIF; inline;
  27851. procedure clearRXOVFLIE; inline;
  27852. procedure clearRXOVFLIF; inline;
  27853. procedure clearTXEMPTYIE; inline;
  27854. procedure clearTXEMPTYIF; inline;
  27855. procedure clearTXHALFIE; inline;
  27856. procedure clearTXHALFIF; inline;
  27857. procedure clearTXNFULLIE; inline;
  27858. procedure clearTXNFULLIF; inline;
  27859. procedure setRXFULLIE; inline;
  27860. procedure setRXFULLIF; inline;
  27861. procedure setRXHALFIE; inline;
  27862. procedure setRXHALFIF; inline;
  27863. procedure setRXNEMPTYIE; inline;
  27864. procedure setRXNEMPTYIF; inline;
  27865. procedure setRXOVFLIE; inline;
  27866. procedure setRXOVFLIF; inline;
  27867. procedure setTXEMPTYIE; inline;
  27868. procedure setTXEMPTYIF; inline;
  27869. procedure setTXHALFIE; inline;
  27870. procedure setTXHALFIF; inline;
  27871. procedure setTXNFULLIE; inline;
  27872. procedure setTXNFULLIF; inline;
  27873. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27874. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27875. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27876. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27877. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27878. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27879. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27880. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27881. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27882. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27883. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27884. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27885. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27886. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27887. property w : TBits_32 read getw write setw;
  27888. end;
  27889. TCAN2_C2FIFOCI15 = record
  27890. private
  27891. function getCFIFOCI : TBits_5; inline;
  27892. function getw : TBits_32; inline;
  27893. procedure setCFIFOCI(thebits : TBits_5); inline;
  27894. procedure setw(thebits : TBits_32); inline;
  27895. public
  27896. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27897. property w : TBits_32 read getw write setw;
  27898. end;
  27899. TCAN2_C2FIFOCON16 = record
  27900. private
  27901. function getDONLY : TBits_1; inline;
  27902. function getFRESET : TBits_1; inline;
  27903. function getFSIZE : TBits_5; inline;
  27904. function getRTREN : TBits_1; inline;
  27905. function getTXABAT : TBits_1; inline;
  27906. function getTXEN : TBits_1; inline;
  27907. function getTXERR : TBits_1; inline;
  27908. function getTXLARB : TBits_1; inline;
  27909. function getTXPRI : TBits_2; inline;
  27910. function getTXREQ : TBits_1; inline;
  27911. function getUINC : TBits_1; inline;
  27912. function getw : TBits_32; inline;
  27913. procedure setDONLY(thebits : TBits_1); inline;
  27914. procedure setFRESET(thebits : TBits_1); inline;
  27915. procedure setFSIZE(thebits : TBits_5); inline;
  27916. procedure setRTREN(thebits : TBits_1); inline;
  27917. procedure setTXABAT(thebits : TBits_1); inline;
  27918. procedure setTXEN(thebits : TBits_1); inline;
  27919. procedure setTXERR(thebits : TBits_1); inline;
  27920. procedure setTXLARB(thebits : TBits_1); inline;
  27921. procedure setTXPRI(thebits : TBits_2); inline;
  27922. procedure setTXREQ(thebits : TBits_1); inline;
  27923. procedure setUINC(thebits : TBits_1); inline;
  27924. procedure setw(thebits : TBits_32); inline;
  27925. public
  27926. procedure clearDONLY; inline;
  27927. procedure clearFRESET; inline;
  27928. procedure clearRTREN; inline;
  27929. procedure clearTXABAT; inline;
  27930. procedure clearTXEN; inline;
  27931. procedure clearTXERR; inline;
  27932. procedure clearTXLARB; inline;
  27933. procedure clearTXREQ; inline;
  27934. procedure clearUINC; inline;
  27935. procedure setDONLY; inline;
  27936. procedure setFRESET; inline;
  27937. procedure setRTREN; inline;
  27938. procedure setTXABAT; inline;
  27939. procedure setTXEN; inline;
  27940. procedure setTXERR; inline;
  27941. procedure setTXLARB; inline;
  27942. procedure setTXREQ; inline;
  27943. procedure setUINC; inline;
  27944. property DONLY : TBits_1 read getDONLY write setDONLY;
  27945. property FRESET : TBits_1 read getFRESET write setFRESET;
  27946. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27947. property RTREN : TBits_1 read getRTREN write setRTREN;
  27948. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27949. property TXEN : TBits_1 read getTXEN write setTXEN;
  27950. property TXERR : TBits_1 read getTXERR write setTXERR;
  27951. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27952. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27953. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27954. property UINC : TBits_1 read getUINC write setUINC;
  27955. property w : TBits_32 read getw write setw;
  27956. end;
  27957. TCAN2_C2FIFOINT16 = record
  27958. private
  27959. function getRXFULLIE : TBits_1; inline;
  27960. function getRXFULLIF : TBits_1; inline;
  27961. function getRXHALFIE : TBits_1; inline;
  27962. function getRXHALFIF : TBits_1; inline;
  27963. function getRXNEMPTYIE : TBits_1; inline;
  27964. function getRXNEMPTYIF : TBits_1; inline;
  27965. function getRXOVFLIE : TBits_1; inline;
  27966. function getRXOVFLIF : TBits_1; inline;
  27967. function getTXEMPTYIE : TBits_1; inline;
  27968. function getTXEMPTYIF : TBits_1; inline;
  27969. function getTXHALFIE : TBits_1; inline;
  27970. function getTXHALFIF : TBits_1; inline;
  27971. function getTXNFULLIE : TBits_1; inline;
  27972. function getTXNFULLIF : TBits_1; inline;
  27973. function getw : TBits_32; inline;
  27974. procedure setRXFULLIE(thebits : TBits_1); inline;
  27975. procedure setRXFULLIF(thebits : TBits_1); inline;
  27976. procedure setRXHALFIE(thebits : TBits_1); inline;
  27977. procedure setRXHALFIF(thebits : TBits_1); inline;
  27978. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27979. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27980. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27981. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27982. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27983. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27984. procedure setTXHALFIE(thebits : TBits_1); inline;
  27985. procedure setTXHALFIF(thebits : TBits_1); inline;
  27986. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27987. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27988. procedure setw(thebits : TBits_32); inline;
  27989. public
  27990. procedure clearRXFULLIE; inline;
  27991. procedure clearRXFULLIF; inline;
  27992. procedure clearRXHALFIE; inline;
  27993. procedure clearRXHALFIF; inline;
  27994. procedure clearRXNEMPTYIE; inline;
  27995. procedure clearRXNEMPTYIF; inline;
  27996. procedure clearRXOVFLIE; inline;
  27997. procedure clearRXOVFLIF; inline;
  27998. procedure clearTXEMPTYIE; inline;
  27999. procedure clearTXEMPTYIF; inline;
  28000. procedure clearTXHALFIE; inline;
  28001. procedure clearTXHALFIF; inline;
  28002. procedure clearTXNFULLIE; inline;
  28003. procedure clearTXNFULLIF; inline;
  28004. procedure setRXFULLIE; inline;
  28005. procedure setRXFULLIF; inline;
  28006. procedure setRXHALFIE; inline;
  28007. procedure setRXHALFIF; inline;
  28008. procedure setRXNEMPTYIE; inline;
  28009. procedure setRXNEMPTYIF; inline;
  28010. procedure setRXOVFLIE; inline;
  28011. procedure setRXOVFLIF; inline;
  28012. procedure setTXEMPTYIE; inline;
  28013. procedure setTXEMPTYIF; inline;
  28014. procedure setTXHALFIE; inline;
  28015. procedure setTXHALFIF; inline;
  28016. procedure setTXNFULLIE; inline;
  28017. procedure setTXNFULLIF; inline;
  28018. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28019. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28020. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28021. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28022. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28023. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28024. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28025. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28026. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28027. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28028. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28029. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28030. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28031. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28032. property w : TBits_32 read getw write setw;
  28033. end;
  28034. TCAN2_C2FIFOCI16 = record
  28035. private
  28036. function getCFIFOCI : TBits_5; inline;
  28037. function getw : TBits_32; inline;
  28038. procedure setCFIFOCI(thebits : TBits_5); inline;
  28039. procedure setw(thebits : TBits_32); inline;
  28040. public
  28041. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28042. property w : TBits_32 read getw write setw;
  28043. end;
  28044. TCAN2_C2FIFOCON17 = record
  28045. private
  28046. function getDONLY : TBits_1; inline;
  28047. function getFRESET : TBits_1; inline;
  28048. function getFSIZE : TBits_5; inline;
  28049. function getRTREN : TBits_1; inline;
  28050. function getTXABAT : TBits_1; inline;
  28051. function getTXEN : TBits_1; inline;
  28052. function getTXERR : TBits_1; inline;
  28053. function getTXLARB : TBits_1; inline;
  28054. function getTXPRI : TBits_2; inline;
  28055. function getTXREQ : TBits_1; inline;
  28056. function getUINC : TBits_1; inline;
  28057. function getw : TBits_32; inline;
  28058. procedure setDONLY(thebits : TBits_1); inline;
  28059. procedure setFRESET(thebits : TBits_1); inline;
  28060. procedure setFSIZE(thebits : TBits_5); inline;
  28061. procedure setRTREN(thebits : TBits_1); inline;
  28062. procedure setTXABAT(thebits : TBits_1); inline;
  28063. procedure setTXEN(thebits : TBits_1); inline;
  28064. procedure setTXERR(thebits : TBits_1); inline;
  28065. procedure setTXLARB(thebits : TBits_1); inline;
  28066. procedure setTXPRI(thebits : TBits_2); inline;
  28067. procedure setTXREQ(thebits : TBits_1); inline;
  28068. procedure setUINC(thebits : TBits_1); inline;
  28069. procedure setw(thebits : TBits_32); inline;
  28070. public
  28071. procedure clearDONLY; inline;
  28072. procedure clearFRESET; inline;
  28073. procedure clearRTREN; inline;
  28074. procedure clearTXABAT; inline;
  28075. procedure clearTXEN; inline;
  28076. procedure clearTXERR; inline;
  28077. procedure clearTXLARB; inline;
  28078. procedure clearTXREQ; inline;
  28079. procedure clearUINC; inline;
  28080. procedure setDONLY; inline;
  28081. procedure setFRESET; inline;
  28082. procedure setRTREN; inline;
  28083. procedure setTXABAT; inline;
  28084. procedure setTXEN; inline;
  28085. procedure setTXERR; inline;
  28086. procedure setTXLARB; inline;
  28087. procedure setTXREQ; inline;
  28088. procedure setUINC; inline;
  28089. property DONLY : TBits_1 read getDONLY write setDONLY;
  28090. property FRESET : TBits_1 read getFRESET write setFRESET;
  28091. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28092. property RTREN : TBits_1 read getRTREN write setRTREN;
  28093. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28094. property TXEN : TBits_1 read getTXEN write setTXEN;
  28095. property TXERR : TBits_1 read getTXERR write setTXERR;
  28096. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28097. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28098. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28099. property UINC : TBits_1 read getUINC write setUINC;
  28100. property w : TBits_32 read getw write setw;
  28101. end;
  28102. TCAN2_C2FIFOINT17 = record
  28103. private
  28104. function getRXFULLIE : TBits_1; inline;
  28105. function getRXFULLIF : TBits_1; inline;
  28106. function getRXHALFIE : TBits_1; inline;
  28107. function getRXHALFIF : TBits_1; inline;
  28108. function getRXNEMPTYIE : TBits_1; inline;
  28109. function getRXNEMPTYIF : TBits_1; inline;
  28110. function getRXOVFLIE : TBits_1; inline;
  28111. function getRXOVFLIF : TBits_1; inline;
  28112. function getTXEMPTYIE : TBits_1; inline;
  28113. function getTXEMPTYIF : TBits_1; inline;
  28114. function getTXHALFIE : TBits_1; inline;
  28115. function getTXHALFIF : TBits_1; inline;
  28116. function getTXNFULLIE : TBits_1; inline;
  28117. function getTXNFULLIF : TBits_1; inline;
  28118. function getw : TBits_32; inline;
  28119. procedure setRXFULLIE(thebits : TBits_1); inline;
  28120. procedure setRXFULLIF(thebits : TBits_1); inline;
  28121. procedure setRXHALFIE(thebits : TBits_1); inline;
  28122. procedure setRXHALFIF(thebits : TBits_1); inline;
  28123. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28124. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28125. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28126. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28127. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28128. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28129. procedure setTXHALFIE(thebits : TBits_1); inline;
  28130. procedure setTXHALFIF(thebits : TBits_1); inline;
  28131. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28132. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28133. procedure setw(thebits : TBits_32); inline;
  28134. public
  28135. procedure clearRXFULLIE; inline;
  28136. procedure clearRXFULLIF; inline;
  28137. procedure clearRXHALFIE; inline;
  28138. procedure clearRXHALFIF; inline;
  28139. procedure clearRXNEMPTYIE; inline;
  28140. procedure clearRXNEMPTYIF; inline;
  28141. procedure clearRXOVFLIE; inline;
  28142. procedure clearRXOVFLIF; inline;
  28143. procedure clearTXEMPTYIE; inline;
  28144. procedure clearTXEMPTYIF; inline;
  28145. procedure clearTXHALFIE; inline;
  28146. procedure clearTXHALFIF; inline;
  28147. procedure clearTXNFULLIE; inline;
  28148. procedure clearTXNFULLIF; inline;
  28149. procedure setRXFULLIE; inline;
  28150. procedure setRXFULLIF; inline;
  28151. procedure setRXHALFIE; inline;
  28152. procedure setRXHALFIF; inline;
  28153. procedure setRXNEMPTYIE; inline;
  28154. procedure setRXNEMPTYIF; inline;
  28155. procedure setRXOVFLIE; inline;
  28156. procedure setRXOVFLIF; inline;
  28157. procedure setTXEMPTYIE; inline;
  28158. procedure setTXEMPTYIF; inline;
  28159. procedure setTXHALFIE; inline;
  28160. procedure setTXHALFIF; inline;
  28161. procedure setTXNFULLIE; inline;
  28162. procedure setTXNFULLIF; inline;
  28163. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28164. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28165. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28166. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28167. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28168. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28169. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28170. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28171. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28172. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28173. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28174. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28175. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28176. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28177. property w : TBits_32 read getw write setw;
  28178. end;
  28179. TCAN2_C2FIFOCI17 = record
  28180. private
  28181. function getCFIFOCI : TBits_5; inline;
  28182. function getw : TBits_32; inline;
  28183. procedure setCFIFOCI(thebits : TBits_5); inline;
  28184. procedure setw(thebits : TBits_32); inline;
  28185. public
  28186. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28187. property w : TBits_32 read getw write setw;
  28188. end;
  28189. TCAN2_C2FIFOCON18 = record
  28190. private
  28191. function getDONLY : TBits_1; inline;
  28192. function getFRESET : TBits_1; inline;
  28193. function getFSIZE : TBits_5; inline;
  28194. function getRTREN : TBits_1; inline;
  28195. function getTXABAT : TBits_1; inline;
  28196. function getTXEN : TBits_1; inline;
  28197. function getTXERR : TBits_1; inline;
  28198. function getTXLARB : TBits_1; inline;
  28199. function getTXPRI : TBits_2; inline;
  28200. function getTXREQ : TBits_1; inline;
  28201. function getUINC : TBits_1; inline;
  28202. function getw : TBits_32; inline;
  28203. procedure setDONLY(thebits : TBits_1); inline;
  28204. procedure setFRESET(thebits : TBits_1); inline;
  28205. procedure setFSIZE(thebits : TBits_5); inline;
  28206. procedure setRTREN(thebits : TBits_1); inline;
  28207. procedure setTXABAT(thebits : TBits_1); inline;
  28208. procedure setTXEN(thebits : TBits_1); inline;
  28209. procedure setTXERR(thebits : TBits_1); inline;
  28210. procedure setTXLARB(thebits : TBits_1); inline;
  28211. procedure setTXPRI(thebits : TBits_2); inline;
  28212. procedure setTXREQ(thebits : TBits_1); inline;
  28213. procedure setUINC(thebits : TBits_1); inline;
  28214. procedure setw(thebits : TBits_32); inline;
  28215. public
  28216. procedure clearDONLY; inline;
  28217. procedure clearFRESET; inline;
  28218. procedure clearRTREN; inline;
  28219. procedure clearTXABAT; inline;
  28220. procedure clearTXEN; inline;
  28221. procedure clearTXERR; inline;
  28222. procedure clearTXLARB; inline;
  28223. procedure clearTXREQ; inline;
  28224. procedure clearUINC; inline;
  28225. procedure setDONLY; inline;
  28226. procedure setFRESET; inline;
  28227. procedure setRTREN; inline;
  28228. procedure setTXABAT; inline;
  28229. procedure setTXEN; inline;
  28230. procedure setTXERR; inline;
  28231. procedure setTXLARB; inline;
  28232. procedure setTXREQ; inline;
  28233. procedure setUINC; inline;
  28234. property DONLY : TBits_1 read getDONLY write setDONLY;
  28235. property FRESET : TBits_1 read getFRESET write setFRESET;
  28236. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28237. property RTREN : TBits_1 read getRTREN write setRTREN;
  28238. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28239. property TXEN : TBits_1 read getTXEN write setTXEN;
  28240. property TXERR : TBits_1 read getTXERR write setTXERR;
  28241. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28242. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28243. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28244. property UINC : TBits_1 read getUINC write setUINC;
  28245. property w : TBits_32 read getw write setw;
  28246. end;
  28247. TCAN2_C2FIFOINT18 = record
  28248. private
  28249. function getRXFULLIE : TBits_1; inline;
  28250. function getRXFULLIF : TBits_1; inline;
  28251. function getRXHALFIE : TBits_1; inline;
  28252. function getRXHALFIF : TBits_1; inline;
  28253. function getRXNEMPTYIE : TBits_1; inline;
  28254. function getRXNEMPTYIF : TBits_1; inline;
  28255. function getRXOVFLIE : TBits_1; inline;
  28256. function getRXOVFLIF : TBits_1; inline;
  28257. function getTXEMPTYIE : TBits_1; inline;
  28258. function getTXEMPTYIF : TBits_1; inline;
  28259. function getTXHALFIE : TBits_1; inline;
  28260. function getTXHALFIF : TBits_1; inline;
  28261. function getTXNFULLIE : TBits_1; inline;
  28262. function getTXNFULLIF : TBits_1; inline;
  28263. function getw : TBits_32; inline;
  28264. procedure setRXFULLIE(thebits : TBits_1); inline;
  28265. procedure setRXFULLIF(thebits : TBits_1); inline;
  28266. procedure setRXHALFIE(thebits : TBits_1); inline;
  28267. procedure setRXHALFIF(thebits : TBits_1); inline;
  28268. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28269. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28270. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28271. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28272. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28273. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28274. procedure setTXHALFIE(thebits : TBits_1); inline;
  28275. procedure setTXHALFIF(thebits : TBits_1); inline;
  28276. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28277. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28278. procedure setw(thebits : TBits_32); inline;
  28279. public
  28280. procedure clearRXFULLIE; inline;
  28281. procedure clearRXFULLIF; inline;
  28282. procedure clearRXHALFIE; inline;
  28283. procedure clearRXHALFIF; inline;
  28284. procedure clearRXNEMPTYIE; inline;
  28285. procedure clearRXNEMPTYIF; inline;
  28286. procedure clearRXOVFLIE; inline;
  28287. procedure clearRXOVFLIF; inline;
  28288. procedure clearTXEMPTYIE; inline;
  28289. procedure clearTXEMPTYIF; inline;
  28290. procedure clearTXHALFIE; inline;
  28291. procedure clearTXHALFIF; inline;
  28292. procedure clearTXNFULLIE; inline;
  28293. procedure clearTXNFULLIF; inline;
  28294. procedure setRXFULLIE; inline;
  28295. procedure setRXFULLIF; inline;
  28296. procedure setRXHALFIE; inline;
  28297. procedure setRXHALFIF; inline;
  28298. procedure setRXNEMPTYIE; inline;
  28299. procedure setRXNEMPTYIF; inline;
  28300. procedure setRXOVFLIE; inline;
  28301. procedure setRXOVFLIF; inline;
  28302. procedure setTXEMPTYIE; inline;
  28303. procedure setTXEMPTYIF; inline;
  28304. procedure setTXHALFIE; inline;
  28305. procedure setTXHALFIF; inline;
  28306. procedure setTXNFULLIE; inline;
  28307. procedure setTXNFULLIF; inline;
  28308. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28309. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28310. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28311. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28312. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28313. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28314. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28315. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28316. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28317. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28318. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28319. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28320. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28321. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28322. property w : TBits_32 read getw write setw;
  28323. end;
  28324. TCAN2_C2FIFOCI18 = record
  28325. private
  28326. function getCFIFOCI : TBits_5; inline;
  28327. function getw : TBits_32; inline;
  28328. procedure setCFIFOCI(thebits : TBits_5); inline;
  28329. procedure setw(thebits : TBits_32); inline;
  28330. public
  28331. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28332. property w : TBits_32 read getw write setw;
  28333. end;
  28334. TCAN2_C2FIFOCON19 = record
  28335. private
  28336. function getDONLY : TBits_1; inline;
  28337. function getFRESET : TBits_1; inline;
  28338. function getFSIZE : TBits_5; inline;
  28339. function getRTREN : TBits_1; inline;
  28340. function getTXABAT : TBits_1; inline;
  28341. function getTXEN : TBits_1; inline;
  28342. function getTXERR : TBits_1; inline;
  28343. function getTXLARB : TBits_1; inline;
  28344. function getTXPRI : TBits_2; inline;
  28345. function getTXREQ : TBits_1; inline;
  28346. function getUINC : TBits_1; inline;
  28347. function getw : TBits_32; inline;
  28348. procedure setDONLY(thebits : TBits_1); inline;
  28349. procedure setFRESET(thebits : TBits_1); inline;
  28350. procedure setFSIZE(thebits : TBits_5); inline;
  28351. procedure setRTREN(thebits : TBits_1); inline;
  28352. procedure setTXABAT(thebits : TBits_1); inline;
  28353. procedure setTXEN(thebits : TBits_1); inline;
  28354. procedure setTXERR(thebits : TBits_1); inline;
  28355. procedure setTXLARB(thebits : TBits_1); inline;
  28356. procedure setTXPRI(thebits : TBits_2); inline;
  28357. procedure setTXREQ(thebits : TBits_1); inline;
  28358. procedure setUINC(thebits : TBits_1); inline;
  28359. procedure setw(thebits : TBits_32); inline;
  28360. public
  28361. procedure clearDONLY; inline;
  28362. procedure clearFRESET; inline;
  28363. procedure clearRTREN; inline;
  28364. procedure clearTXABAT; inline;
  28365. procedure clearTXEN; inline;
  28366. procedure clearTXERR; inline;
  28367. procedure clearTXLARB; inline;
  28368. procedure clearTXREQ; inline;
  28369. procedure clearUINC; inline;
  28370. procedure setDONLY; inline;
  28371. procedure setFRESET; inline;
  28372. procedure setRTREN; inline;
  28373. procedure setTXABAT; inline;
  28374. procedure setTXEN; inline;
  28375. procedure setTXERR; inline;
  28376. procedure setTXLARB; inline;
  28377. procedure setTXREQ; inline;
  28378. procedure setUINC; inline;
  28379. property DONLY : TBits_1 read getDONLY write setDONLY;
  28380. property FRESET : TBits_1 read getFRESET write setFRESET;
  28381. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28382. property RTREN : TBits_1 read getRTREN write setRTREN;
  28383. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28384. property TXEN : TBits_1 read getTXEN write setTXEN;
  28385. property TXERR : TBits_1 read getTXERR write setTXERR;
  28386. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28387. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28388. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28389. property UINC : TBits_1 read getUINC write setUINC;
  28390. property w : TBits_32 read getw write setw;
  28391. end;
  28392. TCAN2_C2FIFOINT19 = record
  28393. private
  28394. function getRXFULLIE : TBits_1; inline;
  28395. function getRXFULLIF : TBits_1; inline;
  28396. function getRXHALFIE : TBits_1; inline;
  28397. function getRXHALFIF : TBits_1; inline;
  28398. function getRXNEMPTYIE : TBits_1; inline;
  28399. function getRXNEMPTYIF : TBits_1; inline;
  28400. function getRXOVFLIE : TBits_1; inline;
  28401. function getRXOVFLIF : TBits_1; inline;
  28402. function getTXEMPTYIE : TBits_1; inline;
  28403. function getTXEMPTYIF : TBits_1; inline;
  28404. function getTXHALFIE : TBits_1; inline;
  28405. function getTXHALFIF : TBits_1; inline;
  28406. function getTXNFULLIE : TBits_1; inline;
  28407. function getTXNFULLIF : TBits_1; inline;
  28408. function getw : TBits_32; inline;
  28409. procedure setRXFULLIE(thebits : TBits_1); inline;
  28410. procedure setRXFULLIF(thebits : TBits_1); inline;
  28411. procedure setRXHALFIE(thebits : TBits_1); inline;
  28412. procedure setRXHALFIF(thebits : TBits_1); inline;
  28413. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28414. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28415. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28416. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28417. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28418. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28419. procedure setTXHALFIE(thebits : TBits_1); inline;
  28420. procedure setTXHALFIF(thebits : TBits_1); inline;
  28421. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28422. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28423. procedure setw(thebits : TBits_32); inline;
  28424. public
  28425. procedure clearRXFULLIE; inline;
  28426. procedure clearRXFULLIF; inline;
  28427. procedure clearRXHALFIE; inline;
  28428. procedure clearRXHALFIF; inline;
  28429. procedure clearRXNEMPTYIE; inline;
  28430. procedure clearRXNEMPTYIF; inline;
  28431. procedure clearRXOVFLIE; inline;
  28432. procedure clearRXOVFLIF; inline;
  28433. procedure clearTXEMPTYIE; inline;
  28434. procedure clearTXEMPTYIF; inline;
  28435. procedure clearTXHALFIE; inline;
  28436. procedure clearTXHALFIF; inline;
  28437. procedure clearTXNFULLIE; inline;
  28438. procedure clearTXNFULLIF; inline;
  28439. procedure setRXFULLIE; inline;
  28440. procedure setRXFULLIF; inline;
  28441. procedure setRXHALFIE; inline;
  28442. procedure setRXHALFIF; inline;
  28443. procedure setRXNEMPTYIE; inline;
  28444. procedure setRXNEMPTYIF; inline;
  28445. procedure setRXOVFLIE; inline;
  28446. procedure setRXOVFLIF; inline;
  28447. procedure setTXEMPTYIE; inline;
  28448. procedure setTXEMPTYIF; inline;
  28449. procedure setTXHALFIE; inline;
  28450. procedure setTXHALFIF; inline;
  28451. procedure setTXNFULLIE; inline;
  28452. procedure setTXNFULLIF; inline;
  28453. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28454. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28455. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28456. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28457. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28458. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28459. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28460. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28461. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28462. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28463. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28464. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28465. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28466. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28467. property w : TBits_32 read getw write setw;
  28468. end;
  28469. TCAN2_C2FIFOCI19 = record
  28470. private
  28471. function getCFIFOCI : TBits_5; inline;
  28472. function getw : TBits_32; inline;
  28473. procedure setCFIFOCI(thebits : TBits_5); inline;
  28474. procedure setw(thebits : TBits_32); inline;
  28475. public
  28476. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28477. property w : TBits_32 read getw write setw;
  28478. end;
  28479. TCAN2_C2FIFOCON20 = record
  28480. private
  28481. function getDONLY : TBits_1; inline;
  28482. function getFRESET : TBits_1; inline;
  28483. function getFSIZE : TBits_5; inline;
  28484. function getRTREN : TBits_1; inline;
  28485. function getTXABAT : TBits_1; inline;
  28486. function getTXEN : TBits_1; inline;
  28487. function getTXERR : TBits_1; inline;
  28488. function getTXLARB : TBits_1; inline;
  28489. function getTXPRI : TBits_2; inline;
  28490. function getTXREQ : TBits_1; inline;
  28491. function getUINC : TBits_1; inline;
  28492. function getw : TBits_32; inline;
  28493. procedure setDONLY(thebits : TBits_1); inline;
  28494. procedure setFRESET(thebits : TBits_1); inline;
  28495. procedure setFSIZE(thebits : TBits_5); inline;
  28496. procedure setRTREN(thebits : TBits_1); inline;
  28497. procedure setTXABAT(thebits : TBits_1); inline;
  28498. procedure setTXEN(thebits : TBits_1); inline;
  28499. procedure setTXERR(thebits : TBits_1); inline;
  28500. procedure setTXLARB(thebits : TBits_1); inline;
  28501. procedure setTXPRI(thebits : TBits_2); inline;
  28502. procedure setTXREQ(thebits : TBits_1); inline;
  28503. procedure setUINC(thebits : TBits_1); inline;
  28504. procedure setw(thebits : TBits_32); inline;
  28505. public
  28506. procedure clearDONLY; inline;
  28507. procedure clearFRESET; inline;
  28508. procedure clearRTREN; inline;
  28509. procedure clearTXABAT; inline;
  28510. procedure clearTXEN; inline;
  28511. procedure clearTXERR; inline;
  28512. procedure clearTXLARB; inline;
  28513. procedure clearTXREQ; inline;
  28514. procedure clearUINC; inline;
  28515. procedure setDONLY; inline;
  28516. procedure setFRESET; inline;
  28517. procedure setRTREN; inline;
  28518. procedure setTXABAT; inline;
  28519. procedure setTXEN; inline;
  28520. procedure setTXERR; inline;
  28521. procedure setTXLARB; inline;
  28522. procedure setTXREQ; inline;
  28523. procedure setUINC; inline;
  28524. property DONLY : TBits_1 read getDONLY write setDONLY;
  28525. property FRESET : TBits_1 read getFRESET write setFRESET;
  28526. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28527. property RTREN : TBits_1 read getRTREN write setRTREN;
  28528. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28529. property TXEN : TBits_1 read getTXEN write setTXEN;
  28530. property TXERR : TBits_1 read getTXERR write setTXERR;
  28531. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28532. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28533. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28534. property UINC : TBits_1 read getUINC write setUINC;
  28535. property w : TBits_32 read getw write setw;
  28536. end;
  28537. TCAN2_C2FIFOINT20 = record
  28538. private
  28539. function getRXFULLIE : TBits_1; inline;
  28540. function getRXFULLIF : TBits_1; inline;
  28541. function getRXHALFIE : TBits_1; inline;
  28542. function getRXHALFIF : TBits_1; inline;
  28543. function getRXNEMPTYIE : TBits_1; inline;
  28544. function getRXNEMPTYIF : TBits_1; inline;
  28545. function getRXOVFLIE : TBits_1; inline;
  28546. function getRXOVFLIF : TBits_1; inline;
  28547. function getTXEMPTYIE : TBits_1; inline;
  28548. function getTXEMPTYIF : TBits_1; inline;
  28549. function getTXHALFIE : TBits_1; inline;
  28550. function getTXHALFIF : TBits_1; inline;
  28551. function getTXNFULLIE : TBits_1; inline;
  28552. function getTXNFULLIF : TBits_1; inline;
  28553. function getw : TBits_32; inline;
  28554. procedure setRXFULLIE(thebits : TBits_1); inline;
  28555. procedure setRXFULLIF(thebits : TBits_1); inline;
  28556. procedure setRXHALFIE(thebits : TBits_1); inline;
  28557. procedure setRXHALFIF(thebits : TBits_1); inline;
  28558. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28559. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28560. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28561. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28562. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28563. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28564. procedure setTXHALFIE(thebits : TBits_1); inline;
  28565. procedure setTXHALFIF(thebits : TBits_1); inline;
  28566. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28567. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28568. procedure setw(thebits : TBits_32); inline;
  28569. public
  28570. procedure clearRXFULLIE; inline;
  28571. procedure clearRXFULLIF; inline;
  28572. procedure clearRXHALFIE; inline;
  28573. procedure clearRXHALFIF; inline;
  28574. procedure clearRXNEMPTYIE; inline;
  28575. procedure clearRXNEMPTYIF; inline;
  28576. procedure clearRXOVFLIE; inline;
  28577. procedure clearRXOVFLIF; inline;
  28578. procedure clearTXEMPTYIE; inline;
  28579. procedure clearTXEMPTYIF; inline;
  28580. procedure clearTXHALFIE; inline;
  28581. procedure clearTXHALFIF; inline;
  28582. procedure clearTXNFULLIE; inline;
  28583. procedure clearTXNFULLIF; inline;
  28584. procedure setRXFULLIE; inline;
  28585. procedure setRXFULLIF; inline;
  28586. procedure setRXHALFIE; inline;
  28587. procedure setRXHALFIF; inline;
  28588. procedure setRXNEMPTYIE; inline;
  28589. procedure setRXNEMPTYIF; inline;
  28590. procedure setRXOVFLIE; inline;
  28591. procedure setRXOVFLIF; inline;
  28592. procedure setTXEMPTYIE; inline;
  28593. procedure setTXEMPTYIF; inline;
  28594. procedure setTXHALFIE; inline;
  28595. procedure setTXHALFIF; inline;
  28596. procedure setTXNFULLIE; inline;
  28597. procedure setTXNFULLIF; inline;
  28598. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28599. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28600. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28601. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28602. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28603. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28604. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28605. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28606. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28607. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28608. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28609. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28610. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28611. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28612. property w : TBits_32 read getw write setw;
  28613. end;
  28614. TCAN2_C2FIFOCI20 = record
  28615. private
  28616. function getCFIFOCI : TBits_5; inline;
  28617. function getw : TBits_32; inline;
  28618. procedure setCFIFOCI(thebits : TBits_5); inline;
  28619. procedure setw(thebits : TBits_32); inline;
  28620. public
  28621. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28622. property w : TBits_32 read getw write setw;
  28623. end;
  28624. TCAN2_C2FIFOCON21 = record
  28625. private
  28626. function getDONLY : TBits_1; inline;
  28627. function getFRESET : TBits_1; inline;
  28628. function getFSIZE : TBits_5; inline;
  28629. function getRTREN : TBits_1; inline;
  28630. function getTXABAT : TBits_1; inline;
  28631. function getTXEN : TBits_1; inline;
  28632. function getTXERR : TBits_1; inline;
  28633. function getTXLARB : TBits_1; inline;
  28634. function getTXPRI : TBits_2; inline;
  28635. function getTXREQ : TBits_1; inline;
  28636. function getUINC : TBits_1; inline;
  28637. function getw : TBits_32; inline;
  28638. procedure setDONLY(thebits : TBits_1); inline;
  28639. procedure setFRESET(thebits : TBits_1); inline;
  28640. procedure setFSIZE(thebits : TBits_5); inline;
  28641. procedure setRTREN(thebits : TBits_1); inline;
  28642. procedure setTXABAT(thebits : TBits_1); inline;
  28643. procedure setTXEN(thebits : TBits_1); inline;
  28644. procedure setTXERR(thebits : TBits_1); inline;
  28645. procedure setTXLARB(thebits : TBits_1); inline;
  28646. procedure setTXPRI(thebits : TBits_2); inline;
  28647. procedure setTXREQ(thebits : TBits_1); inline;
  28648. procedure setUINC(thebits : TBits_1); inline;
  28649. procedure setw(thebits : TBits_32); inline;
  28650. public
  28651. procedure clearDONLY; inline;
  28652. procedure clearFRESET; inline;
  28653. procedure clearRTREN; inline;
  28654. procedure clearTXABAT; inline;
  28655. procedure clearTXEN; inline;
  28656. procedure clearTXERR; inline;
  28657. procedure clearTXLARB; inline;
  28658. procedure clearTXREQ; inline;
  28659. procedure clearUINC; inline;
  28660. procedure setDONLY; inline;
  28661. procedure setFRESET; inline;
  28662. procedure setRTREN; inline;
  28663. procedure setTXABAT; inline;
  28664. procedure setTXEN; inline;
  28665. procedure setTXERR; inline;
  28666. procedure setTXLARB; inline;
  28667. procedure setTXREQ; inline;
  28668. procedure setUINC; inline;
  28669. property DONLY : TBits_1 read getDONLY write setDONLY;
  28670. property FRESET : TBits_1 read getFRESET write setFRESET;
  28671. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28672. property RTREN : TBits_1 read getRTREN write setRTREN;
  28673. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28674. property TXEN : TBits_1 read getTXEN write setTXEN;
  28675. property TXERR : TBits_1 read getTXERR write setTXERR;
  28676. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28677. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28678. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28679. property UINC : TBits_1 read getUINC write setUINC;
  28680. property w : TBits_32 read getw write setw;
  28681. end;
  28682. TCAN2_C2FIFOINT21 = record
  28683. private
  28684. function getRXFULLIE : TBits_1; inline;
  28685. function getRXFULLIF : TBits_1; inline;
  28686. function getRXHALFIE : TBits_1; inline;
  28687. function getRXHALFIF : TBits_1; inline;
  28688. function getRXNEMPTYIE : TBits_1; inline;
  28689. function getRXNEMPTYIF : TBits_1; inline;
  28690. function getRXOVFLIE : TBits_1; inline;
  28691. function getRXOVFLIF : TBits_1; inline;
  28692. function getTXEMPTYIE : TBits_1; inline;
  28693. function getTXEMPTYIF : TBits_1; inline;
  28694. function getTXHALFIE : TBits_1; inline;
  28695. function getTXHALFIF : TBits_1; inline;
  28696. function getTXNFULLIE : TBits_1; inline;
  28697. function getTXNFULLIF : TBits_1; inline;
  28698. function getw : TBits_32; inline;
  28699. procedure setRXFULLIE(thebits : TBits_1); inline;
  28700. procedure setRXFULLIF(thebits : TBits_1); inline;
  28701. procedure setRXHALFIE(thebits : TBits_1); inline;
  28702. procedure setRXHALFIF(thebits : TBits_1); inline;
  28703. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28704. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28705. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28706. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28707. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28708. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28709. procedure setTXHALFIE(thebits : TBits_1); inline;
  28710. procedure setTXHALFIF(thebits : TBits_1); inline;
  28711. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28712. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28713. procedure setw(thebits : TBits_32); inline;
  28714. public
  28715. procedure clearRXFULLIE; inline;
  28716. procedure clearRXFULLIF; inline;
  28717. procedure clearRXHALFIE; inline;
  28718. procedure clearRXHALFIF; inline;
  28719. procedure clearRXNEMPTYIE; inline;
  28720. procedure clearRXNEMPTYIF; inline;
  28721. procedure clearRXOVFLIE; inline;
  28722. procedure clearRXOVFLIF; inline;
  28723. procedure clearTXEMPTYIE; inline;
  28724. procedure clearTXEMPTYIF; inline;
  28725. procedure clearTXHALFIE; inline;
  28726. procedure clearTXHALFIF; inline;
  28727. procedure clearTXNFULLIE; inline;
  28728. procedure clearTXNFULLIF; inline;
  28729. procedure setRXFULLIE; inline;
  28730. procedure setRXFULLIF; inline;
  28731. procedure setRXHALFIE; inline;
  28732. procedure setRXHALFIF; inline;
  28733. procedure setRXNEMPTYIE; inline;
  28734. procedure setRXNEMPTYIF; inline;
  28735. procedure setRXOVFLIE; inline;
  28736. procedure setRXOVFLIF; inline;
  28737. procedure setTXEMPTYIE; inline;
  28738. procedure setTXEMPTYIF; inline;
  28739. procedure setTXHALFIE; inline;
  28740. procedure setTXHALFIF; inline;
  28741. procedure setTXNFULLIE; inline;
  28742. procedure setTXNFULLIF; inline;
  28743. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28744. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28745. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28746. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28747. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28748. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28749. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28750. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28751. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28752. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28753. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28754. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28755. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28756. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28757. property w : TBits_32 read getw write setw;
  28758. end;
  28759. TCAN2_C2FIFOCI21 = record
  28760. private
  28761. function getCFIFOCI : TBits_5; inline;
  28762. function getw : TBits_32; inline;
  28763. procedure setCFIFOCI(thebits : TBits_5); inline;
  28764. procedure setw(thebits : TBits_32); inline;
  28765. public
  28766. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28767. property w : TBits_32 read getw write setw;
  28768. end;
  28769. TCAN2_C2FIFOCON22 = record
  28770. private
  28771. function getDONLY : TBits_1; inline;
  28772. function getFRESET : TBits_1; inline;
  28773. function getFSIZE : TBits_5; inline;
  28774. function getRTREN : TBits_1; inline;
  28775. function getTXABAT : TBits_1; inline;
  28776. function getTXEN : TBits_1; inline;
  28777. function getTXERR : TBits_1; inline;
  28778. function getTXLARB : TBits_1; inline;
  28779. function getTXPRI : TBits_2; inline;
  28780. function getTXREQ : TBits_1; inline;
  28781. function getUINC : TBits_1; inline;
  28782. function getw : TBits_32; inline;
  28783. procedure setDONLY(thebits : TBits_1); inline;
  28784. procedure setFRESET(thebits : TBits_1); inline;
  28785. procedure setFSIZE(thebits : TBits_5); inline;
  28786. procedure setRTREN(thebits : TBits_1); inline;
  28787. procedure setTXABAT(thebits : TBits_1); inline;
  28788. procedure setTXEN(thebits : TBits_1); inline;
  28789. procedure setTXERR(thebits : TBits_1); inline;
  28790. procedure setTXLARB(thebits : TBits_1); inline;
  28791. procedure setTXPRI(thebits : TBits_2); inline;
  28792. procedure setTXREQ(thebits : TBits_1); inline;
  28793. procedure setUINC(thebits : TBits_1); inline;
  28794. procedure setw(thebits : TBits_32); inline;
  28795. public
  28796. procedure clearDONLY; inline;
  28797. procedure clearFRESET; inline;
  28798. procedure clearRTREN; inline;
  28799. procedure clearTXABAT; inline;
  28800. procedure clearTXEN; inline;
  28801. procedure clearTXERR; inline;
  28802. procedure clearTXLARB; inline;
  28803. procedure clearTXREQ; inline;
  28804. procedure clearUINC; inline;
  28805. procedure setDONLY; inline;
  28806. procedure setFRESET; inline;
  28807. procedure setRTREN; inline;
  28808. procedure setTXABAT; inline;
  28809. procedure setTXEN; inline;
  28810. procedure setTXERR; inline;
  28811. procedure setTXLARB; inline;
  28812. procedure setTXREQ; inline;
  28813. procedure setUINC; inline;
  28814. property DONLY : TBits_1 read getDONLY write setDONLY;
  28815. property FRESET : TBits_1 read getFRESET write setFRESET;
  28816. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28817. property RTREN : TBits_1 read getRTREN write setRTREN;
  28818. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28819. property TXEN : TBits_1 read getTXEN write setTXEN;
  28820. property TXERR : TBits_1 read getTXERR write setTXERR;
  28821. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28822. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28823. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28824. property UINC : TBits_1 read getUINC write setUINC;
  28825. property w : TBits_32 read getw write setw;
  28826. end;
  28827. TCAN2_C2FIFOINT22 = record
  28828. private
  28829. function getRXFULLIE : TBits_1; inline;
  28830. function getRXFULLIF : TBits_1; inline;
  28831. function getRXHALFIE : TBits_1; inline;
  28832. function getRXHALFIF : TBits_1; inline;
  28833. function getRXNEMPTYIE : TBits_1; inline;
  28834. function getRXNEMPTYIF : TBits_1; inline;
  28835. function getRXOVFLIE : TBits_1; inline;
  28836. function getRXOVFLIF : TBits_1; inline;
  28837. function getTXEMPTYIE : TBits_1; inline;
  28838. function getTXEMPTYIF : TBits_1; inline;
  28839. function getTXHALFIE : TBits_1; inline;
  28840. function getTXHALFIF : TBits_1; inline;
  28841. function getTXNFULLIE : TBits_1; inline;
  28842. function getTXNFULLIF : TBits_1; inline;
  28843. function getw : TBits_32; inline;
  28844. procedure setRXFULLIE(thebits : TBits_1); inline;
  28845. procedure setRXFULLIF(thebits : TBits_1); inline;
  28846. procedure setRXHALFIE(thebits : TBits_1); inline;
  28847. procedure setRXHALFIF(thebits : TBits_1); inline;
  28848. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28849. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28850. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28851. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28852. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28853. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28854. procedure setTXHALFIE(thebits : TBits_1); inline;
  28855. procedure setTXHALFIF(thebits : TBits_1); inline;
  28856. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28857. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28858. procedure setw(thebits : TBits_32); inline;
  28859. public
  28860. procedure clearRXFULLIE; inline;
  28861. procedure clearRXFULLIF; inline;
  28862. procedure clearRXHALFIE; inline;
  28863. procedure clearRXHALFIF; inline;
  28864. procedure clearRXNEMPTYIE; inline;
  28865. procedure clearRXNEMPTYIF; inline;
  28866. procedure clearRXOVFLIE; inline;
  28867. procedure clearRXOVFLIF; inline;
  28868. procedure clearTXEMPTYIE; inline;
  28869. procedure clearTXEMPTYIF; inline;
  28870. procedure clearTXHALFIE; inline;
  28871. procedure clearTXHALFIF; inline;
  28872. procedure clearTXNFULLIE; inline;
  28873. procedure clearTXNFULLIF; inline;
  28874. procedure setRXFULLIE; inline;
  28875. procedure setRXFULLIF; inline;
  28876. procedure setRXHALFIE; inline;
  28877. procedure setRXHALFIF; inline;
  28878. procedure setRXNEMPTYIE; inline;
  28879. procedure setRXNEMPTYIF; inline;
  28880. procedure setRXOVFLIE; inline;
  28881. procedure setRXOVFLIF; inline;
  28882. procedure setTXEMPTYIE; inline;
  28883. procedure setTXEMPTYIF; inline;
  28884. procedure setTXHALFIE; inline;
  28885. procedure setTXHALFIF; inline;
  28886. procedure setTXNFULLIE; inline;
  28887. procedure setTXNFULLIF; inline;
  28888. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28889. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28890. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28891. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28892. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28893. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28894. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28895. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28896. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28897. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28898. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28899. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28900. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28901. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28902. property w : TBits_32 read getw write setw;
  28903. end;
  28904. TCAN2_C2FIFOCI22 = record
  28905. private
  28906. function getCFIFOCI : TBits_5; inline;
  28907. function getw : TBits_32; inline;
  28908. procedure setCFIFOCI(thebits : TBits_5); inline;
  28909. procedure setw(thebits : TBits_32); inline;
  28910. public
  28911. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28912. property w : TBits_32 read getw write setw;
  28913. end;
  28914. TCAN2_C2FIFOCON23 = record
  28915. private
  28916. function getDONLY : TBits_1; inline;
  28917. function getFRESET : TBits_1; inline;
  28918. function getFSIZE : TBits_5; inline;
  28919. function getRTREN : TBits_1; inline;
  28920. function getTXABAT : TBits_1; inline;
  28921. function getTXEN : TBits_1; inline;
  28922. function getTXERR : TBits_1; inline;
  28923. function getTXLARB : TBits_1; inline;
  28924. function getTXPRI : TBits_2; inline;
  28925. function getTXREQ : TBits_1; inline;
  28926. function getUINC : TBits_1; inline;
  28927. function getw : TBits_32; inline;
  28928. procedure setDONLY(thebits : TBits_1); inline;
  28929. procedure setFRESET(thebits : TBits_1); inline;
  28930. procedure setFSIZE(thebits : TBits_5); inline;
  28931. procedure setRTREN(thebits : TBits_1); inline;
  28932. procedure setTXABAT(thebits : TBits_1); inline;
  28933. procedure setTXEN(thebits : TBits_1); inline;
  28934. procedure setTXERR(thebits : TBits_1); inline;
  28935. procedure setTXLARB(thebits : TBits_1); inline;
  28936. procedure setTXPRI(thebits : TBits_2); inline;
  28937. procedure setTXREQ(thebits : TBits_1); inline;
  28938. procedure setUINC(thebits : TBits_1); inline;
  28939. procedure setw(thebits : TBits_32); inline;
  28940. public
  28941. procedure clearDONLY; inline;
  28942. procedure clearFRESET; inline;
  28943. procedure clearRTREN; inline;
  28944. procedure clearTXABAT; inline;
  28945. procedure clearTXEN; inline;
  28946. procedure clearTXERR; inline;
  28947. procedure clearTXLARB; inline;
  28948. procedure clearTXREQ; inline;
  28949. procedure clearUINC; inline;
  28950. procedure setDONLY; inline;
  28951. procedure setFRESET; inline;
  28952. procedure setRTREN; inline;
  28953. procedure setTXABAT; inline;
  28954. procedure setTXEN; inline;
  28955. procedure setTXERR; inline;
  28956. procedure setTXLARB; inline;
  28957. procedure setTXREQ; inline;
  28958. procedure setUINC; inline;
  28959. property DONLY : TBits_1 read getDONLY write setDONLY;
  28960. property FRESET : TBits_1 read getFRESET write setFRESET;
  28961. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28962. property RTREN : TBits_1 read getRTREN write setRTREN;
  28963. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28964. property TXEN : TBits_1 read getTXEN write setTXEN;
  28965. property TXERR : TBits_1 read getTXERR write setTXERR;
  28966. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28967. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28968. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28969. property UINC : TBits_1 read getUINC write setUINC;
  28970. property w : TBits_32 read getw write setw;
  28971. end;
  28972. TCAN2_C2FIFOINT23 = record
  28973. private
  28974. function getRXFULLIE : TBits_1; inline;
  28975. function getRXFULLIF : TBits_1; inline;
  28976. function getRXHALFIE : TBits_1; inline;
  28977. function getRXHALFIF : TBits_1; inline;
  28978. function getRXNEMPTYIE : TBits_1; inline;
  28979. function getRXNEMPTYIF : TBits_1; inline;
  28980. function getRXOVFLIE : TBits_1; inline;
  28981. function getRXOVFLIF : TBits_1; inline;
  28982. function getTXEMPTYIE : TBits_1; inline;
  28983. function getTXEMPTYIF : TBits_1; inline;
  28984. function getTXHALFIE : TBits_1; inline;
  28985. function getTXHALFIF : TBits_1; inline;
  28986. function getTXNFULLIE : TBits_1; inline;
  28987. function getTXNFULLIF : TBits_1; inline;
  28988. function getw : TBits_32; inline;
  28989. procedure setRXFULLIE(thebits : TBits_1); inline;
  28990. procedure setRXFULLIF(thebits : TBits_1); inline;
  28991. procedure setRXHALFIE(thebits : TBits_1); inline;
  28992. procedure setRXHALFIF(thebits : TBits_1); inline;
  28993. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28994. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28995. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28996. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28997. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28998. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28999. procedure setTXHALFIE(thebits : TBits_1); inline;
  29000. procedure setTXHALFIF(thebits : TBits_1); inline;
  29001. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29002. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29003. procedure setw(thebits : TBits_32); inline;
  29004. public
  29005. procedure clearRXFULLIE; inline;
  29006. procedure clearRXFULLIF; inline;
  29007. procedure clearRXHALFIE; inline;
  29008. procedure clearRXHALFIF; inline;
  29009. procedure clearRXNEMPTYIE; inline;
  29010. procedure clearRXNEMPTYIF; inline;
  29011. procedure clearRXOVFLIE; inline;
  29012. procedure clearRXOVFLIF; inline;
  29013. procedure clearTXEMPTYIE; inline;
  29014. procedure clearTXEMPTYIF; inline;
  29015. procedure clearTXHALFIE; inline;
  29016. procedure clearTXHALFIF; inline;
  29017. procedure clearTXNFULLIE; inline;
  29018. procedure clearTXNFULLIF; inline;
  29019. procedure setRXFULLIE; inline;
  29020. procedure setRXFULLIF; inline;
  29021. procedure setRXHALFIE; inline;
  29022. procedure setRXHALFIF; inline;
  29023. procedure setRXNEMPTYIE; inline;
  29024. procedure setRXNEMPTYIF; inline;
  29025. procedure setRXOVFLIE; inline;
  29026. procedure setRXOVFLIF; inline;
  29027. procedure setTXEMPTYIE; inline;
  29028. procedure setTXEMPTYIF; inline;
  29029. procedure setTXHALFIE; inline;
  29030. procedure setTXHALFIF; inline;
  29031. procedure setTXNFULLIE; inline;
  29032. procedure setTXNFULLIF; inline;
  29033. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29034. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29035. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29036. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29037. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29038. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29039. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29040. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29041. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29042. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29043. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29044. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29045. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29046. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29047. property w : TBits_32 read getw write setw;
  29048. end;
  29049. TCAN2_C2FIFOCI23 = record
  29050. private
  29051. function getCFIFOCI : TBits_5; inline;
  29052. function getw : TBits_32; inline;
  29053. procedure setCFIFOCI(thebits : TBits_5); inline;
  29054. procedure setw(thebits : TBits_32); inline;
  29055. public
  29056. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29057. property w : TBits_32 read getw write setw;
  29058. end;
  29059. TCAN2_C2FIFOCON24 = record
  29060. private
  29061. function getDONLY : TBits_1; inline;
  29062. function getFRESET : TBits_1; inline;
  29063. function getFSIZE : TBits_5; inline;
  29064. function getRTREN : TBits_1; inline;
  29065. function getTXABAT : TBits_1; inline;
  29066. function getTXEN : TBits_1; inline;
  29067. function getTXERR : TBits_1; inline;
  29068. function getTXLARB : TBits_1; inline;
  29069. function getTXPRI : TBits_2; inline;
  29070. function getTXREQ : TBits_1; inline;
  29071. function getUINC : TBits_1; inline;
  29072. function getw : TBits_32; inline;
  29073. procedure setDONLY(thebits : TBits_1); inline;
  29074. procedure setFRESET(thebits : TBits_1); inline;
  29075. procedure setFSIZE(thebits : TBits_5); inline;
  29076. procedure setRTREN(thebits : TBits_1); inline;
  29077. procedure setTXABAT(thebits : TBits_1); inline;
  29078. procedure setTXEN(thebits : TBits_1); inline;
  29079. procedure setTXERR(thebits : TBits_1); inline;
  29080. procedure setTXLARB(thebits : TBits_1); inline;
  29081. procedure setTXPRI(thebits : TBits_2); inline;
  29082. procedure setTXREQ(thebits : TBits_1); inline;
  29083. procedure setUINC(thebits : TBits_1); inline;
  29084. procedure setw(thebits : TBits_32); inline;
  29085. public
  29086. procedure clearDONLY; inline;
  29087. procedure clearFRESET; inline;
  29088. procedure clearRTREN; inline;
  29089. procedure clearTXABAT; inline;
  29090. procedure clearTXEN; inline;
  29091. procedure clearTXERR; inline;
  29092. procedure clearTXLARB; inline;
  29093. procedure clearTXREQ; inline;
  29094. procedure clearUINC; inline;
  29095. procedure setDONLY; inline;
  29096. procedure setFRESET; inline;
  29097. procedure setRTREN; inline;
  29098. procedure setTXABAT; inline;
  29099. procedure setTXEN; inline;
  29100. procedure setTXERR; inline;
  29101. procedure setTXLARB; inline;
  29102. procedure setTXREQ; inline;
  29103. procedure setUINC; inline;
  29104. property DONLY : TBits_1 read getDONLY write setDONLY;
  29105. property FRESET : TBits_1 read getFRESET write setFRESET;
  29106. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29107. property RTREN : TBits_1 read getRTREN write setRTREN;
  29108. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29109. property TXEN : TBits_1 read getTXEN write setTXEN;
  29110. property TXERR : TBits_1 read getTXERR write setTXERR;
  29111. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29112. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29113. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29114. property UINC : TBits_1 read getUINC write setUINC;
  29115. property w : TBits_32 read getw write setw;
  29116. end;
  29117. TCAN2_C2FIFOINT24 = record
  29118. private
  29119. function getRXFULLIE : TBits_1; inline;
  29120. function getRXFULLIF : TBits_1; inline;
  29121. function getRXHALFIE : TBits_1; inline;
  29122. function getRXHALFIF : TBits_1; inline;
  29123. function getRXNEMPTYIE : TBits_1; inline;
  29124. function getRXNEMPTYIF : TBits_1; inline;
  29125. function getRXOVFLIE : TBits_1; inline;
  29126. function getRXOVFLIF : TBits_1; inline;
  29127. function getTXEMPTYIE : TBits_1; inline;
  29128. function getTXEMPTYIF : TBits_1; inline;
  29129. function getTXHALFIE : TBits_1; inline;
  29130. function getTXHALFIF : TBits_1; inline;
  29131. function getTXNFULLIE : TBits_1; inline;
  29132. function getTXNFULLIF : TBits_1; inline;
  29133. function getw : TBits_32; inline;
  29134. procedure setRXFULLIE(thebits : TBits_1); inline;
  29135. procedure setRXFULLIF(thebits : TBits_1); inline;
  29136. procedure setRXHALFIE(thebits : TBits_1); inline;
  29137. procedure setRXHALFIF(thebits : TBits_1); inline;
  29138. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  29139. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  29140. procedure setRXOVFLIE(thebits : TBits_1); inline;
  29141. procedure setRXOVFLIF(thebits : TBits_1); inline;
  29142. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  29143. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  29144. procedure setTXHALFIE(thebits : TBits_1); inline;
  29145. procedure setTXHALFIF(thebits : TBits_1); inline;
  29146. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29147. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29148. procedure setw(thebits : TBits_32); inline;
  29149. public
  29150. procedure clearRXFULLIE; inline;
  29151. procedure clearRXFULLIF; inline;
  29152. procedure clearRXHALFIE; inline;
  29153. procedure clearRXHALFIF; inline;
  29154. procedure clearRXNEMPTYIE; inline;
  29155. procedure clearRXNEMPTYIF; inline;
  29156. procedure clearRXOVFLIE; inline;
  29157. procedure clearRXOVFLIF; inline;
  29158. procedure clearTXEMPTYIE; inline;
  29159. procedure clearTXEMPTYIF; inline;
  29160. procedure clearTXHALFIE; inline;
  29161. procedure clearTXHALFIF; inline;
  29162. procedure clearTXNFULLIE; inline;
  29163. procedure clearTXNFULLIF; inline;
  29164. procedure setRXFULLIE; inline;
  29165. procedure setRXFULLIF; inline;
  29166. procedure setRXHALFIE; inline;
  29167. procedure setRXHALFIF; inline;
  29168. procedure setRXNEMPTYIE; inline;
  29169. procedure setRXNEMPTYIF; inline;
  29170. procedure setRXOVFLIE; inline;
  29171. procedure setRXOVFLIF; inline;
  29172. procedure setTXEMPTYIE; inline;
  29173. procedure setTXEMPTYIF; inline;
  29174. procedure setTXHALFIE; inline;
  29175. procedure setTXHALFIF; inline;
  29176. procedure setTXNFULLIE; inline;
  29177. procedure setTXNFULLIF; inline;
  29178. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29179. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29180. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29181. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29182. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29183. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29184. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29185. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29186. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29187. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29188. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29189. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29190. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29191. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29192. property w : TBits_32 read getw write setw;
  29193. end;
  29194. TCAN2_C2FIFOCI24 = record
  29195. private
  29196. function getCFIFOCI : TBits_5; inline;
  29197. function getw : TBits_32; inline;
  29198. procedure setCFIFOCI(thebits : TBits_5); inline;
  29199. procedure setw(thebits : TBits_32); inline;
  29200. public
  29201. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29202. property w : TBits_32 read getw write setw;
  29203. end;
  29204. TCAN2_C2FIFOCON25 = record
  29205. private
  29206. function getDONLY : TBits_1; inline;
  29207. function getFRESET : TBits_1; inline;
  29208. function getFSIZE : TBits_5; inline;
  29209. function getRTREN : TBits_1; inline;
  29210. function getTXABAT : TBits_1; inline;
  29211. function getTXEN : TBits_1; inline;
  29212. function getTXERR : TBits_1; inline;
  29213. function getTXLARB : TBits_1; inline;
  29214. function getTXPRI : TBits_2; inline;
  29215. function getTXREQ : TBits_1; inline;
  29216. function getUINC : TBits_1; inline;
  29217. function getw : TBits_32; inline;
  29218. procedure setDONLY(thebits : TBits_1); inline;
  29219. procedure setFRESET(thebits : TBits_1); inline;
  29220. procedure setFSIZE(thebits : TBits_5); inline;
  29221. procedure setRTREN(thebits : TBits_1); inline;
  29222. procedure setTXABAT(thebits : TBits_1); inline;
  29223. procedure setTXEN(thebits : TBits_1); inline;
  29224. procedure setTXERR(thebits : TBits_1); inline;
  29225. procedure setTXLARB(thebits : TBits_1); inline;
  29226. procedure setTXPRI(thebits : TBits_2); inline;
  29227. procedure setTXREQ(thebits : TBits_1); inline;
  29228. procedure setUINC(thebits : TBits_1); inline;
  29229. procedure setw(thebits : TBits_32); inline;
  29230. public
  29231. procedure clearDONLY; inline;
  29232. procedure clearFRESET; inline;
  29233. procedure clearRTREN; inline;
  29234. procedure clearTXABAT; inline;
  29235. procedure clearTXEN; inline;
  29236. procedure clearTXERR; inline;
  29237. procedure clearTXLARB; inline;
  29238. procedure clearTXREQ; inline;
  29239. procedure clearUINC; inline;
  29240. procedure setDONLY; inline;
  29241. procedure setFRESET; inline;
  29242. procedure setRTREN; inline;
  29243. procedure setTXABAT; inline;
  29244. procedure setTXEN; inline;
  29245. procedure setTXERR; inline;
  29246. procedure setTXLARB; inline;
  29247. procedure setTXREQ; inline;
  29248. procedure setUINC; inline;
  29249. property DONLY : TBits_1 read getDONLY write setDONLY;
  29250. property FRESET : TBits_1 read getFRESET write setFRESET;
  29251. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29252. property RTREN : TBits_1 read getRTREN write setRTREN;
  29253. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29254. property TXEN : TBits_1 read getTXEN write setTXEN;
  29255. property TXERR : TBits_1 read getTXERR write setTXERR;
  29256. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29257. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29258. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29259. property UINC : TBits_1 read getUINC write setUINC;
  29260. property w : TBits_32 read getw write setw;
  29261. end;
  29262. TCAN2_C2FIFOINT25 = record
  29263. private
  29264. function getRXFULLIE : TBits_1; inline;
  29265. function getRXFULLIF : TBits_1; inline;
  29266. function getRXHALFIE : TBits_1; inline;
  29267. function getRXHALFIF : TBits_1; inline;
  29268. function getRXNEMPTYIE : TBits_1; inline;
  29269. function getRXNEMPTYIF : TBits_1; inline;
  29270. function getRXOVFLIE : TBits_1; inline;
  29271. function getRXOVFLIF : TBits_1; inline;
  29272. function getTXEMPTYIE : TBits_1; inline;
  29273. function getTXEMPTYIF : TBits_1; inline;
  29274. function getTXHALFIE : TBits_1; inline;
  29275. function getTXHALFIF : TBits_1; inline;
  29276. function getTXNFULLIE : TBits_1; inline;
  29277. function getTXNFULLIF : TBits_1; inline;
  29278. function getw : TBits_32; inline;
  29279. procedure setRXFULLIE(thebits : TBits_1); inline;
  29280. procedure setRXFULLIF(thebits : TBits_1); inline;
  29281. procedure setRXHALFIE(thebits : TBits_1); inline;
  29282. procedure setRXHALFIF(thebits : TBits_1); inline;
  29283. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  29284. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  29285. procedure setRXOVFLIE(thebits : TBits_1); inline;
  29286. procedure setRXOVFLIF(thebits : TBits_1); inline;
  29287. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  29288. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  29289. procedure setTXHALFIE(thebits : TBits_1); inline;
  29290. procedure setTXHALFIF(thebits : TBits_1); inline;
  29291. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29292. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29293. procedure setw(thebits : TBits_32); inline;
  29294. public
  29295. procedure clearRXFULLIE; inline;
  29296. procedure clearRXFULLIF; inline;
  29297. procedure clearRXHALFIE; inline;
  29298. procedure clearRXHALFIF; inline;
  29299. procedure clearRXNEMPTYIE; inline;
  29300. procedure clearRXNEMPTYIF; inline;
  29301. procedure clearRXOVFLIE; inline;
  29302. procedure clearRXOVFLIF; inline;
  29303. procedure clearTXEMPTYIE; inline;
  29304. procedure clearTXEMPTYIF; inline;
  29305. procedure clearTXHALFIE; inline;
  29306. procedure clearTXHALFIF; inline;
  29307. procedure clearTXNFULLIE; inline;
  29308. procedure clearTXNFULLIF; inline;
  29309. procedure setRXFULLIE; inline;
  29310. procedure setRXFULLIF; inline;
  29311. procedure setRXHALFIE; inline;
  29312. procedure setRXHALFIF; inline;
  29313. procedure setRXNEMPTYIE; inline;
  29314. procedure setRXNEMPTYIF; inline;
  29315. procedure setRXOVFLIE; inline;
  29316. procedure setRXOVFLIF; inline;
  29317. procedure setTXEMPTYIE; inline;
  29318. procedure setTXEMPTYIF; inline;
  29319. procedure setTXHALFIE; inline;
  29320. procedure setTXHALFIF; inline;
  29321. procedure setTXNFULLIE; inline;
  29322. procedure setTXNFULLIF; inline;
  29323. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29324. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29325. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29326. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29327. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29328. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29329. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29330. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29331. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29332. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29333. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29334. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29335. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29336. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29337. property w : TBits_32 read getw write setw;
  29338. end;
  29339. TCAN2_C2FIFOCI25 = record
  29340. private
  29341. function getCFIFOCI : TBits_5; inline;
  29342. function getw : TBits_32; inline;
  29343. procedure setCFIFOCI(thebits : TBits_5); inline;
  29344. procedure setw(thebits : TBits_32); inline;
  29345. public
  29346. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29347. property w : TBits_32 read getw write setw;
  29348. end;
  29349. TCAN2_C2FIFOCON26 = record
  29350. private
  29351. function getDONLY : TBits_1; inline;
  29352. function getFRESET : TBits_1; inline;
  29353. function getFSIZE : TBits_5; inline;
  29354. function getRTREN : TBits_1; inline;
  29355. function getTXABAT : TBits_1; inline;
  29356. function getTXEN : TBits_1; inline;
  29357. function getTXERR : TBits_1; inline;
  29358. function getTXLARB : TBits_1; inline;
  29359. function getTXPRI : TBits_2; inline;
  29360. function getTXREQ : TBits_1; inline;
  29361. function getUINC : TBits_1; inline;
  29362. function getw : TBits_32; inline;
  29363. procedure setDONLY(thebits : TBits_1); inline;
  29364. procedure setFRESET(thebits : TBits_1); inline;
  29365. procedure setFSIZE(thebits : TBits_5); inline;
  29366. procedure setRTREN(thebits : TBits_1); inline;
  29367. procedure setTXABAT(thebits : TBits_1); inline;
  29368. procedure setTXEN(thebits : TBits_1); inline;
  29369. procedure setTXERR(thebits : TBits_1); inline;
  29370. procedure setTXLARB(thebits : TBits_1); inline;
  29371. procedure setTXPRI(thebits : TBits_2); inline;
  29372. procedure setTXREQ(thebits : TBits_1); inline;
  29373. procedure setUINC(thebits : TBits_1); inline;
  29374. procedure setw(thebits : TBits_32); inline;
  29375. public
  29376. procedure clearDONLY; inline;
  29377. procedure clearFRESET; inline;
  29378. procedure clearRTREN; inline;
  29379. procedure clearTXABAT; inline;
  29380. procedure clearTXEN; inline;
  29381. procedure clearTXERR; inline;
  29382. procedure clearTXLARB; inline;
  29383. procedure clearTXREQ; inline;
  29384. procedure clearUINC; inline;
  29385. procedure setDONLY; inline;
  29386. procedure setFRESET; inline;
  29387. procedure setRTREN; inline;
  29388. procedure setTXABAT; inline;
  29389. procedure setTXEN; inline;
  29390. procedure setTXERR; inline;
  29391. procedure setTXLARB; inline;
  29392. procedure setTXREQ; inline;
  29393. procedure setUINC; inline;
  29394. property DONLY : TBits_1 read getDONLY write setDONLY;
  29395. property FRESET : TBits_1 read getFRESET write setFRESET;
  29396. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29397. property RTREN : TBits_1 read getRTREN write setRTREN;
  29398. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29399. property TXEN : TBits_1 read getTXEN write setTXEN;
  29400. property TXERR : TBits_1 read getTXERR write setTXERR;
  29401. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29402. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29403. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29404. property UINC : TBits_1 read getUINC write setUINC;
  29405. property w : TBits_32 read getw write setw;
  29406. end;
  29407. TCAN2_C2FIFOINT26 = record
  29408. private
  29409. function getRXFULLIE : TBits_1; inline;
  29410. function getRXFULLIF : TBits_1; inline;
  29411. function getRXHALFIE : TBits_1; inline;
  29412. function getRXHALFIF : TBits_1; inline;
  29413. function getRXNEMPTYIE : TBits_1; inline;
  29414. function getRXNEMPTYIF : TBits_1; inline;
  29415. function getRXOVFLIE : TBits_1; inline;
  29416. function getRXOVFLIF : TBits_1; inline;
  29417. function getTXEMPTYIE : TBits_1; inline;
  29418. function getTXEMPTYIF : TBits_1; inline;
  29419. function getTXHALFIE : TBits_1; inline;
  29420. function getTXHALFIF : TBits_1; inline;
  29421. function getTXNFULLIE : TBits_1; inline;
  29422. function getTXNFULLIF : TBits_1; inline;
  29423. function getw : TBits_32; inline;
  29424. procedure setRXFULLIE(thebits : TBits_1); inline;
  29425. procedure setRXFULLIF(thebits : TBits_1); inline;
  29426. procedure setRXHALFIE(thebits : TBits_1); inline;
  29427. procedure setRXHALFIF(thebits : TBits_1); inline;
  29428. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  29429. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  29430. procedure setRXOVFLIE(thebits : TBits_1); inline;
  29431. procedure setRXOVFLIF(thebits : TBits_1); inline;
  29432. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  29433. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  29434. procedure setTXHALFIE(thebits : TBits_1); inline;
  29435. procedure setTXHALFIF(thebits : TBits_1); inline;
  29436. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29437. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29438. procedure setw(thebits : TBits_32); inline;
  29439. public
  29440. procedure clearRXFULLIE; inline;
  29441. procedure clearRXFULLIF; inline;
  29442. procedure clearRXHALFIE; inline;
  29443. procedure clearRXHALFIF; inline;
  29444. procedure clearRXNEMPTYIE; inline;
  29445. procedure clearRXNEMPTYIF; inline;
  29446. procedure clearRXOVFLIE; inline;
  29447. procedure clearRXOVFLIF; inline;
  29448. procedure clearTXEMPTYIE; inline;
  29449. procedure clearTXEMPTYIF; inline;
  29450. procedure clearTXHALFIE; inline;
  29451. procedure clearTXHALFIF; inline;
  29452. procedure clearTXNFULLIE; inline;
  29453. procedure clearTXNFULLIF; inline;
  29454. procedure setRXFULLIE; inline;
  29455. procedure setRXFULLIF; inline;
  29456. procedure setRXHALFIE; inline;
  29457. procedure setRXHALFIF; inline;
  29458. procedure setRXNEMPTYIE; inline;
  29459. procedure setRXNEMPTYIF; inline;
  29460. procedure setRXOVFLIE; inline;
  29461. procedure setRXOVFLIF; inline;
  29462. procedure setTXEMPTYIE; inline;
  29463. procedure setTXEMPTYIF; inline;
  29464. procedure setTXHALFIE; inline;
  29465. procedure setTXHALFIF; inline;
  29466. procedure setTXNFULLIE; inline;
  29467. procedure setTXNFULLIF; inline;
  29468. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29469. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29470. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29471. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29472. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29473. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29474. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29475. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29476. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29477. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29478. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29479. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29480. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29481. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29482. property w : TBits_32 read getw write setw;
  29483. end;
  29484. TCAN2_C2FIFOCI26 = record
  29485. private
  29486. function getCFIFOCI : TBits_5; inline;
  29487. function getw : TBits_32; inline;
  29488. procedure setCFIFOCI(thebits : TBits_5); inline;
  29489. procedure setw(thebits : TBits_32); inline;
  29490. public
  29491. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29492. property w : TBits_32 read getw write setw;
  29493. end;
  29494. TCAN2_C2FIFOCON27 = record
  29495. private
  29496. function getDONLY : TBits_1; inline;
  29497. function getFRESET : TBits_1; inline;
  29498. function getFSIZE : TBits_5; inline;
  29499. function getRTREN : TBits_1; inline;
  29500. function getTXABAT : TBits_1; inline;
  29501. function getTXEN : TBits_1; inline;
  29502. function getTXERR : TBits_1; inline;
  29503. function getTXLARB : TBits_1; inline;
  29504. function getTXPRI : TBits_2; inline;
  29505. function getTXREQ : TBits_1; inline;
  29506. function getUINC : TBits_1; inline;
  29507. function getw : TBits_32; inline;
  29508. procedure setDONLY(thebits : TBits_1); inline;
  29509. procedure setFRESET(thebits : TBits_1); inline;
  29510. procedure setFSIZE(thebits : TBits_5); inline;
  29511. procedure setRTREN(thebits : TBits_1); inline;
  29512. procedure setTXABAT(thebits : TBits_1); inline;
  29513. procedure setTXEN(thebits : TBits_1); inline;
  29514. procedure setTXERR(thebits : TBits_1); inline;
  29515. procedure setTXLARB(thebits : TBits_1); inline;
  29516. procedure setTXPRI(thebits : TBits_2); inline;
  29517. procedure setTXREQ(thebits : TBits_1); inline;
  29518. procedure setUINC(thebits : TBits_1); inline;
  29519. procedure setw(thebits : TBits_32); inline;
  29520. public
  29521. procedure clearDONLY; inline;
  29522. procedure clearFRESET; inline;
  29523. procedure clearRTREN; inline;
  29524. procedure clearTXABAT; inline;
  29525. procedure clearTXEN; inline;
  29526. procedure clearTXERR; inline;
  29527. procedure clearTXLARB; inline;
  29528. procedure clearTXREQ; inline;
  29529. procedure clearUINC; inline;
  29530. procedure setDONLY; inline;
  29531. procedure setFRESET; inline;
  29532. procedure setRTREN; inline;
  29533. procedure setTXABAT; inline;
  29534. procedure setTXEN; inline;
  29535. procedure setTXERR; inline;
  29536. procedure setTXLARB; inline;
  29537. procedure setTXREQ; inline;
  29538. procedure setUINC; inline;
  29539. property DONLY : TBits_1 read getDONLY write setDONLY;
  29540. property FRESET : TBits_1 read getFRESET write setFRESET;
  29541. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29542. property RTREN : TBits_1 read getRTREN write setRTREN;
  29543. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29544. property TXEN : TBits_1 read getTXEN write setTXEN;
  29545. property TXERR : TBits_1 read getTXERR write setTXERR;
  29546. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29547. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29548. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29549. property UINC : TBits_1 read getUINC write setUINC;
  29550. property w : TBits_32 read getw write setw;
  29551. end;
  29552. TCAN2_C2FIFOINT27 = record
  29553. private
  29554. function getRXFULLIE : TBits_1; inline;
  29555. function getRXFULLIF : TBits_1; inline;
  29556. function getRXHALFIE : TBits_1; inline;
  29557. function getRXHALFIF : TBits_1; inline;
  29558. function getRXNEMPTYIE : TBits_1; inline;
  29559. function getRXNEMPTYIF : TBits_1; inline;
  29560. function getRXOVFLIE : TBits_1; inline;
  29561. function getRXOVFLIF : TBits_1; inline;
  29562. function getTXEMPTYIE : TBits_1; inline;
  29563. function getTXEMPTYIF : TBits_1; inline;
  29564. function getTXHALFIE : TBits_1; inline;
  29565. function getTXHALFIF : TBits_1; inline;
  29566. function getTXNFULLIE : TBits_1; inline;
  29567. function getTXNFULLIF : TBits_1; inline;
  29568. function getw : TBits_32; inline;
  29569. procedure setRXFULLIE(thebits : TBits_1); inline;
  29570. procedure setRXFULLIF(thebits : TBits_1); inline;
  29571. procedure setRXHALFIE(thebits : TBits_1); inline;
  29572. procedure setRXHALFIF(thebits : TBits_1); inline;
  29573. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  29574. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  29575. procedure setRXOVFLIE(thebits : TBits_1); inline;
  29576. procedure setRXOVFLIF(thebits : TBits_1); inline;
  29577. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  29578. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  29579. procedure setTXHALFIE(thebits : TBits_1); inline;
  29580. procedure setTXHALFIF(thebits : TBits_1); inline;
  29581. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29582. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29583. procedure setw(thebits : TBits_32); inline;
  29584. public
  29585. procedure clearRXFULLIE; inline;
  29586. procedure clearRXFULLIF; inline;
  29587. procedure clearRXHALFIE; inline;
  29588. procedure clearRXHALFIF; inline;
  29589. procedure clearRXNEMPTYIE; inline;
  29590. procedure clearRXNEMPTYIF; inline;
  29591. procedure clearRXOVFLIE; inline;
  29592. procedure clearRXOVFLIF; inline;
  29593. procedure clearTXEMPTYIE; inline;
  29594. procedure clearTXEMPTYIF; inline;
  29595. procedure clearTXHALFIE; inline;
  29596. procedure clearTXHALFIF; inline;
  29597. procedure clearTXNFULLIE; inline;
  29598. procedure clearTXNFULLIF; inline;
  29599. procedure setRXFULLIE; inline;
  29600. procedure setRXFULLIF; inline;
  29601. procedure setRXHALFIE; inline;
  29602. procedure setRXHALFIF; inline;
  29603. procedure setRXNEMPTYIE; inline;
  29604. procedure setRXNEMPTYIF; inline;
  29605. procedure setRXOVFLIE; inline;
  29606. procedure setRXOVFLIF; inline;
  29607. procedure setTXEMPTYIE; inline;
  29608. procedure setTXEMPTYIF; inline;
  29609. procedure setTXHALFIE; inline;
  29610. procedure setTXHALFIF; inline;
  29611. procedure setTXNFULLIE; inline;
  29612. procedure setTXNFULLIF; inline;
  29613. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29614. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29615. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29616. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29617. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29618. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29619. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29620. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29621. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29622. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29623. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29624. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29625. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29626. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29627. property w : TBits_32 read getw write setw;
  29628. end;
  29629. TCAN2_C2FIFOCI27 = record
  29630. private
  29631. function getCFIFOCI : TBits_5; inline;
  29632. function getw : TBits_32; inline;
  29633. procedure setCFIFOCI(thebits : TBits_5); inline;
  29634. procedure setw(thebits : TBits_32); inline;
  29635. public
  29636. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29637. property w : TBits_32 read getw write setw;
  29638. end;
  29639. TCAN2_C2FIFOCON28 = record
  29640. private
  29641. function getDONLY : TBits_1; inline;
  29642. function getFRESET : TBits_1; inline;
  29643. function getFSIZE : TBits_5; inline;
  29644. function getRTREN : TBits_1; inline;
  29645. function getTXABAT : TBits_1; inline;
  29646. function getTXEN : TBits_1; inline;
  29647. function getTXERR : TBits_1; inline;
  29648. function getTXLARB : TBits_1; inline;
  29649. function getTXPRI : TBits_2; inline;
  29650. function getTXREQ : TBits_1; inline;
  29651. function getUINC : TBits_1; inline;
  29652. function getw : TBits_32; inline;
  29653. procedure setDONLY(thebits : TBits_1); inline;
  29654. procedure setFRESET(thebits : TBits_1); inline;
  29655. procedure setFSIZE(thebits : TBits_5); inline;
  29656. procedure setRTREN(thebits : TBits_1); inline;
  29657. procedure setTXABAT(thebits : TBits_1); inline;
  29658. procedure setTXEN(thebits : TBits_1); inline;
  29659. procedure setTXERR(thebits : TBits_1); inline;
  29660. procedure setTXLARB(thebits : TBits_1); inline;
  29661. procedure setTXPRI(thebits : TBits_2); inline;
  29662. procedure setTXREQ(thebits : TBits_1); inline;
  29663. procedure setUINC(thebits : TBits_1); inline;
  29664. procedure setw(thebits : TBits_32); inline;
  29665. public
  29666. procedure clearDONLY; inline;
  29667. procedure clearFRESET; inline;
  29668. procedure clearRTREN; inline;
  29669. procedure clearTXABAT; inline;
  29670. procedure clearTXEN; inline;
  29671. procedure clearTXERR; inline;
  29672. procedure clearTXLARB; inline;
  29673. procedure clearTXREQ; inline;
  29674. procedure clearUINC; inline;
  29675. procedure setDONLY; inline;
  29676. procedure setFRESET; inline;
  29677. procedure setRTREN; inline;
  29678. procedure setTXABAT; inline;
  29679. procedure setTXEN; inline;
  29680. procedure setTXERR; inline;
  29681. procedure setTXLARB; inline;
  29682. procedure setTXREQ; inline;
  29683. procedure setUINC; inline;
  29684. property DONLY : TBits_1 read getDONLY write setDONLY;
  29685. property FRESET : TBits_1 read getFRESET write setFRESET;
  29686. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29687. property RTREN : TBits_1 read getRTREN write setRTREN;
  29688. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29689. property TXEN : TBits_1 read getTXEN write setTXEN;
  29690. property TXERR : TBits_1 read getTXERR write setTXERR;
  29691. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29692. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29693. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29694. property UINC : TBits_1 read getUINC write setUINC;
  29695. property w : TBits_32 read getw write setw;
  29696. end;
  29697. TCAN2_C2FIFOINT28 = record
  29698. private
  29699. function getRXFULLIE : TBits_1; inline;
  29700. function getRXFULLIF : TBits_1; inline;
  29701. function getRXHALFIE : TBits_1; inline;
  29702. function getRXHALFIF : TBits_1; inline;
  29703. function getRXNEMPTYIE : TBits_1; inline;
  29704. function getRXNEMPTYIF : TBits_1; inline;
  29705. function getRXOVFLIE : TBits_1; inline;
  29706. function getRXOVFLIF : TBits_1; inline;
  29707. function getTXEMPTYIE : TBits_1; inline;
  29708. function getTXEMPTYIF : TBits_1; inline;
  29709. function getTXHALFIE : TBits_1; inline;
  29710. function getTXHALFIF : TBits_1; inline;
  29711. function getTXNFULLIE : TBits_1; inline;
  29712. function getTXNFULLIF : TBits_1; inline;
  29713. function getw : TBits_32; inline;
  29714. procedure setRXFULLIE(thebits : TBits_1); inline;
  29715. procedure setRXFULLIF(thebits : TBits_1); inline;
  29716. procedure setRXHALFIE(thebits : TBits_1); inline;
  29717. procedure setRXHALFIF(thebits : TBits_1); inline;
  29718. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  29719. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  29720. procedure setRXOVFLIE(thebits : TBits_1); inline;
  29721. procedure setRXOVFLIF(thebits : TBits_1); inline;
  29722. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  29723. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  29724. procedure setTXHALFIE(thebits : TBits_1); inline;
  29725. procedure setTXHALFIF(thebits : TBits_1); inline;
  29726. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29727. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29728. procedure setw(thebits : TBits_32); inline;
  29729. public
  29730. procedure clearRXFULLIE; inline;
  29731. procedure clearRXFULLIF; inline;
  29732. procedure clearRXHALFIE; inline;
  29733. procedure clearRXHALFIF; inline;
  29734. procedure clearRXNEMPTYIE; inline;
  29735. procedure clearRXNEMPTYIF; inline;
  29736. procedure clearRXOVFLIE; inline;
  29737. procedure clearRXOVFLIF; inline;
  29738. procedure clearTXEMPTYIE; inline;
  29739. procedure clearTXEMPTYIF; inline;
  29740. procedure clearTXHALFIE; inline;
  29741. procedure clearTXHALFIF; inline;
  29742. procedure clearTXNFULLIE; inline;
  29743. procedure clearTXNFULLIF; inline;
  29744. procedure setRXFULLIE; inline;
  29745. procedure setRXFULLIF; inline;
  29746. procedure setRXHALFIE; inline;
  29747. procedure setRXHALFIF; inline;
  29748. procedure setRXNEMPTYIE; inline;
  29749. procedure setRXNEMPTYIF; inline;
  29750. procedure setRXOVFLIE; inline;
  29751. procedure setRXOVFLIF; inline;
  29752. procedure setTXEMPTYIE; inline;
  29753. procedure setTXEMPTYIF; inline;
  29754. procedure setTXHALFIE; inline;
  29755. procedure setTXHALFIF; inline;
  29756. procedure setTXNFULLIE; inline;
  29757. procedure setTXNFULLIF; inline;
  29758. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29759. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29760. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29761. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29762. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29763. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29764. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29765. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29766. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29767. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29768. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29769. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29770. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29771. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29772. property w : TBits_32 read getw write setw;
  29773. end;
  29774. TCAN2_C2FIFOCI28 = record
  29775. private
  29776. function getCFIFOCI : TBits_5; inline;
  29777. function getw : TBits_32; inline;
  29778. procedure setCFIFOCI(thebits : TBits_5); inline;
  29779. procedure setw(thebits : TBits_32); inline;
  29780. public
  29781. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29782. property w : TBits_32 read getw write setw;
  29783. end;
  29784. TCAN2_C2FIFOCON29 = record
  29785. private
  29786. function getDONLY : TBits_1; inline;
  29787. function getFRESET : TBits_1; inline;
  29788. function getFSIZE : TBits_5; inline;
  29789. function getRTREN : TBits_1; inline;
  29790. function getTXABAT : TBits_1; inline;
  29791. function getTXEN : TBits_1; inline;
  29792. function getTXERR : TBits_1; inline;
  29793. function getTXLARB : TBits_1; inline;
  29794. function getTXPRI : TBits_2; inline;
  29795. function getTXREQ : TBits_1; inline;
  29796. function getUINC : TBits_1; inline;
  29797. function getw : TBits_32; inline;
  29798. procedure setDONLY(thebits : TBits_1); inline;
  29799. procedure setFRESET(thebits : TBits_1); inline;
  29800. procedure setFSIZE(thebits : TBits_5); inline;
  29801. procedure setRTREN(thebits : TBits_1); inline;
  29802. procedure setTXABAT(thebits : TBits_1); inline;
  29803. procedure setTXEN(thebits : TBits_1); inline;
  29804. procedure setTXERR(thebits : TBits_1); inline;
  29805. procedure setTXLARB(thebits : TBits_1); inline;
  29806. procedure setTXPRI(thebits : TBits_2); inline;
  29807. procedure setTXREQ(thebits : TBits_1); inline;
  29808. procedure setUINC(thebits : TBits_1); inline;
  29809. procedure setw(thebits : TBits_32); inline;
  29810. public
  29811. procedure clearDONLY; inline;
  29812. procedure clearFRESET; inline;
  29813. procedure clearRTREN; inline;
  29814. procedure clearTXABAT; inline;
  29815. procedure clearTXEN; inline;
  29816. procedure clearTXERR; inline;
  29817. procedure clearTXLARB; inline;
  29818. procedure clearTXREQ; inline;
  29819. procedure clearUINC; inline;
  29820. procedure setDONLY; inline;
  29821. procedure setFRESET; inline;
  29822. procedure setRTREN; inline;
  29823. procedure setTXABAT; inline;
  29824. procedure setTXEN; inline;
  29825. procedure setTXERR; inline;
  29826. procedure setTXLARB; inline;
  29827. procedure setTXREQ; inline;
  29828. procedure setUINC; inline;
  29829. property DONLY : TBits_1 read getDONLY write setDONLY;
  29830. property FRESET : TBits_1 read getFRESET write setFRESET;
  29831. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29832. property RTREN : TBits_1 read getRTREN write setRTREN;
  29833. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29834. property TXEN : TBits_1 read getTXEN write setTXEN;
  29835. property TXERR : TBits_1 read getTXERR write setTXERR;
  29836. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29837. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29838. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29839. property UINC : TBits_1 read getUINC write setUINC;
  29840. property w : TBits_32 read getw write setw;
  29841. end;
  29842. TCAN2_C2FIFOINT29 = record
  29843. private
  29844. function getRXFULLIE : TBits_1; inline;
  29845. function getRXFULLIF : TBits_1; inline;
  29846. function getRXHALFIE : TBits_1; inline;
  29847. function getRXHALFIF : TBits_1; inline;
  29848. function getRXNEMPTYIE : TBits_1; inline;
  29849. function getRXNEMPTYIF : TBits_1; inline;
  29850. function getRXOVFLIE : TBits_1; inline;
  29851. function getRXOVFLIF : TBits_1; inline;
  29852. function getTXEMPTYIE : TBits_1; inline;
  29853. function getTXEMPTYIF : TBits_1; inline;
  29854. function getTXHALFIE : TBits_1; inline;
  29855. function getTXHALFIF : TBits_1; inline;
  29856. function getTXNFULLIE : TBits_1; inline;
  29857. function getTXNFULLIF : TBits_1; inline;
  29858. function getw : TBits_32; inline;
  29859. procedure setRXFULLIE(thebits : TBits_1); inline;
  29860. procedure setRXFULLIF(thebits : TBits_1); inline;
  29861. procedure setRXHALFIE(thebits : TBits_1); inline;
  29862. procedure setRXHALFIF(thebits : TBits_1); inline;
  29863. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  29864. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  29865. procedure setRXOVFLIE(thebits : TBits_1); inline;
  29866. procedure setRXOVFLIF(thebits : TBits_1); inline;
  29867. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  29868. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  29869. procedure setTXHALFIE(thebits : TBits_1); inline;
  29870. procedure setTXHALFIF(thebits : TBits_1); inline;
  29871. procedure setTXNFULLIE(thebits : TBits_1); inline;
  29872. procedure setTXNFULLIF(thebits : TBits_1); inline;
  29873. procedure setw(thebits : TBits_32); inline;
  29874. public
  29875. procedure clearRXFULLIE; inline;
  29876. procedure clearRXFULLIF; inline;
  29877. procedure clearRXHALFIE; inline;
  29878. procedure clearRXHALFIF; inline;
  29879. procedure clearRXNEMPTYIE; inline;
  29880. procedure clearRXNEMPTYIF; inline;
  29881. procedure clearRXOVFLIE; inline;
  29882. procedure clearRXOVFLIF; inline;
  29883. procedure clearTXEMPTYIE; inline;
  29884. procedure clearTXEMPTYIF; inline;
  29885. procedure clearTXHALFIE; inline;
  29886. procedure clearTXHALFIF; inline;
  29887. procedure clearTXNFULLIE; inline;
  29888. procedure clearTXNFULLIF; inline;
  29889. procedure setRXFULLIE; inline;
  29890. procedure setRXFULLIF; inline;
  29891. procedure setRXHALFIE; inline;
  29892. procedure setRXHALFIF; inline;
  29893. procedure setRXNEMPTYIE; inline;
  29894. procedure setRXNEMPTYIF; inline;
  29895. procedure setRXOVFLIE; inline;
  29896. procedure setRXOVFLIF; inline;
  29897. procedure setTXEMPTYIE; inline;
  29898. procedure setTXEMPTYIF; inline;
  29899. procedure setTXHALFIE; inline;
  29900. procedure setTXHALFIF; inline;
  29901. procedure setTXNFULLIE; inline;
  29902. procedure setTXNFULLIF; inline;
  29903. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29904. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29905. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29906. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29907. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29908. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29909. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29910. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29911. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29912. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29913. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29914. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29915. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29916. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29917. property w : TBits_32 read getw write setw;
  29918. end;
  29919. TCAN2_C2FIFOCI29 = record
  29920. private
  29921. function getCFIFOCI : TBits_5; inline;
  29922. function getw : TBits_32; inline;
  29923. procedure setCFIFOCI(thebits : TBits_5); inline;
  29924. procedure setw(thebits : TBits_32); inline;
  29925. public
  29926. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29927. property w : TBits_32 read getw write setw;
  29928. end;
  29929. TCAN2_C2FIFOCON30 = record
  29930. private
  29931. function getDONLY : TBits_1; inline;
  29932. function getFRESET : TBits_1; inline;
  29933. function getFSIZE : TBits_5; inline;
  29934. function getRTREN : TBits_1; inline;
  29935. function getTXABAT : TBits_1; inline;
  29936. function getTXEN : TBits_1; inline;
  29937. function getTXERR : TBits_1; inline;
  29938. function getTXLARB : TBits_1; inline;
  29939. function getTXPRI : TBits_2; inline;
  29940. function getTXREQ : TBits_1; inline;
  29941. function getUINC : TBits_1; inline;
  29942. function getw : TBits_32; inline;
  29943. procedure setDONLY(thebits : TBits_1); inline;
  29944. procedure setFRESET(thebits : TBits_1); inline;
  29945. procedure setFSIZE(thebits : TBits_5); inline;
  29946. procedure setRTREN(thebits : TBits_1); inline;
  29947. procedure setTXABAT(thebits : TBits_1); inline;
  29948. procedure setTXEN(thebits : TBits_1); inline;
  29949. procedure setTXERR(thebits : TBits_1); inline;
  29950. procedure setTXLARB(thebits : TBits_1); inline;
  29951. procedure setTXPRI(thebits : TBits_2); inline;
  29952. procedure setTXREQ(thebits : TBits_1); inline;
  29953. procedure setUINC(thebits : TBits_1); inline;
  29954. procedure setw(thebits : TBits_32); inline;
  29955. public
  29956. procedure clearDONLY; inline;
  29957. procedure clearFRESET; inline;
  29958. procedure clearRTREN; inline;
  29959. procedure clearTXABAT; inline;
  29960. procedure clearTXEN; inline;
  29961. procedure clearTXERR; inline;
  29962. procedure clearTXLARB; inline;
  29963. procedure clearTXREQ; inline;
  29964. procedure clearUINC; inline;
  29965. procedure setDONLY; inline;
  29966. procedure setFRESET; inline;
  29967. procedure setRTREN; inline;
  29968. procedure setTXABAT; inline;
  29969. procedure setTXEN; inline;
  29970. procedure setTXERR; inline;
  29971. procedure setTXLARB; inline;
  29972. procedure setTXREQ; inline;
  29973. procedure setUINC; inline;
  29974. property DONLY : TBits_1 read getDONLY write setDONLY;
  29975. property FRESET : TBits_1 read getFRESET write setFRESET;
  29976. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  29977. property RTREN : TBits_1 read getRTREN write setRTREN;
  29978. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  29979. property TXEN : TBits_1 read getTXEN write setTXEN;
  29980. property TXERR : TBits_1 read getTXERR write setTXERR;
  29981. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  29982. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  29983. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  29984. property UINC : TBits_1 read getUINC write setUINC;
  29985. property w : TBits_32 read getw write setw;
  29986. end;
  29987. TCAN2_C2FIFOINT30 = record
  29988. private
  29989. function getRXFULLIE : TBits_1; inline;
  29990. function getRXFULLIF : TBits_1; inline;
  29991. function getRXHALFIE : TBits_1; inline;
  29992. function getRXHALFIF : TBits_1; inline;
  29993. function getRXNEMPTYIE : TBits_1; inline;
  29994. function getRXNEMPTYIF : TBits_1; inline;
  29995. function getRXOVFLIE : TBits_1; inline;
  29996. function getRXOVFLIF : TBits_1; inline;
  29997. function getTXEMPTYIE : TBits_1; inline;
  29998. function getTXEMPTYIF : TBits_1; inline;
  29999. function getTXHALFIE : TBits_1; inline;
  30000. function getTXHALFIF : TBits_1; inline;
  30001. function getTXNFULLIE : TBits_1; inline;
  30002. function getTXNFULLIF : TBits_1; inline;
  30003. function getw : TBits_32; inline;
  30004. procedure setRXFULLIE(thebits : TBits_1); inline;
  30005. procedure setRXFULLIF(thebits : TBits_1); inline;
  30006. procedure setRXHALFIE(thebits : TBits_1); inline;
  30007. procedure setRXHALFIF(thebits : TBits_1); inline;
  30008. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  30009. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  30010. procedure setRXOVFLIE(thebits : TBits_1); inline;
  30011. procedure setRXOVFLIF(thebits : TBits_1); inline;
  30012. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  30013. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  30014. procedure setTXHALFIE(thebits : TBits_1); inline;
  30015. procedure setTXHALFIF(thebits : TBits_1); inline;
  30016. procedure setTXNFULLIE(thebits : TBits_1); inline;
  30017. procedure setTXNFULLIF(thebits : TBits_1); inline;
  30018. procedure setw(thebits : TBits_32); inline;
  30019. public
  30020. procedure clearRXFULLIE; inline;
  30021. procedure clearRXFULLIF; inline;
  30022. procedure clearRXHALFIE; inline;
  30023. procedure clearRXHALFIF; inline;
  30024. procedure clearRXNEMPTYIE; inline;
  30025. procedure clearRXNEMPTYIF; inline;
  30026. procedure clearRXOVFLIE; inline;
  30027. procedure clearRXOVFLIF; inline;
  30028. procedure clearTXEMPTYIE; inline;
  30029. procedure clearTXEMPTYIF; inline;
  30030. procedure clearTXHALFIE; inline;
  30031. procedure clearTXHALFIF; inline;
  30032. procedure clearTXNFULLIE; inline;
  30033. procedure clearTXNFULLIF; inline;
  30034. procedure setRXFULLIE; inline;
  30035. procedure setRXFULLIF; inline;
  30036. procedure setRXHALFIE; inline;
  30037. procedure setRXHALFIF; inline;
  30038. procedure setRXNEMPTYIE; inline;
  30039. procedure setRXNEMPTYIF; inline;
  30040. procedure setRXOVFLIE; inline;
  30041. procedure setRXOVFLIF; inline;
  30042. procedure setTXEMPTYIE; inline;
  30043. procedure setTXEMPTYIF; inline;
  30044. procedure setTXHALFIE; inline;
  30045. procedure setTXHALFIF; inline;
  30046. procedure setTXNFULLIE; inline;
  30047. procedure setTXNFULLIF; inline;
  30048. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  30049. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  30050. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  30051. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  30052. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  30053. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  30054. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  30055. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  30056. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  30057. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  30058. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  30059. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  30060. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  30061. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  30062. property w : TBits_32 read getw write setw;
  30063. end;
  30064. TCAN2_C2FIFOCI30 = record
  30065. private
  30066. function getCFIFOCI : TBits_5; inline;
  30067. function getw : TBits_32; inline;
  30068. procedure setCFIFOCI(thebits : TBits_5); inline;
  30069. procedure setw(thebits : TBits_32); inline;
  30070. public
  30071. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  30072. property w : TBits_32 read getw write setw;
  30073. end;
  30074. TCAN2_C2FIFOCON31 = record
  30075. private
  30076. function getDONLY : TBits_1; inline;
  30077. function getFRESET : TBits_1; inline;
  30078. function getFSIZE : TBits_5; inline;
  30079. function getRTREN : TBits_1; inline;
  30080. function getTXABAT : TBits_1; inline;
  30081. function getTXEN : TBits_1; inline;
  30082. function getTXERR : TBits_1; inline;
  30083. function getTXLARB : TBits_1; inline;
  30084. function getTXPRI : TBits_2; inline;
  30085. function getTXREQ : TBits_1; inline;
  30086. function getUINC : TBits_1; inline;
  30087. function getw : TBits_32; inline;
  30088. procedure setDONLY(thebits : TBits_1); inline;
  30089. procedure setFRESET(thebits : TBits_1); inline;
  30090. procedure setFSIZE(thebits : TBits_5); inline;
  30091. procedure setRTREN(thebits : TBits_1); inline;
  30092. procedure setTXABAT(thebits : TBits_1); inline;
  30093. procedure setTXEN(thebits : TBits_1); inline;
  30094. procedure setTXERR(thebits : TBits_1); inline;
  30095. procedure setTXLARB(thebits : TBits_1); inline;
  30096. procedure setTXPRI(thebits : TBits_2); inline;
  30097. procedure setTXREQ(thebits : TBits_1); inline;
  30098. procedure setUINC(thebits : TBits_1); inline;
  30099. procedure setw(thebits : TBits_32); inline;
  30100. public
  30101. procedure clearDONLY; inline;
  30102. procedure clearFRESET; inline;
  30103. procedure clearRTREN; inline;
  30104. procedure clearTXABAT; inline;
  30105. procedure clearTXEN; inline;
  30106. procedure clearTXERR; inline;
  30107. procedure clearTXLARB; inline;
  30108. procedure clearTXREQ; inline;
  30109. procedure clearUINC; inline;
  30110. procedure setDONLY; inline;
  30111. procedure setFRESET; inline;
  30112. procedure setRTREN; inline;
  30113. procedure setTXABAT; inline;
  30114. procedure setTXEN; inline;
  30115. procedure setTXERR; inline;
  30116. procedure setTXLARB; inline;
  30117. procedure setTXREQ; inline;
  30118. procedure setUINC; inline;
  30119. property DONLY : TBits_1 read getDONLY write setDONLY;
  30120. property FRESET : TBits_1 read getFRESET write setFRESET;
  30121. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  30122. property RTREN : TBits_1 read getRTREN write setRTREN;
  30123. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  30124. property TXEN : TBits_1 read getTXEN write setTXEN;
  30125. property TXERR : TBits_1 read getTXERR write setTXERR;
  30126. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  30127. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  30128. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  30129. property UINC : TBits_1 read getUINC write setUINC;
  30130. property w : TBits_32 read getw write setw;
  30131. end;
  30132. TCAN2_C2FIFOINT31 = record
  30133. private
  30134. function getRXFULLIE : TBits_1; inline;
  30135. function getRXFULLIF : TBits_1; inline;
  30136. function getRXHALFIE : TBits_1; inline;
  30137. function getRXHALFIF : TBits_1; inline;
  30138. function getRXNEMPTYIE : TBits_1; inline;
  30139. function getRXNEMPTYIF : TBits_1; inline;
  30140. function getRXOVFLIE : TBits_1; inline;
  30141. function getRXOVFLIF : TBits_1; inline;
  30142. function getTXEMPTYIE : TBits_1; inline;
  30143. function getTXEMPTYIF : TBits_1; inline;
  30144. function getTXHALFIE : TBits_1; inline;
  30145. function getTXHALFIF : TBits_1; inline;
  30146. function getTXNFULLIE : TBits_1; inline;
  30147. function getTXNFULLIF : TBits_1; inline;
  30148. function getw : TBits_32; inline;
  30149. procedure setRXFULLIE(thebits : TBits_1); inline;
  30150. procedure setRXFULLIF(thebits : TBits_1); inline;
  30151. procedure setRXHALFIE(thebits : TBits_1); inline;
  30152. procedure setRXHALFIF(thebits : TBits_1); inline;
  30153. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  30154. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  30155. procedure setRXOVFLIE(thebits : TBits_1); inline;
  30156. procedure setRXOVFLIF(thebits : TBits_1); inline;
  30157. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  30158. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  30159. procedure setTXHALFIE(thebits : TBits_1); inline;
  30160. procedure setTXHALFIF(thebits : TBits_1); inline;
  30161. procedure setTXNFULLIE(thebits : TBits_1); inline;
  30162. procedure setTXNFULLIF(thebits : TBits_1); inline;
  30163. procedure setw(thebits : TBits_32); inline;
  30164. public
  30165. procedure clearRXFULLIE; inline;
  30166. procedure clearRXFULLIF; inline;
  30167. procedure clearRXHALFIE; inline;
  30168. procedure clearRXHALFIF; inline;
  30169. procedure clearRXNEMPTYIE; inline;
  30170. procedure clearRXNEMPTYIF; inline;
  30171. procedure clearRXOVFLIE; inline;
  30172. procedure clearRXOVFLIF; inline;
  30173. procedure clearTXEMPTYIE; inline;
  30174. procedure clearTXEMPTYIF; inline;
  30175. procedure clearTXHALFIE; inline;
  30176. procedure clearTXHALFIF; inline;
  30177. procedure clearTXNFULLIE; inline;
  30178. procedure clearTXNFULLIF; inline;
  30179. procedure setRXFULLIE; inline;
  30180. procedure setRXFULLIF; inline;
  30181. procedure setRXHALFIE; inline;
  30182. procedure setRXHALFIF; inline;
  30183. procedure setRXNEMPTYIE; inline;
  30184. procedure setRXNEMPTYIF; inline;
  30185. procedure setRXOVFLIE; inline;
  30186. procedure setRXOVFLIF; inline;
  30187. procedure setTXEMPTYIE; inline;
  30188. procedure setTXEMPTYIF; inline;
  30189. procedure setTXHALFIE; inline;
  30190. procedure setTXHALFIF; inline;
  30191. procedure setTXNFULLIE; inline;
  30192. procedure setTXNFULLIF; inline;
  30193. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  30194. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  30195. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  30196. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  30197. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  30198. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  30199. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  30200. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  30201. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  30202. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  30203. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  30204. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  30205. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  30206. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  30207. property w : TBits_32 read getw write setw;
  30208. end;
  30209. TCAN2_C2FIFOCI31 = record
  30210. private
  30211. function getCFIFOCI : TBits_5; inline;
  30212. function getw : TBits_32; inline;
  30213. procedure setCFIFOCI(thebits : TBits_5); inline;
  30214. procedure setw(thebits : TBits_32); inline;
  30215. public
  30216. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  30217. property w : TBits_32 read getw write setw;
  30218. end;
  30219. type
  30220. TCAN2Registers = record
  30221. C2CONbits : TCAN2_C2CON;
  30222. C2CON : longWord;
  30223. C2CONCLR : longWord;
  30224. C2CONSET : longWord;
  30225. C2CONINV : longWord;
  30226. C2CFGbits : TCAN2_C2CFG;
  30227. C2CFG : longWord;
  30228. C2CFGCLR : longWord;
  30229. C2CFGSET : longWord;
  30230. C2CFGINV : longWord;
  30231. C2INTbits : TCAN2_C2INT;
  30232. C2INT : longWord;
  30233. C2INTCLR : longWord;
  30234. C2INTSET : longWord;
  30235. C2INTINV : longWord;
  30236. C2VECbits : TCAN2_C2VEC;
  30237. C2VEC : longWord;
  30238. C2VECCLR : longWord;
  30239. C2VECSET : longWord;
  30240. C2VECINV : longWord;
  30241. C2TRECbits : TCAN2_C2TREC;
  30242. C2TREC : longWord;
  30243. C2TRECCLR : longWord;
  30244. C2TRECSET : longWord;
  30245. C2TRECINV : longWord;
  30246. C2FSTATbits : TCAN2_C2FSTAT;
  30247. C2FSTAT : longWord;
  30248. C2FSTATCLR : longWord;
  30249. C2FSTATSET : longWord;
  30250. C2FSTATINV : longWord;
  30251. C2RXOVFbits : TCAN2_C2RXOVF;
  30252. C2RXOVF : longWord;
  30253. C2RXOVFCLR : longWord;
  30254. C2RXOVFSET : longWord;
  30255. C2RXOVFINV : longWord;
  30256. C2TMRbits : TCAN2_C2TMR;
  30257. C2TMR : longWord;
  30258. C2TMRCLR : longWord;
  30259. C2TMRSET : longWord;
  30260. C2TMRINV : longWord;
  30261. C2RXM0bits : TCAN2_C2RXM0;
  30262. C2RXM0 : longWord;
  30263. C2RXM0CLR : longWord;
  30264. C2RXM0SET : longWord;
  30265. C2RXM0INV : longWord;
  30266. C2RXM1bits : TCAN2_C2RXM1;
  30267. C2RXM1 : longWord;
  30268. C2RXM1CLR : longWord;
  30269. C2RXM1SET : longWord;
  30270. C2RXM1INV : longWord;
  30271. C2RXM2bits : TCAN2_C2RXM2;
  30272. C2RXM2 : longWord;
  30273. C2RXM2CLR : longWord;
  30274. C2RXM2SET : longWord;
  30275. C2RXM2INV : longWord;
  30276. C2RXM3bits : TCAN2_C2RXM3;
  30277. C2RXM3 : longWord;
  30278. C2RXM3CLR : longWord;
  30279. C2RXM3SET : longWord;
  30280. C2RXM3INV : longWord;
  30281. C2FLTCON0bits : TCAN2_C2FLTCON0;
  30282. C2FLTCON0 : longWord;
  30283. C2FLTCON0CLR : longWord;
  30284. C2FLTCON0SET : longWord;
  30285. C2FLTCON0INV : longWord;
  30286. C2FLTCON1bits : TCAN2_C2FLTCON1;
  30287. C2FLTCON1 : longWord;
  30288. C2FLTCON1CLR : longWord;
  30289. C2FLTCON1SET : longWord;
  30290. C2FLTCON1INV : longWord;
  30291. C2FLTCON2bits : TCAN2_C2FLTCON2;
  30292. C2FLTCON2 : longWord;
  30293. C2FLTCON2CLR : longWord;
  30294. C2FLTCON2SET : longWord;
  30295. C2FLTCON2INV : longWord;
  30296. C2FLTCON3bits : TCAN2_C2FLTCON3;
  30297. C2FLTCON3 : longWord;
  30298. C2FLTCON3CLR : longWord;
  30299. C2FLTCON3SET : longWord;
  30300. C2FLTCON3INV : longWord;
  30301. C2FLTCON4bits : TCAN2_C2FLTCON4;
  30302. C2FLTCON4 : longWord;
  30303. C2FLTCON4CLR : longWord;
  30304. C2FLTCON4SET : longWord;
  30305. C2FLTCON4INV : longWord;
  30306. C2FLTCON5bits : TCAN2_C2FLTCON5;
  30307. C2FLTCON5 : longWord;
  30308. C2FLTCON5CLR : longWord;
  30309. C2FLTCON5SET : longWord;
  30310. C2FLTCON5INV : longWord;
  30311. C2FLTCON6bits : TCAN2_C2FLTCON6;
  30312. C2FLTCON6 : longWord;
  30313. C2FLTCON6CLR : longWord;
  30314. C2FLTCON6SET : longWord;
  30315. C2FLTCON6INV : longWord;
  30316. C2FLTCON7bits : TCAN2_C2FLTCON7;
  30317. C2FLTCON7 : longWord;
  30318. C2FLTCON7CLR : longWord;
  30319. C2FLTCON7SET : longWord;
  30320. C2FLTCON7INV : longWord;
  30321. C2RXF0bits : TCAN2_C2RXF0;
  30322. C2RXF0 : longWord;
  30323. C2RXF0CLR : longWord;
  30324. C2RXF0SET : longWord;
  30325. C2RXF0INV : longWord;
  30326. C2RXF1bits : TCAN2_C2RXF1;
  30327. C2RXF1 : longWord;
  30328. C2RXF1CLR : longWord;
  30329. C2RXF1SET : longWord;
  30330. C2RXF1INV : longWord;
  30331. C2RXF2bits : TCAN2_C2RXF2;
  30332. C2RXF2 : longWord;
  30333. C2RXF2CLR : longWord;
  30334. C2RXF2SET : longWord;
  30335. C2RXF2INV : longWord;
  30336. C2RXF3bits : TCAN2_C2RXF3;
  30337. C2RXF3 : longWord;
  30338. C2RXF3CLR : longWord;
  30339. C2RXF3SET : longWord;
  30340. C2RXF3INV : longWord;
  30341. C2RXF4bits : TCAN2_C2RXF4;
  30342. C2RXF4 : longWord;
  30343. C2RXF4CLR : longWord;
  30344. C2RXF4SET : longWord;
  30345. C2RXF4INV : longWord;
  30346. C2RXF5bits : TCAN2_C2RXF5;
  30347. C2RXF5 : longWord;
  30348. C2RXF5CLR : longWord;
  30349. C2RXF5SET : longWord;
  30350. C2RXF5INV : longWord;
  30351. C2RXF6bits : TCAN2_C2RXF6;
  30352. C2RXF6 : longWord;
  30353. C2RXF6CLR : longWord;
  30354. C2RXF6SET : longWord;
  30355. C2RXF6INV : longWord;
  30356. C2RXF7bits : TCAN2_C2RXF7;
  30357. C2RXF7 : longWord;
  30358. C2RXF7CLR : longWord;
  30359. C2RXF7SET : longWord;
  30360. C2RXF7INV : longWord;
  30361. C2RXF8bits : TCAN2_C2RXF8;
  30362. C2RXF8 : longWord;
  30363. C2RXF8CLR : longWord;
  30364. C2RXF8SET : longWord;
  30365. C2RXF8INV : longWord;
  30366. C2RXF9bits : TCAN2_C2RXF9;
  30367. C2RXF9 : longWord;
  30368. C2RXF9CLR : longWord;
  30369. C2RXF9SET : longWord;
  30370. C2RXF9INV : longWord;
  30371. C2RXF10bits : TCAN2_C2RXF10;
  30372. C2RXF10 : longWord;
  30373. C2RXF10CLR : longWord;
  30374. C2RXF10SET : longWord;
  30375. C2RXF10INV : longWord;
  30376. C2RXF11bits : TCAN2_C2RXF11;
  30377. C2RXF11 : longWord;
  30378. C2RXF11CLR : longWord;
  30379. C2RXF11SET : longWord;
  30380. C2RXF11INV : longWord;
  30381. C2RXF12bits : TCAN2_C2RXF12;
  30382. C2RXF12 : longWord;
  30383. C2RXF12CLR : longWord;
  30384. C2RXF12SET : longWord;
  30385. C2RXF12INV : longWord;
  30386. C2RXF13bits : TCAN2_C2RXF13;
  30387. C2RXF13 : longWord;
  30388. C2RXF13CLR : longWord;
  30389. C2RXF13SET : longWord;
  30390. C2RXF13INV : longWord;
  30391. C2RXF14bits : TCAN2_C2RXF14;
  30392. C2RXF14 : longWord;
  30393. C2RXF14CLR : longWord;
  30394. C2RXF14SET : longWord;
  30395. C2RXF14INV : longWord;
  30396. C2RXF15bits : TCAN2_C2RXF15;
  30397. C2RXF15 : longWord;
  30398. C2RXF15CLR : longWord;
  30399. C2RXF15SET : longWord;
  30400. C2RXF15INV : longWord;
  30401. C2RXF16bits : TCAN2_C2RXF16;
  30402. C2RXF16 : longWord;
  30403. C2RXF16CLR : longWord;
  30404. C2RXF16SET : longWord;
  30405. C2RXF16INV : longWord;
  30406. C2RXF17bits : TCAN2_C2RXF17;
  30407. C2RXF17 : longWord;
  30408. C2RXF17CLR : longWord;
  30409. C2RXF17SET : longWord;
  30410. C2RXF17INV : longWord;
  30411. C2RXF18bits : TCAN2_C2RXF18;
  30412. C2RXF18 : longWord;
  30413. C2RXF18CLR : longWord;
  30414. C2RXF18SET : longWord;
  30415. C2RXF18INV : longWord;
  30416. C2RXF19bits : TCAN2_C2RXF19;
  30417. C2RXF19 : longWord;
  30418. C2RXF19CLR : longWord;
  30419. C2RXF19SET : longWord;
  30420. C2RXF19INV : longWord;
  30421. C2RXF20bits : TCAN2_C2RXF20;
  30422. C2RXF20 : longWord;
  30423. C2RXF20CLR : longWord;
  30424. C2RXF20SET : longWord;
  30425. C2RXF20INV : longWord;
  30426. C2RXF21bits : TCAN2_C2RXF21;
  30427. C2RXF21 : longWord;
  30428. C2RXF21CLR : longWord;
  30429. C2RXF21SET : longWord;
  30430. C2RXF21INV : longWord;
  30431. C2RXF22bits : TCAN2_C2RXF22;
  30432. C2RXF22 : longWord;
  30433. C2RXF22CLR : longWord;
  30434. C2RXF22SET : longWord;
  30435. C2RXF22INV : longWord;
  30436. C2RXF23bits : TCAN2_C2RXF23;
  30437. C2RXF23 : longWord;
  30438. C2RXF23CLR : longWord;
  30439. C2RXF23SET : longWord;
  30440. C2RXF23INV : longWord;
  30441. C2RXF24bits : TCAN2_C2RXF24;
  30442. C2RXF24 : longWord;
  30443. C2RXF24CLR : longWord;
  30444. C2RXF24SET : longWord;
  30445. C2RXF24INV : longWord;
  30446. C2RXF25bits : TCAN2_C2RXF25;
  30447. C2RXF25 : longWord;
  30448. C2RXF25CLR : longWord;
  30449. C2RXF25SET : longWord;
  30450. C2RXF25INV : longWord;
  30451. C2RXF26bits : TCAN2_C2RXF26;
  30452. C2RXF26 : longWord;
  30453. C2RXF26CLR : longWord;
  30454. C2RXF26SET : longWord;
  30455. C2RXF26INV : longWord;
  30456. C2RXF27bits : TCAN2_C2RXF27;
  30457. C2RXF27 : longWord;
  30458. C2RXF27CLR : longWord;
  30459. C2RXF27SET : longWord;
  30460. C2RXF27INV : longWord;
  30461. C2RXF28bits : TCAN2_C2RXF28;
  30462. C2RXF28 : longWord;
  30463. C2RXF28CLR : longWord;
  30464. C2RXF28SET : longWord;
  30465. C2RXF28INV : longWord;
  30466. C2RXF29bits : TCAN2_C2RXF29;
  30467. C2RXF29 : longWord;
  30468. C2RXF29CLR : longWord;
  30469. C2RXF29SET : longWord;
  30470. C2RXF29INV : longWord;
  30471. C2RXF30bits : TCAN2_C2RXF30;
  30472. C2RXF30 : longWord;
  30473. C2RXF30CLR : longWord;
  30474. C2RXF30SET : longWord;
  30475. C2RXF30INV : longWord;
  30476. C2RXF31bits : TCAN2_C2RXF31;
  30477. C2RXF31 : longWord;
  30478. C2RXF31CLR : longWord;
  30479. C2RXF31SET : longWord;
  30480. C2RXF31INV : longWord;
  30481. C2FIFOBA : longWord;
  30482. C2FIFOBACLR : longWord;
  30483. C2FIFOBASET : longWord;
  30484. C2FIFOBAINV : longWord;
  30485. C2FIFOCON0bits : TCAN2_C2FIFOCON0;
  30486. C2FIFOCON0 : longWord;
  30487. C2FIFOCON0CLR : longWord;
  30488. C2FIFOCON0SET : longWord;
  30489. C2FIFOCON0INV : longWord;
  30490. C2FIFOINT0bits : TCAN2_C2FIFOINT0;
  30491. C2FIFOINT0 : longWord;
  30492. C2FIFOINT0CLR : longWord;
  30493. C2FIFOINT0SET : longWord;
  30494. C2FIFOINT0INV : longWord;
  30495. C2FIFOUA0 : longWord;
  30496. C2FIFOUA0CLR : longWord;
  30497. C2FIFOUA0SET : longWord;
  30498. C2FIFOUA0INV : longWord;
  30499. C2FIFOCI0bits : TCAN2_C2FIFOCI0;
  30500. C2FIFOCI0 : longWord;
  30501. C2FIFOCI0CLR : longWord;
  30502. C2FIFOCI0SET : longWord;
  30503. C2FIFOCI0INV : longWord;
  30504. C2FIFOCON1bits : TCAN2_C2FIFOCON1;
  30505. C2FIFOCON1 : longWord;
  30506. C2FIFOCON1CLR : longWord;
  30507. C2FIFOCON1SET : longWord;
  30508. C2FIFOCON1INV : longWord;
  30509. C2FIFOINT1bits : TCAN2_C2FIFOINT1;
  30510. C2FIFOINT1 : longWord;
  30511. C2FIFOINT1CLR : longWord;
  30512. C2FIFOINT1SET : longWord;
  30513. C2FIFOINT1INV : longWord;
  30514. C2FIFOUA1 : longWord;
  30515. C2FIFOUA1CLR : longWord;
  30516. C2FIFOUA1SET : longWord;
  30517. C2FIFOUA1INV : longWord;
  30518. C2FIFOCI1bits : TCAN2_C2FIFOCI1;
  30519. C2FIFOCI1 : longWord;
  30520. C2FIFOCI1CLR : longWord;
  30521. C2FIFOCI1SET : longWord;
  30522. C2FIFOCI1INV : longWord;
  30523. C2FIFOCON2bits : TCAN2_C2FIFOCON2;
  30524. C2FIFOCON2 : longWord;
  30525. C2FIFOCON2CLR : longWord;
  30526. C2FIFOCON2SET : longWord;
  30527. C2FIFOCON2INV : longWord;
  30528. C2FIFOINT2bits : TCAN2_C2FIFOINT2;
  30529. C2FIFOINT2 : longWord;
  30530. C2FIFOINT2CLR : longWord;
  30531. C2FIFOINT2SET : longWord;
  30532. C2FIFOINT2INV : longWord;
  30533. C2FIFOUA2 : longWord;
  30534. C2FIFOUA2CLR : longWord;
  30535. C2FIFOUA2SET : longWord;
  30536. C2FIFOUA2INV : longWord;
  30537. C2FIFOCI2bits : TCAN2_C2FIFOCI2;
  30538. C2FIFOCI2 : longWord;
  30539. C2FIFOCI2CLR : longWord;
  30540. C2FIFOCI2SET : longWord;
  30541. C2FIFOCI2INV : longWord;
  30542. C2FIFOCON3bits : TCAN2_C2FIFOCON3;
  30543. C2FIFOCON3 : longWord;
  30544. C2FIFOCON3CLR : longWord;
  30545. C2FIFOCON3SET : longWord;
  30546. C2FIFOCON3INV : longWord;
  30547. C2FIFOINT3bits : TCAN2_C2FIFOINT3;
  30548. C2FIFOINT3 : longWord;
  30549. C2FIFOINT3CLR : longWord;
  30550. C2FIFOINT3SET : longWord;
  30551. C2FIFOINT3INV : longWord;
  30552. C2FIFOUA3 : longWord;
  30553. C2FIFOUA3CLR : longWord;
  30554. C2FIFOUA3SET : longWord;
  30555. C2FIFOUA3INV : longWord;
  30556. C2FIFOCI3bits : TCAN2_C2FIFOCI3;
  30557. C2FIFOCI3 : longWord;
  30558. C2FIFOCI3CLR : longWord;
  30559. C2FIFOCI3SET : longWord;
  30560. C2FIFOCI3INV : longWord;
  30561. C2FIFOCON4bits : TCAN2_C2FIFOCON4;
  30562. C2FIFOCON4 : longWord;
  30563. C2FIFOCON4CLR : longWord;
  30564. C2FIFOCON4SET : longWord;
  30565. C2FIFOCON4INV : longWord;
  30566. C2FIFOINT4bits : TCAN2_C2FIFOINT4;
  30567. C2FIFOINT4 : longWord;
  30568. C2FIFOINT4CLR : longWord;
  30569. C2FIFOINT4SET : longWord;
  30570. C2FIFOINT4INV : longWord;
  30571. C2FIFOUA4 : longWord;
  30572. C2FIFOUA4CLR : longWord;
  30573. C2FIFOUA4SET : longWord;
  30574. C2FIFOUA4INV : longWord;
  30575. C2FIFOCI4bits : TCAN2_C2FIFOCI4;
  30576. C2FIFOCI4 : longWord;
  30577. C2FIFOCI4CLR : longWord;
  30578. C2FIFOCI4SET : longWord;
  30579. C2FIFOCI4INV : longWord;
  30580. C2FIFOCON5bits : TCAN2_C2FIFOCON5;
  30581. C2FIFOCON5 : longWord;
  30582. C2FIFOCON5CLR : longWord;
  30583. C2FIFOCON5SET : longWord;
  30584. C2FIFOCON5INV : longWord;
  30585. C2FIFOINT5bits : TCAN2_C2FIFOINT5;
  30586. C2FIFOINT5 : longWord;
  30587. C2FIFOINT5CLR : longWord;
  30588. C2FIFOINT5SET : longWord;
  30589. C2FIFOINT5INV : longWord;
  30590. C2FIFOUA5 : longWord;
  30591. C2FIFOUA5CLR : longWord;
  30592. C2FIFOUA5SET : longWord;
  30593. C2FIFOUA5INV : longWord;
  30594. C2FIFOCI5bits : TCAN2_C2FIFOCI5;
  30595. C2FIFOCI5 : longWord;
  30596. C2FIFOCI5CLR : longWord;
  30597. C2FIFOCI5SET : longWord;
  30598. C2FIFOCI5INV : longWord;
  30599. C2FIFOCON6bits : TCAN2_C2FIFOCON6;
  30600. C2FIFOCON6 : longWord;
  30601. C2FIFOCON6CLR : longWord;
  30602. C2FIFOCON6SET : longWord;
  30603. C2FIFOCON6INV : longWord;
  30604. C2FIFOINT6bits : TCAN2_C2FIFOINT6;
  30605. C2FIFOINT6 : longWord;
  30606. C2FIFOINT6CLR : longWord;
  30607. C2FIFOINT6SET : longWord;
  30608. C2FIFOINT6INV : longWord;
  30609. C2FIFOUA6 : longWord;
  30610. C2FIFOUA6CLR : longWord;
  30611. C2FIFOUA6SET : longWord;
  30612. C2FIFOUA6INV : longWord;
  30613. C2FIFOCI6bits : TCAN2_C2FIFOCI6;
  30614. C2FIFOCI6 : longWord;
  30615. C2FIFOCI6CLR : longWord;
  30616. C2FIFOCI6SET : longWord;
  30617. C2FIFOCI6INV : longWord;
  30618. C2FIFOCON7bits : TCAN2_C2FIFOCON7;
  30619. C2FIFOCON7 : longWord;
  30620. C2FIFOCON7CLR : longWord;
  30621. C2FIFOCON7SET : longWord;
  30622. C2FIFOCON7INV : longWord;
  30623. C2FIFOINT7bits : TCAN2_C2FIFOINT7;
  30624. C2FIFOINT7 : longWord;
  30625. C2FIFOINT7CLR : longWord;
  30626. C2FIFOINT7SET : longWord;
  30627. C2FIFOINT7INV : longWord;
  30628. C2FIFOUA7 : longWord;
  30629. C2FIFOUA7CLR : longWord;
  30630. C2FIFOUA7SET : longWord;
  30631. C2FIFOUA7INV : longWord;
  30632. C2FIFOCI7bits : TCAN2_C2FIFOCI7;
  30633. C2FIFOCI7 : longWord;
  30634. C2FIFOCI7CLR : longWord;
  30635. C2FIFOCI7SET : longWord;
  30636. C2FIFOCI7INV : longWord;
  30637. C2FIFOCON8bits : TCAN2_C2FIFOCON8;
  30638. C2FIFOCON8 : longWord;
  30639. C2FIFOCON8CLR : longWord;
  30640. C2FIFOCON8SET : longWord;
  30641. C2FIFOCON8INV : longWord;
  30642. C2FIFOINT8bits : TCAN2_C2FIFOINT8;
  30643. C2FIFOINT8 : longWord;
  30644. C2FIFOINT8CLR : longWord;
  30645. C2FIFOINT8SET : longWord;
  30646. C2FIFOINT8INV : longWord;
  30647. C2FIFOUA8 : longWord;
  30648. C2FIFOUA8CLR : longWord;
  30649. C2FIFOUA8SET : longWord;
  30650. C2FIFOUA8INV : longWord;
  30651. C2FIFOCI8bits : TCAN2_C2FIFOCI8;
  30652. C2FIFOCI8 : longWord;
  30653. C2FIFOCI8CLR : longWord;
  30654. C2FIFOCI8SET : longWord;
  30655. C2FIFOCI8INV : longWord;
  30656. C2FIFOCON9bits : TCAN2_C2FIFOCON9;
  30657. C2FIFOCON9 : longWord;
  30658. C2FIFOCON9CLR : longWord;
  30659. C2FIFOCON9SET : longWord;
  30660. C2FIFOCON9INV : longWord;
  30661. C2FIFOINT9bits : TCAN2_C2FIFOINT9;
  30662. C2FIFOINT9 : longWord;
  30663. C2FIFOINT9CLR : longWord;
  30664. C2FIFOINT9SET : longWord;
  30665. C2FIFOINT9INV : longWord;
  30666. C2FIFOUA9 : longWord;
  30667. C2FIFOUA9CLR : longWord;
  30668. C2FIFOUA9SET : longWord;
  30669. C2FIFOUA9INV : longWord;
  30670. C2FIFOCI9bits : TCAN2_C2FIFOCI9;
  30671. C2FIFOCI9 : longWord;
  30672. C2FIFOCI9CLR : longWord;
  30673. C2FIFOCI9SET : longWord;
  30674. C2FIFOCI9INV : longWord;
  30675. C2FIFOCON10bits : TCAN2_C2FIFOCON10;
  30676. C2FIFOCON10 : longWord;
  30677. C2FIFOCON10CLR : longWord;
  30678. C2FIFOCON10SET : longWord;
  30679. C2FIFOCON10INV : longWord;
  30680. C2FIFOINT10bits : TCAN2_C2FIFOINT10;
  30681. C2FIFOINT10 : longWord;
  30682. C2FIFOINT10CLR : longWord;
  30683. C2FIFOINT10SET : longWord;
  30684. C2FIFOINT10INV : longWord;
  30685. C2FIFOUA10 : longWord;
  30686. C2FIFOUA10CLR : longWord;
  30687. C2FIFOUA10SET : longWord;
  30688. C2FIFOUA10INV : longWord;
  30689. C2FIFOCI10bits : TCAN2_C2FIFOCI10;
  30690. C2FIFOCI10 : longWord;
  30691. C2FIFOCI10CLR : longWord;
  30692. C2FIFOCI10SET : longWord;
  30693. C2FIFOCI10INV : longWord;
  30694. C2FIFOCON11bits : TCAN2_C2FIFOCON11;
  30695. C2FIFOCON11 : longWord;
  30696. C2FIFOCON11CLR : longWord;
  30697. C2FIFOCON11SET : longWord;
  30698. C2FIFOCON11INV : longWord;
  30699. C2FIFOINT11bits : TCAN2_C2FIFOINT11;
  30700. C2FIFOINT11 : longWord;
  30701. C2FIFOINT11CLR : longWord;
  30702. C2FIFOINT11SET : longWord;
  30703. C2FIFOINT11INV : longWord;
  30704. C2FIFOUA11 : longWord;
  30705. C2FIFOUA11CLR : longWord;
  30706. C2FIFOUA11SET : longWord;
  30707. C2FIFOUA11INV : longWord;
  30708. C2FIFOCI11bits : TCAN2_C2FIFOCI11;
  30709. C2FIFOCI11 : longWord;
  30710. C2FIFOCI11CLR : longWord;
  30711. C2FIFOCI11SET : longWord;
  30712. C2FIFOCI11INV : longWord;
  30713. C2FIFOCON12bits : TCAN2_C2FIFOCON12;
  30714. C2FIFOCON12 : longWord;
  30715. C2FIFOCON12CLR : longWord;
  30716. C2FIFOCON12SET : longWord;
  30717. C2FIFOCON12INV : longWord;
  30718. C2FIFOINT12bits : TCAN2_C2FIFOINT12;
  30719. C2FIFOINT12 : longWord;
  30720. C2FIFOINT12CLR : longWord;
  30721. C2FIFOINT12SET : longWord;
  30722. C2FIFOINT12INV : longWord;
  30723. C2FIFOUA12 : longWord;
  30724. C2FIFOUA12CLR : longWord;
  30725. C2FIFOUA12SET : longWord;
  30726. C2FIFOUA12INV : longWord;
  30727. C2FIFOCI12bits : TCAN2_C2FIFOCI12;
  30728. C2FIFOCI12 : longWord;
  30729. C2FIFOCI12CLR : longWord;
  30730. C2FIFOCI12SET : longWord;
  30731. C2FIFOCI12INV : longWord;
  30732. C2FIFOCON13bits : TCAN2_C2FIFOCON13;
  30733. C2FIFOCON13 : longWord;
  30734. C2FIFOCON13CLR : longWord;
  30735. C2FIFOCON13SET : longWord;
  30736. C2FIFOCON13INV : longWord;
  30737. C2FIFOINT13bits : TCAN2_C2FIFOINT13;
  30738. C2FIFOINT13 : longWord;
  30739. C2FIFOINT13CLR : longWord;
  30740. C2FIFOINT13SET : longWord;
  30741. C2FIFOINT13INV : longWord;
  30742. C2FIFOUA13 : longWord;
  30743. C2FIFOUA13CLR : longWord;
  30744. C2FIFOUA13SET : longWord;
  30745. C2FIFOUA13INV : longWord;
  30746. C2FIFOCI13bits : TCAN2_C2FIFOCI13;
  30747. C2FIFOCI13 : longWord;
  30748. C2FIFOCI13CLR : longWord;
  30749. C2FIFOCI13SET : longWord;
  30750. C2FIFOCI13INV : longWord;
  30751. C2FIFOCON14bits : TCAN2_C2FIFOCON14;
  30752. C2FIFOCON14 : longWord;
  30753. C2FIFOCON14CLR : longWord;
  30754. C2FIFOCON14SET : longWord;
  30755. C2FIFOCON14INV : longWord;
  30756. C2FIFOINT14bits : TCAN2_C2FIFOINT14;
  30757. C2FIFOINT14 : longWord;
  30758. C2FIFOINT14CLR : longWord;
  30759. C2FIFOINT14SET : longWord;
  30760. C2FIFOINT14INV : longWord;
  30761. C2FIFOUA14 : longWord;
  30762. C2FIFOUA14CLR : longWord;
  30763. C2FIFOUA14SET : longWord;
  30764. C2FIFOUA14INV : longWord;
  30765. C2FIFOCI14bits : TCAN2_C2FIFOCI14;
  30766. C2FIFOCI14 : longWord;
  30767. C2FIFOCI14CLR : longWord;
  30768. C2FIFOCI14SET : longWord;
  30769. C2FIFOCI14INV : longWord;
  30770. C2FIFOCON15bits : TCAN2_C2FIFOCON15;
  30771. C2FIFOCON15 : longWord;
  30772. C2FIFOCON15CLR : longWord;
  30773. C2FIFOCON15SET : longWord;
  30774. C2FIFOCON15INV : longWord;
  30775. C2FIFOINT15bits : TCAN2_C2FIFOINT15;
  30776. C2FIFOINT15 : longWord;
  30777. C2FIFOINT15CLR : longWord;
  30778. C2FIFOINT15SET : longWord;
  30779. C2FIFOINT15INV : longWord;
  30780. C2FIFOUA15 : longWord;
  30781. C2FIFOUA15CLR : longWord;
  30782. C2FIFOUA15SET : longWord;
  30783. C2FIFOUA15INV : longWord;
  30784. C2FIFOCI15bits : TCAN2_C2FIFOCI15;
  30785. C2FIFOCI15 : longWord;
  30786. C2FIFOCI15CLR : longWord;
  30787. C2FIFOCI15SET : longWord;
  30788. C2FIFOCI15INV : longWord;
  30789. C2FIFOCON16bits : TCAN2_C2FIFOCON16;
  30790. C2FIFOCON16 : longWord;
  30791. C2FIFOCON16CLR : longWord;
  30792. C2FIFOCON16SET : longWord;
  30793. C2FIFOCON16INV : longWord;
  30794. C2FIFOINT16bits : TCAN2_C2FIFOINT16;
  30795. C2FIFOINT16 : longWord;
  30796. C2FIFOINT16CLR : longWord;
  30797. C2FIFOINT16SET : longWord;
  30798. C2FIFOINT16INV : longWord;
  30799. C2FIFOUA16 : longWord;
  30800. C2FIFOUA16CLR : longWord;
  30801. C2FIFOUA16SET : longWord;
  30802. C2FIFOUA16INV : longWord;
  30803. C2FIFOCI16bits : TCAN2_C2FIFOCI16;
  30804. C2FIFOCI16 : longWord;
  30805. C2FIFOCI16CLR : longWord;
  30806. C2FIFOCI16SET : longWord;
  30807. C2FIFOCI16INV : longWord;
  30808. C2FIFOCON17bits : TCAN2_C2FIFOCON17;
  30809. C2FIFOCON17 : longWord;
  30810. C2FIFOCON17CLR : longWord;
  30811. C2FIFOCON17SET : longWord;
  30812. C2FIFOCON17INV : longWord;
  30813. C2FIFOINT17bits : TCAN2_C2FIFOINT17;
  30814. C2FIFOINT17 : longWord;
  30815. C2FIFOINT17CLR : longWord;
  30816. C2FIFOINT17SET : longWord;
  30817. C2FIFOINT17INV : longWord;
  30818. C2FIFOUA17 : longWord;
  30819. C2FIFOUA17CLR : longWord;
  30820. C2FIFOUA17SET : longWord;
  30821. C2FIFOUA17INV : longWord;
  30822. C2FIFOCI17bits : TCAN2_C2FIFOCI17;
  30823. C2FIFOCI17 : longWord;
  30824. C2FIFOCI17CLR : longWord;
  30825. C2FIFOCI17SET : longWord;
  30826. C2FIFOCI17INV : longWord;
  30827. C2FIFOCON18bits : TCAN2_C2FIFOCON18;
  30828. C2FIFOCON18 : longWord;
  30829. C2FIFOCON18CLR : longWord;
  30830. C2FIFOCON18SET : longWord;
  30831. C2FIFOCON18INV : longWord;
  30832. C2FIFOINT18bits : TCAN2_C2FIFOINT18;
  30833. C2FIFOINT18 : longWord;
  30834. C2FIFOINT18CLR : longWord;
  30835. C2FIFOINT18SET : longWord;
  30836. C2FIFOINT18INV : longWord;
  30837. C2FIFOUA18 : longWord;
  30838. C2FIFOUA18CLR : longWord;
  30839. C2FIFOUA18SET : longWord;
  30840. C2FIFOUA18INV : longWord;
  30841. C2FIFOCI18bits : TCAN2_C2FIFOCI18;
  30842. C2FIFOCI18 : longWord;
  30843. C2FIFOCI18CLR : longWord;
  30844. C2FIFOCI18SET : longWord;
  30845. C2FIFOCI18INV : longWord;
  30846. C2FIFOCON19bits : TCAN2_C2FIFOCON19;
  30847. C2FIFOCON19 : longWord;
  30848. C2FIFOCON19CLR : longWord;
  30849. C2FIFOCON19SET : longWord;
  30850. C2FIFOCON19INV : longWord;
  30851. C2FIFOINT19bits : TCAN2_C2FIFOINT19;
  30852. C2FIFOINT19 : longWord;
  30853. C2FIFOINT19CLR : longWord;
  30854. C2FIFOINT19SET : longWord;
  30855. C2FIFOINT19INV : longWord;
  30856. C2FIFOUA19 : longWord;
  30857. C2FIFOUA19CLR : longWord;
  30858. C2FIFOUA19SET : longWord;
  30859. C2FIFOUA19INV : longWord;
  30860. C2FIFOCI19bits : TCAN2_C2FIFOCI19;
  30861. C2FIFOCI19 : longWord;
  30862. C2FIFOCI19CLR : longWord;
  30863. C2FIFOCI19SET : longWord;
  30864. C2FIFOCI19INV : longWord;
  30865. C2FIFOCON20bits : TCAN2_C2FIFOCON20;
  30866. C2FIFOCON20 : longWord;
  30867. C2FIFOCON20CLR : longWord;
  30868. C2FIFOCON20SET : longWord;
  30869. C2FIFOCON20INV : longWord;
  30870. C2FIFOINT20bits : TCAN2_C2FIFOINT20;
  30871. C2FIFOINT20 : longWord;
  30872. C2FIFOINT20CLR : longWord;
  30873. C2FIFOINT20SET : longWord;
  30874. C2FIFOINT20INV : longWord;
  30875. C2FIFOUA20 : longWord;
  30876. C2FIFOUA20CLR : longWord;
  30877. C2FIFOUA20SET : longWord;
  30878. C2FIFOUA20INV : longWord;
  30879. C2FIFOCI20bits : TCAN2_C2FIFOCI20;
  30880. C2FIFOCI20 : longWord;
  30881. C2FIFOCI20CLR : longWord;
  30882. C2FIFOCI20SET : longWord;
  30883. C2FIFOCI20INV : longWord;
  30884. C2FIFOCON21bits : TCAN2_C2FIFOCON21;
  30885. C2FIFOCON21 : longWord;
  30886. C2FIFOCON21CLR : longWord;
  30887. C2FIFOCON21SET : longWord;
  30888. C2FIFOCON21INV : longWord;
  30889. C2FIFOINT21bits : TCAN2_C2FIFOINT21;
  30890. C2FIFOINT21 : longWord;
  30891. C2FIFOINT21CLR : longWord;
  30892. C2FIFOINT21SET : longWord;
  30893. C2FIFOINT21INV : longWord;
  30894. C2FIFOUA21 : longWord;
  30895. C2FIFOUA21CLR : longWord;
  30896. C2FIFOUA21SET : longWord;
  30897. C2FIFOUA21INV : longWord;
  30898. C2FIFOCI21bits : TCAN2_C2FIFOCI21;
  30899. C2FIFOCI21 : longWord;
  30900. C2FIFOCI21CLR : longWord;
  30901. C2FIFOCI21SET : longWord;
  30902. C2FIFOCI21INV : longWord;
  30903. C2FIFOCON22bits : TCAN2_C2FIFOCON22;
  30904. C2FIFOCON22 : longWord;
  30905. C2FIFOCON22CLR : longWord;
  30906. C2FIFOCON22SET : longWord;
  30907. C2FIFOCON22INV : longWord;
  30908. C2FIFOINT22bits : TCAN2_C2FIFOINT22;
  30909. C2FIFOINT22 : longWord;
  30910. C2FIFOINT22CLR : longWord;
  30911. C2FIFOINT22SET : longWord;
  30912. C2FIFOINT22INV : longWord;
  30913. C2FIFOUA22 : longWord;
  30914. C2FIFOUA22CLR : longWord;
  30915. C2FIFOUA22SET : longWord;
  30916. C2FIFOUA22INV : longWord;
  30917. C2FIFOCI22bits : TCAN2_C2FIFOCI22;
  30918. C2FIFOCI22 : longWord;
  30919. C2FIFOCI22CLR : longWord;
  30920. C2FIFOCI22SET : longWord;
  30921. C2FIFOCI22INV : longWord;
  30922. C2FIFOCON23bits : TCAN2_C2FIFOCON23;
  30923. C2FIFOCON23 : longWord;
  30924. C2FIFOCON23CLR : longWord;
  30925. C2FIFOCON23SET : longWord;
  30926. C2FIFOCON23INV : longWord;
  30927. C2FIFOINT23bits : TCAN2_C2FIFOINT23;
  30928. C2FIFOINT23 : longWord;
  30929. C2FIFOINT23CLR : longWord;
  30930. C2FIFOINT23SET : longWord;
  30931. C2FIFOINT23INV : longWord;
  30932. C2FIFOUA23 : longWord;
  30933. C2FIFOUA23CLR : longWord;
  30934. C2FIFOUA23SET : longWord;
  30935. C2FIFOUA23INV : longWord;
  30936. C2FIFOCI23bits : TCAN2_C2FIFOCI23;
  30937. C2FIFOCI23 : longWord;
  30938. C2FIFOCI23CLR : longWord;
  30939. C2FIFOCI23SET : longWord;
  30940. C2FIFOCI23INV : longWord;
  30941. C2FIFOCON24bits : TCAN2_C2FIFOCON24;
  30942. C2FIFOCON24 : longWord;
  30943. C2FIFOCON24CLR : longWord;
  30944. C2FIFOCON24SET : longWord;
  30945. C2FIFOCON24INV : longWord;
  30946. C2FIFOINT24bits : TCAN2_C2FIFOINT24;
  30947. C2FIFOINT24 : longWord;
  30948. C2FIFOINT24CLR : longWord;
  30949. C2FIFOINT24SET : longWord;
  30950. C2FIFOINT24INV : longWord;
  30951. C2FIFOUA24 : longWord;
  30952. C2FIFOUA24CLR : longWord;
  30953. C2FIFOUA24SET : longWord;
  30954. C2FIFOUA24INV : longWord;
  30955. C2FIFOCI24bits : TCAN2_C2FIFOCI24;
  30956. C2FIFOCI24 : longWord;
  30957. C2FIFOCI24CLR : longWord;
  30958. C2FIFOCI24SET : longWord;
  30959. C2FIFOCI24INV : longWord;
  30960. C2FIFOCON25bits : TCAN2_C2FIFOCON25;
  30961. C2FIFOCON25 : longWord;
  30962. C2FIFOCON25CLR : longWord;
  30963. C2FIFOCON25SET : longWord;
  30964. C2FIFOCON25INV : longWord;
  30965. C2FIFOINT25bits : TCAN2_C2FIFOINT25;
  30966. C2FIFOINT25 : longWord;
  30967. C2FIFOINT25CLR : longWord;
  30968. C2FIFOINT25SET : longWord;
  30969. C2FIFOINT25INV : longWord;
  30970. C2FIFOUA25 : longWord;
  30971. C2FIFOUA25CLR : longWord;
  30972. C2FIFOUA25SET : longWord;
  30973. C2FIFOUA25INV : longWord;
  30974. C2FIFOCI25bits : TCAN2_C2FIFOCI25;
  30975. C2FIFOCI25 : longWord;
  30976. C2FIFOCI25CLR : longWord;
  30977. C2FIFOCI25SET : longWord;
  30978. C2FIFOCI25INV : longWord;
  30979. C2FIFOCON26bits : TCAN2_C2FIFOCON26;
  30980. C2FIFOCON26 : longWord;
  30981. C2FIFOCON26CLR : longWord;
  30982. C2FIFOCON26SET : longWord;
  30983. C2FIFOCON26INV : longWord;
  30984. C2FIFOINT26bits : TCAN2_C2FIFOINT26;
  30985. C2FIFOINT26 : longWord;
  30986. C2FIFOINT26CLR : longWord;
  30987. C2FIFOINT26SET : longWord;
  30988. C2FIFOINT26INV : longWord;
  30989. C2FIFOUA26 : longWord;
  30990. C2FIFOUA26CLR : longWord;
  30991. C2FIFOUA26SET : longWord;
  30992. C2FIFOUA26INV : longWord;
  30993. C2FIFOCI26bits : TCAN2_C2FIFOCI26;
  30994. C2FIFOCI26 : longWord;
  30995. C2FIFOCI26CLR : longWord;
  30996. C2FIFOCI26SET : longWord;
  30997. C2FIFOCI26INV : longWord;
  30998. C2FIFOCON27bits : TCAN2_C2FIFOCON27;
  30999. C2FIFOCON27 : longWord;
  31000. C2FIFOCON27CLR : longWord;
  31001. C2FIFOCON27SET : longWord;
  31002. C2FIFOCON27INV : longWord;
  31003. C2FIFOINT27bits : TCAN2_C2FIFOINT27;
  31004. C2FIFOINT27 : longWord;
  31005. C2FIFOINT27CLR : longWord;
  31006. C2FIFOINT27SET : longWord;
  31007. C2FIFOINT27INV : longWord;
  31008. C2FIFOUA27 : longWord;
  31009. C2FIFOUA27CLR : longWord;
  31010. C2FIFOUA27SET : longWord;
  31011. C2FIFOUA27INV : longWord;
  31012. C2FIFOCI27bits : TCAN2_C2FIFOCI27;
  31013. C2FIFOCI27 : longWord;
  31014. C2FIFOCI27CLR : longWord;
  31015. C2FIFOCI27SET : longWord;
  31016. C2FIFOCI27INV : longWord;
  31017. C2FIFOCON28bits : TCAN2_C2FIFOCON28;
  31018. C2FIFOCON28 : longWord;
  31019. C2FIFOCON28CLR : longWord;
  31020. C2FIFOCON28SET : longWord;
  31021. C2FIFOCON28INV : longWord;
  31022. C2FIFOINT28bits : TCAN2_C2FIFOINT28;
  31023. C2FIFOINT28 : longWord;
  31024. C2FIFOINT28CLR : longWord;
  31025. C2FIFOINT28SET : longWord;
  31026. C2FIFOINT28INV : longWord;
  31027. C2FIFOUA28 : longWord;
  31028. C2FIFOUA28CLR : longWord;
  31029. C2FIFOUA28SET : longWord;
  31030. C2FIFOUA28INV : longWord;
  31031. C2FIFOCI28bits : TCAN2_C2FIFOCI28;
  31032. C2FIFOCI28 : longWord;
  31033. C2FIFOCI28CLR : longWord;
  31034. C2FIFOCI28SET : longWord;
  31035. C2FIFOCI28INV : longWord;
  31036. C2FIFOCON29bits : TCAN2_C2FIFOCON29;
  31037. C2FIFOCON29 : longWord;
  31038. C2FIFOCON29CLR : longWord;
  31039. C2FIFOCON29SET : longWord;
  31040. C2FIFOCON29INV : longWord;
  31041. C2FIFOINT29bits : TCAN2_C2FIFOINT29;
  31042. C2FIFOINT29 : longWord;
  31043. C2FIFOINT29CLR : longWord;
  31044. C2FIFOINT29SET : longWord;
  31045. C2FIFOINT29INV : longWord;
  31046. C2FIFOUA29 : longWord;
  31047. C2FIFOUA29CLR : longWord;
  31048. C2FIFOUA29SET : longWord;
  31049. C2FIFOUA29INV : longWord;
  31050. C2FIFOCI29bits : TCAN2_C2FIFOCI29;
  31051. C2FIFOCI29 : longWord;
  31052. C2FIFOCI29CLR : longWord;
  31053. C2FIFOCI29SET : longWord;
  31054. C2FIFOCI29INV : longWord;
  31055. C2FIFOCON30bits : TCAN2_C2FIFOCON30;
  31056. C2FIFOCON30 : longWord;
  31057. C2FIFOCON30CLR : longWord;
  31058. C2FIFOCON30SET : longWord;
  31059. C2FIFOCON30INV : longWord;
  31060. C2FIFOINT30bits : TCAN2_C2FIFOINT30;
  31061. C2FIFOINT30 : longWord;
  31062. C2FIFOINT30CLR : longWord;
  31063. C2FIFOINT30SET : longWord;
  31064. C2FIFOINT30INV : longWord;
  31065. C2FIFOUA30 : longWord;
  31066. C2FIFOUA30CLR : longWord;
  31067. C2FIFOUA30SET : longWord;
  31068. C2FIFOUA30INV : longWord;
  31069. C2FIFOCI30bits : TCAN2_C2FIFOCI30;
  31070. C2FIFOCI30 : longWord;
  31071. C2FIFOCI30CLR : longWord;
  31072. C2FIFOCI30SET : longWord;
  31073. C2FIFOCI30INV : longWord;
  31074. C2FIFOCON31bits : TCAN2_C2FIFOCON31;
  31075. C2FIFOCON31 : longWord;
  31076. C2FIFOCON31CLR : longWord;
  31077. C2FIFOCON31SET : longWord;
  31078. C2FIFOCON31INV : longWord;
  31079. C2FIFOINT31bits : TCAN2_C2FIFOINT31;
  31080. C2FIFOINT31 : longWord;
  31081. C2FIFOINT31CLR : longWord;
  31082. C2FIFOINT31SET : longWord;
  31083. C2FIFOINT31INV : longWord;
  31084. C2FIFOUA31 : longWord;
  31085. C2FIFOUA31CLR : longWord;
  31086. C2FIFOUA31SET : longWord;
  31087. C2FIFOUA31INV : longWord;
  31088. C2FIFOCI31bits : TCAN2_C2FIFOCI31;
  31089. C2FIFOCI31 : longWord;
  31090. C2FIFOCI31CLR : longWord;
  31091. C2FIFOCI31SET : longWord;
  31092. C2FIFOCI31INV : longWord;
  31093. end;
  31094. TDEVCFG_DEVCFG3 = record
  31095. private
  31096. function getFCANIO : TBits_1; inline;
  31097. function getFETHIO : TBits_1; inline;
  31098. function getFMIIEN : TBits_1; inline;
  31099. function getFSRSSEL : TBits_3; inline;
  31100. function getFUSBIDIO : TBits_1; inline;
  31101. function getFVBUSONIO : TBits_1; inline;
  31102. function getUSERID : TBits_16; inline;
  31103. function getw : TBits_32; inline;
  31104. procedure setFCANIO(thebits : TBits_1); inline;
  31105. procedure setFETHIO(thebits : TBits_1); inline;
  31106. procedure setFMIIEN(thebits : TBits_1); inline;
  31107. procedure setFSRSSEL(thebits : TBits_3); inline;
  31108. procedure setFUSBIDIO(thebits : TBits_1); inline;
  31109. procedure setFVBUSONIO(thebits : TBits_1); inline;
  31110. procedure setUSERID(thebits : TBits_16); inline;
  31111. procedure setw(thebits : TBits_32); inline;
  31112. public
  31113. procedure clearFCANIO; inline;
  31114. procedure clearFETHIO; inline;
  31115. procedure clearFMIIEN; inline;
  31116. procedure clearFUSBIDIO; inline;
  31117. procedure clearFVBUSONIO; inline;
  31118. procedure setFCANIO; inline;
  31119. procedure setFETHIO; inline;
  31120. procedure setFMIIEN; inline;
  31121. procedure setFUSBIDIO; inline;
  31122. procedure setFVBUSONIO; inline;
  31123. property FCANIO : TBits_1 read getFCANIO write setFCANIO;
  31124. property FETHIO : TBits_1 read getFETHIO write setFETHIO;
  31125. property FMIIEN : TBits_1 read getFMIIEN write setFMIIEN;
  31126. property FSRSSEL : TBits_3 read getFSRSSEL write setFSRSSEL;
  31127. property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
  31128. property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
  31129. property USERID : TBits_16 read getUSERID write setUSERID;
  31130. property w : TBits_32 read getw write setw;
  31131. end;
  31132. TDEVCFG_DEVCFG2 = record
  31133. private
  31134. function getFPLLIDIV : TBits_3; inline;
  31135. function getFPLLMUL : TBits_3; inline;
  31136. function getFPLLODIV : TBits_3; inline;
  31137. function getUPLLEN : TBits_1; inline;
  31138. function getUPLLIDIV : TBits_3; inline;
  31139. function getw : TBits_32; inline;
  31140. procedure setFPLLIDIV(thebits : TBits_3); inline;
  31141. procedure setFPLLMUL(thebits : TBits_3); inline;
  31142. procedure setFPLLODIV(thebits : TBits_3); inline;
  31143. procedure setUPLLEN(thebits : TBits_1); inline;
  31144. procedure setUPLLIDIV(thebits : TBits_3); inline;
  31145. procedure setw(thebits : TBits_32); inline;
  31146. public
  31147. procedure clearUPLLEN; inline;
  31148. procedure setUPLLEN; inline;
  31149. property FPLLIDIV : TBits_3 read getFPLLIDIV write setFPLLIDIV;
  31150. property FPLLMUL : TBits_3 read getFPLLMUL write setFPLLMUL;
  31151. property FPLLODIV : TBits_3 read getFPLLODIV write setFPLLODIV;
  31152. property UPLLEN : TBits_1 read getUPLLEN write setUPLLEN;
  31153. property UPLLIDIV : TBits_3 read getUPLLIDIV write setUPLLIDIV;
  31154. property w : TBits_32 read getw write setw;
  31155. end;
  31156. TDEVCFG_DEVCFG1 = record
  31157. private
  31158. function getFCKSM : TBits_2; inline;
  31159. function getFNOSC : TBits_3; inline;
  31160. function getFPBDIV : TBits_2; inline;
  31161. function getFSOSCEN : TBits_1; inline;
  31162. function getFWDTEN : TBits_1; inline;
  31163. function getIESO : TBits_1; inline;
  31164. function getOSCIOFNC : TBits_1; inline;
  31165. function getPOSCMOD : TBits_2; inline;
  31166. function getWDTPS : TBits_5; inline;
  31167. function getw : TBits_32; inline;
  31168. procedure setFCKSM(thebits : TBits_2); inline;
  31169. procedure setFNOSC(thebits : TBits_3); inline;
  31170. procedure setFPBDIV(thebits : TBits_2); inline;
  31171. procedure setFSOSCEN(thebits : TBits_1); inline;
  31172. procedure setFWDTEN(thebits : TBits_1); inline;
  31173. procedure setIESO(thebits : TBits_1); inline;
  31174. procedure setOSCIOFNC(thebits : TBits_1); inline;
  31175. procedure setPOSCMOD(thebits : TBits_2); inline;
  31176. procedure setWDTPS(thebits : TBits_5); inline;
  31177. procedure setw(thebits : TBits_32); inline;
  31178. public
  31179. procedure clearFSOSCEN; inline;
  31180. procedure clearFWDTEN; inline;
  31181. procedure clearIESO; inline;
  31182. procedure clearOSCIOFNC; inline;
  31183. procedure setFSOSCEN; inline;
  31184. procedure setFWDTEN; inline;
  31185. procedure setIESO; inline;
  31186. procedure setOSCIOFNC; inline;
  31187. property FCKSM : TBits_2 read getFCKSM write setFCKSM;
  31188. property FNOSC : TBits_3 read getFNOSC write setFNOSC;
  31189. property FPBDIV : TBits_2 read getFPBDIV write setFPBDIV;
  31190. property FSOSCEN : TBits_1 read getFSOSCEN write setFSOSCEN;
  31191. property FWDTEN : TBits_1 read getFWDTEN write setFWDTEN;
  31192. property IESO : TBits_1 read getIESO write setIESO;
  31193. property OSCIOFNC : TBits_1 read getOSCIOFNC write setOSCIOFNC;
  31194. property POSCMOD : TBits_2 read getPOSCMOD write setPOSCMOD;
  31195. property WDTPS : TBits_5 read getWDTPS write setWDTPS;
  31196. property w : TBits_32 read getw write setw;
  31197. end;
  31198. TDEVCFG_DEVCFG0 = record
  31199. private
  31200. function getBWP : TBits_1; inline;
  31201. function getCP : TBits_1; inline;
  31202. function getDEBUG : TBits_2; inline;
  31203. function getFDEBUG : TBits_2; inline;
  31204. function getICESEL : TBits_1; inline;
  31205. function getPWP : TBits_8; inline;
  31206. function getw : TBits_32; inline;
  31207. procedure setBWP(thebits : TBits_1); inline;
  31208. procedure setCP(thebits : TBits_1); inline;
  31209. procedure setDEBUG(thebits : TBits_2); inline;
  31210. procedure setFDEBUG(thebits : TBits_2); inline;
  31211. procedure setICESEL(thebits : TBits_1); inline;
  31212. procedure setPWP(thebits : TBits_8); inline;
  31213. procedure setw(thebits : TBits_32); inline;
  31214. public
  31215. procedure clearBWP; inline;
  31216. procedure clearCP; inline;
  31217. procedure clearICESEL; inline;
  31218. procedure setBWP; inline;
  31219. procedure setCP; inline;
  31220. procedure setICESEL; inline;
  31221. property BWP : TBits_1 read getBWP write setBWP;
  31222. property CP : TBits_1 read getCP write setCP;
  31223. property DEBUG : TBits_2 read getDEBUG write setDEBUG;
  31224. property FDEBUG : TBits_2 read getFDEBUG write setFDEBUG;
  31225. property ICESEL : TBits_1 read getICESEL write setICESEL;
  31226. property PWP : TBits_8 read getPWP write setPWP;
  31227. property w : TBits_32 read getw write setw;
  31228. end;
  31229. const
  31230. _CORE_TIMER_IRQ = 0;
  31231. _CORE_SOFTWARE_0_IRQ = 1;
  31232. _CORE_SOFTWARE_1_IRQ = 2;
  31233. _EXTERNAL_0_IRQ = 3;
  31234. _TIMER_1_IRQ = 4;
  31235. _INPUT_CAPTURE_1_IRQ = 5;
  31236. _OUTPUT_COMPARE_1_IRQ = 6;
  31237. _EXTERNAL_1_IRQ = 7;
  31238. _TIMER_2_IRQ = 8;
  31239. _INPUT_CAPTURE_2_IRQ = 9;
  31240. _OUTPUT_COMPARE_2_IRQ = 10;
  31241. _EXTERNAL_2_IRQ = 11;
  31242. _TIMER_3_IRQ = 12;
  31243. _INPUT_CAPTURE_3_IRQ = 13;
  31244. _OUTPUT_COMPARE_3_IRQ = 14;
  31245. _EXTERNAL_3_IRQ = 15;
  31246. _TIMER_4_IRQ = 16;
  31247. _INPUT_CAPTURE_4_IRQ = 17;
  31248. _OUTPUT_COMPARE_4_IRQ = 18;
  31249. _EXTERNAL_4_IRQ = 19;
  31250. _TIMER_5_IRQ = 20;
  31251. _INPUT_CAPTURE_5_IRQ = 21;
  31252. _OUTPUT_COMPARE_5_IRQ = 22;
  31253. _SPI1_ERR_IRQ = 23;
  31254. _SPI1_RX_IRQ = 24;
  31255. _SPI1_TX_IRQ = 25;
  31256. _I2C1A_ERR_IRQ = 26;
  31257. _I2C3_BUS_IRQ = 26;
  31258. _SPI1A_ERR_IRQ = 26;
  31259. _SPI3_ERR_IRQ = 26;
  31260. _UART1A_ERR_IRQ = 26;
  31261. _UART1_ERR_IRQ = 26;
  31262. _I2C1A_RX_IRQ = 27;
  31263. _I2C3_SLAVE_IRQ = 27;
  31264. _SPI1A_RX_IRQ = 27;
  31265. _SPI3_RX_IRQ = 27;
  31266. _UART1A_RX_IRQ = 27;
  31267. _UART1_RX_IRQ = 27;
  31268. _I2C1A_TX_IRQ = 28;
  31269. _I2C3_MASTER_IRQ = 28;
  31270. _SPI1A_TX_IRQ = 28;
  31271. _SPI3_TX_IRQ = 28;
  31272. _UART1A_TX_IRQ = 28;
  31273. _UART1_TX_IRQ = 28;
  31274. _I2C1_BUS_IRQ = 29;
  31275. _I2C1_SLAVE_IRQ = 30;
  31276. _I2C1_MASTER_IRQ = 31;
  31277. _CHANGE_NOTICE_IRQ = 32;
  31278. _ADC_IRQ = 33;
  31279. _PMP_IRQ = 34;
  31280. _COMPARATOR_1_IRQ = 35;
  31281. _COMPARATOR_2_IRQ = 36;
  31282. _I2C2A_ERR_IRQ = 37;
  31283. _I2C4_BUS_IRQ = 37;
  31284. _SPI2_ERR_IRQ = 37;
  31285. _SPI2A_ERR_IRQ = 37;
  31286. _UART2A_ERR_IRQ = 37;
  31287. _UART3_ERR_IRQ = 37;
  31288. _I2C2A_RX_IRQ = 38;
  31289. _I2C4_SLAVE_IRQ = 38;
  31290. _SPI2_RX_IRQ = 38;
  31291. _SPI2A_RX_IRQ = 38;
  31292. _UART2A_RX_IRQ = 38;
  31293. _UART3_RX_IRQ = 38;
  31294. _I2C2A_TX_IRQ = 39;
  31295. _I2C4_MASTER_IRQ = 39;
  31296. _SPI2A_TX_IRQ = 39;
  31297. _SPI2_TX_IRQ = 39;
  31298. _UART2A_TX_IRQ = 39;
  31299. _UART3_TX_IRQ = 39;
  31300. _I2C3A_ERR_IRQ = 40;
  31301. _I2C5_BUS_IRQ = 40;
  31302. _SPI3A_ERR_IRQ = 40;
  31303. _SPI4_ERR_IRQ = 40;
  31304. _UART2_ERR_IRQ = 40;
  31305. _UART3A_ERR_IRQ = 40;
  31306. _I2C3A_RX_IRQ = 41;
  31307. _I2C5_SLAVE_IRQ = 41;
  31308. _SPI3A_RX_IRQ = 41;
  31309. _SPI4_RX_IRQ = 41;
  31310. _UART2_RX_IRQ = 41;
  31311. _UART3A_RX_IRQ = 41;
  31312. _I2C3A_TX_IRQ = 42;
  31313. _I2C5_MASTER_IRQ = 42;
  31314. _SPI3A_TX_IRQ = 42;
  31315. _SPI4_TX_IRQ = 42;
  31316. _UART2_TX_IRQ = 42;
  31317. _UART3A_TX_IRQ = 42;
  31318. _I2C2_BUS_IRQ = 43;
  31319. _I2C2_SLAVE_IRQ = 44;
  31320. _I2C2_MASTER_IRQ = 45;
  31321. _FAIL_SAFE_MONITOR_IRQ = 46;
  31322. _RTCC_IRQ = 47;
  31323. _DMA0_IRQ = 48;
  31324. _DMA1_IRQ = 49;
  31325. _DMA2_IRQ = 50;
  31326. _DMA3_IRQ = 51;
  31327. _DMA4_IRQ = 52;
  31328. _DMA5_IRQ = 53;
  31329. _DMA6_IRQ = 54;
  31330. _DMA7_IRQ = 55;
  31331. _FLASH_CONTROL_IRQ = 56;
  31332. _USB_IRQ = 57;
  31333. _CAN1_IRQ = 58;
  31334. _CAN2_IRQ = 59;
  31335. _ETHERNET_IRQ = 60;
  31336. _INPUT_CAPTURE_ERROR_1_IRQ = 61;
  31337. _INPUT_CAPTURE_ERROR_2_IRQ = 62;
  31338. _INPUT_CAPTURE_ERROR_3_IRQ = 63;
  31339. _INPUT_CAPTURE_ERROR_4_IRQ = 64;
  31340. _INPUT_CAPTURE_ERROR_5_IRQ = 65;
  31341. _PMP_ERROR_IRQ = 66;
  31342. _UART1B_ERR_IRQ = 67;
  31343. _UART4_ERR_IRQ = 67;
  31344. _UART1B_RX_IRQ = 68;
  31345. _UART4_RX_IRQ = 68;
  31346. _UART1B_TX_IRQ = 69;
  31347. _UART4_TX_IRQ = 69;
  31348. _UART2B_ERR_IRQ = 70;
  31349. _UART6_ERR_IRQ = 70;
  31350. _UART2B_RX_IRQ = 71;
  31351. _UART6_RX_IRQ = 71;
  31352. _UART2B_TX_IRQ = 72;
  31353. _UART6_TX_IRQ = 72;
  31354. _UART3B_ERR_IRQ = 73;
  31355. _UART5_ERR_IRQ = 73;
  31356. _UART3B_RX_IRQ = 74;
  31357. _UART5_RX_IRQ = 74;
  31358. _UART3B_TX_IRQ = 75;
  31359. _UART5_TX_IRQ = 75;
  31360. const
  31361. ADC10_BASE_ADDRESS = $BF809000;
  31362. var
  31363. ADC10 : TADC10Registers absolute ADC10_BASE_ADDRESS;
  31364. const
  31365. BMX_BASE_ADDRESS = $BF882000;
  31366. var
  31367. BMX : TBMXRegisters absolute BMX_BASE_ADDRESS;
  31368. const
  31369. CAN1_BASE_ADDRESS = $BF88B000;
  31370. var
  31371. CAN1 : TCAN1Registers absolute CAN1_BASE_ADDRESS;
  31372. const
  31373. CAN2_BASE_ADDRESS = $BF88C000;
  31374. var
  31375. CAN2 : TCAN2Registers absolute CAN2_BASE_ADDRESS;
  31376. const
  31377. CFG_BASE_ADDRESS = $BF80F200;
  31378. var
  31379. CFG : TCFGRegisters absolute CFG_BASE_ADDRESS;
  31380. const
  31381. CMP_BASE_ADDRESS = $BF80A000;
  31382. var
  31383. CMP : TCMPRegisters absolute CMP_BASE_ADDRESS;
  31384. const
  31385. CVR_BASE_ADDRESS = $BF809800;
  31386. var
  31387. CVR : TCVRRegisters absolute CVR_BASE_ADDRESS;
  31388. const
  31389. DMAC_BASE_ADDRESS = $BF883000;
  31390. var
  31391. DMAC : TDMACRegisters absolute DMAC_BASE_ADDRESS;
  31392. const
  31393. DMAC0_BASE_ADDRESS = $BF883060;
  31394. var
  31395. DMAC0 : TDMAC0Registers absolute DMAC0_BASE_ADDRESS;
  31396. const
  31397. DMAC1_BASE_ADDRESS = $BF883120;
  31398. var
  31399. DMAC1 : TDMAC1Registers absolute DMAC1_BASE_ADDRESS;
  31400. const
  31401. DMAC2_BASE_ADDRESS = $BF8831E0;
  31402. var
  31403. DMAC2 : TDMAC2Registers absolute DMAC2_BASE_ADDRESS;
  31404. const
  31405. DMAC3_BASE_ADDRESS = $BF8832A0;
  31406. var
  31407. DMAC3 : TDMAC3Registers absolute DMAC3_BASE_ADDRESS;
  31408. const
  31409. DMAC4_BASE_ADDRESS = $BF883360;
  31410. var
  31411. DMAC4 : TDMAC4Registers absolute DMAC4_BASE_ADDRESS;
  31412. const
  31413. DMAC5_BASE_ADDRESS = $BF883420;
  31414. var
  31415. DMAC5 : TDMAC5Registers absolute DMAC5_BASE_ADDRESS;
  31416. const
  31417. DMAC6_BASE_ADDRESS = $BF8834E0;
  31418. var
  31419. DMAC6 : TDMAC6Registers absolute DMAC6_BASE_ADDRESS;
  31420. const
  31421. DMAC7_BASE_ADDRESS = $BF8835A0;
  31422. var
  31423. DMAC7 : TDMAC7Registers absolute DMAC7_BASE_ADDRESS;
  31424. const
  31425. ETH_BASE_ADDRESS = $BF889000;
  31426. var
  31427. ETH : TETHRegisters absolute ETH_BASE_ADDRESS;
  31428. const
  31429. I2C1_BASE_ADDRESS = $BF805300;
  31430. var
  31431. I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
  31432. const
  31433. I2C1A_BASE_ADDRESS = $BF805000;
  31434. var
  31435. I2C1A : TI2C1ARegisters absolute I2C1A_BASE_ADDRESS;
  31436. const
  31437. I2C2_BASE_ADDRESS = $BF805400;
  31438. var
  31439. I2C2 : TI2C2Registers absolute I2C2_BASE_ADDRESS;
  31440. const
  31441. I2C2A_BASE_ADDRESS = $BF805100;
  31442. var
  31443. I2C2A : TI2C2ARegisters absolute I2C2A_BASE_ADDRESS;
  31444. const
  31445. I2C3A_BASE_ADDRESS = $BF805200;
  31446. var
  31447. I2C3A : TI2C3ARegisters absolute I2C3A_BASE_ADDRESS;
  31448. const
  31449. ICAP1_BASE_ADDRESS = $BF802000;
  31450. var
  31451. ICAP1 : TICAP1Registers absolute ICAP1_BASE_ADDRESS;
  31452. const
  31453. ICAP2_BASE_ADDRESS = $BF802200;
  31454. var
  31455. ICAP2 : TICAP2Registers absolute ICAP2_BASE_ADDRESS;
  31456. const
  31457. ICAP3_BASE_ADDRESS = $BF802400;
  31458. var
  31459. ICAP3 : TICAP3Registers absolute ICAP3_BASE_ADDRESS;
  31460. const
  31461. ICAP4_BASE_ADDRESS = $BF802600;
  31462. var
  31463. ICAP4 : TICAP4Registers absolute ICAP4_BASE_ADDRESS;
  31464. const
  31465. ICAP5_BASE_ADDRESS = $BF802800;
  31466. var
  31467. ICAP5 : TICAP5Registers absolute ICAP5_BASE_ADDRESS;
  31468. const
  31469. INT_BASE_ADDRESS = $BF881000;
  31470. var
  31471. INT : TINTRegisters absolute INT_BASE_ADDRESS;
  31472. const
  31473. NVM_BASE_ADDRESS = $BF80F400;
  31474. var
  31475. NVM : TNVMRegisters absolute NVM_BASE_ADDRESS;
  31476. const
  31477. OCMP1_BASE_ADDRESS = $BF803000;
  31478. var
  31479. OCMP1 : TOCMP1Registers absolute OCMP1_BASE_ADDRESS;
  31480. const
  31481. OCMP2_BASE_ADDRESS = $BF803200;
  31482. var
  31483. OCMP2 : TOCMP2Registers absolute OCMP2_BASE_ADDRESS;
  31484. const
  31485. OCMP3_BASE_ADDRESS = $BF803400;
  31486. var
  31487. OCMP3 : TOCMP3Registers absolute OCMP3_BASE_ADDRESS;
  31488. const
  31489. OCMP4_BASE_ADDRESS = $BF803600;
  31490. var
  31491. OCMP4 : TOCMP4Registers absolute OCMP4_BASE_ADDRESS;
  31492. const
  31493. OCMP5_BASE_ADDRESS = $BF803800;
  31494. var
  31495. OCMP5 : TOCMP5Registers absolute OCMP5_BASE_ADDRESS;
  31496. const
  31497. OSC_BASE_ADDRESS = $BF80F000;
  31498. var
  31499. OSC : TOSCRegisters absolute OSC_BASE_ADDRESS;
  31500. const
  31501. PCACHE_BASE_ADDRESS = $BF884000;
  31502. var
  31503. PCACHE : TPCACHERegisters absolute PCACHE_BASE_ADDRESS;
  31504. const
  31505. PMP_BASE_ADDRESS = $BF807000;
  31506. var
  31507. PMP : TPMPRegisters absolute PMP_BASE_ADDRESS;
  31508. const
  31509. PORTA_BASE_ADDRESS = $BF886000;
  31510. var
  31511. PORTA : TPORTARegisters absolute PORTA_BASE_ADDRESS;
  31512. const
  31513. PORTB_BASE_ADDRESS = $BF886040;
  31514. var
  31515. PORTB : TPORTBRegisters absolute PORTB_BASE_ADDRESS;
  31516. const
  31517. PORTC_BASE_ADDRESS = $BF886080;
  31518. var
  31519. PORTC : TPORTCRegisters absolute PORTC_BASE_ADDRESS;
  31520. const
  31521. PORTD_BASE_ADDRESS = $BF8860C0;
  31522. var
  31523. PORTD : TPORTDRegisters absolute PORTD_BASE_ADDRESS;
  31524. const
  31525. PORTE_BASE_ADDRESS = $BF886100;
  31526. var
  31527. PORTE : TPORTERegisters absolute PORTE_BASE_ADDRESS;
  31528. const
  31529. PORTF_BASE_ADDRESS = $BF886140;
  31530. var
  31531. PORTF : TPORTFRegisters absolute PORTF_BASE_ADDRESS;
  31532. const
  31533. PORTG_BASE_ADDRESS = $BF886180;
  31534. var
  31535. PORTG : TPORTGRegisters absolute PORTG_BASE_ADDRESS;
  31536. const
  31537. RCON_BASE_ADDRESS = $BF80F600;
  31538. var
  31539. RCON : TRCONRegisters absolute RCON_BASE_ADDRESS;
  31540. const
  31541. RTCC_BASE_ADDRESS = $BF800200;
  31542. var
  31543. RTCC : TRTCCRegisters absolute RTCC_BASE_ADDRESS;
  31544. const
  31545. SPI1_BASE_ADDRESS = $BF805E00;
  31546. var
  31547. SPI1 : TSPI1Registers absolute SPI1_BASE_ADDRESS;
  31548. const
  31549. SPI2_BASE_ADDRESS = $BF805A00;
  31550. var
  31551. SPI2 : TSPI2Registers absolute SPI2_BASE_ADDRESS;
  31552. const
  31553. SPI3_BASE_ADDRESS = $BF805800;
  31554. var
  31555. SPI3 : TSPI3Registers absolute SPI3_BASE_ADDRESS;
  31556. const
  31557. SPI3A_BASE_ADDRESS = $BF805C00;
  31558. var
  31559. SPI3A : TSPI3ARegisters absolute SPI3A_BASE_ADDRESS;
  31560. const
  31561. TMR1_BASE_ADDRESS = $BF800600;
  31562. var
  31563. TMR1 : TTMR1Registers absolute TMR1_BASE_ADDRESS;
  31564. const
  31565. TMR23_BASE_ADDRESS = $BF800800;
  31566. var
  31567. TMR23 : TTMR23Registers absolute TMR23_BASE_ADDRESS;
  31568. const
  31569. TMR3_BASE_ADDRESS = $BF800A00;
  31570. var
  31571. TMR3 : TTMR3Registers absolute TMR3_BASE_ADDRESS;
  31572. const
  31573. TMR4_BASE_ADDRESS = $BF800C00;
  31574. var
  31575. TMR4 : TTMR4Registers absolute TMR4_BASE_ADDRESS;
  31576. const
  31577. TMR5_BASE_ADDRESS = $BF800E00;
  31578. var
  31579. TMR5 : TTMR5Registers absolute TMR5_BASE_ADDRESS;
  31580. const
  31581. UART1_BASE_ADDRESS = $BF806000;
  31582. var
  31583. UART1 : TUART1Registers absolute UART1_BASE_ADDRESS;
  31584. const
  31585. UART1B_BASE_ADDRESS = $BF806200;
  31586. var
  31587. UART1B : TUART1BRegisters absolute UART1B_BASE_ADDRESS;
  31588. const
  31589. UART2B_BASE_ADDRESS = $BF806600;
  31590. var
  31591. UART2B : TUART2BRegisters absolute UART2B_BASE_ADDRESS;
  31592. const
  31593. UART3_BASE_ADDRESS = $BF806400;
  31594. var
  31595. UART3 : TUART3Registers absolute UART3_BASE_ADDRESS;
  31596. const
  31597. UART3A_BASE_ADDRESS = $BF806800;
  31598. var
  31599. UART3A : TUART3ARegisters absolute UART3A_BASE_ADDRESS;
  31600. const
  31601. UART5_BASE_ADDRESS = $BF806A00;
  31602. var
  31603. UART5 : TUART5Registers absolute UART5_BASE_ADDRESS;
  31604. const
  31605. USB_BASE_ADDRESS = $BF885040;
  31606. var
  31607. USB : TUSBRegisters absolute USB_BASE_ADDRESS;
  31608. const
  31609. WDT_BASE_ADDRESS = $BF800000;
  31610. var
  31611. WDT : TWDTRegisters absolute WDT_BASE_ADDRESS;
  31612. const
  31613. _APPI_BASE_ADDRESS = $BF880190;
  31614. var
  31615. _APPI : T_APPIRegisters absolute _APPI_BASE_ADDRESS;
  31616. const
  31617. _APPO_BASE_ADDRESS = $BF880180;
  31618. var
  31619. _APPO : T_APPORegisters absolute _APPO_BASE_ADDRESS;
  31620. const
  31621. _DDPSTAT_BASE_ADDRESS = $BF880140;
  31622. var
  31623. _DDPSTAT : T_DDPSTATRegisters absolute _DDPSTAT_BASE_ADDRESS;
  31624. const
  31625. _STRO_BASE_ADDRESS = $BF880170;
  31626. var
  31627. _STRO : T_STRORegisters absolute _STRO_BASE_ADDRESS;
  31628. implementation
  31629. type
  31630. TDefRegMap = record
  31631. val : longWord;
  31632. clr : longWord;
  31633. &set : longWord;
  31634. inv : longWord;
  31635. end;
  31636. pTDefRegMap = ^TDefRegMap;
  31637. procedure TWDT_WDTCON.setWDTCLR; inline;
  31638. begin
  31639. pTDefRegMap(@Self)^.&set := $00000001;
  31640. end;
  31641. procedure TWDT_WDTCON.clearWDTCLR; inline;
  31642. begin
  31643. pTDefRegMap(@Self)^.clr := $00000001;
  31644. end;
  31645. procedure TWDT_WDTCON.setWDTCLR(thebits : TBits_1); inline;
  31646. begin
  31647. if thebits = 0 then
  31648. pTDefRegMap(@Self)^.clr := $00000001
  31649. else
  31650. pTDefRegMap(@Self)^.&set := $00000001;
  31651. end;
  31652. function TWDT_WDTCON.getWDTCLR : TBits_1; inline;
  31653. begin
  31654. getWDTCLR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31655. end;
  31656. procedure TWDT_WDTCON.setSWDTPS(thebits : TBits_5); inline;
  31657. begin
  31658. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  31659. end;
  31660. function TWDT_WDTCON.getSWDTPS : TBits_5; inline;
  31661. begin
  31662. getSWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  31663. end;
  31664. procedure TWDT_WDTCON.setON; inline;
  31665. begin
  31666. pTDefRegMap(@Self)^.&set := $00008000;
  31667. end;
  31668. procedure TWDT_WDTCON.clearON; inline;
  31669. begin
  31670. pTDefRegMap(@Self)^.clr := $00008000;
  31671. end;
  31672. procedure TWDT_WDTCON.setON(thebits : TBits_1); inline;
  31673. begin
  31674. if thebits = 0 then
  31675. pTDefRegMap(@Self)^.clr := $00008000
  31676. else
  31677. pTDefRegMap(@Self)^.&set := $00008000;
  31678. end;
  31679. function TWDT_WDTCON.getON : TBits_1; inline;
  31680. begin
  31681. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31682. end;
  31683. procedure TWDT_WDTCON.setSWDTPS0; inline;
  31684. begin
  31685. pTDefRegMap(@Self)^.&set := $00000004;
  31686. end;
  31687. procedure TWDT_WDTCON.clearSWDTPS0; inline;
  31688. begin
  31689. pTDefRegMap(@Self)^.clr := $00000004;
  31690. end;
  31691. procedure TWDT_WDTCON.setSWDTPS0(thebits : TBits_1); inline;
  31692. begin
  31693. if thebits = 0 then
  31694. pTDefRegMap(@Self)^.clr := $00000004
  31695. else
  31696. pTDefRegMap(@Self)^.&set := $00000004;
  31697. end;
  31698. function TWDT_WDTCON.getSWDTPS0 : TBits_1; inline;
  31699. begin
  31700. getSWDTPS0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  31701. end;
  31702. procedure TWDT_WDTCON.setSWDTPS1; inline;
  31703. begin
  31704. pTDefRegMap(@Self)^.&set := $00000008;
  31705. end;
  31706. procedure TWDT_WDTCON.clearSWDTPS1; inline;
  31707. begin
  31708. pTDefRegMap(@Self)^.clr := $00000008;
  31709. end;
  31710. procedure TWDT_WDTCON.setSWDTPS1(thebits : TBits_1); inline;
  31711. begin
  31712. if thebits = 0 then
  31713. pTDefRegMap(@Self)^.clr := $00000008
  31714. else
  31715. pTDefRegMap(@Self)^.&set := $00000008;
  31716. end;
  31717. function TWDT_WDTCON.getSWDTPS1 : TBits_1; inline;
  31718. begin
  31719. getSWDTPS1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31720. end;
  31721. procedure TWDT_WDTCON.setSWDTPS2; inline;
  31722. begin
  31723. pTDefRegMap(@Self)^.&set := $00000010;
  31724. end;
  31725. procedure TWDT_WDTCON.clearSWDTPS2; inline;
  31726. begin
  31727. pTDefRegMap(@Self)^.clr := $00000010;
  31728. end;
  31729. procedure TWDT_WDTCON.setSWDTPS2(thebits : TBits_1); inline;
  31730. begin
  31731. if thebits = 0 then
  31732. pTDefRegMap(@Self)^.clr := $00000010
  31733. else
  31734. pTDefRegMap(@Self)^.&set := $00000010;
  31735. end;
  31736. function TWDT_WDTCON.getSWDTPS2 : TBits_1; inline;
  31737. begin
  31738. getSWDTPS2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  31739. end;
  31740. procedure TWDT_WDTCON.setSWDTPS3; inline;
  31741. begin
  31742. pTDefRegMap(@Self)^.&set := $00000020;
  31743. end;
  31744. procedure TWDT_WDTCON.clearSWDTPS3; inline;
  31745. begin
  31746. pTDefRegMap(@Self)^.clr := $00000020;
  31747. end;
  31748. procedure TWDT_WDTCON.setSWDTPS3(thebits : TBits_1); inline;
  31749. begin
  31750. if thebits = 0 then
  31751. pTDefRegMap(@Self)^.clr := $00000020
  31752. else
  31753. pTDefRegMap(@Self)^.&set := $00000020;
  31754. end;
  31755. function TWDT_WDTCON.getSWDTPS3 : TBits_1; inline;
  31756. begin
  31757. getSWDTPS3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31758. end;
  31759. procedure TWDT_WDTCON.setSWDTPS4; inline;
  31760. begin
  31761. pTDefRegMap(@Self)^.&set := $00000040;
  31762. end;
  31763. procedure TWDT_WDTCON.clearSWDTPS4; inline;
  31764. begin
  31765. pTDefRegMap(@Self)^.clr := $00000040;
  31766. end;
  31767. procedure TWDT_WDTCON.setSWDTPS4(thebits : TBits_1); inline;
  31768. begin
  31769. if thebits = 0 then
  31770. pTDefRegMap(@Self)^.clr := $00000040
  31771. else
  31772. pTDefRegMap(@Self)^.&set := $00000040;
  31773. end;
  31774. function TWDT_WDTCON.getSWDTPS4 : TBits_1; inline;
  31775. begin
  31776. getSWDTPS4 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31777. end;
  31778. procedure TWDT_WDTCON.setWDTPSTA(thebits : TBits_5); inline;
  31779. begin
  31780. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  31781. end;
  31782. function TWDT_WDTCON.getWDTPSTA : TBits_5; inline;
  31783. begin
  31784. getWDTPSTA := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  31785. end;
  31786. procedure TWDT_WDTCON.setWDTPS(thebits : TBits_5); inline;
  31787. begin
  31788. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  31789. end;
  31790. function TWDT_WDTCON.getWDTPS : TBits_5; inline;
  31791. begin
  31792. getWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  31793. end;
  31794. procedure TWDT_WDTCON.setw(thebits : TBits_32); inline;
  31795. begin
  31796. pTDefRegMap(@Self)^.val := thebits;
  31797. end;
  31798. function TWDT_WDTCON.getw : TBits_32; inline;
  31799. begin
  31800. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31801. end;
  31802. procedure TRTCC_RTCCON.setRTCOE; inline;
  31803. begin
  31804. pTDefRegMap(@Self)^.&set := $00000001;
  31805. end;
  31806. procedure TRTCC_RTCCON.clearRTCOE; inline;
  31807. begin
  31808. pTDefRegMap(@Self)^.clr := $00000001;
  31809. end;
  31810. procedure TRTCC_RTCCON.setRTCOE(thebits : TBits_1); inline;
  31811. begin
  31812. if thebits = 0 then
  31813. pTDefRegMap(@Self)^.clr := $00000001
  31814. else
  31815. pTDefRegMap(@Self)^.&set := $00000001;
  31816. end;
  31817. function TRTCC_RTCCON.getRTCOE : TBits_1; inline;
  31818. begin
  31819. getRTCOE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  31820. end;
  31821. procedure TRTCC_RTCCON.setHALFSEC; inline;
  31822. begin
  31823. pTDefRegMap(@Self)^.&set := $00000002;
  31824. end;
  31825. procedure TRTCC_RTCCON.clearHALFSEC; inline;
  31826. begin
  31827. pTDefRegMap(@Self)^.clr := $00000002;
  31828. end;
  31829. procedure TRTCC_RTCCON.setHALFSEC(thebits : TBits_1); inline;
  31830. begin
  31831. if thebits = 0 then
  31832. pTDefRegMap(@Self)^.clr := $00000002
  31833. else
  31834. pTDefRegMap(@Self)^.&set := $00000002;
  31835. end;
  31836. function TRTCC_RTCCON.getHALFSEC : TBits_1; inline;
  31837. begin
  31838. getHALFSEC := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31839. end;
  31840. procedure TRTCC_RTCCON.setRTCSYNC; inline;
  31841. begin
  31842. pTDefRegMap(@Self)^.&set := $00000004;
  31843. end;
  31844. procedure TRTCC_RTCCON.clearRTCSYNC; inline;
  31845. begin
  31846. pTDefRegMap(@Self)^.clr := $00000004;
  31847. end;
  31848. procedure TRTCC_RTCCON.setRTCSYNC(thebits : TBits_1); inline;
  31849. begin
  31850. if thebits = 0 then
  31851. pTDefRegMap(@Self)^.clr := $00000004
  31852. else
  31853. pTDefRegMap(@Self)^.&set := $00000004;
  31854. end;
  31855. function TRTCC_RTCCON.getRTCSYNC : TBits_1; inline;
  31856. begin
  31857. getRTCSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  31858. end;
  31859. procedure TRTCC_RTCCON.setRTCWREN; inline;
  31860. begin
  31861. pTDefRegMap(@Self)^.&set := $00000008;
  31862. end;
  31863. procedure TRTCC_RTCCON.clearRTCWREN; inline;
  31864. begin
  31865. pTDefRegMap(@Self)^.clr := $00000008;
  31866. end;
  31867. procedure TRTCC_RTCCON.setRTCWREN(thebits : TBits_1); inline;
  31868. begin
  31869. if thebits = 0 then
  31870. pTDefRegMap(@Self)^.clr := $00000008
  31871. else
  31872. pTDefRegMap(@Self)^.&set := $00000008;
  31873. end;
  31874. function TRTCC_RTCCON.getRTCWREN : TBits_1; inline;
  31875. begin
  31876. getRTCWREN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31877. end;
  31878. procedure TRTCC_RTCCON.setRTCCLKON; inline;
  31879. begin
  31880. pTDefRegMap(@Self)^.&set := $00000040;
  31881. end;
  31882. procedure TRTCC_RTCCON.clearRTCCLKON; inline;
  31883. begin
  31884. pTDefRegMap(@Self)^.clr := $00000040;
  31885. end;
  31886. procedure TRTCC_RTCCON.setRTCCLKON(thebits : TBits_1); inline;
  31887. begin
  31888. if thebits = 0 then
  31889. pTDefRegMap(@Self)^.clr := $00000040
  31890. else
  31891. pTDefRegMap(@Self)^.&set := $00000040;
  31892. end;
  31893. function TRTCC_RTCCON.getRTCCLKON : TBits_1; inline;
  31894. begin
  31895. getRTCCLKON := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31896. end;
  31897. procedure TRTCC_RTCCON.setRTSECSEL; inline;
  31898. begin
  31899. pTDefRegMap(@Self)^.&set := $00000080;
  31900. end;
  31901. procedure TRTCC_RTCCON.clearRTSECSEL; inline;
  31902. begin
  31903. pTDefRegMap(@Self)^.clr := $00000080;
  31904. end;
  31905. procedure TRTCC_RTCCON.setRTSECSEL(thebits : TBits_1); inline;
  31906. begin
  31907. if thebits = 0 then
  31908. pTDefRegMap(@Self)^.clr := $00000080
  31909. else
  31910. pTDefRegMap(@Self)^.&set := $00000080;
  31911. end;
  31912. function TRTCC_RTCCON.getRTSECSEL : TBits_1; inline;
  31913. begin
  31914. getRTSECSEL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31915. end;
  31916. procedure TRTCC_RTCCON.setSIDL; inline;
  31917. begin
  31918. pTDefRegMap(@Self)^.&set := $00002000;
  31919. end;
  31920. procedure TRTCC_RTCCON.clearSIDL; inline;
  31921. begin
  31922. pTDefRegMap(@Self)^.clr := $00002000;
  31923. end;
  31924. procedure TRTCC_RTCCON.setSIDL(thebits : TBits_1); inline;
  31925. begin
  31926. if thebits = 0 then
  31927. pTDefRegMap(@Self)^.clr := $00002000
  31928. else
  31929. pTDefRegMap(@Self)^.&set := $00002000;
  31930. end;
  31931. function TRTCC_RTCCON.getSIDL : TBits_1; inline;
  31932. begin
  31933. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31934. end;
  31935. procedure TRTCC_RTCCON.setON; inline;
  31936. begin
  31937. pTDefRegMap(@Self)^.&set := $00008000;
  31938. end;
  31939. procedure TRTCC_RTCCON.clearON; inline;
  31940. begin
  31941. pTDefRegMap(@Self)^.clr := $00008000;
  31942. end;
  31943. procedure TRTCC_RTCCON.setON(thebits : TBits_1); inline;
  31944. begin
  31945. if thebits = 0 then
  31946. pTDefRegMap(@Self)^.clr := $00008000
  31947. else
  31948. pTDefRegMap(@Self)^.&set := $00008000;
  31949. end;
  31950. function TRTCC_RTCCON.getON : TBits_1; inline;
  31951. begin
  31952. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31953. end;
  31954. procedure TRTCC_RTCCON.setCAL(thebits : TBits_10); inline;
  31955. begin
  31956. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FC00FFFF or ( thebits shl 16 );
  31957. end;
  31958. function TRTCC_RTCCON.getCAL : TBits_10; inline;
  31959. begin
  31960. getCAL := (pTDefRegMap(@Self)^.val and $03FF0000) shr 16;
  31961. end;
  31962. procedure TRTCC_RTCCON.setw(thebits : TBits_32); inline;
  31963. begin
  31964. pTDefRegMap(@Self)^.val := thebits;
  31965. end;
  31966. function TRTCC_RTCCON.getw : TBits_32; inline;
  31967. begin
  31968. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31969. end;
  31970. procedure TRTCC_RTCALRM.setARPT(thebits : TBits_8); inline;
  31971. begin
  31972. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  31973. end;
  31974. function TRTCC_RTCALRM.getARPT : TBits_8; inline;
  31975. begin
  31976. getARPT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  31977. end;
  31978. procedure TRTCC_RTCALRM.setAMASK(thebits : TBits_4); inline;
  31979. begin
  31980. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  31981. end;
  31982. function TRTCC_RTCALRM.getAMASK : TBits_4; inline;
  31983. begin
  31984. getAMASK := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  31985. end;
  31986. procedure TRTCC_RTCALRM.setALRMSYNC; inline;
  31987. begin
  31988. pTDefRegMap(@Self)^.&set := $00001000;
  31989. end;
  31990. procedure TRTCC_RTCALRM.clearALRMSYNC; inline;
  31991. begin
  31992. pTDefRegMap(@Self)^.clr := $00001000;
  31993. end;
  31994. procedure TRTCC_RTCALRM.setALRMSYNC(thebits : TBits_1); inline;
  31995. begin
  31996. if thebits = 0 then
  31997. pTDefRegMap(@Self)^.clr := $00001000
  31998. else
  31999. pTDefRegMap(@Self)^.&set := $00001000;
  32000. end;
  32001. function TRTCC_RTCALRM.getALRMSYNC : TBits_1; inline;
  32002. begin
  32003. getALRMSYNC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32004. end;
  32005. procedure TRTCC_RTCALRM.setPIV; inline;
  32006. begin
  32007. pTDefRegMap(@Self)^.&set := $00002000;
  32008. end;
  32009. procedure TRTCC_RTCALRM.clearPIV; inline;
  32010. begin
  32011. pTDefRegMap(@Self)^.clr := $00002000;
  32012. end;
  32013. procedure TRTCC_RTCALRM.setPIV(thebits : TBits_1); inline;
  32014. begin
  32015. if thebits = 0 then
  32016. pTDefRegMap(@Self)^.clr := $00002000
  32017. else
  32018. pTDefRegMap(@Self)^.&set := $00002000;
  32019. end;
  32020. function TRTCC_RTCALRM.getPIV : TBits_1; inline;
  32021. begin
  32022. getPIV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32023. end;
  32024. procedure TRTCC_RTCALRM.setCHIME; inline;
  32025. begin
  32026. pTDefRegMap(@Self)^.&set := $00004000;
  32027. end;
  32028. procedure TRTCC_RTCALRM.clearCHIME; inline;
  32029. begin
  32030. pTDefRegMap(@Self)^.clr := $00004000;
  32031. end;
  32032. procedure TRTCC_RTCALRM.setCHIME(thebits : TBits_1); inline;
  32033. begin
  32034. if thebits = 0 then
  32035. pTDefRegMap(@Self)^.clr := $00004000
  32036. else
  32037. pTDefRegMap(@Self)^.&set := $00004000;
  32038. end;
  32039. function TRTCC_RTCALRM.getCHIME : TBits_1; inline;
  32040. begin
  32041. getCHIME := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  32042. end;
  32043. procedure TRTCC_RTCALRM.setALRMEN; inline;
  32044. begin
  32045. pTDefRegMap(@Self)^.&set := $00008000;
  32046. end;
  32047. procedure TRTCC_RTCALRM.clearALRMEN; inline;
  32048. begin
  32049. pTDefRegMap(@Self)^.clr := $00008000;
  32050. end;
  32051. procedure TRTCC_RTCALRM.setALRMEN(thebits : TBits_1); inline;
  32052. begin
  32053. if thebits = 0 then
  32054. pTDefRegMap(@Self)^.clr := $00008000
  32055. else
  32056. pTDefRegMap(@Self)^.&set := $00008000;
  32057. end;
  32058. function TRTCC_RTCALRM.getALRMEN : TBits_1; inline;
  32059. begin
  32060. getALRMEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32061. end;
  32062. procedure TRTCC_RTCALRM.setw(thebits : TBits_32); inline;
  32063. begin
  32064. pTDefRegMap(@Self)^.val := thebits;
  32065. end;
  32066. function TRTCC_RTCALRM.getw : TBits_32; inline;
  32067. begin
  32068. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32069. end;
  32070. procedure TRTCC_RTCTIME.setSEC01(thebits : TBits_4); inline;
  32071. begin
  32072. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  32073. end;
  32074. function TRTCC_RTCTIME.getSEC01 : TBits_4; inline;
  32075. begin
  32076. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  32077. end;
  32078. procedure TRTCC_RTCTIME.setSEC10(thebits : TBits_4); inline;
  32079. begin
  32080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  32081. end;
  32082. function TRTCC_RTCTIME.getSEC10 : TBits_4; inline;
  32083. begin
  32084. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  32085. end;
  32086. procedure TRTCC_RTCTIME.setMIN01(thebits : TBits_4); inline;
  32087. begin
  32088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  32089. end;
  32090. function TRTCC_RTCTIME.getMIN01 : TBits_4; inline;
  32091. begin
  32092. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  32093. end;
  32094. procedure TRTCC_RTCTIME.setMIN10(thebits : TBits_4); inline;
  32095. begin
  32096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  32097. end;
  32098. function TRTCC_RTCTIME.getMIN10 : TBits_4; inline;
  32099. begin
  32100. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  32101. end;
  32102. procedure TRTCC_RTCTIME.setHR01(thebits : TBits_4); inline;
  32103. begin
  32104. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  32105. end;
  32106. function TRTCC_RTCTIME.getHR01 : TBits_4; inline;
  32107. begin
  32108. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  32109. end;
  32110. procedure TRTCC_RTCTIME.setHR10(thebits : TBits_4); inline;
  32111. begin
  32112. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  32113. end;
  32114. function TRTCC_RTCTIME.getHR10 : TBits_4; inline;
  32115. begin
  32116. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  32117. end;
  32118. procedure TRTCC_RTCTIME.setw(thebits : TBits_32); inline;
  32119. begin
  32120. pTDefRegMap(@Self)^.val := thebits;
  32121. end;
  32122. function TRTCC_RTCTIME.getw : TBits_32; inline;
  32123. begin
  32124. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32125. end;
  32126. procedure TRTCC_RTCDATE.setWDAY01(thebits : TBits_4); inline;
  32127. begin
  32128. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  32129. end;
  32130. function TRTCC_RTCDATE.getWDAY01 : TBits_4; inline;
  32131. begin
  32132. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  32133. end;
  32134. procedure TRTCC_RTCDATE.setDAY01(thebits : TBits_4); inline;
  32135. begin
  32136. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  32137. end;
  32138. function TRTCC_RTCDATE.getDAY01 : TBits_4; inline;
  32139. begin
  32140. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  32141. end;
  32142. procedure TRTCC_RTCDATE.setDAY10(thebits : TBits_4); inline;
  32143. begin
  32144. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  32145. end;
  32146. function TRTCC_RTCDATE.getDAY10 : TBits_4; inline;
  32147. begin
  32148. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  32149. end;
  32150. procedure TRTCC_RTCDATE.setMONTH01(thebits : TBits_4); inline;
  32151. begin
  32152. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  32153. end;
  32154. function TRTCC_RTCDATE.getMONTH01 : TBits_4; inline;
  32155. begin
  32156. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  32157. end;
  32158. procedure TRTCC_RTCDATE.setMONTH10(thebits : TBits_4); inline;
  32159. begin
  32160. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  32161. end;
  32162. function TRTCC_RTCDATE.getMONTH10 : TBits_4; inline;
  32163. begin
  32164. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  32165. end;
  32166. procedure TRTCC_RTCDATE.setYEAR01(thebits : TBits_4); inline;
  32167. begin
  32168. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  32169. end;
  32170. function TRTCC_RTCDATE.getYEAR01 : TBits_4; inline;
  32171. begin
  32172. getYEAR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  32173. end;
  32174. procedure TRTCC_RTCDATE.setYEAR10(thebits : TBits_4); inline;
  32175. begin
  32176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  32177. end;
  32178. function TRTCC_RTCDATE.getYEAR10 : TBits_4; inline;
  32179. begin
  32180. getYEAR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  32181. end;
  32182. procedure TRTCC_RTCDATE.setw(thebits : TBits_32); inline;
  32183. begin
  32184. pTDefRegMap(@Self)^.val := thebits;
  32185. end;
  32186. function TRTCC_RTCDATE.getw : TBits_32; inline;
  32187. begin
  32188. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32189. end;
  32190. procedure TRTCC_ALRMTIME.setSEC01(thebits : TBits_4); inline;
  32191. begin
  32192. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  32193. end;
  32194. function TRTCC_ALRMTIME.getSEC01 : TBits_4; inline;
  32195. begin
  32196. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  32197. end;
  32198. procedure TRTCC_ALRMTIME.setSEC10(thebits : TBits_4); inline;
  32199. begin
  32200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  32201. end;
  32202. function TRTCC_ALRMTIME.getSEC10 : TBits_4; inline;
  32203. begin
  32204. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  32205. end;
  32206. procedure TRTCC_ALRMTIME.setMIN01(thebits : TBits_4); inline;
  32207. begin
  32208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  32209. end;
  32210. function TRTCC_ALRMTIME.getMIN01 : TBits_4; inline;
  32211. begin
  32212. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  32213. end;
  32214. procedure TRTCC_ALRMTIME.setMIN10(thebits : TBits_4); inline;
  32215. begin
  32216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  32217. end;
  32218. function TRTCC_ALRMTIME.getMIN10 : TBits_4; inline;
  32219. begin
  32220. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  32221. end;
  32222. procedure TRTCC_ALRMTIME.setHR01(thebits : TBits_4); inline;
  32223. begin
  32224. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  32225. end;
  32226. function TRTCC_ALRMTIME.getHR01 : TBits_4; inline;
  32227. begin
  32228. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  32229. end;
  32230. procedure TRTCC_ALRMTIME.setHR10(thebits : TBits_4); inline;
  32231. begin
  32232. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  32233. end;
  32234. function TRTCC_ALRMTIME.getHR10 : TBits_4; inline;
  32235. begin
  32236. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  32237. end;
  32238. procedure TRTCC_ALRMTIME.setw(thebits : TBits_32); inline;
  32239. begin
  32240. pTDefRegMap(@Self)^.val := thebits;
  32241. end;
  32242. function TRTCC_ALRMTIME.getw : TBits_32; inline;
  32243. begin
  32244. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32245. end;
  32246. procedure TRTCC_ALRMDATE.setWDAY01(thebits : TBits_4); inline;
  32247. begin
  32248. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  32249. end;
  32250. function TRTCC_ALRMDATE.getWDAY01 : TBits_4; inline;
  32251. begin
  32252. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  32253. end;
  32254. procedure TRTCC_ALRMDATE.setDAY01(thebits : TBits_4); inline;
  32255. begin
  32256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  32257. end;
  32258. function TRTCC_ALRMDATE.getDAY01 : TBits_4; inline;
  32259. begin
  32260. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  32261. end;
  32262. procedure TRTCC_ALRMDATE.setDAY10(thebits : TBits_4); inline;
  32263. begin
  32264. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  32265. end;
  32266. function TRTCC_ALRMDATE.getDAY10 : TBits_4; inline;
  32267. begin
  32268. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  32269. end;
  32270. procedure TRTCC_ALRMDATE.setMONTH01(thebits : TBits_4); inline;
  32271. begin
  32272. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  32273. end;
  32274. function TRTCC_ALRMDATE.getMONTH01 : TBits_4; inline;
  32275. begin
  32276. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  32277. end;
  32278. procedure TRTCC_ALRMDATE.setMONTH10(thebits : TBits_4); inline;
  32279. begin
  32280. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  32281. end;
  32282. function TRTCC_ALRMDATE.getMONTH10 : TBits_4; inline;
  32283. begin
  32284. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  32285. end;
  32286. procedure TRTCC_ALRMDATE.setw(thebits : TBits_32); inline;
  32287. begin
  32288. pTDefRegMap(@Self)^.val := thebits;
  32289. end;
  32290. function TRTCC_ALRMDATE.getw : TBits_32; inline;
  32291. begin
  32292. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32293. end;
  32294. procedure TTMR1_T1CON.setTCS; inline;
  32295. begin
  32296. pTDefRegMap(@Self)^.&set := $00000002;
  32297. end;
  32298. procedure TTMR1_T1CON.clearTCS; inline;
  32299. begin
  32300. pTDefRegMap(@Self)^.clr := $00000002;
  32301. end;
  32302. procedure TTMR1_T1CON.setTCS(thebits : TBits_1); inline;
  32303. begin
  32304. if thebits = 0 then
  32305. pTDefRegMap(@Self)^.clr := $00000002
  32306. else
  32307. pTDefRegMap(@Self)^.&set := $00000002;
  32308. end;
  32309. function TTMR1_T1CON.getTCS : TBits_1; inline;
  32310. begin
  32311. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32312. end;
  32313. procedure TTMR1_T1CON.setTSYNC; inline;
  32314. begin
  32315. pTDefRegMap(@Self)^.&set := $00000004;
  32316. end;
  32317. procedure TTMR1_T1CON.clearTSYNC; inline;
  32318. begin
  32319. pTDefRegMap(@Self)^.clr := $00000004;
  32320. end;
  32321. procedure TTMR1_T1CON.setTSYNC(thebits : TBits_1); inline;
  32322. begin
  32323. if thebits = 0 then
  32324. pTDefRegMap(@Self)^.clr := $00000004
  32325. else
  32326. pTDefRegMap(@Self)^.&set := $00000004;
  32327. end;
  32328. function TTMR1_T1CON.getTSYNC : TBits_1; inline;
  32329. begin
  32330. getTSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32331. end;
  32332. procedure TTMR1_T1CON.setTCKPS(thebits : TBits_2); inline;
  32333. begin
  32334. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  32335. end;
  32336. function TTMR1_T1CON.getTCKPS : TBits_2; inline;
  32337. begin
  32338. getTCKPS := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  32339. end;
  32340. procedure TTMR1_T1CON.setTGATE; inline;
  32341. begin
  32342. pTDefRegMap(@Self)^.&set := $00000080;
  32343. end;
  32344. procedure TTMR1_T1CON.clearTGATE; inline;
  32345. begin
  32346. pTDefRegMap(@Self)^.clr := $00000080;
  32347. end;
  32348. procedure TTMR1_T1CON.setTGATE(thebits : TBits_1); inline;
  32349. begin
  32350. if thebits = 0 then
  32351. pTDefRegMap(@Self)^.clr := $00000080
  32352. else
  32353. pTDefRegMap(@Self)^.&set := $00000080;
  32354. end;
  32355. function TTMR1_T1CON.getTGATE : TBits_1; inline;
  32356. begin
  32357. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32358. end;
  32359. procedure TTMR1_T1CON.setTWIP; inline;
  32360. begin
  32361. pTDefRegMap(@Self)^.&set := $00000800;
  32362. end;
  32363. procedure TTMR1_T1CON.clearTWIP; inline;
  32364. begin
  32365. pTDefRegMap(@Self)^.clr := $00000800;
  32366. end;
  32367. procedure TTMR1_T1CON.setTWIP(thebits : TBits_1); inline;
  32368. begin
  32369. if thebits = 0 then
  32370. pTDefRegMap(@Self)^.clr := $00000800
  32371. else
  32372. pTDefRegMap(@Self)^.&set := $00000800;
  32373. end;
  32374. function TTMR1_T1CON.getTWIP : TBits_1; inline;
  32375. begin
  32376. getTWIP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  32377. end;
  32378. procedure TTMR1_T1CON.setTWDIS; inline;
  32379. begin
  32380. pTDefRegMap(@Self)^.&set := $00001000;
  32381. end;
  32382. procedure TTMR1_T1CON.clearTWDIS; inline;
  32383. begin
  32384. pTDefRegMap(@Self)^.clr := $00001000;
  32385. end;
  32386. procedure TTMR1_T1CON.setTWDIS(thebits : TBits_1); inline;
  32387. begin
  32388. if thebits = 0 then
  32389. pTDefRegMap(@Self)^.clr := $00001000
  32390. else
  32391. pTDefRegMap(@Self)^.&set := $00001000;
  32392. end;
  32393. function TTMR1_T1CON.getTWDIS : TBits_1; inline;
  32394. begin
  32395. getTWDIS := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  32396. end;
  32397. procedure TTMR1_T1CON.setSIDL; inline;
  32398. begin
  32399. pTDefRegMap(@Self)^.&set := $00002000;
  32400. end;
  32401. procedure TTMR1_T1CON.clearSIDL; inline;
  32402. begin
  32403. pTDefRegMap(@Self)^.clr := $00002000;
  32404. end;
  32405. procedure TTMR1_T1CON.setSIDL(thebits : TBits_1); inline;
  32406. begin
  32407. if thebits = 0 then
  32408. pTDefRegMap(@Self)^.clr := $00002000
  32409. else
  32410. pTDefRegMap(@Self)^.&set := $00002000;
  32411. end;
  32412. function TTMR1_T1CON.getSIDL : TBits_1; inline;
  32413. begin
  32414. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32415. end;
  32416. procedure TTMR1_T1CON.setON; inline;
  32417. begin
  32418. pTDefRegMap(@Self)^.&set := $00008000;
  32419. end;
  32420. procedure TTMR1_T1CON.clearON; inline;
  32421. begin
  32422. pTDefRegMap(@Self)^.clr := $00008000;
  32423. end;
  32424. procedure TTMR1_T1CON.setON(thebits : TBits_1); inline;
  32425. begin
  32426. if thebits = 0 then
  32427. pTDefRegMap(@Self)^.clr := $00008000
  32428. else
  32429. pTDefRegMap(@Self)^.&set := $00008000;
  32430. end;
  32431. function TTMR1_T1CON.getON : TBits_1; inline;
  32432. begin
  32433. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32434. end;
  32435. procedure TTMR1_T1CON.setTCKPS0; inline;
  32436. begin
  32437. pTDefRegMap(@Self)^.&set := $00000010;
  32438. end;
  32439. procedure TTMR1_T1CON.clearTCKPS0; inline;
  32440. begin
  32441. pTDefRegMap(@Self)^.clr := $00000010;
  32442. end;
  32443. procedure TTMR1_T1CON.setTCKPS0(thebits : TBits_1); inline;
  32444. begin
  32445. if thebits = 0 then
  32446. pTDefRegMap(@Self)^.clr := $00000010
  32447. else
  32448. pTDefRegMap(@Self)^.&set := $00000010;
  32449. end;
  32450. function TTMR1_T1CON.getTCKPS0 : TBits_1; inline;
  32451. begin
  32452. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32453. end;
  32454. procedure TTMR1_T1CON.setTCKPS1; inline;
  32455. begin
  32456. pTDefRegMap(@Self)^.&set := $00000020;
  32457. end;
  32458. procedure TTMR1_T1CON.clearTCKPS1; inline;
  32459. begin
  32460. pTDefRegMap(@Self)^.clr := $00000020;
  32461. end;
  32462. procedure TTMR1_T1CON.setTCKPS1(thebits : TBits_1); inline;
  32463. begin
  32464. if thebits = 0 then
  32465. pTDefRegMap(@Self)^.clr := $00000020
  32466. else
  32467. pTDefRegMap(@Self)^.&set := $00000020;
  32468. end;
  32469. function TTMR1_T1CON.getTCKPS1 : TBits_1; inline;
  32470. begin
  32471. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32472. end;
  32473. procedure TTMR1_T1CON.setTSIDL; inline;
  32474. begin
  32475. pTDefRegMap(@Self)^.&set := $00002000;
  32476. end;
  32477. procedure TTMR1_T1CON.clearTSIDL; inline;
  32478. begin
  32479. pTDefRegMap(@Self)^.clr := $00002000;
  32480. end;
  32481. procedure TTMR1_T1CON.setTSIDL(thebits : TBits_1); inline;
  32482. begin
  32483. if thebits = 0 then
  32484. pTDefRegMap(@Self)^.clr := $00002000
  32485. else
  32486. pTDefRegMap(@Self)^.&set := $00002000;
  32487. end;
  32488. function TTMR1_T1CON.getTSIDL : TBits_1; inline;
  32489. begin
  32490. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32491. end;
  32492. procedure TTMR1_T1CON.setTON; inline;
  32493. begin
  32494. pTDefRegMap(@Self)^.&set := $00008000;
  32495. end;
  32496. procedure TTMR1_T1CON.clearTON; inline;
  32497. begin
  32498. pTDefRegMap(@Self)^.clr := $00008000;
  32499. end;
  32500. procedure TTMR1_T1CON.setTON(thebits : TBits_1); inline;
  32501. begin
  32502. if thebits = 0 then
  32503. pTDefRegMap(@Self)^.clr := $00008000
  32504. else
  32505. pTDefRegMap(@Self)^.&set := $00008000;
  32506. end;
  32507. function TTMR1_T1CON.getTON : TBits_1; inline;
  32508. begin
  32509. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32510. end;
  32511. procedure TTMR1_T1CON.setw(thebits : TBits_32); inline;
  32512. begin
  32513. pTDefRegMap(@Self)^.val := thebits;
  32514. end;
  32515. function TTMR1_T1CON.getw : TBits_32; inline;
  32516. begin
  32517. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32518. end;
  32519. procedure TTMR23_T2CON.setTCS; inline;
  32520. begin
  32521. pTDefRegMap(@Self)^.&set := $00000002;
  32522. end;
  32523. procedure TTMR23_T2CON.clearTCS; inline;
  32524. begin
  32525. pTDefRegMap(@Self)^.clr := $00000002;
  32526. end;
  32527. procedure TTMR23_T2CON.setTCS(thebits : TBits_1); inline;
  32528. begin
  32529. if thebits = 0 then
  32530. pTDefRegMap(@Self)^.clr := $00000002
  32531. else
  32532. pTDefRegMap(@Self)^.&set := $00000002;
  32533. end;
  32534. function TTMR23_T2CON.getTCS : TBits_1; inline;
  32535. begin
  32536. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32537. end;
  32538. procedure TTMR23_T2CON.setT32; inline;
  32539. begin
  32540. pTDefRegMap(@Self)^.&set := $00000008;
  32541. end;
  32542. procedure TTMR23_T2CON.clearT32; inline;
  32543. begin
  32544. pTDefRegMap(@Self)^.clr := $00000008;
  32545. end;
  32546. procedure TTMR23_T2CON.setT32(thebits : TBits_1); inline;
  32547. begin
  32548. if thebits = 0 then
  32549. pTDefRegMap(@Self)^.clr := $00000008
  32550. else
  32551. pTDefRegMap(@Self)^.&set := $00000008;
  32552. end;
  32553. function TTMR23_T2CON.getT32 : TBits_1; inline;
  32554. begin
  32555. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32556. end;
  32557. procedure TTMR23_T2CON.setTCKPS(thebits : TBits_3); inline;
  32558. begin
  32559. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  32560. end;
  32561. function TTMR23_T2CON.getTCKPS : TBits_3; inline;
  32562. begin
  32563. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  32564. end;
  32565. procedure TTMR23_T2CON.setTGATE; inline;
  32566. begin
  32567. pTDefRegMap(@Self)^.&set := $00000080;
  32568. end;
  32569. procedure TTMR23_T2CON.clearTGATE; inline;
  32570. begin
  32571. pTDefRegMap(@Self)^.clr := $00000080;
  32572. end;
  32573. procedure TTMR23_T2CON.setTGATE(thebits : TBits_1); inline;
  32574. begin
  32575. if thebits = 0 then
  32576. pTDefRegMap(@Self)^.clr := $00000080
  32577. else
  32578. pTDefRegMap(@Self)^.&set := $00000080;
  32579. end;
  32580. function TTMR23_T2CON.getTGATE : TBits_1; inline;
  32581. begin
  32582. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32583. end;
  32584. procedure TTMR23_T2CON.setSIDL; inline;
  32585. begin
  32586. pTDefRegMap(@Self)^.&set := $00002000;
  32587. end;
  32588. procedure TTMR23_T2CON.clearSIDL; inline;
  32589. begin
  32590. pTDefRegMap(@Self)^.clr := $00002000;
  32591. end;
  32592. procedure TTMR23_T2CON.setSIDL(thebits : TBits_1); inline;
  32593. begin
  32594. if thebits = 0 then
  32595. pTDefRegMap(@Self)^.clr := $00002000
  32596. else
  32597. pTDefRegMap(@Self)^.&set := $00002000;
  32598. end;
  32599. function TTMR23_T2CON.getSIDL : TBits_1; inline;
  32600. begin
  32601. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32602. end;
  32603. procedure TTMR23_T2CON.setON; inline;
  32604. begin
  32605. pTDefRegMap(@Self)^.&set := $00008000;
  32606. end;
  32607. procedure TTMR23_T2CON.clearON; inline;
  32608. begin
  32609. pTDefRegMap(@Self)^.clr := $00008000;
  32610. end;
  32611. procedure TTMR23_T2CON.setON(thebits : TBits_1); inline;
  32612. begin
  32613. if thebits = 0 then
  32614. pTDefRegMap(@Self)^.clr := $00008000
  32615. else
  32616. pTDefRegMap(@Self)^.&set := $00008000;
  32617. end;
  32618. function TTMR23_T2CON.getON : TBits_1; inline;
  32619. begin
  32620. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32621. end;
  32622. procedure TTMR23_T2CON.setTCKPS0; inline;
  32623. begin
  32624. pTDefRegMap(@Self)^.&set := $00000010;
  32625. end;
  32626. procedure TTMR23_T2CON.clearTCKPS0; inline;
  32627. begin
  32628. pTDefRegMap(@Self)^.clr := $00000010;
  32629. end;
  32630. procedure TTMR23_T2CON.setTCKPS0(thebits : TBits_1); inline;
  32631. begin
  32632. if thebits = 0 then
  32633. pTDefRegMap(@Self)^.clr := $00000010
  32634. else
  32635. pTDefRegMap(@Self)^.&set := $00000010;
  32636. end;
  32637. function TTMR23_T2CON.getTCKPS0 : TBits_1; inline;
  32638. begin
  32639. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32640. end;
  32641. procedure TTMR23_T2CON.setTCKPS1; inline;
  32642. begin
  32643. pTDefRegMap(@Self)^.&set := $00000020;
  32644. end;
  32645. procedure TTMR23_T2CON.clearTCKPS1; inline;
  32646. begin
  32647. pTDefRegMap(@Self)^.clr := $00000020;
  32648. end;
  32649. procedure TTMR23_T2CON.setTCKPS1(thebits : TBits_1); inline;
  32650. begin
  32651. if thebits = 0 then
  32652. pTDefRegMap(@Self)^.clr := $00000020
  32653. else
  32654. pTDefRegMap(@Self)^.&set := $00000020;
  32655. end;
  32656. function TTMR23_T2CON.getTCKPS1 : TBits_1; inline;
  32657. begin
  32658. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32659. end;
  32660. procedure TTMR23_T2CON.setTCKPS2; inline;
  32661. begin
  32662. pTDefRegMap(@Self)^.&set := $00000040;
  32663. end;
  32664. procedure TTMR23_T2CON.clearTCKPS2; inline;
  32665. begin
  32666. pTDefRegMap(@Self)^.clr := $00000040;
  32667. end;
  32668. procedure TTMR23_T2CON.setTCKPS2(thebits : TBits_1); inline;
  32669. begin
  32670. if thebits = 0 then
  32671. pTDefRegMap(@Self)^.clr := $00000040
  32672. else
  32673. pTDefRegMap(@Self)^.&set := $00000040;
  32674. end;
  32675. function TTMR23_T2CON.getTCKPS2 : TBits_1; inline;
  32676. begin
  32677. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32678. end;
  32679. procedure TTMR23_T2CON.setTSIDL; inline;
  32680. begin
  32681. pTDefRegMap(@Self)^.&set := $00002000;
  32682. end;
  32683. procedure TTMR23_T2CON.clearTSIDL; inline;
  32684. begin
  32685. pTDefRegMap(@Self)^.clr := $00002000;
  32686. end;
  32687. procedure TTMR23_T2CON.setTSIDL(thebits : TBits_1); inline;
  32688. begin
  32689. if thebits = 0 then
  32690. pTDefRegMap(@Self)^.clr := $00002000
  32691. else
  32692. pTDefRegMap(@Self)^.&set := $00002000;
  32693. end;
  32694. function TTMR23_T2CON.getTSIDL : TBits_1; inline;
  32695. begin
  32696. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32697. end;
  32698. procedure TTMR23_T2CON.setTON; inline;
  32699. begin
  32700. pTDefRegMap(@Self)^.&set := $00008000;
  32701. end;
  32702. procedure TTMR23_T2CON.clearTON; inline;
  32703. begin
  32704. pTDefRegMap(@Self)^.clr := $00008000;
  32705. end;
  32706. procedure TTMR23_T2CON.setTON(thebits : TBits_1); inline;
  32707. begin
  32708. if thebits = 0 then
  32709. pTDefRegMap(@Self)^.clr := $00008000
  32710. else
  32711. pTDefRegMap(@Self)^.&set := $00008000;
  32712. end;
  32713. function TTMR23_T2CON.getTON : TBits_1; inline;
  32714. begin
  32715. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32716. end;
  32717. procedure TTMR23_T2CON.setw(thebits : TBits_32); inline;
  32718. begin
  32719. pTDefRegMap(@Self)^.val := thebits;
  32720. end;
  32721. function TTMR23_T2CON.getw : TBits_32; inline;
  32722. begin
  32723. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32724. end;
  32725. procedure TTMR3_T3CON.setTCS; inline;
  32726. begin
  32727. pTDefRegMap(@Self)^.&set := $00000002;
  32728. end;
  32729. procedure TTMR3_T3CON.clearTCS; inline;
  32730. begin
  32731. pTDefRegMap(@Self)^.clr := $00000002;
  32732. end;
  32733. procedure TTMR3_T3CON.setTCS(thebits : TBits_1); inline;
  32734. begin
  32735. if thebits = 0 then
  32736. pTDefRegMap(@Self)^.clr := $00000002
  32737. else
  32738. pTDefRegMap(@Self)^.&set := $00000002;
  32739. end;
  32740. function TTMR3_T3CON.getTCS : TBits_1; inline;
  32741. begin
  32742. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32743. end;
  32744. procedure TTMR3_T3CON.setTCKPS(thebits : TBits_3); inline;
  32745. begin
  32746. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  32747. end;
  32748. function TTMR3_T3CON.getTCKPS : TBits_3; inline;
  32749. begin
  32750. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  32751. end;
  32752. procedure TTMR3_T3CON.setTGATE; inline;
  32753. begin
  32754. pTDefRegMap(@Self)^.&set := $00000080;
  32755. end;
  32756. procedure TTMR3_T3CON.clearTGATE; inline;
  32757. begin
  32758. pTDefRegMap(@Self)^.clr := $00000080;
  32759. end;
  32760. procedure TTMR3_T3CON.setTGATE(thebits : TBits_1); inline;
  32761. begin
  32762. if thebits = 0 then
  32763. pTDefRegMap(@Self)^.clr := $00000080
  32764. else
  32765. pTDefRegMap(@Self)^.&set := $00000080;
  32766. end;
  32767. function TTMR3_T3CON.getTGATE : TBits_1; inline;
  32768. begin
  32769. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32770. end;
  32771. procedure TTMR3_T3CON.setSIDL; inline;
  32772. begin
  32773. pTDefRegMap(@Self)^.&set := $00002000;
  32774. end;
  32775. procedure TTMR3_T3CON.clearSIDL; inline;
  32776. begin
  32777. pTDefRegMap(@Self)^.clr := $00002000;
  32778. end;
  32779. procedure TTMR3_T3CON.setSIDL(thebits : TBits_1); inline;
  32780. begin
  32781. if thebits = 0 then
  32782. pTDefRegMap(@Self)^.clr := $00002000
  32783. else
  32784. pTDefRegMap(@Self)^.&set := $00002000;
  32785. end;
  32786. function TTMR3_T3CON.getSIDL : TBits_1; inline;
  32787. begin
  32788. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32789. end;
  32790. procedure TTMR3_T3CON.setON; inline;
  32791. begin
  32792. pTDefRegMap(@Self)^.&set := $00008000;
  32793. end;
  32794. procedure TTMR3_T3CON.clearON; inline;
  32795. begin
  32796. pTDefRegMap(@Self)^.clr := $00008000;
  32797. end;
  32798. procedure TTMR3_T3CON.setON(thebits : TBits_1); inline;
  32799. begin
  32800. if thebits = 0 then
  32801. pTDefRegMap(@Self)^.clr := $00008000
  32802. else
  32803. pTDefRegMap(@Self)^.&set := $00008000;
  32804. end;
  32805. function TTMR3_T3CON.getON : TBits_1; inline;
  32806. begin
  32807. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32808. end;
  32809. procedure TTMR3_T3CON.setTCKPS0; inline;
  32810. begin
  32811. pTDefRegMap(@Self)^.&set := $00000010;
  32812. end;
  32813. procedure TTMR3_T3CON.clearTCKPS0; inline;
  32814. begin
  32815. pTDefRegMap(@Self)^.clr := $00000010;
  32816. end;
  32817. procedure TTMR3_T3CON.setTCKPS0(thebits : TBits_1); inline;
  32818. begin
  32819. if thebits = 0 then
  32820. pTDefRegMap(@Self)^.clr := $00000010
  32821. else
  32822. pTDefRegMap(@Self)^.&set := $00000010;
  32823. end;
  32824. function TTMR3_T3CON.getTCKPS0 : TBits_1; inline;
  32825. begin
  32826. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32827. end;
  32828. procedure TTMR3_T3CON.setTCKPS1; inline;
  32829. begin
  32830. pTDefRegMap(@Self)^.&set := $00000020;
  32831. end;
  32832. procedure TTMR3_T3CON.clearTCKPS1; inline;
  32833. begin
  32834. pTDefRegMap(@Self)^.clr := $00000020;
  32835. end;
  32836. procedure TTMR3_T3CON.setTCKPS1(thebits : TBits_1); inline;
  32837. begin
  32838. if thebits = 0 then
  32839. pTDefRegMap(@Self)^.clr := $00000020
  32840. else
  32841. pTDefRegMap(@Self)^.&set := $00000020;
  32842. end;
  32843. function TTMR3_T3CON.getTCKPS1 : TBits_1; inline;
  32844. begin
  32845. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32846. end;
  32847. procedure TTMR3_T3CON.setTCKPS2; inline;
  32848. begin
  32849. pTDefRegMap(@Self)^.&set := $00000040;
  32850. end;
  32851. procedure TTMR3_T3CON.clearTCKPS2; inline;
  32852. begin
  32853. pTDefRegMap(@Self)^.clr := $00000040;
  32854. end;
  32855. procedure TTMR3_T3CON.setTCKPS2(thebits : TBits_1); inline;
  32856. begin
  32857. if thebits = 0 then
  32858. pTDefRegMap(@Self)^.clr := $00000040
  32859. else
  32860. pTDefRegMap(@Self)^.&set := $00000040;
  32861. end;
  32862. function TTMR3_T3CON.getTCKPS2 : TBits_1; inline;
  32863. begin
  32864. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32865. end;
  32866. procedure TTMR3_T3CON.setTSIDL; inline;
  32867. begin
  32868. pTDefRegMap(@Self)^.&set := $00002000;
  32869. end;
  32870. procedure TTMR3_T3CON.clearTSIDL; inline;
  32871. begin
  32872. pTDefRegMap(@Self)^.clr := $00002000;
  32873. end;
  32874. procedure TTMR3_T3CON.setTSIDL(thebits : TBits_1); inline;
  32875. begin
  32876. if thebits = 0 then
  32877. pTDefRegMap(@Self)^.clr := $00002000
  32878. else
  32879. pTDefRegMap(@Self)^.&set := $00002000;
  32880. end;
  32881. function TTMR3_T3CON.getTSIDL : TBits_1; inline;
  32882. begin
  32883. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32884. end;
  32885. procedure TTMR3_T3CON.setTON; inline;
  32886. begin
  32887. pTDefRegMap(@Self)^.&set := $00008000;
  32888. end;
  32889. procedure TTMR3_T3CON.clearTON; inline;
  32890. begin
  32891. pTDefRegMap(@Self)^.clr := $00008000;
  32892. end;
  32893. procedure TTMR3_T3CON.setTON(thebits : TBits_1); inline;
  32894. begin
  32895. if thebits = 0 then
  32896. pTDefRegMap(@Self)^.clr := $00008000
  32897. else
  32898. pTDefRegMap(@Self)^.&set := $00008000;
  32899. end;
  32900. function TTMR3_T3CON.getTON : TBits_1; inline;
  32901. begin
  32902. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32903. end;
  32904. procedure TTMR3_T3CON.setw(thebits : TBits_32); inline;
  32905. begin
  32906. pTDefRegMap(@Self)^.val := thebits;
  32907. end;
  32908. function TTMR3_T3CON.getw : TBits_32; inline;
  32909. begin
  32910. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32911. end;
  32912. procedure TTMR4_T4CON.setTCS; inline;
  32913. begin
  32914. pTDefRegMap(@Self)^.&set := $00000002;
  32915. end;
  32916. procedure TTMR4_T4CON.clearTCS; inline;
  32917. begin
  32918. pTDefRegMap(@Self)^.clr := $00000002;
  32919. end;
  32920. procedure TTMR4_T4CON.setTCS(thebits : TBits_1); inline;
  32921. begin
  32922. if thebits = 0 then
  32923. pTDefRegMap(@Self)^.clr := $00000002
  32924. else
  32925. pTDefRegMap(@Self)^.&set := $00000002;
  32926. end;
  32927. function TTMR4_T4CON.getTCS : TBits_1; inline;
  32928. begin
  32929. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32930. end;
  32931. procedure TTMR4_T4CON.setT32; inline;
  32932. begin
  32933. pTDefRegMap(@Self)^.&set := $00000008;
  32934. end;
  32935. procedure TTMR4_T4CON.clearT32; inline;
  32936. begin
  32937. pTDefRegMap(@Self)^.clr := $00000008;
  32938. end;
  32939. procedure TTMR4_T4CON.setT32(thebits : TBits_1); inline;
  32940. begin
  32941. if thebits = 0 then
  32942. pTDefRegMap(@Self)^.clr := $00000008
  32943. else
  32944. pTDefRegMap(@Self)^.&set := $00000008;
  32945. end;
  32946. function TTMR4_T4CON.getT32 : TBits_1; inline;
  32947. begin
  32948. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32949. end;
  32950. procedure TTMR4_T4CON.setTCKPS(thebits : TBits_3); inline;
  32951. begin
  32952. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  32953. end;
  32954. function TTMR4_T4CON.getTCKPS : TBits_3; inline;
  32955. begin
  32956. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  32957. end;
  32958. procedure TTMR4_T4CON.setTGATE; inline;
  32959. begin
  32960. pTDefRegMap(@Self)^.&set := $00000080;
  32961. end;
  32962. procedure TTMR4_T4CON.clearTGATE; inline;
  32963. begin
  32964. pTDefRegMap(@Self)^.clr := $00000080;
  32965. end;
  32966. procedure TTMR4_T4CON.setTGATE(thebits : TBits_1); inline;
  32967. begin
  32968. if thebits = 0 then
  32969. pTDefRegMap(@Self)^.clr := $00000080
  32970. else
  32971. pTDefRegMap(@Self)^.&set := $00000080;
  32972. end;
  32973. function TTMR4_T4CON.getTGATE : TBits_1; inline;
  32974. begin
  32975. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32976. end;
  32977. procedure TTMR4_T4CON.setSIDL; inline;
  32978. begin
  32979. pTDefRegMap(@Self)^.&set := $00002000;
  32980. end;
  32981. procedure TTMR4_T4CON.clearSIDL; inline;
  32982. begin
  32983. pTDefRegMap(@Self)^.clr := $00002000;
  32984. end;
  32985. procedure TTMR4_T4CON.setSIDL(thebits : TBits_1); inline;
  32986. begin
  32987. if thebits = 0 then
  32988. pTDefRegMap(@Self)^.clr := $00002000
  32989. else
  32990. pTDefRegMap(@Self)^.&set := $00002000;
  32991. end;
  32992. function TTMR4_T4CON.getSIDL : TBits_1; inline;
  32993. begin
  32994. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32995. end;
  32996. procedure TTMR4_T4CON.setON; inline;
  32997. begin
  32998. pTDefRegMap(@Self)^.&set := $00008000;
  32999. end;
  33000. procedure TTMR4_T4CON.clearON; inline;
  33001. begin
  33002. pTDefRegMap(@Self)^.clr := $00008000;
  33003. end;
  33004. procedure TTMR4_T4CON.setON(thebits : TBits_1); inline;
  33005. begin
  33006. if thebits = 0 then
  33007. pTDefRegMap(@Self)^.clr := $00008000
  33008. else
  33009. pTDefRegMap(@Self)^.&set := $00008000;
  33010. end;
  33011. function TTMR4_T4CON.getON : TBits_1; inline;
  33012. begin
  33013. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33014. end;
  33015. procedure TTMR4_T4CON.setTCKPS0; inline;
  33016. begin
  33017. pTDefRegMap(@Self)^.&set := $00000010;
  33018. end;
  33019. procedure TTMR4_T4CON.clearTCKPS0; inline;
  33020. begin
  33021. pTDefRegMap(@Self)^.clr := $00000010;
  33022. end;
  33023. procedure TTMR4_T4CON.setTCKPS0(thebits : TBits_1); inline;
  33024. begin
  33025. if thebits = 0 then
  33026. pTDefRegMap(@Self)^.clr := $00000010
  33027. else
  33028. pTDefRegMap(@Self)^.&set := $00000010;
  33029. end;
  33030. function TTMR4_T4CON.getTCKPS0 : TBits_1; inline;
  33031. begin
  33032. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33033. end;
  33034. procedure TTMR4_T4CON.setTCKPS1; inline;
  33035. begin
  33036. pTDefRegMap(@Self)^.&set := $00000020;
  33037. end;
  33038. procedure TTMR4_T4CON.clearTCKPS1; inline;
  33039. begin
  33040. pTDefRegMap(@Self)^.clr := $00000020;
  33041. end;
  33042. procedure TTMR4_T4CON.setTCKPS1(thebits : TBits_1); inline;
  33043. begin
  33044. if thebits = 0 then
  33045. pTDefRegMap(@Self)^.clr := $00000020
  33046. else
  33047. pTDefRegMap(@Self)^.&set := $00000020;
  33048. end;
  33049. function TTMR4_T4CON.getTCKPS1 : TBits_1; inline;
  33050. begin
  33051. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33052. end;
  33053. procedure TTMR4_T4CON.setTCKPS2; inline;
  33054. begin
  33055. pTDefRegMap(@Self)^.&set := $00000040;
  33056. end;
  33057. procedure TTMR4_T4CON.clearTCKPS2; inline;
  33058. begin
  33059. pTDefRegMap(@Self)^.clr := $00000040;
  33060. end;
  33061. procedure TTMR4_T4CON.setTCKPS2(thebits : TBits_1); inline;
  33062. begin
  33063. if thebits = 0 then
  33064. pTDefRegMap(@Self)^.clr := $00000040
  33065. else
  33066. pTDefRegMap(@Self)^.&set := $00000040;
  33067. end;
  33068. function TTMR4_T4CON.getTCKPS2 : TBits_1; inline;
  33069. begin
  33070. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33071. end;
  33072. procedure TTMR4_T4CON.setTSIDL; inline;
  33073. begin
  33074. pTDefRegMap(@Self)^.&set := $00002000;
  33075. end;
  33076. procedure TTMR4_T4CON.clearTSIDL; inline;
  33077. begin
  33078. pTDefRegMap(@Self)^.clr := $00002000;
  33079. end;
  33080. procedure TTMR4_T4CON.setTSIDL(thebits : TBits_1); inline;
  33081. begin
  33082. if thebits = 0 then
  33083. pTDefRegMap(@Self)^.clr := $00002000
  33084. else
  33085. pTDefRegMap(@Self)^.&set := $00002000;
  33086. end;
  33087. function TTMR4_T4CON.getTSIDL : TBits_1; inline;
  33088. begin
  33089. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33090. end;
  33091. procedure TTMR4_T4CON.setTON; inline;
  33092. begin
  33093. pTDefRegMap(@Self)^.&set := $00008000;
  33094. end;
  33095. procedure TTMR4_T4CON.clearTON; inline;
  33096. begin
  33097. pTDefRegMap(@Self)^.clr := $00008000;
  33098. end;
  33099. procedure TTMR4_T4CON.setTON(thebits : TBits_1); inline;
  33100. begin
  33101. if thebits = 0 then
  33102. pTDefRegMap(@Self)^.clr := $00008000
  33103. else
  33104. pTDefRegMap(@Self)^.&set := $00008000;
  33105. end;
  33106. function TTMR4_T4CON.getTON : TBits_1; inline;
  33107. begin
  33108. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33109. end;
  33110. procedure TTMR4_T4CON.setw(thebits : TBits_32); inline;
  33111. begin
  33112. pTDefRegMap(@Self)^.val := thebits;
  33113. end;
  33114. function TTMR4_T4CON.getw : TBits_32; inline;
  33115. begin
  33116. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33117. end;
  33118. procedure TTMR5_T5CON.setTCS; inline;
  33119. begin
  33120. pTDefRegMap(@Self)^.&set := $00000002;
  33121. end;
  33122. procedure TTMR5_T5CON.clearTCS; inline;
  33123. begin
  33124. pTDefRegMap(@Self)^.clr := $00000002;
  33125. end;
  33126. procedure TTMR5_T5CON.setTCS(thebits : TBits_1); inline;
  33127. begin
  33128. if thebits = 0 then
  33129. pTDefRegMap(@Self)^.clr := $00000002
  33130. else
  33131. pTDefRegMap(@Self)^.&set := $00000002;
  33132. end;
  33133. function TTMR5_T5CON.getTCS : TBits_1; inline;
  33134. begin
  33135. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33136. end;
  33137. procedure TTMR5_T5CON.setTCKPS(thebits : TBits_3); inline;
  33138. begin
  33139. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  33140. end;
  33141. function TTMR5_T5CON.getTCKPS : TBits_3; inline;
  33142. begin
  33143. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  33144. end;
  33145. procedure TTMR5_T5CON.setTGATE; inline;
  33146. begin
  33147. pTDefRegMap(@Self)^.&set := $00000080;
  33148. end;
  33149. procedure TTMR5_T5CON.clearTGATE; inline;
  33150. begin
  33151. pTDefRegMap(@Self)^.clr := $00000080;
  33152. end;
  33153. procedure TTMR5_T5CON.setTGATE(thebits : TBits_1); inline;
  33154. begin
  33155. if thebits = 0 then
  33156. pTDefRegMap(@Self)^.clr := $00000080
  33157. else
  33158. pTDefRegMap(@Self)^.&set := $00000080;
  33159. end;
  33160. function TTMR5_T5CON.getTGATE : TBits_1; inline;
  33161. begin
  33162. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33163. end;
  33164. procedure TTMR5_T5CON.setSIDL; inline;
  33165. begin
  33166. pTDefRegMap(@Self)^.&set := $00002000;
  33167. end;
  33168. procedure TTMR5_T5CON.clearSIDL; inline;
  33169. begin
  33170. pTDefRegMap(@Self)^.clr := $00002000;
  33171. end;
  33172. procedure TTMR5_T5CON.setSIDL(thebits : TBits_1); inline;
  33173. begin
  33174. if thebits = 0 then
  33175. pTDefRegMap(@Self)^.clr := $00002000
  33176. else
  33177. pTDefRegMap(@Self)^.&set := $00002000;
  33178. end;
  33179. function TTMR5_T5CON.getSIDL : TBits_1; inline;
  33180. begin
  33181. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33182. end;
  33183. procedure TTMR5_T5CON.setON; inline;
  33184. begin
  33185. pTDefRegMap(@Self)^.&set := $00008000;
  33186. end;
  33187. procedure TTMR5_T5CON.clearON; inline;
  33188. begin
  33189. pTDefRegMap(@Self)^.clr := $00008000;
  33190. end;
  33191. procedure TTMR5_T5CON.setON(thebits : TBits_1); inline;
  33192. begin
  33193. if thebits = 0 then
  33194. pTDefRegMap(@Self)^.clr := $00008000
  33195. else
  33196. pTDefRegMap(@Self)^.&set := $00008000;
  33197. end;
  33198. function TTMR5_T5CON.getON : TBits_1; inline;
  33199. begin
  33200. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33201. end;
  33202. procedure TTMR5_T5CON.setTCKPS0; inline;
  33203. begin
  33204. pTDefRegMap(@Self)^.&set := $00000010;
  33205. end;
  33206. procedure TTMR5_T5CON.clearTCKPS0; inline;
  33207. begin
  33208. pTDefRegMap(@Self)^.clr := $00000010;
  33209. end;
  33210. procedure TTMR5_T5CON.setTCKPS0(thebits : TBits_1); inline;
  33211. begin
  33212. if thebits = 0 then
  33213. pTDefRegMap(@Self)^.clr := $00000010
  33214. else
  33215. pTDefRegMap(@Self)^.&set := $00000010;
  33216. end;
  33217. function TTMR5_T5CON.getTCKPS0 : TBits_1; inline;
  33218. begin
  33219. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33220. end;
  33221. procedure TTMR5_T5CON.setTCKPS1; inline;
  33222. begin
  33223. pTDefRegMap(@Self)^.&set := $00000020;
  33224. end;
  33225. procedure TTMR5_T5CON.clearTCKPS1; inline;
  33226. begin
  33227. pTDefRegMap(@Self)^.clr := $00000020;
  33228. end;
  33229. procedure TTMR5_T5CON.setTCKPS1(thebits : TBits_1); inline;
  33230. begin
  33231. if thebits = 0 then
  33232. pTDefRegMap(@Self)^.clr := $00000020
  33233. else
  33234. pTDefRegMap(@Self)^.&set := $00000020;
  33235. end;
  33236. function TTMR5_T5CON.getTCKPS1 : TBits_1; inline;
  33237. begin
  33238. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33239. end;
  33240. procedure TTMR5_T5CON.setTCKPS2; inline;
  33241. begin
  33242. pTDefRegMap(@Self)^.&set := $00000040;
  33243. end;
  33244. procedure TTMR5_T5CON.clearTCKPS2; inline;
  33245. begin
  33246. pTDefRegMap(@Self)^.clr := $00000040;
  33247. end;
  33248. procedure TTMR5_T5CON.setTCKPS2(thebits : TBits_1); inline;
  33249. begin
  33250. if thebits = 0 then
  33251. pTDefRegMap(@Self)^.clr := $00000040
  33252. else
  33253. pTDefRegMap(@Self)^.&set := $00000040;
  33254. end;
  33255. function TTMR5_T5CON.getTCKPS2 : TBits_1; inline;
  33256. begin
  33257. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33258. end;
  33259. procedure TTMR5_T5CON.setTSIDL; inline;
  33260. begin
  33261. pTDefRegMap(@Self)^.&set := $00002000;
  33262. end;
  33263. procedure TTMR5_T5CON.clearTSIDL; inline;
  33264. begin
  33265. pTDefRegMap(@Self)^.clr := $00002000;
  33266. end;
  33267. procedure TTMR5_T5CON.setTSIDL(thebits : TBits_1); inline;
  33268. begin
  33269. if thebits = 0 then
  33270. pTDefRegMap(@Self)^.clr := $00002000
  33271. else
  33272. pTDefRegMap(@Self)^.&set := $00002000;
  33273. end;
  33274. function TTMR5_T5CON.getTSIDL : TBits_1; inline;
  33275. begin
  33276. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33277. end;
  33278. procedure TTMR5_T5CON.setTON; inline;
  33279. begin
  33280. pTDefRegMap(@Self)^.&set := $00008000;
  33281. end;
  33282. procedure TTMR5_T5CON.clearTON; inline;
  33283. begin
  33284. pTDefRegMap(@Self)^.clr := $00008000;
  33285. end;
  33286. procedure TTMR5_T5CON.setTON(thebits : TBits_1); inline;
  33287. begin
  33288. if thebits = 0 then
  33289. pTDefRegMap(@Self)^.clr := $00008000
  33290. else
  33291. pTDefRegMap(@Self)^.&set := $00008000;
  33292. end;
  33293. function TTMR5_T5CON.getTON : TBits_1; inline;
  33294. begin
  33295. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33296. end;
  33297. procedure TTMR5_T5CON.setw(thebits : TBits_32); inline;
  33298. begin
  33299. pTDefRegMap(@Self)^.val := thebits;
  33300. end;
  33301. function TTMR5_T5CON.getw : TBits_32; inline;
  33302. begin
  33303. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33304. end;
  33305. procedure TICAP1_IC1CON.setICM(thebits : TBits_3); inline;
  33306. begin
  33307. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33308. end;
  33309. function TICAP1_IC1CON.getICM : TBits_3; inline;
  33310. begin
  33311. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33312. end;
  33313. procedure TICAP1_IC1CON.setICBNE; inline;
  33314. begin
  33315. pTDefRegMap(@Self)^.&set := $00000008;
  33316. end;
  33317. procedure TICAP1_IC1CON.clearICBNE; inline;
  33318. begin
  33319. pTDefRegMap(@Self)^.clr := $00000008;
  33320. end;
  33321. procedure TICAP1_IC1CON.setICBNE(thebits : TBits_1); inline;
  33322. begin
  33323. if thebits = 0 then
  33324. pTDefRegMap(@Self)^.clr := $00000008
  33325. else
  33326. pTDefRegMap(@Self)^.&set := $00000008;
  33327. end;
  33328. function TICAP1_IC1CON.getICBNE : TBits_1; inline;
  33329. begin
  33330. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33331. end;
  33332. procedure TICAP1_IC1CON.setICOV; inline;
  33333. begin
  33334. pTDefRegMap(@Self)^.&set := $00000010;
  33335. end;
  33336. procedure TICAP1_IC1CON.clearICOV; inline;
  33337. begin
  33338. pTDefRegMap(@Self)^.clr := $00000010;
  33339. end;
  33340. procedure TICAP1_IC1CON.setICOV(thebits : TBits_1); inline;
  33341. begin
  33342. if thebits = 0 then
  33343. pTDefRegMap(@Self)^.clr := $00000010
  33344. else
  33345. pTDefRegMap(@Self)^.&set := $00000010;
  33346. end;
  33347. function TICAP1_IC1CON.getICOV : TBits_1; inline;
  33348. begin
  33349. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33350. end;
  33351. procedure TICAP1_IC1CON.setICI(thebits : TBits_2); inline;
  33352. begin
  33353. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  33354. end;
  33355. function TICAP1_IC1CON.getICI : TBits_2; inline;
  33356. begin
  33357. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  33358. end;
  33359. procedure TICAP1_IC1CON.setICTMR; inline;
  33360. begin
  33361. pTDefRegMap(@Self)^.&set := $00000080;
  33362. end;
  33363. procedure TICAP1_IC1CON.clearICTMR; inline;
  33364. begin
  33365. pTDefRegMap(@Self)^.clr := $00000080;
  33366. end;
  33367. procedure TICAP1_IC1CON.setICTMR(thebits : TBits_1); inline;
  33368. begin
  33369. if thebits = 0 then
  33370. pTDefRegMap(@Self)^.clr := $00000080
  33371. else
  33372. pTDefRegMap(@Self)^.&set := $00000080;
  33373. end;
  33374. function TICAP1_IC1CON.getICTMR : TBits_1; inline;
  33375. begin
  33376. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33377. end;
  33378. procedure TICAP1_IC1CON.setC32; inline;
  33379. begin
  33380. pTDefRegMap(@Self)^.&set := $00000100;
  33381. end;
  33382. procedure TICAP1_IC1CON.clearC32; inline;
  33383. begin
  33384. pTDefRegMap(@Self)^.clr := $00000100;
  33385. end;
  33386. procedure TICAP1_IC1CON.setC32(thebits : TBits_1); inline;
  33387. begin
  33388. if thebits = 0 then
  33389. pTDefRegMap(@Self)^.clr := $00000100
  33390. else
  33391. pTDefRegMap(@Self)^.&set := $00000100;
  33392. end;
  33393. function TICAP1_IC1CON.getC32 : TBits_1; inline;
  33394. begin
  33395. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33396. end;
  33397. procedure TICAP1_IC1CON.setFEDGE; inline;
  33398. begin
  33399. pTDefRegMap(@Self)^.&set := $00000200;
  33400. end;
  33401. procedure TICAP1_IC1CON.clearFEDGE; inline;
  33402. begin
  33403. pTDefRegMap(@Self)^.clr := $00000200;
  33404. end;
  33405. procedure TICAP1_IC1CON.setFEDGE(thebits : TBits_1); inline;
  33406. begin
  33407. if thebits = 0 then
  33408. pTDefRegMap(@Self)^.clr := $00000200
  33409. else
  33410. pTDefRegMap(@Self)^.&set := $00000200;
  33411. end;
  33412. function TICAP1_IC1CON.getFEDGE : TBits_1; inline;
  33413. begin
  33414. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33415. end;
  33416. procedure TICAP1_IC1CON.setSIDL; inline;
  33417. begin
  33418. pTDefRegMap(@Self)^.&set := $00002000;
  33419. end;
  33420. procedure TICAP1_IC1CON.clearSIDL; inline;
  33421. begin
  33422. pTDefRegMap(@Self)^.clr := $00002000;
  33423. end;
  33424. procedure TICAP1_IC1CON.setSIDL(thebits : TBits_1); inline;
  33425. begin
  33426. if thebits = 0 then
  33427. pTDefRegMap(@Self)^.clr := $00002000
  33428. else
  33429. pTDefRegMap(@Self)^.&set := $00002000;
  33430. end;
  33431. function TICAP1_IC1CON.getSIDL : TBits_1; inline;
  33432. begin
  33433. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33434. end;
  33435. procedure TICAP1_IC1CON.setON; inline;
  33436. begin
  33437. pTDefRegMap(@Self)^.&set := $00008000;
  33438. end;
  33439. procedure TICAP1_IC1CON.clearON; inline;
  33440. begin
  33441. pTDefRegMap(@Self)^.clr := $00008000;
  33442. end;
  33443. procedure TICAP1_IC1CON.setON(thebits : TBits_1); inline;
  33444. begin
  33445. if thebits = 0 then
  33446. pTDefRegMap(@Self)^.clr := $00008000
  33447. else
  33448. pTDefRegMap(@Self)^.&set := $00008000;
  33449. end;
  33450. function TICAP1_IC1CON.getON : TBits_1; inline;
  33451. begin
  33452. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33453. end;
  33454. procedure TICAP1_IC1CON.setICM0; inline;
  33455. begin
  33456. pTDefRegMap(@Self)^.&set := $00000001;
  33457. end;
  33458. procedure TICAP1_IC1CON.clearICM0; inline;
  33459. begin
  33460. pTDefRegMap(@Self)^.clr := $00000001;
  33461. end;
  33462. procedure TICAP1_IC1CON.setICM0(thebits : TBits_1); inline;
  33463. begin
  33464. if thebits = 0 then
  33465. pTDefRegMap(@Self)^.clr := $00000001
  33466. else
  33467. pTDefRegMap(@Self)^.&set := $00000001;
  33468. end;
  33469. function TICAP1_IC1CON.getICM0 : TBits_1; inline;
  33470. begin
  33471. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33472. end;
  33473. procedure TICAP1_IC1CON.setICM1; inline;
  33474. begin
  33475. pTDefRegMap(@Self)^.&set := $00000002;
  33476. end;
  33477. procedure TICAP1_IC1CON.clearICM1; inline;
  33478. begin
  33479. pTDefRegMap(@Self)^.clr := $00000002;
  33480. end;
  33481. procedure TICAP1_IC1CON.setICM1(thebits : TBits_1); inline;
  33482. begin
  33483. if thebits = 0 then
  33484. pTDefRegMap(@Self)^.clr := $00000002
  33485. else
  33486. pTDefRegMap(@Self)^.&set := $00000002;
  33487. end;
  33488. function TICAP1_IC1CON.getICM1 : TBits_1; inline;
  33489. begin
  33490. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33491. end;
  33492. procedure TICAP1_IC1CON.setICM2; inline;
  33493. begin
  33494. pTDefRegMap(@Self)^.&set := $00000004;
  33495. end;
  33496. procedure TICAP1_IC1CON.clearICM2; inline;
  33497. begin
  33498. pTDefRegMap(@Self)^.clr := $00000004;
  33499. end;
  33500. procedure TICAP1_IC1CON.setICM2(thebits : TBits_1); inline;
  33501. begin
  33502. if thebits = 0 then
  33503. pTDefRegMap(@Self)^.clr := $00000004
  33504. else
  33505. pTDefRegMap(@Self)^.&set := $00000004;
  33506. end;
  33507. function TICAP1_IC1CON.getICM2 : TBits_1; inline;
  33508. begin
  33509. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33510. end;
  33511. procedure TICAP1_IC1CON.setICI0; inline;
  33512. begin
  33513. pTDefRegMap(@Self)^.&set := $00000020;
  33514. end;
  33515. procedure TICAP1_IC1CON.clearICI0; inline;
  33516. begin
  33517. pTDefRegMap(@Self)^.clr := $00000020;
  33518. end;
  33519. procedure TICAP1_IC1CON.setICI0(thebits : TBits_1); inline;
  33520. begin
  33521. if thebits = 0 then
  33522. pTDefRegMap(@Self)^.clr := $00000020
  33523. else
  33524. pTDefRegMap(@Self)^.&set := $00000020;
  33525. end;
  33526. function TICAP1_IC1CON.getICI0 : TBits_1; inline;
  33527. begin
  33528. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33529. end;
  33530. procedure TICAP1_IC1CON.setICI1; inline;
  33531. begin
  33532. pTDefRegMap(@Self)^.&set := $00000040;
  33533. end;
  33534. procedure TICAP1_IC1CON.clearICI1; inline;
  33535. begin
  33536. pTDefRegMap(@Self)^.clr := $00000040;
  33537. end;
  33538. procedure TICAP1_IC1CON.setICI1(thebits : TBits_1); inline;
  33539. begin
  33540. if thebits = 0 then
  33541. pTDefRegMap(@Self)^.clr := $00000040
  33542. else
  33543. pTDefRegMap(@Self)^.&set := $00000040;
  33544. end;
  33545. function TICAP1_IC1CON.getICI1 : TBits_1; inline;
  33546. begin
  33547. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33548. end;
  33549. procedure TICAP1_IC1CON.setICSIDL; inline;
  33550. begin
  33551. pTDefRegMap(@Self)^.&set := $00002000;
  33552. end;
  33553. procedure TICAP1_IC1CON.clearICSIDL; inline;
  33554. begin
  33555. pTDefRegMap(@Self)^.clr := $00002000;
  33556. end;
  33557. procedure TICAP1_IC1CON.setICSIDL(thebits : TBits_1); inline;
  33558. begin
  33559. if thebits = 0 then
  33560. pTDefRegMap(@Self)^.clr := $00002000
  33561. else
  33562. pTDefRegMap(@Self)^.&set := $00002000;
  33563. end;
  33564. function TICAP1_IC1CON.getICSIDL : TBits_1; inline;
  33565. begin
  33566. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33567. end;
  33568. procedure TICAP1_IC1CON.setw(thebits : TBits_32); inline;
  33569. begin
  33570. pTDefRegMap(@Self)^.val := thebits;
  33571. end;
  33572. function TICAP1_IC1CON.getw : TBits_32; inline;
  33573. begin
  33574. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33575. end;
  33576. procedure TICAP2_IC2CON.setICM(thebits : TBits_3); inline;
  33577. begin
  33578. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33579. end;
  33580. function TICAP2_IC2CON.getICM : TBits_3; inline;
  33581. begin
  33582. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33583. end;
  33584. procedure TICAP2_IC2CON.setICBNE; inline;
  33585. begin
  33586. pTDefRegMap(@Self)^.&set := $00000008;
  33587. end;
  33588. procedure TICAP2_IC2CON.clearICBNE; inline;
  33589. begin
  33590. pTDefRegMap(@Self)^.clr := $00000008;
  33591. end;
  33592. procedure TICAP2_IC2CON.setICBNE(thebits : TBits_1); inline;
  33593. begin
  33594. if thebits = 0 then
  33595. pTDefRegMap(@Self)^.clr := $00000008
  33596. else
  33597. pTDefRegMap(@Self)^.&set := $00000008;
  33598. end;
  33599. function TICAP2_IC2CON.getICBNE : TBits_1; inline;
  33600. begin
  33601. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33602. end;
  33603. procedure TICAP2_IC2CON.setICOV; inline;
  33604. begin
  33605. pTDefRegMap(@Self)^.&set := $00000010;
  33606. end;
  33607. procedure TICAP2_IC2CON.clearICOV; inline;
  33608. begin
  33609. pTDefRegMap(@Self)^.clr := $00000010;
  33610. end;
  33611. procedure TICAP2_IC2CON.setICOV(thebits : TBits_1); inline;
  33612. begin
  33613. if thebits = 0 then
  33614. pTDefRegMap(@Self)^.clr := $00000010
  33615. else
  33616. pTDefRegMap(@Self)^.&set := $00000010;
  33617. end;
  33618. function TICAP2_IC2CON.getICOV : TBits_1; inline;
  33619. begin
  33620. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33621. end;
  33622. procedure TICAP2_IC2CON.setICI(thebits : TBits_2); inline;
  33623. begin
  33624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  33625. end;
  33626. function TICAP2_IC2CON.getICI : TBits_2; inline;
  33627. begin
  33628. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  33629. end;
  33630. procedure TICAP2_IC2CON.setICTMR; inline;
  33631. begin
  33632. pTDefRegMap(@Self)^.&set := $00000080;
  33633. end;
  33634. procedure TICAP2_IC2CON.clearICTMR; inline;
  33635. begin
  33636. pTDefRegMap(@Self)^.clr := $00000080;
  33637. end;
  33638. procedure TICAP2_IC2CON.setICTMR(thebits : TBits_1); inline;
  33639. begin
  33640. if thebits = 0 then
  33641. pTDefRegMap(@Self)^.clr := $00000080
  33642. else
  33643. pTDefRegMap(@Self)^.&set := $00000080;
  33644. end;
  33645. function TICAP2_IC2CON.getICTMR : TBits_1; inline;
  33646. begin
  33647. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33648. end;
  33649. procedure TICAP2_IC2CON.setC32; inline;
  33650. begin
  33651. pTDefRegMap(@Self)^.&set := $00000100;
  33652. end;
  33653. procedure TICAP2_IC2CON.clearC32; inline;
  33654. begin
  33655. pTDefRegMap(@Self)^.clr := $00000100;
  33656. end;
  33657. procedure TICAP2_IC2CON.setC32(thebits : TBits_1); inline;
  33658. begin
  33659. if thebits = 0 then
  33660. pTDefRegMap(@Self)^.clr := $00000100
  33661. else
  33662. pTDefRegMap(@Self)^.&set := $00000100;
  33663. end;
  33664. function TICAP2_IC2CON.getC32 : TBits_1; inline;
  33665. begin
  33666. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33667. end;
  33668. procedure TICAP2_IC2CON.setFEDGE; inline;
  33669. begin
  33670. pTDefRegMap(@Self)^.&set := $00000200;
  33671. end;
  33672. procedure TICAP2_IC2CON.clearFEDGE; inline;
  33673. begin
  33674. pTDefRegMap(@Self)^.clr := $00000200;
  33675. end;
  33676. procedure TICAP2_IC2CON.setFEDGE(thebits : TBits_1); inline;
  33677. begin
  33678. if thebits = 0 then
  33679. pTDefRegMap(@Self)^.clr := $00000200
  33680. else
  33681. pTDefRegMap(@Self)^.&set := $00000200;
  33682. end;
  33683. function TICAP2_IC2CON.getFEDGE : TBits_1; inline;
  33684. begin
  33685. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33686. end;
  33687. procedure TICAP2_IC2CON.setSIDL; inline;
  33688. begin
  33689. pTDefRegMap(@Self)^.&set := $00002000;
  33690. end;
  33691. procedure TICAP2_IC2CON.clearSIDL; inline;
  33692. begin
  33693. pTDefRegMap(@Self)^.clr := $00002000;
  33694. end;
  33695. procedure TICAP2_IC2CON.setSIDL(thebits : TBits_1); inline;
  33696. begin
  33697. if thebits = 0 then
  33698. pTDefRegMap(@Self)^.clr := $00002000
  33699. else
  33700. pTDefRegMap(@Self)^.&set := $00002000;
  33701. end;
  33702. function TICAP2_IC2CON.getSIDL : TBits_1; inline;
  33703. begin
  33704. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33705. end;
  33706. procedure TICAP2_IC2CON.setON; inline;
  33707. begin
  33708. pTDefRegMap(@Self)^.&set := $00008000;
  33709. end;
  33710. procedure TICAP2_IC2CON.clearON; inline;
  33711. begin
  33712. pTDefRegMap(@Self)^.clr := $00008000;
  33713. end;
  33714. procedure TICAP2_IC2CON.setON(thebits : TBits_1); inline;
  33715. begin
  33716. if thebits = 0 then
  33717. pTDefRegMap(@Self)^.clr := $00008000
  33718. else
  33719. pTDefRegMap(@Self)^.&set := $00008000;
  33720. end;
  33721. function TICAP2_IC2CON.getON : TBits_1; inline;
  33722. begin
  33723. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33724. end;
  33725. procedure TICAP2_IC2CON.setICM0; inline;
  33726. begin
  33727. pTDefRegMap(@Self)^.&set := $00000001;
  33728. end;
  33729. procedure TICAP2_IC2CON.clearICM0; inline;
  33730. begin
  33731. pTDefRegMap(@Self)^.clr := $00000001;
  33732. end;
  33733. procedure TICAP2_IC2CON.setICM0(thebits : TBits_1); inline;
  33734. begin
  33735. if thebits = 0 then
  33736. pTDefRegMap(@Self)^.clr := $00000001
  33737. else
  33738. pTDefRegMap(@Self)^.&set := $00000001;
  33739. end;
  33740. function TICAP2_IC2CON.getICM0 : TBits_1; inline;
  33741. begin
  33742. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33743. end;
  33744. procedure TICAP2_IC2CON.setICM1; inline;
  33745. begin
  33746. pTDefRegMap(@Self)^.&set := $00000002;
  33747. end;
  33748. procedure TICAP2_IC2CON.clearICM1; inline;
  33749. begin
  33750. pTDefRegMap(@Self)^.clr := $00000002;
  33751. end;
  33752. procedure TICAP2_IC2CON.setICM1(thebits : TBits_1); inline;
  33753. begin
  33754. if thebits = 0 then
  33755. pTDefRegMap(@Self)^.clr := $00000002
  33756. else
  33757. pTDefRegMap(@Self)^.&set := $00000002;
  33758. end;
  33759. function TICAP2_IC2CON.getICM1 : TBits_1; inline;
  33760. begin
  33761. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33762. end;
  33763. procedure TICAP2_IC2CON.setICM2; inline;
  33764. begin
  33765. pTDefRegMap(@Self)^.&set := $00000004;
  33766. end;
  33767. procedure TICAP2_IC2CON.clearICM2; inline;
  33768. begin
  33769. pTDefRegMap(@Self)^.clr := $00000004;
  33770. end;
  33771. procedure TICAP2_IC2CON.setICM2(thebits : TBits_1); inline;
  33772. begin
  33773. if thebits = 0 then
  33774. pTDefRegMap(@Self)^.clr := $00000004
  33775. else
  33776. pTDefRegMap(@Self)^.&set := $00000004;
  33777. end;
  33778. function TICAP2_IC2CON.getICM2 : TBits_1; inline;
  33779. begin
  33780. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33781. end;
  33782. procedure TICAP2_IC2CON.setICI0; inline;
  33783. begin
  33784. pTDefRegMap(@Self)^.&set := $00000020;
  33785. end;
  33786. procedure TICAP2_IC2CON.clearICI0; inline;
  33787. begin
  33788. pTDefRegMap(@Self)^.clr := $00000020;
  33789. end;
  33790. procedure TICAP2_IC2CON.setICI0(thebits : TBits_1); inline;
  33791. begin
  33792. if thebits = 0 then
  33793. pTDefRegMap(@Self)^.clr := $00000020
  33794. else
  33795. pTDefRegMap(@Self)^.&set := $00000020;
  33796. end;
  33797. function TICAP2_IC2CON.getICI0 : TBits_1; inline;
  33798. begin
  33799. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33800. end;
  33801. procedure TICAP2_IC2CON.setICI1; inline;
  33802. begin
  33803. pTDefRegMap(@Self)^.&set := $00000040;
  33804. end;
  33805. procedure TICAP2_IC2CON.clearICI1; inline;
  33806. begin
  33807. pTDefRegMap(@Self)^.clr := $00000040;
  33808. end;
  33809. procedure TICAP2_IC2CON.setICI1(thebits : TBits_1); inline;
  33810. begin
  33811. if thebits = 0 then
  33812. pTDefRegMap(@Self)^.clr := $00000040
  33813. else
  33814. pTDefRegMap(@Self)^.&set := $00000040;
  33815. end;
  33816. function TICAP2_IC2CON.getICI1 : TBits_1; inline;
  33817. begin
  33818. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33819. end;
  33820. procedure TICAP2_IC2CON.setICSIDL; inline;
  33821. begin
  33822. pTDefRegMap(@Self)^.&set := $00002000;
  33823. end;
  33824. procedure TICAP2_IC2CON.clearICSIDL; inline;
  33825. begin
  33826. pTDefRegMap(@Self)^.clr := $00002000;
  33827. end;
  33828. procedure TICAP2_IC2CON.setICSIDL(thebits : TBits_1); inline;
  33829. begin
  33830. if thebits = 0 then
  33831. pTDefRegMap(@Self)^.clr := $00002000
  33832. else
  33833. pTDefRegMap(@Self)^.&set := $00002000;
  33834. end;
  33835. function TICAP2_IC2CON.getICSIDL : TBits_1; inline;
  33836. begin
  33837. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33838. end;
  33839. procedure TICAP2_IC2CON.setw(thebits : TBits_32); inline;
  33840. begin
  33841. pTDefRegMap(@Self)^.val := thebits;
  33842. end;
  33843. function TICAP2_IC2CON.getw : TBits_32; inline;
  33844. begin
  33845. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33846. end;
  33847. procedure TICAP3_IC3CON.setICM(thebits : TBits_3); inline;
  33848. begin
  33849. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33850. end;
  33851. function TICAP3_IC3CON.getICM : TBits_3; inline;
  33852. begin
  33853. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33854. end;
  33855. procedure TICAP3_IC3CON.setICBNE; inline;
  33856. begin
  33857. pTDefRegMap(@Self)^.&set := $00000008;
  33858. end;
  33859. procedure TICAP3_IC3CON.clearICBNE; inline;
  33860. begin
  33861. pTDefRegMap(@Self)^.clr := $00000008;
  33862. end;
  33863. procedure TICAP3_IC3CON.setICBNE(thebits : TBits_1); inline;
  33864. begin
  33865. if thebits = 0 then
  33866. pTDefRegMap(@Self)^.clr := $00000008
  33867. else
  33868. pTDefRegMap(@Self)^.&set := $00000008;
  33869. end;
  33870. function TICAP3_IC3CON.getICBNE : TBits_1; inline;
  33871. begin
  33872. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33873. end;
  33874. procedure TICAP3_IC3CON.setICOV; inline;
  33875. begin
  33876. pTDefRegMap(@Self)^.&set := $00000010;
  33877. end;
  33878. procedure TICAP3_IC3CON.clearICOV; inline;
  33879. begin
  33880. pTDefRegMap(@Self)^.clr := $00000010;
  33881. end;
  33882. procedure TICAP3_IC3CON.setICOV(thebits : TBits_1); inline;
  33883. begin
  33884. if thebits = 0 then
  33885. pTDefRegMap(@Self)^.clr := $00000010
  33886. else
  33887. pTDefRegMap(@Self)^.&set := $00000010;
  33888. end;
  33889. function TICAP3_IC3CON.getICOV : TBits_1; inline;
  33890. begin
  33891. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33892. end;
  33893. procedure TICAP3_IC3CON.setICI(thebits : TBits_2); inline;
  33894. begin
  33895. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  33896. end;
  33897. function TICAP3_IC3CON.getICI : TBits_2; inline;
  33898. begin
  33899. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  33900. end;
  33901. procedure TICAP3_IC3CON.setICTMR; inline;
  33902. begin
  33903. pTDefRegMap(@Self)^.&set := $00000080;
  33904. end;
  33905. procedure TICAP3_IC3CON.clearICTMR; inline;
  33906. begin
  33907. pTDefRegMap(@Self)^.clr := $00000080;
  33908. end;
  33909. procedure TICAP3_IC3CON.setICTMR(thebits : TBits_1); inline;
  33910. begin
  33911. if thebits = 0 then
  33912. pTDefRegMap(@Self)^.clr := $00000080
  33913. else
  33914. pTDefRegMap(@Self)^.&set := $00000080;
  33915. end;
  33916. function TICAP3_IC3CON.getICTMR : TBits_1; inline;
  33917. begin
  33918. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33919. end;
  33920. procedure TICAP3_IC3CON.setC32; inline;
  33921. begin
  33922. pTDefRegMap(@Self)^.&set := $00000100;
  33923. end;
  33924. procedure TICAP3_IC3CON.clearC32; inline;
  33925. begin
  33926. pTDefRegMap(@Self)^.clr := $00000100;
  33927. end;
  33928. procedure TICAP3_IC3CON.setC32(thebits : TBits_1); inline;
  33929. begin
  33930. if thebits = 0 then
  33931. pTDefRegMap(@Self)^.clr := $00000100
  33932. else
  33933. pTDefRegMap(@Self)^.&set := $00000100;
  33934. end;
  33935. function TICAP3_IC3CON.getC32 : TBits_1; inline;
  33936. begin
  33937. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33938. end;
  33939. procedure TICAP3_IC3CON.setFEDGE; inline;
  33940. begin
  33941. pTDefRegMap(@Self)^.&set := $00000200;
  33942. end;
  33943. procedure TICAP3_IC3CON.clearFEDGE; inline;
  33944. begin
  33945. pTDefRegMap(@Self)^.clr := $00000200;
  33946. end;
  33947. procedure TICAP3_IC3CON.setFEDGE(thebits : TBits_1); inline;
  33948. begin
  33949. if thebits = 0 then
  33950. pTDefRegMap(@Self)^.clr := $00000200
  33951. else
  33952. pTDefRegMap(@Self)^.&set := $00000200;
  33953. end;
  33954. function TICAP3_IC3CON.getFEDGE : TBits_1; inline;
  33955. begin
  33956. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33957. end;
  33958. procedure TICAP3_IC3CON.setSIDL; inline;
  33959. begin
  33960. pTDefRegMap(@Self)^.&set := $00002000;
  33961. end;
  33962. procedure TICAP3_IC3CON.clearSIDL; inline;
  33963. begin
  33964. pTDefRegMap(@Self)^.clr := $00002000;
  33965. end;
  33966. procedure TICAP3_IC3CON.setSIDL(thebits : TBits_1); inline;
  33967. begin
  33968. if thebits = 0 then
  33969. pTDefRegMap(@Self)^.clr := $00002000
  33970. else
  33971. pTDefRegMap(@Self)^.&set := $00002000;
  33972. end;
  33973. function TICAP3_IC3CON.getSIDL : TBits_1; inline;
  33974. begin
  33975. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33976. end;
  33977. procedure TICAP3_IC3CON.setON; inline;
  33978. begin
  33979. pTDefRegMap(@Self)^.&set := $00008000;
  33980. end;
  33981. procedure TICAP3_IC3CON.clearON; inline;
  33982. begin
  33983. pTDefRegMap(@Self)^.clr := $00008000;
  33984. end;
  33985. procedure TICAP3_IC3CON.setON(thebits : TBits_1); inline;
  33986. begin
  33987. if thebits = 0 then
  33988. pTDefRegMap(@Self)^.clr := $00008000
  33989. else
  33990. pTDefRegMap(@Self)^.&set := $00008000;
  33991. end;
  33992. function TICAP3_IC3CON.getON : TBits_1; inline;
  33993. begin
  33994. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33995. end;
  33996. procedure TICAP3_IC3CON.setICM0; inline;
  33997. begin
  33998. pTDefRegMap(@Self)^.&set := $00000001;
  33999. end;
  34000. procedure TICAP3_IC3CON.clearICM0; inline;
  34001. begin
  34002. pTDefRegMap(@Self)^.clr := $00000001;
  34003. end;
  34004. procedure TICAP3_IC3CON.setICM0(thebits : TBits_1); inline;
  34005. begin
  34006. if thebits = 0 then
  34007. pTDefRegMap(@Self)^.clr := $00000001
  34008. else
  34009. pTDefRegMap(@Self)^.&set := $00000001;
  34010. end;
  34011. function TICAP3_IC3CON.getICM0 : TBits_1; inline;
  34012. begin
  34013. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34014. end;
  34015. procedure TICAP3_IC3CON.setICM1; inline;
  34016. begin
  34017. pTDefRegMap(@Self)^.&set := $00000002;
  34018. end;
  34019. procedure TICAP3_IC3CON.clearICM1; inline;
  34020. begin
  34021. pTDefRegMap(@Self)^.clr := $00000002;
  34022. end;
  34023. procedure TICAP3_IC3CON.setICM1(thebits : TBits_1); inline;
  34024. begin
  34025. if thebits = 0 then
  34026. pTDefRegMap(@Self)^.clr := $00000002
  34027. else
  34028. pTDefRegMap(@Self)^.&set := $00000002;
  34029. end;
  34030. function TICAP3_IC3CON.getICM1 : TBits_1; inline;
  34031. begin
  34032. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34033. end;
  34034. procedure TICAP3_IC3CON.setICM2; inline;
  34035. begin
  34036. pTDefRegMap(@Self)^.&set := $00000004;
  34037. end;
  34038. procedure TICAP3_IC3CON.clearICM2; inline;
  34039. begin
  34040. pTDefRegMap(@Self)^.clr := $00000004;
  34041. end;
  34042. procedure TICAP3_IC3CON.setICM2(thebits : TBits_1); inline;
  34043. begin
  34044. if thebits = 0 then
  34045. pTDefRegMap(@Self)^.clr := $00000004
  34046. else
  34047. pTDefRegMap(@Self)^.&set := $00000004;
  34048. end;
  34049. function TICAP3_IC3CON.getICM2 : TBits_1; inline;
  34050. begin
  34051. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34052. end;
  34053. procedure TICAP3_IC3CON.setICI0; inline;
  34054. begin
  34055. pTDefRegMap(@Self)^.&set := $00000020;
  34056. end;
  34057. procedure TICAP3_IC3CON.clearICI0; inline;
  34058. begin
  34059. pTDefRegMap(@Self)^.clr := $00000020;
  34060. end;
  34061. procedure TICAP3_IC3CON.setICI0(thebits : TBits_1); inline;
  34062. begin
  34063. if thebits = 0 then
  34064. pTDefRegMap(@Self)^.clr := $00000020
  34065. else
  34066. pTDefRegMap(@Self)^.&set := $00000020;
  34067. end;
  34068. function TICAP3_IC3CON.getICI0 : TBits_1; inline;
  34069. begin
  34070. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34071. end;
  34072. procedure TICAP3_IC3CON.setICI1; inline;
  34073. begin
  34074. pTDefRegMap(@Self)^.&set := $00000040;
  34075. end;
  34076. procedure TICAP3_IC3CON.clearICI1; inline;
  34077. begin
  34078. pTDefRegMap(@Self)^.clr := $00000040;
  34079. end;
  34080. procedure TICAP3_IC3CON.setICI1(thebits : TBits_1); inline;
  34081. begin
  34082. if thebits = 0 then
  34083. pTDefRegMap(@Self)^.clr := $00000040
  34084. else
  34085. pTDefRegMap(@Self)^.&set := $00000040;
  34086. end;
  34087. function TICAP3_IC3CON.getICI1 : TBits_1; inline;
  34088. begin
  34089. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34090. end;
  34091. procedure TICAP3_IC3CON.setICSIDL; inline;
  34092. begin
  34093. pTDefRegMap(@Self)^.&set := $00002000;
  34094. end;
  34095. procedure TICAP3_IC3CON.clearICSIDL; inline;
  34096. begin
  34097. pTDefRegMap(@Self)^.clr := $00002000;
  34098. end;
  34099. procedure TICAP3_IC3CON.setICSIDL(thebits : TBits_1); inline;
  34100. begin
  34101. if thebits = 0 then
  34102. pTDefRegMap(@Self)^.clr := $00002000
  34103. else
  34104. pTDefRegMap(@Self)^.&set := $00002000;
  34105. end;
  34106. function TICAP3_IC3CON.getICSIDL : TBits_1; inline;
  34107. begin
  34108. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34109. end;
  34110. procedure TICAP3_IC3CON.setw(thebits : TBits_32); inline;
  34111. begin
  34112. pTDefRegMap(@Self)^.val := thebits;
  34113. end;
  34114. function TICAP3_IC3CON.getw : TBits_32; inline;
  34115. begin
  34116. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34117. end;
  34118. procedure TICAP4_IC4CON.setICM(thebits : TBits_3); inline;
  34119. begin
  34120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  34121. end;
  34122. function TICAP4_IC4CON.getICM : TBits_3; inline;
  34123. begin
  34124. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  34125. end;
  34126. procedure TICAP4_IC4CON.setICBNE; inline;
  34127. begin
  34128. pTDefRegMap(@Self)^.&set := $00000008;
  34129. end;
  34130. procedure TICAP4_IC4CON.clearICBNE; inline;
  34131. begin
  34132. pTDefRegMap(@Self)^.clr := $00000008;
  34133. end;
  34134. procedure TICAP4_IC4CON.setICBNE(thebits : TBits_1); inline;
  34135. begin
  34136. if thebits = 0 then
  34137. pTDefRegMap(@Self)^.clr := $00000008
  34138. else
  34139. pTDefRegMap(@Self)^.&set := $00000008;
  34140. end;
  34141. function TICAP4_IC4CON.getICBNE : TBits_1; inline;
  34142. begin
  34143. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34144. end;
  34145. procedure TICAP4_IC4CON.setICOV; inline;
  34146. begin
  34147. pTDefRegMap(@Self)^.&set := $00000010;
  34148. end;
  34149. procedure TICAP4_IC4CON.clearICOV; inline;
  34150. begin
  34151. pTDefRegMap(@Self)^.clr := $00000010;
  34152. end;
  34153. procedure TICAP4_IC4CON.setICOV(thebits : TBits_1); inline;
  34154. begin
  34155. if thebits = 0 then
  34156. pTDefRegMap(@Self)^.clr := $00000010
  34157. else
  34158. pTDefRegMap(@Self)^.&set := $00000010;
  34159. end;
  34160. function TICAP4_IC4CON.getICOV : TBits_1; inline;
  34161. begin
  34162. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34163. end;
  34164. procedure TICAP4_IC4CON.setICI(thebits : TBits_2); inline;
  34165. begin
  34166. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  34167. end;
  34168. function TICAP4_IC4CON.getICI : TBits_2; inline;
  34169. begin
  34170. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  34171. end;
  34172. procedure TICAP4_IC4CON.setICTMR; inline;
  34173. begin
  34174. pTDefRegMap(@Self)^.&set := $00000080;
  34175. end;
  34176. procedure TICAP4_IC4CON.clearICTMR; inline;
  34177. begin
  34178. pTDefRegMap(@Self)^.clr := $00000080;
  34179. end;
  34180. procedure TICAP4_IC4CON.setICTMR(thebits : TBits_1); inline;
  34181. begin
  34182. if thebits = 0 then
  34183. pTDefRegMap(@Self)^.clr := $00000080
  34184. else
  34185. pTDefRegMap(@Self)^.&set := $00000080;
  34186. end;
  34187. function TICAP4_IC4CON.getICTMR : TBits_1; inline;
  34188. begin
  34189. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34190. end;
  34191. procedure TICAP4_IC4CON.setC32; inline;
  34192. begin
  34193. pTDefRegMap(@Self)^.&set := $00000100;
  34194. end;
  34195. procedure TICAP4_IC4CON.clearC32; inline;
  34196. begin
  34197. pTDefRegMap(@Self)^.clr := $00000100;
  34198. end;
  34199. procedure TICAP4_IC4CON.setC32(thebits : TBits_1); inline;
  34200. begin
  34201. if thebits = 0 then
  34202. pTDefRegMap(@Self)^.clr := $00000100
  34203. else
  34204. pTDefRegMap(@Self)^.&set := $00000100;
  34205. end;
  34206. function TICAP4_IC4CON.getC32 : TBits_1; inline;
  34207. begin
  34208. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34209. end;
  34210. procedure TICAP4_IC4CON.setFEDGE; inline;
  34211. begin
  34212. pTDefRegMap(@Self)^.&set := $00000200;
  34213. end;
  34214. procedure TICAP4_IC4CON.clearFEDGE; inline;
  34215. begin
  34216. pTDefRegMap(@Self)^.clr := $00000200;
  34217. end;
  34218. procedure TICAP4_IC4CON.setFEDGE(thebits : TBits_1); inline;
  34219. begin
  34220. if thebits = 0 then
  34221. pTDefRegMap(@Self)^.clr := $00000200
  34222. else
  34223. pTDefRegMap(@Self)^.&set := $00000200;
  34224. end;
  34225. function TICAP4_IC4CON.getFEDGE : TBits_1; inline;
  34226. begin
  34227. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34228. end;
  34229. procedure TICAP4_IC4CON.setSIDL; inline;
  34230. begin
  34231. pTDefRegMap(@Self)^.&set := $00002000;
  34232. end;
  34233. procedure TICAP4_IC4CON.clearSIDL; inline;
  34234. begin
  34235. pTDefRegMap(@Self)^.clr := $00002000;
  34236. end;
  34237. procedure TICAP4_IC4CON.setSIDL(thebits : TBits_1); inline;
  34238. begin
  34239. if thebits = 0 then
  34240. pTDefRegMap(@Self)^.clr := $00002000
  34241. else
  34242. pTDefRegMap(@Self)^.&set := $00002000;
  34243. end;
  34244. function TICAP4_IC4CON.getSIDL : TBits_1; inline;
  34245. begin
  34246. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34247. end;
  34248. procedure TICAP4_IC4CON.setON; inline;
  34249. begin
  34250. pTDefRegMap(@Self)^.&set := $00008000;
  34251. end;
  34252. procedure TICAP4_IC4CON.clearON; inline;
  34253. begin
  34254. pTDefRegMap(@Self)^.clr := $00008000;
  34255. end;
  34256. procedure TICAP4_IC4CON.setON(thebits : TBits_1); inline;
  34257. begin
  34258. if thebits = 0 then
  34259. pTDefRegMap(@Self)^.clr := $00008000
  34260. else
  34261. pTDefRegMap(@Self)^.&set := $00008000;
  34262. end;
  34263. function TICAP4_IC4CON.getON : TBits_1; inline;
  34264. begin
  34265. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34266. end;
  34267. procedure TICAP4_IC4CON.setICM0; inline;
  34268. begin
  34269. pTDefRegMap(@Self)^.&set := $00000001;
  34270. end;
  34271. procedure TICAP4_IC4CON.clearICM0; inline;
  34272. begin
  34273. pTDefRegMap(@Self)^.clr := $00000001;
  34274. end;
  34275. procedure TICAP4_IC4CON.setICM0(thebits : TBits_1); inline;
  34276. begin
  34277. if thebits = 0 then
  34278. pTDefRegMap(@Self)^.clr := $00000001
  34279. else
  34280. pTDefRegMap(@Self)^.&set := $00000001;
  34281. end;
  34282. function TICAP4_IC4CON.getICM0 : TBits_1; inline;
  34283. begin
  34284. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34285. end;
  34286. procedure TICAP4_IC4CON.setICM1; inline;
  34287. begin
  34288. pTDefRegMap(@Self)^.&set := $00000002;
  34289. end;
  34290. procedure TICAP4_IC4CON.clearICM1; inline;
  34291. begin
  34292. pTDefRegMap(@Self)^.clr := $00000002;
  34293. end;
  34294. procedure TICAP4_IC4CON.setICM1(thebits : TBits_1); inline;
  34295. begin
  34296. if thebits = 0 then
  34297. pTDefRegMap(@Self)^.clr := $00000002
  34298. else
  34299. pTDefRegMap(@Self)^.&set := $00000002;
  34300. end;
  34301. function TICAP4_IC4CON.getICM1 : TBits_1; inline;
  34302. begin
  34303. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34304. end;
  34305. procedure TICAP4_IC4CON.setICM2; inline;
  34306. begin
  34307. pTDefRegMap(@Self)^.&set := $00000004;
  34308. end;
  34309. procedure TICAP4_IC4CON.clearICM2; inline;
  34310. begin
  34311. pTDefRegMap(@Self)^.clr := $00000004;
  34312. end;
  34313. procedure TICAP4_IC4CON.setICM2(thebits : TBits_1); inline;
  34314. begin
  34315. if thebits = 0 then
  34316. pTDefRegMap(@Self)^.clr := $00000004
  34317. else
  34318. pTDefRegMap(@Self)^.&set := $00000004;
  34319. end;
  34320. function TICAP4_IC4CON.getICM2 : TBits_1; inline;
  34321. begin
  34322. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34323. end;
  34324. procedure TICAP4_IC4CON.setICI0; inline;
  34325. begin
  34326. pTDefRegMap(@Self)^.&set := $00000020;
  34327. end;
  34328. procedure TICAP4_IC4CON.clearICI0; inline;
  34329. begin
  34330. pTDefRegMap(@Self)^.clr := $00000020;
  34331. end;
  34332. procedure TICAP4_IC4CON.setICI0(thebits : TBits_1); inline;
  34333. begin
  34334. if thebits = 0 then
  34335. pTDefRegMap(@Self)^.clr := $00000020
  34336. else
  34337. pTDefRegMap(@Self)^.&set := $00000020;
  34338. end;
  34339. function TICAP4_IC4CON.getICI0 : TBits_1; inline;
  34340. begin
  34341. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34342. end;
  34343. procedure TICAP4_IC4CON.setICI1; inline;
  34344. begin
  34345. pTDefRegMap(@Self)^.&set := $00000040;
  34346. end;
  34347. procedure TICAP4_IC4CON.clearICI1; inline;
  34348. begin
  34349. pTDefRegMap(@Self)^.clr := $00000040;
  34350. end;
  34351. procedure TICAP4_IC4CON.setICI1(thebits : TBits_1); inline;
  34352. begin
  34353. if thebits = 0 then
  34354. pTDefRegMap(@Self)^.clr := $00000040
  34355. else
  34356. pTDefRegMap(@Self)^.&set := $00000040;
  34357. end;
  34358. function TICAP4_IC4CON.getICI1 : TBits_1; inline;
  34359. begin
  34360. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34361. end;
  34362. procedure TICAP4_IC4CON.setICSIDL; inline;
  34363. begin
  34364. pTDefRegMap(@Self)^.&set := $00002000;
  34365. end;
  34366. procedure TICAP4_IC4CON.clearICSIDL; inline;
  34367. begin
  34368. pTDefRegMap(@Self)^.clr := $00002000;
  34369. end;
  34370. procedure TICAP4_IC4CON.setICSIDL(thebits : TBits_1); inline;
  34371. begin
  34372. if thebits = 0 then
  34373. pTDefRegMap(@Self)^.clr := $00002000
  34374. else
  34375. pTDefRegMap(@Self)^.&set := $00002000;
  34376. end;
  34377. function TICAP4_IC4CON.getICSIDL : TBits_1; inline;
  34378. begin
  34379. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34380. end;
  34381. procedure TICAP4_IC4CON.setw(thebits : TBits_32); inline;
  34382. begin
  34383. pTDefRegMap(@Self)^.val := thebits;
  34384. end;
  34385. function TICAP4_IC4CON.getw : TBits_32; inline;
  34386. begin
  34387. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34388. end;
  34389. procedure TICAP5_IC5CON.setICM(thebits : TBits_3); inline;
  34390. begin
  34391. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  34392. end;
  34393. function TICAP5_IC5CON.getICM : TBits_3; inline;
  34394. begin
  34395. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  34396. end;
  34397. procedure TICAP5_IC5CON.setICBNE; inline;
  34398. begin
  34399. pTDefRegMap(@Self)^.&set := $00000008;
  34400. end;
  34401. procedure TICAP5_IC5CON.clearICBNE; inline;
  34402. begin
  34403. pTDefRegMap(@Self)^.clr := $00000008;
  34404. end;
  34405. procedure TICAP5_IC5CON.setICBNE(thebits : TBits_1); inline;
  34406. begin
  34407. if thebits = 0 then
  34408. pTDefRegMap(@Self)^.clr := $00000008
  34409. else
  34410. pTDefRegMap(@Self)^.&set := $00000008;
  34411. end;
  34412. function TICAP5_IC5CON.getICBNE : TBits_1; inline;
  34413. begin
  34414. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34415. end;
  34416. procedure TICAP5_IC5CON.setICOV; inline;
  34417. begin
  34418. pTDefRegMap(@Self)^.&set := $00000010;
  34419. end;
  34420. procedure TICAP5_IC5CON.clearICOV; inline;
  34421. begin
  34422. pTDefRegMap(@Self)^.clr := $00000010;
  34423. end;
  34424. procedure TICAP5_IC5CON.setICOV(thebits : TBits_1); inline;
  34425. begin
  34426. if thebits = 0 then
  34427. pTDefRegMap(@Self)^.clr := $00000010
  34428. else
  34429. pTDefRegMap(@Self)^.&set := $00000010;
  34430. end;
  34431. function TICAP5_IC5CON.getICOV : TBits_1; inline;
  34432. begin
  34433. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34434. end;
  34435. procedure TICAP5_IC5CON.setICI(thebits : TBits_2); inline;
  34436. begin
  34437. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  34438. end;
  34439. function TICAP5_IC5CON.getICI : TBits_2; inline;
  34440. begin
  34441. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  34442. end;
  34443. procedure TICAP5_IC5CON.setICTMR; inline;
  34444. begin
  34445. pTDefRegMap(@Self)^.&set := $00000080;
  34446. end;
  34447. procedure TICAP5_IC5CON.clearICTMR; inline;
  34448. begin
  34449. pTDefRegMap(@Self)^.clr := $00000080;
  34450. end;
  34451. procedure TICAP5_IC5CON.setICTMR(thebits : TBits_1); inline;
  34452. begin
  34453. if thebits = 0 then
  34454. pTDefRegMap(@Self)^.clr := $00000080
  34455. else
  34456. pTDefRegMap(@Self)^.&set := $00000080;
  34457. end;
  34458. function TICAP5_IC5CON.getICTMR : TBits_1; inline;
  34459. begin
  34460. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34461. end;
  34462. procedure TICAP5_IC5CON.setC32; inline;
  34463. begin
  34464. pTDefRegMap(@Self)^.&set := $00000100;
  34465. end;
  34466. procedure TICAP5_IC5CON.clearC32; inline;
  34467. begin
  34468. pTDefRegMap(@Self)^.clr := $00000100;
  34469. end;
  34470. procedure TICAP5_IC5CON.setC32(thebits : TBits_1); inline;
  34471. begin
  34472. if thebits = 0 then
  34473. pTDefRegMap(@Self)^.clr := $00000100
  34474. else
  34475. pTDefRegMap(@Self)^.&set := $00000100;
  34476. end;
  34477. function TICAP5_IC5CON.getC32 : TBits_1; inline;
  34478. begin
  34479. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34480. end;
  34481. procedure TICAP5_IC5CON.setFEDGE; inline;
  34482. begin
  34483. pTDefRegMap(@Self)^.&set := $00000200;
  34484. end;
  34485. procedure TICAP5_IC5CON.clearFEDGE; inline;
  34486. begin
  34487. pTDefRegMap(@Self)^.clr := $00000200;
  34488. end;
  34489. procedure TICAP5_IC5CON.setFEDGE(thebits : TBits_1); inline;
  34490. begin
  34491. if thebits = 0 then
  34492. pTDefRegMap(@Self)^.clr := $00000200
  34493. else
  34494. pTDefRegMap(@Self)^.&set := $00000200;
  34495. end;
  34496. function TICAP5_IC5CON.getFEDGE : TBits_1; inline;
  34497. begin
  34498. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34499. end;
  34500. procedure TICAP5_IC5CON.setSIDL; inline;
  34501. begin
  34502. pTDefRegMap(@Self)^.&set := $00002000;
  34503. end;
  34504. procedure TICAP5_IC5CON.clearSIDL; inline;
  34505. begin
  34506. pTDefRegMap(@Self)^.clr := $00002000;
  34507. end;
  34508. procedure TICAP5_IC5CON.setSIDL(thebits : TBits_1); inline;
  34509. begin
  34510. if thebits = 0 then
  34511. pTDefRegMap(@Self)^.clr := $00002000
  34512. else
  34513. pTDefRegMap(@Self)^.&set := $00002000;
  34514. end;
  34515. function TICAP5_IC5CON.getSIDL : TBits_1; inline;
  34516. begin
  34517. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34518. end;
  34519. procedure TICAP5_IC5CON.setON; inline;
  34520. begin
  34521. pTDefRegMap(@Self)^.&set := $00008000;
  34522. end;
  34523. procedure TICAP5_IC5CON.clearON; inline;
  34524. begin
  34525. pTDefRegMap(@Self)^.clr := $00008000;
  34526. end;
  34527. procedure TICAP5_IC5CON.setON(thebits : TBits_1); inline;
  34528. begin
  34529. if thebits = 0 then
  34530. pTDefRegMap(@Self)^.clr := $00008000
  34531. else
  34532. pTDefRegMap(@Self)^.&set := $00008000;
  34533. end;
  34534. function TICAP5_IC5CON.getON : TBits_1; inline;
  34535. begin
  34536. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34537. end;
  34538. procedure TICAP5_IC5CON.setICM0; inline;
  34539. begin
  34540. pTDefRegMap(@Self)^.&set := $00000001;
  34541. end;
  34542. procedure TICAP5_IC5CON.clearICM0; inline;
  34543. begin
  34544. pTDefRegMap(@Self)^.clr := $00000001;
  34545. end;
  34546. procedure TICAP5_IC5CON.setICM0(thebits : TBits_1); inline;
  34547. begin
  34548. if thebits = 0 then
  34549. pTDefRegMap(@Self)^.clr := $00000001
  34550. else
  34551. pTDefRegMap(@Self)^.&set := $00000001;
  34552. end;
  34553. function TICAP5_IC5CON.getICM0 : TBits_1; inline;
  34554. begin
  34555. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34556. end;
  34557. procedure TICAP5_IC5CON.setICM1; inline;
  34558. begin
  34559. pTDefRegMap(@Self)^.&set := $00000002;
  34560. end;
  34561. procedure TICAP5_IC5CON.clearICM1; inline;
  34562. begin
  34563. pTDefRegMap(@Self)^.clr := $00000002;
  34564. end;
  34565. procedure TICAP5_IC5CON.setICM1(thebits : TBits_1); inline;
  34566. begin
  34567. if thebits = 0 then
  34568. pTDefRegMap(@Self)^.clr := $00000002
  34569. else
  34570. pTDefRegMap(@Self)^.&set := $00000002;
  34571. end;
  34572. function TICAP5_IC5CON.getICM1 : TBits_1; inline;
  34573. begin
  34574. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34575. end;
  34576. procedure TICAP5_IC5CON.setICM2; inline;
  34577. begin
  34578. pTDefRegMap(@Self)^.&set := $00000004;
  34579. end;
  34580. procedure TICAP5_IC5CON.clearICM2; inline;
  34581. begin
  34582. pTDefRegMap(@Self)^.clr := $00000004;
  34583. end;
  34584. procedure TICAP5_IC5CON.setICM2(thebits : TBits_1); inline;
  34585. begin
  34586. if thebits = 0 then
  34587. pTDefRegMap(@Self)^.clr := $00000004
  34588. else
  34589. pTDefRegMap(@Self)^.&set := $00000004;
  34590. end;
  34591. function TICAP5_IC5CON.getICM2 : TBits_1; inline;
  34592. begin
  34593. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34594. end;
  34595. procedure TICAP5_IC5CON.setICI0; inline;
  34596. begin
  34597. pTDefRegMap(@Self)^.&set := $00000020;
  34598. end;
  34599. procedure TICAP5_IC5CON.clearICI0; inline;
  34600. begin
  34601. pTDefRegMap(@Self)^.clr := $00000020;
  34602. end;
  34603. procedure TICAP5_IC5CON.setICI0(thebits : TBits_1); inline;
  34604. begin
  34605. if thebits = 0 then
  34606. pTDefRegMap(@Self)^.clr := $00000020
  34607. else
  34608. pTDefRegMap(@Self)^.&set := $00000020;
  34609. end;
  34610. function TICAP5_IC5CON.getICI0 : TBits_1; inline;
  34611. begin
  34612. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34613. end;
  34614. procedure TICAP5_IC5CON.setICI1; inline;
  34615. begin
  34616. pTDefRegMap(@Self)^.&set := $00000040;
  34617. end;
  34618. procedure TICAP5_IC5CON.clearICI1; inline;
  34619. begin
  34620. pTDefRegMap(@Self)^.clr := $00000040;
  34621. end;
  34622. procedure TICAP5_IC5CON.setICI1(thebits : TBits_1); inline;
  34623. begin
  34624. if thebits = 0 then
  34625. pTDefRegMap(@Self)^.clr := $00000040
  34626. else
  34627. pTDefRegMap(@Self)^.&set := $00000040;
  34628. end;
  34629. function TICAP5_IC5CON.getICI1 : TBits_1; inline;
  34630. begin
  34631. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34632. end;
  34633. procedure TICAP5_IC5CON.setICSIDL; inline;
  34634. begin
  34635. pTDefRegMap(@Self)^.&set := $00002000;
  34636. end;
  34637. procedure TICAP5_IC5CON.clearICSIDL; inline;
  34638. begin
  34639. pTDefRegMap(@Self)^.clr := $00002000;
  34640. end;
  34641. procedure TICAP5_IC5CON.setICSIDL(thebits : TBits_1); inline;
  34642. begin
  34643. if thebits = 0 then
  34644. pTDefRegMap(@Self)^.clr := $00002000
  34645. else
  34646. pTDefRegMap(@Self)^.&set := $00002000;
  34647. end;
  34648. function TICAP5_IC5CON.getICSIDL : TBits_1; inline;
  34649. begin
  34650. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34651. end;
  34652. procedure TICAP5_IC5CON.setw(thebits : TBits_32); inline;
  34653. begin
  34654. pTDefRegMap(@Self)^.val := thebits;
  34655. end;
  34656. function TICAP5_IC5CON.getw : TBits_32; inline;
  34657. begin
  34658. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34659. end;
  34660. procedure TOCMP1_OC1CON.setOCM(thebits : TBits_3); inline;
  34661. begin
  34662. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  34663. end;
  34664. function TOCMP1_OC1CON.getOCM : TBits_3; inline;
  34665. begin
  34666. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  34667. end;
  34668. procedure TOCMP1_OC1CON.setOCTSEL; inline;
  34669. begin
  34670. pTDefRegMap(@Self)^.&set := $00000008;
  34671. end;
  34672. procedure TOCMP1_OC1CON.clearOCTSEL; inline;
  34673. begin
  34674. pTDefRegMap(@Self)^.clr := $00000008;
  34675. end;
  34676. procedure TOCMP1_OC1CON.setOCTSEL(thebits : TBits_1); inline;
  34677. begin
  34678. if thebits = 0 then
  34679. pTDefRegMap(@Self)^.clr := $00000008
  34680. else
  34681. pTDefRegMap(@Self)^.&set := $00000008;
  34682. end;
  34683. function TOCMP1_OC1CON.getOCTSEL : TBits_1; inline;
  34684. begin
  34685. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34686. end;
  34687. procedure TOCMP1_OC1CON.setOCFLT; inline;
  34688. begin
  34689. pTDefRegMap(@Self)^.&set := $00000010;
  34690. end;
  34691. procedure TOCMP1_OC1CON.clearOCFLT; inline;
  34692. begin
  34693. pTDefRegMap(@Self)^.clr := $00000010;
  34694. end;
  34695. procedure TOCMP1_OC1CON.setOCFLT(thebits : TBits_1); inline;
  34696. begin
  34697. if thebits = 0 then
  34698. pTDefRegMap(@Self)^.clr := $00000010
  34699. else
  34700. pTDefRegMap(@Self)^.&set := $00000010;
  34701. end;
  34702. function TOCMP1_OC1CON.getOCFLT : TBits_1; inline;
  34703. begin
  34704. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34705. end;
  34706. procedure TOCMP1_OC1CON.setOC32; inline;
  34707. begin
  34708. pTDefRegMap(@Self)^.&set := $00000020;
  34709. end;
  34710. procedure TOCMP1_OC1CON.clearOC32; inline;
  34711. begin
  34712. pTDefRegMap(@Self)^.clr := $00000020;
  34713. end;
  34714. procedure TOCMP1_OC1CON.setOC32(thebits : TBits_1); inline;
  34715. begin
  34716. if thebits = 0 then
  34717. pTDefRegMap(@Self)^.clr := $00000020
  34718. else
  34719. pTDefRegMap(@Self)^.&set := $00000020;
  34720. end;
  34721. function TOCMP1_OC1CON.getOC32 : TBits_1; inline;
  34722. begin
  34723. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34724. end;
  34725. procedure TOCMP1_OC1CON.setSIDL; inline;
  34726. begin
  34727. pTDefRegMap(@Self)^.&set := $00002000;
  34728. end;
  34729. procedure TOCMP1_OC1CON.clearSIDL; inline;
  34730. begin
  34731. pTDefRegMap(@Self)^.clr := $00002000;
  34732. end;
  34733. procedure TOCMP1_OC1CON.setSIDL(thebits : TBits_1); inline;
  34734. begin
  34735. if thebits = 0 then
  34736. pTDefRegMap(@Self)^.clr := $00002000
  34737. else
  34738. pTDefRegMap(@Self)^.&set := $00002000;
  34739. end;
  34740. function TOCMP1_OC1CON.getSIDL : TBits_1; inline;
  34741. begin
  34742. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34743. end;
  34744. procedure TOCMP1_OC1CON.setON; inline;
  34745. begin
  34746. pTDefRegMap(@Self)^.&set := $00008000;
  34747. end;
  34748. procedure TOCMP1_OC1CON.clearON; inline;
  34749. begin
  34750. pTDefRegMap(@Self)^.clr := $00008000;
  34751. end;
  34752. procedure TOCMP1_OC1CON.setON(thebits : TBits_1); inline;
  34753. begin
  34754. if thebits = 0 then
  34755. pTDefRegMap(@Self)^.clr := $00008000
  34756. else
  34757. pTDefRegMap(@Self)^.&set := $00008000;
  34758. end;
  34759. function TOCMP1_OC1CON.getON : TBits_1; inline;
  34760. begin
  34761. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34762. end;
  34763. procedure TOCMP1_OC1CON.setOCM0; inline;
  34764. begin
  34765. pTDefRegMap(@Self)^.&set := $00000001;
  34766. end;
  34767. procedure TOCMP1_OC1CON.clearOCM0; inline;
  34768. begin
  34769. pTDefRegMap(@Self)^.clr := $00000001;
  34770. end;
  34771. procedure TOCMP1_OC1CON.setOCM0(thebits : TBits_1); inline;
  34772. begin
  34773. if thebits = 0 then
  34774. pTDefRegMap(@Self)^.clr := $00000001
  34775. else
  34776. pTDefRegMap(@Self)^.&set := $00000001;
  34777. end;
  34778. function TOCMP1_OC1CON.getOCM0 : TBits_1; inline;
  34779. begin
  34780. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34781. end;
  34782. procedure TOCMP1_OC1CON.setOCM1; inline;
  34783. begin
  34784. pTDefRegMap(@Self)^.&set := $00000002;
  34785. end;
  34786. procedure TOCMP1_OC1CON.clearOCM1; inline;
  34787. begin
  34788. pTDefRegMap(@Self)^.clr := $00000002;
  34789. end;
  34790. procedure TOCMP1_OC1CON.setOCM1(thebits : TBits_1); inline;
  34791. begin
  34792. if thebits = 0 then
  34793. pTDefRegMap(@Self)^.clr := $00000002
  34794. else
  34795. pTDefRegMap(@Self)^.&set := $00000002;
  34796. end;
  34797. function TOCMP1_OC1CON.getOCM1 : TBits_1; inline;
  34798. begin
  34799. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34800. end;
  34801. procedure TOCMP1_OC1CON.setOCM2; inline;
  34802. begin
  34803. pTDefRegMap(@Self)^.&set := $00000004;
  34804. end;
  34805. procedure TOCMP1_OC1CON.clearOCM2; inline;
  34806. begin
  34807. pTDefRegMap(@Self)^.clr := $00000004;
  34808. end;
  34809. procedure TOCMP1_OC1CON.setOCM2(thebits : TBits_1); inline;
  34810. begin
  34811. if thebits = 0 then
  34812. pTDefRegMap(@Self)^.clr := $00000004
  34813. else
  34814. pTDefRegMap(@Self)^.&set := $00000004;
  34815. end;
  34816. function TOCMP1_OC1CON.getOCM2 : TBits_1; inline;
  34817. begin
  34818. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34819. end;
  34820. procedure TOCMP1_OC1CON.setOCSIDL; inline;
  34821. begin
  34822. pTDefRegMap(@Self)^.&set := $00002000;
  34823. end;
  34824. procedure TOCMP1_OC1CON.clearOCSIDL; inline;
  34825. begin
  34826. pTDefRegMap(@Self)^.clr := $00002000;
  34827. end;
  34828. procedure TOCMP1_OC1CON.setOCSIDL(thebits : TBits_1); inline;
  34829. begin
  34830. if thebits = 0 then
  34831. pTDefRegMap(@Self)^.clr := $00002000
  34832. else
  34833. pTDefRegMap(@Self)^.&set := $00002000;
  34834. end;
  34835. function TOCMP1_OC1CON.getOCSIDL : TBits_1; inline;
  34836. begin
  34837. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34838. end;
  34839. procedure TOCMP1_OC1CON.setw(thebits : TBits_32); inline;
  34840. begin
  34841. pTDefRegMap(@Self)^.val := thebits;
  34842. end;
  34843. function TOCMP1_OC1CON.getw : TBits_32; inline;
  34844. begin
  34845. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34846. end;
  34847. procedure TOCMP2_OC2CON.setOCM(thebits : TBits_3); inline;
  34848. begin
  34849. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  34850. end;
  34851. function TOCMP2_OC2CON.getOCM : TBits_3; inline;
  34852. begin
  34853. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  34854. end;
  34855. procedure TOCMP2_OC2CON.setOCTSEL; inline;
  34856. begin
  34857. pTDefRegMap(@Self)^.&set := $00000008;
  34858. end;
  34859. procedure TOCMP2_OC2CON.clearOCTSEL; inline;
  34860. begin
  34861. pTDefRegMap(@Self)^.clr := $00000008;
  34862. end;
  34863. procedure TOCMP2_OC2CON.setOCTSEL(thebits : TBits_1); inline;
  34864. begin
  34865. if thebits = 0 then
  34866. pTDefRegMap(@Self)^.clr := $00000008
  34867. else
  34868. pTDefRegMap(@Self)^.&set := $00000008;
  34869. end;
  34870. function TOCMP2_OC2CON.getOCTSEL : TBits_1; inline;
  34871. begin
  34872. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34873. end;
  34874. procedure TOCMP2_OC2CON.setOCFLT; inline;
  34875. begin
  34876. pTDefRegMap(@Self)^.&set := $00000010;
  34877. end;
  34878. procedure TOCMP2_OC2CON.clearOCFLT; inline;
  34879. begin
  34880. pTDefRegMap(@Self)^.clr := $00000010;
  34881. end;
  34882. procedure TOCMP2_OC2CON.setOCFLT(thebits : TBits_1); inline;
  34883. begin
  34884. if thebits = 0 then
  34885. pTDefRegMap(@Self)^.clr := $00000010
  34886. else
  34887. pTDefRegMap(@Self)^.&set := $00000010;
  34888. end;
  34889. function TOCMP2_OC2CON.getOCFLT : TBits_1; inline;
  34890. begin
  34891. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34892. end;
  34893. procedure TOCMP2_OC2CON.setOC32; inline;
  34894. begin
  34895. pTDefRegMap(@Self)^.&set := $00000020;
  34896. end;
  34897. procedure TOCMP2_OC2CON.clearOC32; inline;
  34898. begin
  34899. pTDefRegMap(@Self)^.clr := $00000020;
  34900. end;
  34901. procedure TOCMP2_OC2CON.setOC32(thebits : TBits_1); inline;
  34902. begin
  34903. if thebits = 0 then
  34904. pTDefRegMap(@Self)^.clr := $00000020
  34905. else
  34906. pTDefRegMap(@Self)^.&set := $00000020;
  34907. end;
  34908. function TOCMP2_OC2CON.getOC32 : TBits_1; inline;
  34909. begin
  34910. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34911. end;
  34912. procedure TOCMP2_OC2CON.setSIDL; inline;
  34913. begin
  34914. pTDefRegMap(@Self)^.&set := $00002000;
  34915. end;
  34916. procedure TOCMP2_OC2CON.clearSIDL; inline;
  34917. begin
  34918. pTDefRegMap(@Self)^.clr := $00002000;
  34919. end;
  34920. procedure TOCMP2_OC2CON.setSIDL(thebits : TBits_1); inline;
  34921. begin
  34922. if thebits = 0 then
  34923. pTDefRegMap(@Self)^.clr := $00002000
  34924. else
  34925. pTDefRegMap(@Self)^.&set := $00002000;
  34926. end;
  34927. function TOCMP2_OC2CON.getSIDL : TBits_1; inline;
  34928. begin
  34929. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34930. end;
  34931. procedure TOCMP2_OC2CON.setON; inline;
  34932. begin
  34933. pTDefRegMap(@Self)^.&set := $00008000;
  34934. end;
  34935. procedure TOCMP2_OC2CON.clearON; inline;
  34936. begin
  34937. pTDefRegMap(@Self)^.clr := $00008000;
  34938. end;
  34939. procedure TOCMP2_OC2CON.setON(thebits : TBits_1); inline;
  34940. begin
  34941. if thebits = 0 then
  34942. pTDefRegMap(@Self)^.clr := $00008000
  34943. else
  34944. pTDefRegMap(@Self)^.&set := $00008000;
  34945. end;
  34946. function TOCMP2_OC2CON.getON : TBits_1; inline;
  34947. begin
  34948. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34949. end;
  34950. procedure TOCMP2_OC2CON.setOCM0; inline;
  34951. begin
  34952. pTDefRegMap(@Self)^.&set := $00000001;
  34953. end;
  34954. procedure TOCMP2_OC2CON.clearOCM0; inline;
  34955. begin
  34956. pTDefRegMap(@Self)^.clr := $00000001;
  34957. end;
  34958. procedure TOCMP2_OC2CON.setOCM0(thebits : TBits_1); inline;
  34959. begin
  34960. if thebits = 0 then
  34961. pTDefRegMap(@Self)^.clr := $00000001
  34962. else
  34963. pTDefRegMap(@Self)^.&set := $00000001;
  34964. end;
  34965. function TOCMP2_OC2CON.getOCM0 : TBits_1; inline;
  34966. begin
  34967. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34968. end;
  34969. procedure TOCMP2_OC2CON.setOCM1; inline;
  34970. begin
  34971. pTDefRegMap(@Self)^.&set := $00000002;
  34972. end;
  34973. procedure TOCMP2_OC2CON.clearOCM1; inline;
  34974. begin
  34975. pTDefRegMap(@Self)^.clr := $00000002;
  34976. end;
  34977. procedure TOCMP2_OC2CON.setOCM1(thebits : TBits_1); inline;
  34978. begin
  34979. if thebits = 0 then
  34980. pTDefRegMap(@Self)^.clr := $00000002
  34981. else
  34982. pTDefRegMap(@Self)^.&set := $00000002;
  34983. end;
  34984. function TOCMP2_OC2CON.getOCM1 : TBits_1; inline;
  34985. begin
  34986. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34987. end;
  34988. procedure TOCMP2_OC2CON.setOCM2; inline;
  34989. begin
  34990. pTDefRegMap(@Self)^.&set := $00000004;
  34991. end;
  34992. procedure TOCMP2_OC2CON.clearOCM2; inline;
  34993. begin
  34994. pTDefRegMap(@Self)^.clr := $00000004;
  34995. end;
  34996. procedure TOCMP2_OC2CON.setOCM2(thebits : TBits_1); inline;
  34997. begin
  34998. if thebits = 0 then
  34999. pTDefRegMap(@Self)^.clr := $00000004
  35000. else
  35001. pTDefRegMap(@Self)^.&set := $00000004;
  35002. end;
  35003. function TOCMP2_OC2CON.getOCM2 : TBits_1; inline;
  35004. begin
  35005. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35006. end;
  35007. procedure TOCMP2_OC2CON.setOCSIDL; inline;
  35008. begin
  35009. pTDefRegMap(@Self)^.&set := $00002000;
  35010. end;
  35011. procedure TOCMP2_OC2CON.clearOCSIDL; inline;
  35012. begin
  35013. pTDefRegMap(@Self)^.clr := $00002000;
  35014. end;
  35015. procedure TOCMP2_OC2CON.setOCSIDL(thebits : TBits_1); inline;
  35016. begin
  35017. if thebits = 0 then
  35018. pTDefRegMap(@Self)^.clr := $00002000
  35019. else
  35020. pTDefRegMap(@Self)^.&set := $00002000;
  35021. end;
  35022. function TOCMP2_OC2CON.getOCSIDL : TBits_1; inline;
  35023. begin
  35024. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35025. end;
  35026. procedure TOCMP2_OC2CON.setw(thebits : TBits_32); inline;
  35027. begin
  35028. pTDefRegMap(@Self)^.val := thebits;
  35029. end;
  35030. function TOCMP2_OC2CON.getw : TBits_32; inline;
  35031. begin
  35032. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35033. end;
  35034. procedure TOCMP3_OC3CON.setOCM(thebits : TBits_3); inline;
  35035. begin
  35036. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  35037. end;
  35038. function TOCMP3_OC3CON.getOCM : TBits_3; inline;
  35039. begin
  35040. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  35041. end;
  35042. procedure TOCMP3_OC3CON.setOCTSEL; inline;
  35043. begin
  35044. pTDefRegMap(@Self)^.&set := $00000008;
  35045. end;
  35046. procedure TOCMP3_OC3CON.clearOCTSEL; inline;
  35047. begin
  35048. pTDefRegMap(@Self)^.clr := $00000008;
  35049. end;
  35050. procedure TOCMP3_OC3CON.setOCTSEL(thebits : TBits_1); inline;
  35051. begin
  35052. if thebits = 0 then
  35053. pTDefRegMap(@Self)^.clr := $00000008
  35054. else
  35055. pTDefRegMap(@Self)^.&set := $00000008;
  35056. end;
  35057. function TOCMP3_OC3CON.getOCTSEL : TBits_1; inline;
  35058. begin
  35059. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35060. end;
  35061. procedure TOCMP3_OC3CON.setOCFLT; inline;
  35062. begin
  35063. pTDefRegMap(@Self)^.&set := $00000010;
  35064. end;
  35065. procedure TOCMP3_OC3CON.clearOCFLT; inline;
  35066. begin
  35067. pTDefRegMap(@Self)^.clr := $00000010;
  35068. end;
  35069. procedure TOCMP3_OC3CON.setOCFLT(thebits : TBits_1); inline;
  35070. begin
  35071. if thebits = 0 then
  35072. pTDefRegMap(@Self)^.clr := $00000010
  35073. else
  35074. pTDefRegMap(@Self)^.&set := $00000010;
  35075. end;
  35076. function TOCMP3_OC3CON.getOCFLT : TBits_1; inline;
  35077. begin
  35078. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35079. end;
  35080. procedure TOCMP3_OC3CON.setOC32; inline;
  35081. begin
  35082. pTDefRegMap(@Self)^.&set := $00000020;
  35083. end;
  35084. procedure TOCMP3_OC3CON.clearOC32; inline;
  35085. begin
  35086. pTDefRegMap(@Self)^.clr := $00000020;
  35087. end;
  35088. procedure TOCMP3_OC3CON.setOC32(thebits : TBits_1); inline;
  35089. begin
  35090. if thebits = 0 then
  35091. pTDefRegMap(@Self)^.clr := $00000020
  35092. else
  35093. pTDefRegMap(@Self)^.&set := $00000020;
  35094. end;
  35095. function TOCMP3_OC3CON.getOC32 : TBits_1; inline;
  35096. begin
  35097. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35098. end;
  35099. procedure TOCMP3_OC3CON.setSIDL; inline;
  35100. begin
  35101. pTDefRegMap(@Self)^.&set := $00002000;
  35102. end;
  35103. procedure TOCMP3_OC3CON.clearSIDL; inline;
  35104. begin
  35105. pTDefRegMap(@Self)^.clr := $00002000;
  35106. end;
  35107. procedure TOCMP3_OC3CON.setSIDL(thebits : TBits_1); inline;
  35108. begin
  35109. if thebits = 0 then
  35110. pTDefRegMap(@Self)^.clr := $00002000
  35111. else
  35112. pTDefRegMap(@Self)^.&set := $00002000;
  35113. end;
  35114. function TOCMP3_OC3CON.getSIDL : TBits_1; inline;
  35115. begin
  35116. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35117. end;
  35118. procedure TOCMP3_OC3CON.setON; inline;
  35119. begin
  35120. pTDefRegMap(@Self)^.&set := $00008000;
  35121. end;
  35122. procedure TOCMP3_OC3CON.clearON; inline;
  35123. begin
  35124. pTDefRegMap(@Self)^.clr := $00008000;
  35125. end;
  35126. procedure TOCMP3_OC3CON.setON(thebits : TBits_1); inline;
  35127. begin
  35128. if thebits = 0 then
  35129. pTDefRegMap(@Self)^.clr := $00008000
  35130. else
  35131. pTDefRegMap(@Self)^.&set := $00008000;
  35132. end;
  35133. function TOCMP3_OC3CON.getON : TBits_1; inline;
  35134. begin
  35135. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35136. end;
  35137. procedure TOCMP3_OC3CON.setOCM0; inline;
  35138. begin
  35139. pTDefRegMap(@Self)^.&set := $00000001;
  35140. end;
  35141. procedure TOCMP3_OC3CON.clearOCM0; inline;
  35142. begin
  35143. pTDefRegMap(@Self)^.clr := $00000001;
  35144. end;
  35145. procedure TOCMP3_OC3CON.setOCM0(thebits : TBits_1); inline;
  35146. begin
  35147. if thebits = 0 then
  35148. pTDefRegMap(@Self)^.clr := $00000001
  35149. else
  35150. pTDefRegMap(@Self)^.&set := $00000001;
  35151. end;
  35152. function TOCMP3_OC3CON.getOCM0 : TBits_1; inline;
  35153. begin
  35154. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35155. end;
  35156. procedure TOCMP3_OC3CON.setOCM1; inline;
  35157. begin
  35158. pTDefRegMap(@Self)^.&set := $00000002;
  35159. end;
  35160. procedure TOCMP3_OC3CON.clearOCM1; inline;
  35161. begin
  35162. pTDefRegMap(@Self)^.clr := $00000002;
  35163. end;
  35164. procedure TOCMP3_OC3CON.setOCM1(thebits : TBits_1); inline;
  35165. begin
  35166. if thebits = 0 then
  35167. pTDefRegMap(@Self)^.clr := $00000002
  35168. else
  35169. pTDefRegMap(@Self)^.&set := $00000002;
  35170. end;
  35171. function TOCMP3_OC3CON.getOCM1 : TBits_1; inline;
  35172. begin
  35173. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35174. end;
  35175. procedure TOCMP3_OC3CON.setOCM2; inline;
  35176. begin
  35177. pTDefRegMap(@Self)^.&set := $00000004;
  35178. end;
  35179. procedure TOCMP3_OC3CON.clearOCM2; inline;
  35180. begin
  35181. pTDefRegMap(@Self)^.clr := $00000004;
  35182. end;
  35183. procedure TOCMP3_OC3CON.setOCM2(thebits : TBits_1); inline;
  35184. begin
  35185. if thebits = 0 then
  35186. pTDefRegMap(@Self)^.clr := $00000004
  35187. else
  35188. pTDefRegMap(@Self)^.&set := $00000004;
  35189. end;
  35190. function TOCMP3_OC3CON.getOCM2 : TBits_1; inline;
  35191. begin
  35192. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35193. end;
  35194. procedure TOCMP3_OC3CON.setOCSIDL; inline;
  35195. begin
  35196. pTDefRegMap(@Self)^.&set := $00002000;
  35197. end;
  35198. procedure TOCMP3_OC3CON.clearOCSIDL; inline;
  35199. begin
  35200. pTDefRegMap(@Self)^.clr := $00002000;
  35201. end;
  35202. procedure TOCMP3_OC3CON.setOCSIDL(thebits : TBits_1); inline;
  35203. begin
  35204. if thebits = 0 then
  35205. pTDefRegMap(@Self)^.clr := $00002000
  35206. else
  35207. pTDefRegMap(@Self)^.&set := $00002000;
  35208. end;
  35209. function TOCMP3_OC3CON.getOCSIDL : TBits_1; inline;
  35210. begin
  35211. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35212. end;
  35213. procedure TOCMP3_OC3CON.setw(thebits : TBits_32); inline;
  35214. begin
  35215. pTDefRegMap(@Self)^.val := thebits;
  35216. end;
  35217. function TOCMP3_OC3CON.getw : TBits_32; inline;
  35218. begin
  35219. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35220. end;
  35221. procedure TOCMP4_OC4CON.setOCM(thebits : TBits_3); inline;
  35222. begin
  35223. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  35224. end;
  35225. function TOCMP4_OC4CON.getOCM : TBits_3; inline;
  35226. begin
  35227. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  35228. end;
  35229. procedure TOCMP4_OC4CON.setOCTSEL; inline;
  35230. begin
  35231. pTDefRegMap(@Self)^.&set := $00000008;
  35232. end;
  35233. procedure TOCMP4_OC4CON.clearOCTSEL; inline;
  35234. begin
  35235. pTDefRegMap(@Self)^.clr := $00000008;
  35236. end;
  35237. procedure TOCMP4_OC4CON.setOCTSEL(thebits : TBits_1); inline;
  35238. begin
  35239. if thebits = 0 then
  35240. pTDefRegMap(@Self)^.clr := $00000008
  35241. else
  35242. pTDefRegMap(@Self)^.&set := $00000008;
  35243. end;
  35244. function TOCMP4_OC4CON.getOCTSEL : TBits_1; inline;
  35245. begin
  35246. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35247. end;
  35248. procedure TOCMP4_OC4CON.setOCFLT; inline;
  35249. begin
  35250. pTDefRegMap(@Self)^.&set := $00000010;
  35251. end;
  35252. procedure TOCMP4_OC4CON.clearOCFLT; inline;
  35253. begin
  35254. pTDefRegMap(@Self)^.clr := $00000010;
  35255. end;
  35256. procedure TOCMP4_OC4CON.setOCFLT(thebits : TBits_1); inline;
  35257. begin
  35258. if thebits = 0 then
  35259. pTDefRegMap(@Self)^.clr := $00000010
  35260. else
  35261. pTDefRegMap(@Self)^.&set := $00000010;
  35262. end;
  35263. function TOCMP4_OC4CON.getOCFLT : TBits_1; inline;
  35264. begin
  35265. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35266. end;
  35267. procedure TOCMP4_OC4CON.setOC32; inline;
  35268. begin
  35269. pTDefRegMap(@Self)^.&set := $00000020;
  35270. end;
  35271. procedure TOCMP4_OC4CON.clearOC32; inline;
  35272. begin
  35273. pTDefRegMap(@Self)^.clr := $00000020;
  35274. end;
  35275. procedure TOCMP4_OC4CON.setOC32(thebits : TBits_1); inline;
  35276. begin
  35277. if thebits = 0 then
  35278. pTDefRegMap(@Self)^.clr := $00000020
  35279. else
  35280. pTDefRegMap(@Self)^.&set := $00000020;
  35281. end;
  35282. function TOCMP4_OC4CON.getOC32 : TBits_1; inline;
  35283. begin
  35284. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35285. end;
  35286. procedure TOCMP4_OC4CON.setSIDL; inline;
  35287. begin
  35288. pTDefRegMap(@Self)^.&set := $00002000;
  35289. end;
  35290. procedure TOCMP4_OC4CON.clearSIDL; inline;
  35291. begin
  35292. pTDefRegMap(@Self)^.clr := $00002000;
  35293. end;
  35294. procedure TOCMP4_OC4CON.setSIDL(thebits : TBits_1); inline;
  35295. begin
  35296. if thebits = 0 then
  35297. pTDefRegMap(@Self)^.clr := $00002000
  35298. else
  35299. pTDefRegMap(@Self)^.&set := $00002000;
  35300. end;
  35301. function TOCMP4_OC4CON.getSIDL : TBits_1; inline;
  35302. begin
  35303. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35304. end;
  35305. procedure TOCMP4_OC4CON.setON; inline;
  35306. begin
  35307. pTDefRegMap(@Self)^.&set := $00008000;
  35308. end;
  35309. procedure TOCMP4_OC4CON.clearON; inline;
  35310. begin
  35311. pTDefRegMap(@Self)^.clr := $00008000;
  35312. end;
  35313. procedure TOCMP4_OC4CON.setON(thebits : TBits_1); inline;
  35314. begin
  35315. if thebits = 0 then
  35316. pTDefRegMap(@Self)^.clr := $00008000
  35317. else
  35318. pTDefRegMap(@Self)^.&set := $00008000;
  35319. end;
  35320. function TOCMP4_OC4CON.getON : TBits_1; inline;
  35321. begin
  35322. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35323. end;
  35324. procedure TOCMP4_OC4CON.setOCM0; inline;
  35325. begin
  35326. pTDefRegMap(@Self)^.&set := $00000001;
  35327. end;
  35328. procedure TOCMP4_OC4CON.clearOCM0; inline;
  35329. begin
  35330. pTDefRegMap(@Self)^.clr := $00000001;
  35331. end;
  35332. procedure TOCMP4_OC4CON.setOCM0(thebits : TBits_1); inline;
  35333. begin
  35334. if thebits = 0 then
  35335. pTDefRegMap(@Self)^.clr := $00000001
  35336. else
  35337. pTDefRegMap(@Self)^.&set := $00000001;
  35338. end;
  35339. function TOCMP4_OC4CON.getOCM0 : TBits_1; inline;
  35340. begin
  35341. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35342. end;
  35343. procedure TOCMP4_OC4CON.setOCM1; inline;
  35344. begin
  35345. pTDefRegMap(@Self)^.&set := $00000002;
  35346. end;
  35347. procedure TOCMP4_OC4CON.clearOCM1; inline;
  35348. begin
  35349. pTDefRegMap(@Self)^.clr := $00000002;
  35350. end;
  35351. procedure TOCMP4_OC4CON.setOCM1(thebits : TBits_1); inline;
  35352. begin
  35353. if thebits = 0 then
  35354. pTDefRegMap(@Self)^.clr := $00000002
  35355. else
  35356. pTDefRegMap(@Self)^.&set := $00000002;
  35357. end;
  35358. function TOCMP4_OC4CON.getOCM1 : TBits_1; inline;
  35359. begin
  35360. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35361. end;
  35362. procedure TOCMP4_OC4CON.setOCM2; inline;
  35363. begin
  35364. pTDefRegMap(@Self)^.&set := $00000004;
  35365. end;
  35366. procedure TOCMP4_OC4CON.clearOCM2; inline;
  35367. begin
  35368. pTDefRegMap(@Self)^.clr := $00000004;
  35369. end;
  35370. procedure TOCMP4_OC4CON.setOCM2(thebits : TBits_1); inline;
  35371. begin
  35372. if thebits = 0 then
  35373. pTDefRegMap(@Self)^.clr := $00000004
  35374. else
  35375. pTDefRegMap(@Self)^.&set := $00000004;
  35376. end;
  35377. function TOCMP4_OC4CON.getOCM2 : TBits_1; inline;
  35378. begin
  35379. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35380. end;
  35381. procedure TOCMP4_OC4CON.setOCSIDL; inline;
  35382. begin
  35383. pTDefRegMap(@Self)^.&set := $00002000;
  35384. end;
  35385. procedure TOCMP4_OC4CON.clearOCSIDL; inline;
  35386. begin
  35387. pTDefRegMap(@Self)^.clr := $00002000;
  35388. end;
  35389. procedure TOCMP4_OC4CON.setOCSIDL(thebits : TBits_1); inline;
  35390. begin
  35391. if thebits = 0 then
  35392. pTDefRegMap(@Self)^.clr := $00002000
  35393. else
  35394. pTDefRegMap(@Self)^.&set := $00002000;
  35395. end;
  35396. function TOCMP4_OC4CON.getOCSIDL : TBits_1; inline;
  35397. begin
  35398. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35399. end;
  35400. procedure TOCMP4_OC4CON.setw(thebits : TBits_32); inline;
  35401. begin
  35402. pTDefRegMap(@Self)^.val := thebits;
  35403. end;
  35404. function TOCMP4_OC4CON.getw : TBits_32; inline;
  35405. begin
  35406. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35407. end;
  35408. procedure TOCMP5_OC5CON.setOCM(thebits : TBits_3); inline;
  35409. begin
  35410. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  35411. end;
  35412. function TOCMP5_OC5CON.getOCM : TBits_3; inline;
  35413. begin
  35414. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  35415. end;
  35416. procedure TOCMP5_OC5CON.setOCTSEL; inline;
  35417. begin
  35418. pTDefRegMap(@Self)^.&set := $00000008;
  35419. end;
  35420. procedure TOCMP5_OC5CON.clearOCTSEL; inline;
  35421. begin
  35422. pTDefRegMap(@Self)^.clr := $00000008;
  35423. end;
  35424. procedure TOCMP5_OC5CON.setOCTSEL(thebits : TBits_1); inline;
  35425. begin
  35426. if thebits = 0 then
  35427. pTDefRegMap(@Self)^.clr := $00000008
  35428. else
  35429. pTDefRegMap(@Self)^.&set := $00000008;
  35430. end;
  35431. function TOCMP5_OC5CON.getOCTSEL : TBits_1; inline;
  35432. begin
  35433. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35434. end;
  35435. procedure TOCMP5_OC5CON.setOCFLT; inline;
  35436. begin
  35437. pTDefRegMap(@Self)^.&set := $00000010;
  35438. end;
  35439. procedure TOCMP5_OC5CON.clearOCFLT; inline;
  35440. begin
  35441. pTDefRegMap(@Self)^.clr := $00000010;
  35442. end;
  35443. procedure TOCMP5_OC5CON.setOCFLT(thebits : TBits_1); inline;
  35444. begin
  35445. if thebits = 0 then
  35446. pTDefRegMap(@Self)^.clr := $00000010
  35447. else
  35448. pTDefRegMap(@Self)^.&set := $00000010;
  35449. end;
  35450. function TOCMP5_OC5CON.getOCFLT : TBits_1; inline;
  35451. begin
  35452. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35453. end;
  35454. procedure TOCMP5_OC5CON.setOC32; inline;
  35455. begin
  35456. pTDefRegMap(@Self)^.&set := $00000020;
  35457. end;
  35458. procedure TOCMP5_OC5CON.clearOC32; inline;
  35459. begin
  35460. pTDefRegMap(@Self)^.clr := $00000020;
  35461. end;
  35462. procedure TOCMP5_OC5CON.setOC32(thebits : TBits_1); inline;
  35463. begin
  35464. if thebits = 0 then
  35465. pTDefRegMap(@Self)^.clr := $00000020
  35466. else
  35467. pTDefRegMap(@Self)^.&set := $00000020;
  35468. end;
  35469. function TOCMP5_OC5CON.getOC32 : TBits_1; inline;
  35470. begin
  35471. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35472. end;
  35473. procedure TOCMP5_OC5CON.setSIDL; inline;
  35474. begin
  35475. pTDefRegMap(@Self)^.&set := $00002000;
  35476. end;
  35477. procedure TOCMP5_OC5CON.clearSIDL; inline;
  35478. begin
  35479. pTDefRegMap(@Self)^.clr := $00002000;
  35480. end;
  35481. procedure TOCMP5_OC5CON.setSIDL(thebits : TBits_1); inline;
  35482. begin
  35483. if thebits = 0 then
  35484. pTDefRegMap(@Self)^.clr := $00002000
  35485. else
  35486. pTDefRegMap(@Self)^.&set := $00002000;
  35487. end;
  35488. function TOCMP5_OC5CON.getSIDL : TBits_1; inline;
  35489. begin
  35490. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35491. end;
  35492. procedure TOCMP5_OC5CON.setON; inline;
  35493. begin
  35494. pTDefRegMap(@Self)^.&set := $00008000;
  35495. end;
  35496. procedure TOCMP5_OC5CON.clearON; inline;
  35497. begin
  35498. pTDefRegMap(@Self)^.clr := $00008000;
  35499. end;
  35500. procedure TOCMP5_OC5CON.setON(thebits : TBits_1); inline;
  35501. begin
  35502. if thebits = 0 then
  35503. pTDefRegMap(@Self)^.clr := $00008000
  35504. else
  35505. pTDefRegMap(@Self)^.&set := $00008000;
  35506. end;
  35507. function TOCMP5_OC5CON.getON : TBits_1; inline;
  35508. begin
  35509. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35510. end;
  35511. procedure TOCMP5_OC5CON.setOCM0; inline;
  35512. begin
  35513. pTDefRegMap(@Self)^.&set := $00000001;
  35514. end;
  35515. procedure TOCMP5_OC5CON.clearOCM0; inline;
  35516. begin
  35517. pTDefRegMap(@Self)^.clr := $00000001;
  35518. end;
  35519. procedure TOCMP5_OC5CON.setOCM0(thebits : TBits_1); inline;
  35520. begin
  35521. if thebits = 0 then
  35522. pTDefRegMap(@Self)^.clr := $00000001
  35523. else
  35524. pTDefRegMap(@Self)^.&set := $00000001;
  35525. end;
  35526. function TOCMP5_OC5CON.getOCM0 : TBits_1; inline;
  35527. begin
  35528. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35529. end;
  35530. procedure TOCMP5_OC5CON.setOCM1; inline;
  35531. begin
  35532. pTDefRegMap(@Self)^.&set := $00000002;
  35533. end;
  35534. procedure TOCMP5_OC5CON.clearOCM1; inline;
  35535. begin
  35536. pTDefRegMap(@Self)^.clr := $00000002;
  35537. end;
  35538. procedure TOCMP5_OC5CON.setOCM1(thebits : TBits_1); inline;
  35539. begin
  35540. if thebits = 0 then
  35541. pTDefRegMap(@Self)^.clr := $00000002
  35542. else
  35543. pTDefRegMap(@Self)^.&set := $00000002;
  35544. end;
  35545. function TOCMP5_OC5CON.getOCM1 : TBits_1; inline;
  35546. begin
  35547. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35548. end;
  35549. procedure TOCMP5_OC5CON.setOCM2; inline;
  35550. begin
  35551. pTDefRegMap(@Self)^.&set := $00000004;
  35552. end;
  35553. procedure TOCMP5_OC5CON.clearOCM2; inline;
  35554. begin
  35555. pTDefRegMap(@Self)^.clr := $00000004;
  35556. end;
  35557. procedure TOCMP5_OC5CON.setOCM2(thebits : TBits_1); inline;
  35558. begin
  35559. if thebits = 0 then
  35560. pTDefRegMap(@Self)^.clr := $00000004
  35561. else
  35562. pTDefRegMap(@Self)^.&set := $00000004;
  35563. end;
  35564. function TOCMP5_OC5CON.getOCM2 : TBits_1; inline;
  35565. begin
  35566. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35567. end;
  35568. procedure TOCMP5_OC5CON.setOCSIDL; inline;
  35569. begin
  35570. pTDefRegMap(@Self)^.&set := $00002000;
  35571. end;
  35572. procedure TOCMP5_OC5CON.clearOCSIDL; inline;
  35573. begin
  35574. pTDefRegMap(@Self)^.clr := $00002000;
  35575. end;
  35576. procedure TOCMP5_OC5CON.setOCSIDL(thebits : TBits_1); inline;
  35577. begin
  35578. if thebits = 0 then
  35579. pTDefRegMap(@Self)^.clr := $00002000
  35580. else
  35581. pTDefRegMap(@Self)^.&set := $00002000;
  35582. end;
  35583. function TOCMP5_OC5CON.getOCSIDL : TBits_1; inline;
  35584. begin
  35585. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35586. end;
  35587. procedure TOCMP5_OC5CON.setw(thebits : TBits_32); inline;
  35588. begin
  35589. pTDefRegMap(@Self)^.val := thebits;
  35590. end;
  35591. function TOCMP5_OC5CON.getw : TBits_32; inline;
  35592. begin
  35593. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35594. end;
  35595. procedure TI2C1A_I2C1ACON.setSEN; inline;
  35596. begin
  35597. pTDefRegMap(@Self)^.&set := $00000001;
  35598. end;
  35599. procedure TI2C1A_I2C1ACON.clearSEN; inline;
  35600. begin
  35601. pTDefRegMap(@Self)^.clr := $00000001;
  35602. end;
  35603. procedure TI2C1A_I2C1ACON.setSEN(thebits : TBits_1); inline;
  35604. begin
  35605. if thebits = 0 then
  35606. pTDefRegMap(@Self)^.clr := $00000001
  35607. else
  35608. pTDefRegMap(@Self)^.&set := $00000001;
  35609. end;
  35610. function TI2C1A_I2C1ACON.getSEN : TBits_1; inline;
  35611. begin
  35612. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35613. end;
  35614. procedure TI2C1A_I2C1ACON.setRSEN; inline;
  35615. begin
  35616. pTDefRegMap(@Self)^.&set := $00000002;
  35617. end;
  35618. procedure TI2C1A_I2C1ACON.clearRSEN; inline;
  35619. begin
  35620. pTDefRegMap(@Self)^.clr := $00000002;
  35621. end;
  35622. procedure TI2C1A_I2C1ACON.setRSEN(thebits : TBits_1); inline;
  35623. begin
  35624. if thebits = 0 then
  35625. pTDefRegMap(@Self)^.clr := $00000002
  35626. else
  35627. pTDefRegMap(@Self)^.&set := $00000002;
  35628. end;
  35629. function TI2C1A_I2C1ACON.getRSEN : TBits_1; inline;
  35630. begin
  35631. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35632. end;
  35633. procedure TI2C1A_I2C1ACON.setPEN; inline;
  35634. begin
  35635. pTDefRegMap(@Self)^.&set := $00000004;
  35636. end;
  35637. procedure TI2C1A_I2C1ACON.clearPEN; inline;
  35638. begin
  35639. pTDefRegMap(@Self)^.clr := $00000004;
  35640. end;
  35641. procedure TI2C1A_I2C1ACON.setPEN(thebits : TBits_1); inline;
  35642. begin
  35643. if thebits = 0 then
  35644. pTDefRegMap(@Self)^.clr := $00000004
  35645. else
  35646. pTDefRegMap(@Self)^.&set := $00000004;
  35647. end;
  35648. function TI2C1A_I2C1ACON.getPEN : TBits_1; inline;
  35649. begin
  35650. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35651. end;
  35652. procedure TI2C1A_I2C1ACON.setRCEN; inline;
  35653. begin
  35654. pTDefRegMap(@Self)^.&set := $00000008;
  35655. end;
  35656. procedure TI2C1A_I2C1ACON.clearRCEN; inline;
  35657. begin
  35658. pTDefRegMap(@Self)^.clr := $00000008;
  35659. end;
  35660. procedure TI2C1A_I2C1ACON.setRCEN(thebits : TBits_1); inline;
  35661. begin
  35662. if thebits = 0 then
  35663. pTDefRegMap(@Self)^.clr := $00000008
  35664. else
  35665. pTDefRegMap(@Self)^.&set := $00000008;
  35666. end;
  35667. function TI2C1A_I2C1ACON.getRCEN : TBits_1; inline;
  35668. begin
  35669. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35670. end;
  35671. procedure TI2C1A_I2C1ACON.setACKEN; inline;
  35672. begin
  35673. pTDefRegMap(@Self)^.&set := $00000010;
  35674. end;
  35675. procedure TI2C1A_I2C1ACON.clearACKEN; inline;
  35676. begin
  35677. pTDefRegMap(@Self)^.clr := $00000010;
  35678. end;
  35679. procedure TI2C1A_I2C1ACON.setACKEN(thebits : TBits_1); inline;
  35680. begin
  35681. if thebits = 0 then
  35682. pTDefRegMap(@Self)^.clr := $00000010
  35683. else
  35684. pTDefRegMap(@Self)^.&set := $00000010;
  35685. end;
  35686. function TI2C1A_I2C1ACON.getACKEN : TBits_1; inline;
  35687. begin
  35688. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35689. end;
  35690. procedure TI2C1A_I2C1ACON.setACKDT; inline;
  35691. begin
  35692. pTDefRegMap(@Self)^.&set := $00000020;
  35693. end;
  35694. procedure TI2C1A_I2C1ACON.clearACKDT; inline;
  35695. begin
  35696. pTDefRegMap(@Self)^.clr := $00000020;
  35697. end;
  35698. procedure TI2C1A_I2C1ACON.setACKDT(thebits : TBits_1); inline;
  35699. begin
  35700. if thebits = 0 then
  35701. pTDefRegMap(@Self)^.clr := $00000020
  35702. else
  35703. pTDefRegMap(@Self)^.&set := $00000020;
  35704. end;
  35705. function TI2C1A_I2C1ACON.getACKDT : TBits_1; inline;
  35706. begin
  35707. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35708. end;
  35709. procedure TI2C1A_I2C1ACON.setSTREN; inline;
  35710. begin
  35711. pTDefRegMap(@Self)^.&set := $00000040;
  35712. end;
  35713. procedure TI2C1A_I2C1ACON.clearSTREN; inline;
  35714. begin
  35715. pTDefRegMap(@Self)^.clr := $00000040;
  35716. end;
  35717. procedure TI2C1A_I2C1ACON.setSTREN(thebits : TBits_1); inline;
  35718. begin
  35719. if thebits = 0 then
  35720. pTDefRegMap(@Self)^.clr := $00000040
  35721. else
  35722. pTDefRegMap(@Self)^.&set := $00000040;
  35723. end;
  35724. function TI2C1A_I2C1ACON.getSTREN : TBits_1; inline;
  35725. begin
  35726. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35727. end;
  35728. procedure TI2C1A_I2C1ACON.setGCEN; inline;
  35729. begin
  35730. pTDefRegMap(@Self)^.&set := $00000080;
  35731. end;
  35732. procedure TI2C1A_I2C1ACON.clearGCEN; inline;
  35733. begin
  35734. pTDefRegMap(@Self)^.clr := $00000080;
  35735. end;
  35736. procedure TI2C1A_I2C1ACON.setGCEN(thebits : TBits_1); inline;
  35737. begin
  35738. if thebits = 0 then
  35739. pTDefRegMap(@Self)^.clr := $00000080
  35740. else
  35741. pTDefRegMap(@Self)^.&set := $00000080;
  35742. end;
  35743. function TI2C1A_I2C1ACON.getGCEN : TBits_1; inline;
  35744. begin
  35745. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35746. end;
  35747. procedure TI2C1A_I2C1ACON.setSMEN; inline;
  35748. begin
  35749. pTDefRegMap(@Self)^.&set := $00000100;
  35750. end;
  35751. procedure TI2C1A_I2C1ACON.clearSMEN; inline;
  35752. begin
  35753. pTDefRegMap(@Self)^.clr := $00000100;
  35754. end;
  35755. procedure TI2C1A_I2C1ACON.setSMEN(thebits : TBits_1); inline;
  35756. begin
  35757. if thebits = 0 then
  35758. pTDefRegMap(@Self)^.clr := $00000100
  35759. else
  35760. pTDefRegMap(@Self)^.&set := $00000100;
  35761. end;
  35762. function TI2C1A_I2C1ACON.getSMEN : TBits_1; inline;
  35763. begin
  35764. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35765. end;
  35766. procedure TI2C1A_I2C1ACON.setDISSLW; inline;
  35767. begin
  35768. pTDefRegMap(@Self)^.&set := $00000200;
  35769. end;
  35770. procedure TI2C1A_I2C1ACON.clearDISSLW; inline;
  35771. begin
  35772. pTDefRegMap(@Self)^.clr := $00000200;
  35773. end;
  35774. procedure TI2C1A_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
  35775. begin
  35776. if thebits = 0 then
  35777. pTDefRegMap(@Self)^.clr := $00000200
  35778. else
  35779. pTDefRegMap(@Self)^.&set := $00000200;
  35780. end;
  35781. function TI2C1A_I2C1ACON.getDISSLW : TBits_1; inline;
  35782. begin
  35783. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35784. end;
  35785. procedure TI2C1A_I2C1ACON.setA10M; inline;
  35786. begin
  35787. pTDefRegMap(@Self)^.&set := $00000400;
  35788. end;
  35789. procedure TI2C1A_I2C1ACON.clearA10M; inline;
  35790. begin
  35791. pTDefRegMap(@Self)^.clr := $00000400;
  35792. end;
  35793. procedure TI2C1A_I2C1ACON.setA10M(thebits : TBits_1); inline;
  35794. begin
  35795. if thebits = 0 then
  35796. pTDefRegMap(@Self)^.clr := $00000400
  35797. else
  35798. pTDefRegMap(@Self)^.&set := $00000400;
  35799. end;
  35800. function TI2C1A_I2C1ACON.getA10M : TBits_1; inline;
  35801. begin
  35802. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35803. end;
  35804. procedure TI2C1A_I2C1ACON.setSTRICT; inline;
  35805. begin
  35806. pTDefRegMap(@Self)^.&set := $00000800;
  35807. end;
  35808. procedure TI2C1A_I2C1ACON.clearSTRICT; inline;
  35809. begin
  35810. pTDefRegMap(@Self)^.clr := $00000800;
  35811. end;
  35812. procedure TI2C1A_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
  35813. begin
  35814. if thebits = 0 then
  35815. pTDefRegMap(@Self)^.clr := $00000800
  35816. else
  35817. pTDefRegMap(@Self)^.&set := $00000800;
  35818. end;
  35819. function TI2C1A_I2C1ACON.getSTRICT : TBits_1; inline;
  35820. begin
  35821. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35822. end;
  35823. procedure TI2C1A_I2C1ACON.setSCLREL; inline;
  35824. begin
  35825. pTDefRegMap(@Self)^.&set := $00001000;
  35826. end;
  35827. procedure TI2C1A_I2C1ACON.clearSCLREL; inline;
  35828. begin
  35829. pTDefRegMap(@Self)^.clr := $00001000;
  35830. end;
  35831. procedure TI2C1A_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
  35832. begin
  35833. if thebits = 0 then
  35834. pTDefRegMap(@Self)^.clr := $00001000
  35835. else
  35836. pTDefRegMap(@Self)^.&set := $00001000;
  35837. end;
  35838. function TI2C1A_I2C1ACON.getSCLREL : TBits_1; inline;
  35839. begin
  35840. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35841. end;
  35842. procedure TI2C1A_I2C1ACON.setSIDL; inline;
  35843. begin
  35844. pTDefRegMap(@Self)^.&set := $00002000;
  35845. end;
  35846. procedure TI2C1A_I2C1ACON.clearSIDL; inline;
  35847. begin
  35848. pTDefRegMap(@Self)^.clr := $00002000;
  35849. end;
  35850. procedure TI2C1A_I2C1ACON.setSIDL(thebits : TBits_1); inline;
  35851. begin
  35852. if thebits = 0 then
  35853. pTDefRegMap(@Self)^.clr := $00002000
  35854. else
  35855. pTDefRegMap(@Self)^.&set := $00002000;
  35856. end;
  35857. function TI2C1A_I2C1ACON.getSIDL : TBits_1; inline;
  35858. begin
  35859. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35860. end;
  35861. procedure TI2C1A_I2C1ACON.setON; inline;
  35862. begin
  35863. pTDefRegMap(@Self)^.&set := $00008000;
  35864. end;
  35865. procedure TI2C1A_I2C1ACON.clearON; inline;
  35866. begin
  35867. pTDefRegMap(@Self)^.clr := $00008000;
  35868. end;
  35869. procedure TI2C1A_I2C1ACON.setON(thebits : TBits_1); inline;
  35870. begin
  35871. if thebits = 0 then
  35872. pTDefRegMap(@Self)^.clr := $00008000
  35873. else
  35874. pTDefRegMap(@Self)^.&set := $00008000;
  35875. end;
  35876. function TI2C1A_I2C1ACON.getON : TBits_1; inline;
  35877. begin
  35878. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35879. end;
  35880. procedure TI2C1A_I2C1ACON.setIPMIEN; inline;
  35881. begin
  35882. pTDefRegMap(@Self)^.&set := $00000800;
  35883. end;
  35884. procedure TI2C1A_I2C1ACON.clearIPMIEN; inline;
  35885. begin
  35886. pTDefRegMap(@Self)^.clr := $00000800;
  35887. end;
  35888. procedure TI2C1A_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
  35889. begin
  35890. if thebits = 0 then
  35891. pTDefRegMap(@Self)^.clr := $00000800
  35892. else
  35893. pTDefRegMap(@Self)^.&set := $00000800;
  35894. end;
  35895. function TI2C1A_I2C1ACON.getIPMIEN : TBits_1; inline;
  35896. begin
  35897. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35898. end;
  35899. procedure TI2C1A_I2C1ACON.setI2CSIDL; inline;
  35900. begin
  35901. pTDefRegMap(@Self)^.&set := $00002000;
  35902. end;
  35903. procedure TI2C1A_I2C1ACON.clearI2CSIDL; inline;
  35904. begin
  35905. pTDefRegMap(@Self)^.clr := $00002000;
  35906. end;
  35907. procedure TI2C1A_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
  35908. begin
  35909. if thebits = 0 then
  35910. pTDefRegMap(@Self)^.clr := $00002000
  35911. else
  35912. pTDefRegMap(@Self)^.&set := $00002000;
  35913. end;
  35914. function TI2C1A_I2C1ACON.getI2CSIDL : TBits_1; inline;
  35915. begin
  35916. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35917. end;
  35918. procedure TI2C1A_I2C1ACON.setI2CEN; inline;
  35919. begin
  35920. pTDefRegMap(@Self)^.&set := $00008000;
  35921. end;
  35922. procedure TI2C1A_I2C1ACON.clearI2CEN; inline;
  35923. begin
  35924. pTDefRegMap(@Self)^.clr := $00008000;
  35925. end;
  35926. procedure TI2C1A_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
  35927. begin
  35928. if thebits = 0 then
  35929. pTDefRegMap(@Self)^.clr := $00008000
  35930. else
  35931. pTDefRegMap(@Self)^.&set := $00008000;
  35932. end;
  35933. function TI2C1A_I2C1ACON.getI2CEN : TBits_1; inline;
  35934. begin
  35935. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35936. end;
  35937. procedure TI2C1A_I2C1ACON.setw(thebits : TBits_32); inline;
  35938. begin
  35939. pTDefRegMap(@Self)^.val := thebits;
  35940. end;
  35941. function TI2C1A_I2C1ACON.getw : TBits_32; inline;
  35942. begin
  35943. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35944. end;
  35945. procedure TI2C1A_I2C3CON.setSEN; inline;
  35946. begin
  35947. pTDefRegMap(@Self)^.&set := $00000001;
  35948. end;
  35949. procedure TI2C1A_I2C3CON.clearSEN; inline;
  35950. begin
  35951. pTDefRegMap(@Self)^.clr := $00000001;
  35952. end;
  35953. procedure TI2C1A_I2C3CON.setSEN(thebits : TBits_1); inline;
  35954. begin
  35955. if thebits = 0 then
  35956. pTDefRegMap(@Self)^.clr := $00000001
  35957. else
  35958. pTDefRegMap(@Self)^.&set := $00000001;
  35959. end;
  35960. function TI2C1A_I2C3CON.getSEN : TBits_1; inline;
  35961. begin
  35962. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35963. end;
  35964. procedure TI2C1A_I2C3CON.setRSEN; inline;
  35965. begin
  35966. pTDefRegMap(@Self)^.&set := $00000002;
  35967. end;
  35968. procedure TI2C1A_I2C3CON.clearRSEN; inline;
  35969. begin
  35970. pTDefRegMap(@Self)^.clr := $00000002;
  35971. end;
  35972. procedure TI2C1A_I2C3CON.setRSEN(thebits : TBits_1); inline;
  35973. begin
  35974. if thebits = 0 then
  35975. pTDefRegMap(@Self)^.clr := $00000002
  35976. else
  35977. pTDefRegMap(@Self)^.&set := $00000002;
  35978. end;
  35979. function TI2C1A_I2C3CON.getRSEN : TBits_1; inline;
  35980. begin
  35981. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35982. end;
  35983. procedure TI2C1A_I2C3CON.setPEN; inline;
  35984. begin
  35985. pTDefRegMap(@Self)^.&set := $00000004;
  35986. end;
  35987. procedure TI2C1A_I2C3CON.clearPEN; inline;
  35988. begin
  35989. pTDefRegMap(@Self)^.clr := $00000004;
  35990. end;
  35991. procedure TI2C1A_I2C3CON.setPEN(thebits : TBits_1); inline;
  35992. begin
  35993. if thebits = 0 then
  35994. pTDefRegMap(@Self)^.clr := $00000004
  35995. else
  35996. pTDefRegMap(@Self)^.&set := $00000004;
  35997. end;
  35998. function TI2C1A_I2C3CON.getPEN : TBits_1; inline;
  35999. begin
  36000. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36001. end;
  36002. procedure TI2C1A_I2C3CON.setRCEN; inline;
  36003. begin
  36004. pTDefRegMap(@Self)^.&set := $00000008;
  36005. end;
  36006. procedure TI2C1A_I2C3CON.clearRCEN; inline;
  36007. begin
  36008. pTDefRegMap(@Self)^.clr := $00000008;
  36009. end;
  36010. procedure TI2C1A_I2C3CON.setRCEN(thebits : TBits_1); inline;
  36011. begin
  36012. if thebits = 0 then
  36013. pTDefRegMap(@Self)^.clr := $00000008
  36014. else
  36015. pTDefRegMap(@Self)^.&set := $00000008;
  36016. end;
  36017. function TI2C1A_I2C3CON.getRCEN : TBits_1; inline;
  36018. begin
  36019. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36020. end;
  36021. procedure TI2C1A_I2C3CON.setACKEN; inline;
  36022. begin
  36023. pTDefRegMap(@Self)^.&set := $00000010;
  36024. end;
  36025. procedure TI2C1A_I2C3CON.clearACKEN; inline;
  36026. begin
  36027. pTDefRegMap(@Self)^.clr := $00000010;
  36028. end;
  36029. procedure TI2C1A_I2C3CON.setACKEN(thebits : TBits_1); inline;
  36030. begin
  36031. if thebits = 0 then
  36032. pTDefRegMap(@Self)^.clr := $00000010
  36033. else
  36034. pTDefRegMap(@Self)^.&set := $00000010;
  36035. end;
  36036. function TI2C1A_I2C3CON.getACKEN : TBits_1; inline;
  36037. begin
  36038. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36039. end;
  36040. procedure TI2C1A_I2C3CON.setACKDT; inline;
  36041. begin
  36042. pTDefRegMap(@Self)^.&set := $00000020;
  36043. end;
  36044. procedure TI2C1A_I2C3CON.clearACKDT; inline;
  36045. begin
  36046. pTDefRegMap(@Self)^.clr := $00000020;
  36047. end;
  36048. procedure TI2C1A_I2C3CON.setACKDT(thebits : TBits_1); inline;
  36049. begin
  36050. if thebits = 0 then
  36051. pTDefRegMap(@Self)^.clr := $00000020
  36052. else
  36053. pTDefRegMap(@Self)^.&set := $00000020;
  36054. end;
  36055. function TI2C1A_I2C3CON.getACKDT : TBits_1; inline;
  36056. begin
  36057. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36058. end;
  36059. procedure TI2C1A_I2C3CON.setSTREN; inline;
  36060. begin
  36061. pTDefRegMap(@Self)^.&set := $00000040;
  36062. end;
  36063. procedure TI2C1A_I2C3CON.clearSTREN; inline;
  36064. begin
  36065. pTDefRegMap(@Self)^.clr := $00000040;
  36066. end;
  36067. procedure TI2C1A_I2C3CON.setSTREN(thebits : TBits_1); inline;
  36068. begin
  36069. if thebits = 0 then
  36070. pTDefRegMap(@Self)^.clr := $00000040
  36071. else
  36072. pTDefRegMap(@Self)^.&set := $00000040;
  36073. end;
  36074. function TI2C1A_I2C3CON.getSTREN : TBits_1; inline;
  36075. begin
  36076. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36077. end;
  36078. procedure TI2C1A_I2C3CON.setGCEN; inline;
  36079. begin
  36080. pTDefRegMap(@Self)^.&set := $00000080;
  36081. end;
  36082. procedure TI2C1A_I2C3CON.clearGCEN; inline;
  36083. begin
  36084. pTDefRegMap(@Self)^.clr := $00000080;
  36085. end;
  36086. procedure TI2C1A_I2C3CON.setGCEN(thebits : TBits_1); inline;
  36087. begin
  36088. if thebits = 0 then
  36089. pTDefRegMap(@Self)^.clr := $00000080
  36090. else
  36091. pTDefRegMap(@Self)^.&set := $00000080;
  36092. end;
  36093. function TI2C1A_I2C3CON.getGCEN : TBits_1; inline;
  36094. begin
  36095. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36096. end;
  36097. procedure TI2C1A_I2C3CON.setSMEN; inline;
  36098. begin
  36099. pTDefRegMap(@Self)^.&set := $00000100;
  36100. end;
  36101. procedure TI2C1A_I2C3CON.clearSMEN; inline;
  36102. begin
  36103. pTDefRegMap(@Self)^.clr := $00000100;
  36104. end;
  36105. procedure TI2C1A_I2C3CON.setSMEN(thebits : TBits_1); inline;
  36106. begin
  36107. if thebits = 0 then
  36108. pTDefRegMap(@Self)^.clr := $00000100
  36109. else
  36110. pTDefRegMap(@Self)^.&set := $00000100;
  36111. end;
  36112. function TI2C1A_I2C3CON.getSMEN : TBits_1; inline;
  36113. begin
  36114. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36115. end;
  36116. procedure TI2C1A_I2C3CON.setDISSLW; inline;
  36117. begin
  36118. pTDefRegMap(@Self)^.&set := $00000200;
  36119. end;
  36120. procedure TI2C1A_I2C3CON.clearDISSLW; inline;
  36121. begin
  36122. pTDefRegMap(@Self)^.clr := $00000200;
  36123. end;
  36124. procedure TI2C1A_I2C3CON.setDISSLW(thebits : TBits_1); inline;
  36125. begin
  36126. if thebits = 0 then
  36127. pTDefRegMap(@Self)^.clr := $00000200
  36128. else
  36129. pTDefRegMap(@Self)^.&set := $00000200;
  36130. end;
  36131. function TI2C1A_I2C3CON.getDISSLW : TBits_1; inline;
  36132. begin
  36133. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36134. end;
  36135. procedure TI2C1A_I2C3CON.setA10M; inline;
  36136. begin
  36137. pTDefRegMap(@Self)^.&set := $00000400;
  36138. end;
  36139. procedure TI2C1A_I2C3CON.clearA10M; inline;
  36140. begin
  36141. pTDefRegMap(@Self)^.clr := $00000400;
  36142. end;
  36143. procedure TI2C1A_I2C3CON.setA10M(thebits : TBits_1); inline;
  36144. begin
  36145. if thebits = 0 then
  36146. pTDefRegMap(@Self)^.clr := $00000400
  36147. else
  36148. pTDefRegMap(@Self)^.&set := $00000400;
  36149. end;
  36150. function TI2C1A_I2C3CON.getA10M : TBits_1; inline;
  36151. begin
  36152. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36153. end;
  36154. procedure TI2C1A_I2C3CON.setSTRICT; inline;
  36155. begin
  36156. pTDefRegMap(@Self)^.&set := $00000800;
  36157. end;
  36158. procedure TI2C1A_I2C3CON.clearSTRICT; inline;
  36159. begin
  36160. pTDefRegMap(@Self)^.clr := $00000800;
  36161. end;
  36162. procedure TI2C1A_I2C3CON.setSTRICT(thebits : TBits_1); inline;
  36163. begin
  36164. if thebits = 0 then
  36165. pTDefRegMap(@Self)^.clr := $00000800
  36166. else
  36167. pTDefRegMap(@Self)^.&set := $00000800;
  36168. end;
  36169. function TI2C1A_I2C3CON.getSTRICT : TBits_1; inline;
  36170. begin
  36171. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36172. end;
  36173. procedure TI2C1A_I2C3CON.setSCLREL; inline;
  36174. begin
  36175. pTDefRegMap(@Self)^.&set := $00001000;
  36176. end;
  36177. procedure TI2C1A_I2C3CON.clearSCLREL; inline;
  36178. begin
  36179. pTDefRegMap(@Self)^.clr := $00001000;
  36180. end;
  36181. procedure TI2C1A_I2C3CON.setSCLREL(thebits : TBits_1); inline;
  36182. begin
  36183. if thebits = 0 then
  36184. pTDefRegMap(@Self)^.clr := $00001000
  36185. else
  36186. pTDefRegMap(@Self)^.&set := $00001000;
  36187. end;
  36188. function TI2C1A_I2C3CON.getSCLREL : TBits_1; inline;
  36189. begin
  36190. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36191. end;
  36192. procedure TI2C1A_I2C3CON.setSIDL; inline;
  36193. begin
  36194. pTDefRegMap(@Self)^.&set := $00002000;
  36195. end;
  36196. procedure TI2C1A_I2C3CON.clearSIDL; inline;
  36197. begin
  36198. pTDefRegMap(@Self)^.clr := $00002000;
  36199. end;
  36200. procedure TI2C1A_I2C3CON.setSIDL(thebits : TBits_1); inline;
  36201. begin
  36202. if thebits = 0 then
  36203. pTDefRegMap(@Self)^.clr := $00002000
  36204. else
  36205. pTDefRegMap(@Self)^.&set := $00002000;
  36206. end;
  36207. function TI2C1A_I2C3CON.getSIDL : TBits_1; inline;
  36208. begin
  36209. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36210. end;
  36211. procedure TI2C1A_I2C3CON.setON; inline;
  36212. begin
  36213. pTDefRegMap(@Self)^.&set := $00008000;
  36214. end;
  36215. procedure TI2C1A_I2C3CON.clearON; inline;
  36216. begin
  36217. pTDefRegMap(@Self)^.clr := $00008000;
  36218. end;
  36219. procedure TI2C1A_I2C3CON.setON(thebits : TBits_1); inline;
  36220. begin
  36221. if thebits = 0 then
  36222. pTDefRegMap(@Self)^.clr := $00008000
  36223. else
  36224. pTDefRegMap(@Self)^.&set := $00008000;
  36225. end;
  36226. function TI2C1A_I2C3CON.getON : TBits_1; inline;
  36227. begin
  36228. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36229. end;
  36230. procedure TI2C1A_I2C3CON.setIPMIEN; inline;
  36231. begin
  36232. pTDefRegMap(@Self)^.&set := $00000800;
  36233. end;
  36234. procedure TI2C1A_I2C3CON.clearIPMIEN; inline;
  36235. begin
  36236. pTDefRegMap(@Self)^.clr := $00000800;
  36237. end;
  36238. procedure TI2C1A_I2C3CON.setIPMIEN(thebits : TBits_1); inline;
  36239. begin
  36240. if thebits = 0 then
  36241. pTDefRegMap(@Self)^.clr := $00000800
  36242. else
  36243. pTDefRegMap(@Self)^.&set := $00000800;
  36244. end;
  36245. function TI2C1A_I2C3CON.getIPMIEN : TBits_1; inline;
  36246. begin
  36247. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36248. end;
  36249. procedure TI2C1A_I2C3CON.setI2CSIDL; inline;
  36250. begin
  36251. pTDefRegMap(@Self)^.&set := $00002000;
  36252. end;
  36253. procedure TI2C1A_I2C3CON.clearI2CSIDL; inline;
  36254. begin
  36255. pTDefRegMap(@Self)^.clr := $00002000;
  36256. end;
  36257. procedure TI2C1A_I2C3CON.setI2CSIDL(thebits : TBits_1); inline;
  36258. begin
  36259. if thebits = 0 then
  36260. pTDefRegMap(@Self)^.clr := $00002000
  36261. else
  36262. pTDefRegMap(@Self)^.&set := $00002000;
  36263. end;
  36264. function TI2C1A_I2C3CON.getI2CSIDL : TBits_1; inline;
  36265. begin
  36266. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36267. end;
  36268. procedure TI2C1A_I2C3CON.setI2CEN; inline;
  36269. begin
  36270. pTDefRegMap(@Self)^.&set := $00008000;
  36271. end;
  36272. procedure TI2C1A_I2C3CON.clearI2CEN; inline;
  36273. begin
  36274. pTDefRegMap(@Self)^.clr := $00008000;
  36275. end;
  36276. procedure TI2C1A_I2C3CON.setI2CEN(thebits : TBits_1); inline;
  36277. begin
  36278. if thebits = 0 then
  36279. pTDefRegMap(@Self)^.clr := $00008000
  36280. else
  36281. pTDefRegMap(@Self)^.&set := $00008000;
  36282. end;
  36283. function TI2C1A_I2C3CON.getI2CEN : TBits_1; inline;
  36284. begin
  36285. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36286. end;
  36287. procedure TI2C1A_I2C3CON.setw(thebits : TBits_32); inline;
  36288. begin
  36289. pTDefRegMap(@Self)^.val := thebits;
  36290. end;
  36291. function TI2C1A_I2C3CON.getw : TBits_32; inline;
  36292. begin
  36293. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36294. end;
  36295. procedure TI2C1A_I2C1ASTAT.setTBF; inline;
  36296. begin
  36297. pTDefRegMap(@Self)^.&set := $00000001;
  36298. end;
  36299. procedure TI2C1A_I2C1ASTAT.clearTBF; inline;
  36300. begin
  36301. pTDefRegMap(@Self)^.clr := $00000001;
  36302. end;
  36303. procedure TI2C1A_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
  36304. begin
  36305. if thebits = 0 then
  36306. pTDefRegMap(@Self)^.clr := $00000001
  36307. else
  36308. pTDefRegMap(@Self)^.&set := $00000001;
  36309. end;
  36310. function TI2C1A_I2C1ASTAT.getTBF : TBits_1; inline;
  36311. begin
  36312. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36313. end;
  36314. procedure TI2C1A_I2C1ASTAT.setRBF; inline;
  36315. begin
  36316. pTDefRegMap(@Self)^.&set := $00000002;
  36317. end;
  36318. procedure TI2C1A_I2C1ASTAT.clearRBF; inline;
  36319. begin
  36320. pTDefRegMap(@Self)^.clr := $00000002;
  36321. end;
  36322. procedure TI2C1A_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
  36323. begin
  36324. if thebits = 0 then
  36325. pTDefRegMap(@Self)^.clr := $00000002
  36326. else
  36327. pTDefRegMap(@Self)^.&set := $00000002;
  36328. end;
  36329. function TI2C1A_I2C1ASTAT.getRBF : TBits_1; inline;
  36330. begin
  36331. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36332. end;
  36333. procedure TI2C1A_I2C1ASTAT.setR_W; inline;
  36334. begin
  36335. pTDefRegMap(@Self)^.&set := $00000004;
  36336. end;
  36337. procedure TI2C1A_I2C1ASTAT.clearR_W; inline;
  36338. begin
  36339. pTDefRegMap(@Self)^.clr := $00000004;
  36340. end;
  36341. procedure TI2C1A_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
  36342. begin
  36343. if thebits = 0 then
  36344. pTDefRegMap(@Self)^.clr := $00000004
  36345. else
  36346. pTDefRegMap(@Self)^.&set := $00000004;
  36347. end;
  36348. function TI2C1A_I2C1ASTAT.getR_W : TBits_1; inline;
  36349. begin
  36350. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36351. end;
  36352. procedure TI2C1A_I2C1ASTAT.setS; inline;
  36353. begin
  36354. pTDefRegMap(@Self)^.&set := $00000008;
  36355. end;
  36356. procedure TI2C1A_I2C1ASTAT.clearS; inline;
  36357. begin
  36358. pTDefRegMap(@Self)^.clr := $00000008;
  36359. end;
  36360. procedure TI2C1A_I2C1ASTAT.setS(thebits : TBits_1); inline;
  36361. begin
  36362. if thebits = 0 then
  36363. pTDefRegMap(@Self)^.clr := $00000008
  36364. else
  36365. pTDefRegMap(@Self)^.&set := $00000008;
  36366. end;
  36367. function TI2C1A_I2C1ASTAT.getS : TBits_1; inline;
  36368. begin
  36369. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36370. end;
  36371. procedure TI2C1A_I2C1ASTAT.setP; inline;
  36372. begin
  36373. pTDefRegMap(@Self)^.&set := $00000010;
  36374. end;
  36375. procedure TI2C1A_I2C1ASTAT.clearP; inline;
  36376. begin
  36377. pTDefRegMap(@Self)^.clr := $00000010;
  36378. end;
  36379. procedure TI2C1A_I2C1ASTAT.setP(thebits : TBits_1); inline;
  36380. begin
  36381. if thebits = 0 then
  36382. pTDefRegMap(@Self)^.clr := $00000010
  36383. else
  36384. pTDefRegMap(@Self)^.&set := $00000010;
  36385. end;
  36386. function TI2C1A_I2C1ASTAT.getP : TBits_1; inline;
  36387. begin
  36388. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36389. end;
  36390. procedure TI2C1A_I2C1ASTAT.setD_A; inline;
  36391. begin
  36392. pTDefRegMap(@Self)^.&set := $00000020;
  36393. end;
  36394. procedure TI2C1A_I2C1ASTAT.clearD_A; inline;
  36395. begin
  36396. pTDefRegMap(@Self)^.clr := $00000020;
  36397. end;
  36398. procedure TI2C1A_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
  36399. begin
  36400. if thebits = 0 then
  36401. pTDefRegMap(@Self)^.clr := $00000020
  36402. else
  36403. pTDefRegMap(@Self)^.&set := $00000020;
  36404. end;
  36405. function TI2C1A_I2C1ASTAT.getD_A : TBits_1; inline;
  36406. begin
  36407. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36408. end;
  36409. procedure TI2C1A_I2C1ASTAT.setI2COV; inline;
  36410. begin
  36411. pTDefRegMap(@Self)^.&set := $00000040;
  36412. end;
  36413. procedure TI2C1A_I2C1ASTAT.clearI2COV; inline;
  36414. begin
  36415. pTDefRegMap(@Self)^.clr := $00000040;
  36416. end;
  36417. procedure TI2C1A_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
  36418. begin
  36419. if thebits = 0 then
  36420. pTDefRegMap(@Self)^.clr := $00000040
  36421. else
  36422. pTDefRegMap(@Self)^.&set := $00000040;
  36423. end;
  36424. function TI2C1A_I2C1ASTAT.getI2COV : TBits_1; inline;
  36425. begin
  36426. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36427. end;
  36428. procedure TI2C1A_I2C1ASTAT.setIWCOL; inline;
  36429. begin
  36430. pTDefRegMap(@Self)^.&set := $00000080;
  36431. end;
  36432. procedure TI2C1A_I2C1ASTAT.clearIWCOL; inline;
  36433. begin
  36434. pTDefRegMap(@Self)^.clr := $00000080;
  36435. end;
  36436. procedure TI2C1A_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
  36437. begin
  36438. if thebits = 0 then
  36439. pTDefRegMap(@Self)^.clr := $00000080
  36440. else
  36441. pTDefRegMap(@Self)^.&set := $00000080;
  36442. end;
  36443. function TI2C1A_I2C1ASTAT.getIWCOL : TBits_1; inline;
  36444. begin
  36445. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36446. end;
  36447. procedure TI2C1A_I2C1ASTAT.setADD10; inline;
  36448. begin
  36449. pTDefRegMap(@Self)^.&set := $00000100;
  36450. end;
  36451. procedure TI2C1A_I2C1ASTAT.clearADD10; inline;
  36452. begin
  36453. pTDefRegMap(@Self)^.clr := $00000100;
  36454. end;
  36455. procedure TI2C1A_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
  36456. begin
  36457. if thebits = 0 then
  36458. pTDefRegMap(@Self)^.clr := $00000100
  36459. else
  36460. pTDefRegMap(@Self)^.&set := $00000100;
  36461. end;
  36462. function TI2C1A_I2C1ASTAT.getADD10 : TBits_1; inline;
  36463. begin
  36464. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36465. end;
  36466. procedure TI2C1A_I2C1ASTAT.setGCSTAT; inline;
  36467. begin
  36468. pTDefRegMap(@Self)^.&set := $00000200;
  36469. end;
  36470. procedure TI2C1A_I2C1ASTAT.clearGCSTAT; inline;
  36471. begin
  36472. pTDefRegMap(@Self)^.clr := $00000200;
  36473. end;
  36474. procedure TI2C1A_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
  36475. begin
  36476. if thebits = 0 then
  36477. pTDefRegMap(@Self)^.clr := $00000200
  36478. else
  36479. pTDefRegMap(@Self)^.&set := $00000200;
  36480. end;
  36481. function TI2C1A_I2C1ASTAT.getGCSTAT : TBits_1; inline;
  36482. begin
  36483. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36484. end;
  36485. procedure TI2C1A_I2C1ASTAT.setBCL; inline;
  36486. begin
  36487. pTDefRegMap(@Self)^.&set := $00000400;
  36488. end;
  36489. procedure TI2C1A_I2C1ASTAT.clearBCL; inline;
  36490. begin
  36491. pTDefRegMap(@Self)^.clr := $00000400;
  36492. end;
  36493. procedure TI2C1A_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
  36494. begin
  36495. if thebits = 0 then
  36496. pTDefRegMap(@Self)^.clr := $00000400
  36497. else
  36498. pTDefRegMap(@Self)^.&set := $00000400;
  36499. end;
  36500. function TI2C1A_I2C1ASTAT.getBCL : TBits_1; inline;
  36501. begin
  36502. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36503. end;
  36504. procedure TI2C1A_I2C1ASTAT.setTRSTAT; inline;
  36505. begin
  36506. pTDefRegMap(@Self)^.&set := $00004000;
  36507. end;
  36508. procedure TI2C1A_I2C1ASTAT.clearTRSTAT; inline;
  36509. begin
  36510. pTDefRegMap(@Self)^.clr := $00004000;
  36511. end;
  36512. procedure TI2C1A_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
  36513. begin
  36514. if thebits = 0 then
  36515. pTDefRegMap(@Self)^.clr := $00004000
  36516. else
  36517. pTDefRegMap(@Self)^.&set := $00004000;
  36518. end;
  36519. function TI2C1A_I2C1ASTAT.getTRSTAT : TBits_1; inline;
  36520. begin
  36521. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36522. end;
  36523. procedure TI2C1A_I2C1ASTAT.setACKSTAT; inline;
  36524. begin
  36525. pTDefRegMap(@Self)^.&set := $00008000;
  36526. end;
  36527. procedure TI2C1A_I2C1ASTAT.clearACKSTAT; inline;
  36528. begin
  36529. pTDefRegMap(@Self)^.clr := $00008000;
  36530. end;
  36531. procedure TI2C1A_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
  36532. begin
  36533. if thebits = 0 then
  36534. pTDefRegMap(@Self)^.clr := $00008000
  36535. else
  36536. pTDefRegMap(@Self)^.&set := $00008000;
  36537. end;
  36538. function TI2C1A_I2C1ASTAT.getACKSTAT : TBits_1; inline;
  36539. begin
  36540. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36541. end;
  36542. procedure TI2C1A_I2C1ASTAT.setI2CPOV; inline;
  36543. begin
  36544. pTDefRegMap(@Self)^.&set := $00000040;
  36545. end;
  36546. procedure TI2C1A_I2C1ASTAT.clearI2CPOV; inline;
  36547. begin
  36548. pTDefRegMap(@Self)^.clr := $00000040;
  36549. end;
  36550. procedure TI2C1A_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
  36551. begin
  36552. if thebits = 0 then
  36553. pTDefRegMap(@Self)^.clr := $00000040
  36554. else
  36555. pTDefRegMap(@Self)^.&set := $00000040;
  36556. end;
  36557. function TI2C1A_I2C1ASTAT.getI2CPOV : TBits_1; inline;
  36558. begin
  36559. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36560. end;
  36561. procedure TI2C1A_I2C1ASTAT.setw(thebits : TBits_32); inline;
  36562. begin
  36563. pTDefRegMap(@Self)^.val := thebits;
  36564. end;
  36565. function TI2C1A_I2C1ASTAT.getw : TBits_32; inline;
  36566. begin
  36567. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36568. end;
  36569. procedure TI2C1A_I2C3STAT.setTBF; inline;
  36570. begin
  36571. pTDefRegMap(@Self)^.&set := $00000001;
  36572. end;
  36573. procedure TI2C1A_I2C3STAT.clearTBF; inline;
  36574. begin
  36575. pTDefRegMap(@Self)^.clr := $00000001;
  36576. end;
  36577. procedure TI2C1A_I2C3STAT.setTBF(thebits : TBits_1); inline;
  36578. begin
  36579. if thebits = 0 then
  36580. pTDefRegMap(@Self)^.clr := $00000001
  36581. else
  36582. pTDefRegMap(@Self)^.&set := $00000001;
  36583. end;
  36584. function TI2C1A_I2C3STAT.getTBF : TBits_1; inline;
  36585. begin
  36586. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36587. end;
  36588. procedure TI2C1A_I2C3STAT.setRBF; inline;
  36589. begin
  36590. pTDefRegMap(@Self)^.&set := $00000002;
  36591. end;
  36592. procedure TI2C1A_I2C3STAT.clearRBF; inline;
  36593. begin
  36594. pTDefRegMap(@Self)^.clr := $00000002;
  36595. end;
  36596. procedure TI2C1A_I2C3STAT.setRBF(thebits : TBits_1); inline;
  36597. begin
  36598. if thebits = 0 then
  36599. pTDefRegMap(@Self)^.clr := $00000002
  36600. else
  36601. pTDefRegMap(@Self)^.&set := $00000002;
  36602. end;
  36603. function TI2C1A_I2C3STAT.getRBF : TBits_1; inline;
  36604. begin
  36605. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36606. end;
  36607. procedure TI2C1A_I2C3STAT.setR_W; inline;
  36608. begin
  36609. pTDefRegMap(@Self)^.&set := $00000004;
  36610. end;
  36611. procedure TI2C1A_I2C3STAT.clearR_W; inline;
  36612. begin
  36613. pTDefRegMap(@Self)^.clr := $00000004;
  36614. end;
  36615. procedure TI2C1A_I2C3STAT.setR_W(thebits : TBits_1); inline;
  36616. begin
  36617. if thebits = 0 then
  36618. pTDefRegMap(@Self)^.clr := $00000004
  36619. else
  36620. pTDefRegMap(@Self)^.&set := $00000004;
  36621. end;
  36622. function TI2C1A_I2C3STAT.getR_W : TBits_1; inline;
  36623. begin
  36624. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36625. end;
  36626. procedure TI2C1A_I2C3STAT.setS; inline;
  36627. begin
  36628. pTDefRegMap(@Self)^.&set := $00000008;
  36629. end;
  36630. procedure TI2C1A_I2C3STAT.clearS; inline;
  36631. begin
  36632. pTDefRegMap(@Self)^.clr := $00000008;
  36633. end;
  36634. procedure TI2C1A_I2C3STAT.setS(thebits : TBits_1); inline;
  36635. begin
  36636. if thebits = 0 then
  36637. pTDefRegMap(@Self)^.clr := $00000008
  36638. else
  36639. pTDefRegMap(@Self)^.&set := $00000008;
  36640. end;
  36641. function TI2C1A_I2C3STAT.getS : TBits_1; inline;
  36642. begin
  36643. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36644. end;
  36645. procedure TI2C1A_I2C3STAT.setP; inline;
  36646. begin
  36647. pTDefRegMap(@Self)^.&set := $00000010;
  36648. end;
  36649. procedure TI2C1A_I2C3STAT.clearP; inline;
  36650. begin
  36651. pTDefRegMap(@Self)^.clr := $00000010;
  36652. end;
  36653. procedure TI2C1A_I2C3STAT.setP(thebits : TBits_1); inline;
  36654. begin
  36655. if thebits = 0 then
  36656. pTDefRegMap(@Self)^.clr := $00000010
  36657. else
  36658. pTDefRegMap(@Self)^.&set := $00000010;
  36659. end;
  36660. function TI2C1A_I2C3STAT.getP : TBits_1; inline;
  36661. begin
  36662. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36663. end;
  36664. procedure TI2C1A_I2C3STAT.setD_A; inline;
  36665. begin
  36666. pTDefRegMap(@Self)^.&set := $00000020;
  36667. end;
  36668. procedure TI2C1A_I2C3STAT.clearD_A; inline;
  36669. begin
  36670. pTDefRegMap(@Self)^.clr := $00000020;
  36671. end;
  36672. procedure TI2C1A_I2C3STAT.setD_A(thebits : TBits_1); inline;
  36673. begin
  36674. if thebits = 0 then
  36675. pTDefRegMap(@Self)^.clr := $00000020
  36676. else
  36677. pTDefRegMap(@Self)^.&set := $00000020;
  36678. end;
  36679. function TI2C1A_I2C3STAT.getD_A : TBits_1; inline;
  36680. begin
  36681. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36682. end;
  36683. procedure TI2C1A_I2C3STAT.setI2COV; inline;
  36684. begin
  36685. pTDefRegMap(@Self)^.&set := $00000040;
  36686. end;
  36687. procedure TI2C1A_I2C3STAT.clearI2COV; inline;
  36688. begin
  36689. pTDefRegMap(@Self)^.clr := $00000040;
  36690. end;
  36691. procedure TI2C1A_I2C3STAT.setI2COV(thebits : TBits_1); inline;
  36692. begin
  36693. if thebits = 0 then
  36694. pTDefRegMap(@Self)^.clr := $00000040
  36695. else
  36696. pTDefRegMap(@Self)^.&set := $00000040;
  36697. end;
  36698. function TI2C1A_I2C3STAT.getI2COV : TBits_1; inline;
  36699. begin
  36700. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36701. end;
  36702. procedure TI2C1A_I2C3STAT.setIWCOL; inline;
  36703. begin
  36704. pTDefRegMap(@Self)^.&set := $00000080;
  36705. end;
  36706. procedure TI2C1A_I2C3STAT.clearIWCOL; inline;
  36707. begin
  36708. pTDefRegMap(@Self)^.clr := $00000080;
  36709. end;
  36710. procedure TI2C1A_I2C3STAT.setIWCOL(thebits : TBits_1); inline;
  36711. begin
  36712. if thebits = 0 then
  36713. pTDefRegMap(@Self)^.clr := $00000080
  36714. else
  36715. pTDefRegMap(@Self)^.&set := $00000080;
  36716. end;
  36717. function TI2C1A_I2C3STAT.getIWCOL : TBits_1; inline;
  36718. begin
  36719. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36720. end;
  36721. procedure TI2C1A_I2C3STAT.setADD10; inline;
  36722. begin
  36723. pTDefRegMap(@Self)^.&set := $00000100;
  36724. end;
  36725. procedure TI2C1A_I2C3STAT.clearADD10; inline;
  36726. begin
  36727. pTDefRegMap(@Self)^.clr := $00000100;
  36728. end;
  36729. procedure TI2C1A_I2C3STAT.setADD10(thebits : TBits_1); inline;
  36730. begin
  36731. if thebits = 0 then
  36732. pTDefRegMap(@Self)^.clr := $00000100
  36733. else
  36734. pTDefRegMap(@Self)^.&set := $00000100;
  36735. end;
  36736. function TI2C1A_I2C3STAT.getADD10 : TBits_1; inline;
  36737. begin
  36738. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36739. end;
  36740. procedure TI2C1A_I2C3STAT.setGCSTAT; inline;
  36741. begin
  36742. pTDefRegMap(@Self)^.&set := $00000200;
  36743. end;
  36744. procedure TI2C1A_I2C3STAT.clearGCSTAT; inline;
  36745. begin
  36746. pTDefRegMap(@Self)^.clr := $00000200;
  36747. end;
  36748. procedure TI2C1A_I2C3STAT.setGCSTAT(thebits : TBits_1); inline;
  36749. begin
  36750. if thebits = 0 then
  36751. pTDefRegMap(@Self)^.clr := $00000200
  36752. else
  36753. pTDefRegMap(@Self)^.&set := $00000200;
  36754. end;
  36755. function TI2C1A_I2C3STAT.getGCSTAT : TBits_1; inline;
  36756. begin
  36757. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36758. end;
  36759. procedure TI2C1A_I2C3STAT.setBCL; inline;
  36760. begin
  36761. pTDefRegMap(@Self)^.&set := $00000400;
  36762. end;
  36763. procedure TI2C1A_I2C3STAT.clearBCL; inline;
  36764. begin
  36765. pTDefRegMap(@Self)^.clr := $00000400;
  36766. end;
  36767. procedure TI2C1A_I2C3STAT.setBCL(thebits : TBits_1); inline;
  36768. begin
  36769. if thebits = 0 then
  36770. pTDefRegMap(@Self)^.clr := $00000400
  36771. else
  36772. pTDefRegMap(@Self)^.&set := $00000400;
  36773. end;
  36774. function TI2C1A_I2C3STAT.getBCL : TBits_1; inline;
  36775. begin
  36776. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36777. end;
  36778. procedure TI2C1A_I2C3STAT.setTRSTAT; inline;
  36779. begin
  36780. pTDefRegMap(@Self)^.&set := $00004000;
  36781. end;
  36782. procedure TI2C1A_I2C3STAT.clearTRSTAT; inline;
  36783. begin
  36784. pTDefRegMap(@Self)^.clr := $00004000;
  36785. end;
  36786. procedure TI2C1A_I2C3STAT.setTRSTAT(thebits : TBits_1); inline;
  36787. begin
  36788. if thebits = 0 then
  36789. pTDefRegMap(@Self)^.clr := $00004000
  36790. else
  36791. pTDefRegMap(@Self)^.&set := $00004000;
  36792. end;
  36793. function TI2C1A_I2C3STAT.getTRSTAT : TBits_1; inline;
  36794. begin
  36795. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36796. end;
  36797. procedure TI2C1A_I2C3STAT.setACKSTAT; inline;
  36798. begin
  36799. pTDefRegMap(@Self)^.&set := $00008000;
  36800. end;
  36801. procedure TI2C1A_I2C3STAT.clearACKSTAT; inline;
  36802. begin
  36803. pTDefRegMap(@Self)^.clr := $00008000;
  36804. end;
  36805. procedure TI2C1A_I2C3STAT.setACKSTAT(thebits : TBits_1); inline;
  36806. begin
  36807. if thebits = 0 then
  36808. pTDefRegMap(@Self)^.clr := $00008000
  36809. else
  36810. pTDefRegMap(@Self)^.&set := $00008000;
  36811. end;
  36812. function TI2C1A_I2C3STAT.getACKSTAT : TBits_1; inline;
  36813. begin
  36814. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36815. end;
  36816. procedure TI2C1A_I2C3STAT.setI2CPOV; inline;
  36817. begin
  36818. pTDefRegMap(@Self)^.&set := $00000040;
  36819. end;
  36820. procedure TI2C1A_I2C3STAT.clearI2CPOV; inline;
  36821. begin
  36822. pTDefRegMap(@Self)^.clr := $00000040;
  36823. end;
  36824. procedure TI2C1A_I2C3STAT.setI2CPOV(thebits : TBits_1); inline;
  36825. begin
  36826. if thebits = 0 then
  36827. pTDefRegMap(@Self)^.clr := $00000040
  36828. else
  36829. pTDefRegMap(@Self)^.&set := $00000040;
  36830. end;
  36831. function TI2C1A_I2C3STAT.getI2CPOV : TBits_1; inline;
  36832. begin
  36833. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36834. end;
  36835. procedure TI2C1A_I2C3STAT.setw(thebits : TBits_32); inline;
  36836. begin
  36837. pTDefRegMap(@Self)^.val := thebits;
  36838. end;
  36839. function TI2C1A_I2C3STAT.getw : TBits_32; inline;
  36840. begin
  36841. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36842. end;
  36843. procedure TI2C2A_I2C2ACON.setSEN; inline;
  36844. begin
  36845. pTDefRegMap(@Self)^.&set := $00000001;
  36846. end;
  36847. procedure TI2C2A_I2C2ACON.clearSEN; inline;
  36848. begin
  36849. pTDefRegMap(@Self)^.clr := $00000001;
  36850. end;
  36851. procedure TI2C2A_I2C2ACON.setSEN(thebits : TBits_1); inline;
  36852. begin
  36853. if thebits = 0 then
  36854. pTDefRegMap(@Self)^.clr := $00000001
  36855. else
  36856. pTDefRegMap(@Self)^.&set := $00000001;
  36857. end;
  36858. function TI2C2A_I2C2ACON.getSEN : TBits_1; inline;
  36859. begin
  36860. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36861. end;
  36862. procedure TI2C2A_I2C2ACON.setRSEN; inline;
  36863. begin
  36864. pTDefRegMap(@Self)^.&set := $00000002;
  36865. end;
  36866. procedure TI2C2A_I2C2ACON.clearRSEN; inline;
  36867. begin
  36868. pTDefRegMap(@Self)^.clr := $00000002;
  36869. end;
  36870. procedure TI2C2A_I2C2ACON.setRSEN(thebits : TBits_1); inline;
  36871. begin
  36872. if thebits = 0 then
  36873. pTDefRegMap(@Self)^.clr := $00000002
  36874. else
  36875. pTDefRegMap(@Self)^.&set := $00000002;
  36876. end;
  36877. function TI2C2A_I2C2ACON.getRSEN : TBits_1; inline;
  36878. begin
  36879. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36880. end;
  36881. procedure TI2C2A_I2C2ACON.setPEN; inline;
  36882. begin
  36883. pTDefRegMap(@Self)^.&set := $00000004;
  36884. end;
  36885. procedure TI2C2A_I2C2ACON.clearPEN; inline;
  36886. begin
  36887. pTDefRegMap(@Self)^.clr := $00000004;
  36888. end;
  36889. procedure TI2C2A_I2C2ACON.setPEN(thebits : TBits_1); inline;
  36890. begin
  36891. if thebits = 0 then
  36892. pTDefRegMap(@Self)^.clr := $00000004
  36893. else
  36894. pTDefRegMap(@Self)^.&set := $00000004;
  36895. end;
  36896. function TI2C2A_I2C2ACON.getPEN : TBits_1; inline;
  36897. begin
  36898. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36899. end;
  36900. procedure TI2C2A_I2C2ACON.setRCEN; inline;
  36901. begin
  36902. pTDefRegMap(@Self)^.&set := $00000008;
  36903. end;
  36904. procedure TI2C2A_I2C2ACON.clearRCEN; inline;
  36905. begin
  36906. pTDefRegMap(@Self)^.clr := $00000008;
  36907. end;
  36908. procedure TI2C2A_I2C2ACON.setRCEN(thebits : TBits_1); inline;
  36909. begin
  36910. if thebits = 0 then
  36911. pTDefRegMap(@Self)^.clr := $00000008
  36912. else
  36913. pTDefRegMap(@Self)^.&set := $00000008;
  36914. end;
  36915. function TI2C2A_I2C2ACON.getRCEN : TBits_1; inline;
  36916. begin
  36917. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36918. end;
  36919. procedure TI2C2A_I2C2ACON.setACKEN; inline;
  36920. begin
  36921. pTDefRegMap(@Self)^.&set := $00000010;
  36922. end;
  36923. procedure TI2C2A_I2C2ACON.clearACKEN; inline;
  36924. begin
  36925. pTDefRegMap(@Self)^.clr := $00000010;
  36926. end;
  36927. procedure TI2C2A_I2C2ACON.setACKEN(thebits : TBits_1); inline;
  36928. begin
  36929. if thebits = 0 then
  36930. pTDefRegMap(@Self)^.clr := $00000010
  36931. else
  36932. pTDefRegMap(@Self)^.&set := $00000010;
  36933. end;
  36934. function TI2C2A_I2C2ACON.getACKEN : TBits_1; inline;
  36935. begin
  36936. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36937. end;
  36938. procedure TI2C2A_I2C2ACON.setACKDT; inline;
  36939. begin
  36940. pTDefRegMap(@Self)^.&set := $00000020;
  36941. end;
  36942. procedure TI2C2A_I2C2ACON.clearACKDT; inline;
  36943. begin
  36944. pTDefRegMap(@Self)^.clr := $00000020;
  36945. end;
  36946. procedure TI2C2A_I2C2ACON.setACKDT(thebits : TBits_1); inline;
  36947. begin
  36948. if thebits = 0 then
  36949. pTDefRegMap(@Self)^.clr := $00000020
  36950. else
  36951. pTDefRegMap(@Self)^.&set := $00000020;
  36952. end;
  36953. function TI2C2A_I2C2ACON.getACKDT : TBits_1; inline;
  36954. begin
  36955. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36956. end;
  36957. procedure TI2C2A_I2C2ACON.setSTREN; inline;
  36958. begin
  36959. pTDefRegMap(@Self)^.&set := $00000040;
  36960. end;
  36961. procedure TI2C2A_I2C2ACON.clearSTREN; inline;
  36962. begin
  36963. pTDefRegMap(@Self)^.clr := $00000040;
  36964. end;
  36965. procedure TI2C2A_I2C2ACON.setSTREN(thebits : TBits_1); inline;
  36966. begin
  36967. if thebits = 0 then
  36968. pTDefRegMap(@Self)^.clr := $00000040
  36969. else
  36970. pTDefRegMap(@Self)^.&set := $00000040;
  36971. end;
  36972. function TI2C2A_I2C2ACON.getSTREN : TBits_1; inline;
  36973. begin
  36974. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36975. end;
  36976. procedure TI2C2A_I2C2ACON.setGCEN; inline;
  36977. begin
  36978. pTDefRegMap(@Self)^.&set := $00000080;
  36979. end;
  36980. procedure TI2C2A_I2C2ACON.clearGCEN; inline;
  36981. begin
  36982. pTDefRegMap(@Self)^.clr := $00000080;
  36983. end;
  36984. procedure TI2C2A_I2C2ACON.setGCEN(thebits : TBits_1); inline;
  36985. begin
  36986. if thebits = 0 then
  36987. pTDefRegMap(@Self)^.clr := $00000080
  36988. else
  36989. pTDefRegMap(@Self)^.&set := $00000080;
  36990. end;
  36991. function TI2C2A_I2C2ACON.getGCEN : TBits_1; inline;
  36992. begin
  36993. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36994. end;
  36995. procedure TI2C2A_I2C2ACON.setSMEN; inline;
  36996. begin
  36997. pTDefRegMap(@Self)^.&set := $00000100;
  36998. end;
  36999. procedure TI2C2A_I2C2ACON.clearSMEN; inline;
  37000. begin
  37001. pTDefRegMap(@Self)^.clr := $00000100;
  37002. end;
  37003. procedure TI2C2A_I2C2ACON.setSMEN(thebits : TBits_1); inline;
  37004. begin
  37005. if thebits = 0 then
  37006. pTDefRegMap(@Self)^.clr := $00000100
  37007. else
  37008. pTDefRegMap(@Self)^.&set := $00000100;
  37009. end;
  37010. function TI2C2A_I2C2ACON.getSMEN : TBits_1; inline;
  37011. begin
  37012. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37013. end;
  37014. procedure TI2C2A_I2C2ACON.setDISSLW; inline;
  37015. begin
  37016. pTDefRegMap(@Self)^.&set := $00000200;
  37017. end;
  37018. procedure TI2C2A_I2C2ACON.clearDISSLW; inline;
  37019. begin
  37020. pTDefRegMap(@Self)^.clr := $00000200;
  37021. end;
  37022. procedure TI2C2A_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
  37023. begin
  37024. if thebits = 0 then
  37025. pTDefRegMap(@Self)^.clr := $00000200
  37026. else
  37027. pTDefRegMap(@Self)^.&set := $00000200;
  37028. end;
  37029. function TI2C2A_I2C2ACON.getDISSLW : TBits_1; inline;
  37030. begin
  37031. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37032. end;
  37033. procedure TI2C2A_I2C2ACON.setA10M; inline;
  37034. begin
  37035. pTDefRegMap(@Self)^.&set := $00000400;
  37036. end;
  37037. procedure TI2C2A_I2C2ACON.clearA10M; inline;
  37038. begin
  37039. pTDefRegMap(@Self)^.clr := $00000400;
  37040. end;
  37041. procedure TI2C2A_I2C2ACON.setA10M(thebits : TBits_1); inline;
  37042. begin
  37043. if thebits = 0 then
  37044. pTDefRegMap(@Self)^.clr := $00000400
  37045. else
  37046. pTDefRegMap(@Self)^.&set := $00000400;
  37047. end;
  37048. function TI2C2A_I2C2ACON.getA10M : TBits_1; inline;
  37049. begin
  37050. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37051. end;
  37052. procedure TI2C2A_I2C2ACON.setSTRICT; inline;
  37053. begin
  37054. pTDefRegMap(@Self)^.&set := $00000800;
  37055. end;
  37056. procedure TI2C2A_I2C2ACON.clearSTRICT; inline;
  37057. begin
  37058. pTDefRegMap(@Self)^.clr := $00000800;
  37059. end;
  37060. procedure TI2C2A_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
  37061. begin
  37062. if thebits = 0 then
  37063. pTDefRegMap(@Self)^.clr := $00000800
  37064. else
  37065. pTDefRegMap(@Self)^.&set := $00000800;
  37066. end;
  37067. function TI2C2A_I2C2ACON.getSTRICT : TBits_1; inline;
  37068. begin
  37069. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37070. end;
  37071. procedure TI2C2A_I2C2ACON.setSCLREL; inline;
  37072. begin
  37073. pTDefRegMap(@Self)^.&set := $00001000;
  37074. end;
  37075. procedure TI2C2A_I2C2ACON.clearSCLREL; inline;
  37076. begin
  37077. pTDefRegMap(@Self)^.clr := $00001000;
  37078. end;
  37079. procedure TI2C2A_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
  37080. begin
  37081. if thebits = 0 then
  37082. pTDefRegMap(@Self)^.clr := $00001000
  37083. else
  37084. pTDefRegMap(@Self)^.&set := $00001000;
  37085. end;
  37086. function TI2C2A_I2C2ACON.getSCLREL : TBits_1; inline;
  37087. begin
  37088. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37089. end;
  37090. procedure TI2C2A_I2C2ACON.setSIDL; inline;
  37091. begin
  37092. pTDefRegMap(@Self)^.&set := $00002000;
  37093. end;
  37094. procedure TI2C2A_I2C2ACON.clearSIDL; inline;
  37095. begin
  37096. pTDefRegMap(@Self)^.clr := $00002000;
  37097. end;
  37098. procedure TI2C2A_I2C2ACON.setSIDL(thebits : TBits_1); inline;
  37099. begin
  37100. if thebits = 0 then
  37101. pTDefRegMap(@Self)^.clr := $00002000
  37102. else
  37103. pTDefRegMap(@Self)^.&set := $00002000;
  37104. end;
  37105. function TI2C2A_I2C2ACON.getSIDL : TBits_1; inline;
  37106. begin
  37107. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37108. end;
  37109. procedure TI2C2A_I2C2ACON.setON; inline;
  37110. begin
  37111. pTDefRegMap(@Self)^.&set := $00008000;
  37112. end;
  37113. procedure TI2C2A_I2C2ACON.clearON; inline;
  37114. begin
  37115. pTDefRegMap(@Self)^.clr := $00008000;
  37116. end;
  37117. procedure TI2C2A_I2C2ACON.setON(thebits : TBits_1); inline;
  37118. begin
  37119. if thebits = 0 then
  37120. pTDefRegMap(@Self)^.clr := $00008000
  37121. else
  37122. pTDefRegMap(@Self)^.&set := $00008000;
  37123. end;
  37124. function TI2C2A_I2C2ACON.getON : TBits_1; inline;
  37125. begin
  37126. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37127. end;
  37128. procedure TI2C2A_I2C2ACON.setIPMIEN; inline;
  37129. begin
  37130. pTDefRegMap(@Self)^.&set := $00000800;
  37131. end;
  37132. procedure TI2C2A_I2C2ACON.clearIPMIEN; inline;
  37133. begin
  37134. pTDefRegMap(@Self)^.clr := $00000800;
  37135. end;
  37136. procedure TI2C2A_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
  37137. begin
  37138. if thebits = 0 then
  37139. pTDefRegMap(@Self)^.clr := $00000800
  37140. else
  37141. pTDefRegMap(@Self)^.&set := $00000800;
  37142. end;
  37143. function TI2C2A_I2C2ACON.getIPMIEN : TBits_1; inline;
  37144. begin
  37145. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37146. end;
  37147. procedure TI2C2A_I2C2ACON.setI2CSIDL; inline;
  37148. begin
  37149. pTDefRegMap(@Self)^.&set := $00002000;
  37150. end;
  37151. procedure TI2C2A_I2C2ACON.clearI2CSIDL; inline;
  37152. begin
  37153. pTDefRegMap(@Self)^.clr := $00002000;
  37154. end;
  37155. procedure TI2C2A_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
  37156. begin
  37157. if thebits = 0 then
  37158. pTDefRegMap(@Self)^.clr := $00002000
  37159. else
  37160. pTDefRegMap(@Self)^.&set := $00002000;
  37161. end;
  37162. function TI2C2A_I2C2ACON.getI2CSIDL : TBits_1; inline;
  37163. begin
  37164. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37165. end;
  37166. procedure TI2C2A_I2C2ACON.setI2CEN; inline;
  37167. begin
  37168. pTDefRegMap(@Self)^.&set := $00008000;
  37169. end;
  37170. procedure TI2C2A_I2C2ACON.clearI2CEN; inline;
  37171. begin
  37172. pTDefRegMap(@Self)^.clr := $00008000;
  37173. end;
  37174. procedure TI2C2A_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
  37175. begin
  37176. if thebits = 0 then
  37177. pTDefRegMap(@Self)^.clr := $00008000
  37178. else
  37179. pTDefRegMap(@Self)^.&set := $00008000;
  37180. end;
  37181. function TI2C2A_I2C2ACON.getI2CEN : TBits_1; inline;
  37182. begin
  37183. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37184. end;
  37185. procedure TI2C2A_I2C2ACON.setw(thebits : TBits_32); inline;
  37186. begin
  37187. pTDefRegMap(@Self)^.val := thebits;
  37188. end;
  37189. function TI2C2A_I2C2ACON.getw : TBits_32; inline;
  37190. begin
  37191. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37192. end;
  37193. procedure TI2C2A_I2C4CON.setSEN; inline;
  37194. begin
  37195. pTDefRegMap(@Self)^.&set := $00000001;
  37196. end;
  37197. procedure TI2C2A_I2C4CON.clearSEN; inline;
  37198. begin
  37199. pTDefRegMap(@Self)^.clr := $00000001;
  37200. end;
  37201. procedure TI2C2A_I2C4CON.setSEN(thebits : TBits_1); inline;
  37202. begin
  37203. if thebits = 0 then
  37204. pTDefRegMap(@Self)^.clr := $00000001
  37205. else
  37206. pTDefRegMap(@Self)^.&set := $00000001;
  37207. end;
  37208. function TI2C2A_I2C4CON.getSEN : TBits_1; inline;
  37209. begin
  37210. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37211. end;
  37212. procedure TI2C2A_I2C4CON.setRSEN; inline;
  37213. begin
  37214. pTDefRegMap(@Self)^.&set := $00000002;
  37215. end;
  37216. procedure TI2C2A_I2C4CON.clearRSEN; inline;
  37217. begin
  37218. pTDefRegMap(@Self)^.clr := $00000002;
  37219. end;
  37220. procedure TI2C2A_I2C4CON.setRSEN(thebits : TBits_1); inline;
  37221. begin
  37222. if thebits = 0 then
  37223. pTDefRegMap(@Self)^.clr := $00000002
  37224. else
  37225. pTDefRegMap(@Self)^.&set := $00000002;
  37226. end;
  37227. function TI2C2A_I2C4CON.getRSEN : TBits_1; inline;
  37228. begin
  37229. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37230. end;
  37231. procedure TI2C2A_I2C4CON.setPEN; inline;
  37232. begin
  37233. pTDefRegMap(@Self)^.&set := $00000004;
  37234. end;
  37235. procedure TI2C2A_I2C4CON.clearPEN; inline;
  37236. begin
  37237. pTDefRegMap(@Self)^.clr := $00000004;
  37238. end;
  37239. procedure TI2C2A_I2C4CON.setPEN(thebits : TBits_1); inline;
  37240. begin
  37241. if thebits = 0 then
  37242. pTDefRegMap(@Self)^.clr := $00000004
  37243. else
  37244. pTDefRegMap(@Self)^.&set := $00000004;
  37245. end;
  37246. function TI2C2A_I2C4CON.getPEN : TBits_1; inline;
  37247. begin
  37248. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37249. end;
  37250. procedure TI2C2A_I2C4CON.setRCEN; inline;
  37251. begin
  37252. pTDefRegMap(@Self)^.&set := $00000008;
  37253. end;
  37254. procedure TI2C2A_I2C4CON.clearRCEN; inline;
  37255. begin
  37256. pTDefRegMap(@Self)^.clr := $00000008;
  37257. end;
  37258. procedure TI2C2A_I2C4CON.setRCEN(thebits : TBits_1); inline;
  37259. begin
  37260. if thebits = 0 then
  37261. pTDefRegMap(@Self)^.clr := $00000008
  37262. else
  37263. pTDefRegMap(@Self)^.&set := $00000008;
  37264. end;
  37265. function TI2C2A_I2C4CON.getRCEN : TBits_1; inline;
  37266. begin
  37267. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37268. end;
  37269. procedure TI2C2A_I2C4CON.setACKEN; inline;
  37270. begin
  37271. pTDefRegMap(@Self)^.&set := $00000010;
  37272. end;
  37273. procedure TI2C2A_I2C4CON.clearACKEN; inline;
  37274. begin
  37275. pTDefRegMap(@Self)^.clr := $00000010;
  37276. end;
  37277. procedure TI2C2A_I2C4CON.setACKEN(thebits : TBits_1); inline;
  37278. begin
  37279. if thebits = 0 then
  37280. pTDefRegMap(@Self)^.clr := $00000010
  37281. else
  37282. pTDefRegMap(@Self)^.&set := $00000010;
  37283. end;
  37284. function TI2C2A_I2C4CON.getACKEN : TBits_1; inline;
  37285. begin
  37286. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37287. end;
  37288. procedure TI2C2A_I2C4CON.setACKDT; inline;
  37289. begin
  37290. pTDefRegMap(@Self)^.&set := $00000020;
  37291. end;
  37292. procedure TI2C2A_I2C4CON.clearACKDT; inline;
  37293. begin
  37294. pTDefRegMap(@Self)^.clr := $00000020;
  37295. end;
  37296. procedure TI2C2A_I2C4CON.setACKDT(thebits : TBits_1); inline;
  37297. begin
  37298. if thebits = 0 then
  37299. pTDefRegMap(@Self)^.clr := $00000020
  37300. else
  37301. pTDefRegMap(@Self)^.&set := $00000020;
  37302. end;
  37303. function TI2C2A_I2C4CON.getACKDT : TBits_1; inline;
  37304. begin
  37305. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37306. end;
  37307. procedure TI2C2A_I2C4CON.setSTREN; inline;
  37308. begin
  37309. pTDefRegMap(@Self)^.&set := $00000040;
  37310. end;
  37311. procedure TI2C2A_I2C4CON.clearSTREN; inline;
  37312. begin
  37313. pTDefRegMap(@Self)^.clr := $00000040;
  37314. end;
  37315. procedure TI2C2A_I2C4CON.setSTREN(thebits : TBits_1); inline;
  37316. begin
  37317. if thebits = 0 then
  37318. pTDefRegMap(@Self)^.clr := $00000040
  37319. else
  37320. pTDefRegMap(@Self)^.&set := $00000040;
  37321. end;
  37322. function TI2C2A_I2C4CON.getSTREN : TBits_1; inline;
  37323. begin
  37324. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37325. end;
  37326. procedure TI2C2A_I2C4CON.setGCEN; inline;
  37327. begin
  37328. pTDefRegMap(@Self)^.&set := $00000080;
  37329. end;
  37330. procedure TI2C2A_I2C4CON.clearGCEN; inline;
  37331. begin
  37332. pTDefRegMap(@Self)^.clr := $00000080;
  37333. end;
  37334. procedure TI2C2A_I2C4CON.setGCEN(thebits : TBits_1); inline;
  37335. begin
  37336. if thebits = 0 then
  37337. pTDefRegMap(@Self)^.clr := $00000080
  37338. else
  37339. pTDefRegMap(@Self)^.&set := $00000080;
  37340. end;
  37341. function TI2C2A_I2C4CON.getGCEN : TBits_1; inline;
  37342. begin
  37343. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37344. end;
  37345. procedure TI2C2A_I2C4CON.setSMEN; inline;
  37346. begin
  37347. pTDefRegMap(@Self)^.&set := $00000100;
  37348. end;
  37349. procedure TI2C2A_I2C4CON.clearSMEN; inline;
  37350. begin
  37351. pTDefRegMap(@Self)^.clr := $00000100;
  37352. end;
  37353. procedure TI2C2A_I2C4CON.setSMEN(thebits : TBits_1); inline;
  37354. begin
  37355. if thebits = 0 then
  37356. pTDefRegMap(@Self)^.clr := $00000100
  37357. else
  37358. pTDefRegMap(@Self)^.&set := $00000100;
  37359. end;
  37360. function TI2C2A_I2C4CON.getSMEN : TBits_1; inline;
  37361. begin
  37362. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37363. end;
  37364. procedure TI2C2A_I2C4CON.setDISSLW; inline;
  37365. begin
  37366. pTDefRegMap(@Self)^.&set := $00000200;
  37367. end;
  37368. procedure TI2C2A_I2C4CON.clearDISSLW; inline;
  37369. begin
  37370. pTDefRegMap(@Self)^.clr := $00000200;
  37371. end;
  37372. procedure TI2C2A_I2C4CON.setDISSLW(thebits : TBits_1); inline;
  37373. begin
  37374. if thebits = 0 then
  37375. pTDefRegMap(@Self)^.clr := $00000200
  37376. else
  37377. pTDefRegMap(@Self)^.&set := $00000200;
  37378. end;
  37379. function TI2C2A_I2C4CON.getDISSLW : TBits_1; inline;
  37380. begin
  37381. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37382. end;
  37383. procedure TI2C2A_I2C4CON.setA10M; inline;
  37384. begin
  37385. pTDefRegMap(@Self)^.&set := $00000400;
  37386. end;
  37387. procedure TI2C2A_I2C4CON.clearA10M; inline;
  37388. begin
  37389. pTDefRegMap(@Self)^.clr := $00000400;
  37390. end;
  37391. procedure TI2C2A_I2C4CON.setA10M(thebits : TBits_1); inline;
  37392. begin
  37393. if thebits = 0 then
  37394. pTDefRegMap(@Self)^.clr := $00000400
  37395. else
  37396. pTDefRegMap(@Self)^.&set := $00000400;
  37397. end;
  37398. function TI2C2A_I2C4CON.getA10M : TBits_1; inline;
  37399. begin
  37400. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37401. end;
  37402. procedure TI2C2A_I2C4CON.setSTRICT; inline;
  37403. begin
  37404. pTDefRegMap(@Self)^.&set := $00000800;
  37405. end;
  37406. procedure TI2C2A_I2C4CON.clearSTRICT; inline;
  37407. begin
  37408. pTDefRegMap(@Self)^.clr := $00000800;
  37409. end;
  37410. procedure TI2C2A_I2C4CON.setSTRICT(thebits : TBits_1); inline;
  37411. begin
  37412. if thebits = 0 then
  37413. pTDefRegMap(@Self)^.clr := $00000800
  37414. else
  37415. pTDefRegMap(@Self)^.&set := $00000800;
  37416. end;
  37417. function TI2C2A_I2C4CON.getSTRICT : TBits_1; inline;
  37418. begin
  37419. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37420. end;
  37421. procedure TI2C2A_I2C4CON.setSCLREL; inline;
  37422. begin
  37423. pTDefRegMap(@Self)^.&set := $00001000;
  37424. end;
  37425. procedure TI2C2A_I2C4CON.clearSCLREL; inline;
  37426. begin
  37427. pTDefRegMap(@Self)^.clr := $00001000;
  37428. end;
  37429. procedure TI2C2A_I2C4CON.setSCLREL(thebits : TBits_1); inline;
  37430. begin
  37431. if thebits = 0 then
  37432. pTDefRegMap(@Self)^.clr := $00001000
  37433. else
  37434. pTDefRegMap(@Self)^.&set := $00001000;
  37435. end;
  37436. function TI2C2A_I2C4CON.getSCLREL : TBits_1; inline;
  37437. begin
  37438. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37439. end;
  37440. procedure TI2C2A_I2C4CON.setSIDL; inline;
  37441. begin
  37442. pTDefRegMap(@Self)^.&set := $00002000;
  37443. end;
  37444. procedure TI2C2A_I2C4CON.clearSIDL; inline;
  37445. begin
  37446. pTDefRegMap(@Self)^.clr := $00002000;
  37447. end;
  37448. procedure TI2C2A_I2C4CON.setSIDL(thebits : TBits_1); inline;
  37449. begin
  37450. if thebits = 0 then
  37451. pTDefRegMap(@Self)^.clr := $00002000
  37452. else
  37453. pTDefRegMap(@Self)^.&set := $00002000;
  37454. end;
  37455. function TI2C2A_I2C4CON.getSIDL : TBits_1; inline;
  37456. begin
  37457. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37458. end;
  37459. procedure TI2C2A_I2C4CON.setON; inline;
  37460. begin
  37461. pTDefRegMap(@Self)^.&set := $00008000;
  37462. end;
  37463. procedure TI2C2A_I2C4CON.clearON; inline;
  37464. begin
  37465. pTDefRegMap(@Self)^.clr := $00008000;
  37466. end;
  37467. procedure TI2C2A_I2C4CON.setON(thebits : TBits_1); inline;
  37468. begin
  37469. if thebits = 0 then
  37470. pTDefRegMap(@Self)^.clr := $00008000
  37471. else
  37472. pTDefRegMap(@Self)^.&set := $00008000;
  37473. end;
  37474. function TI2C2A_I2C4CON.getON : TBits_1; inline;
  37475. begin
  37476. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37477. end;
  37478. procedure TI2C2A_I2C4CON.setIPMIEN; inline;
  37479. begin
  37480. pTDefRegMap(@Self)^.&set := $00000800;
  37481. end;
  37482. procedure TI2C2A_I2C4CON.clearIPMIEN; inline;
  37483. begin
  37484. pTDefRegMap(@Self)^.clr := $00000800;
  37485. end;
  37486. procedure TI2C2A_I2C4CON.setIPMIEN(thebits : TBits_1); inline;
  37487. begin
  37488. if thebits = 0 then
  37489. pTDefRegMap(@Self)^.clr := $00000800
  37490. else
  37491. pTDefRegMap(@Self)^.&set := $00000800;
  37492. end;
  37493. function TI2C2A_I2C4CON.getIPMIEN : TBits_1; inline;
  37494. begin
  37495. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37496. end;
  37497. procedure TI2C2A_I2C4CON.setI2CSIDL; inline;
  37498. begin
  37499. pTDefRegMap(@Self)^.&set := $00002000;
  37500. end;
  37501. procedure TI2C2A_I2C4CON.clearI2CSIDL; inline;
  37502. begin
  37503. pTDefRegMap(@Self)^.clr := $00002000;
  37504. end;
  37505. procedure TI2C2A_I2C4CON.setI2CSIDL(thebits : TBits_1); inline;
  37506. begin
  37507. if thebits = 0 then
  37508. pTDefRegMap(@Self)^.clr := $00002000
  37509. else
  37510. pTDefRegMap(@Self)^.&set := $00002000;
  37511. end;
  37512. function TI2C2A_I2C4CON.getI2CSIDL : TBits_1; inline;
  37513. begin
  37514. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37515. end;
  37516. procedure TI2C2A_I2C4CON.setI2CEN; inline;
  37517. begin
  37518. pTDefRegMap(@Self)^.&set := $00008000;
  37519. end;
  37520. procedure TI2C2A_I2C4CON.clearI2CEN; inline;
  37521. begin
  37522. pTDefRegMap(@Self)^.clr := $00008000;
  37523. end;
  37524. procedure TI2C2A_I2C4CON.setI2CEN(thebits : TBits_1); inline;
  37525. begin
  37526. if thebits = 0 then
  37527. pTDefRegMap(@Self)^.clr := $00008000
  37528. else
  37529. pTDefRegMap(@Self)^.&set := $00008000;
  37530. end;
  37531. function TI2C2A_I2C4CON.getI2CEN : TBits_1; inline;
  37532. begin
  37533. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37534. end;
  37535. procedure TI2C2A_I2C4CON.setw(thebits : TBits_32); inline;
  37536. begin
  37537. pTDefRegMap(@Self)^.val := thebits;
  37538. end;
  37539. function TI2C2A_I2C4CON.getw : TBits_32; inline;
  37540. begin
  37541. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37542. end;
  37543. procedure TI2C2A_I2C2ASTAT.setTBF; inline;
  37544. begin
  37545. pTDefRegMap(@Self)^.&set := $00000001;
  37546. end;
  37547. procedure TI2C2A_I2C2ASTAT.clearTBF; inline;
  37548. begin
  37549. pTDefRegMap(@Self)^.clr := $00000001;
  37550. end;
  37551. procedure TI2C2A_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
  37552. begin
  37553. if thebits = 0 then
  37554. pTDefRegMap(@Self)^.clr := $00000001
  37555. else
  37556. pTDefRegMap(@Self)^.&set := $00000001;
  37557. end;
  37558. function TI2C2A_I2C2ASTAT.getTBF : TBits_1; inline;
  37559. begin
  37560. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37561. end;
  37562. procedure TI2C2A_I2C2ASTAT.setRBF; inline;
  37563. begin
  37564. pTDefRegMap(@Self)^.&set := $00000002;
  37565. end;
  37566. procedure TI2C2A_I2C2ASTAT.clearRBF; inline;
  37567. begin
  37568. pTDefRegMap(@Self)^.clr := $00000002;
  37569. end;
  37570. procedure TI2C2A_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
  37571. begin
  37572. if thebits = 0 then
  37573. pTDefRegMap(@Self)^.clr := $00000002
  37574. else
  37575. pTDefRegMap(@Self)^.&set := $00000002;
  37576. end;
  37577. function TI2C2A_I2C2ASTAT.getRBF : TBits_1; inline;
  37578. begin
  37579. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37580. end;
  37581. procedure TI2C2A_I2C2ASTAT.setR_W; inline;
  37582. begin
  37583. pTDefRegMap(@Self)^.&set := $00000004;
  37584. end;
  37585. procedure TI2C2A_I2C2ASTAT.clearR_W; inline;
  37586. begin
  37587. pTDefRegMap(@Self)^.clr := $00000004;
  37588. end;
  37589. procedure TI2C2A_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
  37590. begin
  37591. if thebits = 0 then
  37592. pTDefRegMap(@Self)^.clr := $00000004
  37593. else
  37594. pTDefRegMap(@Self)^.&set := $00000004;
  37595. end;
  37596. function TI2C2A_I2C2ASTAT.getR_W : TBits_1; inline;
  37597. begin
  37598. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37599. end;
  37600. procedure TI2C2A_I2C2ASTAT.setS; inline;
  37601. begin
  37602. pTDefRegMap(@Self)^.&set := $00000008;
  37603. end;
  37604. procedure TI2C2A_I2C2ASTAT.clearS; inline;
  37605. begin
  37606. pTDefRegMap(@Self)^.clr := $00000008;
  37607. end;
  37608. procedure TI2C2A_I2C2ASTAT.setS(thebits : TBits_1); inline;
  37609. begin
  37610. if thebits = 0 then
  37611. pTDefRegMap(@Self)^.clr := $00000008
  37612. else
  37613. pTDefRegMap(@Self)^.&set := $00000008;
  37614. end;
  37615. function TI2C2A_I2C2ASTAT.getS : TBits_1; inline;
  37616. begin
  37617. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37618. end;
  37619. procedure TI2C2A_I2C2ASTAT.setP; inline;
  37620. begin
  37621. pTDefRegMap(@Self)^.&set := $00000010;
  37622. end;
  37623. procedure TI2C2A_I2C2ASTAT.clearP; inline;
  37624. begin
  37625. pTDefRegMap(@Self)^.clr := $00000010;
  37626. end;
  37627. procedure TI2C2A_I2C2ASTAT.setP(thebits : TBits_1); inline;
  37628. begin
  37629. if thebits = 0 then
  37630. pTDefRegMap(@Self)^.clr := $00000010
  37631. else
  37632. pTDefRegMap(@Self)^.&set := $00000010;
  37633. end;
  37634. function TI2C2A_I2C2ASTAT.getP : TBits_1; inline;
  37635. begin
  37636. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37637. end;
  37638. procedure TI2C2A_I2C2ASTAT.setD_A; inline;
  37639. begin
  37640. pTDefRegMap(@Self)^.&set := $00000020;
  37641. end;
  37642. procedure TI2C2A_I2C2ASTAT.clearD_A; inline;
  37643. begin
  37644. pTDefRegMap(@Self)^.clr := $00000020;
  37645. end;
  37646. procedure TI2C2A_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
  37647. begin
  37648. if thebits = 0 then
  37649. pTDefRegMap(@Self)^.clr := $00000020
  37650. else
  37651. pTDefRegMap(@Self)^.&set := $00000020;
  37652. end;
  37653. function TI2C2A_I2C2ASTAT.getD_A : TBits_1; inline;
  37654. begin
  37655. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37656. end;
  37657. procedure TI2C2A_I2C2ASTAT.setI2COV; inline;
  37658. begin
  37659. pTDefRegMap(@Self)^.&set := $00000040;
  37660. end;
  37661. procedure TI2C2A_I2C2ASTAT.clearI2COV; inline;
  37662. begin
  37663. pTDefRegMap(@Self)^.clr := $00000040;
  37664. end;
  37665. procedure TI2C2A_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
  37666. begin
  37667. if thebits = 0 then
  37668. pTDefRegMap(@Self)^.clr := $00000040
  37669. else
  37670. pTDefRegMap(@Self)^.&set := $00000040;
  37671. end;
  37672. function TI2C2A_I2C2ASTAT.getI2COV : TBits_1; inline;
  37673. begin
  37674. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37675. end;
  37676. procedure TI2C2A_I2C2ASTAT.setIWCOL; inline;
  37677. begin
  37678. pTDefRegMap(@Self)^.&set := $00000080;
  37679. end;
  37680. procedure TI2C2A_I2C2ASTAT.clearIWCOL; inline;
  37681. begin
  37682. pTDefRegMap(@Self)^.clr := $00000080;
  37683. end;
  37684. procedure TI2C2A_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
  37685. begin
  37686. if thebits = 0 then
  37687. pTDefRegMap(@Self)^.clr := $00000080
  37688. else
  37689. pTDefRegMap(@Self)^.&set := $00000080;
  37690. end;
  37691. function TI2C2A_I2C2ASTAT.getIWCOL : TBits_1; inline;
  37692. begin
  37693. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37694. end;
  37695. procedure TI2C2A_I2C2ASTAT.setADD10; inline;
  37696. begin
  37697. pTDefRegMap(@Self)^.&set := $00000100;
  37698. end;
  37699. procedure TI2C2A_I2C2ASTAT.clearADD10; inline;
  37700. begin
  37701. pTDefRegMap(@Self)^.clr := $00000100;
  37702. end;
  37703. procedure TI2C2A_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
  37704. begin
  37705. if thebits = 0 then
  37706. pTDefRegMap(@Self)^.clr := $00000100
  37707. else
  37708. pTDefRegMap(@Self)^.&set := $00000100;
  37709. end;
  37710. function TI2C2A_I2C2ASTAT.getADD10 : TBits_1; inline;
  37711. begin
  37712. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37713. end;
  37714. procedure TI2C2A_I2C2ASTAT.setGCSTAT; inline;
  37715. begin
  37716. pTDefRegMap(@Self)^.&set := $00000200;
  37717. end;
  37718. procedure TI2C2A_I2C2ASTAT.clearGCSTAT; inline;
  37719. begin
  37720. pTDefRegMap(@Self)^.clr := $00000200;
  37721. end;
  37722. procedure TI2C2A_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
  37723. begin
  37724. if thebits = 0 then
  37725. pTDefRegMap(@Self)^.clr := $00000200
  37726. else
  37727. pTDefRegMap(@Self)^.&set := $00000200;
  37728. end;
  37729. function TI2C2A_I2C2ASTAT.getGCSTAT : TBits_1; inline;
  37730. begin
  37731. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37732. end;
  37733. procedure TI2C2A_I2C2ASTAT.setBCL; inline;
  37734. begin
  37735. pTDefRegMap(@Self)^.&set := $00000400;
  37736. end;
  37737. procedure TI2C2A_I2C2ASTAT.clearBCL; inline;
  37738. begin
  37739. pTDefRegMap(@Self)^.clr := $00000400;
  37740. end;
  37741. procedure TI2C2A_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
  37742. begin
  37743. if thebits = 0 then
  37744. pTDefRegMap(@Self)^.clr := $00000400
  37745. else
  37746. pTDefRegMap(@Self)^.&set := $00000400;
  37747. end;
  37748. function TI2C2A_I2C2ASTAT.getBCL : TBits_1; inline;
  37749. begin
  37750. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37751. end;
  37752. procedure TI2C2A_I2C2ASTAT.setTRSTAT; inline;
  37753. begin
  37754. pTDefRegMap(@Self)^.&set := $00004000;
  37755. end;
  37756. procedure TI2C2A_I2C2ASTAT.clearTRSTAT; inline;
  37757. begin
  37758. pTDefRegMap(@Self)^.clr := $00004000;
  37759. end;
  37760. procedure TI2C2A_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
  37761. begin
  37762. if thebits = 0 then
  37763. pTDefRegMap(@Self)^.clr := $00004000
  37764. else
  37765. pTDefRegMap(@Self)^.&set := $00004000;
  37766. end;
  37767. function TI2C2A_I2C2ASTAT.getTRSTAT : TBits_1; inline;
  37768. begin
  37769. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37770. end;
  37771. procedure TI2C2A_I2C2ASTAT.setACKSTAT; inline;
  37772. begin
  37773. pTDefRegMap(@Self)^.&set := $00008000;
  37774. end;
  37775. procedure TI2C2A_I2C2ASTAT.clearACKSTAT; inline;
  37776. begin
  37777. pTDefRegMap(@Self)^.clr := $00008000;
  37778. end;
  37779. procedure TI2C2A_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
  37780. begin
  37781. if thebits = 0 then
  37782. pTDefRegMap(@Self)^.clr := $00008000
  37783. else
  37784. pTDefRegMap(@Self)^.&set := $00008000;
  37785. end;
  37786. function TI2C2A_I2C2ASTAT.getACKSTAT : TBits_1; inline;
  37787. begin
  37788. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37789. end;
  37790. procedure TI2C2A_I2C2ASTAT.setI2CPOV; inline;
  37791. begin
  37792. pTDefRegMap(@Self)^.&set := $00000040;
  37793. end;
  37794. procedure TI2C2A_I2C2ASTAT.clearI2CPOV; inline;
  37795. begin
  37796. pTDefRegMap(@Self)^.clr := $00000040;
  37797. end;
  37798. procedure TI2C2A_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
  37799. begin
  37800. if thebits = 0 then
  37801. pTDefRegMap(@Self)^.clr := $00000040
  37802. else
  37803. pTDefRegMap(@Self)^.&set := $00000040;
  37804. end;
  37805. function TI2C2A_I2C2ASTAT.getI2CPOV : TBits_1; inline;
  37806. begin
  37807. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37808. end;
  37809. procedure TI2C2A_I2C2ASTAT.setw(thebits : TBits_32); inline;
  37810. begin
  37811. pTDefRegMap(@Self)^.val := thebits;
  37812. end;
  37813. function TI2C2A_I2C2ASTAT.getw : TBits_32; inline;
  37814. begin
  37815. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37816. end;
  37817. procedure TI2C2A_I2C4STAT.setTBF; inline;
  37818. begin
  37819. pTDefRegMap(@Self)^.&set := $00000001;
  37820. end;
  37821. procedure TI2C2A_I2C4STAT.clearTBF; inline;
  37822. begin
  37823. pTDefRegMap(@Self)^.clr := $00000001;
  37824. end;
  37825. procedure TI2C2A_I2C4STAT.setTBF(thebits : TBits_1); inline;
  37826. begin
  37827. if thebits = 0 then
  37828. pTDefRegMap(@Self)^.clr := $00000001
  37829. else
  37830. pTDefRegMap(@Self)^.&set := $00000001;
  37831. end;
  37832. function TI2C2A_I2C4STAT.getTBF : TBits_1; inline;
  37833. begin
  37834. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37835. end;
  37836. procedure TI2C2A_I2C4STAT.setRBF; inline;
  37837. begin
  37838. pTDefRegMap(@Self)^.&set := $00000002;
  37839. end;
  37840. procedure TI2C2A_I2C4STAT.clearRBF; inline;
  37841. begin
  37842. pTDefRegMap(@Self)^.clr := $00000002;
  37843. end;
  37844. procedure TI2C2A_I2C4STAT.setRBF(thebits : TBits_1); inline;
  37845. begin
  37846. if thebits = 0 then
  37847. pTDefRegMap(@Self)^.clr := $00000002
  37848. else
  37849. pTDefRegMap(@Self)^.&set := $00000002;
  37850. end;
  37851. function TI2C2A_I2C4STAT.getRBF : TBits_1; inline;
  37852. begin
  37853. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37854. end;
  37855. procedure TI2C2A_I2C4STAT.setR_W; inline;
  37856. begin
  37857. pTDefRegMap(@Self)^.&set := $00000004;
  37858. end;
  37859. procedure TI2C2A_I2C4STAT.clearR_W; inline;
  37860. begin
  37861. pTDefRegMap(@Self)^.clr := $00000004;
  37862. end;
  37863. procedure TI2C2A_I2C4STAT.setR_W(thebits : TBits_1); inline;
  37864. begin
  37865. if thebits = 0 then
  37866. pTDefRegMap(@Self)^.clr := $00000004
  37867. else
  37868. pTDefRegMap(@Self)^.&set := $00000004;
  37869. end;
  37870. function TI2C2A_I2C4STAT.getR_W : TBits_1; inline;
  37871. begin
  37872. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37873. end;
  37874. procedure TI2C2A_I2C4STAT.setS; inline;
  37875. begin
  37876. pTDefRegMap(@Self)^.&set := $00000008;
  37877. end;
  37878. procedure TI2C2A_I2C4STAT.clearS; inline;
  37879. begin
  37880. pTDefRegMap(@Self)^.clr := $00000008;
  37881. end;
  37882. procedure TI2C2A_I2C4STAT.setS(thebits : TBits_1); inline;
  37883. begin
  37884. if thebits = 0 then
  37885. pTDefRegMap(@Self)^.clr := $00000008
  37886. else
  37887. pTDefRegMap(@Self)^.&set := $00000008;
  37888. end;
  37889. function TI2C2A_I2C4STAT.getS : TBits_1; inline;
  37890. begin
  37891. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37892. end;
  37893. procedure TI2C2A_I2C4STAT.setP; inline;
  37894. begin
  37895. pTDefRegMap(@Self)^.&set := $00000010;
  37896. end;
  37897. procedure TI2C2A_I2C4STAT.clearP; inline;
  37898. begin
  37899. pTDefRegMap(@Self)^.clr := $00000010;
  37900. end;
  37901. procedure TI2C2A_I2C4STAT.setP(thebits : TBits_1); inline;
  37902. begin
  37903. if thebits = 0 then
  37904. pTDefRegMap(@Self)^.clr := $00000010
  37905. else
  37906. pTDefRegMap(@Self)^.&set := $00000010;
  37907. end;
  37908. function TI2C2A_I2C4STAT.getP : TBits_1; inline;
  37909. begin
  37910. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37911. end;
  37912. procedure TI2C2A_I2C4STAT.setD_A; inline;
  37913. begin
  37914. pTDefRegMap(@Self)^.&set := $00000020;
  37915. end;
  37916. procedure TI2C2A_I2C4STAT.clearD_A; inline;
  37917. begin
  37918. pTDefRegMap(@Self)^.clr := $00000020;
  37919. end;
  37920. procedure TI2C2A_I2C4STAT.setD_A(thebits : TBits_1); inline;
  37921. begin
  37922. if thebits = 0 then
  37923. pTDefRegMap(@Self)^.clr := $00000020
  37924. else
  37925. pTDefRegMap(@Self)^.&set := $00000020;
  37926. end;
  37927. function TI2C2A_I2C4STAT.getD_A : TBits_1; inline;
  37928. begin
  37929. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37930. end;
  37931. procedure TI2C2A_I2C4STAT.setI2COV; inline;
  37932. begin
  37933. pTDefRegMap(@Self)^.&set := $00000040;
  37934. end;
  37935. procedure TI2C2A_I2C4STAT.clearI2COV; inline;
  37936. begin
  37937. pTDefRegMap(@Self)^.clr := $00000040;
  37938. end;
  37939. procedure TI2C2A_I2C4STAT.setI2COV(thebits : TBits_1); inline;
  37940. begin
  37941. if thebits = 0 then
  37942. pTDefRegMap(@Self)^.clr := $00000040
  37943. else
  37944. pTDefRegMap(@Self)^.&set := $00000040;
  37945. end;
  37946. function TI2C2A_I2C4STAT.getI2COV : TBits_1; inline;
  37947. begin
  37948. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37949. end;
  37950. procedure TI2C2A_I2C4STAT.setIWCOL; inline;
  37951. begin
  37952. pTDefRegMap(@Self)^.&set := $00000080;
  37953. end;
  37954. procedure TI2C2A_I2C4STAT.clearIWCOL; inline;
  37955. begin
  37956. pTDefRegMap(@Self)^.clr := $00000080;
  37957. end;
  37958. procedure TI2C2A_I2C4STAT.setIWCOL(thebits : TBits_1); inline;
  37959. begin
  37960. if thebits = 0 then
  37961. pTDefRegMap(@Self)^.clr := $00000080
  37962. else
  37963. pTDefRegMap(@Self)^.&set := $00000080;
  37964. end;
  37965. function TI2C2A_I2C4STAT.getIWCOL : TBits_1; inline;
  37966. begin
  37967. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37968. end;
  37969. procedure TI2C2A_I2C4STAT.setADD10; inline;
  37970. begin
  37971. pTDefRegMap(@Self)^.&set := $00000100;
  37972. end;
  37973. procedure TI2C2A_I2C4STAT.clearADD10; inline;
  37974. begin
  37975. pTDefRegMap(@Self)^.clr := $00000100;
  37976. end;
  37977. procedure TI2C2A_I2C4STAT.setADD10(thebits : TBits_1); inline;
  37978. begin
  37979. if thebits = 0 then
  37980. pTDefRegMap(@Self)^.clr := $00000100
  37981. else
  37982. pTDefRegMap(@Self)^.&set := $00000100;
  37983. end;
  37984. function TI2C2A_I2C4STAT.getADD10 : TBits_1; inline;
  37985. begin
  37986. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37987. end;
  37988. procedure TI2C2A_I2C4STAT.setGCSTAT; inline;
  37989. begin
  37990. pTDefRegMap(@Self)^.&set := $00000200;
  37991. end;
  37992. procedure TI2C2A_I2C4STAT.clearGCSTAT; inline;
  37993. begin
  37994. pTDefRegMap(@Self)^.clr := $00000200;
  37995. end;
  37996. procedure TI2C2A_I2C4STAT.setGCSTAT(thebits : TBits_1); inline;
  37997. begin
  37998. if thebits = 0 then
  37999. pTDefRegMap(@Self)^.clr := $00000200
  38000. else
  38001. pTDefRegMap(@Self)^.&set := $00000200;
  38002. end;
  38003. function TI2C2A_I2C4STAT.getGCSTAT : TBits_1; inline;
  38004. begin
  38005. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38006. end;
  38007. procedure TI2C2A_I2C4STAT.setBCL; inline;
  38008. begin
  38009. pTDefRegMap(@Self)^.&set := $00000400;
  38010. end;
  38011. procedure TI2C2A_I2C4STAT.clearBCL; inline;
  38012. begin
  38013. pTDefRegMap(@Self)^.clr := $00000400;
  38014. end;
  38015. procedure TI2C2A_I2C4STAT.setBCL(thebits : TBits_1); inline;
  38016. begin
  38017. if thebits = 0 then
  38018. pTDefRegMap(@Self)^.clr := $00000400
  38019. else
  38020. pTDefRegMap(@Self)^.&set := $00000400;
  38021. end;
  38022. function TI2C2A_I2C4STAT.getBCL : TBits_1; inline;
  38023. begin
  38024. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38025. end;
  38026. procedure TI2C2A_I2C4STAT.setTRSTAT; inline;
  38027. begin
  38028. pTDefRegMap(@Self)^.&set := $00004000;
  38029. end;
  38030. procedure TI2C2A_I2C4STAT.clearTRSTAT; inline;
  38031. begin
  38032. pTDefRegMap(@Self)^.clr := $00004000;
  38033. end;
  38034. procedure TI2C2A_I2C4STAT.setTRSTAT(thebits : TBits_1); inline;
  38035. begin
  38036. if thebits = 0 then
  38037. pTDefRegMap(@Self)^.clr := $00004000
  38038. else
  38039. pTDefRegMap(@Self)^.&set := $00004000;
  38040. end;
  38041. function TI2C2A_I2C4STAT.getTRSTAT : TBits_1; inline;
  38042. begin
  38043. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38044. end;
  38045. procedure TI2C2A_I2C4STAT.setACKSTAT; inline;
  38046. begin
  38047. pTDefRegMap(@Self)^.&set := $00008000;
  38048. end;
  38049. procedure TI2C2A_I2C4STAT.clearACKSTAT; inline;
  38050. begin
  38051. pTDefRegMap(@Self)^.clr := $00008000;
  38052. end;
  38053. procedure TI2C2A_I2C4STAT.setACKSTAT(thebits : TBits_1); inline;
  38054. begin
  38055. if thebits = 0 then
  38056. pTDefRegMap(@Self)^.clr := $00008000
  38057. else
  38058. pTDefRegMap(@Self)^.&set := $00008000;
  38059. end;
  38060. function TI2C2A_I2C4STAT.getACKSTAT : TBits_1; inline;
  38061. begin
  38062. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38063. end;
  38064. procedure TI2C2A_I2C4STAT.setI2CPOV; inline;
  38065. begin
  38066. pTDefRegMap(@Self)^.&set := $00000040;
  38067. end;
  38068. procedure TI2C2A_I2C4STAT.clearI2CPOV; inline;
  38069. begin
  38070. pTDefRegMap(@Self)^.clr := $00000040;
  38071. end;
  38072. procedure TI2C2A_I2C4STAT.setI2CPOV(thebits : TBits_1); inline;
  38073. begin
  38074. if thebits = 0 then
  38075. pTDefRegMap(@Self)^.clr := $00000040
  38076. else
  38077. pTDefRegMap(@Self)^.&set := $00000040;
  38078. end;
  38079. function TI2C2A_I2C4STAT.getI2CPOV : TBits_1; inline;
  38080. begin
  38081. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38082. end;
  38083. procedure TI2C2A_I2C4STAT.setw(thebits : TBits_32); inline;
  38084. begin
  38085. pTDefRegMap(@Self)^.val := thebits;
  38086. end;
  38087. function TI2C2A_I2C4STAT.getw : TBits_32; inline;
  38088. begin
  38089. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38090. end;
  38091. procedure TI2C3A_I2C3ACON.setSEN; inline;
  38092. begin
  38093. pTDefRegMap(@Self)^.&set := $00000001;
  38094. end;
  38095. procedure TI2C3A_I2C3ACON.clearSEN; inline;
  38096. begin
  38097. pTDefRegMap(@Self)^.clr := $00000001;
  38098. end;
  38099. procedure TI2C3A_I2C3ACON.setSEN(thebits : TBits_1); inline;
  38100. begin
  38101. if thebits = 0 then
  38102. pTDefRegMap(@Self)^.clr := $00000001
  38103. else
  38104. pTDefRegMap(@Self)^.&set := $00000001;
  38105. end;
  38106. function TI2C3A_I2C3ACON.getSEN : TBits_1; inline;
  38107. begin
  38108. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38109. end;
  38110. procedure TI2C3A_I2C3ACON.setRSEN; inline;
  38111. begin
  38112. pTDefRegMap(@Self)^.&set := $00000002;
  38113. end;
  38114. procedure TI2C3A_I2C3ACON.clearRSEN; inline;
  38115. begin
  38116. pTDefRegMap(@Self)^.clr := $00000002;
  38117. end;
  38118. procedure TI2C3A_I2C3ACON.setRSEN(thebits : TBits_1); inline;
  38119. begin
  38120. if thebits = 0 then
  38121. pTDefRegMap(@Self)^.clr := $00000002
  38122. else
  38123. pTDefRegMap(@Self)^.&set := $00000002;
  38124. end;
  38125. function TI2C3A_I2C3ACON.getRSEN : TBits_1; inline;
  38126. begin
  38127. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38128. end;
  38129. procedure TI2C3A_I2C3ACON.setPEN; inline;
  38130. begin
  38131. pTDefRegMap(@Self)^.&set := $00000004;
  38132. end;
  38133. procedure TI2C3A_I2C3ACON.clearPEN; inline;
  38134. begin
  38135. pTDefRegMap(@Self)^.clr := $00000004;
  38136. end;
  38137. procedure TI2C3A_I2C3ACON.setPEN(thebits : TBits_1); inline;
  38138. begin
  38139. if thebits = 0 then
  38140. pTDefRegMap(@Self)^.clr := $00000004
  38141. else
  38142. pTDefRegMap(@Self)^.&set := $00000004;
  38143. end;
  38144. function TI2C3A_I2C3ACON.getPEN : TBits_1; inline;
  38145. begin
  38146. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38147. end;
  38148. procedure TI2C3A_I2C3ACON.setRCEN; inline;
  38149. begin
  38150. pTDefRegMap(@Self)^.&set := $00000008;
  38151. end;
  38152. procedure TI2C3A_I2C3ACON.clearRCEN; inline;
  38153. begin
  38154. pTDefRegMap(@Self)^.clr := $00000008;
  38155. end;
  38156. procedure TI2C3A_I2C3ACON.setRCEN(thebits : TBits_1); inline;
  38157. begin
  38158. if thebits = 0 then
  38159. pTDefRegMap(@Self)^.clr := $00000008
  38160. else
  38161. pTDefRegMap(@Self)^.&set := $00000008;
  38162. end;
  38163. function TI2C3A_I2C3ACON.getRCEN : TBits_1; inline;
  38164. begin
  38165. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38166. end;
  38167. procedure TI2C3A_I2C3ACON.setACKEN; inline;
  38168. begin
  38169. pTDefRegMap(@Self)^.&set := $00000010;
  38170. end;
  38171. procedure TI2C3A_I2C3ACON.clearACKEN; inline;
  38172. begin
  38173. pTDefRegMap(@Self)^.clr := $00000010;
  38174. end;
  38175. procedure TI2C3A_I2C3ACON.setACKEN(thebits : TBits_1); inline;
  38176. begin
  38177. if thebits = 0 then
  38178. pTDefRegMap(@Self)^.clr := $00000010
  38179. else
  38180. pTDefRegMap(@Self)^.&set := $00000010;
  38181. end;
  38182. function TI2C3A_I2C3ACON.getACKEN : TBits_1; inline;
  38183. begin
  38184. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38185. end;
  38186. procedure TI2C3A_I2C3ACON.setACKDT; inline;
  38187. begin
  38188. pTDefRegMap(@Self)^.&set := $00000020;
  38189. end;
  38190. procedure TI2C3A_I2C3ACON.clearACKDT; inline;
  38191. begin
  38192. pTDefRegMap(@Self)^.clr := $00000020;
  38193. end;
  38194. procedure TI2C3A_I2C3ACON.setACKDT(thebits : TBits_1); inline;
  38195. begin
  38196. if thebits = 0 then
  38197. pTDefRegMap(@Self)^.clr := $00000020
  38198. else
  38199. pTDefRegMap(@Self)^.&set := $00000020;
  38200. end;
  38201. function TI2C3A_I2C3ACON.getACKDT : TBits_1; inline;
  38202. begin
  38203. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38204. end;
  38205. procedure TI2C3A_I2C3ACON.setSTREN; inline;
  38206. begin
  38207. pTDefRegMap(@Self)^.&set := $00000040;
  38208. end;
  38209. procedure TI2C3A_I2C3ACON.clearSTREN; inline;
  38210. begin
  38211. pTDefRegMap(@Self)^.clr := $00000040;
  38212. end;
  38213. procedure TI2C3A_I2C3ACON.setSTREN(thebits : TBits_1); inline;
  38214. begin
  38215. if thebits = 0 then
  38216. pTDefRegMap(@Self)^.clr := $00000040
  38217. else
  38218. pTDefRegMap(@Self)^.&set := $00000040;
  38219. end;
  38220. function TI2C3A_I2C3ACON.getSTREN : TBits_1; inline;
  38221. begin
  38222. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38223. end;
  38224. procedure TI2C3A_I2C3ACON.setGCEN; inline;
  38225. begin
  38226. pTDefRegMap(@Self)^.&set := $00000080;
  38227. end;
  38228. procedure TI2C3A_I2C3ACON.clearGCEN; inline;
  38229. begin
  38230. pTDefRegMap(@Self)^.clr := $00000080;
  38231. end;
  38232. procedure TI2C3A_I2C3ACON.setGCEN(thebits : TBits_1); inline;
  38233. begin
  38234. if thebits = 0 then
  38235. pTDefRegMap(@Self)^.clr := $00000080
  38236. else
  38237. pTDefRegMap(@Self)^.&set := $00000080;
  38238. end;
  38239. function TI2C3A_I2C3ACON.getGCEN : TBits_1; inline;
  38240. begin
  38241. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38242. end;
  38243. procedure TI2C3A_I2C3ACON.setSMEN; inline;
  38244. begin
  38245. pTDefRegMap(@Self)^.&set := $00000100;
  38246. end;
  38247. procedure TI2C3A_I2C3ACON.clearSMEN; inline;
  38248. begin
  38249. pTDefRegMap(@Self)^.clr := $00000100;
  38250. end;
  38251. procedure TI2C3A_I2C3ACON.setSMEN(thebits : TBits_1); inline;
  38252. begin
  38253. if thebits = 0 then
  38254. pTDefRegMap(@Self)^.clr := $00000100
  38255. else
  38256. pTDefRegMap(@Self)^.&set := $00000100;
  38257. end;
  38258. function TI2C3A_I2C3ACON.getSMEN : TBits_1; inline;
  38259. begin
  38260. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38261. end;
  38262. procedure TI2C3A_I2C3ACON.setDISSLW; inline;
  38263. begin
  38264. pTDefRegMap(@Self)^.&set := $00000200;
  38265. end;
  38266. procedure TI2C3A_I2C3ACON.clearDISSLW; inline;
  38267. begin
  38268. pTDefRegMap(@Self)^.clr := $00000200;
  38269. end;
  38270. procedure TI2C3A_I2C3ACON.setDISSLW(thebits : TBits_1); inline;
  38271. begin
  38272. if thebits = 0 then
  38273. pTDefRegMap(@Self)^.clr := $00000200
  38274. else
  38275. pTDefRegMap(@Self)^.&set := $00000200;
  38276. end;
  38277. function TI2C3A_I2C3ACON.getDISSLW : TBits_1; inline;
  38278. begin
  38279. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38280. end;
  38281. procedure TI2C3A_I2C3ACON.setA10M; inline;
  38282. begin
  38283. pTDefRegMap(@Self)^.&set := $00000400;
  38284. end;
  38285. procedure TI2C3A_I2C3ACON.clearA10M; inline;
  38286. begin
  38287. pTDefRegMap(@Self)^.clr := $00000400;
  38288. end;
  38289. procedure TI2C3A_I2C3ACON.setA10M(thebits : TBits_1); inline;
  38290. begin
  38291. if thebits = 0 then
  38292. pTDefRegMap(@Self)^.clr := $00000400
  38293. else
  38294. pTDefRegMap(@Self)^.&set := $00000400;
  38295. end;
  38296. function TI2C3A_I2C3ACON.getA10M : TBits_1; inline;
  38297. begin
  38298. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38299. end;
  38300. procedure TI2C3A_I2C3ACON.setSTRICT; inline;
  38301. begin
  38302. pTDefRegMap(@Self)^.&set := $00000800;
  38303. end;
  38304. procedure TI2C3A_I2C3ACON.clearSTRICT; inline;
  38305. begin
  38306. pTDefRegMap(@Self)^.clr := $00000800;
  38307. end;
  38308. procedure TI2C3A_I2C3ACON.setSTRICT(thebits : TBits_1); inline;
  38309. begin
  38310. if thebits = 0 then
  38311. pTDefRegMap(@Self)^.clr := $00000800
  38312. else
  38313. pTDefRegMap(@Self)^.&set := $00000800;
  38314. end;
  38315. function TI2C3A_I2C3ACON.getSTRICT : TBits_1; inline;
  38316. begin
  38317. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38318. end;
  38319. procedure TI2C3A_I2C3ACON.setSCLREL; inline;
  38320. begin
  38321. pTDefRegMap(@Self)^.&set := $00001000;
  38322. end;
  38323. procedure TI2C3A_I2C3ACON.clearSCLREL; inline;
  38324. begin
  38325. pTDefRegMap(@Self)^.clr := $00001000;
  38326. end;
  38327. procedure TI2C3A_I2C3ACON.setSCLREL(thebits : TBits_1); inline;
  38328. begin
  38329. if thebits = 0 then
  38330. pTDefRegMap(@Self)^.clr := $00001000
  38331. else
  38332. pTDefRegMap(@Self)^.&set := $00001000;
  38333. end;
  38334. function TI2C3A_I2C3ACON.getSCLREL : TBits_1; inline;
  38335. begin
  38336. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38337. end;
  38338. procedure TI2C3A_I2C3ACON.setSIDL; inline;
  38339. begin
  38340. pTDefRegMap(@Self)^.&set := $00002000;
  38341. end;
  38342. procedure TI2C3A_I2C3ACON.clearSIDL; inline;
  38343. begin
  38344. pTDefRegMap(@Self)^.clr := $00002000;
  38345. end;
  38346. procedure TI2C3A_I2C3ACON.setSIDL(thebits : TBits_1); inline;
  38347. begin
  38348. if thebits = 0 then
  38349. pTDefRegMap(@Self)^.clr := $00002000
  38350. else
  38351. pTDefRegMap(@Self)^.&set := $00002000;
  38352. end;
  38353. function TI2C3A_I2C3ACON.getSIDL : TBits_1; inline;
  38354. begin
  38355. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38356. end;
  38357. procedure TI2C3A_I2C3ACON.setON; inline;
  38358. begin
  38359. pTDefRegMap(@Self)^.&set := $00008000;
  38360. end;
  38361. procedure TI2C3A_I2C3ACON.clearON; inline;
  38362. begin
  38363. pTDefRegMap(@Self)^.clr := $00008000;
  38364. end;
  38365. procedure TI2C3A_I2C3ACON.setON(thebits : TBits_1); inline;
  38366. begin
  38367. if thebits = 0 then
  38368. pTDefRegMap(@Self)^.clr := $00008000
  38369. else
  38370. pTDefRegMap(@Self)^.&set := $00008000;
  38371. end;
  38372. function TI2C3A_I2C3ACON.getON : TBits_1; inline;
  38373. begin
  38374. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38375. end;
  38376. procedure TI2C3A_I2C3ACON.setIPMIEN; inline;
  38377. begin
  38378. pTDefRegMap(@Self)^.&set := $00000800;
  38379. end;
  38380. procedure TI2C3A_I2C3ACON.clearIPMIEN; inline;
  38381. begin
  38382. pTDefRegMap(@Self)^.clr := $00000800;
  38383. end;
  38384. procedure TI2C3A_I2C3ACON.setIPMIEN(thebits : TBits_1); inline;
  38385. begin
  38386. if thebits = 0 then
  38387. pTDefRegMap(@Self)^.clr := $00000800
  38388. else
  38389. pTDefRegMap(@Self)^.&set := $00000800;
  38390. end;
  38391. function TI2C3A_I2C3ACON.getIPMIEN : TBits_1; inline;
  38392. begin
  38393. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38394. end;
  38395. procedure TI2C3A_I2C3ACON.setI2CSIDL; inline;
  38396. begin
  38397. pTDefRegMap(@Self)^.&set := $00002000;
  38398. end;
  38399. procedure TI2C3A_I2C3ACON.clearI2CSIDL; inline;
  38400. begin
  38401. pTDefRegMap(@Self)^.clr := $00002000;
  38402. end;
  38403. procedure TI2C3A_I2C3ACON.setI2CSIDL(thebits : TBits_1); inline;
  38404. begin
  38405. if thebits = 0 then
  38406. pTDefRegMap(@Self)^.clr := $00002000
  38407. else
  38408. pTDefRegMap(@Self)^.&set := $00002000;
  38409. end;
  38410. function TI2C3A_I2C3ACON.getI2CSIDL : TBits_1; inline;
  38411. begin
  38412. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38413. end;
  38414. procedure TI2C3A_I2C3ACON.setI2CEN; inline;
  38415. begin
  38416. pTDefRegMap(@Self)^.&set := $00008000;
  38417. end;
  38418. procedure TI2C3A_I2C3ACON.clearI2CEN; inline;
  38419. begin
  38420. pTDefRegMap(@Self)^.clr := $00008000;
  38421. end;
  38422. procedure TI2C3A_I2C3ACON.setI2CEN(thebits : TBits_1); inline;
  38423. begin
  38424. if thebits = 0 then
  38425. pTDefRegMap(@Self)^.clr := $00008000
  38426. else
  38427. pTDefRegMap(@Self)^.&set := $00008000;
  38428. end;
  38429. function TI2C3A_I2C3ACON.getI2CEN : TBits_1; inline;
  38430. begin
  38431. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38432. end;
  38433. procedure TI2C3A_I2C3ACON.setw(thebits : TBits_32); inline;
  38434. begin
  38435. pTDefRegMap(@Self)^.val := thebits;
  38436. end;
  38437. function TI2C3A_I2C3ACON.getw : TBits_32; inline;
  38438. begin
  38439. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38440. end;
  38441. procedure TI2C3A_I2C5CON.setSEN; inline;
  38442. begin
  38443. pTDefRegMap(@Self)^.&set := $00000001;
  38444. end;
  38445. procedure TI2C3A_I2C5CON.clearSEN; inline;
  38446. begin
  38447. pTDefRegMap(@Self)^.clr := $00000001;
  38448. end;
  38449. procedure TI2C3A_I2C5CON.setSEN(thebits : TBits_1); inline;
  38450. begin
  38451. if thebits = 0 then
  38452. pTDefRegMap(@Self)^.clr := $00000001
  38453. else
  38454. pTDefRegMap(@Self)^.&set := $00000001;
  38455. end;
  38456. function TI2C3A_I2C5CON.getSEN : TBits_1; inline;
  38457. begin
  38458. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38459. end;
  38460. procedure TI2C3A_I2C5CON.setRSEN; inline;
  38461. begin
  38462. pTDefRegMap(@Self)^.&set := $00000002;
  38463. end;
  38464. procedure TI2C3A_I2C5CON.clearRSEN; inline;
  38465. begin
  38466. pTDefRegMap(@Self)^.clr := $00000002;
  38467. end;
  38468. procedure TI2C3A_I2C5CON.setRSEN(thebits : TBits_1); inline;
  38469. begin
  38470. if thebits = 0 then
  38471. pTDefRegMap(@Self)^.clr := $00000002
  38472. else
  38473. pTDefRegMap(@Self)^.&set := $00000002;
  38474. end;
  38475. function TI2C3A_I2C5CON.getRSEN : TBits_1; inline;
  38476. begin
  38477. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38478. end;
  38479. procedure TI2C3A_I2C5CON.setPEN; inline;
  38480. begin
  38481. pTDefRegMap(@Self)^.&set := $00000004;
  38482. end;
  38483. procedure TI2C3A_I2C5CON.clearPEN; inline;
  38484. begin
  38485. pTDefRegMap(@Self)^.clr := $00000004;
  38486. end;
  38487. procedure TI2C3A_I2C5CON.setPEN(thebits : TBits_1); inline;
  38488. begin
  38489. if thebits = 0 then
  38490. pTDefRegMap(@Self)^.clr := $00000004
  38491. else
  38492. pTDefRegMap(@Self)^.&set := $00000004;
  38493. end;
  38494. function TI2C3A_I2C5CON.getPEN : TBits_1; inline;
  38495. begin
  38496. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38497. end;
  38498. procedure TI2C3A_I2C5CON.setRCEN; inline;
  38499. begin
  38500. pTDefRegMap(@Self)^.&set := $00000008;
  38501. end;
  38502. procedure TI2C3A_I2C5CON.clearRCEN; inline;
  38503. begin
  38504. pTDefRegMap(@Self)^.clr := $00000008;
  38505. end;
  38506. procedure TI2C3A_I2C5CON.setRCEN(thebits : TBits_1); inline;
  38507. begin
  38508. if thebits = 0 then
  38509. pTDefRegMap(@Self)^.clr := $00000008
  38510. else
  38511. pTDefRegMap(@Self)^.&set := $00000008;
  38512. end;
  38513. function TI2C3A_I2C5CON.getRCEN : TBits_1; inline;
  38514. begin
  38515. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38516. end;
  38517. procedure TI2C3A_I2C5CON.setACKEN; inline;
  38518. begin
  38519. pTDefRegMap(@Self)^.&set := $00000010;
  38520. end;
  38521. procedure TI2C3A_I2C5CON.clearACKEN; inline;
  38522. begin
  38523. pTDefRegMap(@Self)^.clr := $00000010;
  38524. end;
  38525. procedure TI2C3A_I2C5CON.setACKEN(thebits : TBits_1); inline;
  38526. begin
  38527. if thebits = 0 then
  38528. pTDefRegMap(@Self)^.clr := $00000010
  38529. else
  38530. pTDefRegMap(@Self)^.&set := $00000010;
  38531. end;
  38532. function TI2C3A_I2C5CON.getACKEN : TBits_1; inline;
  38533. begin
  38534. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38535. end;
  38536. procedure TI2C3A_I2C5CON.setACKDT; inline;
  38537. begin
  38538. pTDefRegMap(@Self)^.&set := $00000020;
  38539. end;
  38540. procedure TI2C3A_I2C5CON.clearACKDT; inline;
  38541. begin
  38542. pTDefRegMap(@Self)^.clr := $00000020;
  38543. end;
  38544. procedure TI2C3A_I2C5CON.setACKDT(thebits : TBits_1); inline;
  38545. begin
  38546. if thebits = 0 then
  38547. pTDefRegMap(@Self)^.clr := $00000020
  38548. else
  38549. pTDefRegMap(@Self)^.&set := $00000020;
  38550. end;
  38551. function TI2C3A_I2C5CON.getACKDT : TBits_1; inline;
  38552. begin
  38553. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38554. end;
  38555. procedure TI2C3A_I2C5CON.setSTREN; inline;
  38556. begin
  38557. pTDefRegMap(@Self)^.&set := $00000040;
  38558. end;
  38559. procedure TI2C3A_I2C5CON.clearSTREN; inline;
  38560. begin
  38561. pTDefRegMap(@Self)^.clr := $00000040;
  38562. end;
  38563. procedure TI2C3A_I2C5CON.setSTREN(thebits : TBits_1); inline;
  38564. begin
  38565. if thebits = 0 then
  38566. pTDefRegMap(@Self)^.clr := $00000040
  38567. else
  38568. pTDefRegMap(@Self)^.&set := $00000040;
  38569. end;
  38570. function TI2C3A_I2C5CON.getSTREN : TBits_1; inline;
  38571. begin
  38572. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38573. end;
  38574. procedure TI2C3A_I2C5CON.setGCEN; inline;
  38575. begin
  38576. pTDefRegMap(@Self)^.&set := $00000080;
  38577. end;
  38578. procedure TI2C3A_I2C5CON.clearGCEN; inline;
  38579. begin
  38580. pTDefRegMap(@Self)^.clr := $00000080;
  38581. end;
  38582. procedure TI2C3A_I2C5CON.setGCEN(thebits : TBits_1); inline;
  38583. begin
  38584. if thebits = 0 then
  38585. pTDefRegMap(@Self)^.clr := $00000080
  38586. else
  38587. pTDefRegMap(@Self)^.&set := $00000080;
  38588. end;
  38589. function TI2C3A_I2C5CON.getGCEN : TBits_1; inline;
  38590. begin
  38591. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38592. end;
  38593. procedure TI2C3A_I2C5CON.setSMEN; inline;
  38594. begin
  38595. pTDefRegMap(@Self)^.&set := $00000100;
  38596. end;
  38597. procedure TI2C3A_I2C5CON.clearSMEN; inline;
  38598. begin
  38599. pTDefRegMap(@Self)^.clr := $00000100;
  38600. end;
  38601. procedure TI2C3A_I2C5CON.setSMEN(thebits : TBits_1); inline;
  38602. begin
  38603. if thebits = 0 then
  38604. pTDefRegMap(@Self)^.clr := $00000100
  38605. else
  38606. pTDefRegMap(@Self)^.&set := $00000100;
  38607. end;
  38608. function TI2C3A_I2C5CON.getSMEN : TBits_1; inline;
  38609. begin
  38610. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38611. end;
  38612. procedure TI2C3A_I2C5CON.setDISSLW; inline;
  38613. begin
  38614. pTDefRegMap(@Self)^.&set := $00000200;
  38615. end;
  38616. procedure TI2C3A_I2C5CON.clearDISSLW; inline;
  38617. begin
  38618. pTDefRegMap(@Self)^.clr := $00000200;
  38619. end;
  38620. procedure TI2C3A_I2C5CON.setDISSLW(thebits : TBits_1); inline;
  38621. begin
  38622. if thebits = 0 then
  38623. pTDefRegMap(@Self)^.clr := $00000200
  38624. else
  38625. pTDefRegMap(@Self)^.&set := $00000200;
  38626. end;
  38627. function TI2C3A_I2C5CON.getDISSLW : TBits_1; inline;
  38628. begin
  38629. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38630. end;
  38631. procedure TI2C3A_I2C5CON.setA10M; inline;
  38632. begin
  38633. pTDefRegMap(@Self)^.&set := $00000400;
  38634. end;
  38635. procedure TI2C3A_I2C5CON.clearA10M; inline;
  38636. begin
  38637. pTDefRegMap(@Self)^.clr := $00000400;
  38638. end;
  38639. procedure TI2C3A_I2C5CON.setA10M(thebits : TBits_1); inline;
  38640. begin
  38641. if thebits = 0 then
  38642. pTDefRegMap(@Self)^.clr := $00000400
  38643. else
  38644. pTDefRegMap(@Self)^.&set := $00000400;
  38645. end;
  38646. function TI2C3A_I2C5CON.getA10M : TBits_1; inline;
  38647. begin
  38648. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38649. end;
  38650. procedure TI2C3A_I2C5CON.setSTRICT; inline;
  38651. begin
  38652. pTDefRegMap(@Self)^.&set := $00000800;
  38653. end;
  38654. procedure TI2C3A_I2C5CON.clearSTRICT; inline;
  38655. begin
  38656. pTDefRegMap(@Self)^.clr := $00000800;
  38657. end;
  38658. procedure TI2C3A_I2C5CON.setSTRICT(thebits : TBits_1); inline;
  38659. begin
  38660. if thebits = 0 then
  38661. pTDefRegMap(@Self)^.clr := $00000800
  38662. else
  38663. pTDefRegMap(@Self)^.&set := $00000800;
  38664. end;
  38665. function TI2C3A_I2C5CON.getSTRICT : TBits_1; inline;
  38666. begin
  38667. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38668. end;
  38669. procedure TI2C3A_I2C5CON.setSCLREL; inline;
  38670. begin
  38671. pTDefRegMap(@Self)^.&set := $00001000;
  38672. end;
  38673. procedure TI2C3A_I2C5CON.clearSCLREL; inline;
  38674. begin
  38675. pTDefRegMap(@Self)^.clr := $00001000;
  38676. end;
  38677. procedure TI2C3A_I2C5CON.setSCLREL(thebits : TBits_1); inline;
  38678. begin
  38679. if thebits = 0 then
  38680. pTDefRegMap(@Self)^.clr := $00001000
  38681. else
  38682. pTDefRegMap(@Self)^.&set := $00001000;
  38683. end;
  38684. function TI2C3A_I2C5CON.getSCLREL : TBits_1; inline;
  38685. begin
  38686. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38687. end;
  38688. procedure TI2C3A_I2C5CON.setSIDL; inline;
  38689. begin
  38690. pTDefRegMap(@Self)^.&set := $00002000;
  38691. end;
  38692. procedure TI2C3A_I2C5CON.clearSIDL; inline;
  38693. begin
  38694. pTDefRegMap(@Self)^.clr := $00002000;
  38695. end;
  38696. procedure TI2C3A_I2C5CON.setSIDL(thebits : TBits_1); inline;
  38697. begin
  38698. if thebits = 0 then
  38699. pTDefRegMap(@Self)^.clr := $00002000
  38700. else
  38701. pTDefRegMap(@Self)^.&set := $00002000;
  38702. end;
  38703. function TI2C3A_I2C5CON.getSIDL : TBits_1; inline;
  38704. begin
  38705. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38706. end;
  38707. procedure TI2C3A_I2C5CON.setON; inline;
  38708. begin
  38709. pTDefRegMap(@Self)^.&set := $00008000;
  38710. end;
  38711. procedure TI2C3A_I2C5CON.clearON; inline;
  38712. begin
  38713. pTDefRegMap(@Self)^.clr := $00008000;
  38714. end;
  38715. procedure TI2C3A_I2C5CON.setON(thebits : TBits_1); inline;
  38716. begin
  38717. if thebits = 0 then
  38718. pTDefRegMap(@Self)^.clr := $00008000
  38719. else
  38720. pTDefRegMap(@Self)^.&set := $00008000;
  38721. end;
  38722. function TI2C3A_I2C5CON.getON : TBits_1; inline;
  38723. begin
  38724. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38725. end;
  38726. procedure TI2C3A_I2C5CON.setIPMIEN; inline;
  38727. begin
  38728. pTDefRegMap(@Self)^.&set := $00000800;
  38729. end;
  38730. procedure TI2C3A_I2C5CON.clearIPMIEN; inline;
  38731. begin
  38732. pTDefRegMap(@Self)^.clr := $00000800;
  38733. end;
  38734. procedure TI2C3A_I2C5CON.setIPMIEN(thebits : TBits_1); inline;
  38735. begin
  38736. if thebits = 0 then
  38737. pTDefRegMap(@Self)^.clr := $00000800
  38738. else
  38739. pTDefRegMap(@Self)^.&set := $00000800;
  38740. end;
  38741. function TI2C3A_I2C5CON.getIPMIEN : TBits_1; inline;
  38742. begin
  38743. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38744. end;
  38745. procedure TI2C3A_I2C5CON.setI2CSIDL; inline;
  38746. begin
  38747. pTDefRegMap(@Self)^.&set := $00002000;
  38748. end;
  38749. procedure TI2C3A_I2C5CON.clearI2CSIDL; inline;
  38750. begin
  38751. pTDefRegMap(@Self)^.clr := $00002000;
  38752. end;
  38753. procedure TI2C3A_I2C5CON.setI2CSIDL(thebits : TBits_1); inline;
  38754. begin
  38755. if thebits = 0 then
  38756. pTDefRegMap(@Self)^.clr := $00002000
  38757. else
  38758. pTDefRegMap(@Self)^.&set := $00002000;
  38759. end;
  38760. function TI2C3A_I2C5CON.getI2CSIDL : TBits_1; inline;
  38761. begin
  38762. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38763. end;
  38764. procedure TI2C3A_I2C5CON.setI2CEN; inline;
  38765. begin
  38766. pTDefRegMap(@Self)^.&set := $00008000;
  38767. end;
  38768. procedure TI2C3A_I2C5CON.clearI2CEN; inline;
  38769. begin
  38770. pTDefRegMap(@Self)^.clr := $00008000;
  38771. end;
  38772. procedure TI2C3A_I2C5CON.setI2CEN(thebits : TBits_1); inline;
  38773. begin
  38774. if thebits = 0 then
  38775. pTDefRegMap(@Self)^.clr := $00008000
  38776. else
  38777. pTDefRegMap(@Self)^.&set := $00008000;
  38778. end;
  38779. function TI2C3A_I2C5CON.getI2CEN : TBits_1; inline;
  38780. begin
  38781. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38782. end;
  38783. procedure TI2C3A_I2C5CON.setw(thebits : TBits_32); inline;
  38784. begin
  38785. pTDefRegMap(@Self)^.val := thebits;
  38786. end;
  38787. function TI2C3A_I2C5CON.getw : TBits_32; inline;
  38788. begin
  38789. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38790. end;
  38791. procedure TI2C3A_I2C3ASTAT.setTBF; inline;
  38792. begin
  38793. pTDefRegMap(@Self)^.&set := $00000001;
  38794. end;
  38795. procedure TI2C3A_I2C3ASTAT.clearTBF; inline;
  38796. begin
  38797. pTDefRegMap(@Self)^.clr := $00000001;
  38798. end;
  38799. procedure TI2C3A_I2C3ASTAT.setTBF(thebits : TBits_1); inline;
  38800. begin
  38801. if thebits = 0 then
  38802. pTDefRegMap(@Self)^.clr := $00000001
  38803. else
  38804. pTDefRegMap(@Self)^.&set := $00000001;
  38805. end;
  38806. function TI2C3A_I2C3ASTAT.getTBF : TBits_1; inline;
  38807. begin
  38808. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38809. end;
  38810. procedure TI2C3A_I2C3ASTAT.setRBF; inline;
  38811. begin
  38812. pTDefRegMap(@Self)^.&set := $00000002;
  38813. end;
  38814. procedure TI2C3A_I2C3ASTAT.clearRBF; inline;
  38815. begin
  38816. pTDefRegMap(@Self)^.clr := $00000002;
  38817. end;
  38818. procedure TI2C3A_I2C3ASTAT.setRBF(thebits : TBits_1); inline;
  38819. begin
  38820. if thebits = 0 then
  38821. pTDefRegMap(@Self)^.clr := $00000002
  38822. else
  38823. pTDefRegMap(@Self)^.&set := $00000002;
  38824. end;
  38825. function TI2C3A_I2C3ASTAT.getRBF : TBits_1; inline;
  38826. begin
  38827. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38828. end;
  38829. procedure TI2C3A_I2C3ASTAT.setR_W; inline;
  38830. begin
  38831. pTDefRegMap(@Self)^.&set := $00000004;
  38832. end;
  38833. procedure TI2C3A_I2C3ASTAT.clearR_W; inline;
  38834. begin
  38835. pTDefRegMap(@Self)^.clr := $00000004;
  38836. end;
  38837. procedure TI2C3A_I2C3ASTAT.setR_W(thebits : TBits_1); inline;
  38838. begin
  38839. if thebits = 0 then
  38840. pTDefRegMap(@Self)^.clr := $00000004
  38841. else
  38842. pTDefRegMap(@Self)^.&set := $00000004;
  38843. end;
  38844. function TI2C3A_I2C3ASTAT.getR_W : TBits_1; inline;
  38845. begin
  38846. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38847. end;
  38848. procedure TI2C3A_I2C3ASTAT.setS; inline;
  38849. begin
  38850. pTDefRegMap(@Self)^.&set := $00000008;
  38851. end;
  38852. procedure TI2C3A_I2C3ASTAT.clearS; inline;
  38853. begin
  38854. pTDefRegMap(@Self)^.clr := $00000008;
  38855. end;
  38856. procedure TI2C3A_I2C3ASTAT.setS(thebits : TBits_1); inline;
  38857. begin
  38858. if thebits = 0 then
  38859. pTDefRegMap(@Self)^.clr := $00000008
  38860. else
  38861. pTDefRegMap(@Self)^.&set := $00000008;
  38862. end;
  38863. function TI2C3A_I2C3ASTAT.getS : TBits_1; inline;
  38864. begin
  38865. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38866. end;
  38867. procedure TI2C3A_I2C3ASTAT.setP; inline;
  38868. begin
  38869. pTDefRegMap(@Self)^.&set := $00000010;
  38870. end;
  38871. procedure TI2C3A_I2C3ASTAT.clearP; inline;
  38872. begin
  38873. pTDefRegMap(@Self)^.clr := $00000010;
  38874. end;
  38875. procedure TI2C3A_I2C3ASTAT.setP(thebits : TBits_1); inline;
  38876. begin
  38877. if thebits = 0 then
  38878. pTDefRegMap(@Self)^.clr := $00000010
  38879. else
  38880. pTDefRegMap(@Self)^.&set := $00000010;
  38881. end;
  38882. function TI2C3A_I2C3ASTAT.getP : TBits_1; inline;
  38883. begin
  38884. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38885. end;
  38886. procedure TI2C3A_I2C3ASTAT.setD_A; inline;
  38887. begin
  38888. pTDefRegMap(@Self)^.&set := $00000020;
  38889. end;
  38890. procedure TI2C3A_I2C3ASTAT.clearD_A; inline;
  38891. begin
  38892. pTDefRegMap(@Self)^.clr := $00000020;
  38893. end;
  38894. procedure TI2C3A_I2C3ASTAT.setD_A(thebits : TBits_1); inline;
  38895. begin
  38896. if thebits = 0 then
  38897. pTDefRegMap(@Self)^.clr := $00000020
  38898. else
  38899. pTDefRegMap(@Self)^.&set := $00000020;
  38900. end;
  38901. function TI2C3A_I2C3ASTAT.getD_A : TBits_1; inline;
  38902. begin
  38903. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38904. end;
  38905. procedure TI2C3A_I2C3ASTAT.setI2COV; inline;
  38906. begin
  38907. pTDefRegMap(@Self)^.&set := $00000040;
  38908. end;
  38909. procedure TI2C3A_I2C3ASTAT.clearI2COV; inline;
  38910. begin
  38911. pTDefRegMap(@Self)^.clr := $00000040;
  38912. end;
  38913. procedure TI2C3A_I2C3ASTAT.setI2COV(thebits : TBits_1); inline;
  38914. begin
  38915. if thebits = 0 then
  38916. pTDefRegMap(@Self)^.clr := $00000040
  38917. else
  38918. pTDefRegMap(@Self)^.&set := $00000040;
  38919. end;
  38920. function TI2C3A_I2C3ASTAT.getI2COV : TBits_1; inline;
  38921. begin
  38922. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38923. end;
  38924. procedure TI2C3A_I2C3ASTAT.setIWCOL; inline;
  38925. begin
  38926. pTDefRegMap(@Self)^.&set := $00000080;
  38927. end;
  38928. procedure TI2C3A_I2C3ASTAT.clearIWCOL; inline;
  38929. begin
  38930. pTDefRegMap(@Self)^.clr := $00000080;
  38931. end;
  38932. procedure TI2C3A_I2C3ASTAT.setIWCOL(thebits : TBits_1); inline;
  38933. begin
  38934. if thebits = 0 then
  38935. pTDefRegMap(@Self)^.clr := $00000080
  38936. else
  38937. pTDefRegMap(@Self)^.&set := $00000080;
  38938. end;
  38939. function TI2C3A_I2C3ASTAT.getIWCOL : TBits_1; inline;
  38940. begin
  38941. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38942. end;
  38943. procedure TI2C3A_I2C3ASTAT.setADD10; inline;
  38944. begin
  38945. pTDefRegMap(@Self)^.&set := $00000100;
  38946. end;
  38947. procedure TI2C3A_I2C3ASTAT.clearADD10; inline;
  38948. begin
  38949. pTDefRegMap(@Self)^.clr := $00000100;
  38950. end;
  38951. procedure TI2C3A_I2C3ASTAT.setADD10(thebits : TBits_1); inline;
  38952. begin
  38953. if thebits = 0 then
  38954. pTDefRegMap(@Self)^.clr := $00000100
  38955. else
  38956. pTDefRegMap(@Self)^.&set := $00000100;
  38957. end;
  38958. function TI2C3A_I2C3ASTAT.getADD10 : TBits_1; inline;
  38959. begin
  38960. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38961. end;
  38962. procedure TI2C3A_I2C3ASTAT.setGCSTAT; inline;
  38963. begin
  38964. pTDefRegMap(@Self)^.&set := $00000200;
  38965. end;
  38966. procedure TI2C3A_I2C3ASTAT.clearGCSTAT; inline;
  38967. begin
  38968. pTDefRegMap(@Self)^.clr := $00000200;
  38969. end;
  38970. procedure TI2C3A_I2C3ASTAT.setGCSTAT(thebits : TBits_1); inline;
  38971. begin
  38972. if thebits = 0 then
  38973. pTDefRegMap(@Self)^.clr := $00000200
  38974. else
  38975. pTDefRegMap(@Self)^.&set := $00000200;
  38976. end;
  38977. function TI2C3A_I2C3ASTAT.getGCSTAT : TBits_1; inline;
  38978. begin
  38979. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38980. end;
  38981. procedure TI2C3A_I2C3ASTAT.setBCL; inline;
  38982. begin
  38983. pTDefRegMap(@Self)^.&set := $00000400;
  38984. end;
  38985. procedure TI2C3A_I2C3ASTAT.clearBCL; inline;
  38986. begin
  38987. pTDefRegMap(@Self)^.clr := $00000400;
  38988. end;
  38989. procedure TI2C3A_I2C3ASTAT.setBCL(thebits : TBits_1); inline;
  38990. begin
  38991. if thebits = 0 then
  38992. pTDefRegMap(@Self)^.clr := $00000400
  38993. else
  38994. pTDefRegMap(@Self)^.&set := $00000400;
  38995. end;
  38996. function TI2C3A_I2C3ASTAT.getBCL : TBits_1; inline;
  38997. begin
  38998. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38999. end;
  39000. procedure TI2C3A_I2C3ASTAT.setTRSTAT; inline;
  39001. begin
  39002. pTDefRegMap(@Self)^.&set := $00004000;
  39003. end;
  39004. procedure TI2C3A_I2C3ASTAT.clearTRSTAT; inline;
  39005. begin
  39006. pTDefRegMap(@Self)^.clr := $00004000;
  39007. end;
  39008. procedure TI2C3A_I2C3ASTAT.setTRSTAT(thebits : TBits_1); inline;
  39009. begin
  39010. if thebits = 0 then
  39011. pTDefRegMap(@Self)^.clr := $00004000
  39012. else
  39013. pTDefRegMap(@Self)^.&set := $00004000;
  39014. end;
  39015. function TI2C3A_I2C3ASTAT.getTRSTAT : TBits_1; inline;
  39016. begin
  39017. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39018. end;
  39019. procedure TI2C3A_I2C3ASTAT.setACKSTAT; inline;
  39020. begin
  39021. pTDefRegMap(@Self)^.&set := $00008000;
  39022. end;
  39023. procedure TI2C3A_I2C3ASTAT.clearACKSTAT; inline;
  39024. begin
  39025. pTDefRegMap(@Self)^.clr := $00008000;
  39026. end;
  39027. procedure TI2C3A_I2C3ASTAT.setACKSTAT(thebits : TBits_1); inline;
  39028. begin
  39029. if thebits = 0 then
  39030. pTDefRegMap(@Self)^.clr := $00008000
  39031. else
  39032. pTDefRegMap(@Self)^.&set := $00008000;
  39033. end;
  39034. function TI2C3A_I2C3ASTAT.getACKSTAT : TBits_1; inline;
  39035. begin
  39036. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39037. end;
  39038. procedure TI2C3A_I2C3ASTAT.setI2CPOV; inline;
  39039. begin
  39040. pTDefRegMap(@Self)^.&set := $00000040;
  39041. end;
  39042. procedure TI2C3A_I2C3ASTAT.clearI2CPOV; inline;
  39043. begin
  39044. pTDefRegMap(@Self)^.clr := $00000040;
  39045. end;
  39046. procedure TI2C3A_I2C3ASTAT.setI2CPOV(thebits : TBits_1); inline;
  39047. begin
  39048. if thebits = 0 then
  39049. pTDefRegMap(@Self)^.clr := $00000040
  39050. else
  39051. pTDefRegMap(@Self)^.&set := $00000040;
  39052. end;
  39053. function TI2C3A_I2C3ASTAT.getI2CPOV : TBits_1; inline;
  39054. begin
  39055. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39056. end;
  39057. procedure TI2C3A_I2C3ASTAT.setw(thebits : TBits_32); inline;
  39058. begin
  39059. pTDefRegMap(@Self)^.val := thebits;
  39060. end;
  39061. function TI2C3A_I2C3ASTAT.getw : TBits_32; inline;
  39062. begin
  39063. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39064. end;
  39065. procedure TI2C3A_I2C5STAT.setTBF; inline;
  39066. begin
  39067. pTDefRegMap(@Self)^.&set := $00000001;
  39068. end;
  39069. procedure TI2C3A_I2C5STAT.clearTBF; inline;
  39070. begin
  39071. pTDefRegMap(@Self)^.clr := $00000001;
  39072. end;
  39073. procedure TI2C3A_I2C5STAT.setTBF(thebits : TBits_1); inline;
  39074. begin
  39075. if thebits = 0 then
  39076. pTDefRegMap(@Self)^.clr := $00000001
  39077. else
  39078. pTDefRegMap(@Self)^.&set := $00000001;
  39079. end;
  39080. function TI2C3A_I2C5STAT.getTBF : TBits_1; inline;
  39081. begin
  39082. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39083. end;
  39084. procedure TI2C3A_I2C5STAT.setRBF; inline;
  39085. begin
  39086. pTDefRegMap(@Self)^.&set := $00000002;
  39087. end;
  39088. procedure TI2C3A_I2C5STAT.clearRBF; inline;
  39089. begin
  39090. pTDefRegMap(@Self)^.clr := $00000002;
  39091. end;
  39092. procedure TI2C3A_I2C5STAT.setRBF(thebits : TBits_1); inline;
  39093. begin
  39094. if thebits = 0 then
  39095. pTDefRegMap(@Self)^.clr := $00000002
  39096. else
  39097. pTDefRegMap(@Self)^.&set := $00000002;
  39098. end;
  39099. function TI2C3A_I2C5STAT.getRBF : TBits_1; inline;
  39100. begin
  39101. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39102. end;
  39103. procedure TI2C3A_I2C5STAT.setR_W; inline;
  39104. begin
  39105. pTDefRegMap(@Self)^.&set := $00000004;
  39106. end;
  39107. procedure TI2C3A_I2C5STAT.clearR_W; inline;
  39108. begin
  39109. pTDefRegMap(@Self)^.clr := $00000004;
  39110. end;
  39111. procedure TI2C3A_I2C5STAT.setR_W(thebits : TBits_1); inline;
  39112. begin
  39113. if thebits = 0 then
  39114. pTDefRegMap(@Self)^.clr := $00000004
  39115. else
  39116. pTDefRegMap(@Self)^.&set := $00000004;
  39117. end;
  39118. function TI2C3A_I2C5STAT.getR_W : TBits_1; inline;
  39119. begin
  39120. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39121. end;
  39122. procedure TI2C3A_I2C5STAT.setS; inline;
  39123. begin
  39124. pTDefRegMap(@Self)^.&set := $00000008;
  39125. end;
  39126. procedure TI2C3A_I2C5STAT.clearS; inline;
  39127. begin
  39128. pTDefRegMap(@Self)^.clr := $00000008;
  39129. end;
  39130. procedure TI2C3A_I2C5STAT.setS(thebits : TBits_1); inline;
  39131. begin
  39132. if thebits = 0 then
  39133. pTDefRegMap(@Self)^.clr := $00000008
  39134. else
  39135. pTDefRegMap(@Self)^.&set := $00000008;
  39136. end;
  39137. function TI2C3A_I2C5STAT.getS : TBits_1; inline;
  39138. begin
  39139. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39140. end;
  39141. procedure TI2C3A_I2C5STAT.setP; inline;
  39142. begin
  39143. pTDefRegMap(@Self)^.&set := $00000010;
  39144. end;
  39145. procedure TI2C3A_I2C5STAT.clearP; inline;
  39146. begin
  39147. pTDefRegMap(@Self)^.clr := $00000010;
  39148. end;
  39149. procedure TI2C3A_I2C5STAT.setP(thebits : TBits_1); inline;
  39150. begin
  39151. if thebits = 0 then
  39152. pTDefRegMap(@Self)^.clr := $00000010
  39153. else
  39154. pTDefRegMap(@Self)^.&set := $00000010;
  39155. end;
  39156. function TI2C3A_I2C5STAT.getP : TBits_1; inline;
  39157. begin
  39158. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39159. end;
  39160. procedure TI2C3A_I2C5STAT.setD_A; inline;
  39161. begin
  39162. pTDefRegMap(@Self)^.&set := $00000020;
  39163. end;
  39164. procedure TI2C3A_I2C5STAT.clearD_A; inline;
  39165. begin
  39166. pTDefRegMap(@Self)^.clr := $00000020;
  39167. end;
  39168. procedure TI2C3A_I2C5STAT.setD_A(thebits : TBits_1); inline;
  39169. begin
  39170. if thebits = 0 then
  39171. pTDefRegMap(@Self)^.clr := $00000020
  39172. else
  39173. pTDefRegMap(@Self)^.&set := $00000020;
  39174. end;
  39175. function TI2C3A_I2C5STAT.getD_A : TBits_1; inline;
  39176. begin
  39177. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39178. end;
  39179. procedure TI2C3A_I2C5STAT.setI2COV; inline;
  39180. begin
  39181. pTDefRegMap(@Self)^.&set := $00000040;
  39182. end;
  39183. procedure TI2C3A_I2C5STAT.clearI2COV; inline;
  39184. begin
  39185. pTDefRegMap(@Self)^.clr := $00000040;
  39186. end;
  39187. procedure TI2C3A_I2C5STAT.setI2COV(thebits : TBits_1); inline;
  39188. begin
  39189. if thebits = 0 then
  39190. pTDefRegMap(@Self)^.clr := $00000040
  39191. else
  39192. pTDefRegMap(@Self)^.&set := $00000040;
  39193. end;
  39194. function TI2C3A_I2C5STAT.getI2COV : TBits_1; inline;
  39195. begin
  39196. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39197. end;
  39198. procedure TI2C3A_I2C5STAT.setIWCOL; inline;
  39199. begin
  39200. pTDefRegMap(@Self)^.&set := $00000080;
  39201. end;
  39202. procedure TI2C3A_I2C5STAT.clearIWCOL; inline;
  39203. begin
  39204. pTDefRegMap(@Self)^.clr := $00000080;
  39205. end;
  39206. procedure TI2C3A_I2C5STAT.setIWCOL(thebits : TBits_1); inline;
  39207. begin
  39208. if thebits = 0 then
  39209. pTDefRegMap(@Self)^.clr := $00000080
  39210. else
  39211. pTDefRegMap(@Self)^.&set := $00000080;
  39212. end;
  39213. function TI2C3A_I2C5STAT.getIWCOL : TBits_1; inline;
  39214. begin
  39215. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39216. end;
  39217. procedure TI2C3A_I2C5STAT.setADD10; inline;
  39218. begin
  39219. pTDefRegMap(@Self)^.&set := $00000100;
  39220. end;
  39221. procedure TI2C3A_I2C5STAT.clearADD10; inline;
  39222. begin
  39223. pTDefRegMap(@Self)^.clr := $00000100;
  39224. end;
  39225. procedure TI2C3A_I2C5STAT.setADD10(thebits : TBits_1); inline;
  39226. begin
  39227. if thebits = 0 then
  39228. pTDefRegMap(@Self)^.clr := $00000100
  39229. else
  39230. pTDefRegMap(@Self)^.&set := $00000100;
  39231. end;
  39232. function TI2C3A_I2C5STAT.getADD10 : TBits_1; inline;
  39233. begin
  39234. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39235. end;
  39236. procedure TI2C3A_I2C5STAT.setGCSTAT; inline;
  39237. begin
  39238. pTDefRegMap(@Self)^.&set := $00000200;
  39239. end;
  39240. procedure TI2C3A_I2C5STAT.clearGCSTAT; inline;
  39241. begin
  39242. pTDefRegMap(@Self)^.clr := $00000200;
  39243. end;
  39244. procedure TI2C3A_I2C5STAT.setGCSTAT(thebits : TBits_1); inline;
  39245. begin
  39246. if thebits = 0 then
  39247. pTDefRegMap(@Self)^.clr := $00000200
  39248. else
  39249. pTDefRegMap(@Self)^.&set := $00000200;
  39250. end;
  39251. function TI2C3A_I2C5STAT.getGCSTAT : TBits_1; inline;
  39252. begin
  39253. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39254. end;
  39255. procedure TI2C3A_I2C5STAT.setBCL; inline;
  39256. begin
  39257. pTDefRegMap(@Self)^.&set := $00000400;
  39258. end;
  39259. procedure TI2C3A_I2C5STAT.clearBCL; inline;
  39260. begin
  39261. pTDefRegMap(@Self)^.clr := $00000400;
  39262. end;
  39263. procedure TI2C3A_I2C5STAT.setBCL(thebits : TBits_1); inline;
  39264. begin
  39265. if thebits = 0 then
  39266. pTDefRegMap(@Self)^.clr := $00000400
  39267. else
  39268. pTDefRegMap(@Self)^.&set := $00000400;
  39269. end;
  39270. function TI2C3A_I2C5STAT.getBCL : TBits_1; inline;
  39271. begin
  39272. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39273. end;
  39274. procedure TI2C3A_I2C5STAT.setTRSTAT; inline;
  39275. begin
  39276. pTDefRegMap(@Self)^.&set := $00004000;
  39277. end;
  39278. procedure TI2C3A_I2C5STAT.clearTRSTAT; inline;
  39279. begin
  39280. pTDefRegMap(@Self)^.clr := $00004000;
  39281. end;
  39282. procedure TI2C3A_I2C5STAT.setTRSTAT(thebits : TBits_1); inline;
  39283. begin
  39284. if thebits = 0 then
  39285. pTDefRegMap(@Self)^.clr := $00004000
  39286. else
  39287. pTDefRegMap(@Self)^.&set := $00004000;
  39288. end;
  39289. function TI2C3A_I2C5STAT.getTRSTAT : TBits_1; inline;
  39290. begin
  39291. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39292. end;
  39293. procedure TI2C3A_I2C5STAT.setACKSTAT; inline;
  39294. begin
  39295. pTDefRegMap(@Self)^.&set := $00008000;
  39296. end;
  39297. procedure TI2C3A_I2C5STAT.clearACKSTAT; inline;
  39298. begin
  39299. pTDefRegMap(@Self)^.clr := $00008000;
  39300. end;
  39301. procedure TI2C3A_I2C5STAT.setACKSTAT(thebits : TBits_1); inline;
  39302. begin
  39303. if thebits = 0 then
  39304. pTDefRegMap(@Self)^.clr := $00008000
  39305. else
  39306. pTDefRegMap(@Self)^.&set := $00008000;
  39307. end;
  39308. function TI2C3A_I2C5STAT.getACKSTAT : TBits_1; inline;
  39309. begin
  39310. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39311. end;
  39312. procedure TI2C3A_I2C5STAT.setI2CPOV; inline;
  39313. begin
  39314. pTDefRegMap(@Self)^.&set := $00000040;
  39315. end;
  39316. procedure TI2C3A_I2C5STAT.clearI2CPOV; inline;
  39317. begin
  39318. pTDefRegMap(@Self)^.clr := $00000040;
  39319. end;
  39320. procedure TI2C3A_I2C5STAT.setI2CPOV(thebits : TBits_1); inline;
  39321. begin
  39322. if thebits = 0 then
  39323. pTDefRegMap(@Self)^.clr := $00000040
  39324. else
  39325. pTDefRegMap(@Self)^.&set := $00000040;
  39326. end;
  39327. function TI2C3A_I2C5STAT.getI2CPOV : TBits_1; inline;
  39328. begin
  39329. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39330. end;
  39331. procedure TI2C3A_I2C5STAT.setw(thebits : TBits_32); inline;
  39332. begin
  39333. pTDefRegMap(@Self)^.val := thebits;
  39334. end;
  39335. function TI2C3A_I2C5STAT.getw : TBits_32; inline;
  39336. begin
  39337. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39338. end;
  39339. procedure TI2C1_I2C1CON.setSEN; inline;
  39340. begin
  39341. pTDefRegMap(@Self)^.&set := $00000001;
  39342. end;
  39343. procedure TI2C1_I2C1CON.clearSEN; inline;
  39344. begin
  39345. pTDefRegMap(@Self)^.clr := $00000001;
  39346. end;
  39347. procedure TI2C1_I2C1CON.setSEN(thebits : TBits_1); inline;
  39348. begin
  39349. if thebits = 0 then
  39350. pTDefRegMap(@Self)^.clr := $00000001
  39351. else
  39352. pTDefRegMap(@Self)^.&set := $00000001;
  39353. end;
  39354. function TI2C1_I2C1CON.getSEN : TBits_1; inline;
  39355. begin
  39356. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39357. end;
  39358. procedure TI2C1_I2C1CON.setRSEN; inline;
  39359. begin
  39360. pTDefRegMap(@Self)^.&set := $00000002;
  39361. end;
  39362. procedure TI2C1_I2C1CON.clearRSEN; inline;
  39363. begin
  39364. pTDefRegMap(@Self)^.clr := $00000002;
  39365. end;
  39366. procedure TI2C1_I2C1CON.setRSEN(thebits : TBits_1); inline;
  39367. begin
  39368. if thebits = 0 then
  39369. pTDefRegMap(@Self)^.clr := $00000002
  39370. else
  39371. pTDefRegMap(@Self)^.&set := $00000002;
  39372. end;
  39373. function TI2C1_I2C1CON.getRSEN : TBits_1; inline;
  39374. begin
  39375. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39376. end;
  39377. procedure TI2C1_I2C1CON.setPEN; inline;
  39378. begin
  39379. pTDefRegMap(@Self)^.&set := $00000004;
  39380. end;
  39381. procedure TI2C1_I2C1CON.clearPEN; inline;
  39382. begin
  39383. pTDefRegMap(@Self)^.clr := $00000004;
  39384. end;
  39385. procedure TI2C1_I2C1CON.setPEN(thebits : TBits_1); inline;
  39386. begin
  39387. if thebits = 0 then
  39388. pTDefRegMap(@Self)^.clr := $00000004
  39389. else
  39390. pTDefRegMap(@Self)^.&set := $00000004;
  39391. end;
  39392. function TI2C1_I2C1CON.getPEN : TBits_1; inline;
  39393. begin
  39394. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39395. end;
  39396. procedure TI2C1_I2C1CON.setRCEN; inline;
  39397. begin
  39398. pTDefRegMap(@Self)^.&set := $00000008;
  39399. end;
  39400. procedure TI2C1_I2C1CON.clearRCEN; inline;
  39401. begin
  39402. pTDefRegMap(@Self)^.clr := $00000008;
  39403. end;
  39404. procedure TI2C1_I2C1CON.setRCEN(thebits : TBits_1); inline;
  39405. begin
  39406. if thebits = 0 then
  39407. pTDefRegMap(@Self)^.clr := $00000008
  39408. else
  39409. pTDefRegMap(@Self)^.&set := $00000008;
  39410. end;
  39411. function TI2C1_I2C1CON.getRCEN : TBits_1; inline;
  39412. begin
  39413. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39414. end;
  39415. procedure TI2C1_I2C1CON.setACKEN; inline;
  39416. begin
  39417. pTDefRegMap(@Self)^.&set := $00000010;
  39418. end;
  39419. procedure TI2C1_I2C1CON.clearACKEN; inline;
  39420. begin
  39421. pTDefRegMap(@Self)^.clr := $00000010;
  39422. end;
  39423. procedure TI2C1_I2C1CON.setACKEN(thebits : TBits_1); inline;
  39424. begin
  39425. if thebits = 0 then
  39426. pTDefRegMap(@Self)^.clr := $00000010
  39427. else
  39428. pTDefRegMap(@Self)^.&set := $00000010;
  39429. end;
  39430. function TI2C1_I2C1CON.getACKEN : TBits_1; inline;
  39431. begin
  39432. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39433. end;
  39434. procedure TI2C1_I2C1CON.setACKDT; inline;
  39435. begin
  39436. pTDefRegMap(@Self)^.&set := $00000020;
  39437. end;
  39438. procedure TI2C1_I2C1CON.clearACKDT; inline;
  39439. begin
  39440. pTDefRegMap(@Self)^.clr := $00000020;
  39441. end;
  39442. procedure TI2C1_I2C1CON.setACKDT(thebits : TBits_1); inline;
  39443. begin
  39444. if thebits = 0 then
  39445. pTDefRegMap(@Self)^.clr := $00000020
  39446. else
  39447. pTDefRegMap(@Self)^.&set := $00000020;
  39448. end;
  39449. function TI2C1_I2C1CON.getACKDT : TBits_1; inline;
  39450. begin
  39451. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39452. end;
  39453. procedure TI2C1_I2C1CON.setSTREN; inline;
  39454. begin
  39455. pTDefRegMap(@Self)^.&set := $00000040;
  39456. end;
  39457. procedure TI2C1_I2C1CON.clearSTREN; inline;
  39458. begin
  39459. pTDefRegMap(@Self)^.clr := $00000040;
  39460. end;
  39461. procedure TI2C1_I2C1CON.setSTREN(thebits : TBits_1); inline;
  39462. begin
  39463. if thebits = 0 then
  39464. pTDefRegMap(@Self)^.clr := $00000040
  39465. else
  39466. pTDefRegMap(@Self)^.&set := $00000040;
  39467. end;
  39468. function TI2C1_I2C1CON.getSTREN : TBits_1; inline;
  39469. begin
  39470. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39471. end;
  39472. procedure TI2C1_I2C1CON.setGCEN; inline;
  39473. begin
  39474. pTDefRegMap(@Self)^.&set := $00000080;
  39475. end;
  39476. procedure TI2C1_I2C1CON.clearGCEN; inline;
  39477. begin
  39478. pTDefRegMap(@Self)^.clr := $00000080;
  39479. end;
  39480. procedure TI2C1_I2C1CON.setGCEN(thebits : TBits_1); inline;
  39481. begin
  39482. if thebits = 0 then
  39483. pTDefRegMap(@Self)^.clr := $00000080
  39484. else
  39485. pTDefRegMap(@Self)^.&set := $00000080;
  39486. end;
  39487. function TI2C1_I2C1CON.getGCEN : TBits_1; inline;
  39488. begin
  39489. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39490. end;
  39491. procedure TI2C1_I2C1CON.setSMEN; inline;
  39492. begin
  39493. pTDefRegMap(@Self)^.&set := $00000100;
  39494. end;
  39495. procedure TI2C1_I2C1CON.clearSMEN; inline;
  39496. begin
  39497. pTDefRegMap(@Self)^.clr := $00000100;
  39498. end;
  39499. procedure TI2C1_I2C1CON.setSMEN(thebits : TBits_1); inline;
  39500. begin
  39501. if thebits = 0 then
  39502. pTDefRegMap(@Self)^.clr := $00000100
  39503. else
  39504. pTDefRegMap(@Self)^.&set := $00000100;
  39505. end;
  39506. function TI2C1_I2C1CON.getSMEN : TBits_1; inline;
  39507. begin
  39508. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39509. end;
  39510. procedure TI2C1_I2C1CON.setDISSLW; inline;
  39511. begin
  39512. pTDefRegMap(@Self)^.&set := $00000200;
  39513. end;
  39514. procedure TI2C1_I2C1CON.clearDISSLW; inline;
  39515. begin
  39516. pTDefRegMap(@Self)^.clr := $00000200;
  39517. end;
  39518. procedure TI2C1_I2C1CON.setDISSLW(thebits : TBits_1); inline;
  39519. begin
  39520. if thebits = 0 then
  39521. pTDefRegMap(@Self)^.clr := $00000200
  39522. else
  39523. pTDefRegMap(@Self)^.&set := $00000200;
  39524. end;
  39525. function TI2C1_I2C1CON.getDISSLW : TBits_1; inline;
  39526. begin
  39527. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39528. end;
  39529. procedure TI2C1_I2C1CON.setA10M; inline;
  39530. begin
  39531. pTDefRegMap(@Self)^.&set := $00000400;
  39532. end;
  39533. procedure TI2C1_I2C1CON.clearA10M; inline;
  39534. begin
  39535. pTDefRegMap(@Self)^.clr := $00000400;
  39536. end;
  39537. procedure TI2C1_I2C1CON.setA10M(thebits : TBits_1); inline;
  39538. begin
  39539. if thebits = 0 then
  39540. pTDefRegMap(@Self)^.clr := $00000400
  39541. else
  39542. pTDefRegMap(@Self)^.&set := $00000400;
  39543. end;
  39544. function TI2C1_I2C1CON.getA10M : TBits_1; inline;
  39545. begin
  39546. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39547. end;
  39548. procedure TI2C1_I2C1CON.setSTRICT; inline;
  39549. begin
  39550. pTDefRegMap(@Self)^.&set := $00000800;
  39551. end;
  39552. procedure TI2C1_I2C1CON.clearSTRICT; inline;
  39553. begin
  39554. pTDefRegMap(@Self)^.clr := $00000800;
  39555. end;
  39556. procedure TI2C1_I2C1CON.setSTRICT(thebits : TBits_1); inline;
  39557. begin
  39558. if thebits = 0 then
  39559. pTDefRegMap(@Self)^.clr := $00000800
  39560. else
  39561. pTDefRegMap(@Self)^.&set := $00000800;
  39562. end;
  39563. function TI2C1_I2C1CON.getSTRICT : TBits_1; inline;
  39564. begin
  39565. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39566. end;
  39567. procedure TI2C1_I2C1CON.setSCLREL; inline;
  39568. begin
  39569. pTDefRegMap(@Self)^.&set := $00001000;
  39570. end;
  39571. procedure TI2C1_I2C1CON.clearSCLREL; inline;
  39572. begin
  39573. pTDefRegMap(@Self)^.clr := $00001000;
  39574. end;
  39575. procedure TI2C1_I2C1CON.setSCLREL(thebits : TBits_1); inline;
  39576. begin
  39577. if thebits = 0 then
  39578. pTDefRegMap(@Self)^.clr := $00001000
  39579. else
  39580. pTDefRegMap(@Self)^.&set := $00001000;
  39581. end;
  39582. function TI2C1_I2C1CON.getSCLREL : TBits_1; inline;
  39583. begin
  39584. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39585. end;
  39586. procedure TI2C1_I2C1CON.setSIDL; inline;
  39587. begin
  39588. pTDefRegMap(@Self)^.&set := $00002000;
  39589. end;
  39590. procedure TI2C1_I2C1CON.clearSIDL; inline;
  39591. begin
  39592. pTDefRegMap(@Self)^.clr := $00002000;
  39593. end;
  39594. procedure TI2C1_I2C1CON.setSIDL(thebits : TBits_1); inline;
  39595. begin
  39596. if thebits = 0 then
  39597. pTDefRegMap(@Self)^.clr := $00002000
  39598. else
  39599. pTDefRegMap(@Self)^.&set := $00002000;
  39600. end;
  39601. function TI2C1_I2C1CON.getSIDL : TBits_1; inline;
  39602. begin
  39603. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39604. end;
  39605. procedure TI2C1_I2C1CON.setON; inline;
  39606. begin
  39607. pTDefRegMap(@Self)^.&set := $00008000;
  39608. end;
  39609. procedure TI2C1_I2C1CON.clearON; inline;
  39610. begin
  39611. pTDefRegMap(@Self)^.clr := $00008000;
  39612. end;
  39613. procedure TI2C1_I2C1CON.setON(thebits : TBits_1); inline;
  39614. begin
  39615. if thebits = 0 then
  39616. pTDefRegMap(@Self)^.clr := $00008000
  39617. else
  39618. pTDefRegMap(@Self)^.&set := $00008000;
  39619. end;
  39620. function TI2C1_I2C1CON.getON : TBits_1; inline;
  39621. begin
  39622. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39623. end;
  39624. procedure TI2C1_I2C1CON.setIPMIEN; inline;
  39625. begin
  39626. pTDefRegMap(@Self)^.&set := $00000800;
  39627. end;
  39628. procedure TI2C1_I2C1CON.clearIPMIEN; inline;
  39629. begin
  39630. pTDefRegMap(@Self)^.clr := $00000800;
  39631. end;
  39632. procedure TI2C1_I2C1CON.setIPMIEN(thebits : TBits_1); inline;
  39633. begin
  39634. if thebits = 0 then
  39635. pTDefRegMap(@Self)^.clr := $00000800
  39636. else
  39637. pTDefRegMap(@Self)^.&set := $00000800;
  39638. end;
  39639. function TI2C1_I2C1CON.getIPMIEN : TBits_1; inline;
  39640. begin
  39641. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39642. end;
  39643. procedure TI2C1_I2C1CON.setI2CSIDL; inline;
  39644. begin
  39645. pTDefRegMap(@Self)^.&set := $00002000;
  39646. end;
  39647. procedure TI2C1_I2C1CON.clearI2CSIDL; inline;
  39648. begin
  39649. pTDefRegMap(@Self)^.clr := $00002000;
  39650. end;
  39651. procedure TI2C1_I2C1CON.setI2CSIDL(thebits : TBits_1); inline;
  39652. begin
  39653. if thebits = 0 then
  39654. pTDefRegMap(@Self)^.clr := $00002000
  39655. else
  39656. pTDefRegMap(@Self)^.&set := $00002000;
  39657. end;
  39658. function TI2C1_I2C1CON.getI2CSIDL : TBits_1; inline;
  39659. begin
  39660. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39661. end;
  39662. procedure TI2C1_I2C1CON.setI2CEN; inline;
  39663. begin
  39664. pTDefRegMap(@Self)^.&set := $00008000;
  39665. end;
  39666. procedure TI2C1_I2C1CON.clearI2CEN; inline;
  39667. begin
  39668. pTDefRegMap(@Self)^.clr := $00008000;
  39669. end;
  39670. procedure TI2C1_I2C1CON.setI2CEN(thebits : TBits_1); inline;
  39671. begin
  39672. if thebits = 0 then
  39673. pTDefRegMap(@Self)^.clr := $00008000
  39674. else
  39675. pTDefRegMap(@Self)^.&set := $00008000;
  39676. end;
  39677. function TI2C1_I2C1CON.getI2CEN : TBits_1; inline;
  39678. begin
  39679. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39680. end;
  39681. procedure TI2C1_I2C1CON.setw(thebits : TBits_32); inline;
  39682. begin
  39683. pTDefRegMap(@Self)^.val := thebits;
  39684. end;
  39685. function TI2C1_I2C1CON.getw : TBits_32; inline;
  39686. begin
  39687. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39688. end;
  39689. procedure TI2C1_I2C1STAT.setTBF; inline;
  39690. begin
  39691. pTDefRegMap(@Self)^.&set := $00000001;
  39692. end;
  39693. procedure TI2C1_I2C1STAT.clearTBF; inline;
  39694. begin
  39695. pTDefRegMap(@Self)^.clr := $00000001;
  39696. end;
  39697. procedure TI2C1_I2C1STAT.setTBF(thebits : TBits_1); inline;
  39698. begin
  39699. if thebits = 0 then
  39700. pTDefRegMap(@Self)^.clr := $00000001
  39701. else
  39702. pTDefRegMap(@Self)^.&set := $00000001;
  39703. end;
  39704. function TI2C1_I2C1STAT.getTBF : TBits_1; inline;
  39705. begin
  39706. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39707. end;
  39708. procedure TI2C1_I2C1STAT.setRBF; inline;
  39709. begin
  39710. pTDefRegMap(@Self)^.&set := $00000002;
  39711. end;
  39712. procedure TI2C1_I2C1STAT.clearRBF; inline;
  39713. begin
  39714. pTDefRegMap(@Self)^.clr := $00000002;
  39715. end;
  39716. procedure TI2C1_I2C1STAT.setRBF(thebits : TBits_1); inline;
  39717. begin
  39718. if thebits = 0 then
  39719. pTDefRegMap(@Self)^.clr := $00000002
  39720. else
  39721. pTDefRegMap(@Self)^.&set := $00000002;
  39722. end;
  39723. function TI2C1_I2C1STAT.getRBF : TBits_1; inline;
  39724. begin
  39725. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39726. end;
  39727. procedure TI2C1_I2C1STAT.setR_W; inline;
  39728. begin
  39729. pTDefRegMap(@Self)^.&set := $00000004;
  39730. end;
  39731. procedure TI2C1_I2C1STAT.clearR_W; inline;
  39732. begin
  39733. pTDefRegMap(@Self)^.clr := $00000004;
  39734. end;
  39735. procedure TI2C1_I2C1STAT.setR_W(thebits : TBits_1); inline;
  39736. begin
  39737. if thebits = 0 then
  39738. pTDefRegMap(@Self)^.clr := $00000004
  39739. else
  39740. pTDefRegMap(@Self)^.&set := $00000004;
  39741. end;
  39742. function TI2C1_I2C1STAT.getR_W : TBits_1; inline;
  39743. begin
  39744. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  39745. end;
  39746. procedure TI2C1_I2C1STAT.setS; inline;
  39747. begin
  39748. pTDefRegMap(@Self)^.&set := $00000008;
  39749. end;
  39750. procedure TI2C1_I2C1STAT.clearS; inline;
  39751. begin
  39752. pTDefRegMap(@Self)^.clr := $00000008;
  39753. end;
  39754. procedure TI2C1_I2C1STAT.setS(thebits : TBits_1); inline;
  39755. begin
  39756. if thebits = 0 then
  39757. pTDefRegMap(@Self)^.clr := $00000008
  39758. else
  39759. pTDefRegMap(@Self)^.&set := $00000008;
  39760. end;
  39761. function TI2C1_I2C1STAT.getS : TBits_1; inline;
  39762. begin
  39763. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39764. end;
  39765. procedure TI2C1_I2C1STAT.setP; inline;
  39766. begin
  39767. pTDefRegMap(@Self)^.&set := $00000010;
  39768. end;
  39769. procedure TI2C1_I2C1STAT.clearP; inline;
  39770. begin
  39771. pTDefRegMap(@Self)^.clr := $00000010;
  39772. end;
  39773. procedure TI2C1_I2C1STAT.setP(thebits : TBits_1); inline;
  39774. begin
  39775. if thebits = 0 then
  39776. pTDefRegMap(@Self)^.clr := $00000010
  39777. else
  39778. pTDefRegMap(@Self)^.&set := $00000010;
  39779. end;
  39780. function TI2C1_I2C1STAT.getP : TBits_1; inline;
  39781. begin
  39782. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  39783. end;
  39784. procedure TI2C1_I2C1STAT.setD_A; inline;
  39785. begin
  39786. pTDefRegMap(@Self)^.&set := $00000020;
  39787. end;
  39788. procedure TI2C1_I2C1STAT.clearD_A; inline;
  39789. begin
  39790. pTDefRegMap(@Self)^.clr := $00000020;
  39791. end;
  39792. procedure TI2C1_I2C1STAT.setD_A(thebits : TBits_1); inline;
  39793. begin
  39794. if thebits = 0 then
  39795. pTDefRegMap(@Self)^.clr := $00000020
  39796. else
  39797. pTDefRegMap(@Self)^.&set := $00000020;
  39798. end;
  39799. function TI2C1_I2C1STAT.getD_A : TBits_1; inline;
  39800. begin
  39801. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39802. end;
  39803. procedure TI2C1_I2C1STAT.setI2COV; inline;
  39804. begin
  39805. pTDefRegMap(@Self)^.&set := $00000040;
  39806. end;
  39807. procedure TI2C1_I2C1STAT.clearI2COV; inline;
  39808. begin
  39809. pTDefRegMap(@Self)^.clr := $00000040;
  39810. end;
  39811. procedure TI2C1_I2C1STAT.setI2COV(thebits : TBits_1); inline;
  39812. begin
  39813. if thebits = 0 then
  39814. pTDefRegMap(@Self)^.clr := $00000040
  39815. else
  39816. pTDefRegMap(@Self)^.&set := $00000040;
  39817. end;
  39818. function TI2C1_I2C1STAT.getI2COV : TBits_1; inline;
  39819. begin
  39820. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39821. end;
  39822. procedure TI2C1_I2C1STAT.setIWCOL; inline;
  39823. begin
  39824. pTDefRegMap(@Self)^.&set := $00000080;
  39825. end;
  39826. procedure TI2C1_I2C1STAT.clearIWCOL; inline;
  39827. begin
  39828. pTDefRegMap(@Self)^.clr := $00000080;
  39829. end;
  39830. procedure TI2C1_I2C1STAT.setIWCOL(thebits : TBits_1); inline;
  39831. begin
  39832. if thebits = 0 then
  39833. pTDefRegMap(@Self)^.clr := $00000080
  39834. else
  39835. pTDefRegMap(@Self)^.&set := $00000080;
  39836. end;
  39837. function TI2C1_I2C1STAT.getIWCOL : TBits_1; inline;
  39838. begin
  39839. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39840. end;
  39841. procedure TI2C1_I2C1STAT.setADD10; inline;
  39842. begin
  39843. pTDefRegMap(@Self)^.&set := $00000100;
  39844. end;
  39845. procedure TI2C1_I2C1STAT.clearADD10; inline;
  39846. begin
  39847. pTDefRegMap(@Self)^.clr := $00000100;
  39848. end;
  39849. procedure TI2C1_I2C1STAT.setADD10(thebits : TBits_1); inline;
  39850. begin
  39851. if thebits = 0 then
  39852. pTDefRegMap(@Self)^.clr := $00000100
  39853. else
  39854. pTDefRegMap(@Self)^.&set := $00000100;
  39855. end;
  39856. function TI2C1_I2C1STAT.getADD10 : TBits_1; inline;
  39857. begin
  39858. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39859. end;
  39860. procedure TI2C1_I2C1STAT.setGCSTAT; inline;
  39861. begin
  39862. pTDefRegMap(@Self)^.&set := $00000200;
  39863. end;
  39864. procedure TI2C1_I2C1STAT.clearGCSTAT; inline;
  39865. begin
  39866. pTDefRegMap(@Self)^.clr := $00000200;
  39867. end;
  39868. procedure TI2C1_I2C1STAT.setGCSTAT(thebits : TBits_1); inline;
  39869. begin
  39870. if thebits = 0 then
  39871. pTDefRegMap(@Self)^.clr := $00000200
  39872. else
  39873. pTDefRegMap(@Self)^.&set := $00000200;
  39874. end;
  39875. function TI2C1_I2C1STAT.getGCSTAT : TBits_1; inline;
  39876. begin
  39877. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39878. end;
  39879. procedure TI2C1_I2C1STAT.setBCL; inline;
  39880. begin
  39881. pTDefRegMap(@Self)^.&set := $00000400;
  39882. end;
  39883. procedure TI2C1_I2C1STAT.clearBCL; inline;
  39884. begin
  39885. pTDefRegMap(@Self)^.clr := $00000400;
  39886. end;
  39887. procedure TI2C1_I2C1STAT.setBCL(thebits : TBits_1); inline;
  39888. begin
  39889. if thebits = 0 then
  39890. pTDefRegMap(@Self)^.clr := $00000400
  39891. else
  39892. pTDefRegMap(@Self)^.&set := $00000400;
  39893. end;
  39894. function TI2C1_I2C1STAT.getBCL : TBits_1; inline;
  39895. begin
  39896. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39897. end;
  39898. procedure TI2C1_I2C1STAT.setTRSTAT; inline;
  39899. begin
  39900. pTDefRegMap(@Self)^.&set := $00004000;
  39901. end;
  39902. procedure TI2C1_I2C1STAT.clearTRSTAT; inline;
  39903. begin
  39904. pTDefRegMap(@Self)^.clr := $00004000;
  39905. end;
  39906. procedure TI2C1_I2C1STAT.setTRSTAT(thebits : TBits_1); inline;
  39907. begin
  39908. if thebits = 0 then
  39909. pTDefRegMap(@Self)^.clr := $00004000
  39910. else
  39911. pTDefRegMap(@Self)^.&set := $00004000;
  39912. end;
  39913. function TI2C1_I2C1STAT.getTRSTAT : TBits_1; inline;
  39914. begin
  39915. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  39916. end;
  39917. procedure TI2C1_I2C1STAT.setACKSTAT; inline;
  39918. begin
  39919. pTDefRegMap(@Self)^.&set := $00008000;
  39920. end;
  39921. procedure TI2C1_I2C1STAT.clearACKSTAT; inline;
  39922. begin
  39923. pTDefRegMap(@Self)^.clr := $00008000;
  39924. end;
  39925. procedure TI2C1_I2C1STAT.setACKSTAT(thebits : TBits_1); inline;
  39926. begin
  39927. if thebits = 0 then
  39928. pTDefRegMap(@Self)^.clr := $00008000
  39929. else
  39930. pTDefRegMap(@Self)^.&set := $00008000;
  39931. end;
  39932. function TI2C1_I2C1STAT.getACKSTAT : TBits_1; inline;
  39933. begin
  39934. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39935. end;
  39936. procedure TI2C1_I2C1STAT.setI2CPOV; inline;
  39937. begin
  39938. pTDefRegMap(@Self)^.&set := $00000040;
  39939. end;
  39940. procedure TI2C1_I2C1STAT.clearI2CPOV; inline;
  39941. begin
  39942. pTDefRegMap(@Self)^.clr := $00000040;
  39943. end;
  39944. procedure TI2C1_I2C1STAT.setI2CPOV(thebits : TBits_1); inline;
  39945. begin
  39946. if thebits = 0 then
  39947. pTDefRegMap(@Self)^.clr := $00000040
  39948. else
  39949. pTDefRegMap(@Self)^.&set := $00000040;
  39950. end;
  39951. function TI2C1_I2C1STAT.getI2CPOV : TBits_1; inline;
  39952. begin
  39953. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39954. end;
  39955. procedure TI2C1_I2C1STAT.setw(thebits : TBits_32); inline;
  39956. begin
  39957. pTDefRegMap(@Self)^.val := thebits;
  39958. end;
  39959. function TI2C1_I2C1STAT.getw : TBits_32; inline;
  39960. begin
  39961. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39962. end;
  39963. procedure TI2C2_I2C2CON.setSEN; inline;
  39964. begin
  39965. pTDefRegMap(@Self)^.&set := $00000001;
  39966. end;
  39967. procedure TI2C2_I2C2CON.clearSEN; inline;
  39968. begin
  39969. pTDefRegMap(@Self)^.clr := $00000001;
  39970. end;
  39971. procedure TI2C2_I2C2CON.setSEN(thebits : TBits_1); inline;
  39972. begin
  39973. if thebits = 0 then
  39974. pTDefRegMap(@Self)^.clr := $00000001
  39975. else
  39976. pTDefRegMap(@Self)^.&set := $00000001;
  39977. end;
  39978. function TI2C2_I2C2CON.getSEN : TBits_1; inline;
  39979. begin
  39980. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39981. end;
  39982. procedure TI2C2_I2C2CON.setRSEN; inline;
  39983. begin
  39984. pTDefRegMap(@Self)^.&set := $00000002;
  39985. end;
  39986. procedure TI2C2_I2C2CON.clearRSEN; inline;
  39987. begin
  39988. pTDefRegMap(@Self)^.clr := $00000002;
  39989. end;
  39990. procedure TI2C2_I2C2CON.setRSEN(thebits : TBits_1); inline;
  39991. begin
  39992. if thebits = 0 then
  39993. pTDefRegMap(@Self)^.clr := $00000002
  39994. else
  39995. pTDefRegMap(@Self)^.&set := $00000002;
  39996. end;
  39997. function TI2C2_I2C2CON.getRSEN : TBits_1; inline;
  39998. begin
  39999. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40000. end;
  40001. procedure TI2C2_I2C2CON.setPEN; inline;
  40002. begin
  40003. pTDefRegMap(@Self)^.&set := $00000004;
  40004. end;
  40005. procedure TI2C2_I2C2CON.clearPEN; inline;
  40006. begin
  40007. pTDefRegMap(@Self)^.clr := $00000004;
  40008. end;
  40009. procedure TI2C2_I2C2CON.setPEN(thebits : TBits_1); inline;
  40010. begin
  40011. if thebits = 0 then
  40012. pTDefRegMap(@Self)^.clr := $00000004
  40013. else
  40014. pTDefRegMap(@Self)^.&set := $00000004;
  40015. end;
  40016. function TI2C2_I2C2CON.getPEN : TBits_1; inline;
  40017. begin
  40018. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40019. end;
  40020. procedure TI2C2_I2C2CON.setRCEN; inline;
  40021. begin
  40022. pTDefRegMap(@Self)^.&set := $00000008;
  40023. end;
  40024. procedure TI2C2_I2C2CON.clearRCEN; inline;
  40025. begin
  40026. pTDefRegMap(@Self)^.clr := $00000008;
  40027. end;
  40028. procedure TI2C2_I2C2CON.setRCEN(thebits : TBits_1); inline;
  40029. begin
  40030. if thebits = 0 then
  40031. pTDefRegMap(@Self)^.clr := $00000008
  40032. else
  40033. pTDefRegMap(@Self)^.&set := $00000008;
  40034. end;
  40035. function TI2C2_I2C2CON.getRCEN : TBits_1; inline;
  40036. begin
  40037. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40038. end;
  40039. procedure TI2C2_I2C2CON.setACKEN; inline;
  40040. begin
  40041. pTDefRegMap(@Self)^.&set := $00000010;
  40042. end;
  40043. procedure TI2C2_I2C2CON.clearACKEN; inline;
  40044. begin
  40045. pTDefRegMap(@Self)^.clr := $00000010;
  40046. end;
  40047. procedure TI2C2_I2C2CON.setACKEN(thebits : TBits_1); inline;
  40048. begin
  40049. if thebits = 0 then
  40050. pTDefRegMap(@Self)^.clr := $00000010
  40051. else
  40052. pTDefRegMap(@Self)^.&set := $00000010;
  40053. end;
  40054. function TI2C2_I2C2CON.getACKEN : TBits_1; inline;
  40055. begin
  40056. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40057. end;
  40058. procedure TI2C2_I2C2CON.setACKDT; inline;
  40059. begin
  40060. pTDefRegMap(@Self)^.&set := $00000020;
  40061. end;
  40062. procedure TI2C2_I2C2CON.clearACKDT; inline;
  40063. begin
  40064. pTDefRegMap(@Self)^.clr := $00000020;
  40065. end;
  40066. procedure TI2C2_I2C2CON.setACKDT(thebits : TBits_1); inline;
  40067. begin
  40068. if thebits = 0 then
  40069. pTDefRegMap(@Self)^.clr := $00000020
  40070. else
  40071. pTDefRegMap(@Self)^.&set := $00000020;
  40072. end;
  40073. function TI2C2_I2C2CON.getACKDT : TBits_1; inline;
  40074. begin
  40075. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40076. end;
  40077. procedure TI2C2_I2C2CON.setSTREN; inline;
  40078. begin
  40079. pTDefRegMap(@Self)^.&set := $00000040;
  40080. end;
  40081. procedure TI2C2_I2C2CON.clearSTREN; inline;
  40082. begin
  40083. pTDefRegMap(@Self)^.clr := $00000040;
  40084. end;
  40085. procedure TI2C2_I2C2CON.setSTREN(thebits : TBits_1); inline;
  40086. begin
  40087. if thebits = 0 then
  40088. pTDefRegMap(@Self)^.clr := $00000040
  40089. else
  40090. pTDefRegMap(@Self)^.&set := $00000040;
  40091. end;
  40092. function TI2C2_I2C2CON.getSTREN : TBits_1; inline;
  40093. begin
  40094. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40095. end;
  40096. procedure TI2C2_I2C2CON.setGCEN; inline;
  40097. begin
  40098. pTDefRegMap(@Self)^.&set := $00000080;
  40099. end;
  40100. procedure TI2C2_I2C2CON.clearGCEN; inline;
  40101. begin
  40102. pTDefRegMap(@Self)^.clr := $00000080;
  40103. end;
  40104. procedure TI2C2_I2C2CON.setGCEN(thebits : TBits_1); inline;
  40105. begin
  40106. if thebits = 0 then
  40107. pTDefRegMap(@Self)^.clr := $00000080
  40108. else
  40109. pTDefRegMap(@Self)^.&set := $00000080;
  40110. end;
  40111. function TI2C2_I2C2CON.getGCEN : TBits_1; inline;
  40112. begin
  40113. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40114. end;
  40115. procedure TI2C2_I2C2CON.setSMEN; inline;
  40116. begin
  40117. pTDefRegMap(@Self)^.&set := $00000100;
  40118. end;
  40119. procedure TI2C2_I2C2CON.clearSMEN; inline;
  40120. begin
  40121. pTDefRegMap(@Self)^.clr := $00000100;
  40122. end;
  40123. procedure TI2C2_I2C2CON.setSMEN(thebits : TBits_1); inline;
  40124. begin
  40125. if thebits = 0 then
  40126. pTDefRegMap(@Self)^.clr := $00000100
  40127. else
  40128. pTDefRegMap(@Self)^.&set := $00000100;
  40129. end;
  40130. function TI2C2_I2C2CON.getSMEN : TBits_1; inline;
  40131. begin
  40132. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40133. end;
  40134. procedure TI2C2_I2C2CON.setDISSLW; inline;
  40135. begin
  40136. pTDefRegMap(@Self)^.&set := $00000200;
  40137. end;
  40138. procedure TI2C2_I2C2CON.clearDISSLW; inline;
  40139. begin
  40140. pTDefRegMap(@Self)^.clr := $00000200;
  40141. end;
  40142. procedure TI2C2_I2C2CON.setDISSLW(thebits : TBits_1); inline;
  40143. begin
  40144. if thebits = 0 then
  40145. pTDefRegMap(@Self)^.clr := $00000200
  40146. else
  40147. pTDefRegMap(@Self)^.&set := $00000200;
  40148. end;
  40149. function TI2C2_I2C2CON.getDISSLW : TBits_1; inline;
  40150. begin
  40151. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40152. end;
  40153. procedure TI2C2_I2C2CON.setA10M; inline;
  40154. begin
  40155. pTDefRegMap(@Self)^.&set := $00000400;
  40156. end;
  40157. procedure TI2C2_I2C2CON.clearA10M; inline;
  40158. begin
  40159. pTDefRegMap(@Self)^.clr := $00000400;
  40160. end;
  40161. procedure TI2C2_I2C2CON.setA10M(thebits : TBits_1); inline;
  40162. begin
  40163. if thebits = 0 then
  40164. pTDefRegMap(@Self)^.clr := $00000400
  40165. else
  40166. pTDefRegMap(@Self)^.&set := $00000400;
  40167. end;
  40168. function TI2C2_I2C2CON.getA10M : TBits_1; inline;
  40169. begin
  40170. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40171. end;
  40172. procedure TI2C2_I2C2CON.setSTRICT; inline;
  40173. begin
  40174. pTDefRegMap(@Self)^.&set := $00000800;
  40175. end;
  40176. procedure TI2C2_I2C2CON.clearSTRICT; inline;
  40177. begin
  40178. pTDefRegMap(@Self)^.clr := $00000800;
  40179. end;
  40180. procedure TI2C2_I2C2CON.setSTRICT(thebits : TBits_1); inline;
  40181. begin
  40182. if thebits = 0 then
  40183. pTDefRegMap(@Self)^.clr := $00000800
  40184. else
  40185. pTDefRegMap(@Self)^.&set := $00000800;
  40186. end;
  40187. function TI2C2_I2C2CON.getSTRICT : TBits_1; inline;
  40188. begin
  40189. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40190. end;
  40191. procedure TI2C2_I2C2CON.setSCLREL; inline;
  40192. begin
  40193. pTDefRegMap(@Self)^.&set := $00001000;
  40194. end;
  40195. procedure TI2C2_I2C2CON.clearSCLREL; inline;
  40196. begin
  40197. pTDefRegMap(@Self)^.clr := $00001000;
  40198. end;
  40199. procedure TI2C2_I2C2CON.setSCLREL(thebits : TBits_1); inline;
  40200. begin
  40201. if thebits = 0 then
  40202. pTDefRegMap(@Self)^.clr := $00001000
  40203. else
  40204. pTDefRegMap(@Self)^.&set := $00001000;
  40205. end;
  40206. function TI2C2_I2C2CON.getSCLREL : TBits_1; inline;
  40207. begin
  40208. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40209. end;
  40210. procedure TI2C2_I2C2CON.setSIDL; inline;
  40211. begin
  40212. pTDefRegMap(@Self)^.&set := $00002000;
  40213. end;
  40214. procedure TI2C2_I2C2CON.clearSIDL; inline;
  40215. begin
  40216. pTDefRegMap(@Self)^.clr := $00002000;
  40217. end;
  40218. procedure TI2C2_I2C2CON.setSIDL(thebits : TBits_1); inline;
  40219. begin
  40220. if thebits = 0 then
  40221. pTDefRegMap(@Self)^.clr := $00002000
  40222. else
  40223. pTDefRegMap(@Self)^.&set := $00002000;
  40224. end;
  40225. function TI2C2_I2C2CON.getSIDL : TBits_1; inline;
  40226. begin
  40227. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40228. end;
  40229. procedure TI2C2_I2C2CON.setON; inline;
  40230. begin
  40231. pTDefRegMap(@Self)^.&set := $00008000;
  40232. end;
  40233. procedure TI2C2_I2C2CON.clearON; inline;
  40234. begin
  40235. pTDefRegMap(@Self)^.clr := $00008000;
  40236. end;
  40237. procedure TI2C2_I2C2CON.setON(thebits : TBits_1); inline;
  40238. begin
  40239. if thebits = 0 then
  40240. pTDefRegMap(@Self)^.clr := $00008000
  40241. else
  40242. pTDefRegMap(@Self)^.&set := $00008000;
  40243. end;
  40244. function TI2C2_I2C2CON.getON : TBits_1; inline;
  40245. begin
  40246. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40247. end;
  40248. procedure TI2C2_I2C2CON.setIPMIEN; inline;
  40249. begin
  40250. pTDefRegMap(@Self)^.&set := $00000800;
  40251. end;
  40252. procedure TI2C2_I2C2CON.clearIPMIEN; inline;
  40253. begin
  40254. pTDefRegMap(@Self)^.clr := $00000800;
  40255. end;
  40256. procedure TI2C2_I2C2CON.setIPMIEN(thebits : TBits_1); inline;
  40257. begin
  40258. if thebits = 0 then
  40259. pTDefRegMap(@Self)^.clr := $00000800
  40260. else
  40261. pTDefRegMap(@Self)^.&set := $00000800;
  40262. end;
  40263. function TI2C2_I2C2CON.getIPMIEN : TBits_1; inline;
  40264. begin
  40265. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40266. end;
  40267. procedure TI2C2_I2C2CON.setI2CSIDL; inline;
  40268. begin
  40269. pTDefRegMap(@Self)^.&set := $00002000;
  40270. end;
  40271. procedure TI2C2_I2C2CON.clearI2CSIDL; inline;
  40272. begin
  40273. pTDefRegMap(@Self)^.clr := $00002000;
  40274. end;
  40275. procedure TI2C2_I2C2CON.setI2CSIDL(thebits : TBits_1); inline;
  40276. begin
  40277. if thebits = 0 then
  40278. pTDefRegMap(@Self)^.clr := $00002000
  40279. else
  40280. pTDefRegMap(@Self)^.&set := $00002000;
  40281. end;
  40282. function TI2C2_I2C2CON.getI2CSIDL : TBits_1; inline;
  40283. begin
  40284. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40285. end;
  40286. procedure TI2C2_I2C2CON.setI2CEN; inline;
  40287. begin
  40288. pTDefRegMap(@Self)^.&set := $00008000;
  40289. end;
  40290. procedure TI2C2_I2C2CON.clearI2CEN; inline;
  40291. begin
  40292. pTDefRegMap(@Self)^.clr := $00008000;
  40293. end;
  40294. procedure TI2C2_I2C2CON.setI2CEN(thebits : TBits_1); inline;
  40295. begin
  40296. if thebits = 0 then
  40297. pTDefRegMap(@Self)^.clr := $00008000
  40298. else
  40299. pTDefRegMap(@Self)^.&set := $00008000;
  40300. end;
  40301. function TI2C2_I2C2CON.getI2CEN : TBits_1; inline;
  40302. begin
  40303. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40304. end;
  40305. procedure TI2C2_I2C2CON.setw(thebits : TBits_32); inline;
  40306. begin
  40307. pTDefRegMap(@Self)^.val := thebits;
  40308. end;
  40309. function TI2C2_I2C2CON.getw : TBits_32; inline;
  40310. begin
  40311. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40312. end;
  40313. procedure TI2C2_I2C2STAT.setTBF; inline;
  40314. begin
  40315. pTDefRegMap(@Self)^.&set := $00000001;
  40316. end;
  40317. procedure TI2C2_I2C2STAT.clearTBF; inline;
  40318. begin
  40319. pTDefRegMap(@Self)^.clr := $00000001;
  40320. end;
  40321. procedure TI2C2_I2C2STAT.setTBF(thebits : TBits_1); inline;
  40322. begin
  40323. if thebits = 0 then
  40324. pTDefRegMap(@Self)^.clr := $00000001
  40325. else
  40326. pTDefRegMap(@Self)^.&set := $00000001;
  40327. end;
  40328. function TI2C2_I2C2STAT.getTBF : TBits_1; inline;
  40329. begin
  40330. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40331. end;
  40332. procedure TI2C2_I2C2STAT.setRBF; inline;
  40333. begin
  40334. pTDefRegMap(@Self)^.&set := $00000002;
  40335. end;
  40336. procedure TI2C2_I2C2STAT.clearRBF; inline;
  40337. begin
  40338. pTDefRegMap(@Self)^.clr := $00000002;
  40339. end;
  40340. procedure TI2C2_I2C2STAT.setRBF(thebits : TBits_1); inline;
  40341. begin
  40342. if thebits = 0 then
  40343. pTDefRegMap(@Self)^.clr := $00000002
  40344. else
  40345. pTDefRegMap(@Self)^.&set := $00000002;
  40346. end;
  40347. function TI2C2_I2C2STAT.getRBF : TBits_1; inline;
  40348. begin
  40349. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40350. end;
  40351. procedure TI2C2_I2C2STAT.setR_W; inline;
  40352. begin
  40353. pTDefRegMap(@Self)^.&set := $00000004;
  40354. end;
  40355. procedure TI2C2_I2C2STAT.clearR_W; inline;
  40356. begin
  40357. pTDefRegMap(@Self)^.clr := $00000004;
  40358. end;
  40359. procedure TI2C2_I2C2STAT.setR_W(thebits : TBits_1); inline;
  40360. begin
  40361. if thebits = 0 then
  40362. pTDefRegMap(@Self)^.clr := $00000004
  40363. else
  40364. pTDefRegMap(@Self)^.&set := $00000004;
  40365. end;
  40366. function TI2C2_I2C2STAT.getR_W : TBits_1; inline;
  40367. begin
  40368. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  40369. end;
  40370. procedure TI2C2_I2C2STAT.setS; inline;
  40371. begin
  40372. pTDefRegMap(@Self)^.&set := $00000008;
  40373. end;
  40374. procedure TI2C2_I2C2STAT.clearS; inline;
  40375. begin
  40376. pTDefRegMap(@Self)^.clr := $00000008;
  40377. end;
  40378. procedure TI2C2_I2C2STAT.setS(thebits : TBits_1); inline;
  40379. begin
  40380. if thebits = 0 then
  40381. pTDefRegMap(@Self)^.clr := $00000008
  40382. else
  40383. pTDefRegMap(@Self)^.&set := $00000008;
  40384. end;
  40385. function TI2C2_I2C2STAT.getS : TBits_1; inline;
  40386. begin
  40387. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40388. end;
  40389. procedure TI2C2_I2C2STAT.setP; inline;
  40390. begin
  40391. pTDefRegMap(@Self)^.&set := $00000010;
  40392. end;
  40393. procedure TI2C2_I2C2STAT.clearP; inline;
  40394. begin
  40395. pTDefRegMap(@Self)^.clr := $00000010;
  40396. end;
  40397. procedure TI2C2_I2C2STAT.setP(thebits : TBits_1); inline;
  40398. begin
  40399. if thebits = 0 then
  40400. pTDefRegMap(@Self)^.clr := $00000010
  40401. else
  40402. pTDefRegMap(@Self)^.&set := $00000010;
  40403. end;
  40404. function TI2C2_I2C2STAT.getP : TBits_1; inline;
  40405. begin
  40406. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  40407. end;
  40408. procedure TI2C2_I2C2STAT.setD_A; inline;
  40409. begin
  40410. pTDefRegMap(@Self)^.&set := $00000020;
  40411. end;
  40412. procedure TI2C2_I2C2STAT.clearD_A; inline;
  40413. begin
  40414. pTDefRegMap(@Self)^.clr := $00000020;
  40415. end;
  40416. procedure TI2C2_I2C2STAT.setD_A(thebits : TBits_1); inline;
  40417. begin
  40418. if thebits = 0 then
  40419. pTDefRegMap(@Self)^.clr := $00000020
  40420. else
  40421. pTDefRegMap(@Self)^.&set := $00000020;
  40422. end;
  40423. function TI2C2_I2C2STAT.getD_A : TBits_1; inline;
  40424. begin
  40425. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40426. end;
  40427. procedure TI2C2_I2C2STAT.setI2COV; inline;
  40428. begin
  40429. pTDefRegMap(@Self)^.&set := $00000040;
  40430. end;
  40431. procedure TI2C2_I2C2STAT.clearI2COV; inline;
  40432. begin
  40433. pTDefRegMap(@Self)^.clr := $00000040;
  40434. end;
  40435. procedure TI2C2_I2C2STAT.setI2COV(thebits : TBits_1); inline;
  40436. begin
  40437. if thebits = 0 then
  40438. pTDefRegMap(@Self)^.clr := $00000040
  40439. else
  40440. pTDefRegMap(@Self)^.&set := $00000040;
  40441. end;
  40442. function TI2C2_I2C2STAT.getI2COV : TBits_1; inline;
  40443. begin
  40444. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40445. end;
  40446. procedure TI2C2_I2C2STAT.setIWCOL; inline;
  40447. begin
  40448. pTDefRegMap(@Self)^.&set := $00000080;
  40449. end;
  40450. procedure TI2C2_I2C2STAT.clearIWCOL; inline;
  40451. begin
  40452. pTDefRegMap(@Self)^.clr := $00000080;
  40453. end;
  40454. procedure TI2C2_I2C2STAT.setIWCOL(thebits : TBits_1); inline;
  40455. begin
  40456. if thebits = 0 then
  40457. pTDefRegMap(@Self)^.clr := $00000080
  40458. else
  40459. pTDefRegMap(@Self)^.&set := $00000080;
  40460. end;
  40461. function TI2C2_I2C2STAT.getIWCOL : TBits_1; inline;
  40462. begin
  40463. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40464. end;
  40465. procedure TI2C2_I2C2STAT.setADD10; inline;
  40466. begin
  40467. pTDefRegMap(@Self)^.&set := $00000100;
  40468. end;
  40469. procedure TI2C2_I2C2STAT.clearADD10; inline;
  40470. begin
  40471. pTDefRegMap(@Self)^.clr := $00000100;
  40472. end;
  40473. procedure TI2C2_I2C2STAT.setADD10(thebits : TBits_1); inline;
  40474. begin
  40475. if thebits = 0 then
  40476. pTDefRegMap(@Self)^.clr := $00000100
  40477. else
  40478. pTDefRegMap(@Self)^.&set := $00000100;
  40479. end;
  40480. function TI2C2_I2C2STAT.getADD10 : TBits_1; inline;
  40481. begin
  40482. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40483. end;
  40484. procedure TI2C2_I2C2STAT.setGCSTAT; inline;
  40485. begin
  40486. pTDefRegMap(@Self)^.&set := $00000200;
  40487. end;
  40488. procedure TI2C2_I2C2STAT.clearGCSTAT; inline;
  40489. begin
  40490. pTDefRegMap(@Self)^.clr := $00000200;
  40491. end;
  40492. procedure TI2C2_I2C2STAT.setGCSTAT(thebits : TBits_1); inline;
  40493. begin
  40494. if thebits = 0 then
  40495. pTDefRegMap(@Self)^.clr := $00000200
  40496. else
  40497. pTDefRegMap(@Self)^.&set := $00000200;
  40498. end;
  40499. function TI2C2_I2C2STAT.getGCSTAT : TBits_1; inline;
  40500. begin
  40501. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40502. end;
  40503. procedure TI2C2_I2C2STAT.setBCL; inline;
  40504. begin
  40505. pTDefRegMap(@Self)^.&set := $00000400;
  40506. end;
  40507. procedure TI2C2_I2C2STAT.clearBCL; inline;
  40508. begin
  40509. pTDefRegMap(@Self)^.clr := $00000400;
  40510. end;
  40511. procedure TI2C2_I2C2STAT.setBCL(thebits : TBits_1); inline;
  40512. begin
  40513. if thebits = 0 then
  40514. pTDefRegMap(@Self)^.clr := $00000400
  40515. else
  40516. pTDefRegMap(@Self)^.&set := $00000400;
  40517. end;
  40518. function TI2C2_I2C2STAT.getBCL : TBits_1; inline;
  40519. begin
  40520. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40521. end;
  40522. procedure TI2C2_I2C2STAT.setTRSTAT; inline;
  40523. begin
  40524. pTDefRegMap(@Self)^.&set := $00004000;
  40525. end;
  40526. procedure TI2C2_I2C2STAT.clearTRSTAT; inline;
  40527. begin
  40528. pTDefRegMap(@Self)^.clr := $00004000;
  40529. end;
  40530. procedure TI2C2_I2C2STAT.setTRSTAT(thebits : TBits_1); inline;
  40531. begin
  40532. if thebits = 0 then
  40533. pTDefRegMap(@Self)^.clr := $00004000
  40534. else
  40535. pTDefRegMap(@Self)^.&set := $00004000;
  40536. end;
  40537. function TI2C2_I2C2STAT.getTRSTAT : TBits_1; inline;
  40538. begin
  40539. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  40540. end;
  40541. procedure TI2C2_I2C2STAT.setACKSTAT; inline;
  40542. begin
  40543. pTDefRegMap(@Self)^.&set := $00008000;
  40544. end;
  40545. procedure TI2C2_I2C2STAT.clearACKSTAT; inline;
  40546. begin
  40547. pTDefRegMap(@Self)^.clr := $00008000;
  40548. end;
  40549. procedure TI2C2_I2C2STAT.setACKSTAT(thebits : TBits_1); inline;
  40550. begin
  40551. if thebits = 0 then
  40552. pTDefRegMap(@Self)^.clr := $00008000
  40553. else
  40554. pTDefRegMap(@Self)^.&set := $00008000;
  40555. end;
  40556. function TI2C2_I2C2STAT.getACKSTAT : TBits_1; inline;
  40557. begin
  40558. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40559. end;
  40560. procedure TI2C2_I2C2STAT.setI2CPOV; inline;
  40561. begin
  40562. pTDefRegMap(@Self)^.&set := $00000040;
  40563. end;
  40564. procedure TI2C2_I2C2STAT.clearI2CPOV; inline;
  40565. begin
  40566. pTDefRegMap(@Self)^.clr := $00000040;
  40567. end;
  40568. procedure TI2C2_I2C2STAT.setI2CPOV(thebits : TBits_1); inline;
  40569. begin
  40570. if thebits = 0 then
  40571. pTDefRegMap(@Self)^.clr := $00000040
  40572. else
  40573. pTDefRegMap(@Self)^.&set := $00000040;
  40574. end;
  40575. function TI2C2_I2C2STAT.getI2CPOV : TBits_1; inline;
  40576. begin
  40577. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40578. end;
  40579. procedure TI2C2_I2C2STAT.setw(thebits : TBits_32); inline;
  40580. begin
  40581. pTDefRegMap(@Self)^.val := thebits;
  40582. end;
  40583. function TI2C2_I2C2STAT.getw : TBits_32; inline;
  40584. begin
  40585. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40586. end;
  40587. procedure TSPI3_SPI1ACON.setSRXISEL(thebits : TBits_2); inline;
  40588. begin
  40589. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  40590. end;
  40591. function TSPI3_SPI1ACON.getSRXISEL : TBits_2; inline;
  40592. begin
  40593. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  40594. end;
  40595. procedure TSPI3_SPI1ACON.setSTXISEL(thebits : TBits_2); inline;
  40596. begin
  40597. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  40598. end;
  40599. function TSPI3_SPI1ACON.getSTXISEL : TBits_2; inline;
  40600. begin
  40601. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  40602. end;
  40603. procedure TSPI3_SPI1ACON.setMSTEN; inline;
  40604. begin
  40605. pTDefRegMap(@Self)^.&set := $00000020;
  40606. end;
  40607. procedure TSPI3_SPI1ACON.clearMSTEN; inline;
  40608. begin
  40609. pTDefRegMap(@Self)^.clr := $00000020;
  40610. end;
  40611. procedure TSPI3_SPI1ACON.setMSTEN(thebits : TBits_1); inline;
  40612. begin
  40613. if thebits = 0 then
  40614. pTDefRegMap(@Self)^.clr := $00000020
  40615. else
  40616. pTDefRegMap(@Self)^.&set := $00000020;
  40617. end;
  40618. function TSPI3_SPI1ACON.getMSTEN : TBits_1; inline;
  40619. begin
  40620. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40621. end;
  40622. procedure TSPI3_SPI1ACON.setCKP; inline;
  40623. begin
  40624. pTDefRegMap(@Self)^.&set := $00000040;
  40625. end;
  40626. procedure TSPI3_SPI1ACON.clearCKP; inline;
  40627. begin
  40628. pTDefRegMap(@Self)^.clr := $00000040;
  40629. end;
  40630. procedure TSPI3_SPI1ACON.setCKP(thebits : TBits_1); inline;
  40631. begin
  40632. if thebits = 0 then
  40633. pTDefRegMap(@Self)^.clr := $00000040
  40634. else
  40635. pTDefRegMap(@Self)^.&set := $00000040;
  40636. end;
  40637. function TSPI3_SPI1ACON.getCKP : TBits_1; inline;
  40638. begin
  40639. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40640. end;
  40641. procedure TSPI3_SPI1ACON.setSSEN; inline;
  40642. begin
  40643. pTDefRegMap(@Self)^.&set := $00000080;
  40644. end;
  40645. procedure TSPI3_SPI1ACON.clearSSEN; inline;
  40646. begin
  40647. pTDefRegMap(@Self)^.clr := $00000080;
  40648. end;
  40649. procedure TSPI3_SPI1ACON.setSSEN(thebits : TBits_1); inline;
  40650. begin
  40651. if thebits = 0 then
  40652. pTDefRegMap(@Self)^.clr := $00000080
  40653. else
  40654. pTDefRegMap(@Self)^.&set := $00000080;
  40655. end;
  40656. function TSPI3_SPI1ACON.getSSEN : TBits_1; inline;
  40657. begin
  40658. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40659. end;
  40660. procedure TSPI3_SPI1ACON.setCKE; inline;
  40661. begin
  40662. pTDefRegMap(@Self)^.&set := $00000100;
  40663. end;
  40664. procedure TSPI3_SPI1ACON.clearCKE; inline;
  40665. begin
  40666. pTDefRegMap(@Self)^.clr := $00000100;
  40667. end;
  40668. procedure TSPI3_SPI1ACON.setCKE(thebits : TBits_1); inline;
  40669. begin
  40670. if thebits = 0 then
  40671. pTDefRegMap(@Self)^.clr := $00000100
  40672. else
  40673. pTDefRegMap(@Self)^.&set := $00000100;
  40674. end;
  40675. function TSPI3_SPI1ACON.getCKE : TBits_1; inline;
  40676. begin
  40677. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40678. end;
  40679. procedure TSPI3_SPI1ACON.setSMP; inline;
  40680. begin
  40681. pTDefRegMap(@Self)^.&set := $00000200;
  40682. end;
  40683. procedure TSPI3_SPI1ACON.clearSMP; inline;
  40684. begin
  40685. pTDefRegMap(@Self)^.clr := $00000200;
  40686. end;
  40687. procedure TSPI3_SPI1ACON.setSMP(thebits : TBits_1); inline;
  40688. begin
  40689. if thebits = 0 then
  40690. pTDefRegMap(@Self)^.clr := $00000200
  40691. else
  40692. pTDefRegMap(@Self)^.&set := $00000200;
  40693. end;
  40694. function TSPI3_SPI1ACON.getSMP : TBits_1; inline;
  40695. begin
  40696. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40697. end;
  40698. procedure TSPI3_SPI1ACON.setMODE16; inline;
  40699. begin
  40700. pTDefRegMap(@Self)^.&set := $00000400;
  40701. end;
  40702. procedure TSPI3_SPI1ACON.clearMODE16; inline;
  40703. begin
  40704. pTDefRegMap(@Self)^.clr := $00000400;
  40705. end;
  40706. procedure TSPI3_SPI1ACON.setMODE16(thebits : TBits_1); inline;
  40707. begin
  40708. if thebits = 0 then
  40709. pTDefRegMap(@Self)^.clr := $00000400
  40710. else
  40711. pTDefRegMap(@Self)^.&set := $00000400;
  40712. end;
  40713. function TSPI3_SPI1ACON.getMODE16 : TBits_1; inline;
  40714. begin
  40715. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40716. end;
  40717. procedure TSPI3_SPI1ACON.setMODE32; inline;
  40718. begin
  40719. pTDefRegMap(@Self)^.&set := $00000800;
  40720. end;
  40721. procedure TSPI3_SPI1ACON.clearMODE32; inline;
  40722. begin
  40723. pTDefRegMap(@Self)^.clr := $00000800;
  40724. end;
  40725. procedure TSPI3_SPI1ACON.setMODE32(thebits : TBits_1); inline;
  40726. begin
  40727. if thebits = 0 then
  40728. pTDefRegMap(@Self)^.clr := $00000800
  40729. else
  40730. pTDefRegMap(@Self)^.&set := $00000800;
  40731. end;
  40732. function TSPI3_SPI1ACON.getMODE32 : TBits_1; inline;
  40733. begin
  40734. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40735. end;
  40736. procedure TSPI3_SPI1ACON.setDISSDO; inline;
  40737. begin
  40738. pTDefRegMap(@Self)^.&set := $00001000;
  40739. end;
  40740. procedure TSPI3_SPI1ACON.clearDISSDO; inline;
  40741. begin
  40742. pTDefRegMap(@Self)^.clr := $00001000;
  40743. end;
  40744. procedure TSPI3_SPI1ACON.setDISSDO(thebits : TBits_1); inline;
  40745. begin
  40746. if thebits = 0 then
  40747. pTDefRegMap(@Self)^.clr := $00001000
  40748. else
  40749. pTDefRegMap(@Self)^.&set := $00001000;
  40750. end;
  40751. function TSPI3_SPI1ACON.getDISSDO : TBits_1; inline;
  40752. begin
  40753. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40754. end;
  40755. procedure TSPI3_SPI1ACON.setSIDL; inline;
  40756. begin
  40757. pTDefRegMap(@Self)^.&set := $00002000;
  40758. end;
  40759. procedure TSPI3_SPI1ACON.clearSIDL; inline;
  40760. begin
  40761. pTDefRegMap(@Self)^.clr := $00002000;
  40762. end;
  40763. procedure TSPI3_SPI1ACON.setSIDL(thebits : TBits_1); inline;
  40764. begin
  40765. if thebits = 0 then
  40766. pTDefRegMap(@Self)^.clr := $00002000
  40767. else
  40768. pTDefRegMap(@Self)^.&set := $00002000;
  40769. end;
  40770. function TSPI3_SPI1ACON.getSIDL : TBits_1; inline;
  40771. begin
  40772. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40773. end;
  40774. procedure TSPI3_SPI1ACON.setON; inline;
  40775. begin
  40776. pTDefRegMap(@Self)^.&set := $00008000;
  40777. end;
  40778. procedure TSPI3_SPI1ACON.clearON; inline;
  40779. begin
  40780. pTDefRegMap(@Self)^.clr := $00008000;
  40781. end;
  40782. procedure TSPI3_SPI1ACON.setON(thebits : TBits_1); inline;
  40783. begin
  40784. if thebits = 0 then
  40785. pTDefRegMap(@Self)^.clr := $00008000
  40786. else
  40787. pTDefRegMap(@Self)^.&set := $00008000;
  40788. end;
  40789. function TSPI3_SPI1ACON.getON : TBits_1; inline;
  40790. begin
  40791. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40792. end;
  40793. procedure TSPI3_SPI1ACON.setENHBUF; inline;
  40794. begin
  40795. pTDefRegMap(@Self)^.&set := $00010000;
  40796. end;
  40797. procedure TSPI3_SPI1ACON.clearENHBUF; inline;
  40798. begin
  40799. pTDefRegMap(@Self)^.clr := $00010000;
  40800. end;
  40801. procedure TSPI3_SPI1ACON.setENHBUF(thebits : TBits_1); inline;
  40802. begin
  40803. if thebits = 0 then
  40804. pTDefRegMap(@Self)^.clr := $00010000
  40805. else
  40806. pTDefRegMap(@Self)^.&set := $00010000;
  40807. end;
  40808. function TSPI3_SPI1ACON.getENHBUF : TBits_1; inline;
  40809. begin
  40810. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  40811. end;
  40812. procedure TSPI3_SPI1ACON.setSPIFE; inline;
  40813. begin
  40814. pTDefRegMap(@Self)^.&set := $00020000;
  40815. end;
  40816. procedure TSPI3_SPI1ACON.clearSPIFE; inline;
  40817. begin
  40818. pTDefRegMap(@Self)^.clr := $00020000;
  40819. end;
  40820. procedure TSPI3_SPI1ACON.setSPIFE(thebits : TBits_1); inline;
  40821. begin
  40822. if thebits = 0 then
  40823. pTDefRegMap(@Self)^.clr := $00020000
  40824. else
  40825. pTDefRegMap(@Self)^.&set := $00020000;
  40826. end;
  40827. function TSPI3_SPI1ACON.getSPIFE : TBits_1; inline;
  40828. begin
  40829. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  40830. end;
  40831. procedure TSPI3_SPI1ACON.setFRMCNT(thebits : TBits_3); inline;
  40832. begin
  40833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  40834. end;
  40835. function TSPI3_SPI1ACON.getFRMCNT : TBits_3; inline;
  40836. begin
  40837. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  40838. end;
  40839. procedure TSPI3_SPI1ACON.setFRMSYPW; inline;
  40840. begin
  40841. pTDefRegMap(@Self)^.&set := $08000000;
  40842. end;
  40843. procedure TSPI3_SPI1ACON.clearFRMSYPW; inline;
  40844. begin
  40845. pTDefRegMap(@Self)^.clr := $08000000;
  40846. end;
  40847. procedure TSPI3_SPI1ACON.setFRMSYPW(thebits : TBits_1); inline;
  40848. begin
  40849. if thebits = 0 then
  40850. pTDefRegMap(@Self)^.clr := $08000000
  40851. else
  40852. pTDefRegMap(@Self)^.&set := $08000000;
  40853. end;
  40854. function TSPI3_SPI1ACON.getFRMSYPW : TBits_1; inline;
  40855. begin
  40856. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  40857. end;
  40858. procedure TSPI3_SPI1ACON.setMSSEN; inline;
  40859. begin
  40860. pTDefRegMap(@Self)^.&set := $10000000;
  40861. end;
  40862. procedure TSPI3_SPI1ACON.clearMSSEN; inline;
  40863. begin
  40864. pTDefRegMap(@Self)^.clr := $10000000;
  40865. end;
  40866. procedure TSPI3_SPI1ACON.setMSSEN(thebits : TBits_1); inline;
  40867. begin
  40868. if thebits = 0 then
  40869. pTDefRegMap(@Self)^.clr := $10000000
  40870. else
  40871. pTDefRegMap(@Self)^.&set := $10000000;
  40872. end;
  40873. function TSPI3_SPI1ACON.getMSSEN : TBits_1; inline;
  40874. begin
  40875. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  40876. end;
  40877. procedure TSPI3_SPI1ACON.setFRMPOL; inline;
  40878. begin
  40879. pTDefRegMap(@Self)^.&set := $20000000;
  40880. end;
  40881. procedure TSPI3_SPI1ACON.clearFRMPOL; inline;
  40882. begin
  40883. pTDefRegMap(@Self)^.clr := $20000000;
  40884. end;
  40885. procedure TSPI3_SPI1ACON.setFRMPOL(thebits : TBits_1); inline;
  40886. begin
  40887. if thebits = 0 then
  40888. pTDefRegMap(@Self)^.clr := $20000000
  40889. else
  40890. pTDefRegMap(@Self)^.&set := $20000000;
  40891. end;
  40892. function TSPI3_SPI1ACON.getFRMPOL : TBits_1; inline;
  40893. begin
  40894. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  40895. end;
  40896. procedure TSPI3_SPI1ACON.setFRMSYNC; inline;
  40897. begin
  40898. pTDefRegMap(@Self)^.&set := $40000000;
  40899. end;
  40900. procedure TSPI3_SPI1ACON.clearFRMSYNC; inline;
  40901. begin
  40902. pTDefRegMap(@Self)^.clr := $40000000;
  40903. end;
  40904. procedure TSPI3_SPI1ACON.setFRMSYNC(thebits : TBits_1); inline;
  40905. begin
  40906. if thebits = 0 then
  40907. pTDefRegMap(@Self)^.clr := $40000000
  40908. else
  40909. pTDefRegMap(@Self)^.&set := $40000000;
  40910. end;
  40911. function TSPI3_SPI1ACON.getFRMSYNC : TBits_1; inline;
  40912. begin
  40913. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  40914. end;
  40915. procedure TSPI3_SPI1ACON.setFRMEN; inline;
  40916. begin
  40917. pTDefRegMap(@Self)^.&set := $80000000;
  40918. end;
  40919. procedure TSPI3_SPI1ACON.clearFRMEN; inline;
  40920. begin
  40921. pTDefRegMap(@Self)^.clr := $80000000;
  40922. end;
  40923. procedure TSPI3_SPI1ACON.setFRMEN(thebits : TBits_1); inline;
  40924. begin
  40925. if thebits = 0 then
  40926. pTDefRegMap(@Self)^.clr := $80000000
  40927. else
  40928. pTDefRegMap(@Self)^.&set := $80000000;
  40929. end;
  40930. function TSPI3_SPI1ACON.getFRMEN : TBits_1; inline;
  40931. begin
  40932. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  40933. end;
  40934. procedure TSPI3_SPI1ACON.setw(thebits : TBits_32); inline;
  40935. begin
  40936. pTDefRegMap(@Self)^.val := thebits;
  40937. end;
  40938. function TSPI3_SPI1ACON.getw : TBits_32; inline;
  40939. begin
  40940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40941. end;
  40942. procedure TSPI3_SPI3CON.setSRXISEL(thebits : TBits_2); inline;
  40943. begin
  40944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  40945. end;
  40946. function TSPI3_SPI3CON.getSRXISEL : TBits_2; inline;
  40947. begin
  40948. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  40949. end;
  40950. procedure TSPI3_SPI3CON.setSTXISEL(thebits : TBits_2); inline;
  40951. begin
  40952. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  40953. end;
  40954. function TSPI3_SPI3CON.getSTXISEL : TBits_2; inline;
  40955. begin
  40956. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  40957. end;
  40958. procedure TSPI3_SPI3CON.setMSTEN; inline;
  40959. begin
  40960. pTDefRegMap(@Self)^.&set := $00000020;
  40961. end;
  40962. procedure TSPI3_SPI3CON.clearMSTEN; inline;
  40963. begin
  40964. pTDefRegMap(@Self)^.clr := $00000020;
  40965. end;
  40966. procedure TSPI3_SPI3CON.setMSTEN(thebits : TBits_1); inline;
  40967. begin
  40968. if thebits = 0 then
  40969. pTDefRegMap(@Self)^.clr := $00000020
  40970. else
  40971. pTDefRegMap(@Self)^.&set := $00000020;
  40972. end;
  40973. function TSPI3_SPI3CON.getMSTEN : TBits_1; inline;
  40974. begin
  40975. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40976. end;
  40977. procedure TSPI3_SPI3CON.setCKP; inline;
  40978. begin
  40979. pTDefRegMap(@Self)^.&set := $00000040;
  40980. end;
  40981. procedure TSPI3_SPI3CON.clearCKP; inline;
  40982. begin
  40983. pTDefRegMap(@Self)^.clr := $00000040;
  40984. end;
  40985. procedure TSPI3_SPI3CON.setCKP(thebits : TBits_1); inline;
  40986. begin
  40987. if thebits = 0 then
  40988. pTDefRegMap(@Self)^.clr := $00000040
  40989. else
  40990. pTDefRegMap(@Self)^.&set := $00000040;
  40991. end;
  40992. function TSPI3_SPI3CON.getCKP : TBits_1; inline;
  40993. begin
  40994. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40995. end;
  40996. procedure TSPI3_SPI3CON.setSSEN; inline;
  40997. begin
  40998. pTDefRegMap(@Self)^.&set := $00000080;
  40999. end;
  41000. procedure TSPI3_SPI3CON.clearSSEN; inline;
  41001. begin
  41002. pTDefRegMap(@Self)^.clr := $00000080;
  41003. end;
  41004. procedure TSPI3_SPI3CON.setSSEN(thebits : TBits_1); inline;
  41005. begin
  41006. if thebits = 0 then
  41007. pTDefRegMap(@Self)^.clr := $00000080
  41008. else
  41009. pTDefRegMap(@Self)^.&set := $00000080;
  41010. end;
  41011. function TSPI3_SPI3CON.getSSEN : TBits_1; inline;
  41012. begin
  41013. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41014. end;
  41015. procedure TSPI3_SPI3CON.setCKE; inline;
  41016. begin
  41017. pTDefRegMap(@Self)^.&set := $00000100;
  41018. end;
  41019. procedure TSPI3_SPI3CON.clearCKE; inline;
  41020. begin
  41021. pTDefRegMap(@Self)^.clr := $00000100;
  41022. end;
  41023. procedure TSPI3_SPI3CON.setCKE(thebits : TBits_1); inline;
  41024. begin
  41025. if thebits = 0 then
  41026. pTDefRegMap(@Self)^.clr := $00000100
  41027. else
  41028. pTDefRegMap(@Self)^.&set := $00000100;
  41029. end;
  41030. function TSPI3_SPI3CON.getCKE : TBits_1; inline;
  41031. begin
  41032. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41033. end;
  41034. procedure TSPI3_SPI3CON.setSMP; inline;
  41035. begin
  41036. pTDefRegMap(@Self)^.&set := $00000200;
  41037. end;
  41038. procedure TSPI3_SPI3CON.clearSMP; inline;
  41039. begin
  41040. pTDefRegMap(@Self)^.clr := $00000200;
  41041. end;
  41042. procedure TSPI3_SPI3CON.setSMP(thebits : TBits_1); inline;
  41043. begin
  41044. if thebits = 0 then
  41045. pTDefRegMap(@Self)^.clr := $00000200
  41046. else
  41047. pTDefRegMap(@Self)^.&set := $00000200;
  41048. end;
  41049. function TSPI3_SPI3CON.getSMP : TBits_1; inline;
  41050. begin
  41051. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41052. end;
  41053. procedure TSPI3_SPI3CON.setMODE16; inline;
  41054. begin
  41055. pTDefRegMap(@Self)^.&set := $00000400;
  41056. end;
  41057. procedure TSPI3_SPI3CON.clearMODE16; inline;
  41058. begin
  41059. pTDefRegMap(@Self)^.clr := $00000400;
  41060. end;
  41061. procedure TSPI3_SPI3CON.setMODE16(thebits : TBits_1); inline;
  41062. begin
  41063. if thebits = 0 then
  41064. pTDefRegMap(@Self)^.clr := $00000400
  41065. else
  41066. pTDefRegMap(@Self)^.&set := $00000400;
  41067. end;
  41068. function TSPI3_SPI3CON.getMODE16 : TBits_1; inline;
  41069. begin
  41070. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41071. end;
  41072. procedure TSPI3_SPI3CON.setMODE32; inline;
  41073. begin
  41074. pTDefRegMap(@Self)^.&set := $00000800;
  41075. end;
  41076. procedure TSPI3_SPI3CON.clearMODE32; inline;
  41077. begin
  41078. pTDefRegMap(@Self)^.clr := $00000800;
  41079. end;
  41080. procedure TSPI3_SPI3CON.setMODE32(thebits : TBits_1); inline;
  41081. begin
  41082. if thebits = 0 then
  41083. pTDefRegMap(@Self)^.clr := $00000800
  41084. else
  41085. pTDefRegMap(@Self)^.&set := $00000800;
  41086. end;
  41087. function TSPI3_SPI3CON.getMODE32 : TBits_1; inline;
  41088. begin
  41089. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41090. end;
  41091. procedure TSPI3_SPI3CON.setDISSDO; inline;
  41092. begin
  41093. pTDefRegMap(@Self)^.&set := $00001000;
  41094. end;
  41095. procedure TSPI3_SPI3CON.clearDISSDO; inline;
  41096. begin
  41097. pTDefRegMap(@Self)^.clr := $00001000;
  41098. end;
  41099. procedure TSPI3_SPI3CON.setDISSDO(thebits : TBits_1); inline;
  41100. begin
  41101. if thebits = 0 then
  41102. pTDefRegMap(@Self)^.clr := $00001000
  41103. else
  41104. pTDefRegMap(@Self)^.&set := $00001000;
  41105. end;
  41106. function TSPI3_SPI3CON.getDISSDO : TBits_1; inline;
  41107. begin
  41108. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41109. end;
  41110. procedure TSPI3_SPI3CON.setSIDL; inline;
  41111. begin
  41112. pTDefRegMap(@Self)^.&set := $00002000;
  41113. end;
  41114. procedure TSPI3_SPI3CON.clearSIDL; inline;
  41115. begin
  41116. pTDefRegMap(@Self)^.clr := $00002000;
  41117. end;
  41118. procedure TSPI3_SPI3CON.setSIDL(thebits : TBits_1); inline;
  41119. begin
  41120. if thebits = 0 then
  41121. pTDefRegMap(@Self)^.clr := $00002000
  41122. else
  41123. pTDefRegMap(@Self)^.&set := $00002000;
  41124. end;
  41125. function TSPI3_SPI3CON.getSIDL : TBits_1; inline;
  41126. begin
  41127. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41128. end;
  41129. procedure TSPI3_SPI3CON.setON; inline;
  41130. begin
  41131. pTDefRegMap(@Self)^.&set := $00008000;
  41132. end;
  41133. procedure TSPI3_SPI3CON.clearON; inline;
  41134. begin
  41135. pTDefRegMap(@Self)^.clr := $00008000;
  41136. end;
  41137. procedure TSPI3_SPI3CON.setON(thebits : TBits_1); inline;
  41138. begin
  41139. if thebits = 0 then
  41140. pTDefRegMap(@Self)^.clr := $00008000
  41141. else
  41142. pTDefRegMap(@Self)^.&set := $00008000;
  41143. end;
  41144. function TSPI3_SPI3CON.getON : TBits_1; inline;
  41145. begin
  41146. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41147. end;
  41148. procedure TSPI3_SPI3CON.setENHBUF; inline;
  41149. begin
  41150. pTDefRegMap(@Self)^.&set := $00010000;
  41151. end;
  41152. procedure TSPI3_SPI3CON.clearENHBUF; inline;
  41153. begin
  41154. pTDefRegMap(@Self)^.clr := $00010000;
  41155. end;
  41156. procedure TSPI3_SPI3CON.setENHBUF(thebits : TBits_1); inline;
  41157. begin
  41158. if thebits = 0 then
  41159. pTDefRegMap(@Self)^.clr := $00010000
  41160. else
  41161. pTDefRegMap(@Self)^.&set := $00010000;
  41162. end;
  41163. function TSPI3_SPI3CON.getENHBUF : TBits_1; inline;
  41164. begin
  41165. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  41166. end;
  41167. procedure TSPI3_SPI3CON.setSPIFE; inline;
  41168. begin
  41169. pTDefRegMap(@Self)^.&set := $00020000;
  41170. end;
  41171. procedure TSPI3_SPI3CON.clearSPIFE; inline;
  41172. begin
  41173. pTDefRegMap(@Self)^.clr := $00020000;
  41174. end;
  41175. procedure TSPI3_SPI3CON.setSPIFE(thebits : TBits_1); inline;
  41176. begin
  41177. if thebits = 0 then
  41178. pTDefRegMap(@Self)^.clr := $00020000
  41179. else
  41180. pTDefRegMap(@Self)^.&set := $00020000;
  41181. end;
  41182. function TSPI3_SPI3CON.getSPIFE : TBits_1; inline;
  41183. begin
  41184. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  41185. end;
  41186. procedure TSPI3_SPI3CON.setFRMCNT(thebits : TBits_3); inline;
  41187. begin
  41188. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  41189. end;
  41190. function TSPI3_SPI3CON.getFRMCNT : TBits_3; inline;
  41191. begin
  41192. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  41193. end;
  41194. procedure TSPI3_SPI3CON.setFRMSYPW; inline;
  41195. begin
  41196. pTDefRegMap(@Self)^.&set := $08000000;
  41197. end;
  41198. procedure TSPI3_SPI3CON.clearFRMSYPW; inline;
  41199. begin
  41200. pTDefRegMap(@Self)^.clr := $08000000;
  41201. end;
  41202. procedure TSPI3_SPI3CON.setFRMSYPW(thebits : TBits_1); inline;
  41203. begin
  41204. if thebits = 0 then
  41205. pTDefRegMap(@Self)^.clr := $08000000
  41206. else
  41207. pTDefRegMap(@Self)^.&set := $08000000;
  41208. end;
  41209. function TSPI3_SPI3CON.getFRMSYPW : TBits_1; inline;
  41210. begin
  41211. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  41212. end;
  41213. procedure TSPI3_SPI3CON.setMSSEN; inline;
  41214. begin
  41215. pTDefRegMap(@Self)^.&set := $10000000;
  41216. end;
  41217. procedure TSPI3_SPI3CON.clearMSSEN; inline;
  41218. begin
  41219. pTDefRegMap(@Self)^.clr := $10000000;
  41220. end;
  41221. procedure TSPI3_SPI3CON.setMSSEN(thebits : TBits_1); inline;
  41222. begin
  41223. if thebits = 0 then
  41224. pTDefRegMap(@Self)^.clr := $10000000
  41225. else
  41226. pTDefRegMap(@Self)^.&set := $10000000;
  41227. end;
  41228. function TSPI3_SPI3CON.getMSSEN : TBits_1; inline;
  41229. begin
  41230. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  41231. end;
  41232. procedure TSPI3_SPI3CON.setFRMPOL; inline;
  41233. begin
  41234. pTDefRegMap(@Self)^.&set := $20000000;
  41235. end;
  41236. procedure TSPI3_SPI3CON.clearFRMPOL; inline;
  41237. begin
  41238. pTDefRegMap(@Self)^.clr := $20000000;
  41239. end;
  41240. procedure TSPI3_SPI3CON.setFRMPOL(thebits : TBits_1); inline;
  41241. begin
  41242. if thebits = 0 then
  41243. pTDefRegMap(@Self)^.clr := $20000000
  41244. else
  41245. pTDefRegMap(@Self)^.&set := $20000000;
  41246. end;
  41247. function TSPI3_SPI3CON.getFRMPOL : TBits_1; inline;
  41248. begin
  41249. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  41250. end;
  41251. procedure TSPI3_SPI3CON.setFRMSYNC; inline;
  41252. begin
  41253. pTDefRegMap(@Self)^.&set := $40000000;
  41254. end;
  41255. procedure TSPI3_SPI3CON.clearFRMSYNC; inline;
  41256. begin
  41257. pTDefRegMap(@Self)^.clr := $40000000;
  41258. end;
  41259. procedure TSPI3_SPI3CON.setFRMSYNC(thebits : TBits_1); inline;
  41260. begin
  41261. if thebits = 0 then
  41262. pTDefRegMap(@Self)^.clr := $40000000
  41263. else
  41264. pTDefRegMap(@Self)^.&set := $40000000;
  41265. end;
  41266. function TSPI3_SPI3CON.getFRMSYNC : TBits_1; inline;
  41267. begin
  41268. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  41269. end;
  41270. procedure TSPI3_SPI3CON.setFRMEN; inline;
  41271. begin
  41272. pTDefRegMap(@Self)^.&set := $80000000;
  41273. end;
  41274. procedure TSPI3_SPI3CON.clearFRMEN; inline;
  41275. begin
  41276. pTDefRegMap(@Self)^.clr := $80000000;
  41277. end;
  41278. procedure TSPI3_SPI3CON.setFRMEN(thebits : TBits_1); inline;
  41279. begin
  41280. if thebits = 0 then
  41281. pTDefRegMap(@Self)^.clr := $80000000
  41282. else
  41283. pTDefRegMap(@Self)^.&set := $80000000;
  41284. end;
  41285. function TSPI3_SPI3CON.getFRMEN : TBits_1; inline;
  41286. begin
  41287. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  41288. end;
  41289. procedure TSPI3_SPI3CON.setw(thebits : TBits_32); inline;
  41290. begin
  41291. pTDefRegMap(@Self)^.val := thebits;
  41292. end;
  41293. function TSPI3_SPI3CON.getw : TBits_32; inline;
  41294. begin
  41295. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41296. end;
  41297. procedure TSPI3_SPI1ASTAT.setSPIRBF; inline;
  41298. begin
  41299. pTDefRegMap(@Self)^.&set := $00000001;
  41300. end;
  41301. procedure TSPI3_SPI1ASTAT.clearSPIRBF; inline;
  41302. begin
  41303. pTDefRegMap(@Self)^.clr := $00000001;
  41304. end;
  41305. procedure TSPI3_SPI1ASTAT.setSPIRBF(thebits : TBits_1); inline;
  41306. begin
  41307. if thebits = 0 then
  41308. pTDefRegMap(@Self)^.clr := $00000001
  41309. else
  41310. pTDefRegMap(@Self)^.&set := $00000001;
  41311. end;
  41312. function TSPI3_SPI1ASTAT.getSPIRBF : TBits_1; inline;
  41313. begin
  41314. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41315. end;
  41316. procedure TSPI3_SPI1ASTAT.setSPITBF; inline;
  41317. begin
  41318. pTDefRegMap(@Self)^.&set := $00000002;
  41319. end;
  41320. procedure TSPI3_SPI1ASTAT.clearSPITBF; inline;
  41321. begin
  41322. pTDefRegMap(@Self)^.clr := $00000002;
  41323. end;
  41324. procedure TSPI3_SPI1ASTAT.setSPITBF(thebits : TBits_1); inline;
  41325. begin
  41326. if thebits = 0 then
  41327. pTDefRegMap(@Self)^.clr := $00000002
  41328. else
  41329. pTDefRegMap(@Self)^.&set := $00000002;
  41330. end;
  41331. function TSPI3_SPI1ASTAT.getSPITBF : TBits_1; inline;
  41332. begin
  41333. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41334. end;
  41335. procedure TSPI3_SPI1ASTAT.setSPITBE; inline;
  41336. begin
  41337. pTDefRegMap(@Self)^.&set := $00000008;
  41338. end;
  41339. procedure TSPI3_SPI1ASTAT.clearSPITBE; inline;
  41340. begin
  41341. pTDefRegMap(@Self)^.clr := $00000008;
  41342. end;
  41343. procedure TSPI3_SPI1ASTAT.setSPITBE(thebits : TBits_1); inline;
  41344. begin
  41345. if thebits = 0 then
  41346. pTDefRegMap(@Self)^.clr := $00000008
  41347. else
  41348. pTDefRegMap(@Self)^.&set := $00000008;
  41349. end;
  41350. function TSPI3_SPI1ASTAT.getSPITBE : TBits_1; inline;
  41351. begin
  41352. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41353. end;
  41354. procedure TSPI3_SPI1ASTAT.setSPIRBE; inline;
  41355. begin
  41356. pTDefRegMap(@Self)^.&set := $00000020;
  41357. end;
  41358. procedure TSPI3_SPI1ASTAT.clearSPIRBE; inline;
  41359. begin
  41360. pTDefRegMap(@Self)^.clr := $00000020;
  41361. end;
  41362. procedure TSPI3_SPI1ASTAT.setSPIRBE(thebits : TBits_1); inline;
  41363. begin
  41364. if thebits = 0 then
  41365. pTDefRegMap(@Self)^.clr := $00000020
  41366. else
  41367. pTDefRegMap(@Self)^.&set := $00000020;
  41368. end;
  41369. function TSPI3_SPI1ASTAT.getSPIRBE : TBits_1; inline;
  41370. begin
  41371. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41372. end;
  41373. procedure TSPI3_SPI1ASTAT.setSPIROV; inline;
  41374. begin
  41375. pTDefRegMap(@Self)^.&set := $00000040;
  41376. end;
  41377. procedure TSPI3_SPI1ASTAT.clearSPIROV; inline;
  41378. begin
  41379. pTDefRegMap(@Self)^.clr := $00000040;
  41380. end;
  41381. procedure TSPI3_SPI1ASTAT.setSPIROV(thebits : TBits_1); inline;
  41382. begin
  41383. if thebits = 0 then
  41384. pTDefRegMap(@Self)^.clr := $00000040
  41385. else
  41386. pTDefRegMap(@Self)^.&set := $00000040;
  41387. end;
  41388. function TSPI3_SPI1ASTAT.getSPIROV : TBits_1; inline;
  41389. begin
  41390. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41391. end;
  41392. procedure TSPI3_SPI1ASTAT.setSRMT; inline;
  41393. begin
  41394. pTDefRegMap(@Self)^.&set := $00000080;
  41395. end;
  41396. procedure TSPI3_SPI1ASTAT.clearSRMT; inline;
  41397. begin
  41398. pTDefRegMap(@Self)^.clr := $00000080;
  41399. end;
  41400. procedure TSPI3_SPI1ASTAT.setSRMT(thebits : TBits_1); inline;
  41401. begin
  41402. if thebits = 0 then
  41403. pTDefRegMap(@Self)^.clr := $00000080
  41404. else
  41405. pTDefRegMap(@Self)^.&set := $00000080;
  41406. end;
  41407. function TSPI3_SPI1ASTAT.getSRMT : TBits_1; inline;
  41408. begin
  41409. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41410. end;
  41411. procedure TSPI3_SPI1ASTAT.setSPITUR; inline;
  41412. begin
  41413. pTDefRegMap(@Self)^.&set := $00000100;
  41414. end;
  41415. procedure TSPI3_SPI1ASTAT.clearSPITUR; inline;
  41416. begin
  41417. pTDefRegMap(@Self)^.clr := $00000100;
  41418. end;
  41419. procedure TSPI3_SPI1ASTAT.setSPITUR(thebits : TBits_1); inline;
  41420. begin
  41421. if thebits = 0 then
  41422. pTDefRegMap(@Self)^.clr := $00000100
  41423. else
  41424. pTDefRegMap(@Self)^.&set := $00000100;
  41425. end;
  41426. function TSPI3_SPI1ASTAT.getSPITUR : TBits_1; inline;
  41427. begin
  41428. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41429. end;
  41430. procedure TSPI3_SPI1ASTAT.setSPIBUSY; inline;
  41431. begin
  41432. pTDefRegMap(@Self)^.&set := $00000800;
  41433. end;
  41434. procedure TSPI3_SPI1ASTAT.clearSPIBUSY; inline;
  41435. begin
  41436. pTDefRegMap(@Self)^.clr := $00000800;
  41437. end;
  41438. procedure TSPI3_SPI1ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  41439. begin
  41440. if thebits = 0 then
  41441. pTDefRegMap(@Self)^.clr := $00000800
  41442. else
  41443. pTDefRegMap(@Self)^.&set := $00000800;
  41444. end;
  41445. function TSPI3_SPI1ASTAT.getSPIBUSY : TBits_1; inline;
  41446. begin
  41447. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41448. end;
  41449. procedure TSPI3_SPI1ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  41450. begin
  41451. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  41452. end;
  41453. function TSPI3_SPI1ASTAT.getTXBUFELM : TBits_5; inline;
  41454. begin
  41455. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  41456. end;
  41457. procedure TSPI3_SPI1ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  41458. begin
  41459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  41460. end;
  41461. function TSPI3_SPI1ASTAT.getRXBUFELM : TBits_5; inline;
  41462. begin
  41463. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  41464. end;
  41465. procedure TSPI3_SPI1ASTAT.setw(thebits : TBits_32); inline;
  41466. begin
  41467. pTDefRegMap(@Self)^.val := thebits;
  41468. end;
  41469. function TSPI3_SPI1ASTAT.getw : TBits_32; inline;
  41470. begin
  41471. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41472. end;
  41473. procedure TSPI3_SPI3STAT.setSPIRBF; inline;
  41474. begin
  41475. pTDefRegMap(@Self)^.&set := $00000001;
  41476. end;
  41477. procedure TSPI3_SPI3STAT.clearSPIRBF; inline;
  41478. begin
  41479. pTDefRegMap(@Self)^.clr := $00000001;
  41480. end;
  41481. procedure TSPI3_SPI3STAT.setSPIRBF(thebits : TBits_1); inline;
  41482. begin
  41483. if thebits = 0 then
  41484. pTDefRegMap(@Self)^.clr := $00000001
  41485. else
  41486. pTDefRegMap(@Self)^.&set := $00000001;
  41487. end;
  41488. function TSPI3_SPI3STAT.getSPIRBF : TBits_1; inline;
  41489. begin
  41490. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41491. end;
  41492. procedure TSPI3_SPI3STAT.setSPITBF; inline;
  41493. begin
  41494. pTDefRegMap(@Self)^.&set := $00000002;
  41495. end;
  41496. procedure TSPI3_SPI3STAT.clearSPITBF; inline;
  41497. begin
  41498. pTDefRegMap(@Self)^.clr := $00000002;
  41499. end;
  41500. procedure TSPI3_SPI3STAT.setSPITBF(thebits : TBits_1); inline;
  41501. begin
  41502. if thebits = 0 then
  41503. pTDefRegMap(@Self)^.clr := $00000002
  41504. else
  41505. pTDefRegMap(@Self)^.&set := $00000002;
  41506. end;
  41507. function TSPI3_SPI3STAT.getSPITBF : TBits_1; inline;
  41508. begin
  41509. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41510. end;
  41511. procedure TSPI3_SPI3STAT.setSPITBE; inline;
  41512. begin
  41513. pTDefRegMap(@Self)^.&set := $00000008;
  41514. end;
  41515. procedure TSPI3_SPI3STAT.clearSPITBE; inline;
  41516. begin
  41517. pTDefRegMap(@Self)^.clr := $00000008;
  41518. end;
  41519. procedure TSPI3_SPI3STAT.setSPITBE(thebits : TBits_1); inline;
  41520. begin
  41521. if thebits = 0 then
  41522. pTDefRegMap(@Self)^.clr := $00000008
  41523. else
  41524. pTDefRegMap(@Self)^.&set := $00000008;
  41525. end;
  41526. function TSPI3_SPI3STAT.getSPITBE : TBits_1; inline;
  41527. begin
  41528. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41529. end;
  41530. procedure TSPI3_SPI3STAT.setSPIRBE; inline;
  41531. begin
  41532. pTDefRegMap(@Self)^.&set := $00000020;
  41533. end;
  41534. procedure TSPI3_SPI3STAT.clearSPIRBE; inline;
  41535. begin
  41536. pTDefRegMap(@Self)^.clr := $00000020;
  41537. end;
  41538. procedure TSPI3_SPI3STAT.setSPIRBE(thebits : TBits_1); inline;
  41539. begin
  41540. if thebits = 0 then
  41541. pTDefRegMap(@Self)^.clr := $00000020
  41542. else
  41543. pTDefRegMap(@Self)^.&set := $00000020;
  41544. end;
  41545. function TSPI3_SPI3STAT.getSPIRBE : TBits_1; inline;
  41546. begin
  41547. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41548. end;
  41549. procedure TSPI3_SPI3STAT.setSPIROV; inline;
  41550. begin
  41551. pTDefRegMap(@Self)^.&set := $00000040;
  41552. end;
  41553. procedure TSPI3_SPI3STAT.clearSPIROV; inline;
  41554. begin
  41555. pTDefRegMap(@Self)^.clr := $00000040;
  41556. end;
  41557. procedure TSPI3_SPI3STAT.setSPIROV(thebits : TBits_1); inline;
  41558. begin
  41559. if thebits = 0 then
  41560. pTDefRegMap(@Self)^.clr := $00000040
  41561. else
  41562. pTDefRegMap(@Self)^.&set := $00000040;
  41563. end;
  41564. function TSPI3_SPI3STAT.getSPIROV : TBits_1; inline;
  41565. begin
  41566. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41567. end;
  41568. procedure TSPI3_SPI3STAT.setSRMT; inline;
  41569. begin
  41570. pTDefRegMap(@Self)^.&set := $00000080;
  41571. end;
  41572. procedure TSPI3_SPI3STAT.clearSRMT; inline;
  41573. begin
  41574. pTDefRegMap(@Self)^.clr := $00000080;
  41575. end;
  41576. procedure TSPI3_SPI3STAT.setSRMT(thebits : TBits_1); inline;
  41577. begin
  41578. if thebits = 0 then
  41579. pTDefRegMap(@Self)^.clr := $00000080
  41580. else
  41581. pTDefRegMap(@Self)^.&set := $00000080;
  41582. end;
  41583. function TSPI3_SPI3STAT.getSRMT : TBits_1; inline;
  41584. begin
  41585. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41586. end;
  41587. procedure TSPI3_SPI3STAT.setSPITUR; inline;
  41588. begin
  41589. pTDefRegMap(@Self)^.&set := $00000100;
  41590. end;
  41591. procedure TSPI3_SPI3STAT.clearSPITUR; inline;
  41592. begin
  41593. pTDefRegMap(@Self)^.clr := $00000100;
  41594. end;
  41595. procedure TSPI3_SPI3STAT.setSPITUR(thebits : TBits_1); inline;
  41596. begin
  41597. if thebits = 0 then
  41598. pTDefRegMap(@Self)^.clr := $00000100
  41599. else
  41600. pTDefRegMap(@Self)^.&set := $00000100;
  41601. end;
  41602. function TSPI3_SPI3STAT.getSPITUR : TBits_1; inline;
  41603. begin
  41604. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41605. end;
  41606. procedure TSPI3_SPI3STAT.setSPIBUSY; inline;
  41607. begin
  41608. pTDefRegMap(@Self)^.&set := $00000800;
  41609. end;
  41610. procedure TSPI3_SPI3STAT.clearSPIBUSY; inline;
  41611. begin
  41612. pTDefRegMap(@Self)^.clr := $00000800;
  41613. end;
  41614. procedure TSPI3_SPI3STAT.setSPIBUSY(thebits : TBits_1); inline;
  41615. begin
  41616. if thebits = 0 then
  41617. pTDefRegMap(@Self)^.clr := $00000800
  41618. else
  41619. pTDefRegMap(@Self)^.&set := $00000800;
  41620. end;
  41621. function TSPI3_SPI3STAT.getSPIBUSY : TBits_1; inline;
  41622. begin
  41623. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41624. end;
  41625. procedure TSPI3_SPI3STAT.setTXBUFELM(thebits : TBits_5); inline;
  41626. begin
  41627. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  41628. end;
  41629. function TSPI3_SPI3STAT.getTXBUFELM : TBits_5; inline;
  41630. begin
  41631. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  41632. end;
  41633. procedure TSPI3_SPI3STAT.setRXBUFELM(thebits : TBits_5); inline;
  41634. begin
  41635. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  41636. end;
  41637. function TSPI3_SPI3STAT.getRXBUFELM : TBits_5; inline;
  41638. begin
  41639. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  41640. end;
  41641. procedure TSPI3_SPI3STAT.setw(thebits : TBits_32); inline;
  41642. begin
  41643. pTDefRegMap(@Self)^.val := thebits;
  41644. end;
  41645. function TSPI3_SPI3STAT.getw : TBits_32; inline;
  41646. begin
  41647. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41648. end;
  41649. procedure TSPI2_SPI2ACON.setSRXISEL(thebits : TBits_2); inline;
  41650. begin
  41651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  41652. end;
  41653. function TSPI2_SPI2ACON.getSRXISEL : TBits_2; inline;
  41654. begin
  41655. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  41656. end;
  41657. procedure TSPI2_SPI2ACON.setSTXISEL(thebits : TBits_2); inline;
  41658. begin
  41659. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  41660. end;
  41661. function TSPI2_SPI2ACON.getSTXISEL : TBits_2; inline;
  41662. begin
  41663. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  41664. end;
  41665. procedure TSPI2_SPI2ACON.setMSTEN; inline;
  41666. begin
  41667. pTDefRegMap(@Self)^.&set := $00000020;
  41668. end;
  41669. procedure TSPI2_SPI2ACON.clearMSTEN; inline;
  41670. begin
  41671. pTDefRegMap(@Self)^.clr := $00000020;
  41672. end;
  41673. procedure TSPI2_SPI2ACON.setMSTEN(thebits : TBits_1); inline;
  41674. begin
  41675. if thebits = 0 then
  41676. pTDefRegMap(@Self)^.clr := $00000020
  41677. else
  41678. pTDefRegMap(@Self)^.&set := $00000020;
  41679. end;
  41680. function TSPI2_SPI2ACON.getMSTEN : TBits_1; inline;
  41681. begin
  41682. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41683. end;
  41684. procedure TSPI2_SPI2ACON.setCKP; inline;
  41685. begin
  41686. pTDefRegMap(@Self)^.&set := $00000040;
  41687. end;
  41688. procedure TSPI2_SPI2ACON.clearCKP; inline;
  41689. begin
  41690. pTDefRegMap(@Self)^.clr := $00000040;
  41691. end;
  41692. procedure TSPI2_SPI2ACON.setCKP(thebits : TBits_1); inline;
  41693. begin
  41694. if thebits = 0 then
  41695. pTDefRegMap(@Self)^.clr := $00000040
  41696. else
  41697. pTDefRegMap(@Self)^.&set := $00000040;
  41698. end;
  41699. function TSPI2_SPI2ACON.getCKP : TBits_1; inline;
  41700. begin
  41701. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41702. end;
  41703. procedure TSPI2_SPI2ACON.setSSEN; inline;
  41704. begin
  41705. pTDefRegMap(@Self)^.&set := $00000080;
  41706. end;
  41707. procedure TSPI2_SPI2ACON.clearSSEN; inline;
  41708. begin
  41709. pTDefRegMap(@Self)^.clr := $00000080;
  41710. end;
  41711. procedure TSPI2_SPI2ACON.setSSEN(thebits : TBits_1); inline;
  41712. begin
  41713. if thebits = 0 then
  41714. pTDefRegMap(@Self)^.clr := $00000080
  41715. else
  41716. pTDefRegMap(@Self)^.&set := $00000080;
  41717. end;
  41718. function TSPI2_SPI2ACON.getSSEN : TBits_1; inline;
  41719. begin
  41720. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41721. end;
  41722. procedure TSPI2_SPI2ACON.setCKE; inline;
  41723. begin
  41724. pTDefRegMap(@Self)^.&set := $00000100;
  41725. end;
  41726. procedure TSPI2_SPI2ACON.clearCKE; inline;
  41727. begin
  41728. pTDefRegMap(@Self)^.clr := $00000100;
  41729. end;
  41730. procedure TSPI2_SPI2ACON.setCKE(thebits : TBits_1); inline;
  41731. begin
  41732. if thebits = 0 then
  41733. pTDefRegMap(@Self)^.clr := $00000100
  41734. else
  41735. pTDefRegMap(@Self)^.&set := $00000100;
  41736. end;
  41737. function TSPI2_SPI2ACON.getCKE : TBits_1; inline;
  41738. begin
  41739. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41740. end;
  41741. procedure TSPI2_SPI2ACON.setSMP; inline;
  41742. begin
  41743. pTDefRegMap(@Self)^.&set := $00000200;
  41744. end;
  41745. procedure TSPI2_SPI2ACON.clearSMP; inline;
  41746. begin
  41747. pTDefRegMap(@Self)^.clr := $00000200;
  41748. end;
  41749. procedure TSPI2_SPI2ACON.setSMP(thebits : TBits_1); inline;
  41750. begin
  41751. if thebits = 0 then
  41752. pTDefRegMap(@Self)^.clr := $00000200
  41753. else
  41754. pTDefRegMap(@Self)^.&set := $00000200;
  41755. end;
  41756. function TSPI2_SPI2ACON.getSMP : TBits_1; inline;
  41757. begin
  41758. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41759. end;
  41760. procedure TSPI2_SPI2ACON.setMODE16; inline;
  41761. begin
  41762. pTDefRegMap(@Self)^.&set := $00000400;
  41763. end;
  41764. procedure TSPI2_SPI2ACON.clearMODE16; inline;
  41765. begin
  41766. pTDefRegMap(@Self)^.clr := $00000400;
  41767. end;
  41768. procedure TSPI2_SPI2ACON.setMODE16(thebits : TBits_1); inline;
  41769. begin
  41770. if thebits = 0 then
  41771. pTDefRegMap(@Self)^.clr := $00000400
  41772. else
  41773. pTDefRegMap(@Self)^.&set := $00000400;
  41774. end;
  41775. function TSPI2_SPI2ACON.getMODE16 : TBits_1; inline;
  41776. begin
  41777. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41778. end;
  41779. procedure TSPI2_SPI2ACON.setMODE32; inline;
  41780. begin
  41781. pTDefRegMap(@Self)^.&set := $00000800;
  41782. end;
  41783. procedure TSPI2_SPI2ACON.clearMODE32; inline;
  41784. begin
  41785. pTDefRegMap(@Self)^.clr := $00000800;
  41786. end;
  41787. procedure TSPI2_SPI2ACON.setMODE32(thebits : TBits_1); inline;
  41788. begin
  41789. if thebits = 0 then
  41790. pTDefRegMap(@Self)^.clr := $00000800
  41791. else
  41792. pTDefRegMap(@Self)^.&set := $00000800;
  41793. end;
  41794. function TSPI2_SPI2ACON.getMODE32 : TBits_1; inline;
  41795. begin
  41796. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41797. end;
  41798. procedure TSPI2_SPI2ACON.setDISSDO; inline;
  41799. begin
  41800. pTDefRegMap(@Self)^.&set := $00001000;
  41801. end;
  41802. procedure TSPI2_SPI2ACON.clearDISSDO; inline;
  41803. begin
  41804. pTDefRegMap(@Self)^.clr := $00001000;
  41805. end;
  41806. procedure TSPI2_SPI2ACON.setDISSDO(thebits : TBits_1); inline;
  41807. begin
  41808. if thebits = 0 then
  41809. pTDefRegMap(@Self)^.clr := $00001000
  41810. else
  41811. pTDefRegMap(@Self)^.&set := $00001000;
  41812. end;
  41813. function TSPI2_SPI2ACON.getDISSDO : TBits_1; inline;
  41814. begin
  41815. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41816. end;
  41817. procedure TSPI2_SPI2ACON.setSIDL; inline;
  41818. begin
  41819. pTDefRegMap(@Self)^.&set := $00002000;
  41820. end;
  41821. procedure TSPI2_SPI2ACON.clearSIDL; inline;
  41822. begin
  41823. pTDefRegMap(@Self)^.clr := $00002000;
  41824. end;
  41825. procedure TSPI2_SPI2ACON.setSIDL(thebits : TBits_1); inline;
  41826. begin
  41827. if thebits = 0 then
  41828. pTDefRegMap(@Self)^.clr := $00002000
  41829. else
  41830. pTDefRegMap(@Self)^.&set := $00002000;
  41831. end;
  41832. function TSPI2_SPI2ACON.getSIDL : TBits_1; inline;
  41833. begin
  41834. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41835. end;
  41836. procedure TSPI2_SPI2ACON.setON; inline;
  41837. begin
  41838. pTDefRegMap(@Self)^.&set := $00008000;
  41839. end;
  41840. procedure TSPI2_SPI2ACON.clearON; inline;
  41841. begin
  41842. pTDefRegMap(@Self)^.clr := $00008000;
  41843. end;
  41844. procedure TSPI2_SPI2ACON.setON(thebits : TBits_1); inline;
  41845. begin
  41846. if thebits = 0 then
  41847. pTDefRegMap(@Self)^.clr := $00008000
  41848. else
  41849. pTDefRegMap(@Self)^.&set := $00008000;
  41850. end;
  41851. function TSPI2_SPI2ACON.getON : TBits_1; inline;
  41852. begin
  41853. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41854. end;
  41855. procedure TSPI2_SPI2ACON.setENHBUF; inline;
  41856. begin
  41857. pTDefRegMap(@Self)^.&set := $00010000;
  41858. end;
  41859. procedure TSPI2_SPI2ACON.clearENHBUF; inline;
  41860. begin
  41861. pTDefRegMap(@Self)^.clr := $00010000;
  41862. end;
  41863. procedure TSPI2_SPI2ACON.setENHBUF(thebits : TBits_1); inline;
  41864. begin
  41865. if thebits = 0 then
  41866. pTDefRegMap(@Self)^.clr := $00010000
  41867. else
  41868. pTDefRegMap(@Self)^.&set := $00010000;
  41869. end;
  41870. function TSPI2_SPI2ACON.getENHBUF : TBits_1; inline;
  41871. begin
  41872. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  41873. end;
  41874. procedure TSPI2_SPI2ACON.setSPIFE; inline;
  41875. begin
  41876. pTDefRegMap(@Self)^.&set := $00020000;
  41877. end;
  41878. procedure TSPI2_SPI2ACON.clearSPIFE; inline;
  41879. begin
  41880. pTDefRegMap(@Self)^.clr := $00020000;
  41881. end;
  41882. procedure TSPI2_SPI2ACON.setSPIFE(thebits : TBits_1); inline;
  41883. begin
  41884. if thebits = 0 then
  41885. pTDefRegMap(@Self)^.clr := $00020000
  41886. else
  41887. pTDefRegMap(@Self)^.&set := $00020000;
  41888. end;
  41889. function TSPI2_SPI2ACON.getSPIFE : TBits_1; inline;
  41890. begin
  41891. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  41892. end;
  41893. procedure TSPI2_SPI2ACON.setFRMCNT(thebits : TBits_3); inline;
  41894. begin
  41895. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  41896. end;
  41897. function TSPI2_SPI2ACON.getFRMCNT : TBits_3; inline;
  41898. begin
  41899. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  41900. end;
  41901. procedure TSPI2_SPI2ACON.setFRMSYPW; inline;
  41902. begin
  41903. pTDefRegMap(@Self)^.&set := $08000000;
  41904. end;
  41905. procedure TSPI2_SPI2ACON.clearFRMSYPW; inline;
  41906. begin
  41907. pTDefRegMap(@Self)^.clr := $08000000;
  41908. end;
  41909. procedure TSPI2_SPI2ACON.setFRMSYPW(thebits : TBits_1); inline;
  41910. begin
  41911. if thebits = 0 then
  41912. pTDefRegMap(@Self)^.clr := $08000000
  41913. else
  41914. pTDefRegMap(@Self)^.&set := $08000000;
  41915. end;
  41916. function TSPI2_SPI2ACON.getFRMSYPW : TBits_1; inline;
  41917. begin
  41918. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  41919. end;
  41920. procedure TSPI2_SPI2ACON.setMSSEN; inline;
  41921. begin
  41922. pTDefRegMap(@Self)^.&set := $10000000;
  41923. end;
  41924. procedure TSPI2_SPI2ACON.clearMSSEN; inline;
  41925. begin
  41926. pTDefRegMap(@Self)^.clr := $10000000;
  41927. end;
  41928. procedure TSPI2_SPI2ACON.setMSSEN(thebits : TBits_1); inline;
  41929. begin
  41930. if thebits = 0 then
  41931. pTDefRegMap(@Self)^.clr := $10000000
  41932. else
  41933. pTDefRegMap(@Self)^.&set := $10000000;
  41934. end;
  41935. function TSPI2_SPI2ACON.getMSSEN : TBits_1; inline;
  41936. begin
  41937. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  41938. end;
  41939. procedure TSPI2_SPI2ACON.setFRMPOL; inline;
  41940. begin
  41941. pTDefRegMap(@Self)^.&set := $20000000;
  41942. end;
  41943. procedure TSPI2_SPI2ACON.clearFRMPOL; inline;
  41944. begin
  41945. pTDefRegMap(@Self)^.clr := $20000000;
  41946. end;
  41947. procedure TSPI2_SPI2ACON.setFRMPOL(thebits : TBits_1); inline;
  41948. begin
  41949. if thebits = 0 then
  41950. pTDefRegMap(@Self)^.clr := $20000000
  41951. else
  41952. pTDefRegMap(@Self)^.&set := $20000000;
  41953. end;
  41954. function TSPI2_SPI2ACON.getFRMPOL : TBits_1; inline;
  41955. begin
  41956. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  41957. end;
  41958. procedure TSPI2_SPI2ACON.setFRMSYNC; inline;
  41959. begin
  41960. pTDefRegMap(@Self)^.&set := $40000000;
  41961. end;
  41962. procedure TSPI2_SPI2ACON.clearFRMSYNC; inline;
  41963. begin
  41964. pTDefRegMap(@Self)^.clr := $40000000;
  41965. end;
  41966. procedure TSPI2_SPI2ACON.setFRMSYNC(thebits : TBits_1); inline;
  41967. begin
  41968. if thebits = 0 then
  41969. pTDefRegMap(@Self)^.clr := $40000000
  41970. else
  41971. pTDefRegMap(@Self)^.&set := $40000000;
  41972. end;
  41973. function TSPI2_SPI2ACON.getFRMSYNC : TBits_1; inline;
  41974. begin
  41975. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  41976. end;
  41977. procedure TSPI2_SPI2ACON.setFRMEN; inline;
  41978. begin
  41979. pTDefRegMap(@Self)^.&set := $80000000;
  41980. end;
  41981. procedure TSPI2_SPI2ACON.clearFRMEN; inline;
  41982. begin
  41983. pTDefRegMap(@Self)^.clr := $80000000;
  41984. end;
  41985. procedure TSPI2_SPI2ACON.setFRMEN(thebits : TBits_1); inline;
  41986. begin
  41987. if thebits = 0 then
  41988. pTDefRegMap(@Self)^.clr := $80000000
  41989. else
  41990. pTDefRegMap(@Self)^.&set := $80000000;
  41991. end;
  41992. function TSPI2_SPI2ACON.getFRMEN : TBits_1; inline;
  41993. begin
  41994. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  41995. end;
  41996. procedure TSPI2_SPI2ACON.setw(thebits : TBits_32); inline;
  41997. begin
  41998. pTDefRegMap(@Self)^.val := thebits;
  41999. end;
  42000. function TSPI2_SPI2ACON.getw : TBits_32; inline;
  42001. begin
  42002. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42003. end;
  42004. procedure TSPI2_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
  42005. begin
  42006. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  42007. end;
  42008. function TSPI2_SPI2CON.getSRXISEL : TBits_2; inline;
  42009. begin
  42010. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  42011. end;
  42012. procedure TSPI2_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
  42013. begin
  42014. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  42015. end;
  42016. function TSPI2_SPI2CON.getSTXISEL : TBits_2; inline;
  42017. begin
  42018. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  42019. end;
  42020. procedure TSPI2_SPI2CON.setMSTEN; inline;
  42021. begin
  42022. pTDefRegMap(@Self)^.&set := $00000020;
  42023. end;
  42024. procedure TSPI2_SPI2CON.clearMSTEN; inline;
  42025. begin
  42026. pTDefRegMap(@Self)^.clr := $00000020;
  42027. end;
  42028. procedure TSPI2_SPI2CON.setMSTEN(thebits : TBits_1); inline;
  42029. begin
  42030. if thebits = 0 then
  42031. pTDefRegMap(@Self)^.clr := $00000020
  42032. else
  42033. pTDefRegMap(@Self)^.&set := $00000020;
  42034. end;
  42035. function TSPI2_SPI2CON.getMSTEN : TBits_1; inline;
  42036. begin
  42037. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42038. end;
  42039. procedure TSPI2_SPI2CON.setCKP; inline;
  42040. begin
  42041. pTDefRegMap(@Self)^.&set := $00000040;
  42042. end;
  42043. procedure TSPI2_SPI2CON.clearCKP; inline;
  42044. begin
  42045. pTDefRegMap(@Self)^.clr := $00000040;
  42046. end;
  42047. procedure TSPI2_SPI2CON.setCKP(thebits : TBits_1); inline;
  42048. begin
  42049. if thebits = 0 then
  42050. pTDefRegMap(@Self)^.clr := $00000040
  42051. else
  42052. pTDefRegMap(@Self)^.&set := $00000040;
  42053. end;
  42054. function TSPI2_SPI2CON.getCKP : TBits_1; inline;
  42055. begin
  42056. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42057. end;
  42058. procedure TSPI2_SPI2CON.setSSEN; inline;
  42059. begin
  42060. pTDefRegMap(@Self)^.&set := $00000080;
  42061. end;
  42062. procedure TSPI2_SPI2CON.clearSSEN; inline;
  42063. begin
  42064. pTDefRegMap(@Self)^.clr := $00000080;
  42065. end;
  42066. procedure TSPI2_SPI2CON.setSSEN(thebits : TBits_1); inline;
  42067. begin
  42068. if thebits = 0 then
  42069. pTDefRegMap(@Self)^.clr := $00000080
  42070. else
  42071. pTDefRegMap(@Self)^.&set := $00000080;
  42072. end;
  42073. function TSPI2_SPI2CON.getSSEN : TBits_1; inline;
  42074. begin
  42075. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42076. end;
  42077. procedure TSPI2_SPI2CON.setCKE; inline;
  42078. begin
  42079. pTDefRegMap(@Self)^.&set := $00000100;
  42080. end;
  42081. procedure TSPI2_SPI2CON.clearCKE; inline;
  42082. begin
  42083. pTDefRegMap(@Self)^.clr := $00000100;
  42084. end;
  42085. procedure TSPI2_SPI2CON.setCKE(thebits : TBits_1); inline;
  42086. begin
  42087. if thebits = 0 then
  42088. pTDefRegMap(@Self)^.clr := $00000100
  42089. else
  42090. pTDefRegMap(@Self)^.&set := $00000100;
  42091. end;
  42092. function TSPI2_SPI2CON.getCKE : TBits_1; inline;
  42093. begin
  42094. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42095. end;
  42096. procedure TSPI2_SPI2CON.setSMP; inline;
  42097. begin
  42098. pTDefRegMap(@Self)^.&set := $00000200;
  42099. end;
  42100. procedure TSPI2_SPI2CON.clearSMP; inline;
  42101. begin
  42102. pTDefRegMap(@Self)^.clr := $00000200;
  42103. end;
  42104. procedure TSPI2_SPI2CON.setSMP(thebits : TBits_1); inline;
  42105. begin
  42106. if thebits = 0 then
  42107. pTDefRegMap(@Self)^.clr := $00000200
  42108. else
  42109. pTDefRegMap(@Self)^.&set := $00000200;
  42110. end;
  42111. function TSPI2_SPI2CON.getSMP : TBits_1; inline;
  42112. begin
  42113. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42114. end;
  42115. procedure TSPI2_SPI2CON.setMODE16; inline;
  42116. begin
  42117. pTDefRegMap(@Self)^.&set := $00000400;
  42118. end;
  42119. procedure TSPI2_SPI2CON.clearMODE16; inline;
  42120. begin
  42121. pTDefRegMap(@Self)^.clr := $00000400;
  42122. end;
  42123. procedure TSPI2_SPI2CON.setMODE16(thebits : TBits_1); inline;
  42124. begin
  42125. if thebits = 0 then
  42126. pTDefRegMap(@Self)^.clr := $00000400
  42127. else
  42128. pTDefRegMap(@Self)^.&set := $00000400;
  42129. end;
  42130. function TSPI2_SPI2CON.getMODE16 : TBits_1; inline;
  42131. begin
  42132. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42133. end;
  42134. procedure TSPI2_SPI2CON.setMODE32; inline;
  42135. begin
  42136. pTDefRegMap(@Self)^.&set := $00000800;
  42137. end;
  42138. procedure TSPI2_SPI2CON.clearMODE32; inline;
  42139. begin
  42140. pTDefRegMap(@Self)^.clr := $00000800;
  42141. end;
  42142. procedure TSPI2_SPI2CON.setMODE32(thebits : TBits_1); inline;
  42143. begin
  42144. if thebits = 0 then
  42145. pTDefRegMap(@Self)^.clr := $00000800
  42146. else
  42147. pTDefRegMap(@Self)^.&set := $00000800;
  42148. end;
  42149. function TSPI2_SPI2CON.getMODE32 : TBits_1; inline;
  42150. begin
  42151. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42152. end;
  42153. procedure TSPI2_SPI2CON.setDISSDO; inline;
  42154. begin
  42155. pTDefRegMap(@Self)^.&set := $00001000;
  42156. end;
  42157. procedure TSPI2_SPI2CON.clearDISSDO; inline;
  42158. begin
  42159. pTDefRegMap(@Self)^.clr := $00001000;
  42160. end;
  42161. procedure TSPI2_SPI2CON.setDISSDO(thebits : TBits_1); inline;
  42162. begin
  42163. if thebits = 0 then
  42164. pTDefRegMap(@Self)^.clr := $00001000
  42165. else
  42166. pTDefRegMap(@Self)^.&set := $00001000;
  42167. end;
  42168. function TSPI2_SPI2CON.getDISSDO : TBits_1; inline;
  42169. begin
  42170. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42171. end;
  42172. procedure TSPI2_SPI2CON.setSIDL; inline;
  42173. begin
  42174. pTDefRegMap(@Self)^.&set := $00002000;
  42175. end;
  42176. procedure TSPI2_SPI2CON.clearSIDL; inline;
  42177. begin
  42178. pTDefRegMap(@Self)^.clr := $00002000;
  42179. end;
  42180. procedure TSPI2_SPI2CON.setSIDL(thebits : TBits_1); inline;
  42181. begin
  42182. if thebits = 0 then
  42183. pTDefRegMap(@Self)^.clr := $00002000
  42184. else
  42185. pTDefRegMap(@Self)^.&set := $00002000;
  42186. end;
  42187. function TSPI2_SPI2CON.getSIDL : TBits_1; inline;
  42188. begin
  42189. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42190. end;
  42191. procedure TSPI2_SPI2CON.setON; inline;
  42192. begin
  42193. pTDefRegMap(@Self)^.&set := $00008000;
  42194. end;
  42195. procedure TSPI2_SPI2CON.clearON; inline;
  42196. begin
  42197. pTDefRegMap(@Self)^.clr := $00008000;
  42198. end;
  42199. procedure TSPI2_SPI2CON.setON(thebits : TBits_1); inline;
  42200. begin
  42201. if thebits = 0 then
  42202. pTDefRegMap(@Self)^.clr := $00008000
  42203. else
  42204. pTDefRegMap(@Self)^.&set := $00008000;
  42205. end;
  42206. function TSPI2_SPI2CON.getON : TBits_1; inline;
  42207. begin
  42208. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42209. end;
  42210. procedure TSPI2_SPI2CON.setENHBUF; inline;
  42211. begin
  42212. pTDefRegMap(@Self)^.&set := $00010000;
  42213. end;
  42214. procedure TSPI2_SPI2CON.clearENHBUF; inline;
  42215. begin
  42216. pTDefRegMap(@Self)^.clr := $00010000;
  42217. end;
  42218. procedure TSPI2_SPI2CON.setENHBUF(thebits : TBits_1); inline;
  42219. begin
  42220. if thebits = 0 then
  42221. pTDefRegMap(@Self)^.clr := $00010000
  42222. else
  42223. pTDefRegMap(@Self)^.&set := $00010000;
  42224. end;
  42225. function TSPI2_SPI2CON.getENHBUF : TBits_1; inline;
  42226. begin
  42227. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  42228. end;
  42229. procedure TSPI2_SPI2CON.setSPIFE; inline;
  42230. begin
  42231. pTDefRegMap(@Self)^.&set := $00020000;
  42232. end;
  42233. procedure TSPI2_SPI2CON.clearSPIFE; inline;
  42234. begin
  42235. pTDefRegMap(@Self)^.clr := $00020000;
  42236. end;
  42237. procedure TSPI2_SPI2CON.setSPIFE(thebits : TBits_1); inline;
  42238. begin
  42239. if thebits = 0 then
  42240. pTDefRegMap(@Self)^.clr := $00020000
  42241. else
  42242. pTDefRegMap(@Self)^.&set := $00020000;
  42243. end;
  42244. function TSPI2_SPI2CON.getSPIFE : TBits_1; inline;
  42245. begin
  42246. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  42247. end;
  42248. procedure TSPI2_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
  42249. begin
  42250. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  42251. end;
  42252. function TSPI2_SPI2CON.getFRMCNT : TBits_3; inline;
  42253. begin
  42254. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  42255. end;
  42256. procedure TSPI2_SPI2CON.setFRMSYPW; inline;
  42257. begin
  42258. pTDefRegMap(@Self)^.&set := $08000000;
  42259. end;
  42260. procedure TSPI2_SPI2CON.clearFRMSYPW; inline;
  42261. begin
  42262. pTDefRegMap(@Self)^.clr := $08000000;
  42263. end;
  42264. procedure TSPI2_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
  42265. begin
  42266. if thebits = 0 then
  42267. pTDefRegMap(@Self)^.clr := $08000000
  42268. else
  42269. pTDefRegMap(@Self)^.&set := $08000000;
  42270. end;
  42271. function TSPI2_SPI2CON.getFRMSYPW : TBits_1; inline;
  42272. begin
  42273. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  42274. end;
  42275. procedure TSPI2_SPI2CON.setMSSEN; inline;
  42276. begin
  42277. pTDefRegMap(@Self)^.&set := $10000000;
  42278. end;
  42279. procedure TSPI2_SPI2CON.clearMSSEN; inline;
  42280. begin
  42281. pTDefRegMap(@Self)^.clr := $10000000;
  42282. end;
  42283. procedure TSPI2_SPI2CON.setMSSEN(thebits : TBits_1); inline;
  42284. begin
  42285. if thebits = 0 then
  42286. pTDefRegMap(@Self)^.clr := $10000000
  42287. else
  42288. pTDefRegMap(@Self)^.&set := $10000000;
  42289. end;
  42290. function TSPI2_SPI2CON.getMSSEN : TBits_1; inline;
  42291. begin
  42292. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  42293. end;
  42294. procedure TSPI2_SPI2CON.setFRMPOL; inline;
  42295. begin
  42296. pTDefRegMap(@Self)^.&set := $20000000;
  42297. end;
  42298. procedure TSPI2_SPI2CON.clearFRMPOL; inline;
  42299. begin
  42300. pTDefRegMap(@Self)^.clr := $20000000;
  42301. end;
  42302. procedure TSPI2_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
  42303. begin
  42304. if thebits = 0 then
  42305. pTDefRegMap(@Self)^.clr := $20000000
  42306. else
  42307. pTDefRegMap(@Self)^.&set := $20000000;
  42308. end;
  42309. function TSPI2_SPI2CON.getFRMPOL : TBits_1; inline;
  42310. begin
  42311. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  42312. end;
  42313. procedure TSPI2_SPI2CON.setFRMSYNC; inline;
  42314. begin
  42315. pTDefRegMap(@Self)^.&set := $40000000;
  42316. end;
  42317. procedure TSPI2_SPI2CON.clearFRMSYNC; inline;
  42318. begin
  42319. pTDefRegMap(@Self)^.clr := $40000000;
  42320. end;
  42321. procedure TSPI2_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
  42322. begin
  42323. if thebits = 0 then
  42324. pTDefRegMap(@Self)^.clr := $40000000
  42325. else
  42326. pTDefRegMap(@Self)^.&set := $40000000;
  42327. end;
  42328. function TSPI2_SPI2CON.getFRMSYNC : TBits_1; inline;
  42329. begin
  42330. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  42331. end;
  42332. procedure TSPI2_SPI2CON.setFRMEN; inline;
  42333. begin
  42334. pTDefRegMap(@Self)^.&set := $80000000;
  42335. end;
  42336. procedure TSPI2_SPI2CON.clearFRMEN; inline;
  42337. begin
  42338. pTDefRegMap(@Self)^.clr := $80000000;
  42339. end;
  42340. procedure TSPI2_SPI2CON.setFRMEN(thebits : TBits_1); inline;
  42341. begin
  42342. if thebits = 0 then
  42343. pTDefRegMap(@Self)^.clr := $80000000
  42344. else
  42345. pTDefRegMap(@Self)^.&set := $80000000;
  42346. end;
  42347. function TSPI2_SPI2CON.getFRMEN : TBits_1; inline;
  42348. begin
  42349. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  42350. end;
  42351. procedure TSPI2_SPI2CON.setw(thebits : TBits_32); inline;
  42352. begin
  42353. pTDefRegMap(@Self)^.val := thebits;
  42354. end;
  42355. function TSPI2_SPI2CON.getw : TBits_32; inline;
  42356. begin
  42357. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42358. end;
  42359. procedure TSPI2_SPI2ASTAT.setSPIRBF; inline;
  42360. begin
  42361. pTDefRegMap(@Self)^.&set := $00000001;
  42362. end;
  42363. procedure TSPI2_SPI2ASTAT.clearSPIRBF; inline;
  42364. begin
  42365. pTDefRegMap(@Self)^.clr := $00000001;
  42366. end;
  42367. procedure TSPI2_SPI2ASTAT.setSPIRBF(thebits : TBits_1); inline;
  42368. begin
  42369. if thebits = 0 then
  42370. pTDefRegMap(@Self)^.clr := $00000001
  42371. else
  42372. pTDefRegMap(@Self)^.&set := $00000001;
  42373. end;
  42374. function TSPI2_SPI2ASTAT.getSPIRBF : TBits_1; inline;
  42375. begin
  42376. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42377. end;
  42378. procedure TSPI2_SPI2ASTAT.setSPITBF; inline;
  42379. begin
  42380. pTDefRegMap(@Self)^.&set := $00000002;
  42381. end;
  42382. procedure TSPI2_SPI2ASTAT.clearSPITBF; inline;
  42383. begin
  42384. pTDefRegMap(@Self)^.clr := $00000002;
  42385. end;
  42386. procedure TSPI2_SPI2ASTAT.setSPITBF(thebits : TBits_1); inline;
  42387. begin
  42388. if thebits = 0 then
  42389. pTDefRegMap(@Self)^.clr := $00000002
  42390. else
  42391. pTDefRegMap(@Self)^.&set := $00000002;
  42392. end;
  42393. function TSPI2_SPI2ASTAT.getSPITBF : TBits_1; inline;
  42394. begin
  42395. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42396. end;
  42397. procedure TSPI2_SPI2ASTAT.setSPITBE; inline;
  42398. begin
  42399. pTDefRegMap(@Self)^.&set := $00000008;
  42400. end;
  42401. procedure TSPI2_SPI2ASTAT.clearSPITBE; inline;
  42402. begin
  42403. pTDefRegMap(@Self)^.clr := $00000008;
  42404. end;
  42405. procedure TSPI2_SPI2ASTAT.setSPITBE(thebits : TBits_1); inline;
  42406. begin
  42407. if thebits = 0 then
  42408. pTDefRegMap(@Self)^.clr := $00000008
  42409. else
  42410. pTDefRegMap(@Self)^.&set := $00000008;
  42411. end;
  42412. function TSPI2_SPI2ASTAT.getSPITBE : TBits_1; inline;
  42413. begin
  42414. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42415. end;
  42416. procedure TSPI2_SPI2ASTAT.setSPIRBE; inline;
  42417. begin
  42418. pTDefRegMap(@Self)^.&set := $00000020;
  42419. end;
  42420. procedure TSPI2_SPI2ASTAT.clearSPIRBE; inline;
  42421. begin
  42422. pTDefRegMap(@Self)^.clr := $00000020;
  42423. end;
  42424. procedure TSPI2_SPI2ASTAT.setSPIRBE(thebits : TBits_1); inline;
  42425. begin
  42426. if thebits = 0 then
  42427. pTDefRegMap(@Self)^.clr := $00000020
  42428. else
  42429. pTDefRegMap(@Self)^.&set := $00000020;
  42430. end;
  42431. function TSPI2_SPI2ASTAT.getSPIRBE : TBits_1; inline;
  42432. begin
  42433. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42434. end;
  42435. procedure TSPI2_SPI2ASTAT.setSPIROV; inline;
  42436. begin
  42437. pTDefRegMap(@Self)^.&set := $00000040;
  42438. end;
  42439. procedure TSPI2_SPI2ASTAT.clearSPIROV; inline;
  42440. begin
  42441. pTDefRegMap(@Self)^.clr := $00000040;
  42442. end;
  42443. procedure TSPI2_SPI2ASTAT.setSPIROV(thebits : TBits_1); inline;
  42444. begin
  42445. if thebits = 0 then
  42446. pTDefRegMap(@Self)^.clr := $00000040
  42447. else
  42448. pTDefRegMap(@Self)^.&set := $00000040;
  42449. end;
  42450. function TSPI2_SPI2ASTAT.getSPIROV : TBits_1; inline;
  42451. begin
  42452. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42453. end;
  42454. procedure TSPI2_SPI2ASTAT.setSRMT; inline;
  42455. begin
  42456. pTDefRegMap(@Self)^.&set := $00000080;
  42457. end;
  42458. procedure TSPI2_SPI2ASTAT.clearSRMT; inline;
  42459. begin
  42460. pTDefRegMap(@Self)^.clr := $00000080;
  42461. end;
  42462. procedure TSPI2_SPI2ASTAT.setSRMT(thebits : TBits_1); inline;
  42463. begin
  42464. if thebits = 0 then
  42465. pTDefRegMap(@Self)^.clr := $00000080
  42466. else
  42467. pTDefRegMap(@Self)^.&set := $00000080;
  42468. end;
  42469. function TSPI2_SPI2ASTAT.getSRMT : TBits_1; inline;
  42470. begin
  42471. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42472. end;
  42473. procedure TSPI2_SPI2ASTAT.setSPITUR; inline;
  42474. begin
  42475. pTDefRegMap(@Self)^.&set := $00000100;
  42476. end;
  42477. procedure TSPI2_SPI2ASTAT.clearSPITUR; inline;
  42478. begin
  42479. pTDefRegMap(@Self)^.clr := $00000100;
  42480. end;
  42481. procedure TSPI2_SPI2ASTAT.setSPITUR(thebits : TBits_1); inline;
  42482. begin
  42483. if thebits = 0 then
  42484. pTDefRegMap(@Self)^.clr := $00000100
  42485. else
  42486. pTDefRegMap(@Self)^.&set := $00000100;
  42487. end;
  42488. function TSPI2_SPI2ASTAT.getSPITUR : TBits_1; inline;
  42489. begin
  42490. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42491. end;
  42492. procedure TSPI2_SPI2ASTAT.setSPIBUSY; inline;
  42493. begin
  42494. pTDefRegMap(@Self)^.&set := $00000800;
  42495. end;
  42496. procedure TSPI2_SPI2ASTAT.clearSPIBUSY; inline;
  42497. begin
  42498. pTDefRegMap(@Self)^.clr := $00000800;
  42499. end;
  42500. procedure TSPI2_SPI2ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  42501. begin
  42502. if thebits = 0 then
  42503. pTDefRegMap(@Self)^.clr := $00000800
  42504. else
  42505. pTDefRegMap(@Self)^.&set := $00000800;
  42506. end;
  42507. function TSPI2_SPI2ASTAT.getSPIBUSY : TBits_1; inline;
  42508. begin
  42509. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42510. end;
  42511. procedure TSPI2_SPI2ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  42512. begin
  42513. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  42514. end;
  42515. function TSPI2_SPI2ASTAT.getTXBUFELM : TBits_5; inline;
  42516. begin
  42517. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  42518. end;
  42519. procedure TSPI2_SPI2ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  42520. begin
  42521. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  42522. end;
  42523. function TSPI2_SPI2ASTAT.getRXBUFELM : TBits_5; inline;
  42524. begin
  42525. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  42526. end;
  42527. procedure TSPI2_SPI2ASTAT.setw(thebits : TBits_32); inline;
  42528. begin
  42529. pTDefRegMap(@Self)^.val := thebits;
  42530. end;
  42531. function TSPI2_SPI2ASTAT.getw : TBits_32; inline;
  42532. begin
  42533. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42534. end;
  42535. procedure TSPI2_SPI2STAT.setSPIRBF; inline;
  42536. begin
  42537. pTDefRegMap(@Self)^.&set := $00000001;
  42538. end;
  42539. procedure TSPI2_SPI2STAT.clearSPIRBF; inline;
  42540. begin
  42541. pTDefRegMap(@Self)^.clr := $00000001;
  42542. end;
  42543. procedure TSPI2_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
  42544. begin
  42545. if thebits = 0 then
  42546. pTDefRegMap(@Self)^.clr := $00000001
  42547. else
  42548. pTDefRegMap(@Self)^.&set := $00000001;
  42549. end;
  42550. function TSPI2_SPI2STAT.getSPIRBF : TBits_1; inline;
  42551. begin
  42552. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42553. end;
  42554. procedure TSPI2_SPI2STAT.setSPITBF; inline;
  42555. begin
  42556. pTDefRegMap(@Self)^.&set := $00000002;
  42557. end;
  42558. procedure TSPI2_SPI2STAT.clearSPITBF; inline;
  42559. begin
  42560. pTDefRegMap(@Self)^.clr := $00000002;
  42561. end;
  42562. procedure TSPI2_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
  42563. begin
  42564. if thebits = 0 then
  42565. pTDefRegMap(@Self)^.clr := $00000002
  42566. else
  42567. pTDefRegMap(@Self)^.&set := $00000002;
  42568. end;
  42569. function TSPI2_SPI2STAT.getSPITBF : TBits_1; inline;
  42570. begin
  42571. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42572. end;
  42573. procedure TSPI2_SPI2STAT.setSPITBE; inline;
  42574. begin
  42575. pTDefRegMap(@Self)^.&set := $00000008;
  42576. end;
  42577. procedure TSPI2_SPI2STAT.clearSPITBE; inline;
  42578. begin
  42579. pTDefRegMap(@Self)^.clr := $00000008;
  42580. end;
  42581. procedure TSPI2_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
  42582. begin
  42583. if thebits = 0 then
  42584. pTDefRegMap(@Self)^.clr := $00000008
  42585. else
  42586. pTDefRegMap(@Self)^.&set := $00000008;
  42587. end;
  42588. function TSPI2_SPI2STAT.getSPITBE : TBits_1; inline;
  42589. begin
  42590. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42591. end;
  42592. procedure TSPI2_SPI2STAT.setSPIRBE; inline;
  42593. begin
  42594. pTDefRegMap(@Self)^.&set := $00000020;
  42595. end;
  42596. procedure TSPI2_SPI2STAT.clearSPIRBE; inline;
  42597. begin
  42598. pTDefRegMap(@Self)^.clr := $00000020;
  42599. end;
  42600. procedure TSPI2_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
  42601. begin
  42602. if thebits = 0 then
  42603. pTDefRegMap(@Self)^.clr := $00000020
  42604. else
  42605. pTDefRegMap(@Self)^.&set := $00000020;
  42606. end;
  42607. function TSPI2_SPI2STAT.getSPIRBE : TBits_1; inline;
  42608. begin
  42609. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42610. end;
  42611. procedure TSPI2_SPI2STAT.setSPIROV; inline;
  42612. begin
  42613. pTDefRegMap(@Self)^.&set := $00000040;
  42614. end;
  42615. procedure TSPI2_SPI2STAT.clearSPIROV; inline;
  42616. begin
  42617. pTDefRegMap(@Self)^.clr := $00000040;
  42618. end;
  42619. procedure TSPI2_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
  42620. begin
  42621. if thebits = 0 then
  42622. pTDefRegMap(@Self)^.clr := $00000040
  42623. else
  42624. pTDefRegMap(@Self)^.&set := $00000040;
  42625. end;
  42626. function TSPI2_SPI2STAT.getSPIROV : TBits_1; inline;
  42627. begin
  42628. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42629. end;
  42630. procedure TSPI2_SPI2STAT.setSRMT; inline;
  42631. begin
  42632. pTDefRegMap(@Self)^.&set := $00000080;
  42633. end;
  42634. procedure TSPI2_SPI2STAT.clearSRMT; inline;
  42635. begin
  42636. pTDefRegMap(@Self)^.clr := $00000080;
  42637. end;
  42638. procedure TSPI2_SPI2STAT.setSRMT(thebits : TBits_1); inline;
  42639. begin
  42640. if thebits = 0 then
  42641. pTDefRegMap(@Self)^.clr := $00000080
  42642. else
  42643. pTDefRegMap(@Self)^.&set := $00000080;
  42644. end;
  42645. function TSPI2_SPI2STAT.getSRMT : TBits_1; inline;
  42646. begin
  42647. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42648. end;
  42649. procedure TSPI2_SPI2STAT.setSPITUR; inline;
  42650. begin
  42651. pTDefRegMap(@Self)^.&set := $00000100;
  42652. end;
  42653. procedure TSPI2_SPI2STAT.clearSPITUR; inline;
  42654. begin
  42655. pTDefRegMap(@Self)^.clr := $00000100;
  42656. end;
  42657. procedure TSPI2_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
  42658. begin
  42659. if thebits = 0 then
  42660. pTDefRegMap(@Self)^.clr := $00000100
  42661. else
  42662. pTDefRegMap(@Self)^.&set := $00000100;
  42663. end;
  42664. function TSPI2_SPI2STAT.getSPITUR : TBits_1; inline;
  42665. begin
  42666. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42667. end;
  42668. procedure TSPI2_SPI2STAT.setSPIBUSY; inline;
  42669. begin
  42670. pTDefRegMap(@Self)^.&set := $00000800;
  42671. end;
  42672. procedure TSPI2_SPI2STAT.clearSPIBUSY; inline;
  42673. begin
  42674. pTDefRegMap(@Self)^.clr := $00000800;
  42675. end;
  42676. procedure TSPI2_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
  42677. begin
  42678. if thebits = 0 then
  42679. pTDefRegMap(@Self)^.clr := $00000800
  42680. else
  42681. pTDefRegMap(@Self)^.&set := $00000800;
  42682. end;
  42683. function TSPI2_SPI2STAT.getSPIBUSY : TBits_1; inline;
  42684. begin
  42685. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42686. end;
  42687. procedure TSPI2_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
  42688. begin
  42689. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  42690. end;
  42691. function TSPI2_SPI2STAT.getTXBUFELM : TBits_5; inline;
  42692. begin
  42693. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  42694. end;
  42695. procedure TSPI2_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
  42696. begin
  42697. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  42698. end;
  42699. function TSPI2_SPI2STAT.getRXBUFELM : TBits_5; inline;
  42700. begin
  42701. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  42702. end;
  42703. procedure TSPI2_SPI2STAT.setw(thebits : TBits_32); inline;
  42704. begin
  42705. pTDefRegMap(@Self)^.val := thebits;
  42706. end;
  42707. function TSPI2_SPI2STAT.getw : TBits_32; inline;
  42708. begin
  42709. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42710. end;
  42711. procedure TSPI3A_SPI3ACON.setSRXISEL(thebits : TBits_2); inline;
  42712. begin
  42713. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  42714. end;
  42715. function TSPI3A_SPI3ACON.getSRXISEL : TBits_2; inline;
  42716. begin
  42717. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  42718. end;
  42719. procedure TSPI3A_SPI3ACON.setSTXISEL(thebits : TBits_2); inline;
  42720. begin
  42721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  42722. end;
  42723. function TSPI3A_SPI3ACON.getSTXISEL : TBits_2; inline;
  42724. begin
  42725. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  42726. end;
  42727. procedure TSPI3A_SPI3ACON.setMSTEN; inline;
  42728. begin
  42729. pTDefRegMap(@Self)^.&set := $00000020;
  42730. end;
  42731. procedure TSPI3A_SPI3ACON.clearMSTEN; inline;
  42732. begin
  42733. pTDefRegMap(@Self)^.clr := $00000020;
  42734. end;
  42735. procedure TSPI3A_SPI3ACON.setMSTEN(thebits : TBits_1); inline;
  42736. begin
  42737. if thebits = 0 then
  42738. pTDefRegMap(@Self)^.clr := $00000020
  42739. else
  42740. pTDefRegMap(@Self)^.&set := $00000020;
  42741. end;
  42742. function TSPI3A_SPI3ACON.getMSTEN : TBits_1; inline;
  42743. begin
  42744. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42745. end;
  42746. procedure TSPI3A_SPI3ACON.setCKP; inline;
  42747. begin
  42748. pTDefRegMap(@Self)^.&set := $00000040;
  42749. end;
  42750. procedure TSPI3A_SPI3ACON.clearCKP; inline;
  42751. begin
  42752. pTDefRegMap(@Self)^.clr := $00000040;
  42753. end;
  42754. procedure TSPI3A_SPI3ACON.setCKP(thebits : TBits_1); inline;
  42755. begin
  42756. if thebits = 0 then
  42757. pTDefRegMap(@Self)^.clr := $00000040
  42758. else
  42759. pTDefRegMap(@Self)^.&set := $00000040;
  42760. end;
  42761. function TSPI3A_SPI3ACON.getCKP : TBits_1; inline;
  42762. begin
  42763. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42764. end;
  42765. procedure TSPI3A_SPI3ACON.setSSEN; inline;
  42766. begin
  42767. pTDefRegMap(@Self)^.&set := $00000080;
  42768. end;
  42769. procedure TSPI3A_SPI3ACON.clearSSEN; inline;
  42770. begin
  42771. pTDefRegMap(@Self)^.clr := $00000080;
  42772. end;
  42773. procedure TSPI3A_SPI3ACON.setSSEN(thebits : TBits_1); inline;
  42774. begin
  42775. if thebits = 0 then
  42776. pTDefRegMap(@Self)^.clr := $00000080
  42777. else
  42778. pTDefRegMap(@Self)^.&set := $00000080;
  42779. end;
  42780. function TSPI3A_SPI3ACON.getSSEN : TBits_1; inline;
  42781. begin
  42782. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42783. end;
  42784. procedure TSPI3A_SPI3ACON.setCKE; inline;
  42785. begin
  42786. pTDefRegMap(@Self)^.&set := $00000100;
  42787. end;
  42788. procedure TSPI3A_SPI3ACON.clearCKE; inline;
  42789. begin
  42790. pTDefRegMap(@Self)^.clr := $00000100;
  42791. end;
  42792. procedure TSPI3A_SPI3ACON.setCKE(thebits : TBits_1); inline;
  42793. begin
  42794. if thebits = 0 then
  42795. pTDefRegMap(@Self)^.clr := $00000100
  42796. else
  42797. pTDefRegMap(@Self)^.&set := $00000100;
  42798. end;
  42799. function TSPI3A_SPI3ACON.getCKE : TBits_1; inline;
  42800. begin
  42801. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42802. end;
  42803. procedure TSPI3A_SPI3ACON.setSMP; inline;
  42804. begin
  42805. pTDefRegMap(@Self)^.&set := $00000200;
  42806. end;
  42807. procedure TSPI3A_SPI3ACON.clearSMP; inline;
  42808. begin
  42809. pTDefRegMap(@Self)^.clr := $00000200;
  42810. end;
  42811. procedure TSPI3A_SPI3ACON.setSMP(thebits : TBits_1); inline;
  42812. begin
  42813. if thebits = 0 then
  42814. pTDefRegMap(@Self)^.clr := $00000200
  42815. else
  42816. pTDefRegMap(@Self)^.&set := $00000200;
  42817. end;
  42818. function TSPI3A_SPI3ACON.getSMP : TBits_1; inline;
  42819. begin
  42820. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42821. end;
  42822. procedure TSPI3A_SPI3ACON.setMODE16; inline;
  42823. begin
  42824. pTDefRegMap(@Self)^.&set := $00000400;
  42825. end;
  42826. procedure TSPI3A_SPI3ACON.clearMODE16; inline;
  42827. begin
  42828. pTDefRegMap(@Self)^.clr := $00000400;
  42829. end;
  42830. procedure TSPI3A_SPI3ACON.setMODE16(thebits : TBits_1); inline;
  42831. begin
  42832. if thebits = 0 then
  42833. pTDefRegMap(@Self)^.clr := $00000400
  42834. else
  42835. pTDefRegMap(@Self)^.&set := $00000400;
  42836. end;
  42837. function TSPI3A_SPI3ACON.getMODE16 : TBits_1; inline;
  42838. begin
  42839. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42840. end;
  42841. procedure TSPI3A_SPI3ACON.setMODE32; inline;
  42842. begin
  42843. pTDefRegMap(@Self)^.&set := $00000800;
  42844. end;
  42845. procedure TSPI3A_SPI3ACON.clearMODE32; inline;
  42846. begin
  42847. pTDefRegMap(@Self)^.clr := $00000800;
  42848. end;
  42849. procedure TSPI3A_SPI3ACON.setMODE32(thebits : TBits_1); inline;
  42850. begin
  42851. if thebits = 0 then
  42852. pTDefRegMap(@Self)^.clr := $00000800
  42853. else
  42854. pTDefRegMap(@Self)^.&set := $00000800;
  42855. end;
  42856. function TSPI3A_SPI3ACON.getMODE32 : TBits_1; inline;
  42857. begin
  42858. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42859. end;
  42860. procedure TSPI3A_SPI3ACON.setDISSDO; inline;
  42861. begin
  42862. pTDefRegMap(@Self)^.&set := $00001000;
  42863. end;
  42864. procedure TSPI3A_SPI3ACON.clearDISSDO; inline;
  42865. begin
  42866. pTDefRegMap(@Self)^.clr := $00001000;
  42867. end;
  42868. procedure TSPI3A_SPI3ACON.setDISSDO(thebits : TBits_1); inline;
  42869. begin
  42870. if thebits = 0 then
  42871. pTDefRegMap(@Self)^.clr := $00001000
  42872. else
  42873. pTDefRegMap(@Self)^.&set := $00001000;
  42874. end;
  42875. function TSPI3A_SPI3ACON.getDISSDO : TBits_1; inline;
  42876. begin
  42877. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42878. end;
  42879. procedure TSPI3A_SPI3ACON.setSIDL; inline;
  42880. begin
  42881. pTDefRegMap(@Self)^.&set := $00002000;
  42882. end;
  42883. procedure TSPI3A_SPI3ACON.clearSIDL; inline;
  42884. begin
  42885. pTDefRegMap(@Self)^.clr := $00002000;
  42886. end;
  42887. procedure TSPI3A_SPI3ACON.setSIDL(thebits : TBits_1); inline;
  42888. begin
  42889. if thebits = 0 then
  42890. pTDefRegMap(@Self)^.clr := $00002000
  42891. else
  42892. pTDefRegMap(@Self)^.&set := $00002000;
  42893. end;
  42894. function TSPI3A_SPI3ACON.getSIDL : TBits_1; inline;
  42895. begin
  42896. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42897. end;
  42898. procedure TSPI3A_SPI3ACON.setON; inline;
  42899. begin
  42900. pTDefRegMap(@Self)^.&set := $00008000;
  42901. end;
  42902. procedure TSPI3A_SPI3ACON.clearON; inline;
  42903. begin
  42904. pTDefRegMap(@Self)^.clr := $00008000;
  42905. end;
  42906. procedure TSPI3A_SPI3ACON.setON(thebits : TBits_1); inline;
  42907. begin
  42908. if thebits = 0 then
  42909. pTDefRegMap(@Self)^.clr := $00008000
  42910. else
  42911. pTDefRegMap(@Self)^.&set := $00008000;
  42912. end;
  42913. function TSPI3A_SPI3ACON.getON : TBits_1; inline;
  42914. begin
  42915. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42916. end;
  42917. procedure TSPI3A_SPI3ACON.setENHBUF; inline;
  42918. begin
  42919. pTDefRegMap(@Self)^.&set := $00010000;
  42920. end;
  42921. procedure TSPI3A_SPI3ACON.clearENHBUF; inline;
  42922. begin
  42923. pTDefRegMap(@Self)^.clr := $00010000;
  42924. end;
  42925. procedure TSPI3A_SPI3ACON.setENHBUF(thebits : TBits_1); inline;
  42926. begin
  42927. if thebits = 0 then
  42928. pTDefRegMap(@Self)^.clr := $00010000
  42929. else
  42930. pTDefRegMap(@Self)^.&set := $00010000;
  42931. end;
  42932. function TSPI3A_SPI3ACON.getENHBUF : TBits_1; inline;
  42933. begin
  42934. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  42935. end;
  42936. procedure TSPI3A_SPI3ACON.setSPIFE; inline;
  42937. begin
  42938. pTDefRegMap(@Self)^.&set := $00020000;
  42939. end;
  42940. procedure TSPI3A_SPI3ACON.clearSPIFE; inline;
  42941. begin
  42942. pTDefRegMap(@Self)^.clr := $00020000;
  42943. end;
  42944. procedure TSPI3A_SPI3ACON.setSPIFE(thebits : TBits_1); inline;
  42945. begin
  42946. if thebits = 0 then
  42947. pTDefRegMap(@Self)^.clr := $00020000
  42948. else
  42949. pTDefRegMap(@Self)^.&set := $00020000;
  42950. end;
  42951. function TSPI3A_SPI3ACON.getSPIFE : TBits_1; inline;
  42952. begin
  42953. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  42954. end;
  42955. procedure TSPI3A_SPI3ACON.setFRMCNT(thebits : TBits_3); inline;
  42956. begin
  42957. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  42958. end;
  42959. function TSPI3A_SPI3ACON.getFRMCNT : TBits_3; inline;
  42960. begin
  42961. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  42962. end;
  42963. procedure TSPI3A_SPI3ACON.setFRMSYPW; inline;
  42964. begin
  42965. pTDefRegMap(@Self)^.&set := $08000000;
  42966. end;
  42967. procedure TSPI3A_SPI3ACON.clearFRMSYPW; inline;
  42968. begin
  42969. pTDefRegMap(@Self)^.clr := $08000000;
  42970. end;
  42971. procedure TSPI3A_SPI3ACON.setFRMSYPW(thebits : TBits_1); inline;
  42972. begin
  42973. if thebits = 0 then
  42974. pTDefRegMap(@Self)^.clr := $08000000
  42975. else
  42976. pTDefRegMap(@Self)^.&set := $08000000;
  42977. end;
  42978. function TSPI3A_SPI3ACON.getFRMSYPW : TBits_1; inline;
  42979. begin
  42980. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  42981. end;
  42982. procedure TSPI3A_SPI3ACON.setMSSEN; inline;
  42983. begin
  42984. pTDefRegMap(@Self)^.&set := $10000000;
  42985. end;
  42986. procedure TSPI3A_SPI3ACON.clearMSSEN; inline;
  42987. begin
  42988. pTDefRegMap(@Self)^.clr := $10000000;
  42989. end;
  42990. procedure TSPI3A_SPI3ACON.setMSSEN(thebits : TBits_1); inline;
  42991. begin
  42992. if thebits = 0 then
  42993. pTDefRegMap(@Self)^.clr := $10000000
  42994. else
  42995. pTDefRegMap(@Self)^.&set := $10000000;
  42996. end;
  42997. function TSPI3A_SPI3ACON.getMSSEN : TBits_1; inline;
  42998. begin
  42999. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  43000. end;
  43001. procedure TSPI3A_SPI3ACON.setFRMPOL; inline;
  43002. begin
  43003. pTDefRegMap(@Self)^.&set := $20000000;
  43004. end;
  43005. procedure TSPI3A_SPI3ACON.clearFRMPOL; inline;
  43006. begin
  43007. pTDefRegMap(@Self)^.clr := $20000000;
  43008. end;
  43009. procedure TSPI3A_SPI3ACON.setFRMPOL(thebits : TBits_1); inline;
  43010. begin
  43011. if thebits = 0 then
  43012. pTDefRegMap(@Self)^.clr := $20000000
  43013. else
  43014. pTDefRegMap(@Self)^.&set := $20000000;
  43015. end;
  43016. function TSPI3A_SPI3ACON.getFRMPOL : TBits_1; inline;
  43017. begin
  43018. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  43019. end;
  43020. procedure TSPI3A_SPI3ACON.setFRMSYNC; inline;
  43021. begin
  43022. pTDefRegMap(@Self)^.&set := $40000000;
  43023. end;
  43024. procedure TSPI3A_SPI3ACON.clearFRMSYNC; inline;
  43025. begin
  43026. pTDefRegMap(@Self)^.clr := $40000000;
  43027. end;
  43028. procedure TSPI3A_SPI3ACON.setFRMSYNC(thebits : TBits_1); inline;
  43029. begin
  43030. if thebits = 0 then
  43031. pTDefRegMap(@Self)^.clr := $40000000
  43032. else
  43033. pTDefRegMap(@Self)^.&set := $40000000;
  43034. end;
  43035. function TSPI3A_SPI3ACON.getFRMSYNC : TBits_1; inline;
  43036. begin
  43037. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  43038. end;
  43039. procedure TSPI3A_SPI3ACON.setFRMEN; inline;
  43040. begin
  43041. pTDefRegMap(@Self)^.&set := $80000000;
  43042. end;
  43043. procedure TSPI3A_SPI3ACON.clearFRMEN; inline;
  43044. begin
  43045. pTDefRegMap(@Self)^.clr := $80000000;
  43046. end;
  43047. procedure TSPI3A_SPI3ACON.setFRMEN(thebits : TBits_1); inline;
  43048. begin
  43049. if thebits = 0 then
  43050. pTDefRegMap(@Self)^.clr := $80000000
  43051. else
  43052. pTDefRegMap(@Self)^.&set := $80000000;
  43053. end;
  43054. function TSPI3A_SPI3ACON.getFRMEN : TBits_1; inline;
  43055. begin
  43056. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  43057. end;
  43058. procedure TSPI3A_SPI3ACON.setw(thebits : TBits_32); inline;
  43059. begin
  43060. pTDefRegMap(@Self)^.val := thebits;
  43061. end;
  43062. function TSPI3A_SPI3ACON.getw : TBits_32; inline;
  43063. begin
  43064. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43065. end;
  43066. procedure TSPI3A_SPI4CON.setSRXISEL(thebits : TBits_2); inline;
  43067. begin
  43068. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  43069. end;
  43070. function TSPI3A_SPI4CON.getSRXISEL : TBits_2; inline;
  43071. begin
  43072. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  43073. end;
  43074. procedure TSPI3A_SPI4CON.setSTXISEL(thebits : TBits_2); inline;
  43075. begin
  43076. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  43077. end;
  43078. function TSPI3A_SPI4CON.getSTXISEL : TBits_2; inline;
  43079. begin
  43080. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  43081. end;
  43082. procedure TSPI3A_SPI4CON.setMSTEN; inline;
  43083. begin
  43084. pTDefRegMap(@Self)^.&set := $00000020;
  43085. end;
  43086. procedure TSPI3A_SPI4CON.clearMSTEN; inline;
  43087. begin
  43088. pTDefRegMap(@Self)^.clr := $00000020;
  43089. end;
  43090. procedure TSPI3A_SPI4CON.setMSTEN(thebits : TBits_1); inline;
  43091. begin
  43092. if thebits = 0 then
  43093. pTDefRegMap(@Self)^.clr := $00000020
  43094. else
  43095. pTDefRegMap(@Self)^.&set := $00000020;
  43096. end;
  43097. function TSPI3A_SPI4CON.getMSTEN : TBits_1; inline;
  43098. begin
  43099. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43100. end;
  43101. procedure TSPI3A_SPI4CON.setCKP; inline;
  43102. begin
  43103. pTDefRegMap(@Self)^.&set := $00000040;
  43104. end;
  43105. procedure TSPI3A_SPI4CON.clearCKP; inline;
  43106. begin
  43107. pTDefRegMap(@Self)^.clr := $00000040;
  43108. end;
  43109. procedure TSPI3A_SPI4CON.setCKP(thebits : TBits_1); inline;
  43110. begin
  43111. if thebits = 0 then
  43112. pTDefRegMap(@Self)^.clr := $00000040
  43113. else
  43114. pTDefRegMap(@Self)^.&set := $00000040;
  43115. end;
  43116. function TSPI3A_SPI4CON.getCKP : TBits_1; inline;
  43117. begin
  43118. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43119. end;
  43120. procedure TSPI3A_SPI4CON.setSSEN; inline;
  43121. begin
  43122. pTDefRegMap(@Self)^.&set := $00000080;
  43123. end;
  43124. procedure TSPI3A_SPI4CON.clearSSEN; inline;
  43125. begin
  43126. pTDefRegMap(@Self)^.clr := $00000080;
  43127. end;
  43128. procedure TSPI3A_SPI4CON.setSSEN(thebits : TBits_1); inline;
  43129. begin
  43130. if thebits = 0 then
  43131. pTDefRegMap(@Self)^.clr := $00000080
  43132. else
  43133. pTDefRegMap(@Self)^.&set := $00000080;
  43134. end;
  43135. function TSPI3A_SPI4CON.getSSEN : TBits_1; inline;
  43136. begin
  43137. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43138. end;
  43139. procedure TSPI3A_SPI4CON.setCKE; inline;
  43140. begin
  43141. pTDefRegMap(@Self)^.&set := $00000100;
  43142. end;
  43143. procedure TSPI3A_SPI4CON.clearCKE; inline;
  43144. begin
  43145. pTDefRegMap(@Self)^.clr := $00000100;
  43146. end;
  43147. procedure TSPI3A_SPI4CON.setCKE(thebits : TBits_1); inline;
  43148. begin
  43149. if thebits = 0 then
  43150. pTDefRegMap(@Self)^.clr := $00000100
  43151. else
  43152. pTDefRegMap(@Self)^.&set := $00000100;
  43153. end;
  43154. function TSPI3A_SPI4CON.getCKE : TBits_1; inline;
  43155. begin
  43156. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43157. end;
  43158. procedure TSPI3A_SPI4CON.setSMP; inline;
  43159. begin
  43160. pTDefRegMap(@Self)^.&set := $00000200;
  43161. end;
  43162. procedure TSPI3A_SPI4CON.clearSMP; inline;
  43163. begin
  43164. pTDefRegMap(@Self)^.clr := $00000200;
  43165. end;
  43166. procedure TSPI3A_SPI4CON.setSMP(thebits : TBits_1); inline;
  43167. begin
  43168. if thebits = 0 then
  43169. pTDefRegMap(@Self)^.clr := $00000200
  43170. else
  43171. pTDefRegMap(@Self)^.&set := $00000200;
  43172. end;
  43173. function TSPI3A_SPI4CON.getSMP : TBits_1; inline;
  43174. begin
  43175. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43176. end;
  43177. procedure TSPI3A_SPI4CON.setMODE16; inline;
  43178. begin
  43179. pTDefRegMap(@Self)^.&set := $00000400;
  43180. end;
  43181. procedure TSPI3A_SPI4CON.clearMODE16; inline;
  43182. begin
  43183. pTDefRegMap(@Self)^.clr := $00000400;
  43184. end;
  43185. procedure TSPI3A_SPI4CON.setMODE16(thebits : TBits_1); inline;
  43186. begin
  43187. if thebits = 0 then
  43188. pTDefRegMap(@Self)^.clr := $00000400
  43189. else
  43190. pTDefRegMap(@Self)^.&set := $00000400;
  43191. end;
  43192. function TSPI3A_SPI4CON.getMODE16 : TBits_1; inline;
  43193. begin
  43194. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43195. end;
  43196. procedure TSPI3A_SPI4CON.setMODE32; inline;
  43197. begin
  43198. pTDefRegMap(@Self)^.&set := $00000800;
  43199. end;
  43200. procedure TSPI3A_SPI4CON.clearMODE32; inline;
  43201. begin
  43202. pTDefRegMap(@Self)^.clr := $00000800;
  43203. end;
  43204. procedure TSPI3A_SPI4CON.setMODE32(thebits : TBits_1); inline;
  43205. begin
  43206. if thebits = 0 then
  43207. pTDefRegMap(@Self)^.clr := $00000800
  43208. else
  43209. pTDefRegMap(@Self)^.&set := $00000800;
  43210. end;
  43211. function TSPI3A_SPI4CON.getMODE32 : TBits_1; inline;
  43212. begin
  43213. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43214. end;
  43215. procedure TSPI3A_SPI4CON.setDISSDO; inline;
  43216. begin
  43217. pTDefRegMap(@Self)^.&set := $00001000;
  43218. end;
  43219. procedure TSPI3A_SPI4CON.clearDISSDO; inline;
  43220. begin
  43221. pTDefRegMap(@Self)^.clr := $00001000;
  43222. end;
  43223. procedure TSPI3A_SPI4CON.setDISSDO(thebits : TBits_1); inline;
  43224. begin
  43225. if thebits = 0 then
  43226. pTDefRegMap(@Self)^.clr := $00001000
  43227. else
  43228. pTDefRegMap(@Self)^.&set := $00001000;
  43229. end;
  43230. function TSPI3A_SPI4CON.getDISSDO : TBits_1; inline;
  43231. begin
  43232. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43233. end;
  43234. procedure TSPI3A_SPI4CON.setSIDL; inline;
  43235. begin
  43236. pTDefRegMap(@Self)^.&set := $00002000;
  43237. end;
  43238. procedure TSPI3A_SPI4CON.clearSIDL; inline;
  43239. begin
  43240. pTDefRegMap(@Self)^.clr := $00002000;
  43241. end;
  43242. procedure TSPI3A_SPI4CON.setSIDL(thebits : TBits_1); inline;
  43243. begin
  43244. if thebits = 0 then
  43245. pTDefRegMap(@Self)^.clr := $00002000
  43246. else
  43247. pTDefRegMap(@Self)^.&set := $00002000;
  43248. end;
  43249. function TSPI3A_SPI4CON.getSIDL : TBits_1; inline;
  43250. begin
  43251. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43252. end;
  43253. procedure TSPI3A_SPI4CON.setON; inline;
  43254. begin
  43255. pTDefRegMap(@Self)^.&set := $00008000;
  43256. end;
  43257. procedure TSPI3A_SPI4CON.clearON; inline;
  43258. begin
  43259. pTDefRegMap(@Self)^.clr := $00008000;
  43260. end;
  43261. procedure TSPI3A_SPI4CON.setON(thebits : TBits_1); inline;
  43262. begin
  43263. if thebits = 0 then
  43264. pTDefRegMap(@Self)^.clr := $00008000
  43265. else
  43266. pTDefRegMap(@Self)^.&set := $00008000;
  43267. end;
  43268. function TSPI3A_SPI4CON.getON : TBits_1; inline;
  43269. begin
  43270. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43271. end;
  43272. procedure TSPI3A_SPI4CON.setENHBUF; inline;
  43273. begin
  43274. pTDefRegMap(@Self)^.&set := $00010000;
  43275. end;
  43276. procedure TSPI3A_SPI4CON.clearENHBUF; inline;
  43277. begin
  43278. pTDefRegMap(@Self)^.clr := $00010000;
  43279. end;
  43280. procedure TSPI3A_SPI4CON.setENHBUF(thebits : TBits_1); inline;
  43281. begin
  43282. if thebits = 0 then
  43283. pTDefRegMap(@Self)^.clr := $00010000
  43284. else
  43285. pTDefRegMap(@Self)^.&set := $00010000;
  43286. end;
  43287. function TSPI3A_SPI4CON.getENHBUF : TBits_1; inline;
  43288. begin
  43289. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  43290. end;
  43291. procedure TSPI3A_SPI4CON.setSPIFE; inline;
  43292. begin
  43293. pTDefRegMap(@Self)^.&set := $00020000;
  43294. end;
  43295. procedure TSPI3A_SPI4CON.clearSPIFE; inline;
  43296. begin
  43297. pTDefRegMap(@Self)^.clr := $00020000;
  43298. end;
  43299. procedure TSPI3A_SPI4CON.setSPIFE(thebits : TBits_1); inline;
  43300. begin
  43301. if thebits = 0 then
  43302. pTDefRegMap(@Self)^.clr := $00020000
  43303. else
  43304. pTDefRegMap(@Self)^.&set := $00020000;
  43305. end;
  43306. function TSPI3A_SPI4CON.getSPIFE : TBits_1; inline;
  43307. begin
  43308. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  43309. end;
  43310. procedure TSPI3A_SPI4CON.setFRMCNT(thebits : TBits_3); inline;
  43311. begin
  43312. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  43313. end;
  43314. function TSPI3A_SPI4CON.getFRMCNT : TBits_3; inline;
  43315. begin
  43316. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  43317. end;
  43318. procedure TSPI3A_SPI4CON.setFRMSYPW; inline;
  43319. begin
  43320. pTDefRegMap(@Self)^.&set := $08000000;
  43321. end;
  43322. procedure TSPI3A_SPI4CON.clearFRMSYPW; inline;
  43323. begin
  43324. pTDefRegMap(@Self)^.clr := $08000000;
  43325. end;
  43326. procedure TSPI3A_SPI4CON.setFRMSYPW(thebits : TBits_1); inline;
  43327. begin
  43328. if thebits = 0 then
  43329. pTDefRegMap(@Self)^.clr := $08000000
  43330. else
  43331. pTDefRegMap(@Self)^.&set := $08000000;
  43332. end;
  43333. function TSPI3A_SPI4CON.getFRMSYPW : TBits_1; inline;
  43334. begin
  43335. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  43336. end;
  43337. procedure TSPI3A_SPI4CON.setMSSEN; inline;
  43338. begin
  43339. pTDefRegMap(@Self)^.&set := $10000000;
  43340. end;
  43341. procedure TSPI3A_SPI4CON.clearMSSEN; inline;
  43342. begin
  43343. pTDefRegMap(@Self)^.clr := $10000000;
  43344. end;
  43345. procedure TSPI3A_SPI4CON.setMSSEN(thebits : TBits_1); inline;
  43346. begin
  43347. if thebits = 0 then
  43348. pTDefRegMap(@Self)^.clr := $10000000
  43349. else
  43350. pTDefRegMap(@Self)^.&set := $10000000;
  43351. end;
  43352. function TSPI3A_SPI4CON.getMSSEN : TBits_1; inline;
  43353. begin
  43354. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  43355. end;
  43356. procedure TSPI3A_SPI4CON.setFRMPOL; inline;
  43357. begin
  43358. pTDefRegMap(@Self)^.&set := $20000000;
  43359. end;
  43360. procedure TSPI3A_SPI4CON.clearFRMPOL; inline;
  43361. begin
  43362. pTDefRegMap(@Self)^.clr := $20000000;
  43363. end;
  43364. procedure TSPI3A_SPI4CON.setFRMPOL(thebits : TBits_1); inline;
  43365. begin
  43366. if thebits = 0 then
  43367. pTDefRegMap(@Self)^.clr := $20000000
  43368. else
  43369. pTDefRegMap(@Self)^.&set := $20000000;
  43370. end;
  43371. function TSPI3A_SPI4CON.getFRMPOL : TBits_1; inline;
  43372. begin
  43373. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  43374. end;
  43375. procedure TSPI3A_SPI4CON.setFRMSYNC; inline;
  43376. begin
  43377. pTDefRegMap(@Self)^.&set := $40000000;
  43378. end;
  43379. procedure TSPI3A_SPI4CON.clearFRMSYNC; inline;
  43380. begin
  43381. pTDefRegMap(@Self)^.clr := $40000000;
  43382. end;
  43383. procedure TSPI3A_SPI4CON.setFRMSYNC(thebits : TBits_1); inline;
  43384. begin
  43385. if thebits = 0 then
  43386. pTDefRegMap(@Self)^.clr := $40000000
  43387. else
  43388. pTDefRegMap(@Self)^.&set := $40000000;
  43389. end;
  43390. function TSPI3A_SPI4CON.getFRMSYNC : TBits_1; inline;
  43391. begin
  43392. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  43393. end;
  43394. procedure TSPI3A_SPI4CON.setFRMEN; inline;
  43395. begin
  43396. pTDefRegMap(@Self)^.&set := $80000000;
  43397. end;
  43398. procedure TSPI3A_SPI4CON.clearFRMEN; inline;
  43399. begin
  43400. pTDefRegMap(@Self)^.clr := $80000000;
  43401. end;
  43402. procedure TSPI3A_SPI4CON.setFRMEN(thebits : TBits_1); inline;
  43403. begin
  43404. if thebits = 0 then
  43405. pTDefRegMap(@Self)^.clr := $80000000
  43406. else
  43407. pTDefRegMap(@Self)^.&set := $80000000;
  43408. end;
  43409. function TSPI3A_SPI4CON.getFRMEN : TBits_1; inline;
  43410. begin
  43411. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  43412. end;
  43413. procedure TSPI3A_SPI4CON.setw(thebits : TBits_32); inline;
  43414. begin
  43415. pTDefRegMap(@Self)^.val := thebits;
  43416. end;
  43417. function TSPI3A_SPI4CON.getw : TBits_32; inline;
  43418. begin
  43419. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43420. end;
  43421. procedure TSPI3A_SPI3ASTAT.setSPIRBF; inline;
  43422. begin
  43423. pTDefRegMap(@Self)^.&set := $00000001;
  43424. end;
  43425. procedure TSPI3A_SPI3ASTAT.clearSPIRBF; inline;
  43426. begin
  43427. pTDefRegMap(@Self)^.clr := $00000001;
  43428. end;
  43429. procedure TSPI3A_SPI3ASTAT.setSPIRBF(thebits : TBits_1); inline;
  43430. begin
  43431. if thebits = 0 then
  43432. pTDefRegMap(@Self)^.clr := $00000001
  43433. else
  43434. pTDefRegMap(@Self)^.&set := $00000001;
  43435. end;
  43436. function TSPI3A_SPI3ASTAT.getSPIRBF : TBits_1; inline;
  43437. begin
  43438. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43439. end;
  43440. procedure TSPI3A_SPI3ASTAT.setSPITBF; inline;
  43441. begin
  43442. pTDefRegMap(@Self)^.&set := $00000002;
  43443. end;
  43444. procedure TSPI3A_SPI3ASTAT.clearSPITBF; inline;
  43445. begin
  43446. pTDefRegMap(@Self)^.clr := $00000002;
  43447. end;
  43448. procedure TSPI3A_SPI3ASTAT.setSPITBF(thebits : TBits_1); inline;
  43449. begin
  43450. if thebits = 0 then
  43451. pTDefRegMap(@Self)^.clr := $00000002
  43452. else
  43453. pTDefRegMap(@Self)^.&set := $00000002;
  43454. end;
  43455. function TSPI3A_SPI3ASTAT.getSPITBF : TBits_1; inline;
  43456. begin
  43457. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43458. end;
  43459. procedure TSPI3A_SPI3ASTAT.setSPITBE; inline;
  43460. begin
  43461. pTDefRegMap(@Self)^.&set := $00000008;
  43462. end;
  43463. procedure TSPI3A_SPI3ASTAT.clearSPITBE; inline;
  43464. begin
  43465. pTDefRegMap(@Self)^.clr := $00000008;
  43466. end;
  43467. procedure TSPI3A_SPI3ASTAT.setSPITBE(thebits : TBits_1); inline;
  43468. begin
  43469. if thebits = 0 then
  43470. pTDefRegMap(@Self)^.clr := $00000008
  43471. else
  43472. pTDefRegMap(@Self)^.&set := $00000008;
  43473. end;
  43474. function TSPI3A_SPI3ASTAT.getSPITBE : TBits_1; inline;
  43475. begin
  43476. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43477. end;
  43478. procedure TSPI3A_SPI3ASTAT.setSPIRBE; inline;
  43479. begin
  43480. pTDefRegMap(@Self)^.&set := $00000020;
  43481. end;
  43482. procedure TSPI3A_SPI3ASTAT.clearSPIRBE; inline;
  43483. begin
  43484. pTDefRegMap(@Self)^.clr := $00000020;
  43485. end;
  43486. procedure TSPI3A_SPI3ASTAT.setSPIRBE(thebits : TBits_1); inline;
  43487. begin
  43488. if thebits = 0 then
  43489. pTDefRegMap(@Self)^.clr := $00000020
  43490. else
  43491. pTDefRegMap(@Self)^.&set := $00000020;
  43492. end;
  43493. function TSPI3A_SPI3ASTAT.getSPIRBE : TBits_1; inline;
  43494. begin
  43495. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43496. end;
  43497. procedure TSPI3A_SPI3ASTAT.setSPIROV; inline;
  43498. begin
  43499. pTDefRegMap(@Self)^.&set := $00000040;
  43500. end;
  43501. procedure TSPI3A_SPI3ASTAT.clearSPIROV; inline;
  43502. begin
  43503. pTDefRegMap(@Self)^.clr := $00000040;
  43504. end;
  43505. procedure TSPI3A_SPI3ASTAT.setSPIROV(thebits : TBits_1); inline;
  43506. begin
  43507. if thebits = 0 then
  43508. pTDefRegMap(@Self)^.clr := $00000040
  43509. else
  43510. pTDefRegMap(@Self)^.&set := $00000040;
  43511. end;
  43512. function TSPI3A_SPI3ASTAT.getSPIROV : TBits_1; inline;
  43513. begin
  43514. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43515. end;
  43516. procedure TSPI3A_SPI3ASTAT.setSRMT; inline;
  43517. begin
  43518. pTDefRegMap(@Self)^.&set := $00000080;
  43519. end;
  43520. procedure TSPI3A_SPI3ASTAT.clearSRMT; inline;
  43521. begin
  43522. pTDefRegMap(@Self)^.clr := $00000080;
  43523. end;
  43524. procedure TSPI3A_SPI3ASTAT.setSRMT(thebits : TBits_1); inline;
  43525. begin
  43526. if thebits = 0 then
  43527. pTDefRegMap(@Self)^.clr := $00000080
  43528. else
  43529. pTDefRegMap(@Self)^.&set := $00000080;
  43530. end;
  43531. function TSPI3A_SPI3ASTAT.getSRMT : TBits_1; inline;
  43532. begin
  43533. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43534. end;
  43535. procedure TSPI3A_SPI3ASTAT.setSPITUR; inline;
  43536. begin
  43537. pTDefRegMap(@Self)^.&set := $00000100;
  43538. end;
  43539. procedure TSPI3A_SPI3ASTAT.clearSPITUR; inline;
  43540. begin
  43541. pTDefRegMap(@Self)^.clr := $00000100;
  43542. end;
  43543. procedure TSPI3A_SPI3ASTAT.setSPITUR(thebits : TBits_1); inline;
  43544. begin
  43545. if thebits = 0 then
  43546. pTDefRegMap(@Self)^.clr := $00000100
  43547. else
  43548. pTDefRegMap(@Self)^.&set := $00000100;
  43549. end;
  43550. function TSPI3A_SPI3ASTAT.getSPITUR : TBits_1; inline;
  43551. begin
  43552. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43553. end;
  43554. procedure TSPI3A_SPI3ASTAT.setSPIBUSY; inline;
  43555. begin
  43556. pTDefRegMap(@Self)^.&set := $00000800;
  43557. end;
  43558. procedure TSPI3A_SPI3ASTAT.clearSPIBUSY; inline;
  43559. begin
  43560. pTDefRegMap(@Self)^.clr := $00000800;
  43561. end;
  43562. procedure TSPI3A_SPI3ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  43563. begin
  43564. if thebits = 0 then
  43565. pTDefRegMap(@Self)^.clr := $00000800
  43566. else
  43567. pTDefRegMap(@Self)^.&set := $00000800;
  43568. end;
  43569. function TSPI3A_SPI3ASTAT.getSPIBUSY : TBits_1; inline;
  43570. begin
  43571. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43572. end;
  43573. procedure TSPI3A_SPI3ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  43574. begin
  43575. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  43576. end;
  43577. function TSPI3A_SPI3ASTAT.getTXBUFELM : TBits_5; inline;
  43578. begin
  43579. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  43580. end;
  43581. procedure TSPI3A_SPI3ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  43582. begin
  43583. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  43584. end;
  43585. function TSPI3A_SPI3ASTAT.getRXBUFELM : TBits_5; inline;
  43586. begin
  43587. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  43588. end;
  43589. procedure TSPI3A_SPI3ASTAT.setw(thebits : TBits_32); inline;
  43590. begin
  43591. pTDefRegMap(@Self)^.val := thebits;
  43592. end;
  43593. function TSPI3A_SPI3ASTAT.getw : TBits_32; inline;
  43594. begin
  43595. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43596. end;
  43597. procedure TSPI3A_SPI4STAT.setSPIRBF; inline;
  43598. begin
  43599. pTDefRegMap(@Self)^.&set := $00000001;
  43600. end;
  43601. procedure TSPI3A_SPI4STAT.clearSPIRBF; inline;
  43602. begin
  43603. pTDefRegMap(@Self)^.clr := $00000001;
  43604. end;
  43605. procedure TSPI3A_SPI4STAT.setSPIRBF(thebits : TBits_1); inline;
  43606. begin
  43607. if thebits = 0 then
  43608. pTDefRegMap(@Self)^.clr := $00000001
  43609. else
  43610. pTDefRegMap(@Self)^.&set := $00000001;
  43611. end;
  43612. function TSPI3A_SPI4STAT.getSPIRBF : TBits_1; inline;
  43613. begin
  43614. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43615. end;
  43616. procedure TSPI3A_SPI4STAT.setSPITBF; inline;
  43617. begin
  43618. pTDefRegMap(@Self)^.&set := $00000002;
  43619. end;
  43620. procedure TSPI3A_SPI4STAT.clearSPITBF; inline;
  43621. begin
  43622. pTDefRegMap(@Self)^.clr := $00000002;
  43623. end;
  43624. procedure TSPI3A_SPI4STAT.setSPITBF(thebits : TBits_1); inline;
  43625. begin
  43626. if thebits = 0 then
  43627. pTDefRegMap(@Self)^.clr := $00000002
  43628. else
  43629. pTDefRegMap(@Self)^.&set := $00000002;
  43630. end;
  43631. function TSPI3A_SPI4STAT.getSPITBF : TBits_1; inline;
  43632. begin
  43633. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43634. end;
  43635. procedure TSPI3A_SPI4STAT.setSPITBE; inline;
  43636. begin
  43637. pTDefRegMap(@Self)^.&set := $00000008;
  43638. end;
  43639. procedure TSPI3A_SPI4STAT.clearSPITBE; inline;
  43640. begin
  43641. pTDefRegMap(@Self)^.clr := $00000008;
  43642. end;
  43643. procedure TSPI3A_SPI4STAT.setSPITBE(thebits : TBits_1); inline;
  43644. begin
  43645. if thebits = 0 then
  43646. pTDefRegMap(@Self)^.clr := $00000008
  43647. else
  43648. pTDefRegMap(@Self)^.&set := $00000008;
  43649. end;
  43650. function TSPI3A_SPI4STAT.getSPITBE : TBits_1; inline;
  43651. begin
  43652. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43653. end;
  43654. procedure TSPI3A_SPI4STAT.setSPIRBE; inline;
  43655. begin
  43656. pTDefRegMap(@Self)^.&set := $00000020;
  43657. end;
  43658. procedure TSPI3A_SPI4STAT.clearSPIRBE; inline;
  43659. begin
  43660. pTDefRegMap(@Self)^.clr := $00000020;
  43661. end;
  43662. procedure TSPI3A_SPI4STAT.setSPIRBE(thebits : TBits_1); inline;
  43663. begin
  43664. if thebits = 0 then
  43665. pTDefRegMap(@Self)^.clr := $00000020
  43666. else
  43667. pTDefRegMap(@Self)^.&set := $00000020;
  43668. end;
  43669. function TSPI3A_SPI4STAT.getSPIRBE : TBits_1; inline;
  43670. begin
  43671. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43672. end;
  43673. procedure TSPI3A_SPI4STAT.setSPIROV; inline;
  43674. begin
  43675. pTDefRegMap(@Self)^.&set := $00000040;
  43676. end;
  43677. procedure TSPI3A_SPI4STAT.clearSPIROV; inline;
  43678. begin
  43679. pTDefRegMap(@Self)^.clr := $00000040;
  43680. end;
  43681. procedure TSPI3A_SPI4STAT.setSPIROV(thebits : TBits_1); inline;
  43682. begin
  43683. if thebits = 0 then
  43684. pTDefRegMap(@Self)^.clr := $00000040
  43685. else
  43686. pTDefRegMap(@Self)^.&set := $00000040;
  43687. end;
  43688. function TSPI3A_SPI4STAT.getSPIROV : TBits_1; inline;
  43689. begin
  43690. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43691. end;
  43692. procedure TSPI3A_SPI4STAT.setSRMT; inline;
  43693. begin
  43694. pTDefRegMap(@Self)^.&set := $00000080;
  43695. end;
  43696. procedure TSPI3A_SPI4STAT.clearSRMT; inline;
  43697. begin
  43698. pTDefRegMap(@Self)^.clr := $00000080;
  43699. end;
  43700. procedure TSPI3A_SPI4STAT.setSRMT(thebits : TBits_1); inline;
  43701. begin
  43702. if thebits = 0 then
  43703. pTDefRegMap(@Self)^.clr := $00000080
  43704. else
  43705. pTDefRegMap(@Self)^.&set := $00000080;
  43706. end;
  43707. function TSPI3A_SPI4STAT.getSRMT : TBits_1; inline;
  43708. begin
  43709. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43710. end;
  43711. procedure TSPI3A_SPI4STAT.setSPITUR; inline;
  43712. begin
  43713. pTDefRegMap(@Self)^.&set := $00000100;
  43714. end;
  43715. procedure TSPI3A_SPI4STAT.clearSPITUR; inline;
  43716. begin
  43717. pTDefRegMap(@Self)^.clr := $00000100;
  43718. end;
  43719. procedure TSPI3A_SPI4STAT.setSPITUR(thebits : TBits_1); inline;
  43720. begin
  43721. if thebits = 0 then
  43722. pTDefRegMap(@Self)^.clr := $00000100
  43723. else
  43724. pTDefRegMap(@Self)^.&set := $00000100;
  43725. end;
  43726. function TSPI3A_SPI4STAT.getSPITUR : TBits_1; inline;
  43727. begin
  43728. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43729. end;
  43730. procedure TSPI3A_SPI4STAT.setSPIBUSY; inline;
  43731. begin
  43732. pTDefRegMap(@Self)^.&set := $00000800;
  43733. end;
  43734. procedure TSPI3A_SPI4STAT.clearSPIBUSY; inline;
  43735. begin
  43736. pTDefRegMap(@Self)^.clr := $00000800;
  43737. end;
  43738. procedure TSPI3A_SPI4STAT.setSPIBUSY(thebits : TBits_1); inline;
  43739. begin
  43740. if thebits = 0 then
  43741. pTDefRegMap(@Self)^.clr := $00000800
  43742. else
  43743. pTDefRegMap(@Self)^.&set := $00000800;
  43744. end;
  43745. function TSPI3A_SPI4STAT.getSPIBUSY : TBits_1; inline;
  43746. begin
  43747. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43748. end;
  43749. procedure TSPI3A_SPI4STAT.setTXBUFELM(thebits : TBits_5); inline;
  43750. begin
  43751. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  43752. end;
  43753. function TSPI3A_SPI4STAT.getTXBUFELM : TBits_5; inline;
  43754. begin
  43755. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  43756. end;
  43757. procedure TSPI3A_SPI4STAT.setRXBUFELM(thebits : TBits_5); inline;
  43758. begin
  43759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  43760. end;
  43761. function TSPI3A_SPI4STAT.getRXBUFELM : TBits_5; inline;
  43762. begin
  43763. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  43764. end;
  43765. procedure TSPI3A_SPI4STAT.setw(thebits : TBits_32); inline;
  43766. begin
  43767. pTDefRegMap(@Self)^.val := thebits;
  43768. end;
  43769. function TSPI3A_SPI4STAT.getw : TBits_32; inline;
  43770. begin
  43771. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43772. end;
  43773. procedure TSPI1_SPI1CON.setSRXISEL(thebits : TBits_2); inline;
  43774. begin
  43775. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  43776. end;
  43777. function TSPI1_SPI1CON.getSRXISEL : TBits_2; inline;
  43778. begin
  43779. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  43780. end;
  43781. procedure TSPI1_SPI1CON.setSTXISEL(thebits : TBits_2); inline;
  43782. begin
  43783. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  43784. end;
  43785. function TSPI1_SPI1CON.getSTXISEL : TBits_2; inline;
  43786. begin
  43787. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  43788. end;
  43789. procedure TSPI1_SPI1CON.setMSTEN; inline;
  43790. begin
  43791. pTDefRegMap(@Self)^.&set := $00000020;
  43792. end;
  43793. procedure TSPI1_SPI1CON.clearMSTEN; inline;
  43794. begin
  43795. pTDefRegMap(@Self)^.clr := $00000020;
  43796. end;
  43797. procedure TSPI1_SPI1CON.setMSTEN(thebits : TBits_1); inline;
  43798. begin
  43799. if thebits = 0 then
  43800. pTDefRegMap(@Self)^.clr := $00000020
  43801. else
  43802. pTDefRegMap(@Self)^.&set := $00000020;
  43803. end;
  43804. function TSPI1_SPI1CON.getMSTEN : TBits_1; inline;
  43805. begin
  43806. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43807. end;
  43808. procedure TSPI1_SPI1CON.setCKP; inline;
  43809. begin
  43810. pTDefRegMap(@Self)^.&set := $00000040;
  43811. end;
  43812. procedure TSPI1_SPI1CON.clearCKP; inline;
  43813. begin
  43814. pTDefRegMap(@Self)^.clr := $00000040;
  43815. end;
  43816. procedure TSPI1_SPI1CON.setCKP(thebits : TBits_1); inline;
  43817. begin
  43818. if thebits = 0 then
  43819. pTDefRegMap(@Self)^.clr := $00000040
  43820. else
  43821. pTDefRegMap(@Self)^.&set := $00000040;
  43822. end;
  43823. function TSPI1_SPI1CON.getCKP : TBits_1; inline;
  43824. begin
  43825. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43826. end;
  43827. procedure TSPI1_SPI1CON.setSSEN; inline;
  43828. begin
  43829. pTDefRegMap(@Self)^.&set := $00000080;
  43830. end;
  43831. procedure TSPI1_SPI1CON.clearSSEN; inline;
  43832. begin
  43833. pTDefRegMap(@Self)^.clr := $00000080;
  43834. end;
  43835. procedure TSPI1_SPI1CON.setSSEN(thebits : TBits_1); inline;
  43836. begin
  43837. if thebits = 0 then
  43838. pTDefRegMap(@Self)^.clr := $00000080
  43839. else
  43840. pTDefRegMap(@Self)^.&set := $00000080;
  43841. end;
  43842. function TSPI1_SPI1CON.getSSEN : TBits_1; inline;
  43843. begin
  43844. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43845. end;
  43846. procedure TSPI1_SPI1CON.setCKE; inline;
  43847. begin
  43848. pTDefRegMap(@Self)^.&set := $00000100;
  43849. end;
  43850. procedure TSPI1_SPI1CON.clearCKE; inline;
  43851. begin
  43852. pTDefRegMap(@Self)^.clr := $00000100;
  43853. end;
  43854. procedure TSPI1_SPI1CON.setCKE(thebits : TBits_1); inline;
  43855. begin
  43856. if thebits = 0 then
  43857. pTDefRegMap(@Self)^.clr := $00000100
  43858. else
  43859. pTDefRegMap(@Self)^.&set := $00000100;
  43860. end;
  43861. function TSPI1_SPI1CON.getCKE : TBits_1; inline;
  43862. begin
  43863. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43864. end;
  43865. procedure TSPI1_SPI1CON.setSMP; inline;
  43866. begin
  43867. pTDefRegMap(@Self)^.&set := $00000200;
  43868. end;
  43869. procedure TSPI1_SPI1CON.clearSMP; inline;
  43870. begin
  43871. pTDefRegMap(@Self)^.clr := $00000200;
  43872. end;
  43873. procedure TSPI1_SPI1CON.setSMP(thebits : TBits_1); inline;
  43874. begin
  43875. if thebits = 0 then
  43876. pTDefRegMap(@Self)^.clr := $00000200
  43877. else
  43878. pTDefRegMap(@Self)^.&set := $00000200;
  43879. end;
  43880. function TSPI1_SPI1CON.getSMP : TBits_1; inline;
  43881. begin
  43882. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43883. end;
  43884. procedure TSPI1_SPI1CON.setMODE16; inline;
  43885. begin
  43886. pTDefRegMap(@Self)^.&set := $00000400;
  43887. end;
  43888. procedure TSPI1_SPI1CON.clearMODE16; inline;
  43889. begin
  43890. pTDefRegMap(@Self)^.clr := $00000400;
  43891. end;
  43892. procedure TSPI1_SPI1CON.setMODE16(thebits : TBits_1); inline;
  43893. begin
  43894. if thebits = 0 then
  43895. pTDefRegMap(@Self)^.clr := $00000400
  43896. else
  43897. pTDefRegMap(@Self)^.&set := $00000400;
  43898. end;
  43899. function TSPI1_SPI1CON.getMODE16 : TBits_1; inline;
  43900. begin
  43901. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43902. end;
  43903. procedure TSPI1_SPI1CON.setMODE32; inline;
  43904. begin
  43905. pTDefRegMap(@Self)^.&set := $00000800;
  43906. end;
  43907. procedure TSPI1_SPI1CON.clearMODE32; inline;
  43908. begin
  43909. pTDefRegMap(@Self)^.clr := $00000800;
  43910. end;
  43911. procedure TSPI1_SPI1CON.setMODE32(thebits : TBits_1); inline;
  43912. begin
  43913. if thebits = 0 then
  43914. pTDefRegMap(@Self)^.clr := $00000800
  43915. else
  43916. pTDefRegMap(@Self)^.&set := $00000800;
  43917. end;
  43918. function TSPI1_SPI1CON.getMODE32 : TBits_1; inline;
  43919. begin
  43920. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43921. end;
  43922. procedure TSPI1_SPI1CON.setDISSDO; inline;
  43923. begin
  43924. pTDefRegMap(@Self)^.&set := $00001000;
  43925. end;
  43926. procedure TSPI1_SPI1CON.clearDISSDO; inline;
  43927. begin
  43928. pTDefRegMap(@Self)^.clr := $00001000;
  43929. end;
  43930. procedure TSPI1_SPI1CON.setDISSDO(thebits : TBits_1); inline;
  43931. begin
  43932. if thebits = 0 then
  43933. pTDefRegMap(@Self)^.clr := $00001000
  43934. else
  43935. pTDefRegMap(@Self)^.&set := $00001000;
  43936. end;
  43937. function TSPI1_SPI1CON.getDISSDO : TBits_1; inline;
  43938. begin
  43939. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43940. end;
  43941. procedure TSPI1_SPI1CON.setSIDL; inline;
  43942. begin
  43943. pTDefRegMap(@Self)^.&set := $00002000;
  43944. end;
  43945. procedure TSPI1_SPI1CON.clearSIDL; inline;
  43946. begin
  43947. pTDefRegMap(@Self)^.clr := $00002000;
  43948. end;
  43949. procedure TSPI1_SPI1CON.setSIDL(thebits : TBits_1); inline;
  43950. begin
  43951. if thebits = 0 then
  43952. pTDefRegMap(@Self)^.clr := $00002000
  43953. else
  43954. pTDefRegMap(@Self)^.&set := $00002000;
  43955. end;
  43956. function TSPI1_SPI1CON.getSIDL : TBits_1; inline;
  43957. begin
  43958. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43959. end;
  43960. procedure TSPI1_SPI1CON.setON; inline;
  43961. begin
  43962. pTDefRegMap(@Self)^.&set := $00008000;
  43963. end;
  43964. procedure TSPI1_SPI1CON.clearON; inline;
  43965. begin
  43966. pTDefRegMap(@Self)^.clr := $00008000;
  43967. end;
  43968. procedure TSPI1_SPI1CON.setON(thebits : TBits_1); inline;
  43969. begin
  43970. if thebits = 0 then
  43971. pTDefRegMap(@Self)^.clr := $00008000
  43972. else
  43973. pTDefRegMap(@Self)^.&set := $00008000;
  43974. end;
  43975. function TSPI1_SPI1CON.getON : TBits_1; inline;
  43976. begin
  43977. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43978. end;
  43979. procedure TSPI1_SPI1CON.setENHBUF; inline;
  43980. begin
  43981. pTDefRegMap(@Self)^.&set := $00010000;
  43982. end;
  43983. procedure TSPI1_SPI1CON.clearENHBUF; inline;
  43984. begin
  43985. pTDefRegMap(@Self)^.clr := $00010000;
  43986. end;
  43987. procedure TSPI1_SPI1CON.setENHBUF(thebits : TBits_1); inline;
  43988. begin
  43989. if thebits = 0 then
  43990. pTDefRegMap(@Self)^.clr := $00010000
  43991. else
  43992. pTDefRegMap(@Self)^.&set := $00010000;
  43993. end;
  43994. function TSPI1_SPI1CON.getENHBUF : TBits_1; inline;
  43995. begin
  43996. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  43997. end;
  43998. procedure TSPI1_SPI1CON.setSPIFE; inline;
  43999. begin
  44000. pTDefRegMap(@Self)^.&set := $00020000;
  44001. end;
  44002. procedure TSPI1_SPI1CON.clearSPIFE; inline;
  44003. begin
  44004. pTDefRegMap(@Self)^.clr := $00020000;
  44005. end;
  44006. procedure TSPI1_SPI1CON.setSPIFE(thebits : TBits_1); inline;
  44007. begin
  44008. if thebits = 0 then
  44009. pTDefRegMap(@Self)^.clr := $00020000
  44010. else
  44011. pTDefRegMap(@Self)^.&set := $00020000;
  44012. end;
  44013. function TSPI1_SPI1CON.getSPIFE : TBits_1; inline;
  44014. begin
  44015. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  44016. end;
  44017. procedure TSPI1_SPI1CON.setFRMCNT(thebits : TBits_3); inline;
  44018. begin
  44019. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  44020. end;
  44021. function TSPI1_SPI1CON.getFRMCNT : TBits_3; inline;
  44022. begin
  44023. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  44024. end;
  44025. procedure TSPI1_SPI1CON.setFRMSYPW; inline;
  44026. begin
  44027. pTDefRegMap(@Self)^.&set := $08000000;
  44028. end;
  44029. procedure TSPI1_SPI1CON.clearFRMSYPW; inline;
  44030. begin
  44031. pTDefRegMap(@Self)^.clr := $08000000;
  44032. end;
  44033. procedure TSPI1_SPI1CON.setFRMSYPW(thebits : TBits_1); inline;
  44034. begin
  44035. if thebits = 0 then
  44036. pTDefRegMap(@Self)^.clr := $08000000
  44037. else
  44038. pTDefRegMap(@Self)^.&set := $08000000;
  44039. end;
  44040. function TSPI1_SPI1CON.getFRMSYPW : TBits_1; inline;
  44041. begin
  44042. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  44043. end;
  44044. procedure TSPI1_SPI1CON.setMSSEN; inline;
  44045. begin
  44046. pTDefRegMap(@Self)^.&set := $10000000;
  44047. end;
  44048. procedure TSPI1_SPI1CON.clearMSSEN; inline;
  44049. begin
  44050. pTDefRegMap(@Self)^.clr := $10000000;
  44051. end;
  44052. procedure TSPI1_SPI1CON.setMSSEN(thebits : TBits_1); inline;
  44053. begin
  44054. if thebits = 0 then
  44055. pTDefRegMap(@Self)^.clr := $10000000
  44056. else
  44057. pTDefRegMap(@Self)^.&set := $10000000;
  44058. end;
  44059. function TSPI1_SPI1CON.getMSSEN : TBits_1; inline;
  44060. begin
  44061. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  44062. end;
  44063. procedure TSPI1_SPI1CON.setFRMPOL; inline;
  44064. begin
  44065. pTDefRegMap(@Self)^.&set := $20000000;
  44066. end;
  44067. procedure TSPI1_SPI1CON.clearFRMPOL; inline;
  44068. begin
  44069. pTDefRegMap(@Self)^.clr := $20000000;
  44070. end;
  44071. procedure TSPI1_SPI1CON.setFRMPOL(thebits : TBits_1); inline;
  44072. begin
  44073. if thebits = 0 then
  44074. pTDefRegMap(@Self)^.clr := $20000000
  44075. else
  44076. pTDefRegMap(@Self)^.&set := $20000000;
  44077. end;
  44078. function TSPI1_SPI1CON.getFRMPOL : TBits_1; inline;
  44079. begin
  44080. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  44081. end;
  44082. procedure TSPI1_SPI1CON.setFRMSYNC; inline;
  44083. begin
  44084. pTDefRegMap(@Self)^.&set := $40000000;
  44085. end;
  44086. procedure TSPI1_SPI1CON.clearFRMSYNC; inline;
  44087. begin
  44088. pTDefRegMap(@Self)^.clr := $40000000;
  44089. end;
  44090. procedure TSPI1_SPI1CON.setFRMSYNC(thebits : TBits_1); inline;
  44091. begin
  44092. if thebits = 0 then
  44093. pTDefRegMap(@Self)^.clr := $40000000
  44094. else
  44095. pTDefRegMap(@Self)^.&set := $40000000;
  44096. end;
  44097. function TSPI1_SPI1CON.getFRMSYNC : TBits_1; inline;
  44098. begin
  44099. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  44100. end;
  44101. procedure TSPI1_SPI1CON.setFRMEN; inline;
  44102. begin
  44103. pTDefRegMap(@Self)^.&set := $80000000;
  44104. end;
  44105. procedure TSPI1_SPI1CON.clearFRMEN; inline;
  44106. begin
  44107. pTDefRegMap(@Self)^.clr := $80000000;
  44108. end;
  44109. procedure TSPI1_SPI1CON.setFRMEN(thebits : TBits_1); inline;
  44110. begin
  44111. if thebits = 0 then
  44112. pTDefRegMap(@Self)^.clr := $80000000
  44113. else
  44114. pTDefRegMap(@Self)^.&set := $80000000;
  44115. end;
  44116. function TSPI1_SPI1CON.getFRMEN : TBits_1; inline;
  44117. begin
  44118. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  44119. end;
  44120. procedure TSPI1_SPI1CON.setw(thebits : TBits_32); inline;
  44121. begin
  44122. pTDefRegMap(@Self)^.val := thebits;
  44123. end;
  44124. function TSPI1_SPI1CON.getw : TBits_32; inline;
  44125. begin
  44126. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44127. end;
  44128. procedure TSPI1_SPI1STAT.setSPIRBF; inline;
  44129. begin
  44130. pTDefRegMap(@Self)^.&set := $00000001;
  44131. end;
  44132. procedure TSPI1_SPI1STAT.clearSPIRBF; inline;
  44133. begin
  44134. pTDefRegMap(@Self)^.clr := $00000001;
  44135. end;
  44136. procedure TSPI1_SPI1STAT.setSPIRBF(thebits : TBits_1); inline;
  44137. begin
  44138. if thebits = 0 then
  44139. pTDefRegMap(@Self)^.clr := $00000001
  44140. else
  44141. pTDefRegMap(@Self)^.&set := $00000001;
  44142. end;
  44143. function TSPI1_SPI1STAT.getSPIRBF : TBits_1; inline;
  44144. begin
  44145. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44146. end;
  44147. procedure TSPI1_SPI1STAT.setSPITBF; inline;
  44148. begin
  44149. pTDefRegMap(@Self)^.&set := $00000002;
  44150. end;
  44151. procedure TSPI1_SPI1STAT.clearSPITBF; inline;
  44152. begin
  44153. pTDefRegMap(@Self)^.clr := $00000002;
  44154. end;
  44155. procedure TSPI1_SPI1STAT.setSPITBF(thebits : TBits_1); inline;
  44156. begin
  44157. if thebits = 0 then
  44158. pTDefRegMap(@Self)^.clr := $00000002
  44159. else
  44160. pTDefRegMap(@Self)^.&set := $00000002;
  44161. end;
  44162. function TSPI1_SPI1STAT.getSPITBF : TBits_1; inline;
  44163. begin
  44164. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44165. end;
  44166. procedure TSPI1_SPI1STAT.setSPITBE; inline;
  44167. begin
  44168. pTDefRegMap(@Self)^.&set := $00000008;
  44169. end;
  44170. procedure TSPI1_SPI1STAT.clearSPITBE; inline;
  44171. begin
  44172. pTDefRegMap(@Self)^.clr := $00000008;
  44173. end;
  44174. procedure TSPI1_SPI1STAT.setSPITBE(thebits : TBits_1); inline;
  44175. begin
  44176. if thebits = 0 then
  44177. pTDefRegMap(@Self)^.clr := $00000008
  44178. else
  44179. pTDefRegMap(@Self)^.&set := $00000008;
  44180. end;
  44181. function TSPI1_SPI1STAT.getSPITBE : TBits_1; inline;
  44182. begin
  44183. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44184. end;
  44185. procedure TSPI1_SPI1STAT.setSPIRBE; inline;
  44186. begin
  44187. pTDefRegMap(@Self)^.&set := $00000020;
  44188. end;
  44189. procedure TSPI1_SPI1STAT.clearSPIRBE; inline;
  44190. begin
  44191. pTDefRegMap(@Self)^.clr := $00000020;
  44192. end;
  44193. procedure TSPI1_SPI1STAT.setSPIRBE(thebits : TBits_1); inline;
  44194. begin
  44195. if thebits = 0 then
  44196. pTDefRegMap(@Self)^.clr := $00000020
  44197. else
  44198. pTDefRegMap(@Self)^.&set := $00000020;
  44199. end;
  44200. function TSPI1_SPI1STAT.getSPIRBE : TBits_1; inline;
  44201. begin
  44202. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44203. end;
  44204. procedure TSPI1_SPI1STAT.setSPIROV; inline;
  44205. begin
  44206. pTDefRegMap(@Self)^.&set := $00000040;
  44207. end;
  44208. procedure TSPI1_SPI1STAT.clearSPIROV; inline;
  44209. begin
  44210. pTDefRegMap(@Self)^.clr := $00000040;
  44211. end;
  44212. procedure TSPI1_SPI1STAT.setSPIROV(thebits : TBits_1); inline;
  44213. begin
  44214. if thebits = 0 then
  44215. pTDefRegMap(@Self)^.clr := $00000040
  44216. else
  44217. pTDefRegMap(@Self)^.&set := $00000040;
  44218. end;
  44219. function TSPI1_SPI1STAT.getSPIROV : TBits_1; inline;
  44220. begin
  44221. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44222. end;
  44223. procedure TSPI1_SPI1STAT.setSRMT; inline;
  44224. begin
  44225. pTDefRegMap(@Self)^.&set := $00000080;
  44226. end;
  44227. procedure TSPI1_SPI1STAT.clearSRMT; inline;
  44228. begin
  44229. pTDefRegMap(@Self)^.clr := $00000080;
  44230. end;
  44231. procedure TSPI1_SPI1STAT.setSRMT(thebits : TBits_1); inline;
  44232. begin
  44233. if thebits = 0 then
  44234. pTDefRegMap(@Self)^.clr := $00000080
  44235. else
  44236. pTDefRegMap(@Self)^.&set := $00000080;
  44237. end;
  44238. function TSPI1_SPI1STAT.getSRMT : TBits_1; inline;
  44239. begin
  44240. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44241. end;
  44242. procedure TSPI1_SPI1STAT.setSPITUR; inline;
  44243. begin
  44244. pTDefRegMap(@Self)^.&set := $00000100;
  44245. end;
  44246. procedure TSPI1_SPI1STAT.clearSPITUR; inline;
  44247. begin
  44248. pTDefRegMap(@Self)^.clr := $00000100;
  44249. end;
  44250. procedure TSPI1_SPI1STAT.setSPITUR(thebits : TBits_1); inline;
  44251. begin
  44252. if thebits = 0 then
  44253. pTDefRegMap(@Self)^.clr := $00000100
  44254. else
  44255. pTDefRegMap(@Self)^.&set := $00000100;
  44256. end;
  44257. function TSPI1_SPI1STAT.getSPITUR : TBits_1; inline;
  44258. begin
  44259. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44260. end;
  44261. procedure TSPI1_SPI1STAT.setSPIBUSY; inline;
  44262. begin
  44263. pTDefRegMap(@Self)^.&set := $00000800;
  44264. end;
  44265. procedure TSPI1_SPI1STAT.clearSPIBUSY; inline;
  44266. begin
  44267. pTDefRegMap(@Self)^.clr := $00000800;
  44268. end;
  44269. procedure TSPI1_SPI1STAT.setSPIBUSY(thebits : TBits_1); inline;
  44270. begin
  44271. if thebits = 0 then
  44272. pTDefRegMap(@Self)^.clr := $00000800
  44273. else
  44274. pTDefRegMap(@Self)^.&set := $00000800;
  44275. end;
  44276. function TSPI1_SPI1STAT.getSPIBUSY : TBits_1; inline;
  44277. begin
  44278. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44279. end;
  44280. procedure TSPI1_SPI1STAT.setTXBUFELM(thebits : TBits_5); inline;
  44281. begin
  44282. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  44283. end;
  44284. function TSPI1_SPI1STAT.getTXBUFELM : TBits_5; inline;
  44285. begin
  44286. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  44287. end;
  44288. procedure TSPI1_SPI1STAT.setRXBUFELM(thebits : TBits_5); inline;
  44289. begin
  44290. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  44291. end;
  44292. function TSPI1_SPI1STAT.getRXBUFELM : TBits_5; inline;
  44293. begin
  44294. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  44295. end;
  44296. procedure TSPI1_SPI1STAT.setw(thebits : TBits_32); inline;
  44297. begin
  44298. pTDefRegMap(@Self)^.val := thebits;
  44299. end;
  44300. function TSPI1_SPI1STAT.getw : TBits_32; inline;
  44301. begin
  44302. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44303. end;
  44304. procedure TUART1_U1AMODE.setSTSEL; inline;
  44305. begin
  44306. pTDefRegMap(@Self)^.&set := $00000001;
  44307. end;
  44308. procedure TUART1_U1AMODE.clearSTSEL; inline;
  44309. begin
  44310. pTDefRegMap(@Self)^.clr := $00000001;
  44311. end;
  44312. procedure TUART1_U1AMODE.setSTSEL(thebits : TBits_1); inline;
  44313. begin
  44314. if thebits = 0 then
  44315. pTDefRegMap(@Self)^.clr := $00000001
  44316. else
  44317. pTDefRegMap(@Self)^.&set := $00000001;
  44318. end;
  44319. function TUART1_U1AMODE.getSTSEL : TBits_1; inline;
  44320. begin
  44321. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44322. end;
  44323. procedure TUART1_U1AMODE.setPDSEL(thebits : TBits_2); inline;
  44324. begin
  44325. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  44326. end;
  44327. function TUART1_U1AMODE.getPDSEL : TBits_2; inline;
  44328. begin
  44329. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  44330. end;
  44331. procedure TUART1_U1AMODE.setBRGH; inline;
  44332. begin
  44333. pTDefRegMap(@Self)^.&set := $00000008;
  44334. end;
  44335. procedure TUART1_U1AMODE.clearBRGH; inline;
  44336. begin
  44337. pTDefRegMap(@Self)^.clr := $00000008;
  44338. end;
  44339. procedure TUART1_U1AMODE.setBRGH(thebits : TBits_1); inline;
  44340. begin
  44341. if thebits = 0 then
  44342. pTDefRegMap(@Self)^.clr := $00000008
  44343. else
  44344. pTDefRegMap(@Self)^.&set := $00000008;
  44345. end;
  44346. function TUART1_U1AMODE.getBRGH : TBits_1; inline;
  44347. begin
  44348. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44349. end;
  44350. procedure TUART1_U1AMODE.setRXINV; inline;
  44351. begin
  44352. pTDefRegMap(@Self)^.&set := $00000010;
  44353. end;
  44354. procedure TUART1_U1AMODE.clearRXINV; inline;
  44355. begin
  44356. pTDefRegMap(@Self)^.clr := $00000010;
  44357. end;
  44358. procedure TUART1_U1AMODE.setRXINV(thebits : TBits_1); inline;
  44359. begin
  44360. if thebits = 0 then
  44361. pTDefRegMap(@Self)^.clr := $00000010
  44362. else
  44363. pTDefRegMap(@Self)^.&set := $00000010;
  44364. end;
  44365. function TUART1_U1AMODE.getRXINV : TBits_1; inline;
  44366. begin
  44367. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44368. end;
  44369. procedure TUART1_U1AMODE.setABAUD; inline;
  44370. begin
  44371. pTDefRegMap(@Self)^.&set := $00000020;
  44372. end;
  44373. procedure TUART1_U1AMODE.clearABAUD; inline;
  44374. begin
  44375. pTDefRegMap(@Self)^.clr := $00000020;
  44376. end;
  44377. procedure TUART1_U1AMODE.setABAUD(thebits : TBits_1); inline;
  44378. begin
  44379. if thebits = 0 then
  44380. pTDefRegMap(@Self)^.clr := $00000020
  44381. else
  44382. pTDefRegMap(@Self)^.&set := $00000020;
  44383. end;
  44384. function TUART1_U1AMODE.getABAUD : TBits_1; inline;
  44385. begin
  44386. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44387. end;
  44388. procedure TUART1_U1AMODE.setLPBACK; inline;
  44389. begin
  44390. pTDefRegMap(@Self)^.&set := $00000040;
  44391. end;
  44392. procedure TUART1_U1AMODE.clearLPBACK; inline;
  44393. begin
  44394. pTDefRegMap(@Self)^.clr := $00000040;
  44395. end;
  44396. procedure TUART1_U1AMODE.setLPBACK(thebits : TBits_1); inline;
  44397. begin
  44398. if thebits = 0 then
  44399. pTDefRegMap(@Self)^.clr := $00000040
  44400. else
  44401. pTDefRegMap(@Self)^.&set := $00000040;
  44402. end;
  44403. function TUART1_U1AMODE.getLPBACK : TBits_1; inline;
  44404. begin
  44405. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44406. end;
  44407. procedure TUART1_U1AMODE.setWAKE; inline;
  44408. begin
  44409. pTDefRegMap(@Self)^.&set := $00000080;
  44410. end;
  44411. procedure TUART1_U1AMODE.clearWAKE; inline;
  44412. begin
  44413. pTDefRegMap(@Self)^.clr := $00000080;
  44414. end;
  44415. procedure TUART1_U1AMODE.setWAKE(thebits : TBits_1); inline;
  44416. begin
  44417. if thebits = 0 then
  44418. pTDefRegMap(@Self)^.clr := $00000080
  44419. else
  44420. pTDefRegMap(@Self)^.&set := $00000080;
  44421. end;
  44422. function TUART1_U1AMODE.getWAKE : TBits_1; inline;
  44423. begin
  44424. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44425. end;
  44426. procedure TUART1_U1AMODE.setUEN(thebits : TBits_2); inline;
  44427. begin
  44428. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  44429. end;
  44430. function TUART1_U1AMODE.getUEN : TBits_2; inline;
  44431. begin
  44432. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  44433. end;
  44434. procedure TUART1_U1AMODE.setRTSMD; inline;
  44435. begin
  44436. pTDefRegMap(@Self)^.&set := $00000800;
  44437. end;
  44438. procedure TUART1_U1AMODE.clearRTSMD; inline;
  44439. begin
  44440. pTDefRegMap(@Self)^.clr := $00000800;
  44441. end;
  44442. procedure TUART1_U1AMODE.setRTSMD(thebits : TBits_1); inline;
  44443. begin
  44444. if thebits = 0 then
  44445. pTDefRegMap(@Self)^.clr := $00000800
  44446. else
  44447. pTDefRegMap(@Self)^.&set := $00000800;
  44448. end;
  44449. function TUART1_U1AMODE.getRTSMD : TBits_1; inline;
  44450. begin
  44451. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44452. end;
  44453. procedure TUART1_U1AMODE.setIREN; inline;
  44454. begin
  44455. pTDefRegMap(@Self)^.&set := $00001000;
  44456. end;
  44457. procedure TUART1_U1AMODE.clearIREN; inline;
  44458. begin
  44459. pTDefRegMap(@Self)^.clr := $00001000;
  44460. end;
  44461. procedure TUART1_U1AMODE.setIREN(thebits : TBits_1); inline;
  44462. begin
  44463. if thebits = 0 then
  44464. pTDefRegMap(@Self)^.clr := $00001000
  44465. else
  44466. pTDefRegMap(@Self)^.&set := $00001000;
  44467. end;
  44468. function TUART1_U1AMODE.getIREN : TBits_1; inline;
  44469. begin
  44470. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44471. end;
  44472. procedure TUART1_U1AMODE.setSIDL; inline;
  44473. begin
  44474. pTDefRegMap(@Self)^.&set := $00002000;
  44475. end;
  44476. procedure TUART1_U1AMODE.clearSIDL; inline;
  44477. begin
  44478. pTDefRegMap(@Self)^.clr := $00002000;
  44479. end;
  44480. procedure TUART1_U1AMODE.setSIDL(thebits : TBits_1); inline;
  44481. begin
  44482. if thebits = 0 then
  44483. pTDefRegMap(@Self)^.clr := $00002000
  44484. else
  44485. pTDefRegMap(@Self)^.&set := $00002000;
  44486. end;
  44487. function TUART1_U1AMODE.getSIDL : TBits_1; inline;
  44488. begin
  44489. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44490. end;
  44491. procedure TUART1_U1AMODE.setON; inline;
  44492. begin
  44493. pTDefRegMap(@Self)^.&set := $00008000;
  44494. end;
  44495. procedure TUART1_U1AMODE.clearON; inline;
  44496. begin
  44497. pTDefRegMap(@Self)^.clr := $00008000;
  44498. end;
  44499. procedure TUART1_U1AMODE.setON(thebits : TBits_1); inline;
  44500. begin
  44501. if thebits = 0 then
  44502. pTDefRegMap(@Self)^.clr := $00008000
  44503. else
  44504. pTDefRegMap(@Self)^.&set := $00008000;
  44505. end;
  44506. function TUART1_U1AMODE.getON : TBits_1; inline;
  44507. begin
  44508. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44509. end;
  44510. procedure TUART1_U1AMODE.setPDSEL0; inline;
  44511. begin
  44512. pTDefRegMap(@Self)^.&set := $00000002;
  44513. end;
  44514. procedure TUART1_U1AMODE.clearPDSEL0; inline;
  44515. begin
  44516. pTDefRegMap(@Self)^.clr := $00000002;
  44517. end;
  44518. procedure TUART1_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
  44519. begin
  44520. if thebits = 0 then
  44521. pTDefRegMap(@Self)^.clr := $00000002
  44522. else
  44523. pTDefRegMap(@Self)^.&set := $00000002;
  44524. end;
  44525. function TUART1_U1AMODE.getPDSEL0 : TBits_1; inline;
  44526. begin
  44527. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44528. end;
  44529. procedure TUART1_U1AMODE.setPDSEL1; inline;
  44530. begin
  44531. pTDefRegMap(@Self)^.&set := $00000004;
  44532. end;
  44533. procedure TUART1_U1AMODE.clearPDSEL1; inline;
  44534. begin
  44535. pTDefRegMap(@Self)^.clr := $00000004;
  44536. end;
  44537. procedure TUART1_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
  44538. begin
  44539. if thebits = 0 then
  44540. pTDefRegMap(@Self)^.clr := $00000004
  44541. else
  44542. pTDefRegMap(@Self)^.&set := $00000004;
  44543. end;
  44544. function TUART1_U1AMODE.getPDSEL1 : TBits_1; inline;
  44545. begin
  44546. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44547. end;
  44548. procedure TUART1_U1AMODE.setUEN0; inline;
  44549. begin
  44550. pTDefRegMap(@Self)^.&set := $00000100;
  44551. end;
  44552. procedure TUART1_U1AMODE.clearUEN0; inline;
  44553. begin
  44554. pTDefRegMap(@Self)^.clr := $00000100;
  44555. end;
  44556. procedure TUART1_U1AMODE.setUEN0(thebits : TBits_1); inline;
  44557. begin
  44558. if thebits = 0 then
  44559. pTDefRegMap(@Self)^.clr := $00000100
  44560. else
  44561. pTDefRegMap(@Self)^.&set := $00000100;
  44562. end;
  44563. function TUART1_U1AMODE.getUEN0 : TBits_1; inline;
  44564. begin
  44565. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44566. end;
  44567. procedure TUART1_U1AMODE.setUEN1; inline;
  44568. begin
  44569. pTDefRegMap(@Self)^.&set := $00000200;
  44570. end;
  44571. procedure TUART1_U1AMODE.clearUEN1; inline;
  44572. begin
  44573. pTDefRegMap(@Self)^.clr := $00000200;
  44574. end;
  44575. procedure TUART1_U1AMODE.setUEN1(thebits : TBits_1); inline;
  44576. begin
  44577. if thebits = 0 then
  44578. pTDefRegMap(@Self)^.clr := $00000200
  44579. else
  44580. pTDefRegMap(@Self)^.&set := $00000200;
  44581. end;
  44582. function TUART1_U1AMODE.getUEN1 : TBits_1; inline;
  44583. begin
  44584. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44585. end;
  44586. procedure TUART1_U1AMODE.setUSIDL; inline;
  44587. begin
  44588. pTDefRegMap(@Self)^.&set := $00002000;
  44589. end;
  44590. procedure TUART1_U1AMODE.clearUSIDL; inline;
  44591. begin
  44592. pTDefRegMap(@Self)^.clr := $00002000;
  44593. end;
  44594. procedure TUART1_U1AMODE.setUSIDL(thebits : TBits_1); inline;
  44595. begin
  44596. if thebits = 0 then
  44597. pTDefRegMap(@Self)^.clr := $00002000
  44598. else
  44599. pTDefRegMap(@Self)^.&set := $00002000;
  44600. end;
  44601. function TUART1_U1AMODE.getUSIDL : TBits_1; inline;
  44602. begin
  44603. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44604. end;
  44605. procedure TUART1_U1AMODE.setUARTEN; inline;
  44606. begin
  44607. pTDefRegMap(@Self)^.&set := $00008000;
  44608. end;
  44609. procedure TUART1_U1AMODE.clearUARTEN; inline;
  44610. begin
  44611. pTDefRegMap(@Self)^.clr := $00008000;
  44612. end;
  44613. procedure TUART1_U1AMODE.setUARTEN(thebits : TBits_1); inline;
  44614. begin
  44615. if thebits = 0 then
  44616. pTDefRegMap(@Self)^.clr := $00008000
  44617. else
  44618. pTDefRegMap(@Self)^.&set := $00008000;
  44619. end;
  44620. function TUART1_U1AMODE.getUARTEN : TBits_1; inline;
  44621. begin
  44622. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44623. end;
  44624. procedure TUART1_U1AMODE.setw(thebits : TBits_32); inline;
  44625. begin
  44626. pTDefRegMap(@Self)^.val := thebits;
  44627. end;
  44628. function TUART1_U1AMODE.getw : TBits_32; inline;
  44629. begin
  44630. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44631. end;
  44632. procedure TUART1_U1MODE.setSTSEL; inline;
  44633. begin
  44634. pTDefRegMap(@Self)^.&set := $00000001;
  44635. end;
  44636. procedure TUART1_U1MODE.clearSTSEL; inline;
  44637. begin
  44638. pTDefRegMap(@Self)^.clr := $00000001;
  44639. end;
  44640. procedure TUART1_U1MODE.setSTSEL(thebits : TBits_1); inline;
  44641. begin
  44642. if thebits = 0 then
  44643. pTDefRegMap(@Self)^.clr := $00000001
  44644. else
  44645. pTDefRegMap(@Self)^.&set := $00000001;
  44646. end;
  44647. function TUART1_U1MODE.getSTSEL : TBits_1; inline;
  44648. begin
  44649. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44650. end;
  44651. procedure TUART1_U1MODE.setPDSEL(thebits : TBits_2); inline;
  44652. begin
  44653. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  44654. end;
  44655. function TUART1_U1MODE.getPDSEL : TBits_2; inline;
  44656. begin
  44657. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  44658. end;
  44659. procedure TUART1_U1MODE.setBRGH; inline;
  44660. begin
  44661. pTDefRegMap(@Self)^.&set := $00000008;
  44662. end;
  44663. procedure TUART1_U1MODE.clearBRGH; inline;
  44664. begin
  44665. pTDefRegMap(@Self)^.clr := $00000008;
  44666. end;
  44667. procedure TUART1_U1MODE.setBRGH(thebits : TBits_1); inline;
  44668. begin
  44669. if thebits = 0 then
  44670. pTDefRegMap(@Self)^.clr := $00000008
  44671. else
  44672. pTDefRegMap(@Self)^.&set := $00000008;
  44673. end;
  44674. function TUART1_U1MODE.getBRGH : TBits_1; inline;
  44675. begin
  44676. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44677. end;
  44678. procedure TUART1_U1MODE.setRXINV; inline;
  44679. begin
  44680. pTDefRegMap(@Self)^.&set := $00000010;
  44681. end;
  44682. procedure TUART1_U1MODE.clearRXINV; inline;
  44683. begin
  44684. pTDefRegMap(@Self)^.clr := $00000010;
  44685. end;
  44686. procedure TUART1_U1MODE.setRXINV(thebits : TBits_1); inline;
  44687. begin
  44688. if thebits = 0 then
  44689. pTDefRegMap(@Self)^.clr := $00000010
  44690. else
  44691. pTDefRegMap(@Self)^.&set := $00000010;
  44692. end;
  44693. function TUART1_U1MODE.getRXINV : TBits_1; inline;
  44694. begin
  44695. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44696. end;
  44697. procedure TUART1_U1MODE.setABAUD; inline;
  44698. begin
  44699. pTDefRegMap(@Self)^.&set := $00000020;
  44700. end;
  44701. procedure TUART1_U1MODE.clearABAUD; inline;
  44702. begin
  44703. pTDefRegMap(@Self)^.clr := $00000020;
  44704. end;
  44705. procedure TUART1_U1MODE.setABAUD(thebits : TBits_1); inline;
  44706. begin
  44707. if thebits = 0 then
  44708. pTDefRegMap(@Self)^.clr := $00000020
  44709. else
  44710. pTDefRegMap(@Self)^.&set := $00000020;
  44711. end;
  44712. function TUART1_U1MODE.getABAUD : TBits_1; inline;
  44713. begin
  44714. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44715. end;
  44716. procedure TUART1_U1MODE.setLPBACK; inline;
  44717. begin
  44718. pTDefRegMap(@Self)^.&set := $00000040;
  44719. end;
  44720. procedure TUART1_U1MODE.clearLPBACK; inline;
  44721. begin
  44722. pTDefRegMap(@Self)^.clr := $00000040;
  44723. end;
  44724. procedure TUART1_U1MODE.setLPBACK(thebits : TBits_1); inline;
  44725. begin
  44726. if thebits = 0 then
  44727. pTDefRegMap(@Self)^.clr := $00000040
  44728. else
  44729. pTDefRegMap(@Self)^.&set := $00000040;
  44730. end;
  44731. function TUART1_U1MODE.getLPBACK : TBits_1; inline;
  44732. begin
  44733. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44734. end;
  44735. procedure TUART1_U1MODE.setWAKE; inline;
  44736. begin
  44737. pTDefRegMap(@Self)^.&set := $00000080;
  44738. end;
  44739. procedure TUART1_U1MODE.clearWAKE; inline;
  44740. begin
  44741. pTDefRegMap(@Self)^.clr := $00000080;
  44742. end;
  44743. procedure TUART1_U1MODE.setWAKE(thebits : TBits_1); inline;
  44744. begin
  44745. if thebits = 0 then
  44746. pTDefRegMap(@Self)^.clr := $00000080
  44747. else
  44748. pTDefRegMap(@Self)^.&set := $00000080;
  44749. end;
  44750. function TUART1_U1MODE.getWAKE : TBits_1; inline;
  44751. begin
  44752. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44753. end;
  44754. procedure TUART1_U1MODE.setUEN(thebits : TBits_2); inline;
  44755. begin
  44756. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  44757. end;
  44758. function TUART1_U1MODE.getUEN : TBits_2; inline;
  44759. begin
  44760. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  44761. end;
  44762. procedure TUART1_U1MODE.setRTSMD; inline;
  44763. begin
  44764. pTDefRegMap(@Self)^.&set := $00000800;
  44765. end;
  44766. procedure TUART1_U1MODE.clearRTSMD; inline;
  44767. begin
  44768. pTDefRegMap(@Self)^.clr := $00000800;
  44769. end;
  44770. procedure TUART1_U1MODE.setRTSMD(thebits : TBits_1); inline;
  44771. begin
  44772. if thebits = 0 then
  44773. pTDefRegMap(@Self)^.clr := $00000800
  44774. else
  44775. pTDefRegMap(@Self)^.&set := $00000800;
  44776. end;
  44777. function TUART1_U1MODE.getRTSMD : TBits_1; inline;
  44778. begin
  44779. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44780. end;
  44781. procedure TUART1_U1MODE.setIREN; inline;
  44782. begin
  44783. pTDefRegMap(@Self)^.&set := $00001000;
  44784. end;
  44785. procedure TUART1_U1MODE.clearIREN; inline;
  44786. begin
  44787. pTDefRegMap(@Self)^.clr := $00001000;
  44788. end;
  44789. procedure TUART1_U1MODE.setIREN(thebits : TBits_1); inline;
  44790. begin
  44791. if thebits = 0 then
  44792. pTDefRegMap(@Self)^.clr := $00001000
  44793. else
  44794. pTDefRegMap(@Self)^.&set := $00001000;
  44795. end;
  44796. function TUART1_U1MODE.getIREN : TBits_1; inline;
  44797. begin
  44798. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44799. end;
  44800. procedure TUART1_U1MODE.setSIDL; inline;
  44801. begin
  44802. pTDefRegMap(@Self)^.&set := $00002000;
  44803. end;
  44804. procedure TUART1_U1MODE.clearSIDL; inline;
  44805. begin
  44806. pTDefRegMap(@Self)^.clr := $00002000;
  44807. end;
  44808. procedure TUART1_U1MODE.setSIDL(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 TUART1_U1MODE.getSIDL : TBits_1; inline;
  44816. begin
  44817. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44818. end;
  44819. procedure TUART1_U1MODE.setON; inline;
  44820. begin
  44821. pTDefRegMap(@Self)^.&set := $00008000;
  44822. end;
  44823. procedure TUART1_U1MODE.clearON; inline;
  44824. begin
  44825. pTDefRegMap(@Self)^.clr := $00008000;
  44826. end;
  44827. procedure TUART1_U1MODE.setON(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 TUART1_U1MODE.getON : TBits_1; inline;
  44835. begin
  44836. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44837. end;
  44838. procedure TUART1_U1MODE.setPDSEL0; inline;
  44839. begin
  44840. pTDefRegMap(@Self)^.&set := $00000002;
  44841. end;
  44842. procedure TUART1_U1MODE.clearPDSEL0; inline;
  44843. begin
  44844. pTDefRegMap(@Self)^.clr := $00000002;
  44845. end;
  44846. procedure TUART1_U1MODE.setPDSEL0(thebits : TBits_1); inline;
  44847. begin
  44848. if thebits = 0 then
  44849. pTDefRegMap(@Self)^.clr := $00000002
  44850. else
  44851. pTDefRegMap(@Self)^.&set := $00000002;
  44852. end;
  44853. function TUART1_U1MODE.getPDSEL0 : TBits_1; inline;
  44854. begin
  44855. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44856. end;
  44857. procedure TUART1_U1MODE.setPDSEL1; inline;
  44858. begin
  44859. pTDefRegMap(@Self)^.&set := $00000004;
  44860. end;
  44861. procedure TUART1_U1MODE.clearPDSEL1; inline;
  44862. begin
  44863. pTDefRegMap(@Self)^.clr := $00000004;
  44864. end;
  44865. procedure TUART1_U1MODE.setPDSEL1(thebits : TBits_1); inline;
  44866. begin
  44867. if thebits = 0 then
  44868. pTDefRegMap(@Self)^.clr := $00000004
  44869. else
  44870. pTDefRegMap(@Self)^.&set := $00000004;
  44871. end;
  44872. function TUART1_U1MODE.getPDSEL1 : TBits_1; inline;
  44873. begin
  44874. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44875. end;
  44876. procedure TUART1_U1MODE.setUEN0; inline;
  44877. begin
  44878. pTDefRegMap(@Self)^.&set := $00000100;
  44879. end;
  44880. procedure TUART1_U1MODE.clearUEN0; inline;
  44881. begin
  44882. pTDefRegMap(@Self)^.clr := $00000100;
  44883. end;
  44884. procedure TUART1_U1MODE.setUEN0(thebits : TBits_1); inline;
  44885. begin
  44886. if thebits = 0 then
  44887. pTDefRegMap(@Self)^.clr := $00000100
  44888. else
  44889. pTDefRegMap(@Self)^.&set := $00000100;
  44890. end;
  44891. function TUART1_U1MODE.getUEN0 : TBits_1; inline;
  44892. begin
  44893. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44894. end;
  44895. procedure TUART1_U1MODE.setUEN1; inline;
  44896. begin
  44897. pTDefRegMap(@Self)^.&set := $00000200;
  44898. end;
  44899. procedure TUART1_U1MODE.clearUEN1; inline;
  44900. begin
  44901. pTDefRegMap(@Self)^.clr := $00000200;
  44902. end;
  44903. procedure TUART1_U1MODE.setUEN1(thebits : TBits_1); inline;
  44904. begin
  44905. if thebits = 0 then
  44906. pTDefRegMap(@Self)^.clr := $00000200
  44907. else
  44908. pTDefRegMap(@Self)^.&set := $00000200;
  44909. end;
  44910. function TUART1_U1MODE.getUEN1 : TBits_1; inline;
  44911. begin
  44912. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44913. end;
  44914. procedure TUART1_U1MODE.setUSIDL; inline;
  44915. begin
  44916. pTDefRegMap(@Self)^.&set := $00002000;
  44917. end;
  44918. procedure TUART1_U1MODE.clearUSIDL; inline;
  44919. begin
  44920. pTDefRegMap(@Self)^.clr := $00002000;
  44921. end;
  44922. procedure TUART1_U1MODE.setUSIDL(thebits : TBits_1); inline;
  44923. begin
  44924. if thebits = 0 then
  44925. pTDefRegMap(@Self)^.clr := $00002000
  44926. else
  44927. pTDefRegMap(@Self)^.&set := $00002000;
  44928. end;
  44929. function TUART1_U1MODE.getUSIDL : TBits_1; inline;
  44930. begin
  44931. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44932. end;
  44933. procedure TUART1_U1MODE.setUARTEN; inline;
  44934. begin
  44935. pTDefRegMap(@Self)^.&set := $00008000;
  44936. end;
  44937. procedure TUART1_U1MODE.clearUARTEN; inline;
  44938. begin
  44939. pTDefRegMap(@Self)^.clr := $00008000;
  44940. end;
  44941. procedure TUART1_U1MODE.setUARTEN(thebits : TBits_1); inline;
  44942. begin
  44943. if thebits = 0 then
  44944. pTDefRegMap(@Self)^.clr := $00008000
  44945. else
  44946. pTDefRegMap(@Self)^.&set := $00008000;
  44947. end;
  44948. function TUART1_U1MODE.getUARTEN : TBits_1; inline;
  44949. begin
  44950. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44951. end;
  44952. procedure TUART1_U1MODE.setw(thebits : TBits_32); inline;
  44953. begin
  44954. pTDefRegMap(@Self)^.val := thebits;
  44955. end;
  44956. function TUART1_U1MODE.getw : TBits_32; inline;
  44957. begin
  44958. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44959. end;
  44960. procedure TUART1_U1ASTA.setURXDA; inline;
  44961. begin
  44962. pTDefRegMap(@Self)^.&set := $00000001;
  44963. end;
  44964. procedure TUART1_U1ASTA.clearURXDA; inline;
  44965. begin
  44966. pTDefRegMap(@Self)^.clr := $00000001;
  44967. end;
  44968. procedure TUART1_U1ASTA.setURXDA(thebits : TBits_1); inline;
  44969. begin
  44970. if thebits = 0 then
  44971. pTDefRegMap(@Self)^.clr := $00000001
  44972. else
  44973. pTDefRegMap(@Self)^.&set := $00000001;
  44974. end;
  44975. function TUART1_U1ASTA.getURXDA : TBits_1; inline;
  44976. begin
  44977. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44978. end;
  44979. procedure TUART1_U1ASTA.setOERR; inline;
  44980. begin
  44981. pTDefRegMap(@Self)^.&set := $00000002;
  44982. end;
  44983. procedure TUART1_U1ASTA.clearOERR; inline;
  44984. begin
  44985. pTDefRegMap(@Self)^.clr := $00000002;
  44986. end;
  44987. procedure TUART1_U1ASTA.setOERR(thebits : TBits_1); inline;
  44988. begin
  44989. if thebits = 0 then
  44990. pTDefRegMap(@Self)^.clr := $00000002
  44991. else
  44992. pTDefRegMap(@Self)^.&set := $00000002;
  44993. end;
  44994. function TUART1_U1ASTA.getOERR : TBits_1; inline;
  44995. begin
  44996. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44997. end;
  44998. procedure TUART1_U1ASTA.setFERR; inline;
  44999. begin
  45000. pTDefRegMap(@Self)^.&set := $00000004;
  45001. end;
  45002. procedure TUART1_U1ASTA.clearFERR; inline;
  45003. begin
  45004. pTDefRegMap(@Self)^.clr := $00000004;
  45005. end;
  45006. procedure TUART1_U1ASTA.setFERR(thebits : TBits_1); inline;
  45007. begin
  45008. if thebits = 0 then
  45009. pTDefRegMap(@Self)^.clr := $00000004
  45010. else
  45011. pTDefRegMap(@Self)^.&set := $00000004;
  45012. end;
  45013. function TUART1_U1ASTA.getFERR : TBits_1; inline;
  45014. begin
  45015. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45016. end;
  45017. procedure TUART1_U1ASTA.setPERR; inline;
  45018. begin
  45019. pTDefRegMap(@Self)^.&set := $00000008;
  45020. end;
  45021. procedure TUART1_U1ASTA.clearPERR; inline;
  45022. begin
  45023. pTDefRegMap(@Self)^.clr := $00000008;
  45024. end;
  45025. procedure TUART1_U1ASTA.setPERR(thebits : TBits_1); inline;
  45026. begin
  45027. if thebits = 0 then
  45028. pTDefRegMap(@Self)^.clr := $00000008
  45029. else
  45030. pTDefRegMap(@Self)^.&set := $00000008;
  45031. end;
  45032. function TUART1_U1ASTA.getPERR : TBits_1; inline;
  45033. begin
  45034. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45035. end;
  45036. procedure TUART1_U1ASTA.setRIDLE; inline;
  45037. begin
  45038. pTDefRegMap(@Self)^.&set := $00000010;
  45039. end;
  45040. procedure TUART1_U1ASTA.clearRIDLE; inline;
  45041. begin
  45042. pTDefRegMap(@Self)^.clr := $00000010;
  45043. end;
  45044. procedure TUART1_U1ASTA.setRIDLE(thebits : TBits_1); inline;
  45045. begin
  45046. if thebits = 0 then
  45047. pTDefRegMap(@Self)^.clr := $00000010
  45048. else
  45049. pTDefRegMap(@Self)^.&set := $00000010;
  45050. end;
  45051. function TUART1_U1ASTA.getRIDLE : TBits_1; inline;
  45052. begin
  45053. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45054. end;
  45055. procedure TUART1_U1ASTA.setADDEN; inline;
  45056. begin
  45057. pTDefRegMap(@Self)^.&set := $00000020;
  45058. end;
  45059. procedure TUART1_U1ASTA.clearADDEN; inline;
  45060. begin
  45061. pTDefRegMap(@Self)^.clr := $00000020;
  45062. end;
  45063. procedure TUART1_U1ASTA.setADDEN(thebits : TBits_1); inline;
  45064. begin
  45065. if thebits = 0 then
  45066. pTDefRegMap(@Self)^.clr := $00000020
  45067. else
  45068. pTDefRegMap(@Self)^.&set := $00000020;
  45069. end;
  45070. function TUART1_U1ASTA.getADDEN : TBits_1; inline;
  45071. begin
  45072. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45073. end;
  45074. procedure TUART1_U1ASTA.setURXISEL(thebits : TBits_2); inline;
  45075. begin
  45076. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  45077. end;
  45078. function TUART1_U1ASTA.getURXISEL : TBits_2; inline;
  45079. begin
  45080. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  45081. end;
  45082. procedure TUART1_U1ASTA.setTRMT; inline;
  45083. begin
  45084. pTDefRegMap(@Self)^.&set := $00000100;
  45085. end;
  45086. procedure TUART1_U1ASTA.clearTRMT; inline;
  45087. begin
  45088. pTDefRegMap(@Self)^.clr := $00000100;
  45089. end;
  45090. procedure TUART1_U1ASTA.setTRMT(thebits : TBits_1); inline;
  45091. begin
  45092. if thebits = 0 then
  45093. pTDefRegMap(@Self)^.clr := $00000100
  45094. else
  45095. pTDefRegMap(@Self)^.&set := $00000100;
  45096. end;
  45097. function TUART1_U1ASTA.getTRMT : TBits_1; inline;
  45098. begin
  45099. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45100. end;
  45101. procedure TUART1_U1ASTA.setUTXBF; inline;
  45102. begin
  45103. pTDefRegMap(@Self)^.&set := $00000200;
  45104. end;
  45105. procedure TUART1_U1ASTA.clearUTXBF; inline;
  45106. begin
  45107. pTDefRegMap(@Self)^.clr := $00000200;
  45108. end;
  45109. procedure TUART1_U1ASTA.setUTXBF(thebits : TBits_1); inline;
  45110. begin
  45111. if thebits = 0 then
  45112. pTDefRegMap(@Self)^.clr := $00000200
  45113. else
  45114. pTDefRegMap(@Self)^.&set := $00000200;
  45115. end;
  45116. function TUART1_U1ASTA.getUTXBF : TBits_1; inline;
  45117. begin
  45118. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45119. end;
  45120. procedure TUART1_U1ASTA.setUTXEN; inline;
  45121. begin
  45122. pTDefRegMap(@Self)^.&set := $00000400;
  45123. end;
  45124. procedure TUART1_U1ASTA.clearUTXEN; inline;
  45125. begin
  45126. pTDefRegMap(@Self)^.clr := $00000400;
  45127. end;
  45128. procedure TUART1_U1ASTA.setUTXEN(thebits : TBits_1); inline;
  45129. begin
  45130. if thebits = 0 then
  45131. pTDefRegMap(@Self)^.clr := $00000400
  45132. else
  45133. pTDefRegMap(@Self)^.&set := $00000400;
  45134. end;
  45135. function TUART1_U1ASTA.getUTXEN : TBits_1; inline;
  45136. begin
  45137. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45138. end;
  45139. procedure TUART1_U1ASTA.setUTXBRK; inline;
  45140. begin
  45141. pTDefRegMap(@Self)^.&set := $00000800;
  45142. end;
  45143. procedure TUART1_U1ASTA.clearUTXBRK; inline;
  45144. begin
  45145. pTDefRegMap(@Self)^.clr := $00000800;
  45146. end;
  45147. procedure TUART1_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
  45148. begin
  45149. if thebits = 0 then
  45150. pTDefRegMap(@Self)^.clr := $00000800
  45151. else
  45152. pTDefRegMap(@Self)^.&set := $00000800;
  45153. end;
  45154. function TUART1_U1ASTA.getUTXBRK : TBits_1; inline;
  45155. begin
  45156. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  45157. end;
  45158. procedure TUART1_U1ASTA.setURXEN; inline;
  45159. begin
  45160. pTDefRegMap(@Self)^.&set := $00001000;
  45161. end;
  45162. procedure TUART1_U1ASTA.clearURXEN; inline;
  45163. begin
  45164. pTDefRegMap(@Self)^.clr := $00001000;
  45165. end;
  45166. procedure TUART1_U1ASTA.setURXEN(thebits : TBits_1); inline;
  45167. begin
  45168. if thebits = 0 then
  45169. pTDefRegMap(@Self)^.clr := $00001000
  45170. else
  45171. pTDefRegMap(@Self)^.&set := $00001000;
  45172. end;
  45173. function TUART1_U1ASTA.getURXEN : TBits_1; inline;
  45174. begin
  45175. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45176. end;
  45177. procedure TUART1_U1ASTA.setUTXINV; inline;
  45178. begin
  45179. pTDefRegMap(@Self)^.&set := $00002000;
  45180. end;
  45181. procedure TUART1_U1ASTA.clearUTXINV; inline;
  45182. begin
  45183. pTDefRegMap(@Self)^.clr := $00002000;
  45184. end;
  45185. procedure TUART1_U1ASTA.setUTXINV(thebits : TBits_1); inline;
  45186. begin
  45187. if thebits = 0 then
  45188. pTDefRegMap(@Self)^.clr := $00002000
  45189. else
  45190. pTDefRegMap(@Self)^.&set := $00002000;
  45191. end;
  45192. function TUART1_U1ASTA.getUTXINV : TBits_1; inline;
  45193. begin
  45194. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45195. end;
  45196. procedure TUART1_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
  45197. begin
  45198. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45199. end;
  45200. function TUART1_U1ASTA.getUTXISEL : TBits_2; inline;
  45201. begin
  45202. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45203. end;
  45204. procedure TUART1_U1ASTA.setADDR(thebits : TBits_8); inline;
  45205. begin
  45206. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  45207. end;
  45208. function TUART1_U1ASTA.getADDR : TBits_8; inline;
  45209. begin
  45210. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  45211. end;
  45212. procedure TUART1_U1ASTA.setADM_EN; inline;
  45213. begin
  45214. pTDefRegMap(@Self)^.&set := $01000000;
  45215. end;
  45216. procedure TUART1_U1ASTA.clearADM_EN; inline;
  45217. begin
  45218. pTDefRegMap(@Self)^.clr := $01000000;
  45219. end;
  45220. procedure TUART1_U1ASTA.setADM_EN(thebits : TBits_1); inline;
  45221. begin
  45222. if thebits = 0 then
  45223. pTDefRegMap(@Self)^.clr := $01000000
  45224. else
  45225. pTDefRegMap(@Self)^.&set := $01000000;
  45226. end;
  45227. function TUART1_U1ASTA.getADM_EN : TBits_1; inline;
  45228. begin
  45229. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  45230. end;
  45231. procedure TUART1_U1ASTA.setURXISEL0; inline;
  45232. begin
  45233. pTDefRegMap(@Self)^.&set := $00000040;
  45234. end;
  45235. procedure TUART1_U1ASTA.clearURXISEL0; inline;
  45236. begin
  45237. pTDefRegMap(@Self)^.clr := $00000040;
  45238. end;
  45239. procedure TUART1_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
  45240. begin
  45241. if thebits = 0 then
  45242. pTDefRegMap(@Self)^.clr := $00000040
  45243. else
  45244. pTDefRegMap(@Self)^.&set := $00000040;
  45245. end;
  45246. function TUART1_U1ASTA.getURXISEL0 : TBits_1; inline;
  45247. begin
  45248. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45249. end;
  45250. procedure TUART1_U1ASTA.setURXISEL1; inline;
  45251. begin
  45252. pTDefRegMap(@Self)^.&set := $00000080;
  45253. end;
  45254. procedure TUART1_U1ASTA.clearURXISEL1; inline;
  45255. begin
  45256. pTDefRegMap(@Self)^.clr := $00000080;
  45257. end;
  45258. procedure TUART1_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
  45259. begin
  45260. if thebits = 0 then
  45261. pTDefRegMap(@Self)^.clr := $00000080
  45262. else
  45263. pTDefRegMap(@Self)^.&set := $00000080;
  45264. end;
  45265. function TUART1_U1ASTA.getURXISEL1 : TBits_1; inline;
  45266. begin
  45267. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45268. end;
  45269. procedure TUART1_U1ASTA.setUTXISEL0; inline;
  45270. begin
  45271. pTDefRegMap(@Self)^.&set := $00004000;
  45272. end;
  45273. procedure TUART1_U1ASTA.clearUTXISEL0; inline;
  45274. begin
  45275. pTDefRegMap(@Self)^.clr := $00004000;
  45276. end;
  45277. procedure TUART1_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
  45278. begin
  45279. if thebits = 0 then
  45280. pTDefRegMap(@Self)^.clr := $00004000
  45281. else
  45282. pTDefRegMap(@Self)^.&set := $00004000;
  45283. end;
  45284. function TUART1_U1ASTA.getUTXISEL0 : TBits_1; inline;
  45285. begin
  45286. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45287. end;
  45288. procedure TUART1_U1ASTA.setUTXISEL1; inline;
  45289. begin
  45290. pTDefRegMap(@Self)^.&set := $00008000;
  45291. end;
  45292. procedure TUART1_U1ASTA.clearUTXISEL1; inline;
  45293. begin
  45294. pTDefRegMap(@Self)^.clr := $00008000;
  45295. end;
  45296. procedure TUART1_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
  45297. begin
  45298. if thebits = 0 then
  45299. pTDefRegMap(@Self)^.clr := $00008000
  45300. else
  45301. pTDefRegMap(@Self)^.&set := $00008000;
  45302. end;
  45303. function TUART1_U1ASTA.getUTXISEL1 : TBits_1; inline;
  45304. begin
  45305. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45306. end;
  45307. procedure TUART1_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
  45308. begin
  45309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45310. end;
  45311. function TUART1_U1ASTA.getUTXSEL : TBits_2; inline;
  45312. begin
  45313. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45314. end;
  45315. procedure TUART1_U1ASTA.setw(thebits : TBits_32); inline;
  45316. begin
  45317. pTDefRegMap(@Self)^.val := thebits;
  45318. end;
  45319. function TUART1_U1ASTA.getw : TBits_32; inline;
  45320. begin
  45321. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45322. end;
  45323. procedure TUART1_U1STA.setURXDA; inline;
  45324. begin
  45325. pTDefRegMap(@Self)^.&set := $00000001;
  45326. end;
  45327. procedure TUART1_U1STA.clearURXDA; inline;
  45328. begin
  45329. pTDefRegMap(@Self)^.clr := $00000001;
  45330. end;
  45331. procedure TUART1_U1STA.setURXDA(thebits : TBits_1); inline;
  45332. begin
  45333. if thebits = 0 then
  45334. pTDefRegMap(@Self)^.clr := $00000001
  45335. else
  45336. pTDefRegMap(@Self)^.&set := $00000001;
  45337. end;
  45338. function TUART1_U1STA.getURXDA : TBits_1; inline;
  45339. begin
  45340. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45341. end;
  45342. procedure TUART1_U1STA.setOERR; inline;
  45343. begin
  45344. pTDefRegMap(@Self)^.&set := $00000002;
  45345. end;
  45346. procedure TUART1_U1STA.clearOERR; inline;
  45347. begin
  45348. pTDefRegMap(@Self)^.clr := $00000002;
  45349. end;
  45350. procedure TUART1_U1STA.setOERR(thebits : TBits_1); inline;
  45351. begin
  45352. if thebits = 0 then
  45353. pTDefRegMap(@Self)^.clr := $00000002
  45354. else
  45355. pTDefRegMap(@Self)^.&set := $00000002;
  45356. end;
  45357. function TUART1_U1STA.getOERR : TBits_1; inline;
  45358. begin
  45359. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45360. end;
  45361. procedure TUART1_U1STA.setFERR; inline;
  45362. begin
  45363. pTDefRegMap(@Self)^.&set := $00000004;
  45364. end;
  45365. procedure TUART1_U1STA.clearFERR; inline;
  45366. begin
  45367. pTDefRegMap(@Self)^.clr := $00000004;
  45368. end;
  45369. procedure TUART1_U1STA.setFERR(thebits : TBits_1); inline;
  45370. begin
  45371. if thebits = 0 then
  45372. pTDefRegMap(@Self)^.clr := $00000004
  45373. else
  45374. pTDefRegMap(@Self)^.&set := $00000004;
  45375. end;
  45376. function TUART1_U1STA.getFERR : TBits_1; inline;
  45377. begin
  45378. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45379. end;
  45380. procedure TUART1_U1STA.setPERR; inline;
  45381. begin
  45382. pTDefRegMap(@Self)^.&set := $00000008;
  45383. end;
  45384. procedure TUART1_U1STA.clearPERR; inline;
  45385. begin
  45386. pTDefRegMap(@Self)^.clr := $00000008;
  45387. end;
  45388. procedure TUART1_U1STA.setPERR(thebits : TBits_1); inline;
  45389. begin
  45390. if thebits = 0 then
  45391. pTDefRegMap(@Self)^.clr := $00000008
  45392. else
  45393. pTDefRegMap(@Self)^.&set := $00000008;
  45394. end;
  45395. function TUART1_U1STA.getPERR : TBits_1; inline;
  45396. begin
  45397. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45398. end;
  45399. procedure TUART1_U1STA.setRIDLE; inline;
  45400. begin
  45401. pTDefRegMap(@Self)^.&set := $00000010;
  45402. end;
  45403. procedure TUART1_U1STA.clearRIDLE; inline;
  45404. begin
  45405. pTDefRegMap(@Self)^.clr := $00000010;
  45406. end;
  45407. procedure TUART1_U1STA.setRIDLE(thebits : TBits_1); inline;
  45408. begin
  45409. if thebits = 0 then
  45410. pTDefRegMap(@Self)^.clr := $00000010
  45411. else
  45412. pTDefRegMap(@Self)^.&set := $00000010;
  45413. end;
  45414. function TUART1_U1STA.getRIDLE : TBits_1; inline;
  45415. begin
  45416. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45417. end;
  45418. procedure TUART1_U1STA.setADDEN; inline;
  45419. begin
  45420. pTDefRegMap(@Self)^.&set := $00000020;
  45421. end;
  45422. procedure TUART1_U1STA.clearADDEN; inline;
  45423. begin
  45424. pTDefRegMap(@Self)^.clr := $00000020;
  45425. end;
  45426. procedure TUART1_U1STA.setADDEN(thebits : TBits_1); inline;
  45427. begin
  45428. if thebits = 0 then
  45429. pTDefRegMap(@Self)^.clr := $00000020
  45430. else
  45431. pTDefRegMap(@Self)^.&set := $00000020;
  45432. end;
  45433. function TUART1_U1STA.getADDEN : TBits_1; inline;
  45434. begin
  45435. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45436. end;
  45437. procedure TUART1_U1STA.setURXISEL(thebits : TBits_2); inline;
  45438. begin
  45439. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  45440. end;
  45441. function TUART1_U1STA.getURXISEL : TBits_2; inline;
  45442. begin
  45443. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  45444. end;
  45445. procedure TUART1_U1STA.setTRMT; inline;
  45446. begin
  45447. pTDefRegMap(@Self)^.&set := $00000100;
  45448. end;
  45449. procedure TUART1_U1STA.clearTRMT; inline;
  45450. begin
  45451. pTDefRegMap(@Self)^.clr := $00000100;
  45452. end;
  45453. procedure TUART1_U1STA.setTRMT(thebits : TBits_1); inline;
  45454. begin
  45455. if thebits = 0 then
  45456. pTDefRegMap(@Self)^.clr := $00000100
  45457. else
  45458. pTDefRegMap(@Self)^.&set := $00000100;
  45459. end;
  45460. function TUART1_U1STA.getTRMT : TBits_1; inline;
  45461. begin
  45462. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45463. end;
  45464. procedure TUART1_U1STA.setUTXBF; inline;
  45465. begin
  45466. pTDefRegMap(@Self)^.&set := $00000200;
  45467. end;
  45468. procedure TUART1_U1STA.clearUTXBF; inline;
  45469. begin
  45470. pTDefRegMap(@Self)^.clr := $00000200;
  45471. end;
  45472. procedure TUART1_U1STA.setUTXBF(thebits : TBits_1); inline;
  45473. begin
  45474. if thebits = 0 then
  45475. pTDefRegMap(@Self)^.clr := $00000200
  45476. else
  45477. pTDefRegMap(@Self)^.&set := $00000200;
  45478. end;
  45479. function TUART1_U1STA.getUTXBF : TBits_1; inline;
  45480. begin
  45481. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45482. end;
  45483. procedure TUART1_U1STA.setUTXEN; inline;
  45484. begin
  45485. pTDefRegMap(@Self)^.&set := $00000400;
  45486. end;
  45487. procedure TUART1_U1STA.clearUTXEN; inline;
  45488. begin
  45489. pTDefRegMap(@Self)^.clr := $00000400;
  45490. end;
  45491. procedure TUART1_U1STA.setUTXEN(thebits : TBits_1); inline;
  45492. begin
  45493. if thebits = 0 then
  45494. pTDefRegMap(@Self)^.clr := $00000400
  45495. else
  45496. pTDefRegMap(@Self)^.&set := $00000400;
  45497. end;
  45498. function TUART1_U1STA.getUTXEN : TBits_1; inline;
  45499. begin
  45500. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45501. end;
  45502. procedure TUART1_U1STA.setUTXBRK; inline;
  45503. begin
  45504. pTDefRegMap(@Self)^.&set := $00000800;
  45505. end;
  45506. procedure TUART1_U1STA.clearUTXBRK; inline;
  45507. begin
  45508. pTDefRegMap(@Self)^.clr := $00000800;
  45509. end;
  45510. procedure TUART1_U1STA.setUTXBRK(thebits : TBits_1); inline;
  45511. begin
  45512. if thebits = 0 then
  45513. pTDefRegMap(@Self)^.clr := $00000800
  45514. else
  45515. pTDefRegMap(@Self)^.&set := $00000800;
  45516. end;
  45517. function TUART1_U1STA.getUTXBRK : TBits_1; inline;
  45518. begin
  45519. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  45520. end;
  45521. procedure TUART1_U1STA.setURXEN; inline;
  45522. begin
  45523. pTDefRegMap(@Self)^.&set := $00001000;
  45524. end;
  45525. procedure TUART1_U1STA.clearURXEN; inline;
  45526. begin
  45527. pTDefRegMap(@Self)^.clr := $00001000;
  45528. end;
  45529. procedure TUART1_U1STA.setURXEN(thebits : TBits_1); inline;
  45530. begin
  45531. if thebits = 0 then
  45532. pTDefRegMap(@Self)^.clr := $00001000
  45533. else
  45534. pTDefRegMap(@Self)^.&set := $00001000;
  45535. end;
  45536. function TUART1_U1STA.getURXEN : TBits_1; inline;
  45537. begin
  45538. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45539. end;
  45540. procedure TUART1_U1STA.setUTXINV; inline;
  45541. begin
  45542. pTDefRegMap(@Self)^.&set := $00002000;
  45543. end;
  45544. procedure TUART1_U1STA.clearUTXINV; inline;
  45545. begin
  45546. pTDefRegMap(@Self)^.clr := $00002000;
  45547. end;
  45548. procedure TUART1_U1STA.setUTXINV(thebits : TBits_1); inline;
  45549. begin
  45550. if thebits = 0 then
  45551. pTDefRegMap(@Self)^.clr := $00002000
  45552. else
  45553. pTDefRegMap(@Self)^.&set := $00002000;
  45554. end;
  45555. function TUART1_U1STA.getUTXINV : TBits_1; inline;
  45556. begin
  45557. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45558. end;
  45559. procedure TUART1_U1STA.setUTXISEL(thebits : TBits_2); inline;
  45560. begin
  45561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45562. end;
  45563. function TUART1_U1STA.getUTXISEL : TBits_2; inline;
  45564. begin
  45565. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45566. end;
  45567. procedure TUART1_U1STA.setADDR(thebits : TBits_8); inline;
  45568. begin
  45569. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  45570. end;
  45571. function TUART1_U1STA.getADDR : TBits_8; inline;
  45572. begin
  45573. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  45574. end;
  45575. procedure TUART1_U1STA.setADM_EN; inline;
  45576. begin
  45577. pTDefRegMap(@Self)^.&set := $01000000;
  45578. end;
  45579. procedure TUART1_U1STA.clearADM_EN; inline;
  45580. begin
  45581. pTDefRegMap(@Self)^.clr := $01000000;
  45582. end;
  45583. procedure TUART1_U1STA.setADM_EN(thebits : TBits_1); inline;
  45584. begin
  45585. if thebits = 0 then
  45586. pTDefRegMap(@Self)^.clr := $01000000
  45587. else
  45588. pTDefRegMap(@Self)^.&set := $01000000;
  45589. end;
  45590. function TUART1_U1STA.getADM_EN : TBits_1; inline;
  45591. begin
  45592. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  45593. end;
  45594. procedure TUART1_U1STA.setURXISEL0; inline;
  45595. begin
  45596. pTDefRegMap(@Self)^.&set := $00000040;
  45597. end;
  45598. procedure TUART1_U1STA.clearURXISEL0; inline;
  45599. begin
  45600. pTDefRegMap(@Self)^.clr := $00000040;
  45601. end;
  45602. procedure TUART1_U1STA.setURXISEL0(thebits : TBits_1); inline;
  45603. begin
  45604. if thebits = 0 then
  45605. pTDefRegMap(@Self)^.clr := $00000040
  45606. else
  45607. pTDefRegMap(@Self)^.&set := $00000040;
  45608. end;
  45609. function TUART1_U1STA.getURXISEL0 : TBits_1; inline;
  45610. begin
  45611. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45612. end;
  45613. procedure TUART1_U1STA.setURXISEL1; inline;
  45614. begin
  45615. pTDefRegMap(@Self)^.&set := $00000080;
  45616. end;
  45617. procedure TUART1_U1STA.clearURXISEL1; inline;
  45618. begin
  45619. pTDefRegMap(@Self)^.clr := $00000080;
  45620. end;
  45621. procedure TUART1_U1STA.setURXISEL1(thebits : TBits_1); inline;
  45622. begin
  45623. if thebits = 0 then
  45624. pTDefRegMap(@Self)^.clr := $00000080
  45625. else
  45626. pTDefRegMap(@Self)^.&set := $00000080;
  45627. end;
  45628. function TUART1_U1STA.getURXISEL1 : TBits_1; inline;
  45629. begin
  45630. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45631. end;
  45632. procedure TUART1_U1STA.setUTXISEL0; inline;
  45633. begin
  45634. pTDefRegMap(@Self)^.&set := $00004000;
  45635. end;
  45636. procedure TUART1_U1STA.clearUTXISEL0; inline;
  45637. begin
  45638. pTDefRegMap(@Self)^.clr := $00004000;
  45639. end;
  45640. procedure TUART1_U1STA.setUTXISEL0(thebits : TBits_1); inline;
  45641. begin
  45642. if thebits = 0 then
  45643. pTDefRegMap(@Self)^.clr := $00004000
  45644. else
  45645. pTDefRegMap(@Self)^.&set := $00004000;
  45646. end;
  45647. function TUART1_U1STA.getUTXISEL0 : TBits_1; inline;
  45648. begin
  45649. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45650. end;
  45651. procedure TUART1_U1STA.setUTXISEL1; inline;
  45652. begin
  45653. pTDefRegMap(@Self)^.&set := $00008000;
  45654. end;
  45655. procedure TUART1_U1STA.clearUTXISEL1; inline;
  45656. begin
  45657. pTDefRegMap(@Self)^.clr := $00008000;
  45658. end;
  45659. procedure TUART1_U1STA.setUTXISEL1(thebits : TBits_1); inline;
  45660. begin
  45661. if thebits = 0 then
  45662. pTDefRegMap(@Self)^.clr := $00008000
  45663. else
  45664. pTDefRegMap(@Self)^.&set := $00008000;
  45665. end;
  45666. function TUART1_U1STA.getUTXISEL1 : TBits_1; inline;
  45667. begin
  45668. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45669. end;
  45670. procedure TUART1_U1STA.setUTXSEL(thebits : TBits_2); inline;
  45671. begin
  45672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45673. end;
  45674. function TUART1_U1STA.getUTXSEL : TBits_2; inline;
  45675. begin
  45676. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45677. end;
  45678. procedure TUART1_U1STA.setw(thebits : TBits_32); inline;
  45679. begin
  45680. pTDefRegMap(@Self)^.val := thebits;
  45681. end;
  45682. function TUART1_U1STA.getw : TBits_32; inline;
  45683. begin
  45684. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45685. end;
  45686. procedure TUART1B_U1BMODE.setSTSEL; inline;
  45687. begin
  45688. pTDefRegMap(@Self)^.&set := $00000001;
  45689. end;
  45690. procedure TUART1B_U1BMODE.clearSTSEL; inline;
  45691. begin
  45692. pTDefRegMap(@Self)^.clr := $00000001;
  45693. end;
  45694. procedure TUART1B_U1BMODE.setSTSEL(thebits : TBits_1); inline;
  45695. begin
  45696. if thebits = 0 then
  45697. pTDefRegMap(@Self)^.clr := $00000001
  45698. else
  45699. pTDefRegMap(@Self)^.&set := $00000001;
  45700. end;
  45701. function TUART1B_U1BMODE.getSTSEL : TBits_1; inline;
  45702. begin
  45703. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45704. end;
  45705. procedure TUART1B_U1BMODE.setPDSEL(thebits : TBits_2); inline;
  45706. begin
  45707. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  45708. end;
  45709. function TUART1B_U1BMODE.getPDSEL : TBits_2; inline;
  45710. begin
  45711. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  45712. end;
  45713. procedure TUART1B_U1BMODE.setBRGH; inline;
  45714. begin
  45715. pTDefRegMap(@Self)^.&set := $00000008;
  45716. end;
  45717. procedure TUART1B_U1BMODE.clearBRGH; inline;
  45718. begin
  45719. pTDefRegMap(@Self)^.clr := $00000008;
  45720. end;
  45721. procedure TUART1B_U1BMODE.setBRGH(thebits : TBits_1); inline;
  45722. begin
  45723. if thebits = 0 then
  45724. pTDefRegMap(@Self)^.clr := $00000008
  45725. else
  45726. pTDefRegMap(@Self)^.&set := $00000008;
  45727. end;
  45728. function TUART1B_U1BMODE.getBRGH : TBits_1; inline;
  45729. begin
  45730. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45731. end;
  45732. procedure TUART1B_U1BMODE.setRXINV; inline;
  45733. begin
  45734. pTDefRegMap(@Self)^.&set := $00000010;
  45735. end;
  45736. procedure TUART1B_U1BMODE.clearRXINV; inline;
  45737. begin
  45738. pTDefRegMap(@Self)^.clr := $00000010;
  45739. end;
  45740. procedure TUART1B_U1BMODE.setRXINV(thebits : TBits_1); inline;
  45741. begin
  45742. if thebits = 0 then
  45743. pTDefRegMap(@Self)^.clr := $00000010
  45744. else
  45745. pTDefRegMap(@Self)^.&set := $00000010;
  45746. end;
  45747. function TUART1B_U1BMODE.getRXINV : TBits_1; inline;
  45748. begin
  45749. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45750. end;
  45751. procedure TUART1B_U1BMODE.setABAUD; inline;
  45752. begin
  45753. pTDefRegMap(@Self)^.&set := $00000020;
  45754. end;
  45755. procedure TUART1B_U1BMODE.clearABAUD; inline;
  45756. begin
  45757. pTDefRegMap(@Self)^.clr := $00000020;
  45758. end;
  45759. procedure TUART1B_U1BMODE.setABAUD(thebits : TBits_1); inline;
  45760. begin
  45761. if thebits = 0 then
  45762. pTDefRegMap(@Self)^.clr := $00000020
  45763. else
  45764. pTDefRegMap(@Self)^.&set := $00000020;
  45765. end;
  45766. function TUART1B_U1BMODE.getABAUD : TBits_1; inline;
  45767. begin
  45768. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45769. end;
  45770. procedure TUART1B_U1BMODE.setLPBACK; inline;
  45771. begin
  45772. pTDefRegMap(@Self)^.&set := $00000040;
  45773. end;
  45774. procedure TUART1B_U1BMODE.clearLPBACK; inline;
  45775. begin
  45776. pTDefRegMap(@Self)^.clr := $00000040;
  45777. end;
  45778. procedure TUART1B_U1BMODE.setLPBACK(thebits : TBits_1); inline;
  45779. begin
  45780. if thebits = 0 then
  45781. pTDefRegMap(@Self)^.clr := $00000040
  45782. else
  45783. pTDefRegMap(@Self)^.&set := $00000040;
  45784. end;
  45785. function TUART1B_U1BMODE.getLPBACK : TBits_1; inline;
  45786. begin
  45787. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45788. end;
  45789. procedure TUART1B_U1BMODE.setWAKE; inline;
  45790. begin
  45791. pTDefRegMap(@Self)^.&set := $00000080;
  45792. end;
  45793. procedure TUART1B_U1BMODE.clearWAKE; inline;
  45794. begin
  45795. pTDefRegMap(@Self)^.clr := $00000080;
  45796. end;
  45797. procedure TUART1B_U1BMODE.setWAKE(thebits : TBits_1); inline;
  45798. begin
  45799. if thebits = 0 then
  45800. pTDefRegMap(@Self)^.clr := $00000080
  45801. else
  45802. pTDefRegMap(@Self)^.&set := $00000080;
  45803. end;
  45804. function TUART1B_U1BMODE.getWAKE : TBits_1; inline;
  45805. begin
  45806. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45807. end;
  45808. procedure TUART1B_U1BMODE.setIREN; inline;
  45809. begin
  45810. pTDefRegMap(@Self)^.&set := $00001000;
  45811. end;
  45812. procedure TUART1B_U1BMODE.clearIREN; inline;
  45813. begin
  45814. pTDefRegMap(@Self)^.clr := $00001000;
  45815. end;
  45816. procedure TUART1B_U1BMODE.setIREN(thebits : TBits_1); inline;
  45817. begin
  45818. if thebits = 0 then
  45819. pTDefRegMap(@Self)^.clr := $00001000
  45820. else
  45821. pTDefRegMap(@Self)^.&set := $00001000;
  45822. end;
  45823. function TUART1B_U1BMODE.getIREN : TBits_1; inline;
  45824. begin
  45825. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45826. end;
  45827. procedure TUART1B_U1BMODE.setSIDL; inline;
  45828. begin
  45829. pTDefRegMap(@Self)^.&set := $00002000;
  45830. end;
  45831. procedure TUART1B_U1BMODE.clearSIDL; inline;
  45832. begin
  45833. pTDefRegMap(@Self)^.clr := $00002000;
  45834. end;
  45835. procedure TUART1B_U1BMODE.setSIDL(thebits : TBits_1); inline;
  45836. begin
  45837. if thebits = 0 then
  45838. pTDefRegMap(@Self)^.clr := $00002000
  45839. else
  45840. pTDefRegMap(@Self)^.&set := $00002000;
  45841. end;
  45842. function TUART1B_U1BMODE.getSIDL : TBits_1; inline;
  45843. begin
  45844. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45845. end;
  45846. procedure TUART1B_U1BMODE.setON; inline;
  45847. begin
  45848. pTDefRegMap(@Self)^.&set := $00008000;
  45849. end;
  45850. procedure TUART1B_U1BMODE.clearON; inline;
  45851. begin
  45852. pTDefRegMap(@Self)^.clr := $00008000;
  45853. end;
  45854. procedure TUART1B_U1BMODE.setON(thebits : TBits_1); inline;
  45855. begin
  45856. if thebits = 0 then
  45857. pTDefRegMap(@Self)^.clr := $00008000
  45858. else
  45859. pTDefRegMap(@Self)^.&set := $00008000;
  45860. end;
  45861. function TUART1B_U1BMODE.getON : TBits_1; inline;
  45862. begin
  45863. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45864. end;
  45865. procedure TUART1B_U1BMODE.setPDSEL0; inline;
  45866. begin
  45867. pTDefRegMap(@Self)^.&set := $00000002;
  45868. end;
  45869. procedure TUART1B_U1BMODE.clearPDSEL0; inline;
  45870. begin
  45871. pTDefRegMap(@Self)^.clr := $00000002;
  45872. end;
  45873. procedure TUART1B_U1BMODE.setPDSEL0(thebits : TBits_1); inline;
  45874. begin
  45875. if thebits = 0 then
  45876. pTDefRegMap(@Self)^.clr := $00000002
  45877. else
  45878. pTDefRegMap(@Self)^.&set := $00000002;
  45879. end;
  45880. function TUART1B_U1BMODE.getPDSEL0 : TBits_1; inline;
  45881. begin
  45882. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45883. end;
  45884. procedure TUART1B_U1BMODE.setPDSEL1; inline;
  45885. begin
  45886. pTDefRegMap(@Self)^.&set := $00000004;
  45887. end;
  45888. procedure TUART1B_U1BMODE.clearPDSEL1; inline;
  45889. begin
  45890. pTDefRegMap(@Self)^.clr := $00000004;
  45891. end;
  45892. procedure TUART1B_U1BMODE.setPDSEL1(thebits : TBits_1); inline;
  45893. begin
  45894. if thebits = 0 then
  45895. pTDefRegMap(@Self)^.clr := $00000004
  45896. else
  45897. pTDefRegMap(@Self)^.&set := $00000004;
  45898. end;
  45899. function TUART1B_U1BMODE.getPDSEL1 : TBits_1; inline;
  45900. begin
  45901. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45902. end;
  45903. procedure TUART1B_U1BMODE.setUSIDL; inline;
  45904. begin
  45905. pTDefRegMap(@Self)^.&set := $00002000;
  45906. end;
  45907. procedure TUART1B_U1BMODE.clearUSIDL; inline;
  45908. begin
  45909. pTDefRegMap(@Self)^.clr := $00002000;
  45910. end;
  45911. procedure TUART1B_U1BMODE.setUSIDL(thebits : TBits_1); inline;
  45912. begin
  45913. if thebits = 0 then
  45914. pTDefRegMap(@Self)^.clr := $00002000
  45915. else
  45916. pTDefRegMap(@Self)^.&set := $00002000;
  45917. end;
  45918. function TUART1B_U1BMODE.getUSIDL : TBits_1; inline;
  45919. begin
  45920. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45921. end;
  45922. procedure TUART1B_U1BMODE.setUARTEN; inline;
  45923. begin
  45924. pTDefRegMap(@Self)^.&set := $00008000;
  45925. end;
  45926. procedure TUART1B_U1BMODE.clearUARTEN; inline;
  45927. begin
  45928. pTDefRegMap(@Self)^.clr := $00008000;
  45929. end;
  45930. procedure TUART1B_U1BMODE.setUARTEN(thebits : TBits_1); inline;
  45931. begin
  45932. if thebits = 0 then
  45933. pTDefRegMap(@Self)^.clr := $00008000
  45934. else
  45935. pTDefRegMap(@Self)^.&set := $00008000;
  45936. end;
  45937. function TUART1B_U1BMODE.getUARTEN : TBits_1; inline;
  45938. begin
  45939. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45940. end;
  45941. procedure TUART1B_U1BMODE.setw(thebits : TBits_32); inline;
  45942. begin
  45943. pTDefRegMap(@Self)^.val := thebits;
  45944. end;
  45945. function TUART1B_U1BMODE.getw : TBits_32; inline;
  45946. begin
  45947. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45948. end;
  45949. procedure TUART1B_U4MODE.setSTSEL; inline;
  45950. begin
  45951. pTDefRegMap(@Self)^.&set := $00000001;
  45952. end;
  45953. procedure TUART1B_U4MODE.clearSTSEL; inline;
  45954. begin
  45955. pTDefRegMap(@Self)^.clr := $00000001;
  45956. end;
  45957. procedure TUART1B_U4MODE.setSTSEL(thebits : TBits_1); inline;
  45958. begin
  45959. if thebits = 0 then
  45960. pTDefRegMap(@Self)^.clr := $00000001
  45961. else
  45962. pTDefRegMap(@Self)^.&set := $00000001;
  45963. end;
  45964. function TUART1B_U4MODE.getSTSEL : TBits_1; inline;
  45965. begin
  45966. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45967. end;
  45968. procedure TUART1B_U4MODE.setPDSEL(thebits : TBits_2); inline;
  45969. begin
  45970. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  45971. end;
  45972. function TUART1B_U4MODE.getPDSEL : TBits_2; inline;
  45973. begin
  45974. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  45975. end;
  45976. procedure TUART1B_U4MODE.setBRGH; inline;
  45977. begin
  45978. pTDefRegMap(@Self)^.&set := $00000008;
  45979. end;
  45980. procedure TUART1B_U4MODE.clearBRGH; inline;
  45981. begin
  45982. pTDefRegMap(@Self)^.clr := $00000008;
  45983. end;
  45984. procedure TUART1B_U4MODE.setBRGH(thebits : TBits_1); inline;
  45985. begin
  45986. if thebits = 0 then
  45987. pTDefRegMap(@Self)^.clr := $00000008
  45988. else
  45989. pTDefRegMap(@Self)^.&set := $00000008;
  45990. end;
  45991. function TUART1B_U4MODE.getBRGH : TBits_1; inline;
  45992. begin
  45993. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45994. end;
  45995. procedure TUART1B_U4MODE.setRXINV; inline;
  45996. begin
  45997. pTDefRegMap(@Self)^.&set := $00000010;
  45998. end;
  45999. procedure TUART1B_U4MODE.clearRXINV; inline;
  46000. begin
  46001. pTDefRegMap(@Self)^.clr := $00000010;
  46002. end;
  46003. procedure TUART1B_U4MODE.setRXINV(thebits : TBits_1); inline;
  46004. begin
  46005. if thebits = 0 then
  46006. pTDefRegMap(@Self)^.clr := $00000010
  46007. else
  46008. pTDefRegMap(@Self)^.&set := $00000010;
  46009. end;
  46010. function TUART1B_U4MODE.getRXINV : TBits_1; inline;
  46011. begin
  46012. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46013. end;
  46014. procedure TUART1B_U4MODE.setABAUD; inline;
  46015. begin
  46016. pTDefRegMap(@Self)^.&set := $00000020;
  46017. end;
  46018. procedure TUART1B_U4MODE.clearABAUD; inline;
  46019. begin
  46020. pTDefRegMap(@Self)^.clr := $00000020;
  46021. end;
  46022. procedure TUART1B_U4MODE.setABAUD(thebits : TBits_1); inline;
  46023. begin
  46024. if thebits = 0 then
  46025. pTDefRegMap(@Self)^.clr := $00000020
  46026. else
  46027. pTDefRegMap(@Self)^.&set := $00000020;
  46028. end;
  46029. function TUART1B_U4MODE.getABAUD : TBits_1; inline;
  46030. begin
  46031. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46032. end;
  46033. procedure TUART1B_U4MODE.setLPBACK; inline;
  46034. begin
  46035. pTDefRegMap(@Self)^.&set := $00000040;
  46036. end;
  46037. procedure TUART1B_U4MODE.clearLPBACK; inline;
  46038. begin
  46039. pTDefRegMap(@Self)^.clr := $00000040;
  46040. end;
  46041. procedure TUART1B_U4MODE.setLPBACK(thebits : TBits_1); inline;
  46042. begin
  46043. if thebits = 0 then
  46044. pTDefRegMap(@Self)^.clr := $00000040
  46045. else
  46046. pTDefRegMap(@Self)^.&set := $00000040;
  46047. end;
  46048. function TUART1B_U4MODE.getLPBACK : TBits_1; inline;
  46049. begin
  46050. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46051. end;
  46052. procedure TUART1B_U4MODE.setWAKE; inline;
  46053. begin
  46054. pTDefRegMap(@Self)^.&set := $00000080;
  46055. end;
  46056. procedure TUART1B_U4MODE.clearWAKE; inline;
  46057. begin
  46058. pTDefRegMap(@Self)^.clr := $00000080;
  46059. end;
  46060. procedure TUART1B_U4MODE.setWAKE(thebits : TBits_1); inline;
  46061. begin
  46062. if thebits = 0 then
  46063. pTDefRegMap(@Self)^.clr := $00000080
  46064. else
  46065. pTDefRegMap(@Self)^.&set := $00000080;
  46066. end;
  46067. function TUART1B_U4MODE.getWAKE : TBits_1; inline;
  46068. begin
  46069. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46070. end;
  46071. procedure TUART1B_U4MODE.setIREN; inline;
  46072. begin
  46073. pTDefRegMap(@Self)^.&set := $00001000;
  46074. end;
  46075. procedure TUART1B_U4MODE.clearIREN; inline;
  46076. begin
  46077. pTDefRegMap(@Self)^.clr := $00001000;
  46078. end;
  46079. procedure TUART1B_U4MODE.setIREN(thebits : TBits_1); inline;
  46080. begin
  46081. if thebits = 0 then
  46082. pTDefRegMap(@Self)^.clr := $00001000
  46083. else
  46084. pTDefRegMap(@Self)^.&set := $00001000;
  46085. end;
  46086. function TUART1B_U4MODE.getIREN : TBits_1; inline;
  46087. begin
  46088. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46089. end;
  46090. procedure TUART1B_U4MODE.setSIDL; inline;
  46091. begin
  46092. pTDefRegMap(@Self)^.&set := $00002000;
  46093. end;
  46094. procedure TUART1B_U4MODE.clearSIDL; inline;
  46095. begin
  46096. pTDefRegMap(@Self)^.clr := $00002000;
  46097. end;
  46098. procedure TUART1B_U4MODE.setSIDL(thebits : TBits_1); inline;
  46099. begin
  46100. if thebits = 0 then
  46101. pTDefRegMap(@Self)^.clr := $00002000
  46102. else
  46103. pTDefRegMap(@Self)^.&set := $00002000;
  46104. end;
  46105. function TUART1B_U4MODE.getSIDL : TBits_1; inline;
  46106. begin
  46107. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46108. end;
  46109. procedure TUART1B_U4MODE.setON; inline;
  46110. begin
  46111. pTDefRegMap(@Self)^.&set := $00008000;
  46112. end;
  46113. procedure TUART1B_U4MODE.clearON; inline;
  46114. begin
  46115. pTDefRegMap(@Self)^.clr := $00008000;
  46116. end;
  46117. procedure TUART1B_U4MODE.setON(thebits : TBits_1); inline;
  46118. begin
  46119. if thebits = 0 then
  46120. pTDefRegMap(@Self)^.clr := $00008000
  46121. else
  46122. pTDefRegMap(@Self)^.&set := $00008000;
  46123. end;
  46124. function TUART1B_U4MODE.getON : TBits_1; inline;
  46125. begin
  46126. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46127. end;
  46128. procedure TUART1B_U4MODE.setPDSEL0; inline;
  46129. begin
  46130. pTDefRegMap(@Self)^.&set := $00000002;
  46131. end;
  46132. procedure TUART1B_U4MODE.clearPDSEL0; inline;
  46133. begin
  46134. pTDefRegMap(@Self)^.clr := $00000002;
  46135. end;
  46136. procedure TUART1B_U4MODE.setPDSEL0(thebits : TBits_1); inline;
  46137. begin
  46138. if thebits = 0 then
  46139. pTDefRegMap(@Self)^.clr := $00000002
  46140. else
  46141. pTDefRegMap(@Self)^.&set := $00000002;
  46142. end;
  46143. function TUART1B_U4MODE.getPDSEL0 : TBits_1; inline;
  46144. begin
  46145. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46146. end;
  46147. procedure TUART1B_U4MODE.setPDSEL1; inline;
  46148. begin
  46149. pTDefRegMap(@Self)^.&set := $00000004;
  46150. end;
  46151. procedure TUART1B_U4MODE.clearPDSEL1; inline;
  46152. begin
  46153. pTDefRegMap(@Self)^.clr := $00000004;
  46154. end;
  46155. procedure TUART1B_U4MODE.setPDSEL1(thebits : TBits_1); inline;
  46156. begin
  46157. if thebits = 0 then
  46158. pTDefRegMap(@Self)^.clr := $00000004
  46159. else
  46160. pTDefRegMap(@Self)^.&set := $00000004;
  46161. end;
  46162. function TUART1B_U4MODE.getPDSEL1 : TBits_1; inline;
  46163. begin
  46164. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46165. end;
  46166. procedure TUART1B_U4MODE.setUSIDL; inline;
  46167. begin
  46168. pTDefRegMap(@Self)^.&set := $00002000;
  46169. end;
  46170. procedure TUART1B_U4MODE.clearUSIDL; inline;
  46171. begin
  46172. pTDefRegMap(@Self)^.clr := $00002000;
  46173. end;
  46174. procedure TUART1B_U4MODE.setUSIDL(thebits : TBits_1); inline;
  46175. begin
  46176. if thebits = 0 then
  46177. pTDefRegMap(@Self)^.clr := $00002000
  46178. else
  46179. pTDefRegMap(@Self)^.&set := $00002000;
  46180. end;
  46181. function TUART1B_U4MODE.getUSIDL : TBits_1; inline;
  46182. begin
  46183. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46184. end;
  46185. procedure TUART1B_U4MODE.setUARTEN; inline;
  46186. begin
  46187. pTDefRegMap(@Self)^.&set := $00008000;
  46188. end;
  46189. procedure TUART1B_U4MODE.clearUARTEN; inline;
  46190. begin
  46191. pTDefRegMap(@Self)^.clr := $00008000;
  46192. end;
  46193. procedure TUART1B_U4MODE.setUARTEN(thebits : TBits_1); inline;
  46194. begin
  46195. if thebits = 0 then
  46196. pTDefRegMap(@Self)^.clr := $00008000
  46197. else
  46198. pTDefRegMap(@Self)^.&set := $00008000;
  46199. end;
  46200. function TUART1B_U4MODE.getUARTEN : TBits_1; inline;
  46201. begin
  46202. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46203. end;
  46204. procedure TUART1B_U4MODE.setw(thebits : TBits_32); inline;
  46205. begin
  46206. pTDefRegMap(@Self)^.val := thebits;
  46207. end;
  46208. function TUART1B_U4MODE.getw : TBits_32; inline;
  46209. begin
  46210. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46211. end;
  46212. procedure TUART1B_U1BSTA.setURXDA; inline;
  46213. begin
  46214. pTDefRegMap(@Self)^.&set := $00000001;
  46215. end;
  46216. procedure TUART1B_U1BSTA.clearURXDA; inline;
  46217. begin
  46218. pTDefRegMap(@Self)^.clr := $00000001;
  46219. end;
  46220. procedure TUART1B_U1BSTA.setURXDA(thebits : TBits_1); inline;
  46221. begin
  46222. if thebits = 0 then
  46223. pTDefRegMap(@Self)^.clr := $00000001
  46224. else
  46225. pTDefRegMap(@Self)^.&set := $00000001;
  46226. end;
  46227. function TUART1B_U1BSTA.getURXDA : TBits_1; inline;
  46228. begin
  46229. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46230. end;
  46231. procedure TUART1B_U1BSTA.setOERR; inline;
  46232. begin
  46233. pTDefRegMap(@Self)^.&set := $00000002;
  46234. end;
  46235. procedure TUART1B_U1BSTA.clearOERR; inline;
  46236. begin
  46237. pTDefRegMap(@Self)^.clr := $00000002;
  46238. end;
  46239. procedure TUART1B_U1BSTA.setOERR(thebits : TBits_1); inline;
  46240. begin
  46241. if thebits = 0 then
  46242. pTDefRegMap(@Self)^.clr := $00000002
  46243. else
  46244. pTDefRegMap(@Self)^.&set := $00000002;
  46245. end;
  46246. function TUART1B_U1BSTA.getOERR : TBits_1; inline;
  46247. begin
  46248. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46249. end;
  46250. procedure TUART1B_U1BSTA.setFERR; inline;
  46251. begin
  46252. pTDefRegMap(@Self)^.&set := $00000004;
  46253. end;
  46254. procedure TUART1B_U1BSTA.clearFERR; inline;
  46255. begin
  46256. pTDefRegMap(@Self)^.clr := $00000004;
  46257. end;
  46258. procedure TUART1B_U1BSTA.setFERR(thebits : TBits_1); inline;
  46259. begin
  46260. if thebits = 0 then
  46261. pTDefRegMap(@Self)^.clr := $00000004
  46262. else
  46263. pTDefRegMap(@Self)^.&set := $00000004;
  46264. end;
  46265. function TUART1B_U1BSTA.getFERR : TBits_1; inline;
  46266. begin
  46267. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46268. end;
  46269. procedure TUART1B_U1BSTA.setPERR; inline;
  46270. begin
  46271. pTDefRegMap(@Self)^.&set := $00000008;
  46272. end;
  46273. procedure TUART1B_U1BSTA.clearPERR; inline;
  46274. begin
  46275. pTDefRegMap(@Self)^.clr := $00000008;
  46276. end;
  46277. procedure TUART1B_U1BSTA.setPERR(thebits : TBits_1); inline;
  46278. begin
  46279. if thebits = 0 then
  46280. pTDefRegMap(@Self)^.clr := $00000008
  46281. else
  46282. pTDefRegMap(@Self)^.&set := $00000008;
  46283. end;
  46284. function TUART1B_U1BSTA.getPERR : TBits_1; inline;
  46285. begin
  46286. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46287. end;
  46288. procedure TUART1B_U1BSTA.setRIDLE; inline;
  46289. begin
  46290. pTDefRegMap(@Self)^.&set := $00000010;
  46291. end;
  46292. procedure TUART1B_U1BSTA.clearRIDLE; inline;
  46293. begin
  46294. pTDefRegMap(@Self)^.clr := $00000010;
  46295. end;
  46296. procedure TUART1B_U1BSTA.setRIDLE(thebits : TBits_1); inline;
  46297. begin
  46298. if thebits = 0 then
  46299. pTDefRegMap(@Self)^.clr := $00000010
  46300. else
  46301. pTDefRegMap(@Self)^.&set := $00000010;
  46302. end;
  46303. function TUART1B_U1BSTA.getRIDLE : TBits_1; inline;
  46304. begin
  46305. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46306. end;
  46307. procedure TUART1B_U1BSTA.setADDEN; inline;
  46308. begin
  46309. pTDefRegMap(@Self)^.&set := $00000020;
  46310. end;
  46311. procedure TUART1B_U1BSTA.clearADDEN; inline;
  46312. begin
  46313. pTDefRegMap(@Self)^.clr := $00000020;
  46314. end;
  46315. procedure TUART1B_U1BSTA.setADDEN(thebits : TBits_1); inline;
  46316. begin
  46317. if thebits = 0 then
  46318. pTDefRegMap(@Self)^.clr := $00000020
  46319. else
  46320. pTDefRegMap(@Self)^.&set := $00000020;
  46321. end;
  46322. function TUART1B_U1BSTA.getADDEN : TBits_1; inline;
  46323. begin
  46324. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46325. end;
  46326. procedure TUART1B_U1BSTA.setURXISEL(thebits : TBits_2); inline;
  46327. begin
  46328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  46329. end;
  46330. function TUART1B_U1BSTA.getURXISEL : TBits_2; inline;
  46331. begin
  46332. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  46333. end;
  46334. procedure TUART1B_U1BSTA.setTRMT; inline;
  46335. begin
  46336. pTDefRegMap(@Self)^.&set := $00000100;
  46337. end;
  46338. procedure TUART1B_U1BSTA.clearTRMT; inline;
  46339. begin
  46340. pTDefRegMap(@Self)^.clr := $00000100;
  46341. end;
  46342. procedure TUART1B_U1BSTA.setTRMT(thebits : TBits_1); inline;
  46343. begin
  46344. if thebits = 0 then
  46345. pTDefRegMap(@Self)^.clr := $00000100
  46346. else
  46347. pTDefRegMap(@Self)^.&set := $00000100;
  46348. end;
  46349. function TUART1B_U1BSTA.getTRMT : TBits_1; inline;
  46350. begin
  46351. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46352. end;
  46353. procedure TUART1B_U1BSTA.setUTXBF; inline;
  46354. begin
  46355. pTDefRegMap(@Self)^.&set := $00000200;
  46356. end;
  46357. procedure TUART1B_U1BSTA.clearUTXBF; inline;
  46358. begin
  46359. pTDefRegMap(@Self)^.clr := $00000200;
  46360. end;
  46361. procedure TUART1B_U1BSTA.setUTXBF(thebits : TBits_1); inline;
  46362. begin
  46363. if thebits = 0 then
  46364. pTDefRegMap(@Self)^.clr := $00000200
  46365. else
  46366. pTDefRegMap(@Self)^.&set := $00000200;
  46367. end;
  46368. function TUART1B_U1BSTA.getUTXBF : TBits_1; inline;
  46369. begin
  46370. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46371. end;
  46372. procedure TUART1B_U1BSTA.setUTXEN; inline;
  46373. begin
  46374. pTDefRegMap(@Self)^.&set := $00000400;
  46375. end;
  46376. procedure TUART1B_U1BSTA.clearUTXEN; inline;
  46377. begin
  46378. pTDefRegMap(@Self)^.clr := $00000400;
  46379. end;
  46380. procedure TUART1B_U1BSTA.setUTXEN(thebits : TBits_1); inline;
  46381. begin
  46382. if thebits = 0 then
  46383. pTDefRegMap(@Self)^.clr := $00000400
  46384. else
  46385. pTDefRegMap(@Self)^.&set := $00000400;
  46386. end;
  46387. function TUART1B_U1BSTA.getUTXEN : TBits_1; inline;
  46388. begin
  46389. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46390. end;
  46391. procedure TUART1B_U1BSTA.setUTXBRK; inline;
  46392. begin
  46393. pTDefRegMap(@Self)^.&set := $00000800;
  46394. end;
  46395. procedure TUART1B_U1BSTA.clearUTXBRK; inline;
  46396. begin
  46397. pTDefRegMap(@Self)^.clr := $00000800;
  46398. end;
  46399. procedure TUART1B_U1BSTA.setUTXBRK(thebits : TBits_1); inline;
  46400. begin
  46401. if thebits = 0 then
  46402. pTDefRegMap(@Self)^.clr := $00000800
  46403. else
  46404. pTDefRegMap(@Self)^.&set := $00000800;
  46405. end;
  46406. function TUART1B_U1BSTA.getUTXBRK : TBits_1; inline;
  46407. begin
  46408. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46409. end;
  46410. procedure TUART1B_U1BSTA.setURXEN; inline;
  46411. begin
  46412. pTDefRegMap(@Self)^.&set := $00001000;
  46413. end;
  46414. procedure TUART1B_U1BSTA.clearURXEN; inline;
  46415. begin
  46416. pTDefRegMap(@Self)^.clr := $00001000;
  46417. end;
  46418. procedure TUART1B_U1BSTA.setURXEN(thebits : TBits_1); inline;
  46419. begin
  46420. if thebits = 0 then
  46421. pTDefRegMap(@Self)^.clr := $00001000
  46422. else
  46423. pTDefRegMap(@Self)^.&set := $00001000;
  46424. end;
  46425. function TUART1B_U1BSTA.getURXEN : TBits_1; inline;
  46426. begin
  46427. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46428. end;
  46429. procedure TUART1B_U1BSTA.setUTXINV; inline;
  46430. begin
  46431. pTDefRegMap(@Self)^.&set := $00002000;
  46432. end;
  46433. procedure TUART1B_U1BSTA.clearUTXINV; inline;
  46434. begin
  46435. pTDefRegMap(@Self)^.clr := $00002000;
  46436. end;
  46437. procedure TUART1B_U1BSTA.setUTXINV(thebits : TBits_1); inline;
  46438. begin
  46439. if thebits = 0 then
  46440. pTDefRegMap(@Self)^.clr := $00002000
  46441. else
  46442. pTDefRegMap(@Self)^.&set := $00002000;
  46443. end;
  46444. function TUART1B_U1BSTA.getUTXINV : TBits_1; inline;
  46445. begin
  46446. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46447. end;
  46448. procedure TUART1B_U1BSTA.setUTXISEL(thebits : TBits_2); inline;
  46449. begin
  46450. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  46451. end;
  46452. function TUART1B_U1BSTA.getUTXISEL : TBits_2; inline;
  46453. begin
  46454. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  46455. end;
  46456. procedure TUART1B_U1BSTA.setADDR(thebits : TBits_8); inline;
  46457. begin
  46458. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  46459. end;
  46460. function TUART1B_U1BSTA.getADDR : TBits_8; inline;
  46461. begin
  46462. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  46463. end;
  46464. procedure TUART1B_U1BSTA.setADM_EN; inline;
  46465. begin
  46466. pTDefRegMap(@Self)^.&set := $01000000;
  46467. end;
  46468. procedure TUART1B_U1BSTA.clearADM_EN; inline;
  46469. begin
  46470. pTDefRegMap(@Self)^.clr := $01000000;
  46471. end;
  46472. procedure TUART1B_U1BSTA.setADM_EN(thebits : TBits_1); inline;
  46473. begin
  46474. if thebits = 0 then
  46475. pTDefRegMap(@Self)^.clr := $01000000
  46476. else
  46477. pTDefRegMap(@Self)^.&set := $01000000;
  46478. end;
  46479. function TUART1B_U1BSTA.getADM_EN : TBits_1; inline;
  46480. begin
  46481. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  46482. end;
  46483. procedure TUART1B_U1BSTA.setURXISEL0; inline;
  46484. begin
  46485. pTDefRegMap(@Self)^.&set := $00000040;
  46486. end;
  46487. procedure TUART1B_U1BSTA.clearURXISEL0; inline;
  46488. begin
  46489. pTDefRegMap(@Self)^.clr := $00000040;
  46490. end;
  46491. procedure TUART1B_U1BSTA.setURXISEL0(thebits : TBits_1); inline;
  46492. begin
  46493. if thebits = 0 then
  46494. pTDefRegMap(@Self)^.clr := $00000040
  46495. else
  46496. pTDefRegMap(@Self)^.&set := $00000040;
  46497. end;
  46498. function TUART1B_U1BSTA.getURXISEL0 : TBits_1; inline;
  46499. begin
  46500. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46501. end;
  46502. procedure TUART1B_U1BSTA.setURXISEL1; inline;
  46503. begin
  46504. pTDefRegMap(@Self)^.&set := $00000080;
  46505. end;
  46506. procedure TUART1B_U1BSTA.clearURXISEL1; inline;
  46507. begin
  46508. pTDefRegMap(@Self)^.clr := $00000080;
  46509. end;
  46510. procedure TUART1B_U1BSTA.setURXISEL1(thebits : TBits_1); inline;
  46511. begin
  46512. if thebits = 0 then
  46513. pTDefRegMap(@Self)^.clr := $00000080
  46514. else
  46515. pTDefRegMap(@Self)^.&set := $00000080;
  46516. end;
  46517. function TUART1B_U1BSTA.getURXISEL1 : TBits_1; inline;
  46518. begin
  46519. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46520. end;
  46521. procedure TUART1B_U1BSTA.setUTXISEL0; inline;
  46522. begin
  46523. pTDefRegMap(@Self)^.&set := $00004000;
  46524. end;
  46525. procedure TUART1B_U1BSTA.clearUTXISEL0; inline;
  46526. begin
  46527. pTDefRegMap(@Self)^.clr := $00004000;
  46528. end;
  46529. procedure TUART1B_U1BSTA.setUTXISEL0(thebits : TBits_1); inline;
  46530. begin
  46531. if thebits = 0 then
  46532. pTDefRegMap(@Self)^.clr := $00004000
  46533. else
  46534. pTDefRegMap(@Self)^.&set := $00004000;
  46535. end;
  46536. function TUART1B_U1BSTA.getUTXISEL0 : TBits_1; inline;
  46537. begin
  46538. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46539. end;
  46540. procedure TUART1B_U1BSTA.setUTXISEL1; inline;
  46541. begin
  46542. pTDefRegMap(@Self)^.&set := $00008000;
  46543. end;
  46544. procedure TUART1B_U1BSTA.clearUTXISEL1; inline;
  46545. begin
  46546. pTDefRegMap(@Self)^.clr := $00008000;
  46547. end;
  46548. procedure TUART1B_U1BSTA.setUTXISEL1(thebits : TBits_1); inline;
  46549. begin
  46550. if thebits = 0 then
  46551. pTDefRegMap(@Self)^.clr := $00008000
  46552. else
  46553. pTDefRegMap(@Self)^.&set := $00008000;
  46554. end;
  46555. function TUART1B_U1BSTA.getUTXISEL1 : TBits_1; inline;
  46556. begin
  46557. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46558. end;
  46559. procedure TUART1B_U1BSTA.setUTXSEL(thebits : TBits_2); inline;
  46560. begin
  46561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  46562. end;
  46563. function TUART1B_U1BSTA.getUTXSEL : TBits_2; inline;
  46564. begin
  46565. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  46566. end;
  46567. procedure TUART1B_U1BSTA.setw(thebits : TBits_32); inline;
  46568. begin
  46569. pTDefRegMap(@Self)^.val := thebits;
  46570. end;
  46571. function TUART1B_U1BSTA.getw : TBits_32; inline;
  46572. begin
  46573. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46574. end;
  46575. procedure TUART1B_U4STA.setURXDA; inline;
  46576. begin
  46577. pTDefRegMap(@Self)^.&set := $00000001;
  46578. end;
  46579. procedure TUART1B_U4STA.clearURXDA; inline;
  46580. begin
  46581. pTDefRegMap(@Self)^.clr := $00000001;
  46582. end;
  46583. procedure TUART1B_U4STA.setURXDA(thebits : TBits_1); inline;
  46584. begin
  46585. if thebits = 0 then
  46586. pTDefRegMap(@Self)^.clr := $00000001
  46587. else
  46588. pTDefRegMap(@Self)^.&set := $00000001;
  46589. end;
  46590. function TUART1B_U4STA.getURXDA : TBits_1; inline;
  46591. begin
  46592. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46593. end;
  46594. procedure TUART1B_U4STA.setOERR; inline;
  46595. begin
  46596. pTDefRegMap(@Self)^.&set := $00000002;
  46597. end;
  46598. procedure TUART1B_U4STA.clearOERR; inline;
  46599. begin
  46600. pTDefRegMap(@Self)^.clr := $00000002;
  46601. end;
  46602. procedure TUART1B_U4STA.setOERR(thebits : TBits_1); inline;
  46603. begin
  46604. if thebits = 0 then
  46605. pTDefRegMap(@Self)^.clr := $00000002
  46606. else
  46607. pTDefRegMap(@Self)^.&set := $00000002;
  46608. end;
  46609. function TUART1B_U4STA.getOERR : TBits_1; inline;
  46610. begin
  46611. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46612. end;
  46613. procedure TUART1B_U4STA.setFERR; inline;
  46614. begin
  46615. pTDefRegMap(@Self)^.&set := $00000004;
  46616. end;
  46617. procedure TUART1B_U4STA.clearFERR; inline;
  46618. begin
  46619. pTDefRegMap(@Self)^.clr := $00000004;
  46620. end;
  46621. procedure TUART1B_U4STA.setFERR(thebits : TBits_1); inline;
  46622. begin
  46623. if thebits = 0 then
  46624. pTDefRegMap(@Self)^.clr := $00000004
  46625. else
  46626. pTDefRegMap(@Self)^.&set := $00000004;
  46627. end;
  46628. function TUART1B_U4STA.getFERR : TBits_1; inline;
  46629. begin
  46630. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46631. end;
  46632. procedure TUART1B_U4STA.setPERR; inline;
  46633. begin
  46634. pTDefRegMap(@Self)^.&set := $00000008;
  46635. end;
  46636. procedure TUART1B_U4STA.clearPERR; inline;
  46637. begin
  46638. pTDefRegMap(@Self)^.clr := $00000008;
  46639. end;
  46640. procedure TUART1B_U4STA.setPERR(thebits : TBits_1); inline;
  46641. begin
  46642. if thebits = 0 then
  46643. pTDefRegMap(@Self)^.clr := $00000008
  46644. else
  46645. pTDefRegMap(@Self)^.&set := $00000008;
  46646. end;
  46647. function TUART1B_U4STA.getPERR : TBits_1; inline;
  46648. begin
  46649. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46650. end;
  46651. procedure TUART1B_U4STA.setRIDLE; inline;
  46652. begin
  46653. pTDefRegMap(@Self)^.&set := $00000010;
  46654. end;
  46655. procedure TUART1B_U4STA.clearRIDLE; inline;
  46656. begin
  46657. pTDefRegMap(@Self)^.clr := $00000010;
  46658. end;
  46659. procedure TUART1B_U4STA.setRIDLE(thebits : TBits_1); inline;
  46660. begin
  46661. if thebits = 0 then
  46662. pTDefRegMap(@Self)^.clr := $00000010
  46663. else
  46664. pTDefRegMap(@Self)^.&set := $00000010;
  46665. end;
  46666. function TUART1B_U4STA.getRIDLE : TBits_1; inline;
  46667. begin
  46668. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46669. end;
  46670. procedure TUART1B_U4STA.setADDEN; inline;
  46671. begin
  46672. pTDefRegMap(@Self)^.&set := $00000020;
  46673. end;
  46674. procedure TUART1B_U4STA.clearADDEN; inline;
  46675. begin
  46676. pTDefRegMap(@Self)^.clr := $00000020;
  46677. end;
  46678. procedure TUART1B_U4STA.setADDEN(thebits : TBits_1); inline;
  46679. begin
  46680. if thebits = 0 then
  46681. pTDefRegMap(@Self)^.clr := $00000020
  46682. else
  46683. pTDefRegMap(@Self)^.&set := $00000020;
  46684. end;
  46685. function TUART1B_U4STA.getADDEN : TBits_1; inline;
  46686. begin
  46687. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46688. end;
  46689. procedure TUART1B_U4STA.setURXISEL(thebits : TBits_2); inline;
  46690. begin
  46691. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  46692. end;
  46693. function TUART1B_U4STA.getURXISEL : TBits_2; inline;
  46694. begin
  46695. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  46696. end;
  46697. procedure TUART1B_U4STA.setTRMT; inline;
  46698. begin
  46699. pTDefRegMap(@Self)^.&set := $00000100;
  46700. end;
  46701. procedure TUART1B_U4STA.clearTRMT; inline;
  46702. begin
  46703. pTDefRegMap(@Self)^.clr := $00000100;
  46704. end;
  46705. procedure TUART1B_U4STA.setTRMT(thebits : TBits_1); inline;
  46706. begin
  46707. if thebits = 0 then
  46708. pTDefRegMap(@Self)^.clr := $00000100
  46709. else
  46710. pTDefRegMap(@Self)^.&set := $00000100;
  46711. end;
  46712. function TUART1B_U4STA.getTRMT : TBits_1; inline;
  46713. begin
  46714. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46715. end;
  46716. procedure TUART1B_U4STA.setUTXBF; inline;
  46717. begin
  46718. pTDefRegMap(@Self)^.&set := $00000200;
  46719. end;
  46720. procedure TUART1B_U4STA.clearUTXBF; inline;
  46721. begin
  46722. pTDefRegMap(@Self)^.clr := $00000200;
  46723. end;
  46724. procedure TUART1B_U4STA.setUTXBF(thebits : TBits_1); inline;
  46725. begin
  46726. if thebits = 0 then
  46727. pTDefRegMap(@Self)^.clr := $00000200
  46728. else
  46729. pTDefRegMap(@Self)^.&set := $00000200;
  46730. end;
  46731. function TUART1B_U4STA.getUTXBF : TBits_1; inline;
  46732. begin
  46733. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46734. end;
  46735. procedure TUART1B_U4STA.setUTXEN; inline;
  46736. begin
  46737. pTDefRegMap(@Self)^.&set := $00000400;
  46738. end;
  46739. procedure TUART1B_U4STA.clearUTXEN; inline;
  46740. begin
  46741. pTDefRegMap(@Self)^.clr := $00000400;
  46742. end;
  46743. procedure TUART1B_U4STA.setUTXEN(thebits : TBits_1); inline;
  46744. begin
  46745. if thebits = 0 then
  46746. pTDefRegMap(@Self)^.clr := $00000400
  46747. else
  46748. pTDefRegMap(@Self)^.&set := $00000400;
  46749. end;
  46750. function TUART1B_U4STA.getUTXEN : TBits_1; inline;
  46751. begin
  46752. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46753. end;
  46754. procedure TUART1B_U4STA.setUTXBRK; inline;
  46755. begin
  46756. pTDefRegMap(@Self)^.&set := $00000800;
  46757. end;
  46758. procedure TUART1B_U4STA.clearUTXBRK; inline;
  46759. begin
  46760. pTDefRegMap(@Self)^.clr := $00000800;
  46761. end;
  46762. procedure TUART1B_U4STA.setUTXBRK(thebits : TBits_1); inline;
  46763. begin
  46764. if thebits = 0 then
  46765. pTDefRegMap(@Self)^.clr := $00000800
  46766. else
  46767. pTDefRegMap(@Self)^.&set := $00000800;
  46768. end;
  46769. function TUART1B_U4STA.getUTXBRK : TBits_1; inline;
  46770. begin
  46771. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46772. end;
  46773. procedure TUART1B_U4STA.setURXEN; inline;
  46774. begin
  46775. pTDefRegMap(@Self)^.&set := $00001000;
  46776. end;
  46777. procedure TUART1B_U4STA.clearURXEN; inline;
  46778. begin
  46779. pTDefRegMap(@Self)^.clr := $00001000;
  46780. end;
  46781. procedure TUART1B_U4STA.setURXEN(thebits : TBits_1); inline;
  46782. begin
  46783. if thebits = 0 then
  46784. pTDefRegMap(@Self)^.clr := $00001000
  46785. else
  46786. pTDefRegMap(@Self)^.&set := $00001000;
  46787. end;
  46788. function TUART1B_U4STA.getURXEN : TBits_1; inline;
  46789. begin
  46790. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46791. end;
  46792. procedure TUART1B_U4STA.setUTXINV; inline;
  46793. begin
  46794. pTDefRegMap(@Self)^.&set := $00002000;
  46795. end;
  46796. procedure TUART1B_U4STA.clearUTXINV; inline;
  46797. begin
  46798. pTDefRegMap(@Self)^.clr := $00002000;
  46799. end;
  46800. procedure TUART1B_U4STA.setUTXINV(thebits : TBits_1); inline;
  46801. begin
  46802. if thebits = 0 then
  46803. pTDefRegMap(@Self)^.clr := $00002000
  46804. else
  46805. pTDefRegMap(@Self)^.&set := $00002000;
  46806. end;
  46807. function TUART1B_U4STA.getUTXINV : TBits_1; inline;
  46808. begin
  46809. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46810. end;
  46811. procedure TUART1B_U4STA.setUTXISEL(thebits : TBits_2); inline;
  46812. begin
  46813. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  46814. end;
  46815. function TUART1B_U4STA.getUTXISEL : TBits_2; inline;
  46816. begin
  46817. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  46818. end;
  46819. procedure TUART1B_U4STA.setADDR(thebits : TBits_8); inline;
  46820. begin
  46821. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  46822. end;
  46823. function TUART1B_U4STA.getADDR : TBits_8; inline;
  46824. begin
  46825. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  46826. end;
  46827. procedure TUART1B_U4STA.setADM_EN; inline;
  46828. begin
  46829. pTDefRegMap(@Self)^.&set := $01000000;
  46830. end;
  46831. procedure TUART1B_U4STA.clearADM_EN; inline;
  46832. begin
  46833. pTDefRegMap(@Self)^.clr := $01000000;
  46834. end;
  46835. procedure TUART1B_U4STA.setADM_EN(thebits : TBits_1); inline;
  46836. begin
  46837. if thebits = 0 then
  46838. pTDefRegMap(@Self)^.clr := $01000000
  46839. else
  46840. pTDefRegMap(@Self)^.&set := $01000000;
  46841. end;
  46842. function TUART1B_U4STA.getADM_EN : TBits_1; inline;
  46843. begin
  46844. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  46845. end;
  46846. procedure TUART1B_U4STA.setURXISEL0; inline;
  46847. begin
  46848. pTDefRegMap(@Self)^.&set := $00000040;
  46849. end;
  46850. procedure TUART1B_U4STA.clearURXISEL0; inline;
  46851. begin
  46852. pTDefRegMap(@Self)^.clr := $00000040;
  46853. end;
  46854. procedure TUART1B_U4STA.setURXISEL0(thebits : TBits_1); inline;
  46855. begin
  46856. if thebits = 0 then
  46857. pTDefRegMap(@Self)^.clr := $00000040
  46858. else
  46859. pTDefRegMap(@Self)^.&set := $00000040;
  46860. end;
  46861. function TUART1B_U4STA.getURXISEL0 : TBits_1; inline;
  46862. begin
  46863. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46864. end;
  46865. procedure TUART1B_U4STA.setURXISEL1; inline;
  46866. begin
  46867. pTDefRegMap(@Self)^.&set := $00000080;
  46868. end;
  46869. procedure TUART1B_U4STA.clearURXISEL1; inline;
  46870. begin
  46871. pTDefRegMap(@Self)^.clr := $00000080;
  46872. end;
  46873. procedure TUART1B_U4STA.setURXISEL1(thebits : TBits_1); inline;
  46874. begin
  46875. if thebits = 0 then
  46876. pTDefRegMap(@Self)^.clr := $00000080
  46877. else
  46878. pTDefRegMap(@Self)^.&set := $00000080;
  46879. end;
  46880. function TUART1B_U4STA.getURXISEL1 : TBits_1; inline;
  46881. begin
  46882. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46883. end;
  46884. procedure TUART1B_U4STA.setUTXISEL0; inline;
  46885. begin
  46886. pTDefRegMap(@Self)^.&set := $00004000;
  46887. end;
  46888. procedure TUART1B_U4STA.clearUTXISEL0; inline;
  46889. begin
  46890. pTDefRegMap(@Self)^.clr := $00004000;
  46891. end;
  46892. procedure TUART1B_U4STA.setUTXISEL0(thebits : TBits_1); inline;
  46893. begin
  46894. if thebits = 0 then
  46895. pTDefRegMap(@Self)^.clr := $00004000
  46896. else
  46897. pTDefRegMap(@Self)^.&set := $00004000;
  46898. end;
  46899. function TUART1B_U4STA.getUTXISEL0 : TBits_1; inline;
  46900. begin
  46901. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46902. end;
  46903. procedure TUART1B_U4STA.setUTXISEL1; inline;
  46904. begin
  46905. pTDefRegMap(@Self)^.&set := $00008000;
  46906. end;
  46907. procedure TUART1B_U4STA.clearUTXISEL1; inline;
  46908. begin
  46909. pTDefRegMap(@Self)^.clr := $00008000;
  46910. end;
  46911. procedure TUART1B_U4STA.setUTXISEL1(thebits : TBits_1); inline;
  46912. begin
  46913. if thebits = 0 then
  46914. pTDefRegMap(@Self)^.clr := $00008000
  46915. else
  46916. pTDefRegMap(@Self)^.&set := $00008000;
  46917. end;
  46918. function TUART1B_U4STA.getUTXISEL1 : TBits_1; inline;
  46919. begin
  46920. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46921. end;
  46922. procedure TUART1B_U4STA.setUTXSEL(thebits : TBits_2); inline;
  46923. begin
  46924. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  46925. end;
  46926. function TUART1B_U4STA.getUTXSEL : TBits_2; inline;
  46927. begin
  46928. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  46929. end;
  46930. procedure TUART1B_U4STA.setw(thebits : TBits_32); inline;
  46931. begin
  46932. pTDefRegMap(@Self)^.val := thebits;
  46933. end;
  46934. function TUART1B_U4STA.getw : TBits_32; inline;
  46935. begin
  46936. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46937. end;
  46938. procedure TUART3_U2AMODE.setSTSEL; inline;
  46939. begin
  46940. pTDefRegMap(@Self)^.&set := $00000001;
  46941. end;
  46942. procedure TUART3_U2AMODE.clearSTSEL; inline;
  46943. begin
  46944. pTDefRegMap(@Self)^.clr := $00000001;
  46945. end;
  46946. procedure TUART3_U2AMODE.setSTSEL(thebits : TBits_1); inline;
  46947. begin
  46948. if thebits = 0 then
  46949. pTDefRegMap(@Self)^.clr := $00000001
  46950. else
  46951. pTDefRegMap(@Self)^.&set := $00000001;
  46952. end;
  46953. function TUART3_U2AMODE.getSTSEL : TBits_1; inline;
  46954. begin
  46955. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46956. end;
  46957. procedure TUART3_U2AMODE.setPDSEL(thebits : TBits_2); inline;
  46958. begin
  46959. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  46960. end;
  46961. function TUART3_U2AMODE.getPDSEL : TBits_2; inline;
  46962. begin
  46963. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  46964. end;
  46965. procedure TUART3_U2AMODE.setBRGH; inline;
  46966. begin
  46967. pTDefRegMap(@Self)^.&set := $00000008;
  46968. end;
  46969. procedure TUART3_U2AMODE.clearBRGH; inline;
  46970. begin
  46971. pTDefRegMap(@Self)^.clr := $00000008;
  46972. end;
  46973. procedure TUART3_U2AMODE.setBRGH(thebits : TBits_1); inline;
  46974. begin
  46975. if thebits = 0 then
  46976. pTDefRegMap(@Self)^.clr := $00000008
  46977. else
  46978. pTDefRegMap(@Self)^.&set := $00000008;
  46979. end;
  46980. function TUART3_U2AMODE.getBRGH : TBits_1; inline;
  46981. begin
  46982. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46983. end;
  46984. procedure TUART3_U2AMODE.setRXINV; inline;
  46985. begin
  46986. pTDefRegMap(@Self)^.&set := $00000010;
  46987. end;
  46988. procedure TUART3_U2AMODE.clearRXINV; inline;
  46989. begin
  46990. pTDefRegMap(@Self)^.clr := $00000010;
  46991. end;
  46992. procedure TUART3_U2AMODE.setRXINV(thebits : TBits_1); inline;
  46993. begin
  46994. if thebits = 0 then
  46995. pTDefRegMap(@Self)^.clr := $00000010
  46996. else
  46997. pTDefRegMap(@Self)^.&set := $00000010;
  46998. end;
  46999. function TUART3_U2AMODE.getRXINV : TBits_1; inline;
  47000. begin
  47001. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47002. end;
  47003. procedure TUART3_U2AMODE.setABAUD; inline;
  47004. begin
  47005. pTDefRegMap(@Self)^.&set := $00000020;
  47006. end;
  47007. procedure TUART3_U2AMODE.clearABAUD; inline;
  47008. begin
  47009. pTDefRegMap(@Self)^.clr := $00000020;
  47010. end;
  47011. procedure TUART3_U2AMODE.setABAUD(thebits : TBits_1); inline;
  47012. begin
  47013. if thebits = 0 then
  47014. pTDefRegMap(@Self)^.clr := $00000020
  47015. else
  47016. pTDefRegMap(@Self)^.&set := $00000020;
  47017. end;
  47018. function TUART3_U2AMODE.getABAUD : TBits_1; inline;
  47019. begin
  47020. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47021. end;
  47022. procedure TUART3_U2AMODE.setLPBACK; inline;
  47023. begin
  47024. pTDefRegMap(@Self)^.&set := $00000040;
  47025. end;
  47026. procedure TUART3_U2AMODE.clearLPBACK; inline;
  47027. begin
  47028. pTDefRegMap(@Self)^.clr := $00000040;
  47029. end;
  47030. procedure TUART3_U2AMODE.setLPBACK(thebits : TBits_1); inline;
  47031. begin
  47032. if thebits = 0 then
  47033. pTDefRegMap(@Self)^.clr := $00000040
  47034. else
  47035. pTDefRegMap(@Self)^.&set := $00000040;
  47036. end;
  47037. function TUART3_U2AMODE.getLPBACK : TBits_1; inline;
  47038. begin
  47039. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47040. end;
  47041. procedure TUART3_U2AMODE.setWAKE; inline;
  47042. begin
  47043. pTDefRegMap(@Self)^.&set := $00000080;
  47044. end;
  47045. procedure TUART3_U2AMODE.clearWAKE; inline;
  47046. begin
  47047. pTDefRegMap(@Self)^.clr := $00000080;
  47048. end;
  47049. procedure TUART3_U2AMODE.setWAKE(thebits : TBits_1); inline;
  47050. begin
  47051. if thebits = 0 then
  47052. pTDefRegMap(@Self)^.clr := $00000080
  47053. else
  47054. pTDefRegMap(@Self)^.&set := $00000080;
  47055. end;
  47056. function TUART3_U2AMODE.getWAKE : TBits_1; inline;
  47057. begin
  47058. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47059. end;
  47060. procedure TUART3_U2AMODE.setUEN(thebits : TBits_2); inline;
  47061. begin
  47062. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  47063. end;
  47064. function TUART3_U2AMODE.getUEN : TBits_2; inline;
  47065. begin
  47066. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  47067. end;
  47068. procedure TUART3_U2AMODE.setRTSMD; inline;
  47069. begin
  47070. pTDefRegMap(@Self)^.&set := $00000800;
  47071. end;
  47072. procedure TUART3_U2AMODE.clearRTSMD; inline;
  47073. begin
  47074. pTDefRegMap(@Self)^.clr := $00000800;
  47075. end;
  47076. procedure TUART3_U2AMODE.setRTSMD(thebits : TBits_1); inline;
  47077. begin
  47078. if thebits = 0 then
  47079. pTDefRegMap(@Self)^.clr := $00000800
  47080. else
  47081. pTDefRegMap(@Self)^.&set := $00000800;
  47082. end;
  47083. function TUART3_U2AMODE.getRTSMD : TBits_1; inline;
  47084. begin
  47085. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47086. end;
  47087. procedure TUART3_U2AMODE.setIREN; inline;
  47088. begin
  47089. pTDefRegMap(@Self)^.&set := $00001000;
  47090. end;
  47091. procedure TUART3_U2AMODE.clearIREN; inline;
  47092. begin
  47093. pTDefRegMap(@Self)^.clr := $00001000;
  47094. end;
  47095. procedure TUART3_U2AMODE.setIREN(thebits : TBits_1); inline;
  47096. begin
  47097. if thebits = 0 then
  47098. pTDefRegMap(@Self)^.clr := $00001000
  47099. else
  47100. pTDefRegMap(@Self)^.&set := $00001000;
  47101. end;
  47102. function TUART3_U2AMODE.getIREN : TBits_1; inline;
  47103. begin
  47104. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47105. end;
  47106. procedure TUART3_U2AMODE.setSIDL; inline;
  47107. begin
  47108. pTDefRegMap(@Self)^.&set := $00002000;
  47109. end;
  47110. procedure TUART3_U2AMODE.clearSIDL; inline;
  47111. begin
  47112. pTDefRegMap(@Self)^.clr := $00002000;
  47113. end;
  47114. procedure TUART3_U2AMODE.setSIDL(thebits : TBits_1); inline;
  47115. begin
  47116. if thebits = 0 then
  47117. pTDefRegMap(@Self)^.clr := $00002000
  47118. else
  47119. pTDefRegMap(@Self)^.&set := $00002000;
  47120. end;
  47121. function TUART3_U2AMODE.getSIDL : TBits_1; inline;
  47122. begin
  47123. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47124. end;
  47125. procedure TUART3_U2AMODE.setON; inline;
  47126. begin
  47127. pTDefRegMap(@Self)^.&set := $00008000;
  47128. end;
  47129. procedure TUART3_U2AMODE.clearON; inline;
  47130. begin
  47131. pTDefRegMap(@Self)^.clr := $00008000;
  47132. end;
  47133. procedure TUART3_U2AMODE.setON(thebits : TBits_1); inline;
  47134. begin
  47135. if thebits = 0 then
  47136. pTDefRegMap(@Self)^.clr := $00008000
  47137. else
  47138. pTDefRegMap(@Self)^.&set := $00008000;
  47139. end;
  47140. function TUART3_U2AMODE.getON : TBits_1; inline;
  47141. begin
  47142. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47143. end;
  47144. procedure TUART3_U2AMODE.setPDSEL0; inline;
  47145. begin
  47146. pTDefRegMap(@Self)^.&set := $00000002;
  47147. end;
  47148. procedure TUART3_U2AMODE.clearPDSEL0; inline;
  47149. begin
  47150. pTDefRegMap(@Self)^.clr := $00000002;
  47151. end;
  47152. procedure TUART3_U2AMODE.setPDSEL0(thebits : TBits_1); inline;
  47153. begin
  47154. if thebits = 0 then
  47155. pTDefRegMap(@Self)^.clr := $00000002
  47156. else
  47157. pTDefRegMap(@Self)^.&set := $00000002;
  47158. end;
  47159. function TUART3_U2AMODE.getPDSEL0 : TBits_1; inline;
  47160. begin
  47161. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47162. end;
  47163. procedure TUART3_U2AMODE.setPDSEL1; inline;
  47164. begin
  47165. pTDefRegMap(@Self)^.&set := $00000004;
  47166. end;
  47167. procedure TUART3_U2AMODE.clearPDSEL1; inline;
  47168. begin
  47169. pTDefRegMap(@Self)^.clr := $00000004;
  47170. end;
  47171. procedure TUART3_U2AMODE.setPDSEL1(thebits : TBits_1); inline;
  47172. begin
  47173. if thebits = 0 then
  47174. pTDefRegMap(@Self)^.clr := $00000004
  47175. else
  47176. pTDefRegMap(@Self)^.&set := $00000004;
  47177. end;
  47178. function TUART3_U2AMODE.getPDSEL1 : TBits_1; inline;
  47179. begin
  47180. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47181. end;
  47182. procedure TUART3_U2AMODE.setUEN0; inline;
  47183. begin
  47184. pTDefRegMap(@Self)^.&set := $00000100;
  47185. end;
  47186. procedure TUART3_U2AMODE.clearUEN0; inline;
  47187. begin
  47188. pTDefRegMap(@Self)^.clr := $00000100;
  47189. end;
  47190. procedure TUART3_U2AMODE.setUEN0(thebits : TBits_1); inline;
  47191. begin
  47192. if thebits = 0 then
  47193. pTDefRegMap(@Self)^.clr := $00000100
  47194. else
  47195. pTDefRegMap(@Self)^.&set := $00000100;
  47196. end;
  47197. function TUART3_U2AMODE.getUEN0 : TBits_1; inline;
  47198. begin
  47199. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47200. end;
  47201. procedure TUART3_U2AMODE.setUEN1; inline;
  47202. begin
  47203. pTDefRegMap(@Self)^.&set := $00000200;
  47204. end;
  47205. procedure TUART3_U2AMODE.clearUEN1; inline;
  47206. begin
  47207. pTDefRegMap(@Self)^.clr := $00000200;
  47208. end;
  47209. procedure TUART3_U2AMODE.setUEN1(thebits : TBits_1); inline;
  47210. begin
  47211. if thebits = 0 then
  47212. pTDefRegMap(@Self)^.clr := $00000200
  47213. else
  47214. pTDefRegMap(@Self)^.&set := $00000200;
  47215. end;
  47216. function TUART3_U2AMODE.getUEN1 : TBits_1; inline;
  47217. begin
  47218. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47219. end;
  47220. procedure TUART3_U2AMODE.setUSIDL; inline;
  47221. begin
  47222. pTDefRegMap(@Self)^.&set := $00002000;
  47223. end;
  47224. procedure TUART3_U2AMODE.clearUSIDL; inline;
  47225. begin
  47226. pTDefRegMap(@Self)^.clr := $00002000;
  47227. end;
  47228. procedure TUART3_U2AMODE.setUSIDL(thebits : TBits_1); inline;
  47229. begin
  47230. if thebits = 0 then
  47231. pTDefRegMap(@Self)^.clr := $00002000
  47232. else
  47233. pTDefRegMap(@Self)^.&set := $00002000;
  47234. end;
  47235. function TUART3_U2AMODE.getUSIDL : TBits_1; inline;
  47236. begin
  47237. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47238. end;
  47239. procedure TUART3_U2AMODE.setUARTEN; inline;
  47240. begin
  47241. pTDefRegMap(@Self)^.&set := $00008000;
  47242. end;
  47243. procedure TUART3_U2AMODE.clearUARTEN; inline;
  47244. begin
  47245. pTDefRegMap(@Self)^.clr := $00008000;
  47246. end;
  47247. procedure TUART3_U2AMODE.setUARTEN(thebits : TBits_1); inline;
  47248. begin
  47249. if thebits = 0 then
  47250. pTDefRegMap(@Self)^.clr := $00008000
  47251. else
  47252. pTDefRegMap(@Self)^.&set := $00008000;
  47253. end;
  47254. function TUART3_U2AMODE.getUARTEN : TBits_1; inline;
  47255. begin
  47256. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47257. end;
  47258. procedure TUART3_U2AMODE.setw(thebits : TBits_32); inline;
  47259. begin
  47260. pTDefRegMap(@Self)^.val := thebits;
  47261. end;
  47262. function TUART3_U2AMODE.getw : TBits_32; inline;
  47263. begin
  47264. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47265. end;
  47266. procedure TUART3_U3MODE.setSTSEL; inline;
  47267. begin
  47268. pTDefRegMap(@Self)^.&set := $00000001;
  47269. end;
  47270. procedure TUART3_U3MODE.clearSTSEL; inline;
  47271. begin
  47272. pTDefRegMap(@Self)^.clr := $00000001;
  47273. end;
  47274. procedure TUART3_U3MODE.setSTSEL(thebits : TBits_1); inline;
  47275. begin
  47276. if thebits = 0 then
  47277. pTDefRegMap(@Self)^.clr := $00000001
  47278. else
  47279. pTDefRegMap(@Self)^.&set := $00000001;
  47280. end;
  47281. function TUART3_U3MODE.getSTSEL : TBits_1; inline;
  47282. begin
  47283. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47284. end;
  47285. procedure TUART3_U3MODE.setPDSEL(thebits : TBits_2); inline;
  47286. begin
  47287. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  47288. end;
  47289. function TUART3_U3MODE.getPDSEL : TBits_2; inline;
  47290. begin
  47291. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  47292. end;
  47293. procedure TUART3_U3MODE.setBRGH; inline;
  47294. begin
  47295. pTDefRegMap(@Self)^.&set := $00000008;
  47296. end;
  47297. procedure TUART3_U3MODE.clearBRGH; inline;
  47298. begin
  47299. pTDefRegMap(@Self)^.clr := $00000008;
  47300. end;
  47301. procedure TUART3_U3MODE.setBRGH(thebits : TBits_1); inline;
  47302. begin
  47303. if thebits = 0 then
  47304. pTDefRegMap(@Self)^.clr := $00000008
  47305. else
  47306. pTDefRegMap(@Self)^.&set := $00000008;
  47307. end;
  47308. function TUART3_U3MODE.getBRGH : TBits_1; inline;
  47309. begin
  47310. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47311. end;
  47312. procedure TUART3_U3MODE.setRXINV; inline;
  47313. begin
  47314. pTDefRegMap(@Self)^.&set := $00000010;
  47315. end;
  47316. procedure TUART3_U3MODE.clearRXINV; inline;
  47317. begin
  47318. pTDefRegMap(@Self)^.clr := $00000010;
  47319. end;
  47320. procedure TUART3_U3MODE.setRXINV(thebits : TBits_1); inline;
  47321. begin
  47322. if thebits = 0 then
  47323. pTDefRegMap(@Self)^.clr := $00000010
  47324. else
  47325. pTDefRegMap(@Self)^.&set := $00000010;
  47326. end;
  47327. function TUART3_U3MODE.getRXINV : TBits_1; inline;
  47328. begin
  47329. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47330. end;
  47331. procedure TUART3_U3MODE.setABAUD; inline;
  47332. begin
  47333. pTDefRegMap(@Self)^.&set := $00000020;
  47334. end;
  47335. procedure TUART3_U3MODE.clearABAUD; inline;
  47336. begin
  47337. pTDefRegMap(@Self)^.clr := $00000020;
  47338. end;
  47339. procedure TUART3_U3MODE.setABAUD(thebits : TBits_1); inline;
  47340. begin
  47341. if thebits = 0 then
  47342. pTDefRegMap(@Self)^.clr := $00000020
  47343. else
  47344. pTDefRegMap(@Self)^.&set := $00000020;
  47345. end;
  47346. function TUART3_U3MODE.getABAUD : TBits_1; inline;
  47347. begin
  47348. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47349. end;
  47350. procedure TUART3_U3MODE.setLPBACK; inline;
  47351. begin
  47352. pTDefRegMap(@Self)^.&set := $00000040;
  47353. end;
  47354. procedure TUART3_U3MODE.clearLPBACK; inline;
  47355. begin
  47356. pTDefRegMap(@Self)^.clr := $00000040;
  47357. end;
  47358. procedure TUART3_U3MODE.setLPBACK(thebits : TBits_1); inline;
  47359. begin
  47360. if thebits = 0 then
  47361. pTDefRegMap(@Self)^.clr := $00000040
  47362. else
  47363. pTDefRegMap(@Self)^.&set := $00000040;
  47364. end;
  47365. function TUART3_U3MODE.getLPBACK : TBits_1; inline;
  47366. begin
  47367. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47368. end;
  47369. procedure TUART3_U3MODE.setWAKE; inline;
  47370. begin
  47371. pTDefRegMap(@Self)^.&set := $00000080;
  47372. end;
  47373. procedure TUART3_U3MODE.clearWAKE; inline;
  47374. begin
  47375. pTDefRegMap(@Self)^.clr := $00000080;
  47376. end;
  47377. procedure TUART3_U3MODE.setWAKE(thebits : TBits_1); inline;
  47378. begin
  47379. if thebits = 0 then
  47380. pTDefRegMap(@Self)^.clr := $00000080
  47381. else
  47382. pTDefRegMap(@Self)^.&set := $00000080;
  47383. end;
  47384. function TUART3_U3MODE.getWAKE : TBits_1; inline;
  47385. begin
  47386. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47387. end;
  47388. procedure TUART3_U3MODE.setUEN(thebits : TBits_2); inline;
  47389. begin
  47390. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  47391. end;
  47392. function TUART3_U3MODE.getUEN : TBits_2; inline;
  47393. begin
  47394. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  47395. end;
  47396. procedure TUART3_U3MODE.setRTSMD; inline;
  47397. begin
  47398. pTDefRegMap(@Self)^.&set := $00000800;
  47399. end;
  47400. procedure TUART3_U3MODE.clearRTSMD; inline;
  47401. begin
  47402. pTDefRegMap(@Self)^.clr := $00000800;
  47403. end;
  47404. procedure TUART3_U3MODE.setRTSMD(thebits : TBits_1); inline;
  47405. begin
  47406. if thebits = 0 then
  47407. pTDefRegMap(@Self)^.clr := $00000800
  47408. else
  47409. pTDefRegMap(@Self)^.&set := $00000800;
  47410. end;
  47411. function TUART3_U3MODE.getRTSMD : TBits_1; inline;
  47412. begin
  47413. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47414. end;
  47415. procedure TUART3_U3MODE.setIREN; inline;
  47416. begin
  47417. pTDefRegMap(@Self)^.&set := $00001000;
  47418. end;
  47419. procedure TUART3_U3MODE.clearIREN; inline;
  47420. begin
  47421. pTDefRegMap(@Self)^.clr := $00001000;
  47422. end;
  47423. procedure TUART3_U3MODE.setIREN(thebits : TBits_1); inline;
  47424. begin
  47425. if thebits = 0 then
  47426. pTDefRegMap(@Self)^.clr := $00001000
  47427. else
  47428. pTDefRegMap(@Self)^.&set := $00001000;
  47429. end;
  47430. function TUART3_U3MODE.getIREN : TBits_1; inline;
  47431. begin
  47432. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47433. end;
  47434. procedure TUART3_U3MODE.setSIDL; inline;
  47435. begin
  47436. pTDefRegMap(@Self)^.&set := $00002000;
  47437. end;
  47438. procedure TUART3_U3MODE.clearSIDL; inline;
  47439. begin
  47440. pTDefRegMap(@Self)^.clr := $00002000;
  47441. end;
  47442. procedure TUART3_U3MODE.setSIDL(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 TUART3_U3MODE.getSIDL : TBits_1; inline;
  47450. begin
  47451. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47452. end;
  47453. procedure TUART3_U3MODE.setON; inline;
  47454. begin
  47455. pTDefRegMap(@Self)^.&set := $00008000;
  47456. end;
  47457. procedure TUART3_U3MODE.clearON; inline;
  47458. begin
  47459. pTDefRegMap(@Self)^.clr := $00008000;
  47460. end;
  47461. procedure TUART3_U3MODE.setON(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 TUART3_U3MODE.getON : TBits_1; inline;
  47469. begin
  47470. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47471. end;
  47472. procedure TUART3_U3MODE.setPDSEL0; inline;
  47473. begin
  47474. pTDefRegMap(@Self)^.&set := $00000002;
  47475. end;
  47476. procedure TUART3_U3MODE.clearPDSEL0; inline;
  47477. begin
  47478. pTDefRegMap(@Self)^.clr := $00000002;
  47479. end;
  47480. procedure TUART3_U3MODE.setPDSEL0(thebits : TBits_1); inline;
  47481. begin
  47482. if thebits = 0 then
  47483. pTDefRegMap(@Self)^.clr := $00000002
  47484. else
  47485. pTDefRegMap(@Self)^.&set := $00000002;
  47486. end;
  47487. function TUART3_U3MODE.getPDSEL0 : TBits_1; inline;
  47488. begin
  47489. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47490. end;
  47491. procedure TUART3_U3MODE.setPDSEL1; inline;
  47492. begin
  47493. pTDefRegMap(@Self)^.&set := $00000004;
  47494. end;
  47495. procedure TUART3_U3MODE.clearPDSEL1; inline;
  47496. begin
  47497. pTDefRegMap(@Self)^.clr := $00000004;
  47498. end;
  47499. procedure TUART3_U3MODE.setPDSEL1(thebits : TBits_1); inline;
  47500. begin
  47501. if thebits = 0 then
  47502. pTDefRegMap(@Self)^.clr := $00000004
  47503. else
  47504. pTDefRegMap(@Self)^.&set := $00000004;
  47505. end;
  47506. function TUART3_U3MODE.getPDSEL1 : TBits_1; inline;
  47507. begin
  47508. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47509. end;
  47510. procedure TUART3_U3MODE.setUEN0; inline;
  47511. begin
  47512. pTDefRegMap(@Self)^.&set := $00000100;
  47513. end;
  47514. procedure TUART3_U3MODE.clearUEN0; inline;
  47515. begin
  47516. pTDefRegMap(@Self)^.clr := $00000100;
  47517. end;
  47518. procedure TUART3_U3MODE.setUEN0(thebits : TBits_1); inline;
  47519. begin
  47520. if thebits = 0 then
  47521. pTDefRegMap(@Self)^.clr := $00000100
  47522. else
  47523. pTDefRegMap(@Self)^.&set := $00000100;
  47524. end;
  47525. function TUART3_U3MODE.getUEN0 : TBits_1; inline;
  47526. begin
  47527. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47528. end;
  47529. procedure TUART3_U3MODE.setUEN1; inline;
  47530. begin
  47531. pTDefRegMap(@Self)^.&set := $00000200;
  47532. end;
  47533. procedure TUART3_U3MODE.clearUEN1; inline;
  47534. begin
  47535. pTDefRegMap(@Self)^.clr := $00000200;
  47536. end;
  47537. procedure TUART3_U3MODE.setUEN1(thebits : TBits_1); inline;
  47538. begin
  47539. if thebits = 0 then
  47540. pTDefRegMap(@Self)^.clr := $00000200
  47541. else
  47542. pTDefRegMap(@Self)^.&set := $00000200;
  47543. end;
  47544. function TUART3_U3MODE.getUEN1 : TBits_1; inline;
  47545. begin
  47546. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47547. end;
  47548. procedure TUART3_U3MODE.setUSIDL; inline;
  47549. begin
  47550. pTDefRegMap(@Self)^.&set := $00002000;
  47551. end;
  47552. procedure TUART3_U3MODE.clearUSIDL; inline;
  47553. begin
  47554. pTDefRegMap(@Self)^.clr := $00002000;
  47555. end;
  47556. procedure TUART3_U3MODE.setUSIDL(thebits : TBits_1); inline;
  47557. begin
  47558. if thebits = 0 then
  47559. pTDefRegMap(@Self)^.clr := $00002000
  47560. else
  47561. pTDefRegMap(@Self)^.&set := $00002000;
  47562. end;
  47563. function TUART3_U3MODE.getUSIDL : TBits_1; inline;
  47564. begin
  47565. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47566. end;
  47567. procedure TUART3_U3MODE.setUARTEN; inline;
  47568. begin
  47569. pTDefRegMap(@Self)^.&set := $00008000;
  47570. end;
  47571. procedure TUART3_U3MODE.clearUARTEN; inline;
  47572. begin
  47573. pTDefRegMap(@Self)^.clr := $00008000;
  47574. end;
  47575. procedure TUART3_U3MODE.setUARTEN(thebits : TBits_1); inline;
  47576. begin
  47577. if thebits = 0 then
  47578. pTDefRegMap(@Self)^.clr := $00008000
  47579. else
  47580. pTDefRegMap(@Self)^.&set := $00008000;
  47581. end;
  47582. function TUART3_U3MODE.getUARTEN : TBits_1; inline;
  47583. begin
  47584. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47585. end;
  47586. procedure TUART3_U3MODE.setw(thebits : TBits_32); inline;
  47587. begin
  47588. pTDefRegMap(@Self)^.val := thebits;
  47589. end;
  47590. function TUART3_U3MODE.getw : TBits_32; inline;
  47591. begin
  47592. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47593. end;
  47594. procedure TUART3_U2ASTA.setURXDA; inline;
  47595. begin
  47596. pTDefRegMap(@Self)^.&set := $00000001;
  47597. end;
  47598. procedure TUART3_U2ASTA.clearURXDA; inline;
  47599. begin
  47600. pTDefRegMap(@Self)^.clr := $00000001;
  47601. end;
  47602. procedure TUART3_U2ASTA.setURXDA(thebits : TBits_1); inline;
  47603. begin
  47604. if thebits = 0 then
  47605. pTDefRegMap(@Self)^.clr := $00000001
  47606. else
  47607. pTDefRegMap(@Self)^.&set := $00000001;
  47608. end;
  47609. function TUART3_U2ASTA.getURXDA : TBits_1; inline;
  47610. begin
  47611. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47612. end;
  47613. procedure TUART3_U2ASTA.setOERR; inline;
  47614. begin
  47615. pTDefRegMap(@Self)^.&set := $00000002;
  47616. end;
  47617. procedure TUART3_U2ASTA.clearOERR; inline;
  47618. begin
  47619. pTDefRegMap(@Self)^.clr := $00000002;
  47620. end;
  47621. procedure TUART3_U2ASTA.setOERR(thebits : TBits_1); inline;
  47622. begin
  47623. if thebits = 0 then
  47624. pTDefRegMap(@Self)^.clr := $00000002
  47625. else
  47626. pTDefRegMap(@Self)^.&set := $00000002;
  47627. end;
  47628. function TUART3_U2ASTA.getOERR : TBits_1; inline;
  47629. begin
  47630. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47631. end;
  47632. procedure TUART3_U2ASTA.setFERR; inline;
  47633. begin
  47634. pTDefRegMap(@Self)^.&set := $00000004;
  47635. end;
  47636. procedure TUART3_U2ASTA.clearFERR; inline;
  47637. begin
  47638. pTDefRegMap(@Self)^.clr := $00000004;
  47639. end;
  47640. procedure TUART3_U2ASTA.setFERR(thebits : TBits_1); inline;
  47641. begin
  47642. if thebits = 0 then
  47643. pTDefRegMap(@Self)^.clr := $00000004
  47644. else
  47645. pTDefRegMap(@Self)^.&set := $00000004;
  47646. end;
  47647. function TUART3_U2ASTA.getFERR : TBits_1; inline;
  47648. begin
  47649. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47650. end;
  47651. procedure TUART3_U2ASTA.setPERR; inline;
  47652. begin
  47653. pTDefRegMap(@Self)^.&set := $00000008;
  47654. end;
  47655. procedure TUART3_U2ASTA.clearPERR; inline;
  47656. begin
  47657. pTDefRegMap(@Self)^.clr := $00000008;
  47658. end;
  47659. procedure TUART3_U2ASTA.setPERR(thebits : TBits_1); inline;
  47660. begin
  47661. if thebits = 0 then
  47662. pTDefRegMap(@Self)^.clr := $00000008
  47663. else
  47664. pTDefRegMap(@Self)^.&set := $00000008;
  47665. end;
  47666. function TUART3_U2ASTA.getPERR : TBits_1; inline;
  47667. begin
  47668. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47669. end;
  47670. procedure TUART3_U2ASTA.setRIDLE; inline;
  47671. begin
  47672. pTDefRegMap(@Self)^.&set := $00000010;
  47673. end;
  47674. procedure TUART3_U2ASTA.clearRIDLE; inline;
  47675. begin
  47676. pTDefRegMap(@Self)^.clr := $00000010;
  47677. end;
  47678. procedure TUART3_U2ASTA.setRIDLE(thebits : TBits_1); inline;
  47679. begin
  47680. if thebits = 0 then
  47681. pTDefRegMap(@Self)^.clr := $00000010
  47682. else
  47683. pTDefRegMap(@Self)^.&set := $00000010;
  47684. end;
  47685. function TUART3_U2ASTA.getRIDLE : TBits_1; inline;
  47686. begin
  47687. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47688. end;
  47689. procedure TUART3_U2ASTA.setADDEN; inline;
  47690. begin
  47691. pTDefRegMap(@Self)^.&set := $00000020;
  47692. end;
  47693. procedure TUART3_U2ASTA.clearADDEN; inline;
  47694. begin
  47695. pTDefRegMap(@Self)^.clr := $00000020;
  47696. end;
  47697. procedure TUART3_U2ASTA.setADDEN(thebits : TBits_1); inline;
  47698. begin
  47699. if thebits = 0 then
  47700. pTDefRegMap(@Self)^.clr := $00000020
  47701. else
  47702. pTDefRegMap(@Self)^.&set := $00000020;
  47703. end;
  47704. function TUART3_U2ASTA.getADDEN : TBits_1; inline;
  47705. begin
  47706. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47707. end;
  47708. procedure TUART3_U2ASTA.setURXISEL(thebits : TBits_2); inline;
  47709. begin
  47710. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  47711. end;
  47712. function TUART3_U2ASTA.getURXISEL : TBits_2; inline;
  47713. begin
  47714. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  47715. end;
  47716. procedure TUART3_U2ASTA.setTRMT; inline;
  47717. begin
  47718. pTDefRegMap(@Self)^.&set := $00000100;
  47719. end;
  47720. procedure TUART3_U2ASTA.clearTRMT; inline;
  47721. begin
  47722. pTDefRegMap(@Self)^.clr := $00000100;
  47723. end;
  47724. procedure TUART3_U2ASTA.setTRMT(thebits : TBits_1); inline;
  47725. begin
  47726. if thebits = 0 then
  47727. pTDefRegMap(@Self)^.clr := $00000100
  47728. else
  47729. pTDefRegMap(@Self)^.&set := $00000100;
  47730. end;
  47731. function TUART3_U2ASTA.getTRMT : TBits_1; inline;
  47732. begin
  47733. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47734. end;
  47735. procedure TUART3_U2ASTA.setUTXBF; inline;
  47736. begin
  47737. pTDefRegMap(@Self)^.&set := $00000200;
  47738. end;
  47739. procedure TUART3_U2ASTA.clearUTXBF; inline;
  47740. begin
  47741. pTDefRegMap(@Self)^.clr := $00000200;
  47742. end;
  47743. procedure TUART3_U2ASTA.setUTXBF(thebits : TBits_1); inline;
  47744. begin
  47745. if thebits = 0 then
  47746. pTDefRegMap(@Self)^.clr := $00000200
  47747. else
  47748. pTDefRegMap(@Self)^.&set := $00000200;
  47749. end;
  47750. function TUART3_U2ASTA.getUTXBF : TBits_1; inline;
  47751. begin
  47752. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47753. end;
  47754. procedure TUART3_U2ASTA.setUTXEN; inline;
  47755. begin
  47756. pTDefRegMap(@Self)^.&set := $00000400;
  47757. end;
  47758. procedure TUART3_U2ASTA.clearUTXEN; inline;
  47759. begin
  47760. pTDefRegMap(@Self)^.clr := $00000400;
  47761. end;
  47762. procedure TUART3_U2ASTA.setUTXEN(thebits : TBits_1); inline;
  47763. begin
  47764. if thebits = 0 then
  47765. pTDefRegMap(@Self)^.clr := $00000400
  47766. else
  47767. pTDefRegMap(@Self)^.&set := $00000400;
  47768. end;
  47769. function TUART3_U2ASTA.getUTXEN : TBits_1; inline;
  47770. begin
  47771. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47772. end;
  47773. procedure TUART3_U2ASTA.setUTXBRK; inline;
  47774. begin
  47775. pTDefRegMap(@Self)^.&set := $00000800;
  47776. end;
  47777. procedure TUART3_U2ASTA.clearUTXBRK; inline;
  47778. begin
  47779. pTDefRegMap(@Self)^.clr := $00000800;
  47780. end;
  47781. procedure TUART3_U2ASTA.setUTXBRK(thebits : TBits_1); inline;
  47782. begin
  47783. if thebits = 0 then
  47784. pTDefRegMap(@Self)^.clr := $00000800
  47785. else
  47786. pTDefRegMap(@Self)^.&set := $00000800;
  47787. end;
  47788. function TUART3_U2ASTA.getUTXBRK : TBits_1; inline;
  47789. begin
  47790. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47791. end;
  47792. procedure TUART3_U2ASTA.setURXEN; inline;
  47793. begin
  47794. pTDefRegMap(@Self)^.&set := $00001000;
  47795. end;
  47796. procedure TUART3_U2ASTA.clearURXEN; inline;
  47797. begin
  47798. pTDefRegMap(@Self)^.clr := $00001000;
  47799. end;
  47800. procedure TUART3_U2ASTA.setURXEN(thebits : TBits_1); inline;
  47801. begin
  47802. if thebits = 0 then
  47803. pTDefRegMap(@Self)^.clr := $00001000
  47804. else
  47805. pTDefRegMap(@Self)^.&set := $00001000;
  47806. end;
  47807. function TUART3_U2ASTA.getURXEN : TBits_1; inline;
  47808. begin
  47809. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47810. end;
  47811. procedure TUART3_U2ASTA.setUTXINV; inline;
  47812. begin
  47813. pTDefRegMap(@Self)^.&set := $00002000;
  47814. end;
  47815. procedure TUART3_U2ASTA.clearUTXINV; inline;
  47816. begin
  47817. pTDefRegMap(@Self)^.clr := $00002000;
  47818. end;
  47819. procedure TUART3_U2ASTA.setUTXINV(thebits : TBits_1); inline;
  47820. begin
  47821. if thebits = 0 then
  47822. pTDefRegMap(@Self)^.clr := $00002000
  47823. else
  47824. pTDefRegMap(@Self)^.&set := $00002000;
  47825. end;
  47826. function TUART3_U2ASTA.getUTXINV : TBits_1; inline;
  47827. begin
  47828. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47829. end;
  47830. procedure TUART3_U2ASTA.setUTXISEL(thebits : TBits_2); inline;
  47831. begin
  47832. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  47833. end;
  47834. function TUART3_U2ASTA.getUTXISEL : TBits_2; inline;
  47835. begin
  47836. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  47837. end;
  47838. procedure TUART3_U2ASTA.setADDR(thebits : TBits_8); inline;
  47839. begin
  47840. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  47841. end;
  47842. function TUART3_U2ASTA.getADDR : TBits_8; inline;
  47843. begin
  47844. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  47845. end;
  47846. procedure TUART3_U2ASTA.setADM_EN; inline;
  47847. begin
  47848. pTDefRegMap(@Self)^.&set := $01000000;
  47849. end;
  47850. procedure TUART3_U2ASTA.clearADM_EN; inline;
  47851. begin
  47852. pTDefRegMap(@Self)^.clr := $01000000;
  47853. end;
  47854. procedure TUART3_U2ASTA.setADM_EN(thebits : TBits_1); inline;
  47855. begin
  47856. if thebits = 0 then
  47857. pTDefRegMap(@Self)^.clr := $01000000
  47858. else
  47859. pTDefRegMap(@Self)^.&set := $01000000;
  47860. end;
  47861. function TUART3_U2ASTA.getADM_EN : TBits_1; inline;
  47862. begin
  47863. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  47864. end;
  47865. procedure TUART3_U2ASTA.setURXISEL0; inline;
  47866. begin
  47867. pTDefRegMap(@Self)^.&set := $00000040;
  47868. end;
  47869. procedure TUART3_U2ASTA.clearURXISEL0; inline;
  47870. begin
  47871. pTDefRegMap(@Self)^.clr := $00000040;
  47872. end;
  47873. procedure TUART3_U2ASTA.setURXISEL0(thebits : TBits_1); inline;
  47874. begin
  47875. if thebits = 0 then
  47876. pTDefRegMap(@Self)^.clr := $00000040
  47877. else
  47878. pTDefRegMap(@Self)^.&set := $00000040;
  47879. end;
  47880. function TUART3_U2ASTA.getURXISEL0 : TBits_1; inline;
  47881. begin
  47882. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47883. end;
  47884. procedure TUART3_U2ASTA.setURXISEL1; inline;
  47885. begin
  47886. pTDefRegMap(@Self)^.&set := $00000080;
  47887. end;
  47888. procedure TUART3_U2ASTA.clearURXISEL1; inline;
  47889. begin
  47890. pTDefRegMap(@Self)^.clr := $00000080;
  47891. end;
  47892. procedure TUART3_U2ASTA.setURXISEL1(thebits : TBits_1); inline;
  47893. begin
  47894. if thebits = 0 then
  47895. pTDefRegMap(@Self)^.clr := $00000080
  47896. else
  47897. pTDefRegMap(@Self)^.&set := $00000080;
  47898. end;
  47899. function TUART3_U2ASTA.getURXISEL1 : TBits_1; inline;
  47900. begin
  47901. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47902. end;
  47903. procedure TUART3_U2ASTA.setUTXISEL0; inline;
  47904. begin
  47905. pTDefRegMap(@Self)^.&set := $00004000;
  47906. end;
  47907. procedure TUART3_U2ASTA.clearUTXISEL0; inline;
  47908. begin
  47909. pTDefRegMap(@Self)^.clr := $00004000;
  47910. end;
  47911. procedure TUART3_U2ASTA.setUTXISEL0(thebits : TBits_1); inline;
  47912. begin
  47913. if thebits = 0 then
  47914. pTDefRegMap(@Self)^.clr := $00004000
  47915. else
  47916. pTDefRegMap(@Self)^.&set := $00004000;
  47917. end;
  47918. function TUART3_U2ASTA.getUTXISEL0 : TBits_1; inline;
  47919. begin
  47920. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  47921. end;
  47922. procedure TUART3_U2ASTA.setUTXISEL1; inline;
  47923. begin
  47924. pTDefRegMap(@Self)^.&set := $00008000;
  47925. end;
  47926. procedure TUART3_U2ASTA.clearUTXISEL1; inline;
  47927. begin
  47928. pTDefRegMap(@Self)^.clr := $00008000;
  47929. end;
  47930. procedure TUART3_U2ASTA.setUTXISEL1(thebits : TBits_1); inline;
  47931. begin
  47932. if thebits = 0 then
  47933. pTDefRegMap(@Self)^.clr := $00008000
  47934. else
  47935. pTDefRegMap(@Self)^.&set := $00008000;
  47936. end;
  47937. function TUART3_U2ASTA.getUTXISEL1 : TBits_1; inline;
  47938. begin
  47939. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47940. end;
  47941. procedure TUART3_U2ASTA.setUTXSEL(thebits : TBits_2); inline;
  47942. begin
  47943. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  47944. end;
  47945. function TUART3_U2ASTA.getUTXSEL : TBits_2; inline;
  47946. begin
  47947. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  47948. end;
  47949. procedure TUART3_U2ASTA.setw(thebits : TBits_32); inline;
  47950. begin
  47951. pTDefRegMap(@Self)^.val := thebits;
  47952. end;
  47953. function TUART3_U2ASTA.getw : TBits_32; inline;
  47954. begin
  47955. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47956. end;
  47957. procedure TUART3_U3STA.setURXDA; inline;
  47958. begin
  47959. pTDefRegMap(@Self)^.&set := $00000001;
  47960. end;
  47961. procedure TUART3_U3STA.clearURXDA; inline;
  47962. begin
  47963. pTDefRegMap(@Self)^.clr := $00000001;
  47964. end;
  47965. procedure TUART3_U3STA.setURXDA(thebits : TBits_1); inline;
  47966. begin
  47967. if thebits = 0 then
  47968. pTDefRegMap(@Self)^.clr := $00000001
  47969. else
  47970. pTDefRegMap(@Self)^.&set := $00000001;
  47971. end;
  47972. function TUART3_U3STA.getURXDA : TBits_1; inline;
  47973. begin
  47974. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47975. end;
  47976. procedure TUART3_U3STA.setOERR; inline;
  47977. begin
  47978. pTDefRegMap(@Self)^.&set := $00000002;
  47979. end;
  47980. procedure TUART3_U3STA.clearOERR; inline;
  47981. begin
  47982. pTDefRegMap(@Self)^.clr := $00000002;
  47983. end;
  47984. procedure TUART3_U3STA.setOERR(thebits : TBits_1); inline;
  47985. begin
  47986. if thebits = 0 then
  47987. pTDefRegMap(@Self)^.clr := $00000002
  47988. else
  47989. pTDefRegMap(@Self)^.&set := $00000002;
  47990. end;
  47991. function TUART3_U3STA.getOERR : TBits_1; inline;
  47992. begin
  47993. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47994. end;
  47995. procedure TUART3_U3STA.setFERR; inline;
  47996. begin
  47997. pTDefRegMap(@Self)^.&set := $00000004;
  47998. end;
  47999. procedure TUART3_U3STA.clearFERR; inline;
  48000. begin
  48001. pTDefRegMap(@Self)^.clr := $00000004;
  48002. end;
  48003. procedure TUART3_U3STA.setFERR(thebits : TBits_1); inline;
  48004. begin
  48005. if thebits = 0 then
  48006. pTDefRegMap(@Self)^.clr := $00000004
  48007. else
  48008. pTDefRegMap(@Self)^.&set := $00000004;
  48009. end;
  48010. function TUART3_U3STA.getFERR : TBits_1; inline;
  48011. begin
  48012. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48013. end;
  48014. procedure TUART3_U3STA.setPERR; inline;
  48015. begin
  48016. pTDefRegMap(@Self)^.&set := $00000008;
  48017. end;
  48018. procedure TUART3_U3STA.clearPERR; inline;
  48019. begin
  48020. pTDefRegMap(@Self)^.clr := $00000008;
  48021. end;
  48022. procedure TUART3_U3STA.setPERR(thebits : TBits_1); inline;
  48023. begin
  48024. if thebits = 0 then
  48025. pTDefRegMap(@Self)^.clr := $00000008
  48026. else
  48027. pTDefRegMap(@Self)^.&set := $00000008;
  48028. end;
  48029. function TUART3_U3STA.getPERR : TBits_1; inline;
  48030. begin
  48031. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48032. end;
  48033. procedure TUART3_U3STA.setRIDLE; inline;
  48034. begin
  48035. pTDefRegMap(@Self)^.&set := $00000010;
  48036. end;
  48037. procedure TUART3_U3STA.clearRIDLE; inline;
  48038. begin
  48039. pTDefRegMap(@Self)^.clr := $00000010;
  48040. end;
  48041. procedure TUART3_U3STA.setRIDLE(thebits : TBits_1); inline;
  48042. begin
  48043. if thebits = 0 then
  48044. pTDefRegMap(@Self)^.clr := $00000010
  48045. else
  48046. pTDefRegMap(@Self)^.&set := $00000010;
  48047. end;
  48048. function TUART3_U3STA.getRIDLE : TBits_1; inline;
  48049. begin
  48050. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48051. end;
  48052. procedure TUART3_U3STA.setADDEN; inline;
  48053. begin
  48054. pTDefRegMap(@Self)^.&set := $00000020;
  48055. end;
  48056. procedure TUART3_U3STA.clearADDEN; inline;
  48057. begin
  48058. pTDefRegMap(@Self)^.clr := $00000020;
  48059. end;
  48060. procedure TUART3_U3STA.setADDEN(thebits : TBits_1); inline;
  48061. begin
  48062. if thebits = 0 then
  48063. pTDefRegMap(@Self)^.clr := $00000020
  48064. else
  48065. pTDefRegMap(@Self)^.&set := $00000020;
  48066. end;
  48067. function TUART3_U3STA.getADDEN : TBits_1; inline;
  48068. begin
  48069. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48070. end;
  48071. procedure TUART3_U3STA.setURXISEL(thebits : TBits_2); inline;
  48072. begin
  48073. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  48074. end;
  48075. function TUART3_U3STA.getURXISEL : TBits_2; inline;
  48076. begin
  48077. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  48078. end;
  48079. procedure TUART3_U3STA.setTRMT; inline;
  48080. begin
  48081. pTDefRegMap(@Self)^.&set := $00000100;
  48082. end;
  48083. procedure TUART3_U3STA.clearTRMT; inline;
  48084. begin
  48085. pTDefRegMap(@Self)^.clr := $00000100;
  48086. end;
  48087. procedure TUART3_U3STA.setTRMT(thebits : TBits_1); inline;
  48088. begin
  48089. if thebits = 0 then
  48090. pTDefRegMap(@Self)^.clr := $00000100
  48091. else
  48092. pTDefRegMap(@Self)^.&set := $00000100;
  48093. end;
  48094. function TUART3_U3STA.getTRMT : TBits_1; inline;
  48095. begin
  48096. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48097. end;
  48098. procedure TUART3_U3STA.setUTXBF; inline;
  48099. begin
  48100. pTDefRegMap(@Self)^.&set := $00000200;
  48101. end;
  48102. procedure TUART3_U3STA.clearUTXBF; inline;
  48103. begin
  48104. pTDefRegMap(@Self)^.clr := $00000200;
  48105. end;
  48106. procedure TUART3_U3STA.setUTXBF(thebits : TBits_1); inline;
  48107. begin
  48108. if thebits = 0 then
  48109. pTDefRegMap(@Self)^.clr := $00000200
  48110. else
  48111. pTDefRegMap(@Self)^.&set := $00000200;
  48112. end;
  48113. function TUART3_U3STA.getUTXBF : TBits_1; inline;
  48114. begin
  48115. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48116. end;
  48117. procedure TUART3_U3STA.setUTXEN; inline;
  48118. begin
  48119. pTDefRegMap(@Self)^.&set := $00000400;
  48120. end;
  48121. procedure TUART3_U3STA.clearUTXEN; inline;
  48122. begin
  48123. pTDefRegMap(@Self)^.clr := $00000400;
  48124. end;
  48125. procedure TUART3_U3STA.setUTXEN(thebits : TBits_1); inline;
  48126. begin
  48127. if thebits = 0 then
  48128. pTDefRegMap(@Self)^.clr := $00000400
  48129. else
  48130. pTDefRegMap(@Self)^.&set := $00000400;
  48131. end;
  48132. function TUART3_U3STA.getUTXEN : TBits_1; inline;
  48133. begin
  48134. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48135. end;
  48136. procedure TUART3_U3STA.setUTXBRK; inline;
  48137. begin
  48138. pTDefRegMap(@Self)^.&set := $00000800;
  48139. end;
  48140. procedure TUART3_U3STA.clearUTXBRK; inline;
  48141. begin
  48142. pTDefRegMap(@Self)^.clr := $00000800;
  48143. end;
  48144. procedure TUART3_U3STA.setUTXBRK(thebits : TBits_1); inline;
  48145. begin
  48146. if thebits = 0 then
  48147. pTDefRegMap(@Self)^.clr := $00000800
  48148. else
  48149. pTDefRegMap(@Self)^.&set := $00000800;
  48150. end;
  48151. function TUART3_U3STA.getUTXBRK : TBits_1; inline;
  48152. begin
  48153. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48154. end;
  48155. procedure TUART3_U3STA.setURXEN; inline;
  48156. begin
  48157. pTDefRegMap(@Self)^.&set := $00001000;
  48158. end;
  48159. procedure TUART3_U3STA.clearURXEN; inline;
  48160. begin
  48161. pTDefRegMap(@Self)^.clr := $00001000;
  48162. end;
  48163. procedure TUART3_U3STA.setURXEN(thebits : TBits_1); inline;
  48164. begin
  48165. if thebits = 0 then
  48166. pTDefRegMap(@Self)^.clr := $00001000
  48167. else
  48168. pTDefRegMap(@Self)^.&set := $00001000;
  48169. end;
  48170. function TUART3_U3STA.getURXEN : TBits_1; inline;
  48171. begin
  48172. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48173. end;
  48174. procedure TUART3_U3STA.setUTXINV; inline;
  48175. begin
  48176. pTDefRegMap(@Self)^.&set := $00002000;
  48177. end;
  48178. procedure TUART3_U3STA.clearUTXINV; inline;
  48179. begin
  48180. pTDefRegMap(@Self)^.clr := $00002000;
  48181. end;
  48182. procedure TUART3_U3STA.setUTXINV(thebits : TBits_1); inline;
  48183. begin
  48184. if thebits = 0 then
  48185. pTDefRegMap(@Self)^.clr := $00002000
  48186. else
  48187. pTDefRegMap(@Self)^.&set := $00002000;
  48188. end;
  48189. function TUART3_U3STA.getUTXINV : TBits_1; inline;
  48190. begin
  48191. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48192. end;
  48193. procedure TUART3_U3STA.setUTXISEL(thebits : TBits_2); inline;
  48194. begin
  48195. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  48196. end;
  48197. function TUART3_U3STA.getUTXISEL : TBits_2; inline;
  48198. begin
  48199. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  48200. end;
  48201. procedure TUART3_U3STA.setADDR(thebits : TBits_8); inline;
  48202. begin
  48203. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  48204. end;
  48205. function TUART3_U3STA.getADDR : TBits_8; inline;
  48206. begin
  48207. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  48208. end;
  48209. procedure TUART3_U3STA.setADM_EN; inline;
  48210. begin
  48211. pTDefRegMap(@Self)^.&set := $01000000;
  48212. end;
  48213. procedure TUART3_U3STA.clearADM_EN; inline;
  48214. begin
  48215. pTDefRegMap(@Self)^.clr := $01000000;
  48216. end;
  48217. procedure TUART3_U3STA.setADM_EN(thebits : TBits_1); inline;
  48218. begin
  48219. if thebits = 0 then
  48220. pTDefRegMap(@Self)^.clr := $01000000
  48221. else
  48222. pTDefRegMap(@Self)^.&set := $01000000;
  48223. end;
  48224. function TUART3_U3STA.getADM_EN : TBits_1; inline;
  48225. begin
  48226. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  48227. end;
  48228. procedure TUART3_U3STA.setURXISEL0; inline;
  48229. begin
  48230. pTDefRegMap(@Self)^.&set := $00000040;
  48231. end;
  48232. procedure TUART3_U3STA.clearURXISEL0; inline;
  48233. begin
  48234. pTDefRegMap(@Self)^.clr := $00000040;
  48235. end;
  48236. procedure TUART3_U3STA.setURXISEL0(thebits : TBits_1); inline;
  48237. begin
  48238. if thebits = 0 then
  48239. pTDefRegMap(@Self)^.clr := $00000040
  48240. else
  48241. pTDefRegMap(@Self)^.&set := $00000040;
  48242. end;
  48243. function TUART3_U3STA.getURXISEL0 : TBits_1; inline;
  48244. begin
  48245. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48246. end;
  48247. procedure TUART3_U3STA.setURXISEL1; inline;
  48248. begin
  48249. pTDefRegMap(@Self)^.&set := $00000080;
  48250. end;
  48251. procedure TUART3_U3STA.clearURXISEL1; inline;
  48252. begin
  48253. pTDefRegMap(@Self)^.clr := $00000080;
  48254. end;
  48255. procedure TUART3_U3STA.setURXISEL1(thebits : TBits_1); inline;
  48256. begin
  48257. if thebits = 0 then
  48258. pTDefRegMap(@Self)^.clr := $00000080
  48259. else
  48260. pTDefRegMap(@Self)^.&set := $00000080;
  48261. end;
  48262. function TUART3_U3STA.getURXISEL1 : TBits_1; inline;
  48263. begin
  48264. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48265. end;
  48266. procedure TUART3_U3STA.setUTXISEL0; inline;
  48267. begin
  48268. pTDefRegMap(@Self)^.&set := $00004000;
  48269. end;
  48270. procedure TUART3_U3STA.clearUTXISEL0; inline;
  48271. begin
  48272. pTDefRegMap(@Self)^.clr := $00004000;
  48273. end;
  48274. procedure TUART3_U3STA.setUTXISEL0(thebits : TBits_1); inline;
  48275. begin
  48276. if thebits = 0 then
  48277. pTDefRegMap(@Self)^.clr := $00004000
  48278. else
  48279. pTDefRegMap(@Self)^.&set := $00004000;
  48280. end;
  48281. function TUART3_U3STA.getUTXISEL0 : TBits_1; inline;
  48282. begin
  48283. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  48284. end;
  48285. procedure TUART3_U3STA.setUTXISEL1; inline;
  48286. begin
  48287. pTDefRegMap(@Self)^.&set := $00008000;
  48288. end;
  48289. procedure TUART3_U3STA.clearUTXISEL1; inline;
  48290. begin
  48291. pTDefRegMap(@Self)^.clr := $00008000;
  48292. end;
  48293. procedure TUART3_U3STA.setUTXISEL1(thebits : TBits_1); inline;
  48294. begin
  48295. if thebits = 0 then
  48296. pTDefRegMap(@Self)^.clr := $00008000
  48297. else
  48298. pTDefRegMap(@Self)^.&set := $00008000;
  48299. end;
  48300. function TUART3_U3STA.getUTXISEL1 : TBits_1; inline;
  48301. begin
  48302. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48303. end;
  48304. procedure TUART3_U3STA.setUTXSEL(thebits : TBits_2); inline;
  48305. begin
  48306. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  48307. end;
  48308. function TUART3_U3STA.getUTXSEL : TBits_2; inline;
  48309. begin
  48310. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  48311. end;
  48312. procedure TUART3_U3STA.setw(thebits : TBits_32); inline;
  48313. begin
  48314. pTDefRegMap(@Self)^.val := thebits;
  48315. end;
  48316. function TUART3_U3STA.getw : TBits_32; inline;
  48317. begin
  48318. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48319. end;
  48320. procedure TUART2B_U2BMODE.setSTSEL; inline;
  48321. begin
  48322. pTDefRegMap(@Self)^.&set := $00000001;
  48323. end;
  48324. procedure TUART2B_U2BMODE.clearSTSEL; inline;
  48325. begin
  48326. pTDefRegMap(@Self)^.clr := $00000001;
  48327. end;
  48328. procedure TUART2B_U2BMODE.setSTSEL(thebits : TBits_1); inline;
  48329. begin
  48330. if thebits = 0 then
  48331. pTDefRegMap(@Self)^.clr := $00000001
  48332. else
  48333. pTDefRegMap(@Self)^.&set := $00000001;
  48334. end;
  48335. function TUART2B_U2BMODE.getSTSEL : TBits_1; inline;
  48336. begin
  48337. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48338. end;
  48339. procedure TUART2B_U2BMODE.setPDSEL(thebits : TBits_2); inline;
  48340. begin
  48341. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  48342. end;
  48343. function TUART2B_U2BMODE.getPDSEL : TBits_2; inline;
  48344. begin
  48345. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  48346. end;
  48347. procedure TUART2B_U2BMODE.setBRGH; inline;
  48348. begin
  48349. pTDefRegMap(@Self)^.&set := $00000008;
  48350. end;
  48351. procedure TUART2B_U2BMODE.clearBRGH; inline;
  48352. begin
  48353. pTDefRegMap(@Self)^.clr := $00000008;
  48354. end;
  48355. procedure TUART2B_U2BMODE.setBRGH(thebits : TBits_1); inline;
  48356. begin
  48357. if thebits = 0 then
  48358. pTDefRegMap(@Self)^.clr := $00000008
  48359. else
  48360. pTDefRegMap(@Self)^.&set := $00000008;
  48361. end;
  48362. function TUART2B_U2BMODE.getBRGH : TBits_1; inline;
  48363. begin
  48364. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48365. end;
  48366. procedure TUART2B_U2BMODE.setRXINV; inline;
  48367. begin
  48368. pTDefRegMap(@Self)^.&set := $00000010;
  48369. end;
  48370. procedure TUART2B_U2BMODE.clearRXINV; inline;
  48371. begin
  48372. pTDefRegMap(@Self)^.clr := $00000010;
  48373. end;
  48374. procedure TUART2B_U2BMODE.setRXINV(thebits : TBits_1); inline;
  48375. begin
  48376. if thebits = 0 then
  48377. pTDefRegMap(@Self)^.clr := $00000010
  48378. else
  48379. pTDefRegMap(@Self)^.&set := $00000010;
  48380. end;
  48381. function TUART2B_U2BMODE.getRXINV : TBits_1; inline;
  48382. begin
  48383. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48384. end;
  48385. procedure TUART2B_U2BMODE.setABAUD; inline;
  48386. begin
  48387. pTDefRegMap(@Self)^.&set := $00000020;
  48388. end;
  48389. procedure TUART2B_U2BMODE.clearABAUD; inline;
  48390. begin
  48391. pTDefRegMap(@Self)^.clr := $00000020;
  48392. end;
  48393. procedure TUART2B_U2BMODE.setABAUD(thebits : TBits_1); inline;
  48394. begin
  48395. if thebits = 0 then
  48396. pTDefRegMap(@Self)^.clr := $00000020
  48397. else
  48398. pTDefRegMap(@Self)^.&set := $00000020;
  48399. end;
  48400. function TUART2B_U2BMODE.getABAUD : TBits_1; inline;
  48401. begin
  48402. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48403. end;
  48404. procedure TUART2B_U2BMODE.setLPBACK; inline;
  48405. begin
  48406. pTDefRegMap(@Self)^.&set := $00000040;
  48407. end;
  48408. procedure TUART2B_U2BMODE.clearLPBACK; inline;
  48409. begin
  48410. pTDefRegMap(@Self)^.clr := $00000040;
  48411. end;
  48412. procedure TUART2B_U2BMODE.setLPBACK(thebits : TBits_1); inline;
  48413. begin
  48414. if thebits = 0 then
  48415. pTDefRegMap(@Self)^.clr := $00000040
  48416. else
  48417. pTDefRegMap(@Self)^.&set := $00000040;
  48418. end;
  48419. function TUART2B_U2BMODE.getLPBACK : TBits_1; inline;
  48420. begin
  48421. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48422. end;
  48423. procedure TUART2B_U2BMODE.setWAKE; inline;
  48424. begin
  48425. pTDefRegMap(@Self)^.&set := $00000080;
  48426. end;
  48427. procedure TUART2B_U2BMODE.clearWAKE; inline;
  48428. begin
  48429. pTDefRegMap(@Self)^.clr := $00000080;
  48430. end;
  48431. procedure TUART2B_U2BMODE.setWAKE(thebits : TBits_1); inline;
  48432. begin
  48433. if thebits = 0 then
  48434. pTDefRegMap(@Self)^.clr := $00000080
  48435. else
  48436. pTDefRegMap(@Self)^.&set := $00000080;
  48437. end;
  48438. function TUART2B_U2BMODE.getWAKE : TBits_1; inline;
  48439. begin
  48440. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48441. end;
  48442. procedure TUART2B_U2BMODE.setIREN; inline;
  48443. begin
  48444. pTDefRegMap(@Self)^.&set := $00001000;
  48445. end;
  48446. procedure TUART2B_U2BMODE.clearIREN; inline;
  48447. begin
  48448. pTDefRegMap(@Self)^.clr := $00001000;
  48449. end;
  48450. procedure TUART2B_U2BMODE.setIREN(thebits : TBits_1); inline;
  48451. begin
  48452. if thebits = 0 then
  48453. pTDefRegMap(@Self)^.clr := $00001000
  48454. else
  48455. pTDefRegMap(@Self)^.&set := $00001000;
  48456. end;
  48457. function TUART2B_U2BMODE.getIREN : TBits_1; inline;
  48458. begin
  48459. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48460. end;
  48461. procedure TUART2B_U2BMODE.setSIDL; inline;
  48462. begin
  48463. pTDefRegMap(@Self)^.&set := $00002000;
  48464. end;
  48465. procedure TUART2B_U2BMODE.clearSIDL; inline;
  48466. begin
  48467. pTDefRegMap(@Self)^.clr := $00002000;
  48468. end;
  48469. procedure TUART2B_U2BMODE.setSIDL(thebits : TBits_1); inline;
  48470. begin
  48471. if thebits = 0 then
  48472. pTDefRegMap(@Self)^.clr := $00002000
  48473. else
  48474. pTDefRegMap(@Self)^.&set := $00002000;
  48475. end;
  48476. function TUART2B_U2BMODE.getSIDL : TBits_1; inline;
  48477. begin
  48478. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48479. end;
  48480. procedure TUART2B_U2BMODE.setON; inline;
  48481. begin
  48482. pTDefRegMap(@Self)^.&set := $00008000;
  48483. end;
  48484. procedure TUART2B_U2BMODE.clearON; inline;
  48485. begin
  48486. pTDefRegMap(@Self)^.clr := $00008000;
  48487. end;
  48488. procedure TUART2B_U2BMODE.setON(thebits : TBits_1); inline;
  48489. begin
  48490. if thebits = 0 then
  48491. pTDefRegMap(@Self)^.clr := $00008000
  48492. else
  48493. pTDefRegMap(@Self)^.&set := $00008000;
  48494. end;
  48495. function TUART2B_U2BMODE.getON : TBits_1; inline;
  48496. begin
  48497. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48498. end;
  48499. procedure TUART2B_U2BMODE.setPDSEL0; inline;
  48500. begin
  48501. pTDefRegMap(@Self)^.&set := $00000002;
  48502. end;
  48503. procedure TUART2B_U2BMODE.clearPDSEL0; inline;
  48504. begin
  48505. pTDefRegMap(@Self)^.clr := $00000002;
  48506. end;
  48507. procedure TUART2B_U2BMODE.setPDSEL0(thebits : TBits_1); inline;
  48508. begin
  48509. if thebits = 0 then
  48510. pTDefRegMap(@Self)^.clr := $00000002
  48511. else
  48512. pTDefRegMap(@Self)^.&set := $00000002;
  48513. end;
  48514. function TUART2B_U2BMODE.getPDSEL0 : TBits_1; inline;
  48515. begin
  48516. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48517. end;
  48518. procedure TUART2B_U2BMODE.setPDSEL1; inline;
  48519. begin
  48520. pTDefRegMap(@Self)^.&set := $00000004;
  48521. end;
  48522. procedure TUART2B_U2BMODE.clearPDSEL1; inline;
  48523. begin
  48524. pTDefRegMap(@Self)^.clr := $00000004;
  48525. end;
  48526. procedure TUART2B_U2BMODE.setPDSEL1(thebits : TBits_1); inline;
  48527. begin
  48528. if thebits = 0 then
  48529. pTDefRegMap(@Self)^.clr := $00000004
  48530. else
  48531. pTDefRegMap(@Self)^.&set := $00000004;
  48532. end;
  48533. function TUART2B_U2BMODE.getPDSEL1 : TBits_1; inline;
  48534. begin
  48535. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48536. end;
  48537. procedure TUART2B_U2BMODE.setUSIDL; inline;
  48538. begin
  48539. pTDefRegMap(@Self)^.&set := $00002000;
  48540. end;
  48541. procedure TUART2B_U2BMODE.clearUSIDL; inline;
  48542. begin
  48543. pTDefRegMap(@Self)^.clr := $00002000;
  48544. end;
  48545. procedure TUART2B_U2BMODE.setUSIDL(thebits : TBits_1); inline;
  48546. begin
  48547. if thebits = 0 then
  48548. pTDefRegMap(@Self)^.clr := $00002000
  48549. else
  48550. pTDefRegMap(@Self)^.&set := $00002000;
  48551. end;
  48552. function TUART2B_U2BMODE.getUSIDL : TBits_1; inline;
  48553. begin
  48554. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48555. end;
  48556. procedure TUART2B_U2BMODE.setUARTEN; inline;
  48557. begin
  48558. pTDefRegMap(@Self)^.&set := $00008000;
  48559. end;
  48560. procedure TUART2B_U2BMODE.clearUARTEN; inline;
  48561. begin
  48562. pTDefRegMap(@Self)^.clr := $00008000;
  48563. end;
  48564. procedure TUART2B_U2BMODE.setUARTEN(thebits : TBits_1); inline;
  48565. begin
  48566. if thebits = 0 then
  48567. pTDefRegMap(@Self)^.clr := $00008000
  48568. else
  48569. pTDefRegMap(@Self)^.&set := $00008000;
  48570. end;
  48571. function TUART2B_U2BMODE.getUARTEN : TBits_1; inline;
  48572. begin
  48573. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48574. end;
  48575. procedure TUART2B_U2BMODE.setw(thebits : TBits_32); inline;
  48576. begin
  48577. pTDefRegMap(@Self)^.val := thebits;
  48578. end;
  48579. function TUART2B_U2BMODE.getw : TBits_32; inline;
  48580. begin
  48581. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48582. end;
  48583. procedure TUART2B_U6MODE.setSTSEL; inline;
  48584. begin
  48585. pTDefRegMap(@Self)^.&set := $00000001;
  48586. end;
  48587. procedure TUART2B_U6MODE.clearSTSEL; inline;
  48588. begin
  48589. pTDefRegMap(@Self)^.clr := $00000001;
  48590. end;
  48591. procedure TUART2B_U6MODE.setSTSEL(thebits : TBits_1); inline;
  48592. begin
  48593. if thebits = 0 then
  48594. pTDefRegMap(@Self)^.clr := $00000001
  48595. else
  48596. pTDefRegMap(@Self)^.&set := $00000001;
  48597. end;
  48598. function TUART2B_U6MODE.getSTSEL : TBits_1; inline;
  48599. begin
  48600. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48601. end;
  48602. procedure TUART2B_U6MODE.setPDSEL(thebits : TBits_2); inline;
  48603. begin
  48604. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  48605. end;
  48606. function TUART2B_U6MODE.getPDSEL : TBits_2; inline;
  48607. begin
  48608. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  48609. end;
  48610. procedure TUART2B_U6MODE.setBRGH; inline;
  48611. begin
  48612. pTDefRegMap(@Self)^.&set := $00000008;
  48613. end;
  48614. procedure TUART2B_U6MODE.clearBRGH; inline;
  48615. begin
  48616. pTDefRegMap(@Self)^.clr := $00000008;
  48617. end;
  48618. procedure TUART2B_U6MODE.setBRGH(thebits : TBits_1); inline;
  48619. begin
  48620. if thebits = 0 then
  48621. pTDefRegMap(@Self)^.clr := $00000008
  48622. else
  48623. pTDefRegMap(@Self)^.&set := $00000008;
  48624. end;
  48625. function TUART2B_U6MODE.getBRGH : TBits_1; inline;
  48626. begin
  48627. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48628. end;
  48629. procedure TUART2B_U6MODE.setRXINV; inline;
  48630. begin
  48631. pTDefRegMap(@Self)^.&set := $00000010;
  48632. end;
  48633. procedure TUART2B_U6MODE.clearRXINV; inline;
  48634. begin
  48635. pTDefRegMap(@Self)^.clr := $00000010;
  48636. end;
  48637. procedure TUART2B_U6MODE.setRXINV(thebits : TBits_1); inline;
  48638. begin
  48639. if thebits = 0 then
  48640. pTDefRegMap(@Self)^.clr := $00000010
  48641. else
  48642. pTDefRegMap(@Self)^.&set := $00000010;
  48643. end;
  48644. function TUART2B_U6MODE.getRXINV : TBits_1; inline;
  48645. begin
  48646. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48647. end;
  48648. procedure TUART2B_U6MODE.setABAUD; inline;
  48649. begin
  48650. pTDefRegMap(@Self)^.&set := $00000020;
  48651. end;
  48652. procedure TUART2B_U6MODE.clearABAUD; inline;
  48653. begin
  48654. pTDefRegMap(@Self)^.clr := $00000020;
  48655. end;
  48656. procedure TUART2B_U6MODE.setABAUD(thebits : TBits_1); inline;
  48657. begin
  48658. if thebits = 0 then
  48659. pTDefRegMap(@Self)^.clr := $00000020
  48660. else
  48661. pTDefRegMap(@Self)^.&set := $00000020;
  48662. end;
  48663. function TUART2B_U6MODE.getABAUD : TBits_1; inline;
  48664. begin
  48665. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48666. end;
  48667. procedure TUART2B_U6MODE.setLPBACK; inline;
  48668. begin
  48669. pTDefRegMap(@Self)^.&set := $00000040;
  48670. end;
  48671. procedure TUART2B_U6MODE.clearLPBACK; inline;
  48672. begin
  48673. pTDefRegMap(@Self)^.clr := $00000040;
  48674. end;
  48675. procedure TUART2B_U6MODE.setLPBACK(thebits : TBits_1); inline;
  48676. begin
  48677. if thebits = 0 then
  48678. pTDefRegMap(@Self)^.clr := $00000040
  48679. else
  48680. pTDefRegMap(@Self)^.&set := $00000040;
  48681. end;
  48682. function TUART2B_U6MODE.getLPBACK : TBits_1; inline;
  48683. begin
  48684. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48685. end;
  48686. procedure TUART2B_U6MODE.setWAKE; inline;
  48687. begin
  48688. pTDefRegMap(@Self)^.&set := $00000080;
  48689. end;
  48690. procedure TUART2B_U6MODE.clearWAKE; inline;
  48691. begin
  48692. pTDefRegMap(@Self)^.clr := $00000080;
  48693. end;
  48694. procedure TUART2B_U6MODE.setWAKE(thebits : TBits_1); inline;
  48695. begin
  48696. if thebits = 0 then
  48697. pTDefRegMap(@Self)^.clr := $00000080
  48698. else
  48699. pTDefRegMap(@Self)^.&set := $00000080;
  48700. end;
  48701. function TUART2B_U6MODE.getWAKE : TBits_1; inline;
  48702. begin
  48703. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48704. end;
  48705. procedure TUART2B_U6MODE.setIREN; inline;
  48706. begin
  48707. pTDefRegMap(@Self)^.&set := $00001000;
  48708. end;
  48709. procedure TUART2B_U6MODE.clearIREN; inline;
  48710. begin
  48711. pTDefRegMap(@Self)^.clr := $00001000;
  48712. end;
  48713. procedure TUART2B_U6MODE.setIREN(thebits : TBits_1); inline;
  48714. begin
  48715. if thebits = 0 then
  48716. pTDefRegMap(@Self)^.clr := $00001000
  48717. else
  48718. pTDefRegMap(@Self)^.&set := $00001000;
  48719. end;
  48720. function TUART2B_U6MODE.getIREN : TBits_1; inline;
  48721. begin
  48722. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48723. end;
  48724. procedure TUART2B_U6MODE.setSIDL; inline;
  48725. begin
  48726. pTDefRegMap(@Self)^.&set := $00002000;
  48727. end;
  48728. procedure TUART2B_U6MODE.clearSIDL; inline;
  48729. begin
  48730. pTDefRegMap(@Self)^.clr := $00002000;
  48731. end;
  48732. procedure TUART2B_U6MODE.setSIDL(thebits : TBits_1); inline;
  48733. begin
  48734. if thebits = 0 then
  48735. pTDefRegMap(@Self)^.clr := $00002000
  48736. else
  48737. pTDefRegMap(@Self)^.&set := $00002000;
  48738. end;
  48739. function TUART2B_U6MODE.getSIDL : TBits_1; inline;
  48740. begin
  48741. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48742. end;
  48743. procedure TUART2B_U6MODE.setON; inline;
  48744. begin
  48745. pTDefRegMap(@Self)^.&set := $00008000;
  48746. end;
  48747. procedure TUART2B_U6MODE.clearON; inline;
  48748. begin
  48749. pTDefRegMap(@Self)^.clr := $00008000;
  48750. end;
  48751. procedure TUART2B_U6MODE.setON(thebits : TBits_1); inline;
  48752. begin
  48753. if thebits = 0 then
  48754. pTDefRegMap(@Self)^.clr := $00008000
  48755. else
  48756. pTDefRegMap(@Self)^.&set := $00008000;
  48757. end;
  48758. function TUART2B_U6MODE.getON : TBits_1; inline;
  48759. begin
  48760. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48761. end;
  48762. procedure TUART2B_U6MODE.setPDSEL0; inline;
  48763. begin
  48764. pTDefRegMap(@Self)^.&set := $00000002;
  48765. end;
  48766. procedure TUART2B_U6MODE.clearPDSEL0; inline;
  48767. begin
  48768. pTDefRegMap(@Self)^.clr := $00000002;
  48769. end;
  48770. procedure TUART2B_U6MODE.setPDSEL0(thebits : TBits_1); inline;
  48771. begin
  48772. if thebits = 0 then
  48773. pTDefRegMap(@Self)^.clr := $00000002
  48774. else
  48775. pTDefRegMap(@Self)^.&set := $00000002;
  48776. end;
  48777. function TUART2B_U6MODE.getPDSEL0 : TBits_1; inline;
  48778. begin
  48779. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48780. end;
  48781. procedure TUART2B_U6MODE.setPDSEL1; inline;
  48782. begin
  48783. pTDefRegMap(@Self)^.&set := $00000004;
  48784. end;
  48785. procedure TUART2B_U6MODE.clearPDSEL1; inline;
  48786. begin
  48787. pTDefRegMap(@Self)^.clr := $00000004;
  48788. end;
  48789. procedure TUART2B_U6MODE.setPDSEL1(thebits : TBits_1); inline;
  48790. begin
  48791. if thebits = 0 then
  48792. pTDefRegMap(@Self)^.clr := $00000004
  48793. else
  48794. pTDefRegMap(@Self)^.&set := $00000004;
  48795. end;
  48796. function TUART2B_U6MODE.getPDSEL1 : TBits_1; inline;
  48797. begin
  48798. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48799. end;
  48800. procedure TUART2B_U6MODE.setUSIDL; inline;
  48801. begin
  48802. pTDefRegMap(@Self)^.&set := $00002000;
  48803. end;
  48804. procedure TUART2B_U6MODE.clearUSIDL; inline;
  48805. begin
  48806. pTDefRegMap(@Self)^.clr := $00002000;
  48807. end;
  48808. procedure TUART2B_U6MODE.setUSIDL(thebits : TBits_1); inline;
  48809. begin
  48810. if thebits = 0 then
  48811. pTDefRegMap(@Self)^.clr := $00002000
  48812. else
  48813. pTDefRegMap(@Self)^.&set := $00002000;
  48814. end;
  48815. function TUART2B_U6MODE.getUSIDL : TBits_1; inline;
  48816. begin
  48817. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48818. end;
  48819. procedure TUART2B_U6MODE.setUARTEN; inline;
  48820. begin
  48821. pTDefRegMap(@Self)^.&set := $00008000;
  48822. end;
  48823. procedure TUART2B_U6MODE.clearUARTEN; inline;
  48824. begin
  48825. pTDefRegMap(@Self)^.clr := $00008000;
  48826. end;
  48827. procedure TUART2B_U6MODE.setUARTEN(thebits : TBits_1); inline;
  48828. begin
  48829. if thebits = 0 then
  48830. pTDefRegMap(@Self)^.clr := $00008000
  48831. else
  48832. pTDefRegMap(@Self)^.&set := $00008000;
  48833. end;
  48834. function TUART2B_U6MODE.getUARTEN : TBits_1; inline;
  48835. begin
  48836. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48837. end;
  48838. procedure TUART2B_U6MODE.setw(thebits : TBits_32); inline;
  48839. begin
  48840. pTDefRegMap(@Self)^.val := thebits;
  48841. end;
  48842. function TUART2B_U6MODE.getw : TBits_32; inline;
  48843. begin
  48844. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48845. end;
  48846. procedure TUART2B_U2BSTA.setURXDA; inline;
  48847. begin
  48848. pTDefRegMap(@Self)^.&set := $00000001;
  48849. end;
  48850. procedure TUART2B_U2BSTA.clearURXDA; inline;
  48851. begin
  48852. pTDefRegMap(@Self)^.clr := $00000001;
  48853. end;
  48854. procedure TUART2B_U2BSTA.setURXDA(thebits : TBits_1); inline;
  48855. begin
  48856. if thebits = 0 then
  48857. pTDefRegMap(@Self)^.clr := $00000001
  48858. else
  48859. pTDefRegMap(@Self)^.&set := $00000001;
  48860. end;
  48861. function TUART2B_U2BSTA.getURXDA : TBits_1; inline;
  48862. begin
  48863. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48864. end;
  48865. procedure TUART2B_U2BSTA.setOERR; inline;
  48866. begin
  48867. pTDefRegMap(@Self)^.&set := $00000002;
  48868. end;
  48869. procedure TUART2B_U2BSTA.clearOERR; inline;
  48870. begin
  48871. pTDefRegMap(@Self)^.clr := $00000002;
  48872. end;
  48873. procedure TUART2B_U2BSTA.setOERR(thebits : TBits_1); inline;
  48874. begin
  48875. if thebits = 0 then
  48876. pTDefRegMap(@Self)^.clr := $00000002
  48877. else
  48878. pTDefRegMap(@Self)^.&set := $00000002;
  48879. end;
  48880. function TUART2B_U2BSTA.getOERR : TBits_1; inline;
  48881. begin
  48882. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48883. end;
  48884. procedure TUART2B_U2BSTA.setFERR; inline;
  48885. begin
  48886. pTDefRegMap(@Self)^.&set := $00000004;
  48887. end;
  48888. procedure TUART2B_U2BSTA.clearFERR; inline;
  48889. begin
  48890. pTDefRegMap(@Self)^.clr := $00000004;
  48891. end;
  48892. procedure TUART2B_U2BSTA.setFERR(thebits : TBits_1); inline;
  48893. begin
  48894. if thebits = 0 then
  48895. pTDefRegMap(@Self)^.clr := $00000004
  48896. else
  48897. pTDefRegMap(@Self)^.&set := $00000004;
  48898. end;
  48899. function TUART2B_U2BSTA.getFERR : TBits_1; inline;
  48900. begin
  48901. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48902. end;
  48903. procedure TUART2B_U2BSTA.setPERR; inline;
  48904. begin
  48905. pTDefRegMap(@Self)^.&set := $00000008;
  48906. end;
  48907. procedure TUART2B_U2BSTA.clearPERR; inline;
  48908. begin
  48909. pTDefRegMap(@Self)^.clr := $00000008;
  48910. end;
  48911. procedure TUART2B_U2BSTA.setPERR(thebits : TBits_1); inline;
  48912. begin
  48913. if thebits = 0 then
  48914. pTDefRegMap(@Self)^.clr := $00000008
  48915. else
  48916. pTDefRegMap(@Self)^.&set := $00000008;
  48917. end;
  48918. function TUART2B_U2BSTA.getPERR : TBits_1; inline;
  48919. begin
  48920. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48921. end;
  48922. procedure TUART2B_U2BSTA.setRIDLE; inline;
  48923. begin
  48924. pTDefRegMap(@Self)^.&set := $00000010;
  48925. end;
  48926. procedure TUART2B_U2BSTA.clearRIDLE; inline;
  48927. begin
  48928. pTDefRegMap(@Self)^.clr := $00000010;
  48929. end;
  48930. procedure TUART2B_U2BSTA.setRIDLE(thebits : TBits_1); inline;
  48931. begin
  48932. if thebits = 0 then
  48933. pTDefRegMap(@Self)^.clr := $00000010
  48934. else
  48935. pTDefRegMap(@Self)^.&set := $00000010;
  48936. end;
  48937. function TUART2B_U2BSTA.getRIDLE : TBits_1; inline;
  48938. begin
  48939. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48940. end;
  48941. procedure TUART2B_U2BSTA.setADDEN; inline;
  48942. begin
  48943. pTDefRegMap(@Self)^.&set := $00000020;
  48944. end;
  48945. procedure TUART2B_U2BSTA.clearADDEN; inline;
  48946. begin
  48947. pTDefRegMap(@Self)^.clr := $00000020;
  48948. end;
  48949. procedure TUART2B_U2BSTA.setADDEN(thebits : TBits_1); inline;
  48950. begin
  48951. if thebits = 0 then
  48952. pTDefRegMap(@Self)^.clr := $00000020
  48953. else
  48954. pTDefRegMap(@Self)^.&set := $00000020;
  48955. end;
  48956. function TUART2B_U2BSTA.getADDEN : TBits_1; inline;
  48957. begin
  48958. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48959. end;
  48960. procedure TUART2B_U2BSTA.setURXISEL(thebits : TBits_2); inline;
  48961. begin
  48962. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  48963. end;
  48964. function TUART2B_U2BSTA.getURXISEL : TBits_2; inline;
  48965. begin
  48966. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  48967. end;
  48968. procedure TUART2B_U2BSTA.setTRMT; inline;
  48969. begin
  48970. pTDefRegMap(@Self)^.&set := $00000100;
  48971. end;
  48972. procedure TUART2B_U2BSTA.clearTRMT; inline;
  48973. begin
  48974. pTDefRegMap(@Self)^.clr := $00000100;
  48975. end;
  48976. procedure TUART2B_U2BSTA.setTRMT(thebits : TBits_1); inline;
  48977. begin
  48978. if thebits = 0 then
  48979. pTDefRegMap(@Self)^.clr := $00000100
  48980. else
  48981. pTDefRegMap(@Self)^.&set := $00000100;
  48982. end;
  48983. function TUART2B_U2BSTA.getTRMT : TBits_1; inline;
  48984. begin
  48985. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48986. end;
  48987. procedure TUART2B_U2BSTA.setUTXBF; inline;
  48988. begin
  48989. pTDefRegMap(@Self)^.&set := $00000200;
  48990. end;
  48991. procedure TUART2B_U2BSTA.clearUTXBF; inline;
  48992. begin
  48993. pTDefRegMap(@Self)^.clr := $00000200;
  48994. end;
  48995. procedure TUART2B_U2BSTA.setUTXBF(thebits : TBits_1); inline;
  48996. begin
  48997. if thebits = 0 then
  48998. pTDefRegMap(@Self)^.clr := $00000200
  48999. else
  49000. pTDefRegMap(@Self)^.&set := $00000200;
  49001. end;
  49002. function TUART2B_U2BSTA.getUTXBF : TBits_1; inline;
  49003. begin
  49004. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49005. end;
  49006. procedure TUART2B_U2BSTA.setUTXEN; inline;
  49007. begin
  49008. pTDefRegMap(@Self)^.&set := $00000400;
  49009. end;
  49010. procedure TUART2B_U2BSTA.clearUTXEN; inline;
  49011. begin
  49012. pTDefRegMap(@Self)^.clr := $00000400;
  49013. end;
  49014. procedure TUART2B_U2BSTA.setUTXEN(thebits : TBits_1); inline;
  49015. begin
  49016. if thebits = 0 then
  49017. pTDefRegMap(@Self)^.clr := $00000400
  49018. else
  49019. pTDefRegMap(@Self)^.&set := $00000400;
  49020. end;
  49021. function TUART2B_U2BSTA.getUTXEN : TBits_1; inline;
  49022. begin
  49023. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49024. end;
  49025. procedure TUART2B_U2BSTA.setUTXBRK; inline;
  49026. begin
  49027. pTDefRegMap(@Self)^.&set := $00000800;
  49028. end;
  49029. procedure TUART2B_U2BSTA.clearUTXBRK; inline;
  49030. begin
  49031. pTDefRegMap(@Self)^.clr := $00000800;
  49032. end;
  49033. procedure TUART2B_U2BSTA.setUTXBRK(thebits : TBits_1); inline;
  49034. begin
  49035. if thebits = 0 then
  49036. pTDefRegMap(@Self)^.clr := $00000800
  49037. else
  49038. pTDefRegMap(@Self)^.&set := $00000800;
  49039. end;
  49040. function TUART2B_U2BSTA.getUTXBRK : TBits_1; inline;
  49041. begin
  49042. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49043. end;
  49044. procedure TUART2B_U2BSTA.setURXEN; inline;
  49045. begin
  49046. pTDefRegMap(@Self)^.&set := $00001000;
  49047. end;
  49048. procedure TUART2B_U2BSTA.clearURXEN; inline;
  49049. begin
  49050. pTDefRegMap(@Self)^.clr := $00001000;
  49051. end;
  49052. procedure TUART2B_U2BSTA.setURXEN(thebits : TBits_1); inline;
  49053. begin
  49054. if thebits = 0 then
  49055. pTDefRegMap(@Self)^.clr := $00001000
  49056. else
  49057. pTDefRegMap(@Self)^.&set := $00001000;
  49058. end;
  49059. function TUART2B_U2BSTA.getURXEN : TBits_1; inline;
  49060. begin
  49061. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  49062. end;
  49063. procedure TUART2B_U2BSTA.setUTXINV; inline;
  49064. begin
  49065. pTDefRegMap(@Self)^.&set := $00002000;
  49066. end;
  49067. procedure TUART2B_U2BSTA.clearUTXINV; inline;
  49068. begin
  49069. pTDefRegMap(@Self)^.clr := $00002000;
  49070. end;
  49071. procedure TUART2B_U2BSTA.setUTXINV(thebits : TBits_1); inline;
  49072. begin
  49073. if thebits = 0 then
  49074. pTDefRegMap(@Self)^.clr := $00002000
  49075. else
  49076. pTDefRegMap(@Self)^.&set := $00002000;
  49077. end;
  49078. function TUART2B_U2BSTA.getUTXINV : TBits_1; inline;
  49079. begin
  49080. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49081. end;
  49082. procedure TUART2B_U2BSTA.setUTXISEL(thebits : TBits_2); inline;
  49083. begin
  49084. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49085. end;
  49086. function TUART2B_U2BSTA.getUTXISEL : TBits_2; inline;
  49087. begin
  49088. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49089. end;
  49090. procedure TUART2B_U2BSTA.setADDR(thebits : TBits_8); inline;
  49091. begin
  49092. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  49093. end;
  49094. function TUART2B_U2BSTA.getADDR : TBits_8; inline;
  49095. begin
  49096. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  49097. end;
  49098. procedure TUART2B_U2BSTA.setADM_EN; inline;
  49099. begin
  49100. pTDefRegMap(@Self)^.&set := $01000000;
  49101. end;
  49102. procedure TUART2B_U2BSTA.clearADM_EN; inline;
  49103. begin
  49104. pTDefRegMap(@Self)^.clr := $01000000;
  49105. end;
  49106. procedure TUART2B_U2BSTA.setADM_EN(thebits : TBits_1); inline;
  49107. begin
  49108. if thebits = 0 then
  49109. pTDefRegMap(@Self)^.clr := $01000000
  49110. else
  49111. pTDefRegMap(@Self)^.&set := $01000000;
  49112. end;
  49113. function TUART2B_U2BSTA.getADM_EN : TBits_1; inline;
  49114. begin
  49115. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  49116. end;
  49117. procedure TUART2B_U2BSTA.setURXISEL0; inline;
  49118. begin
  49119. pTDefRegMap(@Self)^.&set := $00000040;
  49120. end;
  49121. procedure TUART2B_U2BSTA.clearURXISEL0; inline;
  49122. begin
  49123. pTDefRegMap(@Self)^.clr := $00000040;
  49124. end;
  49125. procedure TUART2B_U2BSTA.setURXISEL0(thebits : TBits_1); inline;
  49126. begin
  49127. if thebits = 0 then
  49128. pTDefRegMap(@Self)^.clr := $00000040
  49129. else
  49130. pTDefRegMap(@Self)^.&set := $00000040;
  49131. end;
  49132. function TUART2B_U2BSTA.getURXISEL0 : TBits_1; inline;
  49133. begin
  49134. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49135. end;
  49136. procedure TUART2B_U2BSTA.setURXISEL1; inline;
  49137. begin
  49138. pTDefRegMap(@Self)^.&set := $00000080;
  49139. end;
  49140. procedure TUART2B_U2BSTA.clearURXISEL1; inline;
  49141. begin
  49142. pTDefRegMap(@Self)^.clr := $00000080;
  49143. end;
  49144. procedure TUART2B_U2BSTA.setURXISEL1(thebits : TBits_1); inline;
  49145. begin
  49146. if thebits = 0 then
  49147. pTDefRegMap(@Self)^.clr := $00000080
  49148. else
  49149. pTDefRegMap(@Self)^.&set := $00000080;
  49150. end;
  49151. function TUART2B_U2BSTA.getURXISEL1 : TBits_1; inline;
  49152. begin
  49153. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49154. end;
  49155. procedure TUART2B_U2BSTA.setUTXISEL0; inline;
  49156. begin
  49157. pTDefRegMap(@Self)^.&set := $00004000;
  49158. end;
  49159. procedure TUART2B_U2BSTA.clearUTXISEL0; inline;
  49160. begin
  49161. pTDefRegMap(@Self)^.clr := $00004000;
  49162. end;
  49163. procedure TUART2B_U2BSTA.setUTXISEL0(thebits : TBits_1); inline;
  49164. begin
  49165. if thebits = 0 then
  49166. pTDefRegMap(@Self)^.clr := $00004000
  49167. else
  49168. pTDefRegMap(@Self)^.&set := $00004000;
  49169. end;
  49170. function TUART2B_U2BSTA.getUTXISEL0 : TBits_1; inline;
  49171. begin
  49172. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  49173. end;
  49174. procedure TUART2B_U2BSTA.setUTXISEL1; inline;
  49175. begin
  49176. pTDefRegMap(@Self)^.&set := $00008000;
  49177. end;
  49178. procedure TUART2B_U2BSTA.clearUTXISEL1; inline;
  49179. begin
  49180. pTDefRegMap(@Self)^.clr := $00008000;
  49181. end;
  49182. procedure TUART2B_U2BSTA.setUTXISEL1(thebits : TBits_1); inline;
  49183. begin
  49184. if thebits = 0 then
  49185. pTDefRegMap(@Self)^.clr := $00008000
  49186. else
  49187. pTDefRegMap(@Self)^.&set := $00008000;
  49188. end;
  49189. function TUART2B_U2BSTA.getUTXISEL1 : TBits_1; inline;
  49190. begin
  49191. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49192. end;
  49193. procedure TUART2B_U2BSTA.setUTXSEL(thebits : TBits_2); inline;
  49194. begin
  49195. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49196. end;
  49197. function TUART2B_U2BSTA.getUTXSEL : TBits_2; inline;
  49198. begin
  49199. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49200. end;
  49201. procedure TUART2B_U2BSTA.setw(thebits : TBits_32); inline;
  49202. begin
  49203. pTDefRegMap(@Self)^.val := thebits;
  49204. end;
  49205. function TUART2B_U2BSTA.getw : TBits_32; inline;
  49206. begin
  49207. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49208. end;
  49209. procedure TUART2B_U6STA.setURXDA; inline;
  49210. begin
  49211. pTDefRegMap(@Self)^.&set := $00000001;
  49212. end;
  49213. procedure TUART2B_U6STA.clearURXDA; inline;
  49214. begin
  49215. pTDefRegMap(@Self)^.clr := $00000001;
  49216. end;
  49217. procedure TUART2B_U6STA.setURXDA(thebits : TBits_1); inline;
  49218. begin
  49219. if thebits = 0 then
  49220. pTDefRegMap(@Self)^.clr := $00000001
  49221. else
  49222. pTDefRegMap(@Self)^.&set := $00000001;
  49223. end;
  49224. function TUART2B_U6STA.getURXDA : TBits_1; inline;
  49225. begin
  49226. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49227. end;
  49228. procedure TUART2B_U6STA.setOERR; inline;
  49229. begin
  49230. pTDefRegMap(@Self)^.&set := $00000002;
  49231. end;
  49232. procedure TUART2B_U6STA.clearOERR; inline;
  49233. begin
  49234. pTDefRegMap(@Self)^.clr := $00000002;
  49235. end;
  49236. procedure TUART2B_U6STA.setOERR(thebits : TBits_1); inline;
  49237. begin
  49238. if thebits = 0 then
  49239. pTDefRegMap(@Self)^.clr := $00000002
  49240. else
  49241. pTDefRegMap(@Self)^.&set := $00000002;
  49242. end;
  49243. function TUART2B_U6STA.getOERR : TBits_1; inline;
  49244. begin
  49245. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49246. end;
  49247. procedure TUART2B_U6STA.setFERR; inline;
  49248. begin
  49249. pTDefRegMap(@Self)^.&set := $00000004;
  49250. end;
  49251. procedure TUART2B_U6STA.clearFERR; inline;
  49252. begin
  49253. pTDefRegMap(@Self)^.clr := $00000004;
  49254. end;
  49255. procedure TUART2B_U6STA.setFERR(thebits : TBits_1); inline;
  49256. begin
  49257. if thebits = 0 then
  49258. pTDefRegMap(@Self)^.clr := $00000004
  49259. else
  49260. pTDefRegMap(@Self)^.&set := $00000004;
  49261. end;
  49262. function TUART2B_U6STA.getFERR : TBits_1; inline;
  49263. begin
  49264. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49265. end;
  49266. procedure TUART2B_U6STA.setPERR; inline;
  49267. begin
  49268. pTDefRegMap(@Self)^.&set := $00000008;
  49269. end;
  49270. procedure TUART2B_U6STA.clearPERR; inline;
  49271. begin
  49272. pTDefRegMap(@Self)^.clr := $00000008;
  49273. end;
  49274. procedure TUART2B_U6STA.setPERR(thebits : TBits_1); inline;
  49275. begin
  49276. if thebits = 0 then
  49277. pTDefRegMap(@Self)^.clr := $00000008
  49278. else
  49279. pTDefRegMap(@Self)^.&set := $00000008;
  49280. end;
  49281. function TUART2B_U6STA.getPERR : TBits_1; inline;
  49282. begin
  49283. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49284. end;
  49285. procedure TUART2B_U6STA.setRIDLE; inline;
  49286. begin
  49287. pTDefRegMap(@Self)^.&set := $00000010;
  49288. end;
  49289. procedure TUART2B_U6STA.clearRIDLE; inline;
  49290. begin
  49291. pTDefRegMap(@Self)^.clr := $00000010;
  49292. end;
  49293. procedure TUART2B_U6STA.setRIDLE(thebits : TBits_1); inline;
  49294. begin
  49295. if thebits = 0 then
  49296. pTDefRegMap(@Self)^.clr := $00000010
  49297. else
  49298. pTDefRegMap(@Self)^.&set := $00000010;
  49299. end;
  49300. function TUART2B_U6STA.getRIDLE : TBits_1; inline;
  49301. begin
  49302. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49303. end;
  49304. procedure TUART2B_U6STA.setADDEN; inline;
  49305. begin
  49306. pTDefRegMap(@Self)^.&set := $00000020;
  49307. end;
  49308. procedure TUART2B_U6STA.clearADDEN; inline;
  49309. begin
  49310. pTDefRegMap(@Self)^.clr := $00000020;
  49311. end;
  49312. procedure TUART2B_U6STA.setADDEN(thebits : TBits_1); inline;
  49313. begin
  49314. if thebits = 0 then
  49315. pTDefRegMap(@Self)^.clr := $00000020
  49316. else
  49317. pTDefRegMap(@Self)^.&set := $00000020;
  49318. end;
  49319. function TUART2B_U6STA.getADDEN : TBits_1; inline;
  49320. begin
  49321. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49322. end;
  49323. procedure TUART2B_U6STA.setURXISEL(thebits : TBits_2); inline;
  49324. begin
  49325. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  49326. end;
  49327. function TUART2B_U6STA.getURXISEL : TBits_2; inline;
  49328. begin
  49329. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  49330. end;
  49331. procedure TUART2B_U6STA.setTRMT; inline;
  49332. begin
  49333. pTDefRegMap(@Self)^.&set := $00000100;
  49334. end;
  49335. procedure TUART2B_U6STA.clearTRMT; inline;
  49336. begin
  49337. pTDefRegMap(@Self)^.clr := $00000100;
  49338. end;
  49339. procedure TUART2B_U6STA.setTRMT(thebits : TBits_1); inline;
  49340. begin
  49341. if thebits = 0 then
  49342. pTDefRegMap(@Self)^.clr := $00000100
  49343. else
  49344. pTDefRegMap(@Self)^.&set := $00000100;
  49345. end;
  49346. function TUART2B_U6STA.getTRMT : TBits_1; inline;
  49347. begin
  49348. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49349. end;
  49350. procedure TUART2B_U6STA.setUTXBF; inline;
  49351. begin
  49352. pTDefRegMap(@Self)^.&set := $00000200;
  49353. end;
  49354. procedure TUART2B_U6STA.clearUTXBF; inline;
  49355. begin
  49356. pTDefRegMap(@Self)^.clr := $00000200;
  49357. end;
  49358. procedure TUART2B_U6STA.setUTXBF(thebits : TBits_1); inline;
  49359. begin
  49360. if thebits = 0 then
  49361. pTDefRegMap(@Self)^.clr := $00000200
  49362. else
  49363. pTDefRegMap(@Self)^.&set := $00000200;
  49364. end;
  49365. function TUART2B_U6STA.getUTXBF : TBits_1; inline;
  49366. begin
  49367. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49368. end;
  49369. procedure TUART2B_U6STA.setUTXEN; inline;
  49370. begin
  49371. pTDefRegMap(@Self)^.&set := $00000400;
  49372. end;
  49373. procedure TUART2B_U6STA.clearUTXEN; inline;
  49374. begin
  49375. pTDefRegMap(@Self)^.clr := $00000400;
  49376. end;
  49377. procedure TUART2B_U6STA.setUTXEN(thebits : TBits_1); inline;
  49378. begin
  49379. if thebits = 0 then
  49380. pTDefRegMap(@Self)^.clr := $00000400
  49381. else
  49382. pTDefRegMap(@Self)^.&set := $00000400;
  49383. end;
  49384. function TUART2B_U6STA.getUTXEN : TBits_1; inline;
  49385. begin
  49386. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49387. end;
  49388. procedure TUART2B_U6STA.setUTXBRK; inline;
  49389. begin
  49390. pTDefRegMap(@Self)^.&set := $00000800;
  49391. end;
  49392. procedure TUART2B_U6STA.clearUTXBRK; inline;
  49393. begin
  49394. pTDefRegMap(@Self)^.clr := $00000800;
  49395. end;
  49396. procedure TUART2B_U6STA.setUTXBRK(thebits : TBits_1); inline;
  49397. begin
  49398. if thebits = 0 then
  49399. pTDefRegMap(@Self)^.clr := $00000800
  49400. else
  49401. pTDefRegMap(@Self)^.&set := $00000800;
  49402. end;
  49403. function TUART2B_U6STA.getUTXBRK : TBits_1; inline;
  49404. begin
  49405. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49406. end;
  49407. procedure TUART2B_U6STA.setURXEN; inline;
  49408. begin
  49409. pTDefRegMap(@Self)^.&set := $00001000;
  49410. end;
  49411. procedure TUART2B_U6STA.clearURXEN; inline;
  49412. begin
  49413. pTDefRegMap(@Self)^.clr := $00001000;
  49414. end;
  49415. procedure TUART2B_U6STA.setURXEN(thebits : TBits_1); inline;
  49416. begin
  49417. if thebits = 0 then
  49418. pTDefRegMap(@Self)^.clr := $00001000
  49419. else
  49420. pTDefRegMap(@Self)^.&set := $00001000;
  49421. end;
  49422. function TUART2B_U6STA.getURXEN : TBits_1; inline;
  49423. begin
  49424. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  49425. end;
  49426. procedure TUART2B_U6STA.setUTXINV; inline;
  49427. begin
  49428. pTDefRegMap(@Self)^.&set := $00002000;
  49429. end;
  49430. procedure TUART2B_U6STA.clearUTXINV; inline;
  49431. begin
  49432. pTDefRegMap(@Self)^.clr := $00002000;
  49433. end;
  49434. procedure TUART2B_U6STA.setUTXINV(thebits : TBits_1); inline;
  49435. begin
  49436. if thebits = 0 then
  49437. pTDefRegMap(@Self)^.clr := $00002000
  49438. else
  49439. pTDefRegMap(@Self)^.&set := $00002000;
  49440. end;
  49441. function TUART2B_U6STA.getUTXINV : TBits_1; inline;
  49442. begin
  49443. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49444. end;
  49445. procedure TUART2B_U6STA.setUTXISEL(thebits : TBits_2); inline;
  49446. begin
  49447. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49448. end;
  49449. function TUART2B_U6STA.getUTXISEL : TBits_2; inline;
  49450. begin
  49451. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49452. end;
  49453. procedure TUART2B_U6STA.setADDR(thebits : TBits_8); inline;
  49454. begin
  49455. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  49456. end;
  49457. function TUART2B_U6STA.getADDR : TBits_8; inline;
  49458. begin
  49459. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  49460. end;
  49461. procedure TUART2B_U6STA.setADM_EN; inline;
  49462. begin
  49463. pTDefRegMap(@Self)^.&set := $01000000;
  49464. end;
  49465. procedure TUART2B_U6STA.clearADM_EN; inline;
  49466. begin
  49467. pTDefRegMap(@Self)^.clr := $01000000;
  49468. end;
  49469. procedure TUART2B_U6STA.setADM_EN(thebits : TBits_1); inline;
  49470. begin
  49471. if thebits = 0 then
  49472. pTDefRegMap(@Self)^.clr := $01000000
  49473. else
  49474. pTDefRegMap(@Self)^.&set := $01000000;
  49475. end;
  49476. function TUART2B_U6STA.getADM_EN : TBits_1; inline;
  49477. begin
  49478. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  49479. end;
  49480. procedure TUART2B_U6STA.setURXISEL0; inline;
  49481. begin
  49482. pTDefRegMap(@Self)^.&set := $00000040;
  49483. end;
  49484. procedure TUART2B_U6STA.clearURXISEL0; inline;
  49485. begin
  49486. pTDefRegMap(@Self)^.clr := $00000040;
  49487. end;
  49488. procedure TUART2B_U6STA.setURXISEL0(thebits : TBits_1); inline;
  49489. begin
  49490. if thebits = 0 then
  49491. pTDefRegMap(@Self)^.clr := $00000040
  49492. else
  49493. pTDefRegMap(@Self)^.&set := $00000040;
  49494. end;
  49495. function TUART2B_U6STA.getURXISEL0 : TBits_1; inline;
  49496. begin
  49497. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49498. end;
  49499. procedure TUART2B_U6STA.setURXISEL1; inline;
  49500. begin
  49501. pTDefRegMap(@Self)^.&set := $00000080;
  49502. end;
  49503. procedure TUART2B_U6STA.clearURXISEL1; inline;
  49504. begin
  49505. pTDefRegMap(@Self)^.clr := $00000080;
  49506. end;
  49507. procedure TUART2B_U6STA.setURXISEL1(thebits : TBits_1); inline;
  49508. begin
  49509. if thebits = 0 then
  49510. pTDefRegMap(@Self)^.clr := $00000080
  49511. else
  49512. pTDefRegMap(@Self)^.&set := $00000080;
  49513. end;
  49514. function TUART2B_U6STA.getURXISEL1 : TBits_1; inline;
  49515. begin
  49516. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49517. end;
  49518. procedure TUART2B_U6STA.setUTXISEL0; inline;
  49519. begin
  49520. pTDefRegMap(@Self)^.&set := $00004000;
  49521. end;
  49522. procedure TUART2B_U6STA.clearUTXISEL0; inline;
  49523. begin
  49524. pTDefRegMap(@Self)^.clr := $00004000;
  49525. end;
  49526. procedure TUART2B_U6STA.setUTXISEL0(thebits : TBits_1); inline;
  49527. begin
  49528. if thebits = 0 then
  49529. pTDefRegMap(@Self)^.clr := $00004000
  49530. else
  49531. pTDefRegMap(@Self)^.&set := $00004000;
  49532. end;
  49533. function TUART2B_U6STA.getUTXISEL0 : TBits_1; inline;
  49534. begin
  49535. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  49536. end;
  49537. procedure TUART2B_U6STA.setUTXISEL1; inline;
  49538. begin
  49539. pTDefRegMap(@Self)^.&set := $00008000;
  49540. end;
  49541. procedure TUART2B_U6STA.clearUTXISEL1; inline;
  49542. begin
  49543. pTDefRegMap(@Self)^.clr := $00008000;
  49544. end;
  49545. procedure TUART2B_U6STA.setUTXISEL1(thebits : TBits_1); inline;
  49546. begin
  49547. if thebits = 0 then
  49548. pTDefRegMap(@Self)^.clr := $00008000
  49549. else
  49550. pTDefRegMap(@Self)^.&set := $00008000;
  49551. end;
  49552. function TUART2B_U6STA.getUTXISEL1 : TBits_1; inline;
  49553. begin
  49554. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49555. end;
  49556. procedure TUART2B_U6STA.setUTXSEL(thebits : TBits_2); inline;
  49557. begin
  49558. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49559. end;
  49560. function TUART2B_U6STA.getUTXSEL : TBits_2; inline;
  49561. begin
  49562. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49563. end;
  49564. procedure TUART2B_U6STA.setw(thebits : TBits_32); inline;
  49565. begin
  49566. pTDefRegMap(@Self)^.val := thebits;
  49567. end;
  49568. function TUART2B_U6STA.getw : TBits_32; inline;
  49569. begin
  49570. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49571. end;
  49572. procedure TUART3A_U2MODE.setSTSEL; inline;
  49573. begin
  49574. pTDefRegMap(@Self)^.&set := $00000001;
  49575. end;
  49576. procedure TUART3A_U2MODE.clearSTSEL; inline;
  49577. begin
  49578. pTDefRegMap(@Self)^.clr := $00000001;
  49579. end;
  49580. procedure TUART3A_U2MODE.setSTSEL(thebits : TBits_1); inline;
  49581. begin
  49582. if thebits = 0 then
  49583. pTDefRegMap(@Self)^.clr := $00000001
  49584. else
  49585. pTDefRegMap(@Self)^.&set := $00000001;
  49586. end;
  49587. function TUART3A_U2MODE.getSTSEL : TBits_1; inline;
  49588. begin
  49589. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49590. end;
  49591. procedure TUART3A_U2MODE.setPDSEL(thebits : TBits_2); inline;
  49592. begin
  49593. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  49594. end;
  49595. function TUART3A_U2MODE.getPDSEL : TBits_2; inline;
  49596. begin
  49597. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  49598. end;
  49599. procedure TUART3A_U2MODE.setBRGH; inline;
  49600. begin
  49601. pTDefRegMap(@Self)^.&set := $00000008;
  49602. end;
  49603. procedure TUART3A_U2MODE.clearBRGH; inline;
  49604. begin
  49605. pTDefRegMap(@Self)^.clr := $00000008;
  49606. end;
  49607. procedure TUART3A_U2MODE.setBRGH(thebits : TBits_1); inline;
  49608. begin
  49609. if thebits = 0 then
  49610. pTDefRegMap(@Self)^.clr := $00000008
  49611. else
  49612. pTDefRegMap(@Self)^.&set := $00000008;
  49613. end;
  49614. function TUART3A_U2MODE.getBRGH : TBits_1; inline;
  49615. begin
  49616. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49617. end;
  49618. procedure TUART3A_U2MODE.setRXINV; inline;
  49619. begin
  49620. pTDefRegMap(@Self)^.&set := $00000010;
  49621. end;
  49622. procedure TUART3A_U2MODE.clearRXINV; inline;
  49623. begin
  49624. pTDefRegMap(@Self)^.clr := $00000010;
  49625. end;
  49626. procedure TUART3A_U2MODE.setRXINV(thebits : TBits_1); inline;
  49627. begin
  49628. if thebits = 0 then
  49629. pTDefRegMap(@Self)^.clr := $00000010
  49630. else
  49631. pTDefRegMap(@Self)^.&set := $00000010;
  49632. end;
  49633. function TUART3A_U2MODE.getRXINV : TBits_1; inline;
  49634. begin
  49635. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49636. end;
  49637. procedure TUART3A_U2MODE.setABAUD; inline;
  49638. begin
  49639. pTDefRegMap(@Self)^.&set := $00000020;
  49640. end;
  49641. procedure TUART3A_U2MODE.clearABAUD; inline;
  49642. begin
  49643. pTDefRegMap(@Self)^.clr := $00000020;
  49644. end;
  49645. procedure TUART3A_U2MODE.setABAUD(thebits : TBits_1); inline;
  49646. begin
  49647. if thebits = 0 then
  49648. pTDefRegMap(@Self)^.clr := $00000020
  49649. else
  49650. pTDefRegMap(@Self)^.&set := $00000020;
  49651. end;
  49652. function TUART3A_U2MODE.getABAUD : TBits_1; inline;
  49653. begin
  49654. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49655. end;
  49656. procedure TUART3A_U2MODE.setLPBACK; inline;
  49657. begin
  49658. pTDefRegMap(@Self)^.&set := $00000040;
  49659. end;
  49660. procedure TUART3A_U2MODE.clearLPBACK; inline;
  49661. begin
  49662. pTDefRegMap(@Self)^.clr := $00000040;
  49663. end;
  49664. procedure TUART3A_U2MODE.setLPBACK(thebits : TBits_1); inline;
  49665. begin
  49666. if thebits = 0 then
  49667. pTDefRegMap(@Self)^.clr := $00000040
  49668. else
  49669. pTDefRegMap(@Self)^.&set := $00000040;
  49670. end;
  49671. function TUART3A_U2MODE.getLPBACK : TBits_1; inline;
  49672. begin
  49673. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49674. end;
  49675. procedure TUART3A_U2MODE.setWAKE; inline;
  49676. begin
  49677. pTDefRegMap(@Self)^.&set := $00000080;
  49678. end;
  49679. procedure TUART3A_U2MODE.clearWAKE; inline;
  49680. begin
  49681. pTDefRegMap(@Self)^.clr := $00000080;
  49682. end;
  49683. procedure TUART3A_U2MODE.setWAKE(thebits : TBits_1); inline;
  49684. begin
  49685. if thebits = 0 then
  49686. pTDefRegMap(@Self)^.clr := $00000080
  49687. else
  49688. pTDefRegMap(@Self)^.&set := $00000080;
  49689. end;
  49690. function TUART3A_U2MODE.getWAKE : TBits_1; inline;
  49691. begin
  49692. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49693. end;
  49694. procedure TUART3A_U2MODE.setUEN(thebits : TBits_2); inline;
  49695. begin
  49696. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  49697. end;
  49698. function TUART3A_U2MODE.getUEN : TBits_2; inline;
  49699. begin
  49700. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  49701. end;
  49702. procedure TUART3A_U2MODE.setRTSMD; inline;
  49703. begin
  49704. pTDefRegMap(@Self)^.&set := $00000800;
  49705. end;
  49706. procedure TUART3A_U2MODE.clearRTSMD; inline;
  49707. begin
  49708. pTDefRegMap(@Self)^.clr := $00000800;
  49709. end;
  49710. procedure TUART3A_U2MODE.setRTSMD(thebits : TBits_1); inline;
  49711. begin
  49712. if thebits = 0 then
  49713. pTDefRegMap(@Self)^.clr := $00000800
  49714. else
  49715. pTDefRegMap(@Self)^.&set := $00000800;
  49716. end;
  49717. function TUART3A_U2MODE.getRTSMD : TBits_1; inline;
  49718. begin
  49719. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49720. end;
  49721. procedure TUART3A_U2MODE.setIREN; inline;
  49722. begin
  49723. pTDefRegMap(@Self)^.&set := $00001000;
  49724. end;
  49725. procedure TUART3A_U2MODE.clearIREN; inline;
  49726. begin
  49727. pTDefRegMap(@Self)^.clr := $00001000;
  49728. end;
  49729. procedure TUART3A_U2MODE.setIREN(thebits : TBits_1); inline;
  49730. begin
  49731. if thebits = 0 then
  49732. pTDefRegMap(@Self)^.clr := $00001000
  49733. else
  49734. pTDefRegMap(@Self)^.&set := $00001000;
  49735. end;
  49736. function TUART3A_U2MODE.getIREN : TBits_1; inline;
  49737. begin
  49738. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  49739. end;
  49740. procedure TUART3A_U2MODE.setSIDL; inline;
  49741. begin
  49742. pTDefRegMap(@Self)^.&set := $00002000;
  49743. end;
  49744. procedure TUART3A_U2MODE.clearSIDL; inline;
  49745. begin
  49746. pTDefRegMap(@Self)^.clr := $00002000;
  49747. end;
  49748. procedure TUART3A_U2MODE.setSIDL(thebits : TBits_1); inline;
  49749. begin
  49750. if thebits = 0 then
  49751. pTDefRegMap(@Self)^.clr := $00002000
  49752. else
  49753. pTDefRegMap(@Self)^.&set := $00002000;
  49754. end;
  49755. function TUART3A_U2MODE.getSIDL : TBits_1; inline;
  49756. begin
  49757. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49758. end;
  49759. procedure TUART3A_U2MODE.setON; inline;
  49760. begin
  49761. pTDefRegMap(@Self)^.&set := $00008000;
  49762. end;
  49763. procedure TUART3A_U2MODE.clearON; inline;
  49764. begin
  49765. pTDefRegMap(@Self)^.clr := $00008000;
  49766. end;
  49767. procedure TUART3A_U2MODE.setON(thebits : TBits_1); inline;
  49768. begin
  49769. if thebits = 0 then
  49770. pTDefRegMap(@Self)^.clr := $00008000
  49771. else
  49772. pTDefRegMap(@Self)^.&set := $00008000;
  49773. end;
  49774. function TUART3A_U2MODE.getON : TBits_1; inline;
  49775. begin
  49776. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49777. end;
  49778. procedure TUART3A_U2MODE.setPDSEL0; inline;
  49779. begin
  49780. pTDefRegMap(@Self)^.&set := $00000002;
  49781. end;
  49782. procedure TUART3A_U2MODE.clearPDSEL0; inline;
  49783. begin
  49784. pTDefRegMap(@Self)^.clr := $00000002;
  49785. end;
  49786. procedure TUART3A_U2MODE.setPDSEL0(thebits : TBits_1); inline;
  49787. begin
  49788. if thebits = 0 then
  49789. pTDefRegMap(@Self)^.clr := $00000002
  49790. else
  49791. pTDefRegMap(@Self)^.&set := $00000002;
  49792. end;
  49793. function TUART3A_U2MODE.getPDSEL0 : TBits_1; inline;
  49794. begin
  49795. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49796. end;
  49797. procedure TUART3A_U2MODE.setPDSEL1; inline;
  49798. begin
  49799. pTDefRegMap(@Self)^.&set := $00000004;
  49800. end;
  49801. procedure TUART3A_U2MODE.clearPDSEL1; inline;
  49802. begin
  49803. pTDefRegMap(@Self)^.clr := $00000004;
  49804. end;
  49805. procedure TUART3A_U2MODE.setPDSEL1(thebits : TBits_1); inline;
  49806. begin
  49807. if thebits = 0 then
  49808. pTDefRegMap(@Self)^.clr := $00000004
  49809. else
  49810. pTDefRegMap(@Self)^.&set := $00000004;
  49811. end;
  49812. function TUART3A_U2MODE.getPDSEL1 : TBits_1; inline;
  49813. begin
  49814. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49815. end;
  49816. procedure TUART3A_U2MODE.setUEN0; inline;
  49817. begin
  49818. pTDefRegMap(@Self)^.&set := $00000100;
  49819. end;
  49820. procedure TUART3A_U2MODE.clearUEN0; inline;
  49821. begin
  49822. pTDefRegMap(@Self)^.clr := $00000100;
  49823. end;
  49824. procedure TUART3A_U2MODE.setUEN0(thebits : TBits_1); inline;
  49825. begin
  49826. if thebits = 0 then
  49827. pTDefRegMap(@Self)^.clr := $00000100
  49828. else
  49829. pTDefRegMap(@Self)^.&set := $00000100;
  49830. end;
  49831. function TUART3A_U2MODE.getUEN0 : TBits_1; inline;
  49832. begin
  49833. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49834. end;
  49835. procedure TUART3A_U2MODE.setUEN1; inline;
  49836. begin
  49837. pTDefRegMap(@Self)^.&set := $00000200;
  49838. end;
  49839. procedure TUART3A_U2MODE.clearUEN1; inline;
  49840. begin
  49841. pTDefRegMap(@Self)^.clr := $00000200;
  49842. end;
  49843. procedure TUART3A_U2MODE.setUEN1(thebits : TBits_1); inline;
  49844. begin
  49845. if thebits = 0 then
  49846. pTDefRegMap(@Self)^.clr := $00000200
  49847. else
  49848. pTDefRegMap(@Self)^.&set := $00000200;
  49849. end;
  49850. function TUART3A_U2MODE.getUEN1 : TBits_1; inline;
  49851. begin
  49852. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49853. end;
  49854. procedure TUART3A_U2MODE.setUSIDL; inline;
  49855. begin
  49856. pTDefRegMap(@Self)^.&set := $00002000;
  49857. end;
  49858. procedure TUART3A_U2MODE.clearUSIDL; inline;
  49859. begin
  49860. pTDefRegMap(@Self)^.clr := $00002000;
  49861. end;
  49862. procedure TUART3A_U2MODE.setUSIDL(thebits : TBits_1); inline;
  49863. begin
  49864. if thebits = 0 then
  49865. pTDefRegMap(@Self)^.clr := $00002000
  49866. else
  49867. pTDefRegMap(@Self)^.&set := $00002000;
  49868. end;
  49869. function TUART3A_U2MODE.getUSIDL : TBits_1; inline;
  49870. begin
  49871. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49872. end;
  49873. procedure TUART3A_U2MODE.setUARTEN; inline;
  49874. begin
  49875. pTDefRegMap(@Self)^.&set := $00008000;
  49876. end;
  49877. procedure TUART3A_U2MODE.clearUARTEN; inline;
  49878. begin
  49879. pTDefRegMap(@Self)^.clr := $00008000;
  49880. end;
  49881. procedure TUART3A_U2MODE.setUARTEN(thebits : TBits_1); inline;
  49882. begin
  49883. if thebits = 0 then
  49884. pTDefRegMap(@Self)^.clr := $00008000
  49885. else
  49886. pTDefRegMap(@Self)^.&set := $00008000;
  49887. end;
  49888. function TUART3A_U2MODE.getUARTEN : TBits_1; inline;
  49889. begin
  49890. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49891. end;
  49892. procedure TUART3A_U2MODE.setw(thebits : TBits_32); inline;
  49893. begin
  49894. pTDefRegMap(@Self)^.val := thebits;
  49895. end;
  49896. function TUART3A_U2MODE.getw : TBits_32; inline;
  49897. begin
  49898. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49899. end;
  49900. procedure TUART3A_U3AMODE.setSTSEL; inline;
  49901. begin
  49902. pTDefRegMap(@Self)^.&set := $00000001;
  49903. end;
  49904. procedure TUART3A_U3AMODE.clearSTSEL; inline;
  49905. begin
  49906. pTDefRegMap(@Self)^.clr := $00000001;
  49907. end;
  49908. procedure TUART3A_U3AMODE.setSTSEL(thebits : TBits_1); inline;
  49909. begin
  49910. if thebits = 0 then
  49911. pTDefRegMap(@Self)^.clr := $00000001
  49912. else
  49913. pTDefRegMap(@Self)^.&set := $00000001;
  49914. end;
  49915. function TUART3A_U3AMODE.getSTSEL : TBits_1; inline;
  49916. begin
  49917. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49918. end;
  49919. procedure TUART3A_U3AMODE.setPDSEL(thebits : TBits_2); inline;
  49920. begin
  49921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  49922. end;
  49923. function TUART3A_U3AMODE.getPDSEL : TBits_2; inline;
  49924. begin
  49925. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  49926. end;
  49927. procedure TUART3A_U3AMODE.setBRGH; inline;
  49928. begin
  49929. pTDefRegMap(@Self)^.&set := $00000008;
  49930. end;
  49931. procedure TUART3A_U3AMODE.clearBRGH; inline;
  49932. begin
  49933. pTDefRegMap(@Self)^.clr := $00000008;
  49934. end;
  49935. procedure TUART3A_U3AMODE.setBRGH(thebits : TBits_1); inline;
  49936. begin
  49937. if thebits = 0 then
  49938. pTDefRegMap(@Self)^.clr := $00000008
  49939. else
  49940. pTDefRegMap(@Self)^.&set := $00000008;
  49941. end;
  49942. function TUART3A_U3AMODE.getBRGH : TBits_1; inline;
  49943. begin
  49944. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49945. end;
  49946. procedure TUART3A_U3AMODE.setRXINV; inline;
  49947. begin
  49948. pTDefRegMap(@Self)^.&set := $00000010;
  49949. end;
  49950. procedure TUART3A_U3AMODE.clearRXINV; inline;
  49951. begin
  49952. pTDefRegMap(@Self)^.clr := $00000010;
  49953. end;
  49954. procedure TUART3A_U3AMODE.setRXINV(thebits : TBits_1); inline;
  49955. begin
  49956. if thebits = 0 then
  49957. pTDefRegMap(@Self)^.clr := $00000010
  49958. else
  49959. pTDefRegMap(@Self)^.&set := $00000010;
  49960. end;
  49961. function TUART3A_U3AMODE.getRXINV : TBits_1; inline;
  49962. begin
  49963. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49964. end;
  49965. procedure TUART3A_U3AMODE.setABAUD; inline;
  49966. begin
  49967. pTDefRegMap(@Self)^.&set := $00000020;
  49968. end;
  49969. procedure TUART3A_U3AMODE.clearABAUD; inline;
  49970. begin
  49971. pTDefRegMap(@Self)^.clr := $00000020;
  49972. end;
  49973. procedure TUART3A_U3AMODE.setABAUD(thebits : TBits_1); inline;
  49974. begin
  49975. if thebits = 0 then
  49976. pTDefRegMap(@Self)^.clr := $00000020
  49977. else
  49978. pTDefRegMap(@Self)^.&set := $00000020;
  49979. end;
  49980. function TUART3A_U3AMODE.getABAUD : TBits_1; inline;
  49981. begin
  49982. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49983. end;
  49984. procedure TUART3A_U3AMODE.setLPBACK; inline;
  49985. begin
  49986. pTDefRegMap(@Self)^.&set := $00000040;
  49987. end;
  49988. procedure TUART3A_U3AMODE.clearLPBACK; inline;
  49989. begin
  49990. pTDefRegMap(@Self)^.clr := $00000040;
  49991. end;
  49992. procedure TUART3A_U3AMODE.setLPBACK(thebits : TBits_1); inline;
  49993. begin
  49994. if thebits = 0 then
  49995. pTDefRegMap(@Self)^.clr := $00000040
  49996. else
  49997. pTDefRegMap(@Self)^.&set := $00000040;
  49998. end;
  49999. function TUART3A_U3AMODE.getLPBACK : TBits_1; inline;
  50000. begin
  50001. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50002. end;
  50003. procedure TUART3A_U3AMODE.setWAKE; inline;
  50004. begin
  50005. pTDefRegMap(@Self)^.&set := $00000080;
  50006. end;
  50007. procedure TUART3A_U3AMODE.clearWAKE; inline;
  50008. begin
  50009. pTDefRegMap(@Self)^.clr := $00000080;
  50010. end;
  50011. procedure TUART3A_U3AMODE.setWAKE(thebits : TBits_1); inline;
  50012. begin
  50013. if thebits = 0 then
  50014. pTDefRegMap(@Self)^.clr := $00000080
  50015. else
  50016. pTDefRegMap(@Self)^.&set := $00000080;
  50017. end;
  50018. function TUART3A_U3AMODE.getWAKE : TBits_1; inline;
  50019. begin
  50020. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50021. end;
  50022. procedure TUART3A_U3AMODE.setUEN(thebits : TBits_2); inline;
  50023. begin
  50024. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50025. end;
  50026. function TUART3A_U3AMODE.getUEN : TBits_2; inline;
  50027. begin
  50028. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50029. end;
  50030. procedure TUART3A_U3AMODE.setRTSMD; inline;
  50031. begin
  50032. pTDefRegMap(@Self)^.&set := $00000800;
  50033. end;
  50034. procedure TUART3A_U3AMODE.clearRTSMD; inline;
  50035. begin
  50036. pTDefRegMap(@Self)^.clr := $00000800;
  50037. end;
  50038. procedure TUART3A_U3AMODE.setRTSMD(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 TUART3A_U3AMODE.getRTSMD : TBits_1; inline;
  50046. begin
  50047. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50048. end;
  50049. procedure TUART3A_U3AMODE.setIREN; inline;
  50050. begin
  50051. pTDefRegMap(@Self)^.&set := $00001000;
  50052. end;
  50053. procedure TUART3A_U3AMODE.clearIREN; inline;
  50054. begin
  50055. pTDefRegMap(@Self)^.clr := $00001000;
  50056. end;
  50057. procedure TUART3A_U3AMODE.setIREN(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 TUART3A_U3AMODE.getIREN : TBits_1; inline;
  50065. begin
  50066. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  50067. end;
  50068. procedure TUART3A_U3AMODE.setSIDL; inline;
  50069. begin
  50070. pTDefRegMap(@Self)^.&set := $00002000;
  50071. end;
  50072. procedure TUART3A_U3AMODE.clearSIDL; inline;
  50073. begin
  50074. pTDefRegMap(@Self)^.clr := $00002000;
  50075. end;
  50076. procedure TUART3A_U3AMODE.setSIDL(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 TUART3A_U3AMODE.getSIDL : TBits_1; inline;
  50084. begin
  50085. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50086. end;
  50087. procedure TUART3A_U3AMODE.setON; inline;
  50088. begin
  50089. pTDefRegMap(@Self)^.&set := $00008000;
  50090. end;
  50091. procedure TUART3A_U3AMODE.clearON; inline;
  50092. begin
  50093. pTDefRegMap(@Self)^.clr := $00008000;
  50094. end;
  50095. procedure TUART3A_U3AMODE.setON(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 TUART3A_U3AMODE.getON : TBits_1; inline;
  50103. begin
  50104. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50105. end;
  50106. procedure TUART3A_U3AMODE.setPDSEL0; inline;
  50107. begin
  50108. pTDefRegMap(@Self)^.&set := $00000002;
  50109. end;
  50110. procedure TUART3A_U3AMODE.clearPDSEL0; inline;
  50111. begin
  50112. pTDefRegMap(@Self)^.clr := $00000002;
  50113. end;
  50114. procedure TUART3A_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
  50115. begin
  50116. if thebits = 0 then
  50117. pTDefRegMap(@Self)^.clr := $00000002
  50118. else
  50119. pTDefRegMap(@Self)^.&set := $00000002;
  50120. end;
  50121. function TUART3A_U3AMODE.getPDSEL0 : TBits_1; inline;
  50122. begin
  50123. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50124. end;
  50125. procedure TUART3A_U3AMODE.setPDSEL1; inline;
  50126. begin
  50127. pTDefRegMap(@Self)^.&set := $00000004;
  50128. end;
  50129. procedure TUART3A_U3AMODE.clearPDSEL1; inline;
  50130. begin
  50131. pTDefRegMap(@Self)^.clr := $00000004;
  50132. end;
  50133. procedure TUART3A_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
  50134. begin
  50135. if thebits = 0 then
  50136. pTDefRegMap(@Self)^.clr := $00000004
  50137. else
  50138. pTDefRegMap(@Self)^.&set := $00000004;
  50139. end;
  50140. function TUART3A_U3AMODE.getPDSEL1 : TBits_1; inline;
  50141. begin
  50142. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50143. end;
  50144. procedure TUART3A_U3AMODE.setUEN0; inline;
  50145. begin
  50146. pTDefRegMap(@Self)^.&set := $00000100;
  50147. end;
  50148. procedure TUART3A_U3AMODE.clearUEN0; inline;
  50149. begin
  50150. pTDefRegMap(@Self)^.clr := $00000100;
  50151. end;
  50152. procedure TUART3A_U3AMODE.setUEN0(thebits : TBits_1); inline;
  50153. begin
  50154. if thebits = 0 then
  50155. pTDefRegMap(@Self)^.clr := $00000100
  50156. else
  50157. pTDefRegMap(@Self)^.&set := $00000100;
  50158. end;
  50159. function TUART3A_U3AMODE.getUEN0 : TBits_1; inline;
  50160. begin
  50161. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50162. end;
  50163. procedure TUART3A_U3AMODE.setUEN1; inline;
  50164. begin
  50165. pTDefRegMap(@Self)^.&set := $00000200;
  50166. end;
  50167. procedure TUART3A_U3AMODE.clearUEN1; inline;
  50168. begin
  50169. pTDefRegMap(@Self)^.clr := $00000200;
  50170. end;
  50171. procedure TUART3A_U3AMODE.setUEN1(thebits : TBits_1); inline;
  50172. begin
  50173. if thebits = 0 then
  50174. pTDefRegMap(@Self)^.clr := $00000200
  50175. else
  50176. pTDefRegMap(@Self)^.&set := $00000200;
  50177. end;
  50178. function TUART3A_U3AMODE.getUEN1 : TBits_1; inline;
  50179. begin
  50180. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50181. end;
  50182. procedure TUART3A_U3AMODE.setUSIDL; inline;
  50183. begin
  50184. pTDefRegMap(@Self)^.&set := $00002000;
  50185. end;
  50186. procedure TUART3A_U3AMODE.clearUSIDL; inline;
  50187. begin
  50188. pTDefRegMap(@Self)^.clr := $00002000;
  50189. end;
  50190. procedure TUART3A_U3AMODE.setUSIDL(thebits : TBits_1); inline;
  50191. begin
  50192. if thebits = 0 then
  50193. pTDefRegMap(@Self)^.clr := $00002000
  50194. else
  50195. pTDefRegMap(@Self)^.&set := $00002000;
  50196. end;
  50197. function TUART3A_U3AMODE.getUSIDL : TBits_1; inline;
  50198. begin
  50199. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50200. end;
  50201. procedure TUART3A_U3AMODE.setUARTEN; inline;
  50202. begin
  50203. pTDefRegMap(@Self)^.&set := $00008000;
  50204. end;
  50205. procedure TUART3A_U3AMODE.clearUARTEN; inline;
  50206. begin
  50207. pTDefRegMap(@Self)^.clr := $00008000;
  50208. end;
  50209. procedure TUART3A_U3AMODE.setUARTEN(thebits : TBits_1); inline;
  50210. begin
  50211. if thebits = 0 then
  50212. pTDefRegMap(@Self)^.clr := $00008000
  50213. else
  50214. pTDefRegMap(@Self)^.&set := $00008000;
  50215. end;
  50216. function TUART3A_U3AMODE.getUARTEN : TBits_1; inline;
  50217. begin
  50218. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50219. end;
  50220. procedure TUART3A_U3AMODE.setw(thebits : TBits_32); inline;
  50221. begin
  50222. pTDefRegMap(@Self)^.val := thebits;
  50223. end;
  50224. function TUART3A_U3AMODE.getw : TBits_32; inline;
  50225. begin
  50226. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50227. end;
  50228. procedure TUART3A_U2STA.setURXDA; inline;
  50229. begin
  50230. pTDefRegMap(@Self)^.&set := $00000001;
  50231. end;
  50232. procedure TUART3A_U2STA.clearURXDA; inline;
  50233. begin
  50234. pTDefRegMap(@Self)^.clr := $00000001;
  50235. end;
  50236. procedure TUART3A_U2STA.setURXDA(thebits : TBits_1); inline;
  50237. begin
  50238. if thebits = 0 then
  50239. pTDefRegMap(@Self)^.clr := $00000001
  50240. else
  50241. pTDefRegMap(@Self)^.&set := $00000001;
  50242. end;
  50243. function TUART3A_U2STA.getURXDA : TBits_1; inline;
  50244. begin
  50245. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50246. end;
  50247. procedure TUART3A_U2STA.setOERR; inline;
  50248. begin
  50249. pTDefRegMap(@Self)^.&set := $00000002;
  50250. end;
  50251. procedure TUART3A_U2STA.clearOERR; inline;
  50252. begin
  50253. pTDefRegMap(@Self)^.clr := $00000002;
  50254. end;
  50255. procedure TUART3A_U2STA.setOERR(thebits : TBits_1); inline;
  50256. begin
  50257. if thebits = 0 then
  50258. pTDefRegMap(@Self)^.clr := $00000002
  50259. else
  50260. pTDefRegMap(@Self)^.&set := $00000002;
  50261. end;
  50262. function TUART3A_U2STA.getOERR : TBits_1; inline;
  50263. begin
  50264. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50265. end;
  50266. procedure TUART3A_U2STA.setFERR; inline;
  50267. begin
  50268. pTDefRegMap(@Self)^.&set := $00000004;
  50269. end;
  50270. procedure TUART3A_U2STA.clearFERR; inline;
  50271. begin
  50272. pTDefRegMap(@Self)^.clr := $00000004;
  50273. end;
  50274. procedure TUART3A_U2STA.setFERR(thebits : TBits_1); inline;
  50275. begin
  50276. if thebits = 0 then
  50277. pTDefRegMap(@Self)^.clr := $00000004
  50278. else
  50279. pTDefRegMap(@Self)^.&set := $00000004;
  50280. end;
  50281. function TUART3A_U2STA.getFERR : TBits_1; inline;
  50282. begin
  50283. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50284. end;
  50285. procedure TUART3A_U2STA.setPERR; inline;
  50286. begin
  50287. pTDefRegMap(@Self)^.&set := $00000008;
  50288. end;
  50289. procedure TUART3A_U2STA.clearPERR; inline;
  50290. begin
  50291. pTDefRegMap(@Self)^.clr := $00000008;
  50292. end;
  50293. procedure TUART3A_U2STA.setPERR(thebits : TBits_1); inline;
  50294. begin
  50295. if thebits = 0 then
  50296. pTDefRegMap(@Self)^.clr := $00000008
  50297. else
  50298. pTDefRegMap(@Self)^.&set := $00000008;
  50299. end;
  50300. function TUART3A_U2STA.getPERR : TBits_1; inline;
  50301. begin
  50302. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50303. end;
  50304. procedure TUART3A_U2STA.setRIDLE; inline;
  50305. begin
  50306. pTDefRegMap(@Self)^.&set := $00000010;
  50307. end;
  50308. procedure TUART3A_U2STA.clearRIDLE; inline;
  50309. begin
  50310. pTDefRegMap(@Self)^.clr := $00000010;
  50311. end;
  50312. procedure TUART3A_U2STA.setRIDLE(thebits : TBits_1); inline;
  50313. begin
  50314. if thebits = 0 then
  50315. pTDefRegMap(@Self)^.clr := $00000010
  50316. else
  50317. pTDefRegMap(@Self)^.&set := $00000010;
  50318. end;
  50319. function TUART3A_U2STA.getRIDLE : TBits_1; inline;
  50320. begin
  50321. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50322. end;
  50323. procedure TUART3A_U2STA.setADDEN; inline;
  50324. begin
  50325. pTDefRegMap(@Self)^.&set := $00000020;
  50326. end;
  50327. procedure TUART3A_U2STA.clearADDEN; inline;
  50328. begin
  50329. pTDefRegMap(@Self)^.clr := $00000020;
  50330. end;
  50331. procedure TUART3A_U2STA.setADDEN(thebits : TBits_1); inline;
  50332. begin
  50333. if thebits = 0 then
  50334. pTDefRegMap(@Self)^.clr := $00000020
  50335. else
  50336. pTDefRegMap(@Self)^.&set := $00000020;
  50337. end;
  50338. function TUART3A_U2STA.getADDEN : TBits_1; inline;
  50339. begin
  50340. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50341. end;
  50342. procedure TUART3A_U2STA.setURXISEL(thebits : TBits_2); inline;
  50343. begin
  50344. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  50345. end;
  50346. function TUART3A_U2STA.getURXISEL : TBits_2; inline;
  50347. begin
  50348. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  50349. end;
  50350. procedure TUART3A_U2STA.setTRMT; inline;
  50351. begin
  50352. pTDefRegMap(@Self)^.&set := $00000100;
  50353. end;
  50354. procedure TUART3A_U2STA.clearTRMT; inline;
  50355. begin
  50356. pTDefRegMap(@Self)^.clr := $00000100;
  50357. end;
  50358. procedure TUART3A_U2STA.setTRMT(thebits : TBits_1); inline;
  50359. begin
  50360. if thebits = 0 then
  50361. pTDefRegMap(@Self)^.clr := $00000100
  50362. else
  50363. pTDefRegMap(@Self)^.&set := $00000100;
  50364. end;
  50365. function TUART3A_U2STA.getTRMT : TBits_1; inline;
  50366. begin
  50367. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50368. end;
  50369. procedure TUART3A_U2STA.setUTXBF; inline;
  50370. begin
  50371. pTDefRegMap(@Self)^.&set := $00000200;
  50372. end;
  50373. procedure TUART3A_U2STA.clearUTXBF; inline;
  50374. begin
  50375. pTDefRegMap(@Self)^.clr := $00000200;
  50376. end;
  50377. procedure TUART3A_U2STA.setUTXBF(thebits : TBits_1); inline;
  50378. begin
  50379. if thebits = 0 then
  50380. pTDefRegMap(@Self)^.clr := $00000200
  50381. else
  50382. pTDefRegMap(@Self)^.&set := $00000200;
  50383. end;
  50384. function TUART3A_U2STA.getUTXBF : TBits_1; inline;
  50385. begin
  50386. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50387. end;
  50388. procedure TUART3A_U2STA.setUTXEN; inline;
  50389. begin
  50390. pTDefRegMap(@Self)^.&set := $00000400;
  50391. end;
  50392. procedure TUART3A_U2STA.clearUTXEN; inline;
  50393. begin
  50394. pTDefRegMap(@Self)^.clr := $00000400;
  50395. end;
  50396. procedure TUART3A_U2STA.setUTXEN(thebits : TBits_1); inline;
  50397. begin
  50398. if thebits = 0 then
  50399. pTDefRegMap(@Self)^.clr := $00000400
  50400. else
  50401. pTDefRegMap(@Self)^.&set := $00000400;
  50402. end;
  50403. function TUART3A_U2STA.getUTXEN : TBits_1; inline;
  50404. begin
  50405. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50406. end;
  50407. procedure TUART3A_U2STA.setUTXBRK; inline;
  50408. begin
  50409. pTDefRegMap(@Self)^.&set := $00000800;
  50410. end;
  50411. procedure TUART3A_U2STA.clearUTXBRK; inline;
  50412. begin
  50413. pTDefRegMap(@Self)^.clr := $00000800;
  50414. end;
  50415. procedure TUART3A_U2STA.setUTXBRK(thebits : TBits_1); inline;
  50416. begin
  50417. if thebits = 0 then
  50418. pTDefRegMap(@Self)^.clr := $00000800
  50419. else
  50420. pTDefRegMap(@Self)^.&set := $00000800;
  50421. end;
  50422. function TUART3A_U2STA.getUTXBRK : TBits_1; inline;
  50423. begin
  50424. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50425. end;
  50426. procedure TUART3A_U2STA.setURXEN; inline;
  50427. begin
  50428. pTDefRegMap(@Self)^.&set := $00001000;
  50429. end;
  50430. procedure TUART3A_U2STA.clearURXEN; inline;
  50431. begin
  50432. pTDefRegMap(@Self)^.clr := $00001000;
  50433. end;
  50434. procedure TUART3A_U2STA.setURXEN(thebits : TBits_1); inline;
  50435. begin
  50436. if thebits = 0 then
  50437. pTDefRegMap(@Self)^.clr := $00001000
  50438. else
  50439. pTDefRegMap(@Self)^.&set := $00001000;
  50440. end;
  50441. function TUART3A_U2STA.getURXEN : TBits_1; inline;
  50442. begin
  50443. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  50444. end;
  50445. procedure TUART3A_U2STA.setUTXINV; inline;
  50446. begin
  50447. pTDefRegMap(@Self)^.&set := $00002000;
  50448. end;
  50449. procedure TUART3A_U2STA.clearUTXINV; inline;
  50450. begin
  50451. pTDefRegMap(@Self)^.clr := $00002000;
  50452. end;
  50453. procedure TUART3A_U2STA.setUTXINV(thebits : TBits_1); inline;
  50454. begin
  50455. if thebits = 0 then
  50456. pTDefRegMap(@Self)^.clr := $00002000
  50457. else
  50458. pTDefRegMap(@Self)^.&set := $00002000;
  50459. end;
  50460. function TUART3A_U2STA.getUTXINV : TBits_1; inline;
  50461. begin
  50462. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50463. end;
  50464. procedure TUART3A_U2STA.setUTXISEL(thebits : TBits_2); inline;
  50465. begin
  50466. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  50467. end;
  50468. function TUART3A_U2STA.getUTXISEL : TBits_2; inline;
  50469. begin
  50470. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  50471. end;
  50472. procedure TUART3A_U2STA.setADDR(thebits : TBits_8); inline;
  50473. begin
  50474. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  50475. end;
  50476. function TUART3A_U2STA.getADDR : TBits_8; inline;
  50477. begin
  50478. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  50479. end;
  50480. procedure TUART3A_U2STA.setADM_EN; inline;
  50481. begin
  50482. pTDefRegMap(@Self)^.&set := $01000000;
  50483. end;
  50484. procedure TUART3A_U2STA.clearADM_EN; inline;
  50485. begin
  50486. pTDefRegMap(@Self)^.clr := $01000000;
  50487. end;
  50488. procedure TUART3A_U2STA.setADM_EN(thebits : TBits_1); inline;
  50489. begin
  50490. if thebits = 0 then
  50491. pTDefRegMap(@Self)^.clr := $01000000
  50492. else
  50493. pTDefRegMap(@Self)^.&set := $01000000;
  50494. end;
  50495. function TUART3A_U2STA.getADM_EN : TBits_1; inline;
  50496. begin
  50497. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  50498. end;
  50499. procedure TUART3A_U2STA.setURXISEL0; inline;
  50500. begin
  50501. pTDefRegMap(@Self)^.&set := $00000040;
  50502. end;
  50503. procedure TUART3A_U2STA.clearURXISEL0; inline;
  50504. begin
  50505. pTDefRegMap(@Self)^.clr := $00000040;
  50506. end;
  50507. procedure TUART3A_U2STA.setURXISEL0(thebits : TBits_1); inline;
  50508. begin
  50509. if thebits = 0 then
  50510. pTDefRegMap(@Self)^.clr := $00000040
  50511. else
  50512. pTDefRegMap(@Self)^.&set := $00000040;
  50513. end;
  50514. function TUART3A_U2STA.getURXISEL0 : TBits_1; inline;
  50515. begin
  50516. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50517. end;
  50518. procedure TUART3A_U2STA.setURXISEL1; inline;
  50519. begin
  50520. pTDefRegMap(@Self)^.&set := $00000080;
  50521. end;
  50522. procedure TUART3A_U2STA.clearURXISEL1; inline;
  50523. begin
  50524. pTDefRegMap(@Self)^.clr := $00000080;
  50525. end;
  50526. procedure TUART3A_U2STA.setURXISEL1(thebits : TBits_1); inline;
  50527. begin
  50528. if thebits = 0 then
  50529. pTDefRegMap(@Self)^.clr := $00000080
  50530. else
  50531. pTDefRegMap(@Self)^.&set := $00000080;
  50532. end;
  50533. function TUART3A_U2STA.getURXISEL1 : TBits_1; inline;
  50534. begin
  50535. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50536. end;
  50537. procedure TUART3A_U2STA.setUTXISEL0; inline;
  50538. begin
  50539. pTDefRegMap(@Self)^.&set := $00004000;
  50540. end;
  50541. procedure TUART3A_U2STA.clearUTXISEL0; inline;
  50542. begin
  50543. pTDefRegMap(@Self)^.clr := $00004000;
  50544. end;
  50545. procedure TUART3A_U2STA.setUTXISEL0(thebits : TBits_1); inline;
  50546. begin
  50547. if thebits = 0 then
  50548. pTDefRegMap(@Self)^.clr := $00004000
  50549. else
  50550. pTDefRegMap(@Self)^.&set := $00004000;
  50551. end;
  50552. function TUART3A_U2STA.getUTXISEL0 : TBits_1; inline;
  50553. begin
  50554. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  50555. end;
  50556. procedure TUART3A_U2STA.setUTXISEL1; inline;
  50557. begin
  50558. pTDefRegMap(@Self)^.&set := $00008000;
  50559. end;
  50560. procedure TUART3A_U2STA.clearUTXISEL1; inline;
  50561. begin
  50562. pTDefRegMap(@Self)^.clr := $00008000;
  50563. end;
  50564. procedure TUART3A_U2STA.setUTXISEL1(thebits : TBits_1); inline;
  50565. begin
  50566. if thebits = 0 then
  50567. pTDefRegMap(@Self)^.clr := $00008000
  50568. else
  50569. pTDefRegMap(@Self)^.&set := $00008000;
  50570. end;
  50571. function TUART3A_U2STA.getUTXISEL1 : TBits_1; inline;
  50572. begin
  50573. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50574. end;
  50575. procedure TUART3A_U2STA.setUTXSEL(thebits : TBits_2); inline;
  50576. begin
  50577. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  50578. end;
  50579. function TUART3A_U2STA.getUTXSEL : TBits_2; inline;
  50580. begin
  50581. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  50582. end;
  50583. procedure TUART3A_U2STA.setw(thebits : TBits_32); inline;
  50584. begin
  50585. pTDefRegMap(@Self)^.val := thebits;
  50586. end;
  50587. function TUART3A_U2STA.getw : TBits_32; inline;
  50588. begin
  50589. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50590. end;
  50591. procedure TUART3A_U3ASTA.setURXDA; inline;
  50592. begin
  50593. pTDefRegMap(@Self)^.&set := $00000001;
  50594. end;
  50595. procedure TUART3A_U3ASTA.clearURXDA; inline;
  50596. begin
  50597. pTDefRegMap(@Self)^.clr := $00000001;
  50598. end;
  50599. procedure TUART3A_U3ASTA.setURXDA(thebits : TBits_1); inline;
  50600. begin
  50601. if thebits = 0 then
  50602. pTDefRegMap(@Self)^.clr := $00000001
  50603. else
  50604. pTDefRegMap(@Self)^.&set := $00000001;
  50605. end;
  50606. function TUART3A_U3ASTA.getURXDA : TBits_1; inline;
  50607. begin
  50608. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50609. end;
  50610. procedure TUART3A_U3ASTA.setOERR; inline;
  50611. begin
  50612. pTDefRegMap(@Self)^.&set := $00000002;
  50613. end;
  50614. procedure TUART3A_U3ASTA.clearOERR; inline;
  50615. begin
  50616. pTDefRegMap(@Self)^.clr := $00000002;
  50617. end;
  50618. procedure TUART3A_U3ASTA.setOERR(thebits : TBits_1); inline;
  50619. begin
  50620. if thebits = 0 then
  50621. pTDefRegMap(@Self)^.clr := $00000002
  50622. else
  50623. pTDefRegMap(@Self)^.&set := $00000002;
  50624. end;
  50625. function TUART3A_U3ASTA.getOERR : TBits_1; inline;
  50626. begin
  50627. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50628. end;
  50629. procedure TUART3A_U3ASTA.setFERR; inline;
  50630. begin
  50631. pTDefRegMap(@Self)^.&set := $00000004;
  50632. end;
  50633. procedure TUART3A_U3ASTA.clearFERR; inline;
  50634. begin
  50635. pTDefRegMap(@Self)^.clr := $00000004;
  50636. end;
  50637. procedure TUART3A_U3ASTA.setFERR(thebits : TBits_1); inline;
  50638. begin
  50639. if thebits = 0 then
  50640. pTDefRegMap(@Self)^.clr := $00000004
  50641. else
  50642. pTDefRegMap(@Self)^.&set := $00000004;
  50643. end;
  50644. function TUART3A_U3ASTA.getFERR : TBits_1; inline;
  50645. begin
  50646. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50647. end;
  50648. procedure TUART3A_U3ASTA.setPERR; inline;
  50649. begin
  50650. pTDefRegMap(@Self)^.&set := $00000008;
  50651. end;
  50652. procedure TUART3A_U3ASTA.clearPERR; inline;
  50653. begin
  50654. pTDefRegMap(@Self)^.clr := $00000008;
  50655. end;
  50656. procedure TUART3A_U3ASTA.setPERR(thebits : TBits_1); inline;
  50657. begin
  50658. if thebits = 0 then
  50659. pTDefRegMap(@Self)^.clr := $00000008
  50660. else
  50661. pTDefRegMap(@Self)^.&set := $00000008;
  50662. end;
  50663. function TUART3A_U3ASTA.getPERR : TBits_1; inline;
  50664. begin
  50665. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50666. end;
  50667. procedure TUART3A_U3ASTA.setRIDLE; inline;
  50668. begin
  50669. pTDefRegMap(@Self)^.&set := $00000010;
  50670. end;
  50671. procedure TUART3A_U3ASTA.clearRIDLE; inline;
  50672. begin
  50673. pTDefRegMap(@Self)^.clr := $00000010;
  50674. end;
  50675. procedure TUART3A_U3ASTA.setRIDLE(thebits : TBits_1); inline;
  50676. begin
  50677. if thebits = 0 then
  50678. pTDefRegMap(@Self)^.clr := $00000010
  50679. else
  50680. pTDefRegMap(@Self)^.&set := $00000010;
  50681. end;
  50682. function TUART3A_U3ASTA.getRIDLE : TBits_1; inline;
  50683. begin
  50684. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50685. end;
  50686. procedure TUART3A_U3ASTA.setADDEN; inline;
  50687. begin
  50688. pTDefRegMap(@Self)^.&set := $00000020;
  50689. end;
  50690. procedure TUART3A_U3ASTA.clearADDEN; inline;
  50691. begin
  50692. pTDefRegMap(@Self)^.clr := $00000020;
  50693. end;
  50694. procedure TUART3A_U3ASTA.setADDEN(thebits : TBits_1); inline;
  50695. begin
  50696. if thebits = 0 then
  50697. pTDefRegMap(@Self)^.clr := $00000020
  50698. else
  50699. pTDefRegMap(@Self)^.&set := $00000020;
  50700. end;
  50701. function TUART3A_U3ASTA.getADDEN : TBits_1; inline;
  50702. begin
  50703. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50704. end;
  50705. procedure TUART3A_U3ASTA.setURXISEL(thebits : TBits_2); inline;
  50706. begin
  50707. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  50708. end;
  50709. function TUART3A_U3ASTA.getURXISEL : TBits_2; inline;
  50710. begin
  50711. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  50712. end;
  50713. procedure TUART3A_U3ASTA.setTRMT; inline;
  50714. begin
  50715. pTDefRegMap(@Self)^.&set := $00000100;
  50716. end;
  50717. procedure TUART3A_U3ASTA.clearTRMT; inline;
  50718. begin
  50719. pTDefRegMap(@Self)^.clr := $00000100;
  50720. end;
  50721. procedure TUART3A_U3ASTA.setTRMT(thebits : TBits_1); inline;
  50722. begin
  50723. if thebits = 0 then
  50724. pTDefRegMap(@Self)^.clr := $00000100
  50725. else
  50726. pTDefRegMap(@Self)^.&set := $00000100;
  50727. end;
  50728. function TUART3A_U3ASTA.getTRMT : TBits_1; inline;
  50729. begin
  50730. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50731. end;
  50732. procedure TUART3A_U3ASTA.setUTXBF; inline;
  50733. begin
  50734. pTDefRegMap(@Self)^.&set := $00000200;
  50735. end;
  50736. procedure TUART3A_U3ASTA.clearUTXBF; inline;
  50737. begin
  50738. pTDefRegMap(@Self)^.clr := $00000200;
  50739. end;
  50740. procedure TUART3A_U3ASTA.setUTXBF(thebits : TBits_1); inline;
  50741. begin
  50742. if thebits = 0 then
  50743. pTDefRegMap(@Self)^.clr := $00000200
  50744. else
  50745. pTDefRegMap(@Self)^.&set := $00000200;
  50746. end;
  50747. function TUART3A_U3ASTA.getUTXBF : TBits_1; inline;
  50748. begin
  50749. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50750. end;
  50751. procedure TUART3A_U3ASTA.setUTXEN; inline;
  50752. begin
  50753. pTDefRegMap(@Self)^.&set := $00000400;
  50754. end;
  50755. procedure TUART3A_U3ASTA.clearUTXEN; inline;
  50756. begin
  50757. pTDefRegMap(@Self)^.clr := $00000400;
  50758. end;
  50759. procedure TUART3A_U3ASTA.setUTXEN(thebits : TBits_1); inline;
  50760. begin
  50761. if thebits = 0 then
  50762. pTDefRegMap(@Self)^.clr := $00000400
  50763. else
  50764. pTDefRegMap(@Self)^.&set := $00000400;
  50765. end;
  50766. function TUART3A_U3ASTA.getUTXEN : TBits_1; inline;
  50767. begin
  50768. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50769. end;
  50770. procedure TUART3A_U3ASTA.setUTXBRK; inline;
  50771. begin
  50772. pTDefRegMap(@Self)^.&set := $00000800;
  50773. end;
  50774. procedure TUART3A_U3ASTA.clearUTXBRK; inline;
  50775. begin
  50776. pTDefRegMap(@Self)^.clr := $00000800;
  50777. end;
  50778. procedure TUART3A_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
  50779. begin
  50780. if thebits = 0 then
  50781. pTDefRegMap(@Self)^.clr := $00000800
  50782. else
  50783. pTDefRegMap(@Self)^.&set := $00000800;
  50784. end;
  50785. function TUART3A_U3ASTA.getUTXBRK : TBits_1; inline;
  50786. begin
  50787. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50788. end;
  50789. procedure TUART3A_U3ASTA.setURXEN; inline;
  50790. begin
  50791. pTDefRegMap(@Self)^.&set := $00001000;
  50792. end;
  50793. procedure TUART3A_U3ASTA.clearURXEN; inline;
  50794. begin
  50795. pTDefRegMap(@Self)^.clr := $00001000;
  50796. end;
  50797. procedure TUART3A_U3ASTA.setURXEN(thebits : TBits_1); inline;
  50798. begin
  50799. if thebits = 0 then
  50800. pTDefRegMap(@Self)^.clr := $00001000
  50801. else
  50802. pTDefRegMap(@Self)^.&set := $00001000;
  50803. end;
  50804. function TUART3A_U3ASTA.getURXEN : TBits_1; inline;
  50805. begin
  50806. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  50807. end;
  50808. procedure TUART3A_U3ASTA.setUTXINV; inline;
  50809. begin
  50810. pTDefRegMap(@Self)^.&set := $00002000;
  50811. end;
  50812. procedure TUART3A_U3ASTA.clearUTXINV; inline;
  50813. begin
  50814. pTDefRegMap(@Self)^.clr := $00002000;
  50815. end;
  50816. procedure TUART3A_U3ASTA.setUTXINV(thebits : TBits_1); inline;
  50817. begin
  50818. if thebits = 0 then
  50819. pTDefRegMap(@Self)^.clr := $00002000
  50820. else
  50821. pTDefRegMap(@Self)^.&set := $00002000;
  50822. end;
  50823. function TUART3A_U3ASTA.getUTXINV : TBits_1; inline;
  50824. begin
  50825. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50826. end;
  50827. procedure TUART3A_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
  50828. begin
  50829. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  50830. end;
  50831. function TUART3A_U3ASTA.getUTXISEL : TBits_2; inline;
  50832. begin
  50833. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  50834. end;
  50835. procedure TUART3A_U3ASTA.setADDR(thebits : TBits_8); inline;
  50836. begin
  50837. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  50838. end;
  50839. function TUART3A_U3ASTA.getADDR : TBits_8; inline;
  50840. begin
  50841. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  50842. end;
  50843. procedure TUART3A_U3ASTA.setADM_EN; inline;
  50844. begin
  50845. pTDefRegMap(@Self)^.&set := $01000000;
  50846. end;
  50847. procedure TUART3A_U3ASTA.clearADM_EN; inline;
  50848. begin
  50849. pTDefRegMap(@Self)^.clr := $01000000;
  50850. end;
  50851. procedure TUART3A_U3ASTA.setADM_EN(thebits : TBits_1); inline;
  50852. begin
  50853. if thebits = 0 then
  50854. pTDefRegMap(@Self)^.clr := $01000000
  50855. else
  50856. pTDefRegMap(@Self)^.&set := $01000000;
  50857. end;
  50858. function TUART3A_U3ASTA.getADM_EN : TBits_1; inline;
  50859. begin
  50860. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  50861. end;
  50862. procedure TUART3A_U3ASTA.setURXISEL0; inline;
  50863. begin
  50864. pTDefRegMap(@Self)^.&set := $00000040;
  50865. end;
  50866. procedure TUART3A_U3ASTA.clearURXISEL0; inline;
  50867. begin
  50868. pTDefRegMap(@Self)^.clr := $00000040;
  50869. end;
  50870. procedure TUART3A_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
  50871. begin
  50872. if thebits = 0 then
  50873. pTDefRegMap(@Self)^.clr := $00000040
  50874. else
  50875. pTDefRegMap(@Self)^.&set := $00000040;
  50876. end;
  50877. function TUART3A_U3ASTA.getURXISEL0 : TBits_1; inline;
  50878. begin
  50879. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50880. end;
  50881. procedure TUART3A_U3ASTA.setURXISEL1; inline;
  50882. begin
  50883. pTDefRegMap(@Self)^.&set := $00000080;
  50884. end;
  50885. procedure TUART3A_U3ASTA.clearURXISEL1; inline;
  50886. begin
  50887. pTDefRegMap(@Self)^.clr := $00000080;
  50888. end;
  50889. procedure TUART3A_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
  50890. begin
  50891. if thebits = 0 then
  50892. pTDefRegMap(@Self)^.clr := $00000080
  50893. else
  50894. pTDefRegMap(@Self)^.&set := $00000080;
  50895. end;
  50896. function TUART3A_U3ASTA.getURXISEL1 : TBits_1; inline;
  50897. begin
  50898. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50899. end;
  50900. procedure TUART3A_U3ASTA.setUTXISEL0; inline;
  50901. begin
  50902. pTDefRegMap(@Self)^.&set := $00004000;
  50903. end;
  50904. procedure TUART3A_U3ASTA.clearUTXISEL0; inline;
  50905. begin
  50906. pTDefRegMap(@Self)^.clr := $00004000;
  50907. end;
  50908. procedure TUART3A_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
  50909. begin
  50910. if thebits = 0 then
  50911. pTDefRegMap(@Self)^.clr := $00004000
  50912. else
  50913. pTDefRegMap(@Self)^.&set := $00004000;
  50914. end;
  50915. function TUART3A_U3ASTA.getUTXISEL0 : TBits_1; inline;
  50916. begin
  50917. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  50918. end;
  50919. procedure TUART3A_U3ASTA.setUTXISEL1; inline;
  50920. begin
  50921. pTDefRegMap(@Self)^.&set := $00008000;
  50922. end;
  50923. procedure TUART3A_U3ASTA.clearUTXISEL1; inline;
  50924. begin
  50925. pTDefRegMap(@Self)^.clr := $00008000;
  50926. end;
  50927. procedure TUART3A_U3ASTA.setUTXISEL1(thebits : TBits_1); inline;
  50928. begin
  50929. if thebits = 0 then
  50930. pTDefRegMap(@Self)^.clr := $00008000
  50931. else
  50932. pTDefRegMap(@Self)^.&set := $00008000;
  50933. end;
  50934. function TUART3A_U3ASTA.getUTXISEL1 : TBits_1; inline;
  50935. begin
  50936. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50937. end;
  50938. procedure TUART3A_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
  50939. begin
  50940. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  50941. end;
  50942. function TUART3A_U3ASTA.getUTXSEL : TBits_2; inline;
  50943. begin
  50944. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  50945. end;
  50946. procedure TUART3A_U3ASTA.setw(thebits : TBits_32); inline;
  50947. begin
  50948. pTDefRegMap(@Self)^.val := thebits;
  50949. end;
  50950. function TUART3A_U3ASTA.getw : TBits_32; inline;
  50951. begin
  50952. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50953. end;
  50954. procedure TUART5_U3BMODE.setSTSEL; inline;
  50955. begin
  50956. pTDefRegMap(@Self)^.&set := $00000001;
  50957. end;
  50958. procedure TUART5_U3BMODE.clearSTSEL; inline;
  50959. begin
  50960. pTDefRegMap(@Self)^.clr := $00000001;
  50961. end;
  50962. procedure TUART5_U3BMODE.setSTSEL(thebits : TBits_1); inline;
  50963. begin
  50964. if thebits = 0 then
  50965. pTDefRegMap(@Self)^.clr := $00000001
  50966. else
  50967. pTDefRegMap(@Self)^.&set := $00000001;
  50968. end;
  50969. function TUART5_U3BMODE.getSTSEL : TBits_1; inline;
  50970. begin
  50971. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50972. end;
  50973. procedure TUART5_U3BMODE.setPDSEL(thebits : TBits_2); inline;
  50974. begin
  50975. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  50976. end;
  50977. function TUART5_U3BMODE.getPDSEL : TBits_2; inline;
  50978. begin
  50979. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  50980. end;
  50981. procedure TUART5_U3BMODE.setBRGH; inline;
  50982. begin
  50983. pTDefRegMap(@Self)^.&set := $00000008;
  50984. end;
  50985. procedure TUART5_U3BMODE.clearBRGH; inline;
  50986. begin
  50987. pTDefRegMap(@Self)^.clr := $00000008;
  50988. end;
  50989. procedure TUART5_U3BMODE.setBRGH(thebits : TBits_1); inline;
  50990. begin
  50991. if thebits = 0 then
  50992. pTDefRegMap(@Self)^.clr := $00000008
  50993. else
  50994. pTDefRegMap(@Self)^.&set := $00000008;
  50995. end;
  50996. function TUART5_U3BMODE.getBRGH : TBits_1; inline;
  50997. begin
  50998. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50999. end;
  51000. procedure TUART5_U3BMODE.setRXINV; inline;
  51001. begin
  51002. pTDefRegMap(@Self)^.&set := $00000010;
  51003. end;
  51004. procedure TUART5_U3BMODE.clearRXINV; inline;
  51005. begin
  51006. pTDefRegMap(@Self)^.clr := $00000010;
  51007. end;
  51008. procedure TUART5_U3BMODE.setRXINV(thebits : TBits_1); inline;
  51009. begin
  51010. if thebits = 0 then
  51011. pTDefRegMap(@Self)^.clr := $00000010
  51012. else
  51013. pTDefRegMap(@Self)^.&set := $00000010;
  51014. end;
  51015. function TUART5_U3BMODE.getRXINV : TBits_1; inline;
  51016. begin
  51017. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51018. end;
  51019. procedure TUART5_U3BMODE.setABAUD; inline;
  51020. begin
  51021. pTDefRegMap(@Self)^.&set := $00000020;
  51022. end;
  51023. procedure TUART5_U3BMODE.clearABAUD; inline;
  51024. begin
  51025. pTDefRegMap(@Self)^.clr := $00000020;
  51026. end;
  51027. procedure TUART5_U3BMODE.setABAUD(thebits : TBits_1); inline;
  51028. begin
  51029. if thebits = 0 then
  51030. pTDefRegMap(@Self)^.clr := $00000020
  51031. else
  51032. pTDefRegMap(@Self)^.&set := $00000020;
  51033. end;
  51034. function TUART5_U3BMODE.getABAUD : TBits_1; inline;
  51035. begin
  51036. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51037. end;
  51038. procedure TUART5_U3BMODE.setLPBACK; inline;
  51039. begin
  51040. pTDefRegMap(@Self)^.&set := $00000040;
  51041. end;
  51042. procedure TUART5_U3BMODE.clearLPBACK; inline;
  51043. begin
  51044. pTDefRegMap(@Self)^.clr := $00000040;
  51045. end;
  51046. procedure TUART5_U3BMODE.setLPBACK(thebits : TBits_1); inline;
  51047. begin
  51048. if thebits = 0 then
  51049. pTDefRegMap(@Self)^.clr := $00000040
  51050. else
  51051. pTDefRegMap(@Self)^.&set := $00000040;
  51052. end;
  51053. function TUART5_U3BMODE.getLPBACK : TBits_1; inline;
  51054. begin
  51055. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51056. end;
  51057. procedure TUART5_U3BMODE.setWAKE; inline;
  51058. begin
  51059. pTDefRegMap(@Self)^.&set := $00000080;
  51060. end;
  51061. procedure TUART5_U3BMODE.clearWAKE; inline;
  51062. begin
  51063. pTDefRegMap(@Self)^.clr := $00000080;
  51064. end;
  51065. procedure TUART5_U3BMODE.setWAKE(thebits : TBits_1); inline;
  51066. begin
  51067. if thebits = 0 then
  51068. pTDefRegMap(@Self)^.clr := $00000080
  51069. else
  51070. pTDefRegMap(@Self)^.&set := $00000080;
  51071. end;
  51072. function TUART5_U3BMODE.getWAKE : TBits_1; inline;
  51073. begin
  51074. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51075. end;
  51076. procedure TUART5_U3BMODE.setIREN; inline;
  51077. begin
  51078. pTDefRegMap(@Self)^.&set := $00001000;
  51079. end;
  51080. procedure TUART5_U3BMODE.clearIREN; inline;
  51081. begin
  51082. pTDefRegMap(@Self)^.clr := $00001000;
  51083. end;
  51084. procedure TUART5_U3BMODE.setIREN(thebits : TBits_1); inline;
  51085. begin
  51086. if thebits = 0 then
  51087. pTDefRegMap(@Self)^.clr := $00001000
  51088. else
  51089. pTDefRegMap(@Self)^.&set := $00001000;
  51090. end;
  51091. function TUART5_U3BMODE.getIREN : TBits_1; inline;
  51092. begin
  51093. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  51094. end;
  51095. procedure TUART5_U3BMODE.setSIDL; inline;
  51096. begin
  51097. pTDefRegMap(@Self)^.&set := $00002000;
  51098. end;
  51099. procedure TUART5_U3BMODE.clearSIDL; inline;
  51100. begin
  51101. pTDefRegMap(@Self)^.clr := $00002000;
  51102. end;
  51103. procedure TUART5_U3BMODE.setSIDL(thebits : TBits_1); inline;
  51104. begin
  51105. if thebits = 0 then
  51106. pTDefRegMap(@Self)^.clr := $00002000
  51107. else
  51108. pTDefRegMap(@Self)^.&set := $00002000;
  51109. end;
  51110. function TUART5_U3BMODE.getSIDL : TBits_1; inline;
  51111. begin
  51112. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51113. end;
  51114. procedure TUART5_U3BMODE.setON; inline;
  51115. begin
  51116. pTDefRegMap(@Self)^.&set := $00008000;
  51117. end;
  51118. procedure TUART5_U3BMODE.clearON; inline;
  51119. begin
  51120. pTDefRegMap(@Self)^.clr := $00008000;
  51121. end;
  51122. procedure TUART5_U3BMODE.setON(thebits : TBits_1); inline;
  51123. begin
  51124. if thebits = 0 then
  51125. pTDefRegMap(@Self)^.clr := $00008000
  51126. else
  51127. pTDefRegMap(@Self)^.&set := $00008000;
  51128. end;
  51129. function TUART5_U3BMODE.getON : TBits_1; inline;
  51130. begin
  51131. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51132. end;
  51133. procedure TUART5_U3BMODE.setPDSEL0; inline;
  51134. begin
  51135. pTDefRegMap(@Self)^.&set := $00000002;
  51136. end;
  51137. procedure TUART5_U3BMODE.clearPDSEL0; inline;
  51138. begin
  51139. pTDefRegMap(@Self)^.clr := $00000002;
  51140. end;
  51141. procedure TUART5_U3BMODE.setPDSEL0(thebits : TBits_1); inline;
  51142. begin
  51143. if thebits = 0 then
  51144. pTDefRegMap(@Self)^.clr := $00000002
  51145. else
  51146. pTDefRegMap(@Self)^.&set := $00000002;
  51147. end;
  51148. function TUART5_U3BMODE.getPDSEL0 : TBits_1; inline;
  51149. begin
  51150. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51151. end;
  51152. procedure TUART5_U3BMODE.setPDSEL1; inline;
  51153. begin
  51154. pTDefRegMap(@Self)^.&set := $00000004;
  51155. end;
  51156. procedure TUART5_U3BMODE.clearPDSEL1; inline;
  51157. begin
  51158. pTDefRegMap(@Self)^.clr := $00000004;
  51159. end;
  51160. procedure TUART5_U3BMODE.setPDSEL1(thebits : TBits_1); inline;
  51161. begin
  51162. if thebits = 0 then
  51163. pTDefRegMap(@Self)^.clr := $00000004
  51164. else
  51165. pTDefRegMap(@Self)^.&set := $00000004;
  51166. end;
  51167. function TUART5_U3BMODE.getPDSEL1 : TBits_1; inline;
  51168. begin
  51169. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51170. end;
  51171. procedure TUART5_U3BMODE.setUSIDL; inline;
  51172. begin
  51173. pTDefRegMap(@Self)^.&set := $00002000;
  51174. end;
  51175. procedure TUART5_U3BMODE.clearUSIDL; inline;
  51176. begin
  51177. pTDefRegMap(@Self)^.clr := $00002000;
  51178. end;
  51179. procedure TUART5_U3BMODE.setUSIDL(thebits : TBits_1); inline;
  51180. begin
  51181. if thebits = 0 then
  51182. pTDefRegMap(@Self)^.clr := $00002000
  51183. else
  51184. pTDefRegMap(@Self)^.&set := $00002000;
  51185. end;
  51186. function TUART5_U3BMODE.getUSIDL : TBits_1; inline;
  51187. begin
  51188. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51189. end;
  51190. procedure TUART5_U3BMODE.setUARTEN; inline;
  51191. begin
  51192. pTDefRegMap(@Self)^.&set := $00008000;
  51193. end;
  51194. procedure TUART5_U3BMODE.clearUARTEN; inline;
  51195. begin
  51196. pTDefRegMap(@Self)^.clr := $00008000;
  51197. end;
  51198. procedure TUART5_U3BMODE.setUARTEN(thebits : TBits_1); inline;
  51199. begin
  51200. if thebits = 0 then
  51201. pTDefRegMap(@Self)^.clr := $00008000
  51202. else
  51203. pTDefRegMap(@Self)^.&set := $00008000;
  51204. end;
  51205. function TUART5_U3BMODE.getUARTEN : TBits_1; inline;
  51206. begin
  51207. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51208. end;
  51209. procedure TUART5_U3BMODE.setw(thebits : TBits_32); inline;
  51210. begin
  51211. pTDefRegMap(@Self)^.val := thebits;
  51212. end;
  51213. function TUART5_U3BMODE.getw : TBits_32; inline;
  51214. begin
  51215. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51216. end;
  51217. procedure TUART5_U5MODE.setSTSEL; inline;
  51218. begin
  51219. pTDefRegMap(@Self)^.&set := $00000001;
  51220. end;
  51221. procedure TUART5_U5MODE.clearSTSEL; inline;
  51222. begin
  51223. pTDefRegMap(@Self)^.clr := $00000001;
  51224. end;
  51225. procedure TUART5_U5MODE.setSTSEL(thebits : TBits_1); inline;
  51226. begin
  51227. if thebits = 0 then
  51228. pTDefRegMap(@Self)^.clr := $00000001
  51229. else
  51230. pTDefRegMap(@Self)^.&set := $00000001;
  51231. end;
  51232. function TUART5_U5MODE.getSTSEL : TBits_1; inline;
  51233. begin
  51234. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51235. end;
  51236. procedure TUART5_U5MODE.setPDSEL(thebits : TBits_2); inline;
  51237. begin
  51238. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  51239. end;
  51240. function TUART5_U5MODE.getPDSEL : TBits_2; inline;
  51241. begin
  51242. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  51243. end;
  51244. procedure TUART5_U5MODE.setBRGH; inline;
  51245. begin
  51246. pTDefRegMap(@Self)^.&set := $00000008;
  51247. end;
  51248. procedure TUART5_U5MODE.clearBRGH; inline;
  51249. begin
  51250. pTDefRegMap(@Self)^.clr := $00000008;
  51251. end;
  51252. procedure TUART5_U5MODE.setBRGH(thebits : TBits_1); inline;
  51253. begin
  51254. if thebits = 0 then
  51255. pTDefRegMap(@Self)^.clr := $00000008
  51256. else
  51257. pTDefRegMap(@Self)^.&set := $00000008;
  51258. end;
  51259. function TUART5_U5MODE.getBRGH : TBits_1; inline;
  51260. begin
  51261. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51262. end;
  51263. procedure TUART5_U5MODE.setRXINV; inline;
  51264. begin
  51265. pTDefRegMap(@Self)^.&set := $00000010;
  51266. end;
  51267. procedure TUART5_U5MODE.clearRXINV; inline;
  51268. begin
  51269. pTDefRegMap(@Self)^.clr := $00000010;
  51270. end;
  51271. procedure TUART5_U5MODE.setRXINV(thebits : TBits_1); inline;
  51272. begin
  51273. if thebits = 0 then
  51274. pTDefRegMap(@Self)^.clr := $00000010
  51275. else
  51276. pTDefRegMap(@Self)^.&set := $00000010;
  51277. end;
  51278. function TUART5_U5MODE.getRXINV : TBits_1; inline;
  51279. begin
  51280. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51281. end;
  51282. procedure TUART5_U5MODE.setABAUD; inline;
  51283. begin
  51284. pTDefRegMap(@Self)^.&set := $00000020;
  51285. end;
  51286. procedure TUART5_U5MODE.clearABAUD; inline;
  51287. begin
  51288. pTDefRegMap(@Self)^.clr := $00000020;
  51289. end;
  51290. procedure TUART5_U5MODE.setABAUD(thebits : TBits_1); inline;
  51291. begin
  51292. if thebits = 0 then
  51293. pTDefRegMap(@Self)^.clr := $00000020
  51294. else
  51295. pTDefRegMap(@Self)^.&set := $00000020;
  51296. end;
  51297. function TUART5_U5MODE.getABAUD : TBits_1; inline;
  51298. begin
  51299. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51300. end;
  51301. procedure TUART5_U5MODE.setLPBACK; inline;
  51302. begin
  51303. pTDefRegMap(@Self)^.&set := $00000040;
  51304. end;
  51305. procedure TUART5_U5MODE.clearLPBACK; inline;
  51306. begin
  51307. pTDefRegMap(@Self)^.clr := $00000040;
  51308. end;
  51309. procedure TUART5_U5MODE.setLPBACK(thebits : TBits_1); inline;
  51310. begin
  51311. if thebits = 0 then
  51312. pTDefRegMap(@Self)^.clr := $00000040
  51313. else
  51314. pTDefRegMap(@Self)^.&set := $00000040;
  51315. end;
  51316. function TUART5_U5MODE.getLPBACK : TBits_1; inline;
  51317. begin
  51318. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51319. end;
  51320. procedure TUART5_U5MODE.setWAKE; inline;
  51321. begin
  51322. pTDefRegMap(@Self)^.&set := $00000080;
  51323. end;
  51324. procedure TUART5_U5MODE.clearWAKE; inline;
  51325. begin
  51326. pTDefRegMap(@Self)^.clr := $00000080;
  51327. end;
  51328. procedure TUART5_U5MODE.setWAKE(thebits : TBits_1); inline;
  51329. begin
  51330. if thebits = 0 then
  51331. pTDefRegMap(@Self)^.clr := $00000080
  51332. else
  51333. pTDefRegMap(@Self)^.&set := $00000080;
  51334. end;
  51335. function TUART5_U5MODE.getWAKE : TBits_1; inline;
  51336. begin
  51337. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51338. end;
  51339. procedure TUART5_U5MODE.setIREN; inline;
  51340. begin
  51341. pTDefRegMap(@Self)^.&set := $00001000;
  51342. end;
  51343. procedure TUART5_U5MODE.clearIREN; inline;
  51344. begin
  51345. pTDefRegMap(@Self)^.clr := $00001000;
  51346. end;
  51347. procedure TUART5_U5MODE.setIREN(thebits : TBits_1); inline;
  51348. begin
  51349. if thebits = 0 then
  51350. pTDefRegMap(@Self)^.clr := $00001000
  51351. else
  51352. pTDefRegMap(@Self)^.&set := $00001000;
  51353. end;
  51354. function TUART5_U5MODE.getIREN : TBits_1; inline;
  51355. begin
  51356. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  51357. end;
  51358. procedure TUART5_U5MODE.setSIDL; inline;
  51359. begin
  51360. pTDefRegMap(@Self)^.&set := $00002000;
  51361. end;
  51362. procedure TUART5_U5MODE.clearSIDL; inline;
  51363. begin
  51364. pTDefRegMap(@Self)^.clr := $00002000;
  51365. end;
  51366. procedure TUART5_U5MODE.setSIDL(thebits : TBits_1); inline;
  51367. begin
  51368. if thebits = 0 then
  51369. pTDefRegMap(@Self)^.clr := $00002000
  51370. else
  51371. pTDefRegMap(@Self)^.&set := $00002000;
  51372. end;
  51373. function TUART5_U5MODE.getSIDL : TBits_1; inline;
  51374. begin
  51375. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51376. end;
  51377. procedure TUART5_U5MODE.setON; inline;
  51378. begin
  51379. pTDefRegMap(@Self)^.&set := $00008000;
  51380. end;
  51381. procedure TUART5_U5MODE.clearON; inline;
  51382. begin
  51383. pTDefRegMap(@Self)^.clr := $00008000;
  51384. end;
  51385. procedure TUART5_U5MODE.setON(thebits : TBits_1); inline;
  51386. begin
  51387. if thebits = 0 then
  51388. pTDefRegMap(@Self)^.clr := $00008000
  51389. else
  51390. pTDefRegMap(@Self)^.&set := $00008000;
  51391. end;
  51392. function TUART5_U5MODE.getON : TBits_1; inline;
  51393. begin
  51394. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51395. end;
  51396. procedure TUART5_U5MODE.setPDSEL0; inline;
  51397. begin
  51398. pTDefRegMap(@Self)^.&set := $00000002;
  51399. end;
  51400. procedure TUART5_U5MODE.clearPDSEL0; inline;
  51401. begin
  51402. pTDefRegMap(@Self)^.clr := $00000002;
  51403. end;
  51404. procedure TUART5_U5MODE.setPDSEL0(thebits : TBits_1); inline;
  51405. begin
  51406. if thebits = 0 then
  51407. pTDefRegMap(@Self)^.clr := $00000002
  51408. else
  51409. pTDefRegMap(@Self)^.&set := $00000002;
  51410. end;
  51411. function TUART5_U5MODE.getPDSEL0 : TBits_1; inline;
  51412. begin
  51413. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51414. end;
  51415. procedure TUART5_U5MODE.setPDSEL1; inline;
  51416. begin
  51417. pTDefRegMap(@Self)^.&set := $00000004;
  51418. end;
  51419. procedure TUART5_U5MODE.clearPDSEL1; inline;
  51420. begin
  51421. pTDefRegMap(@Self)^.clr := $00000004;
  51422. end;
  51423. procedure TUART5_U5MODE.setPDSEL1(thebits : TBits_1); inline;
  51424. begin
  51425. if thebits = 0 then
  51426. pTDefRegMap(@Self)^.clr := $00000004
  51427. else
  51428. pTDefRegMap(@Self)^.&set := $00000004;
  51429. end;
  51430. function TUART5_U5MODE.getPDSEL1 : TBits_1; inline;
  51431. begin
  51432. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51433. end;
  51434. procedure TUART5_U5MODE.setUSIDL; inline;
  51435. begin
  51436. pTDefRegMap(@Self)^.&set := $00002000;
  51437. end;
  51438. procedure TUART5_U5MODE.clearUSIDL; inline;
  51439. begin
  51440. pTDefRegMap(@Self)^.clr := $00002000;
  51441. end;
  51442. procedure TUART5_U5MODE.setUSIDL(thebits : TBits_1); inline;
  51443. begin
  51444. if thebits = 0 then
  51445. pTDefRegMap(@Self)^.clr := $00002000
  51446. else
  51447. pTDefRegMap(@Self)^.&set := $00002000;
  51448. end;
  51449. function TUART5_U5MODE.getUSIDL : TBits_1; inline;
  51450. begin
  51451. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51452. end;
  51453. procedure TUART5_U5MODE.setUARTEN; inline;
  51454. begin
  51455. pTDefRegMap(@Self)^.&set := $00008000;
  51456. end;
  51457. procedure TUART5_U5MODE.clearUARTEN; inline;
  51458. begin
  51459. pTDefRegMap(@Self)^.clr := $00008000;
  51460. end;
  51461. procedure TUART5_U5MODE.setUARTEN(thebits : TBits_1); inline;
  51462. begin
  51463. if thebits = 0 then
  51464. pTDefRegMap(@Self)^.clr := $00008000
  51465. else
  51466. pTDefRegMap(@Self)^.&set := $00008000;
  51467. end;
  51468. function TUART5_U5MODE.getUARTEN : TBits_1; inline;
  51469. begin
  51470. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51471. end;
  51472. procedure TUART5_U5MODE.setw(thebits : TBits_32); inline;
  51473. begin
  51474. pTDefRegMap(@Self)^.val := thebits;
  51475. end;
  51476. function TUART5_U5MODE.getw : TBits_32; inline;
  51477. begin
  51478. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51479. end;
  51480. procedure TUART5_U3BSTA.setURXDA; inline;
  51481. begin
  51482. pTDefRegMap(@Self)^.&set := $00000001;
  51483. end;
  51484. procedure TUART5_U3BSTA.clearURXDA; inline;
  51485. begin
  51486. pTDefRegMap(@Self)^.clr := $00000001;
  51487. end;
  51488. procedure TUART5_U3BSTA.setURXDA(thebits : TBits_1); inline;
  51489. begin
  51490. if thebits = 0 then
  51491. pTDefRegMap(@Self)^.clr := $00000001
  51492. else
  51493. pTDefRegMap(@Self)^.&set := $00000001;
  51494. end;
  51495. function TUART5_U3BSTA.getURXDA : TBits_1; inline;
  51496. begin
  51497. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51498. end;
  51499. procedure TUART5_U3BSTA.setOERR; inline;
  51500. begin
  51501. pTDefRegMap(@Self)^.&set := $00000002;
  51502. end;
  51503. procedure TUART5_U3BSTA.clearOERR; inline;
  51504. begin
  51505. pTDefRegMap(@Self)^.clr := $00000002;
  51506. end;
  51507. procedure TUART5_U3BSTA.setOERR(thebits : TBits_1); inline;
  51508. begin
  51509. if thebits = 0 then
  51510. pTDefRegMap(@Self)^.clr := $00000002
  51511. else
  51512. pTDefRegMap(@Self)^.&set := $00000002;
  51513. end;
  51514. function TUART5_U3BSTA.getOERR : TBits_1; inline;
  51515. begin
  51516. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51517. end;
  51518. procedure TUART5_U3BSTA.setFERR; inline;
  51519. begin
  51520. pTDefRegMap(@Self)^.&set := $00000004;
  51521. end;
  51522. procedure TUART5_U3BSTA.clearFERR; inline;
  51523. begin
  51524. pTDefRegMap(@Self)^.clr := $00000004;
  51525. end;
  51526. procedure TUART5_U3BSTA.setFERR(thebits : TBits_1); inline;
  51527. begin
  51528. if thebits = 0 then
  51529. pTDefRegMap(@Self)^.clr := $00000004
  51530. else
  51531. pTDefRegMap(@Self)^.&set := $00000004;
  51532. end;
  51533. function TUART5_U3BSTA.getFERR : TBits_1; inline;
  51534. begin
  51535. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51536. end;
  51537. procedure TUART5_U3BSTA.setPERR; inline;
  51538. begin
  51539. pTDefRegMap(@Self)^.&set := $00000008;
  51540. end;
  51541. procedure TUART5_U3BSTA.clearPERR; inline;
  51542. begin
  51543. pTDefRegMap(@Self)^.clr := $00000008;
  51544. end;
  51545. procedure TUART5_U3BSTA.setPERR(thebits : TBits_1); inline;
  51546. begin
  51547. if thebits = 0 then
  51548. pTDefRegMap(@Self)^.clr := $00000008
  51549. else
  51550. pTDefRegMap(@Self)^.&set := $00000008;
  51551. end;
  51552. function TUART5_U3BSTA.getPERR : TBits_1; inline;
  51553. begin
  51554. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51555. end;
  51556. procedure TUART5_U3BSTA.setRIDLE; inline;
  51557. begin
  51558. pTDefRegMap(@Self)^.&set := $00000010;
  51559. end;
  51560. procedure TUART5_U3BSTA.clearRIDLE; inline;
  51561. begin
  51562. pTDefRegMap(@Self)^.clr := $00000010;
  51563. end;
  51564. procedure TUART5_U3BSTA.setRIDLE(thebits : TBits_1); inline;
  51565. begin
  51566. if thebits = 0 then
  51567. pTDefRegMap(@Self)^.clr := $00000010
  51568. else
  51569. pTDefRegMap(@Self)^.&set := $00000010;
  51570. end;
  51571. function TUART5_U3BSTA.getRIDLE : TBits_1; inline;
  51572. begin
  51573. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51574. end;
  51575. procedure TUART5_U3BSTA.setADDEN; inline;
  51576. begin
  51577. pTDefRegMap(@Self)^.&set := $00000020;
  51578. end;
  51579. procedure TUART5_U3BSTA.clearADDEN; inline;
  51580. begin
  51581. pTDefRegMap(@Self)^.clr := $00000020;
  51582. end;
  51583. procedure TUART5_U3BSTA.setADDEN(thebits : TBits_1); inline;
  51584. begin
  51585. if thebits = 0 then
  51586. pTDefRegMap(@Self)^.clr := $00000020
  51587. else
  51588. pTDefRegMap(@Self)^.&set := $00000020;
  51589. end;
  51590. function TUART5_U3BSTA.getADDEN : TBits_1; inline;
  51591. begin
  51592. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51593. end;
  51594. procedure TUART5_U3BSTA.setURXISEL(thebits : TBits_2); inline;
  51595. begin
  51596. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  51597. end;
  51598. function TUART5_U3BSTA.getURXISEL : TBits_2; inline;
  51599. begin
  51600. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  51601. end;
  51602. procedure TUART5_U3BSTA.setTRMT; inline;
  51603. begin
  51604. pTDefRegMap(@Self)^.&set := $00000100;
  51605. end;
  51606. procedure TUART5_U3BSTA.clearTRMT; inline;
  51607. begin
  51608. pTDefRegMap(@Self)^.clr := $00000100;
  51609. end;
  51610. procedure TUART5_U3BSTA.setTRMT(thebits : TBits_1); inline;
  51611. begin
  51612. if thebits = 0 then
  51613. pTDefRegMap(@Self)^.clr := $00000100
  51614. else
  51615. pTDefRegMap(@Self)^.&set := $00000100;
  51616. end;
  51617. function TUART5_U3BSTA.getTRMT : TBits_1; inline;
  51618. begin
  51619. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51620. end;
  51621. procedure TUART5_U3BSTA.setUTXBF; inline;
  51622. begin
  51623. pTDefRegMap(@Self)^.&set := $00000200;
  51624. end;
  51625. procedure TUART5_U3BSTA.clearUTXBF; inline;
  51626. begin
  51627. pTDefRegMap(@Self)^.clr := $00000200;
  51628. end;
  51629. procedure TUART5_U3BSTA.setUTXBF(thebits : TBits_1); inline;
  51630. begin
  51631. if thebits = 0 then
  51632. pTDefRegMap(@Self)^.clr := $00000200
  51633. else
  51634. pTDefRegMap(@Self)^.&set := $00000200;
  51635. end;
  51636. function TUART5_U3BSTA.getUTXBF : TBits_1; inline;
  51637. begin
  51638. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  51639. end;
  51640. procedure TUART5_U3BSTA.setUTXEN; inline;
  51641. begin
  51642. pTDefRegMap(@Self)^.&set := $00000400;
  51643. end;
  51644. procedure TUART5_U3BSTA.clearUTXEN; inline;
  51645. begin
  51646. pTDefRegMap(@Self)^.clr := $00000400;
  51647. end;
  51648. procedure TUART5_U3BSTA.setUTXEN(thebits : TBits_1); inline;
  51649. begin
  51650. if thebits = 0 then
  51651. pTDefRegMap(@Self)^.clr := $00000400
  51652. else
  51653. pTDefRegMap(@Self)^.&set := $00000400;
  51654. end;
  51655. function TUART5_U3BSTA.getUTXEN : TBits_1; inline;
  51656. begin
  51657. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51658. end;
  51659. procedure TUART5_U3BSTA.setUTXBRK; inline;
  51660. begin
  51661. pTDefRegMap(@Self)^.&set := $00000800;
  51662. end;
  51663. procedure TUART5_U3BSTA.clearUTXBRK; inline;
  51664. begin
  51665. pTDefRegMap(@Self)^.clr := $00000800;
  51666. end;
  51667. procedure TUART5_U3BSTA.setUTXBRK(thebits : TBits_1); inline;
  51668. begin
  51669. if thebits = 0 then
  51670. pTDefRegMap(@Self)^.clr := $00000800
  51671. else
  51672. pTDefRegMap(@Self)^.&set := $00000800;
  51673. end;
  51674. function TUART5_U3BSTA.getUTXBRK : TBits_1; inline;
  51675. begin
  51676. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  51677. end;
  51678. procedure TUART5_U3BSTA.setURXEN; inline;
  51679. begin
  51680. pTDefRegMap(@Self)^.&set := $00001000;
  51681. end;
  51682. procedure TUART5_U3BSTA.clearURXEN; inline;
  51683. begin
  51684. pTDefRegMap(@Self)^.clr := $00001000;
  51685. end;
  51686. procedure TUART5_U3BSTA.setURXEN(thebits : TBits_1); inline;
  51687. begin
  51688. if thebits = 0 then
  51689. pTDefRegMap(@Self)^.clr := $00001000
  51690. else
  51691. pTDefRegMap(@Self)^.&set := $00001000;
  51692. end;
  51693. function TUART5_U3BSTA.getURXEN : TBits_1; inline;
  51694. begin
  51695. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  51696. end;
  51697. procedure TUART5_U3BSTA.setUTXINV; inline;
  51698. begin
  51699. pTDefRegMap(@Self)^.&set := $00002000;
  51700. end;
  51701. procedure TUART5_U3BSTA.clearUTXINV; inline;
  51702. begin
  51703. pTDefRegMap(@Self)^.clr := $00002000;
  51704. end;
  51705. procedure TUART5_U3BSTA.setUTXINV(thebits : TBits_1); inline;
  51706. begin
  51707. if thebits = 0 then
  51708. pTDefRegMap(@Self)^.clr := $00002000
  51709. else
  51710. pTDefRegMap(@Self)^.&set := $00002000;
  51711. end;
  51712. function TUART5_U3BSTA.getUTXINV : TBits_1; inline;
  51713. begin
  51714. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51715. end;
  51716. procedure TUART5_U3BSTA.setUTXISEL(thebits : TBits_2); inline;
  51717. begin
  51718. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  51719. end;
  51720. function TUART5_U3BSTA.getUTXISEL : TBits_2; inline;
  51721. begin
  51722. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  51723. end;
  51724. procedure TUART5_U3BSTA.setADDR(thebits : TBits_8); inline;
  51725. begin
  51726. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  51727. end;
  51728. function TUART5_U3BSTA.getADDR : TBits_8; inline;
  51729. begin
  51730. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  51731. end;
  51732. procedure TUART5_U3BSTA.setADM_EN; inline;
  51733. begin
  51734. pTDefRegMap(@Self)^.&set := $01000000;
  51735. end;
  51736. procedure TUART5_U3BSTA.clearADM_EN; inline;
  51737. begin
  51738. pTDefRegMap(@Self)^.clr := $01000000;
  51739. end;
  51740. procedure TUART5_U3BSTA.setADM_EN(thebits : TBits_1); inline;
  51741. begin
  51742. if thebits = 0 then
  51743. pTDefRegMap(@Self)^.clr := $01000000
  51744. else
  51745. pTDefRegMap(@Self)^.&set := $01000000;
  51746. end;
  51747. function TUART5_U3BSTA.getADM_EN : TBits_1; inline;
  51748. begin
  51749. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  51750. end;
  51751. procedure TUART5_U3BSTA.setURXISEL0; inline;
  51752. begin
  51753. pTDefRegMap(@Self)^.&set := $00000040;
  51754. end;
  51755. procedure TUART5_U3BSTA.clearURXISEL0; inline;
  51756. begin
  51757. pTDefRegMap(@Self)^.clr := $00000040;
  51758. end;
  51759. procedure TUART5_U3BSTA.setURXISEL0(thebits : TBits_1); inline;
  51760. begin
  51761. if thebits = 0 then
  51762. pTDefRegMap(@Self)^.clr := $00000040
  51763. else
  51764. pTDefRegMap(@Self)^.&set := $00000040;
  51765. end;
  51766. function TUART5_U3BSTA.getURXISEL0 : TBits_1; inline;
  51767. begin
  51768. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51769. end;
  51770. procedure TUART5_U3BSTA.setURXISEL1; inline;
  51771. begin
  51772. pTDefRegMap(@Self)^.&set := $00000080;
  51773. end;
  51774. procedure TUART5_U3BSTA.clearURXISEL1; inline;
  51775. begin
  51776. pTDefRegMap(@Self)^.clr := $00000080;
  51777. end;
  51778. procedure TUART5_U3BSTA.setURXISEL1(thebits : TBits_1); inline;
  51779. begin
  51780. if thebits = 0 then
  51781. pTDefRegMap(@Self)^.clr := $00000080
  51782. else
  51783. pTDefRegMap(@Self)^.&set := $00000080;
  51784. end;
  51785. function TUART5_U3BSTA.getURXISEL1 : TBits_1; inline;
  51786. begin
  51787. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51788. end;
  51789. procedure TUART5_U3BSTA.setUTXISEL0; inline;
  51790. begin
  51791. pTDefRegMap(@Self)^.&set := $00004000;
  51792. end;
  51793. procedure TUART5_U3BSTA.clearUTXISEL0; inline;
  51794. begin
  51795. pTDefRegMap(@Self)^.clr := $00004000;
  51796. end;
  51797. procedure TUART5_U3BSTA.setUTXISEL0(thebits : TBits_1); inline;
  51798. begin
  51799. if thebits = 0 then
  51800. pTDefRegMap(@Self)^.clr := $00004000
  51801. else
  51802. pTDefRegMap(@Self)^.&set := $00004000;
  51803. end;
  51804. function TUART5_U3BSTA.getUTXISEL0 : TBits_1; inline;
  51805. begin
  51806. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  51807. end;
  51808. procedure TUART5_U3BSTA.setUTXISEL1; inline;
  51809. begin
  51810. pTDefRegMap(@Self)^.&set := $00008000;
  51811. end;
  51812. procedure TUART5_U3BSTA.clearUTXISEL1; inline;
  51813. begin
  51814. pTDefRegMap(@Self)^.clr := $00008000;
  51815. end;
  51816. procedure TUART5_U3BSTA.setUTXISEL1(thebits : TBits_1); inline;
  51817. begin
  51818. if thebits = 0 then
  51819. pTDefRegMap(@Self)^.clr := $00008000
  51820. else
  51821. pTDefRegMap(@Self)^.&set := $00008000;
  51822. end;
  51823. function TUART5_U3BSTA.getUTXISEL1 : TBits_1; inline;
  51824. begin
  51825. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51826. end;
  51827. procedure TUART5_U3BSTA.setUTXSEL(thebits : TBits_2); inline;
  51828. begin
  51829. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  51830. end;
  51831. function TUART5_U3BSTA.getUTXSEL : TBits_2; inline;
  51832. begin
  51833. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  51834. end;
  51835. procedure TUART5_U3BSTA.setw(thebits : TBits_32); inline;
  51836. begin
  51837. pTDefRegMap(@Self)^.val := thebits;
  51838. end;
  51839. function TUART5_U3BSTA.getw : TBits_32; inline;
  51840. begin
  51841. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51842. end;
  51843. procedure TUART5_U5STA.setURXDA; inline;
  51844. begin
  51845. pTDefRegMap(@Self)^.&set := $00000001;
  51846. end;
  51847. procedure TUART5_U5STA.clearURXDA; inline;
  51848. begin
  51849. pTDefRegMap(@Self)^.clr := $00000001;
  51850. end;
  51851. procedure TUART5_U5STA.setURXDA(thebits : TBits_1); inline;
  51852. begin
  51853. if thebits = 0 then
  51854. pTDefRegMap(@Self)^.clr := $00000001
  51855. else
  51856. pTDefRegMap(@Self)^.&set := $00000001;
  51857. end;
  51858. function TUART5_U5STA.getURXDA : TBits_1; inline;
  51859. begin
  51860. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51861. end;
  51862. procedure TUART5_U5STA.setOERR; inline;
  51863. begin
  51864. pTDefRegMap(@Self)^.&set := $00000002;
  51865. end;
  51866. procedure TUART5_U5STA.clearOERR; inline;
  51867. begin
  51868. pTDefRegMap(@Self)^.clr := $00000002;
  51869. end;
  51870. procedure TUART5_U5STA.setOERR(thebits : TBits_1); inline;
  51871. begin
  51872. if thebits = 0 then
  51873. pTDefRegMap(@Self)^.clr := $00000002
  51874. else
  51875. pTDefRegMap(@Self)^.&set := $00000002;
  51876. end;
  51877. function TUART5_U5STA.getOERR : TBits_1; inline;
  51878. begin
  51879. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51880. end;
  51881. procedure TUART5_U5STA.setFERR; inline;
  51882. begin
  51883. pTDefRegMap(@Self)^.&set := $00000004;
  51884. end;
  51885. procedure TUART5_U5STA.clearFERR; inline;
  51886. begin
  51887. pTDefRegMap(@Self)^.clr := $00000004;
  51888. end;
  51889. procedure TUART5_U5STA.setFERR(thebits : TBits_1); inline;
  51890. begin
  51891. if thebits = 0 then
  51892. pTDefRegMap(@Self)^.clr := $00000004
  51893. else
  51894. pTDefRegMap(@Self)^.&set := $00000004;
  51895. end;
  51896. function TUART5_U5STA.getFERR : TBits_1; inline;
  51897. begin
  51898. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51899. end;
  51900. procedure TUART5_U5STA.setPERR; inline;
  51901. begin
  51902. pTDefRegMap(@Self)^.&set := $00000008;
  51903. end;
  51904. procedure TUART5_U5STA.clearPERR; inline;
  51905. begin
  51906. pTDefRegMap(@Self)^.clr := $00000008;
  51907. end;
  51908. procedure TUART5_U5STA.setPERR(thebits : TBits_1); inline;
  51909. begin
  51910. if thebits = 0 then
  51911. pTDefRegMap(@Self)^.clr := $00000008
  51912. else
  51913. pTDefRegMap(@Self)^.&set := $00000008;
  51914. end;
  51915. function TUART5_U5STA.getPERR : TBits_1; inline;
  51916. begin
  51917. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51918. end;
  51919. procedure TUART5_U5STA.setRIDLE; inline;
  51920. begin
  51921. pTDefRegMap(@Self)^.&set := $00000010;
  51922. end;
  51923. procedure TUART5_U5STA.clearRIDLE; inline;
  51924. begin
  51925. pTDefRegMap(@Self)^.clr := $00000010;
  51926. end;
  51927. procedure TUART5_U5STA.setRIDLE(thebits : TBits_1); inline;
  51928. begin
  51929. if thebits = 0 then
  51930. pTDefRegMap(@Self)^.clr := $00000010
  51931. else
  51932. pTDefRegMap(@Self)^.&set := $00000010;
  51933. end;
  51934. function TUART5_U5STA.getRIDLE : TBits_1; inline;
  51935. begin
  51936. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51937. end;
  51938. procedure TUART5_U5STA.setADDEN; inline;
  51939. begin
  51940. pTDefRegMap(@Self)^.&set := $00000020;
  51941. end;
  51942. procedure TUART5_U5STA.clearADDEN; inline;
  51943. begin
  51944. pTDefRegMap(@Self)^.clr := $00000020;
  51945. end;
  51946. procedure TUART5_U5STA.setADDEN(thebits : TBits_1); inline;
  51947. begin
  51948. if thebits = 0 then
  51949. pTDefRegMap(@Self)^.clr := $00000020
  51950. else
  51951. pTDefRegMap(@Self)^.&set := $00000020;
  51952. end;
  51953. function TUART5_U5STA.getADDEN : TBits_1; inline;
  51954. begin
  51955. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51956. end;
  51957. procedure TUART5_U5STA.setURXISEL(thebits : TBits_2); inline;
  51958. begin
  51959. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  51960. end;
  51961. function TUART5_U5STA.getURXISEL : TBits_2; inline;
  51962. begin
  51963. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  51964. end;
  51965. procedure TUART5_U5STA.setTRMT; inline;
  51966. begin
  51967. pTDefRegMap(@Self)^.&set := $00000100;
  51968. end;
  51969. procedure TUART5_U5STA.clearTRMT; inline;
  51970. begin
  51971. pTDefRegMap(@Self)^.clr := $00000100;
  51972. end;
  51973. procedure TUART5_U5STA.setTRMT(thebits : TBits_1); inline;
  51974. begin
  51975. if thebits = 0 then
  51976. pTDefRegMap(@Self)^.clr := $00000100
  51977. else
  51978. pTDefRegMap(@Self)^.&set := $00000100;
  51979. end;
  51980. function TUART5_U5STA.getTRMT : TBits_1; inline;
  51981. begin
  51982. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51983. end;
  51984. procedure TUART5_U5STA.setUTXBF; inline;
  51985. begin
  51986. pTDefRegMap(@Self)^.&set := $00000200;
  51987. end;
  51988. procedure TUART5_U5STA.clearUTXBF; inline;
  51989. begin
  51990. pTDefRegMap(@Self)^.clr := $00000200;
  51991. end;
  51992. procedure TUART5_U5STA.setUTXBF(thebits : TBits_1); inline;
  51993. begin
  51994. if thebits = 0 then
  51995. pTDefRegMap(@Self)^.clr := $00000200
  51996. else
  51997. pTDefRegMap(@Self)^.&set := $00000200;
  51998. end;
  51999. function TUART5_U5STA.getUTXBF : TBits_1; inline;
  52000. begin
  52001. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  52002. end;
  52003. procedure TUART5_U5STA.setUTXEN; inline;
  52004. begin
  52005. pTDefRegMap(@Self)^.&set := $00000400;
  52006. end;
  52007. procedure TUART5_U5STA.clearUTXEN; inline;
  52008. begin
  52009. pTDefRegMap(@Self)^.clr := $00000400;
  52010. end;
  52011. procedure TUART5_U5STA.setUTXEN(thebits : TBits_1); inline;
  52012. begin
  52013. if thebits = 0 then
  52014. pTDefRegMap(@Self)^.clr := $00000400
  52015. else
  52016. pTDefRegMap(@Self)^.&set := $00000400;
  52017. end;
  52018. function TUART5_U5STA.getUTXEN : TBits_1; inline;
  52019. begin
  52020. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  52021. end;
  52022. procedure TUART5_U5STA.setUTXBRK; inline;
  52023. begin
  52024. pTDefRegMap(@Self)^.&set := $00000800;
  52025. end;
  52026. procedure TUART5_U5STA.clearUTXBRK; inline;
  52027. begin
  52028. pTDefRegMap(@Self)^.clr := $00000800;
  52029. end;
  52030. procedure TUART5_U5STA.setUTXBRK(thebits : TBits_1); inline;
  52031. begin
  52032. if thebits = 0 then
  52033. pTDefRegMap(@Self)^.clr := $00000800
  52034. else
  52035. pTDefRegMap(@Self)^.&set := $00000800;
  52036. end;
  52037. function TUART5_U5STA.getUTXBRK : TBits_1; inline;
  52038. begin
  52039. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52040. end;
  52041. procedure TUART5_U5STA.setURXEN; inline;
  52042. begin
  52043. pTDefRegMap(@Self)^.&set := $00001000;
  52044. end;
  52045. procedure TUART5_U5STA.clearURXEN; inline;
  52046. begin
  52047. pTDefRegMap(@Self)^.clr := $00001000;
  52048. end;
  52049. procedure TUART5_U5STA.setURXEN(thebits : TBits_1); inline;
  52050. begin
  52051. if thebits = 0 then
  52052. pTDefRegMap(@Self)^.clr := $00001000
  52053. else
  52054. pTDefRegMap(@Self)^.&set := $00001000;
  52055. end;
  52056. function TUART5_U5STA.getURXEN : TBits_1; inline;
  52057. begin
  52058. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52059. end;
  52060. procedure TUART5_U5STA.setUTXINV; inline;
  52061. begin
  52062. pTDefRegMap(@Self)^.&set := $00002000;
  52063. end;
  52064. procedure TUART5_U5STA.clearUTXINV; inline;
  52065. begin
  52066. pTDefRegMap(@Self)^.clr := $00002000;
  52067. end;
  52068. procedure TUART5_U5STA.setUTXINV(thebits : TBits_1); inline;
  52069. begin
  52070. if thebits = 0 then
  52071. pTDefRegMap(@Self)^.clr := $00002000
  52072. else
  52073. pTDefRegMap(@Self)^.&set := $00002000;
  52074. end;
  52075. function TUART5_U5STA.getUTXINV : TBits_1; inline;
  52076. begin
  52077. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  52078. end;
  52079. procedure TUART5_U5STA.setUTXISEL(thebits : TBits_2); inline;
  52080. begin
  52081. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  52082. end;
  52083. function TUART5_U5STA.getUTXISEL : TBits_2; inline;
  52084. begin
  52085. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  52086. end;
  52087. procedure TUART5_U5STA.setADDR(thebits : TBits_8); inline;
  52088. begin
  52089. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  52090. end;
  52091. function TUART5_U5STA.getADDR : TBits_8; inline;
  52092. begin
  52093. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  52094. end;
  52095. procedure TUART5_U5STA.setADM_EN; inline;
  52096. begin
  52097. pTDefRegMap(@Self)^.&set := $01000000;
  52098. end;
  52099. procedure TUART5_U5STA.clearADM_EN; inline;
  52100. begin
  52101. pTDefRegMap(@Self)^.clr := $01000000;
  52102. end;
  52103. procedure TUART5_U5STA.setADM_EN(thebits : TBits_1); inline;
  52104. begin
  52105. if thebits = 0 then
  52106. pTDefRegMap(@Self)^.clr := $01000000
  52107. else
  52108. pTDefRegMap(@Self)^.&set := $01000000;
  52109. end;
  52110. function TUART5_U5STA.getADM_EN : TBits_1; inline;
  52111. begin
  52112. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  52113. end;
  52114. procedure TUART5_U5STA.setURXISEL0; inline;
  52115. begin
  52116. pTDefRegMap(@Self)^.&set := $00000040;
  52117. end;
  52118. procedure TUART5_U5STA.clearURXISEL0; inline;
  52119. begin
  52120. pTDefRegMap(@Self)^.clr := $00000040;
  52121. end;
  52122. procedure TUART5_U5STA.setURXISEL0(thebits : TBits_1); inline;
  52123. begin
  52124. if thebits = 0 then
  52125. pTDefRegMap(@Self)^.clr := $00000040
  52126. else
  52127. pTDefRegMap(@Self)^.&set := $00000040;
  52128. end;
  52129. function TUART5_U5STA.getURXISEL0 : TBits_1; inline;
  52130. begin
  52131. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52132. end;
  52133. procedure TUART5_U5STA.setURXISEL1; inline;
  52134. begin
  52135. pTDefRegMap(@Self)^.&set := $00000080;
  52136. end;
  52137. procedure TUART5_U5STA.clearURXISEL1; inline;
  52138. begin
  52139. pTDefRegMap(@Self)^.clr := $00000080;
  52140. end;
  52141. procedure TUART5_U5STA.setURXISEL1(thebits : TBits_1); inline;
  52142. begin
  52143. if thebits = 0 then
  52144. pTDefRegMap(@Self)^.clr := $00000080
  52145. else
  52146. pTDefRegMap(@Self)^.&set := $00000080;
  52147. end;
  52148. function TUART5_U5STA.getURXISEL1 : TBits_1; inline;
  52149. begin
  52150. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52151. end;
  52152. procedure TUART5_U5STA.setUTXISEL0; inline;
  52153. begin
  52154. pTDefRegMap(@Self)^.&set := $00004000;
  52155. end;
  52156. procedure TUART5_U5STA.clearUTXISEL0; inline;
  52157. begin
  52158. pTDefRegMap(@Self)^.clr := $00004000;
  52159. end;
  52160. procedure TUART5_U5STA.setUTXISEL0(thebits : TBits_1); inline;
  52161. begin
  52162. if thebits = 0 then
  52163. pTDefRegMap(@Self)^.clr := $00004000
  52164. else
  52165. pTDefRegMap(@Self)^.&set := $00004000;
  52166. end;
  52167. function TUART5_U5STA.getUTXISEL0 : TBits_1; inline;
  52168. begin
  52169. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  52170. end;
  52171. procedure TUART5_U5STA.setUTXISEL1; inline;
  52172. begin
  52173. pTDefRegMap(@Self)^.&set := $00008000;
  52174. end;
  52175. procedure TUART5_U5STA.clearUTXISEL1; inline;
  52176. begin
  52177. pTDefRegMap(@Self)^.clr := $00008000;
  52178. end;
  52179. procedure TUART5_U5STA.setUTXISEL1(thebits : TBits_1); inline;
  52180. begin
  52181. if thebits = 0 then
  52182. pTDefRegMap(@Self)^.clr := $00008000
  52183. else
  52184. pTDefRegMap(@Self)^.&set := $00008000;
  52185. end;
  52186. function TUART5_U5STA.getUTXISEL1 : TBits_1; inline;
  52187. begin
  52188. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52189. end;
  52190. procedure TUART5_U5STA.setUTXSEL(thebits : TBits_2); inline;
  52191. begin
  52192. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  52193. end;
  52194. function TUART5_U5STA.getUTXSEL : TBits_2; inline;
  52195. begin
  52196. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  52197. end;
  52198. procedure TUART5_U5STA.setw(thebits : TBits_32); inline;
  52199. begin
  52200. pTDefRegMap(@Self)^.val := thebits;
  52201. end;
  52202. function TUART5_U5STA.getw : TBits_32; inline;
  52203. begin
  52204. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52205. end;
  52206. procedure TPMP_PMCON.setRDSP; inline;
  52207. begin
  52208. pTDefRegMap(@Self)^.&set := $00000001;
  52209. end;
  52210. procedure TPMP_PMCON.clearRDSP; inline;
  52211. begin
  52212. pTDefRegMap(@Self)^.clr := $00000001;
  52213. end;
  52214. procedure TPMP_PMCON.setRDSP(thebits : TBits_1); inline;
  52215. begin
  52216. if thebits = 0 then
  52217. pTDefRegMap(@Self)^.clr := $00000001
  52218. else
  52219. pTDefRegMap(@Self)^.&set := $00000001;
  52220. end;
  52221. function TPMP_PMCON.getRDSP : TBits_1; inline;
  52222. begin
  52223. getRDSP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52224. end;
  52225. procedure TPMP_PMCON.setWRSP; inline;
  52226. begin
  52227. pTDefRegMap(@Self)^.&set := $00000002;
  52228. end;
  52229. procedure TPMP_PMCON.clearWRSP; inline;
  52230. begin
  52231. pTDefRegMap(@Self)^.clr := $00000002;
  52232. end;
  52233. procedure TPMP_PMCON.setWRSP(thebits : TBits_1); inline;
  52234. begin
  52235. if thebits = 0 then
  52236. pTDefRegMap(@Self)^.clr := $00000002
  52237. else
  52238. pTDefRegMap(@Self)^.&set := $00000002;
  52239. end;
  52240. function TPMP_PMCON.getWRSP : TBits_1; inline;
  52241. begin
  52242. getWRSP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52243. end;
  52244. procedure TPMP_PMCON.setCS1P; inline;
  52245. begin
  52246. pTDefRegMap(@Self)^.&set := $00000008;
  52247. end;
  52248. procedure TPMP_PMCON.clearCS1P; inline;
  52249. begin
  52250. pTDefRegMap(@Self)^.clr := $00000008;
  52251. end;
  52252. procedure TPMP_PMCON.setCS1P(thebits : TBits_1); inline;
  52253. begin
  52254. if thebits = 0 then
  52255. pTDefRegMap(@Self)^.clr := $00000008
  52256. else
  52257. pTDefRegMap(@Self)^.&set := $00000008;
  52258. end;
  52259. function TPMP_PMCON.getCS1P : TBits_1; inline;
  52260. begin
  52261. getCS1P := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52262. end;
  52263. procedure TPMP_PMCON.setCS2P; inline;
  52264. begin
  52265. pTDefRegMap(@Self)^.&set := $00000010;
  52266. end;
  52267. procedure TPMP_PMCON.clearCS2P; inline;
  52268. begin
  52269. pTDefRegMap(@Self)^.clr := $00000010;
  52270. end;
  52271. procedure TPMP_PMCON.setCS2P(thebits : TBits_1); inline;
  52272. begin
  52273. if thebits = 0 then
  52274. pTDefRegMap(@Self)^.clr := $00000010
  52275. else
  52276. pTDefRegMap(@Self)^.&set := $00000010;
  52277. end;
  52278. function TPMP_PMCON.getCS2P : TBits_1; inline;
  52279. begin
  52280. getCS2P := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52281. end;
  52282. procedure TPMP_PMCON.setALP; inline;
  52283. begin
  52284. pTDefRegMap(@Self)^.&set := $00000020;
  52285. end;
  52286. procedure TPMP_PMCON.clearALP; inline;
  52287. begin
  52288. pTDefRegMap(@Self)^.clr := $00000020;
  52289. end;
  52290. procedure TPMP_PMCON.setALP(thebits : TBits_1); inline;
  52291. begin
  52292. if thebits = 0 then
  52293. pTDefRegMap(@Self)^.clr := $00000020
  52294. else
  52295. pTDefRegMap(@Self)^.&set := $00000020;
  52296. end;
  52297. function TPMP_PMCON.getALP : TBits_1; inline;
  52298. begin
  52299. getALP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52300. end;
  52301. procedure TPMP_PMCON.setCSF(thebits : TBits_2); inline;
  52302. begin
  52303. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  52304. end;
  52305. function TPMP_PMCON.getCSF : TBits_2; inline;
  52306. begin
  52307. getCSF := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  52308. end;
  52309. procedure TPMP_PMCON.setPTRDEN; inline;
  52310. begin
  52311. pTDefRegMap(@Self)^.&set := $00000100;
  52312. end;
  52313. procedure TPMP_PMCON.clearPTRDEN; inline;
  52314. begin
  52315. pTDefRegMap(@Self)^.clr := $00000100;
  52316. end;
  52317. procedure TPMP_PMCON.setPTRDEN(thebits : TBits_1); inline;
  52318. begin
  52319. if thebits = 0 then
  52320. pTDefRegMap(@Self)^.clr := $00000100
  52321. else
  52322. pTDefRegMap(@Self)^.&set := $00000100;
  52323. end;
  52324. function TPMP_PMCON.getPTRDEN : TBits_1; inline;
  52325. begin
  52326. getPTRDEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52327. end;
  52328. procedure TPMP_PMCON.setPTWREN; inline;
  52329. begin
  52330. pTDefRegMap(@Self)^.&set := $00000200;
  52331. end;
  52332. procedure TPMP_PMCON.clearPTWREN; inline;
  52333. begin
  52334. pTDefRegMap(@Self)^.clr := $00000200;
  52335. end;
  52336. procedure TPMP_PMCON.setPTWREN(thebits : TBits_1); inline;
  52337. begin
  52338. if thebits = 0 then
  52339. pTDefRegMap(@Self)^.clr := $00000200
  52340. else
  52341. pTDefRegMap(@Self)^.&set := $00000200;
  52342. end;
  52343. function TPMP_PMCON.getPTWREN : TBits_1; inline;
  52344. begin
  52345. getPTWREN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  52346. end;
  52347. procedure TPMP_PMCON.setPMPTTL; inline;
  52348. begin
  52349. pTDefRegMap(@Self)^.&set := $00000400;
  52350. end;
  52351. procedure TPMP_PMCON.clearPMPTTL; inline;
  52352. begin
  52353. pTDefRegMap(@Self)^.clr := $00000400;
  52354. end;
  52355. procedure TPMP_PMCON.setPMPTTL(thebits : TBits_1); inline;
  52356. begin
  52357. if thebits = 0 then
  52358. pTDefRegMap(@Self)^.clr := $00000400
  52359. else
  52360. pTDefRegMap(@Self)^.&set := $00000400;
  52361. end;
  52362. function TPMP_PMCON.getPMPTTL : TBits_1; inline;
  52363. begin
  52364. getPMPTTL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  52365. end;
  52366. procedure TPMP_PMCON.setADRMUX(thebits : TBits_2); inline;
  52367. begin
  52368. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  52369. end;
  52370. function TPMP_PMCON.getADRMUX : TBits_2; inline;
  52371. begin
  52372. getADRMUX := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  52373. end;
  52374. procedure TPMP_PMCON.setSIDL; inline;
  52375. begin
  52376. pTDefRegMap(@Self)^.&set := $00002000;
  52377. end;
  52378. procedure TPMP_PMCON.clearSIDL; inline;
  52379. begin
  52380. pTDefRegMap(@Self)^.clr := $00002000;
  52381. end;
  52382. procedure TPMP_PMCON.setSIDL(thebits : TBits_1); inline;
  52383. begin
  52384. if thebits = 0 then
  52385. pTDefRegMap(@Self)^.clr := $00002000
  52386. else
  52387. pTDefRegMap(@Self)^.&set := $00002000;
  52388. end;
  52389. function TPMP_PMCON.getSIDL : TBits_1; inline;
  52390. begin
  52391. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  52392. end;
  52393. procedure TPMP_PMCON.setON; inline;
  52394. begin
  52395. pTDefRegMap(@Self)^.&set := $00008000;
  52396. end;
  52397. procedure TPMP_PMCON.clearON; inline;
  52398. begin
  52399. pTDefRegMap(@Self)^.clr := $00008000;
  52400. end;
  52401. procedure TPMP_PMCON.setON(thebits : TBits_1); inline;
  52402. begin
  52403. if thebits = 0 then
  52404. pTDefRegMap(@Self)^.clr := $00008000
  52405. else
  52406. pTDefRegMap(@Self)^.&set := $00008000;
  52407. end;
  52408. function TPMP_PMCON.getON : TBits_1; inline;
  52409. begin
  52410. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52411. end;
  52412. procedure TPMP_PMCON.setCSF0; inline;
  52413. begin
  52414. pTDefRegMap(@Self)^.&set := $00000040;
  52415. end;
  52416. procedure TPMP_PMCON.clearCSF0; inline;
  52417. begin
  52418. pTDefRegMap(@Self)^.clr := $00000040;
  52419. end;
  52420. procedure TPMP_PMCON.setCSF0(thebits : TBits_1); inline;
  52421. begin
  52422. if thebits = 0 then
  52423. pTDefRegMap(@Self)^.clr := $00000040
  52424. else
  52425. pTDefRegMap(@Self)^.&set := $00000040;
  52426. end;
  52427. function TPMP_PMCON.getCSF0 : TBits_1; inline;
  52428. begin
  52429. getCSF0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52430. end;
  52431. procedure TPMP_PMCON.setCSF1; inline;
  52432. begin
  52433. pTDefRegMap(@Self)^.&set := $00000080;
  52434. end;
  52435. procedure TPMP_PMCON.clearCSF1; inline;
  52436. begin
  52437. pTDefRegMap(@Self)^.clr := $00000080;
  52438. end;
  52439. procedure TPMP_PMCON.setCSF1(thebits : TBits_1); inline;
  52440. begin
  52441. if thebits = 0 then
  52442. pTDefRegMap(@Self)^.clr := $00000080
  52443. else
  52444. pTDefRegMap(@Self)^.&set := $00000080;
  52445. end;
  52446. function TPMP_PMCON.getCSF1 : TBits_1; inline;
  52447. begin
  52448. getCSF1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52449. end;
  52450. procedure TPMP_PMCON.setADRMUX0; inline;
  52451. begin
  52452. pTDefRegMap(@Self)^.&set := $00000800;
  52453. end;
  52454. procedure TPMP_PMCON.clearADRMUX0; inline;
  52455. begin
  52456. pTDefRegMap(@Self)^.clr := $00000800;
  52457. end;
  52458. procedure TPMP_PMCON.setADRMUX0(thebits : TBits_1); inline;
  52459. begin
  52460. if thebits = 0 then
  52461. pTDefRegMap(@Self)^.clr := $00000800
  52462. else
  52463. pTDefRegMap(@Self)^.&set := $00000800;
  52464. end;
  52465. function TPMP_PMCON.getADRMUX0 : TBits_1; inline;
  52466. begin
  52467. getADRMUX0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52468. end;
  52469. procedure TPMP_PMCON.setADRMUX1; inline;
  52470. begin
  52471. pTDefRegMap(@Self)^.&set := $00001000;
  52472. end;
  52473. procedure TPMP_PMCON.clearADRMUX1; inline;
  52474. begin
  52475. pTDefRegMap(@Self)^.clr := $00001000;
  52476. end;
  52477. procedure TPMP_PMCON.setADRMUX1(thebits : TBits_1); inline;
  52478. begin
  52479. if thebits = 0 then
  52480. pTDefRegMap(@Self)^.clr := $00001000
  52481. else
  52482. pTDefRegMap(@Self)^.&set := $00001000;
  52483. end;
  52484. function TPMP_PMCON.getADRMUX1 : TBits_1; inline;
  52485. begin
  52486. getADRMUX1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52487. end;
  52488. procedure TPMP_PMCON.setPSIDL; inline;
  52489. begin
  52490. pTDefRegMap(@Self)^.&set := $00002000;
  52491. end;
  52492. procedure TPMP_PMCON.clearPSIDL; inline;
  52493. begin
  52494. pTDefRegMap(@Self)^.clr := $00002000;
  52495. end;
  52496. procedure TPMP_PMCON.setPSIDL(thebits : TBits_1); inline;
  52497. begin
  52498. if thebits = 0 then
  52499. pTDefRegMap(@Self)^.clr := $00002000
  52500. else
  52501. pTDefRegMap(@Self)^.&set := $00002000;
  52502. end;
  52503. function TPMP_PMCON.getPSIDL : TBits_1; inline;
  52504. begin
  52505. getPSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  52506. end;
  52507. procedure TPMP_PMCON.setPMPEN; inline;
  52508. begin
  52509. pTDefRegMap(@Self)^.&set := $00008000;
  52510. end;
  52511. procedure TPMP_PMCON.clearPMPEN; inline;
  52512. begin
  52513. pTDefRegMap(@Self)^.clr := $00008000;
  52514. end;
  52515. procedure TPMP_PMCON.setPMPEN(thebits : TBits_1); inline;
  52516. begin
  52517. if thebits = 0 then
  52518. pTDefRegMap(@Self)^.clr := $00008000
  52519. else
  52520. pTDefRegMap(@Self)^.&set := $00008000;
  52521. end;
  52522. function TPMP_PMCON.getPMPEN : TBits_1; inline;
  52523. begin
  52524. getPMPEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52525. end;
  52526. procedure TPMP_PMCON.setw(thebits : TBits_32); inline;
  52527. begin
  52528. pTDefRegMap(@Self)^.val := thebits;
  52529. end;
  52530. function TPMP_PMCON.getw : TBits_32; inline;
  52531. begin
  52532. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52533. end;
  52534. procedure TPMP_PMMODE.setWAITE(thebits : TBits_2); inline;
  52535. begin
  52536. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52537. end;
  52538. function TPMP_PMMODE.getWAITE : TBits_2; inline;
  52539. begin
  52540. getWAITE := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52541. end;
  52542. procedure TPMP_PMMODE.setWAITM(thebits : TBits_4); inline;
  52543. begin
  52544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  52545. end;
  52546. function TPMP_PMMODE.getWAITM : TBits_4; inline;
  52547. begin
  52548. getWAITM := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  52549. end;
  52550. procedure TPMP_PMMODE.setWAITB(thebits : TBits_2); inline;
  52551. begin
  52552. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  52553. end;
  52554. function TPMP_PMMODE.getWAITB : TBits_2; inline;
  52555. begin
  52556. getWAITB := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  52557. end;
  52558. procedure TPMP_PMMODE.setMODE(thebits : TBits_2); inline;
  52559. begin
  52560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  52561. end;
  52562. function TPMP_PMMODE.getMODE : TBits_2; inline;
  52563. begin
  52564. getMODE := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  52565. end;
  52566. procedure TPMP_PMMODE.setMODE16; inline;
  52567. begin
  52568. pTDefRegMap(@Self)^.&set := $00000400;
  52569. end;
  52570. procedure TPMP_PMMODE.clearMODE16; inline;
  52571. begin
  52572. pTDefRegMap(@Self)^.clr := $00000400;
  52573. end;
  52574. procedure TPMP_PMMODE.setMODE16(thebits : TBits_1); inline;
  52575. begin
  52576. if thebits = 0 then
  52577. pTDefRegMap(@Self)^.clr := $00000400
  52578. else
  52579. pTDefRegMap(@Self)^.&set := $00000400;
  52580. end;
  52581. function TPMP_PMMODE.getMODE16 : TBits_1; inline;
  52582. begin
  52583. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  52584. end;
  52585. procedure TPMP_PMMODE.setINCM(thebits : TBits_2); inline;
  52586. begin
  52587. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  52588. end;
  52589. function TPMP_PMMODE.getINCM : TBits_2; inline;
  52590. begin
  52591. getINCM := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  52592. end;
  52593. procedure TPMP_PMMODE.setIRQM(thebits : TBits_2); inline;
  52594. begin
  52595. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  52596. end;
  52597. function TPMP_PMMODE.getIRQM : TBits_2; inline;
  52598. begin
  52599. getIRQM := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  52600. end;
  52601. procedure TPMP_PMMODE.setBUSY; inline;
  52602. begin
  52603. pTDefRegMap(@Self)^.&set := $00008000;
  52604. end;
  52605. procedure TPMP_PMMODE.clearBUSY; inline;
  52606. begin
  52607. pTDefRegMap(@Self)^.clr := $00008000;
  52608. end;
  52609. procedure TPMP_PMMODE.setBUSY(thebits : TBits_1); inline;
  52610. begin
  52611. if thebits = 0 then
  52612. pTDefRegMap(@Self)^.clr := $00008000
  52613. else
  52614. pTDefRegMap(@Self)^.&set := $00008000;
  52615. end;
  52616. function TPMP_PMMODE.getBUSY : TBits_1; inline;
  52617. begin
  52618. getBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52619. end;
  52620. procedure TPMP_PMMODE.setWAITE0; inline;
  52621. begin
  52622. pTDefRegMap(@Self)^.&set := $00000001;
  52623. end;
  52624. procedure TPMP_PMMODE.clearWAITE0; inline;
  52625. begin
  52626. pTDefRegMap(@Self)^.clr := $00000001;
  52627. end;
  52628. procedure TPMP_PMMODE.setWAITE0(thebits : TBits_1); inline;
  52629. begin
  52630. if thebits = 0 then
  52631. pTDefRegMap(@Self)^.clr := $00000001
  52632. else
  52633. pTDefRegMap(@Self)^.&set := $00000001;
  52634. end;
  52635. function TPMP_PMMODE.getWAITE0 : TBits_1; inline;
  52636. begin
  52637. getWAITE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52638. end;
  52639. procedure TPMP_PMMODE.setWAITE1; inline;
  52640. begin
  52641. pTDefRegMap(@Self)^.&set := $00000002;
  52642. end;
  52643. procedure TPMP_PMMODE.clearWAITE1; inline;
  52644. begin
  52645. pTDefRegMap(@Self)^.clr := $00000002;
  52646. end;
  52647. procedure TPMP_PMMODE.setWAITE1(thebits : TBits_1); inline;
  52648. begin
  52649. if thebits = 0 then
  52650. pTDefRegMap(@Self)^.clr := $00000002
  52651. else
  52652. pTDefRegMap(@Self)^.&set := $00000002;
  52653. end;
  52654. function TPMP_PMMODE.getWAITE1 : TBits_1; inline;
  52655. begin
  52656. getWAITE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52657. end;
  52658. procedure TPMP_PMMODE.setWAITM0; inline;
  52659. begin
  52660. pTDefRegMap(@Self)^.&set := $00000004;
  52661. end;
  52662. procedure TPMP_PMMODE.clearWAITM0; inline;
  52663. begin
  52664. pTDefRegMap(@Self)^.clr := $00000004;
  52665. end;
  52666. procedure TPMP_PMMODE.setWAITM0(thebits : TBits_1); inline;
  52667. begin
  52668. if thebits = 0 then
  52669. pTDefRegMap(@Self)^.clr := $00000004
  52670. else
  52671. pTDefRegMap(@Self)^.&set := $00000004;
  52672. end;
  52673. function TPMP_PMMODE.getWAITM0 : TBits_1; inline;
  52674. begin
  52675. getWAITM0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52676. end;
  52677. procedure TPMP_PMMODE.setWAITM1; inline;
  52678. begin
  52679. pTDefRegMap(@Self)^.&set := $00000008;
  52680. end;
  52681. procedure TPMP_PMMODE.clearWAITM1; inline;
  52682. begin
  52683. pTDefRegMap(@Self)^.clr := $00000008;
  52684. end;
  52685. procedure TPMP_PMMODE.setWAITM1(thebits : TBits_1); inline;
  52686. begin
  52687. if thebits = 0 then
  52688. pTDefRegMap(@Self)^.clr := $00000008
  52689. else
  52690. pTDefRegMap(@Self)^.&set := $00000008;
  52691. end;
  52692. function TPMP_PMMODE.getWAITM1 : TBits_1; inline;
  52693. begin
  52694. getWAITM1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52695. end;
  52696. procedure TPMP_PMMODE.setWAITM2; inline;
  52697. begin
  52698. pTDefRegMap(@Self)^.&set := $00000010;
  52699. end;
  52700. procedure TPMP_PMMODE.clearWAITM2; inline;
  52701. begin
  52702. pTDefRegMap(@Self)^.clr := $00000010;
  52703. end;
  52704. procedure TPMP_PMMODE.setWAITM2(thebits : TBits_1); inline;
  52705. begin
  52706. if thebits = 0 then
  52707. pTDefRegMap(@Self)^.clr := $00000010
  52708. else
  52709. pTDefRegMap(@Self)^.&set := $00000010;
  52710. end;
  52711. function TPMP_PMMODE.getWAITM2 : TBits_1; inline;
  52712. begin
  52713. getWAITM2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52714. end;
  52715. procedure TPMP_PMMODE.setWAITM3; inline;
  52716. begin
  52717. pTDefRegMap(@Self)^.&set := $00000020;
  52718. end;
  52719. procedure TPMP_PMMODE.clearWAITM3; inline;
  52720. begin
  52721. pTDefRegMap(@Self)^.clr := $00000020;
  52722. end;
  52723. procedure TPMP_PMMODE.setWAITM3(thebits : TBits_1); inline;
  52724. begin
  52725. if thebits = 0 then
  52726. pTDefRegMap(@Self)^.clr := $00000020
  52727. else
  52728. pTDefRegMap(@Self)^.&set := $00000020;
  52729. end;
  52730. function TPMP_PMMODE.getWAITM3 : TBits_1; inline;
  52731. begin
  52732. getWAITM3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52733. end;
  52734. procedure TPMP_PMMODE.setWAITB0; inline;
  52735. begin
  52736. pTDefRegMap(@Self)^.&set := $00000040;
  52737. end;
  52738. procedure TPMP_PMMODE.clearWAITB0; inline;
  52739. begin
  52740. pTDefRegMap(@Self)^.clr := $00000040;
  52741. end;
  52742. procedure TPMP_PMMODE.setWAITB0(thebits : TBits_1); inline;
  52743. begin
  52744. if thebits = 0 then
  52745. pTDefRegMap(@Self)^.clr := $00000040
  52746. else
  52747. pTDefRegMap(@Self)^.&set := $00000040;
  52748. end;
  52749. function TPMP_PMMODE.getWAITB0 : TBits_1; inline;
  52750. begin
  52751. getWAITB0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52752. end;
  52753. procedure TPMP_PMMODE.setWAITB1; inline;
  52754. begin
  52755. pTDefRegMap(@Self)^.&set := $00000080;
  52756. end;
  52757. procedure TPMP_PMMODE.clearWAITB1; inline;
  52758. begin
  52759. pTDefRegMap(@Self)^.clr := $00000080;
  52760. end;
  52761. procedure TPMP_PMMODE.setWAITB1(thebits : TBits_1); inline;
  52762. begin
  52763. if thebits = 0 then
  52764. pTDefRegMap(@Self)^.clr := $00000080
  52765. else
  52766. pTDefRegMap(@Self)^.&set := $00000080;
  52767. end;
  52768. function TPMP_PMMODE.getWAITB1 : TBits_1; inline;
  52769. begin
  52770. getWAITB1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52771. end;
  52772. procedure TPMP_PMMODE.setMODE0; inline;
  52773. begin
  52774. pTDefRegMap(@Self)^.&set := $00000100;
  52775. end;
  52776. procedure TPMP_PMMODE.clearMODE0; inline;
  52777. begin
  52778. pTDefRegMap(@Self)^.clr := $00000100;
  52779. end;
  52780. procedure TPMP_PMMODE.setMODE0(thebits : TBits_1); inline;
  52781. begin
  52782. if thebits = 0 then
  52783. pTDefRegMap(@Self)^.clr := $00000100
  52784. else
  52785. pTDefRegMap(@Self)^.&set := $00000100;
  52786. end;
  52787. function TPMP_PMMODE.getMODE0 : TBits_1; inline;
  52788. begin
  52789. getMODE0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52790. end;
  52791. procedure TPMP_PMMODE.setMODE1; inline;
  52792. begin
  52793. pTDefRegMap(@Self)^.&set := $00000200;
  52794. end;
  52795. procedure TPMP_PMMODE.clearMODE1; inline;
  52796. begin
  52797. pTDefRegMap(@Self)^.clr := $00000200;
  52798. end;
  52799. procedure TPMP_PMMODE.setMODE1(thebits : TBits_1); inline;
  52800. begin
  52801. if thebits = 0 then
  52802. pTDefRegMap(@Self)^.clr := $00000200
  52803. else
  52804. pTDefRegMap(@Self)^.&set := $00000200;
  52805. end;
  52806. function TPMP_PMMODE.getMODE1 : TBits_1; inline;
  52807. begin
  52808. getMODE1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  52809. end;
  52810. procedure TPMP_PMMODE.setINCM0; inline;
  52811. begin
  52812. pTDefRegMap(@Self)^.&set := $00000800;
  52813. end;
  52814. procedure TPMP_PMMODE.clearINCM0; inline;
  52815. begin
  52816. pTDefRegMap(@Self)^.clr := $00000800;
  52817. end;
  52818. procedure TPMP_PMMODE.setINCM0(thebits : TBits_1); inline;
  52819. begin
  52820. if thebits = 0 then
  52821. pTDefRegMap(@Self)^.clr := $00000800
  52822. else
  52823. pTDefRegMap(@Self)^.&set := $00000800;
  52824. end;
  52825. function TPMP_PMMODE.getINCM0 : TBits_1; inline;
  52826. begin
  52827. getINCM0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52828. end;
  52829. procedure TPMP_PMMODE.setINCM1; inline;
  52830. begin
  52831. pTDefRegMap(@Self)^.&set := $00001000;
  52832. end;
  52833. procedure TPMP_PMMODE.clearINCM1; inline;
  52834. begin
  52835. pTDefRegMap(@Self)^.clr := $00001000;
  52836. end;
  52837. procedure TPMP_PMMODE.setINCM1(thebits : TBits_1); inline;
  52838. begin
  52839. if thebits = 0 then
  52840. pTDefRegMap(@Self)^.clr := $00001000
  52841. else
  52842. pTDefRegMap(@Self)^.&set := $00001000;
  52843. end;
  52844. function TPMP_PMMODE.getINCM1 : TBits_1; inline;
  52845. begin
  52846. getINCM1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52847. end;
  52848. procedure TPMP_PMMODE.setIRQM0; inline;
  52849. begin
  52850. pTDefRegMap(@Self)^.&set := $00002000;
  52851. end;
  52852. procedure TPMP_PMMODE.clearIRQM0; inline;
  52853. begin
  52854. pTDefRegMap(@Self)^.clr := $00002000;
  52855. end;
  52856. procedure TPMP_PMMODE.setIRQM0(thebits : TBits_1); inline;
  52857. begin
  52858. if thebits = 0 then
  52859. pTDefRegMap(@Self)^.clr := $00002000
  52860. else
  52861. pTDefRegMap(@Self)^.&set := $00002000;
  52862. end;
  52863. function TPMP_PMMODE.getIRQM0 : TBits_1; inline;
  52864. begin
  52865. getIRQM0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  52866. end;
  52867. procedure TPMP_PMMODE.setIRQM1; inline;
  52868. begin
  52869. pTDefRegMap(@Self)^.&set := $00004000;
  52870. end;
  52871. procedure TPMP_PMMODE.clearIRQM1; inline;
  52872. begin
  52873. pTDefRegMap(@Self)^.clr := $00004000;
  52874. end;
  52875. procedure TPMP_PMMODE.setIRQM1(thebits : TBits_1); inline;
  52876. begin
  52877. if thebits = 0 then
  52878. pTDefRegMap(@Self)^.clr := $00004000
  52879. else
  52880. pTDefRegMap(@Self)^.&set := $00004000;
  52881. end;
  52882. function TPMP_PMMODE.getIRQM1 : TBits_1; inline;
  52883. begin
  52884. getIRQM1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  52885. end;
  52886. procedure TPMP_PMMODE.setw(thebits : TBits_32); inline;
  52887. begin
  52888. pTDefRegMap(@Self)^.val := thebits;
  52889. end;
  52890. function TPMP_PMMODE.getw : TBits_32; inline;
  52891. begin
  52892. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52893. end;
  52894. procedure TPMP_PMADDR.setADDR(thebits : TBits_14); inline;
  52895. begin
  52896. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  52897. end;
  52898. function TPMP_PMADDR.getADDR : TBits_14; inline;
  52899. begin
  52900. getADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  52901. end;
  52902. procedure TPMP_PMADDR.setCS(thebits : TBits_2); inline;
  52903. begin
  52904. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  52905. end;
  52906. function TPMP_PMADDR.getCS : TBits_2; inline;
  52907. begin
  52908. getCS := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  52909. end;
  52910. procedure TPMP_PMADDR.setPADDR(thebits : TBits_14); inline;
  52911. begin
  52912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  52913. end;
  52914. function TPMP_PMADDR.getPADDR : TBits_14; inline;
  52915. begin
  52916. getPADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  52917. end;
  52918. procedure TPMP_PMADDR.setCS1; inline;
  52919. begin
  52920. pTDefRegMap(@Self)^.&set := $00004000;
  52921. end;
  52922. procedure TPMP_PMADDR.clearCS1; inline;
  52923. begin
  52924. pTDefRegMap(@Self)^.clr := $00004000;
  52925. end;
  52926. procedure TPMP_PMADDR.setCS1(thebits : TBits_1); inline;
  52927. begin
  52928. if thebits = 0 then
  52929. pTDefRegMap(@Self)^.clr := $00004000
  52930. else
  52931. pTDefRegMap(@Self)^.&set := $00004000;
  52932. end;
  52933. function TPMP_PMADDR.getCS1 : TBits_1; inline;
  52934. begin
  52935. getCS1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  52936. end;
  52937. procedure TPMP_PMADDR.setCS2; inline;
  52938. begin
  52939. pTDefRegMap(@Self)^.&set := $00008000;
  52940. end;
  52941. procedure TPMP_PMADDR.clearCS2; inline;
  52942. begin
  52943. pTDefRegMap(@Self)^.clr := $00008000;
  52944. end;
  52945. procedure TPMP_PMADDR.setCS2(thebits : TBits_1); inline;
  52946. begin
  52947. if thebits = 0 then
  52948. pTDefRegMap(@Self)^.clr := $00008000
  52949. else
  52950. pTDefRegMap(@Self)^.&set := $00008000;
  52951. end;
  52952. function TPMP_PMADDR.getCS2 : TBits_1; inline;
  52953. begin
  52954. getCS2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52955. end;
  52956. procedure TPMP_PMADDR.setw(thebits : TBits_32); inline;
  52957. begin
  52958. pTDefRegMap(@Self)^.val := thebits;
  52959. end;
  52960. function TPMP_PMADDR.getw : TBits_32; inline;
  52961. begin
  52962. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52963. end;
  52964. procedure TPMP_PMDOUT.setDATAOUT(thebits : TBits_32); inline;
  52965. begin
  52966. pTDefRegMap(@Self)^.val := thebits;
  52967. end;
  52968. function TPMP_PMDOUT.getDATAOUT : TBits_32; inline;
  52969. begin
  52970. getDATAOUT := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52971. end;
  52972. procedure TPMP_PMDOUT.setw(thebits : TBits_32); inline;
  52973. begin
  52974. pTDefRegMap(@Self)^.val := thebits;
  52975. end;
  52976. function TPMP_PMDOUT.getw : TBits_32; inline;
  52977. begin
  52978. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52979. end;
  52980. procedure TPMP_PMDIN.setDATAIN(thebits : TBits_32); inline;
  52981. begin
  52982. pTDefRegMap(@Self)^.val := thebits;
  52983. end;
  52984. function TPMP_PMDIN.getDATAIN : TBits_32; inline;
  52985. begin
  52986. getDATAIN := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52987. end;
  52988. procedure TPMP_PMDIN.setw(thebits : TBits_32); inline;
  52989. begin
  52990. pTDefRegMap(@Self)^.val := thebits;
  52991. end;
  52992. function TPMP_PMDIN.getw : TBits_32; inline;
  52993. begin
  52994. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52995. end;
  52996. procedure TPMP_PMAEN.setPTEN(thebits : TBits_16); inline;
  52997. begin
  52998. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  52999. end;
  53000. function TPMP_PMAEN.getPTEN : TBits_16; inline;
  53001. begin
  53002. getPTEN := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  53003. end;
  53004. procedure TPMP_PMAEN.setPTEN0; inline;
  53005. begin
  53006. pTDefRegMap(@Self)^.&set := $00000001;
  53007. end;
  53008. procedure TPMP_PMAEN.clearPTEN0; inline;
  53009. begin
  53010. pTDefRegMap(@Self)^.clr := $00000001;
  53011. end;
  53012. procedure TPMP_PMAEN.setPTEN0(thebits : TBits_1); inline;
  53013. begin
  53014. if thebits = 0 then
  53015. pTDefRegMap(@Self)^.clr := $00000001
  53016. else
  53017. pTDefRegMap(@Self)^.&set := $00000001;
  53018. end;
  53019. function TPMP_PMAEN.getPTEN0 : TBits_1; inline;
  53020. begin
  53021. getPTEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53022. end;
  53023. procedure TPMP_PMAEN.setPTEN1; inline;
  53024. begin
  53025. pTDefRegMap(@Self)^.&set := $00000002;
  53026. end;
  53027. procedure TPMP_PMAEN.clearPTEN1; inline;
  53028. begin
  53029. pTDefRegMap(@Self)^.clr := $00000002;
  53030. end;
  53031. procedure TPMP_PMAEN.setPTEN1(thebits : TBits_1); inline;
  53032. begin
  53033. if thebits = 0 then
  53034. pTDefRegMap(@Self)^.clr := $00000002
  53035. else
  53036. pTDefRegMap(@Self)^.&set := $00000002;
  53037. end;
  53038. function TPMP_PMAEN.getPTEN1 : TBits_1; inline;
  53039. begin
  53040. getPTEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53041. end;
  53042. procedure TPMP_PMAEN.setPTEN2; inline;
  53043. begin
  53044. pTDefRegMap(@Self)^.&set := $00000004;
  53045. end;
  53046. procedure TPMP_PMAEN.clearPTEN2; inline;
  53047. begin
  53048. pTDefRegMap(@Self)^.clr := $00000004;
  53049. end;
  53050. procedure TPMP_PMAEN.setPTEN2(thebits : TBits_1); inline;
  53051. begin
  53052. if thebits = 0 then
  53053. pTDefRegMap(@Self)^.clr := $00000004
  53054. else
  53055. pTDefRegMap(@Self)^.&set := $00000004;
  53056. end;
  53057. function TPMP_PMAEN.getPTEN2 : TBits_1; inline;
  53058. begin
  53059. getPTEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53060. end;
  53061. procedure TPMP_PMAEN.setPTEN3; inline;
  53062. begin
  53063. pTDefRegMap(@Self)^.&set := $00000008;
  53064. end;
  53065. procedure TPMP_PMAEN.clearPTEN3; inline;
  53066. begin
  53067. pTDefRegMap(@Self)^.clr := $00000008;
  53068. end;
  53069. procedure TPMP_PMAEN.setPTEN3(thebits : TBits_1); inline;
  53070. begin
  53071. if thebits = 0 then
  53072. pTDefRegMap(@Self)^.clr := $00000008
  53073. else
  53074. pTDefRegMap(@Self)^.&set := $00000008;
  53075. end;
  53076. function TPMP_PMAEN.getPTEN3 : TBits_1; inline;
  53077. begin
  53078. getPTEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53079. end;
  53080. procedure TPMP_PMAEN.setPTEN4; inline;
  53081. begin
  53082. pTDefRegMap(@Self)^.&set := $00000010;
  53083. end;
  53084. procedure TPMP_PMAEN.clearPTEN4; inline;
  53085. begin
  53086. pTDefRegMap(@Self)^.clr := $00000010;
  53087. end;
  53088. procedure TPMP_PMAEN.setPTEN4(thebits : TBits_1); inline;
  53089. begin
  53090. if thebits = 0 then
  53091. pTDefRegMap(@Self)^.clr := $00000010
  53092. else
  53093. pTDefRegMap(@Self)^.&set := $00000010;
  53094. end;
  53095. function TPMP_PMAEN.getPTEN4 : TBits_1; inline;
  53096. begin
  53097. getPTEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53098. end;
  53099. procedure TPMP_PMAEN.setPTEN5; inline;
  53100. begin
  53101. pTDefRegMap(@Self)^.&set := $00000020;
  53102. end;
  53103. procedure TPMP_PMAEN.clearPTEN5; inline;
  53104. begin
  53105. pTDefRegMap(@Self)^.clr := $00000020;
  53106. end;
  53107. procedure TPMP_PMAEN.setPTEN5(thebits : TBits_1); inline;
  53108. begin
  53109. if thebits = 0 then
  53110. pTDefRegMap(@Self)^.clr := $00000020
  53111. else
  53112. pTDefRegMap(@Self)^.&set := $00000020;
  53113. end;
  53114. function TPMP_PMAEN.getPTEN5 : TBits_1; inline;
  53115. begin
  53116. getPTEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53117. end;
  53118. procedure TPMP_PMAEN.setPTEN6; inline;
  53119. begin
  53120. pTDefRegMap(@Self)^.&set := $00000040;
  53121. end;
  53122. procedure TPMP_PMAEN.clearPTEN6; inline;
  53123. begin
  53124. pTDefRegMap(@Self)^.clr := $00000040;
  53125. end;
  53126. procedure TPMP_PMAEN.setPTEN6(thebits : TBits_1); inline;
  53127. begin
  53128. if thebits = 0 then
  53129. pTDefRegMap(@Self)^.clr := $00000040
  53130. else
  53131. pTDefRegMap(@Self)^.&set := $00000040;
  53132. end;
  53133. function TPMP_PMAEN.getPTEN6 : TBits_1; inline;
  53134. begin
  53135. getPTEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53136. end;
  53137. procedure TPMP_PMAEN.setPTEN7; inline;
  53138. begin
  53139. pTDefRegMap(@Self)^.&set := $00000080;
  53140. end;
  53141. procedure TPMP_PMAEN.clearPTEN7; inline;
  53142. begin
  53143. pTDefRegMap(@Self)^.clr := $00000080;
  53144. end;
  53145. procedure TPMP_PMAEN.setPTEN7(thebits : TBits_1); inline;
  53146. begin
  53147. if thebits = 0 then
  53148. pTDefRegMap(@Self)^.clr := $00000080
  53149. else
  53150. pTDefRegMap(@Self)^.&set := $00000080;
  53151. end;
  53152. function TPMP_PMAEN.getPTEN7 : TBits_1; inline;
  53153. begin
  53154. getPTEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53155. end;
  53156. procedure TPMP_PMAEN.setPTEN8; inline;
  53157. begin
  53158. pTDefRegMap(@Self)^.&set := $00000100;
  53159. end;
  53160. procedure TPMP_PMAEN.clearPTEN8; inline;
  53161. begin
  53162. pTDefRegMap(@Self)^.clr := $00000100;
  53163. end;
  53164. procedure TPMP_PMAEN.setPTEN8(thebits : TBits_1); inline;
  53165. begin
  53166. if thebits = 0 then
  53167. pTDefRegMap(@Self)^.clr := $00000100
  53168. else
  53169. pTDefRegMap(@Self)^.&set := $00000100;
  53170. end;
  53171. function TPMP_PMAEN.getPTEN8 : TBits_1; inline;
  53172. begin
  53173. getPTEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53174. end;
  53175. procedure TPMP_PMAEN.setPTEN9; inline;
  53176. begin
  53177. pTDefRegMap(@Self)^.&set := $00000200;
  53178. end;
  53179. procedure TPMP_PMAEN.clearPTEN9; inline;
  53180. begin
  53181. pTDefRegMap(@Self)^.clr := $00000200;
  53182. end;
  53183. procedure TPMP_PMAEN.setPTEN9(thebits : TBits_1); inline;
  53184. begin
  53185. if thebits = 0 then
  53186. pTDefRegMap(@Self)^.clr := $00000200
  53187. else
  53188. pTDefRegMap(@Self)^.&set := $00000200;
  53189. end;
  53190. function TPMP_PMAEN.getPTEN9 : TBits_1; inline;
  53191. begin
  53192. getPTEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  53193. end;
  53194. procedure TPMP_PMAEN.setPTEN10; inline;
  53195. begin
  53196. pTDefRegMap(@Self)^.&set := $00000400;
  53197. end;
  53198. procedure TPMP_PMAEN.clearPTEN10; inline;
  53199. begin
  53200. pTDefRegMap(@Self)^.clr := $00000400;
  53201. end;
  53202. procedure TPMP_PMAEN.setPTEN10(thebits : TBits_1); inline;
  53203. begin
  53204. if thebits = 0 then
  53205. pTDefRegMap(@Self)^.clr := $00000400
  53206. else
  53207. pTDefRegMap(@Self)^.&set := $00000400;
  53208. end;
  53209. function TPMP_PMAEN.getPTEN10 : TBits_1; inline;
  53210. begin
  53211. getPTEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  53212. end;
  53213. procedure TPMP_PMAEN.setPTEN11; inline;
  53214. begin
  53215. pTDefRegMap(@Self)^.&set := $00000800;
  53216. end;
  53217. procedure TPMP_PMAEN.clearPTEN11; inline;
  53218. begin
  53219. pTDefRegMap(@Self)^.clr := $00000800;
  53220. end;
  53221. procedure TPMP_PMAEN.setPTEN11(thebits : TBits_1); inline;
  53222. begin
  53223. if thebits = 0 then
  53224. pTDefRegMap(@Self)^.clr := $00000800
  53225. else
  53226. pTDefRegMap(@Self)^.&set := $00000800;
  53227. end;
  53228. function TPMP_PMAEN.getPTEN11 : TBits_1; inline;
  53229. begin
  53230. getPTEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  53231. end;
  53232. procedure TPMP_PMAEN.setPTEN12; inline;
  53233. begin
  53234. pTDefRegMap(@Self)^.&set := $00001000;
  53235. end;
  53236. procedure TPMP_PMAEN.clearPTEN12; inline;
  53237. begin
  53238. pTDefRegMap(@Self)^.clr := $00001000;
  53239. end;
  53240. procedure TPMP_PMAEN.setPTEN12(thebits : TBits_1); inline;
  53241. begin
  53242. if thebits = 0 then
  53243. pTDefRegMap(@Self)^.clr := $00001000
  53244. else
  53245. pTDefRegMap(@Self)^.&set := $00001000;
  53246. end;
  53247. function TPMP_PMAEN.getPTEN12 : TBits_1; inline;
  53248. begin
  53249. getPTEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  53250. end;
  53251. procedure TPMP_PMAEN.setPTEN13; inline;
  53252. begin
  53253. pTDefRegMap(@Self)^.&set := $00002000;
  53254. end;
  53255. procedure TPMP_PMAEN.clearPTEN13; inline;
  53256. begin
  53257. pTDefRegMap(@Self)^.clr := $00002000;
  53258. end;
  53259. procedure TPMP_PMAEN.setPTEN13(thebits : TBits_1); inline;
  53260. begin
  53261. if thebits = 0 then
  53262. pTDefRegMap(@Self)^.clr := $00002000
  53263. else
  53264. pTDefRegMap(@Self)^.&set := $00002000;
  53265. end;
  53266. function TPMP_PMAEN.getPTEN13 : TBits_1; inline;
  53267. begin
  53268. getPTEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53269. end;
  53270. procedure TPMP_PMAEN.setPTEN14; inline;
  53271. begin
  53272. pTDefRegMap(@Self)^.&set := $00004000;
  53273. end;
  53274. procedure TPMP_PMAEN.clearPTEN14; inline;
  53275. begin
  53276. pTDefRegMap(@Self)^.clr := $00004000;
  53277. end;
  53278. procedure TPMP_PMAEN.setPTEN14(thebits : TBits_1); inline;
  53279. begin
  53280. if thebits = 0 then
  53281. pTDefRegMap(@Self)^.clr := $00004000
  53282. else
  53283. pTDefRegMap(@Self)^.&set := $00004000;
  53284. end;
  53285. function TPMP_PMAEN.getPTEN14 : TBits_1; inline;
  53286. begin
  53287. getPTEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  53288. end;
  53289. procedure TPMP_PMAEN.setPTEN15; inline;
  53290. begin
  53291. pTDefRegMap(@Self)^.&set := $00008000;
  53292. end;
  53293. procedure TPMP_PMAEN.clearPTEN15; inline;
  53294. begin
  53295. pTDefRegMap(@Self)^.clr := $00008000;
  53296. end;
  53297. procedure TPMP_PMAEN.setPTEN15(thebits : TBits_1); inline;
  53298. begin
  53299. if thebits = 0 then
  53300. pTDefRegMap(@Self)^.clr := $00008000
  53301. else
  53302. pTDefRegMap(@Self)^.&set := $00008000;
  53303. end;
  53304. function TPMP_PMAEN.getPTEN15 : TBits_1; inline;
  53305. begin
  53306. getPTEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53307. end;
  53308. procedure TPMP_PMAEN.setw(thebits : TBits_32); inline;
  53309. begin
  53310. pTDefRegMap(@Self)^.val := thebits;
  53311. end;
  53312. function TPMP_PMAEN.getw : TBits_32; inline;
  53313. begin
  53314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53315. end;
  53316. procedure TPMP_PMSTAT.setOB0E; inline;
  53317. begin
  53318. pTDefRegMap(@Self)^.&set := $00000001;
  53319. end;
  53320. procedure TPMP_PMSTAT.clearOB0E; inline;
  53321. begin
  53322. pTDefRegMap(@Self)^.clr := $00000001;
  53323. end;
  53324. procedure TPMP_PMSTAT.setOB0E(thebits : TBits_1); inline;
  53325. begin
  53326. if thebits = 0 then
  53327. pTDefRegMap(@Self)^.clr := $00000001
  53328. else
  53329. pTDefRegMap(@Self)^.&set := $00000001;
  53330. end;
  53331. function TPMP_PMSTAT.getOB0E : TBits_1; inline;
  53332. begin
  53333. getOB0E := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53334. end;
  53335. procedure TPMP_PMSTAT.setOB1E; inline;
  53336. begin
  53337. pTDefRegMap(@Self)^.&set := $00000002;
  53338. end;
  53339. procedure TPMP_PMSTAT.clearOB1E; inline;
  53340. begin
  53341. pTDefRegMap(@Self)^.clr := $00000002;
  53342. end;
  53343. procedure TPMP_PMSTAT.setOB1E(thebits : TBits_1); inline;
  53344. begin
  53345. if thebits = 0 then
  53346. pTDefRegMap(@Self)^.clr := $00000002
  53347. else
  53348. pTDefRegMap(@Self)^.&set := $00000002;
  53349. end;
  53350. function TPMP_PMSTAT.getOB1E : TBits_1; inline;
  53351. begin
  53352. getOB1E := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53353. end;
  53354. procedure TPMP_PMSTAT.setOB2E; inline;
  53355. begin
  53356. pTDefRegMap(@Self)^.&set := $00000004;
  53357. end;
  53358. procedure TPMP_PMSTAT.clearOB2E; inline;
  53359. begin
  53360. pTDefRegMap(@Self)^.clr := $00000004;
  53361. end;
  53362. procedure TPMP_PMSTAT.setOB2E(thebits : TBits_1); inline;
  53363. begin
  53364. if thebits = 0 then
  53365. pTDefRegMap(@Self)^.clr := $00000004
  53366. else
  53367. pTDefRegMap(@Self)^.&set := $00000004;
  53368. end;
  53369. function TPMP_PMSTAT.getOB2E : TBits_1; inline;
  53370. begin
  53371. getOB2E := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53372. end;
  53373. procedure TPMP_PMSTAT.setOB3E; inline;
  53374. begin
  53375. pTDefRegMap(@Self)^.&set := $00000008;
  53376. end;
  53377. procedure TPMP_PMSTAT.clearOB3E; inline;
  53378. begin
  53379. pTDefRegMap(@Self)^.clr := $00000008;
  53380. end;
  53381. procedure TPMP_PMSTAT.setOB3E(thebits : TBits_1); inline;
  53382. begin
  53383. if thebits = 0 then
  53384. pTDefRegMap(@Self)^.clr := $00000008
  53385. else
  53386. pTDefRegMap(@Self)^.&set := $00000008;
  53387. end;
  53388. function TPMP_PMSTAT.getOB3E : TBits_1; inline;
  53389. begin
  53390. getOB3E := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53391. end;
  53392. procedure TPMP_PMSTAT.setOBUF; inline;
  53393. begin
  53394. pTDefRegMap(@Self)^.&set := $00000040;
  53395. end;
  53396. procedure TPMP_PMSTAT.clearOBUF; inline;
  53397. begin
  53398. pTDefRegMap(@Self)^.clr := $00000040;
  53399. end;
  53400. procedure TPMP_PMSTAT.setOBUF(thebits : TBits_1); inline;
  53401. begin
  53402. if thebits = 0 then
  53403. pTDefRegMap(@Self)^.clr := $00000040
  53404. else
  53405. pTDefRegMap(@Self)^.&set := $00000040;
  53406. end;
  53407. function TPMP_PMSTAT.getOBUF : TBits_1; inline;
  53408. begin
  53409. getOBUF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53410. end;
  53411. procedure TPMP_PMSTAT.setOBE; inline;
  53412. begin
  53413. pTDefRegMap(@Self)^.&set := $00000080;
  53414. end;
  53415. procedure TPMP_PMSTAT.clearOBE; inline;
  53416. begin
  53417. pTDefRegMap(@Self)^.clr := $00000080;
  53418. end;
  53419. procedure TPMP_PMSTAT.setOBE(thebits : TBits_1); inline;
  53420. begin
  53421. if thebits = 0 then
  53422. pTDefRegMap(@Self)^.clr := $00000080
  53423. else
  53424. pTDefRegMap(@Self)^.&set := $00000080;
  53425. end;
  53426. function TPMP_PMSTAT.getOBE : TBits_1; inline;
  53427. begin
  53428. getOBE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53429. end;
  53430. procedure TPMP_PMSTAT.setIB0F; inline;
  53431. begin
  53432. pTDefRegMap(@Self)^.&set := $00000100;
  53433. end;
  53434. procedure TPMP_PMSTAT.clearIB0F; inline;
  53435. begin
  53436. pTDefRegMap(@Self)^.clr := $00000100;
  53437. end;
  53438. procedure TPMP_PMSTAT.setIB0F(thebits : TBits_1); inline;
  53439. begin
  53440. if thebits = 0 then
  53441. pTDefRegMap(@Self)^.clr := $00000100
  53442. else
  53443. pTDefRegMap(@Self)^.&set := $00000100;
  53444. end;
  53445. function TPMP_PMSTAT.getIB0F : TBits_1; inline;
  53446. begin
  53447. getIB0F := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53448. end;
  53449. procedure TPMP_PMSTAT.setIB1F; inline;
  53450. begin
  53451. pTDefRegMap(@Self)^.&set := $00000200;
  53452. end;
  53453. procedure TPMP_PMSTAT.clearIB1F; inline;
  53454. begin
  53455. pTDefRegMap(@Self)^.clr := $00000200;
  53456. end;
  53457. procedure TPMP_PMSTAT.setIB1F(thebits : TBits_1); inline;
  53458. begin
  53459. if thebits = 0 then
  53460. pTDefRegMap(@Self)^.clr := $00000200
  53461. else
  53462. pTDefRegMap(@Self)^.&set := $00000200;
  53463. end;
  53464. function TPMP_PMSTAT.getIB1F : TBits_1; inline;
  53465. begin
  53466. getIB1F := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  53467. end;
  53468. procedure TPMP_PMSTAT.setIB2F; inline;
  53469. begin
  53470. pTDefRegMap(@Self)^.&set := $00000400;
  53471. end;
  53472. procedure TPMP_PMSTAT.clearIB2F; inline;
  53473. begin
  53474. pTDefRegMap(@Self)^.clr := $00000400;
  53475. end;
  53476. procedure TPMP_PMSTAT.setIB2F(thebits : TBits_1); inline;
  53477. begin
  53478. if thebits = 0 then
  53479. pTDefRegMap(@Self)^.clr := $00000400
  53480. else
  53481. pTDefRegMap(@Self)^.&set := $00000400;
  53482. end;
  53483. function TPMP_PMSTAT.getIB2F : TBits_1; inline;
  53484. begin
  53485. getIB2F := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  53486. end;
  53487. procedure TPMP_PMSTAT.setIB3F; inline;
  53488. begin
  53489. pTDefRegMap(@Self)^.&set := $00000800;
  53490. end;
  53491. procedure TPMP_PMSTAT.clearIB3F; inline;
  53492. begin
  53493. pTDefRegMap(@Self)^.clr := $00000800;
  53494. end;
  53495. procedure TPMP_PMSTAT.setIB3F(thebits : TBits_1); inline;
  53496. begin
  53497. if thebits = 0 then
  53498. pTDefRegMap(@Self)^.clr := $00000800
  53499. else
  53500. pTDefRegMap(@Self)^.&set := $00000800;
  53501. end;
  53502. function TPMP_PMSTAT.getIB3F : TBits_1; inline;
  53503. begin
  53504. getIB3F := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  53505. end;
  53506. procedure TPMP_PMSTAT.setIBOV; inline;
  53507. begin
  53508. pTDefRegMap(@Self)^.&set := $00004000;
  53509. end;
  53510. procedure TPMP_PMSTAT.clearIBOV; inline;
  53511. begin
  53512. pTDefRegMap(@Self)^.clr := $00004000;
  53513. end;
  53514. procedure TPMP_PMSTAT.setIBOV(thebits : TBits_1); inline;
  53515. begin
  53516. if thebits = 0 then
  53517. pTDefRegMap(@Self)^.clr := $00004000
  53518. else
  53519. pTDefRegMap(@Self)^.&set := $00004000;
  53520. end;
  53521. function TPMP_PMSTAT.getIBOV : TBits_1; inline;
  53522. begin
  53523. getIBOV := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  53524. end;
  53525. procedure TPMP_PMSTAT.setIBF; inline;
  53526. begin
  53527. pTDefRegMap(@Self)^.&set := $00008000;
  53528. end;
  53529. procedure TPMP_PMSTAT.clearIBF; inline;
  53530. begin
  53531. pTDefRegMap(@Self)^.clr := $00008000;
  53532. end;
  53533. procedure TPMP_PMSTAT.setIBF(thebits : TBits_1); inline;
  53534. begin
  53535. if thebits = 0 then
  53536. pTDefRegMap(@Self)^.clr := $00008000
  53537. else
  53538. pTDefRegMap(@Self)^.&set := $00008000;
  53539. end;
  53540. function TPMP_PMSTAT.getIBF : TBits_1; inline;
  53541. begin
  53542. getIBF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53543. end;
  53544. procedure TPMP_PMSTAT.setw(thebits : TBits_32); inline;
  53545. begin
  53546. pTDefRegMap(@Self)^.val := thebits;
  53547. end;
  53548. function TPMP_PMSTAT.getw : TBits_32; inline;
  53549. begin
  53550. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53551. end;
  53552. procedure TADC10_AD1CON1.setDONE; inline;
  53553. begin
  53554. pTDefRegMap(@Self)^.&set := $00000001;
  53555. end;
  53556. procedure TADC10_AD1CON1.clearDONE; inline;
  53557. begin
  53558. pTDefRegMap(@Self)^.clr := $00000001;
  53559. end;
  53560. procedure TADC10_AD1CON1.setDONE(thebits : TBits_1); inline;
  53561. begin
  53562. if thebits = 0 then
  53563. pTDefRegMap(@Self)^.clr := $00000001
  53564. else
  53565. pTDefRegMap(@Self)^.&set := $00000001;
  53566. end;
  53567. function TADC10_AD1CON1.getDONE : TBits_1; inline;
  53568. begin
  53569. getDONE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53570. end;
  53571. procedure TADC10_AD1CON1.setSAMP; inline;
  53572. begin
  53573. pTDefRegMap(@Self)^.&set := $00000002;
  53574. end;
  53575. procedure TADC10_AD1CON1.clearSAMP; inline;
  53576. begin
  53577. pTDefRegMap(@Self)^.clr := $00000002;
  53578. end;
  53579. procedure TADC10_AD1CON1.setSAMP(thebits : TBits_1); inline;
  53580. begin
  53581. if thebits = 0 then
  53582. pTDefRegMap(@Self)^.clr := $00000002
  53583. else
  53584. pTDefRegMap(@Self)^.&set := $00000002;
  53585. end;
  53586. function TADC10_AD1CON1.getSAMP : TBits_1; inline;
  53587. begin
  53588. getSAMP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53589. end;
  53590. procedure TADC10_AD1CON1.setASAM; inline;
  53591. begin
  53592. pTDefRegMap(@Self)^.&set := $00000004;
  53593. end;
  53594. procedure TADC10_AD1CON1.clearASAM; inline;
  53595. begin
  53596. pTDefRegMap(@Self)^.clr := $00000004;
  53597. end;
  53598. procedure TADC10_AD1CON1.setASAM(thebits : TBits_1); inline;
  53599. begin
  53600. if thebits = 0 then
  53601. pTDefRegMap(@Self)^.clr := $00000004
  53602. else
  53603. pTDefRegMap(@Self)^.&set := $00000004;
  53604. end;
  53605. function TADC10_AD1CON1.getASAM : TBits_1; inline;
  53606. begin
  53607. getASAM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53608. end;
  53609. procedure TADC10_AD1CON1.setCLRASAM; inline;
  53610. begin
  53611. pTDefRegMap(@Self)^.&set := $00000010;
  53612. end;
  53613. procedure TADC10_AD1CON1.clearCLRASAM; inline;
  53614. begin
  53615. pTDefRegMap(@Self)^.clr := $00000010;
  53616. end;
  53617. procedure TADC10_AD1CON1.setCLRASAM(thebits : TBits_1); inline;
  53618. begin
  53619. if thebits = 0 then
  53620. pTDefRegMap(@Self)^.clr := $00000010
  53621. else
  53622. pTDefRegMap(@Self)^.&set := $00000010;
  53623. end;
  53624. function TADC10_AD1CON1.getCLRASAM : TBits_1; inline;
  53625. begin
  53626. getCLRASAM := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53627. end;
  53628. procedure TADC10_AD1CON1.setSSRC(thebits : TBits_3); inline;
  53629. begin
  53630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF1F or ( thebits shl 5 );
  53631. end;
  53632. function TADC10_AD1CON1.getSSRC : TBits_3; inline;
  53633. begin
  53634. getSSRC := (pTDefRegMap(@Self)^.val and $000000E0) shr 5;
  53635. end;
  53636. procedure TADC10_AD1CON1.setFORM(thebits : TBits_3); inline;
  53637. begin
  53638. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  53639. end;
  53640. function TADC10_AD1CON1.getFORM : TBits_3; inline;
  53641. begin
  53642. getFORM := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  53643. end;
  53644. procedure TADC10_AD1CON1.setSIDL; inline;
  53645. begin
  53646. pTDefRegMap(@Self)^.&set := $00002000;
  53647. end;
  53648. procedure TADC10_AD1CON1.clearSIDL; inline;
  53649. begin
  53650. pTDefRegMap(@Self)^.clr := $00002000;
  53651. end;
  53652. procedure TADC10_AD1CON1.setSIDL(thebits : TBits_1); inline;
  53653. begin
  53654. if thebits = 0 then
  53655. pTDefRegMap(@Self)^.clr := $00002000
  53656. else
  53657. pTDefRegMap(@Self)^.&set := $00002000;
  53658. end;
  53659. function TADC10_AD1CON1.getSIDL : TBits_1; inline;
  53660. begin
  53661. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53662. end;
  53663. procedure TADC10_AD1CON1.setON; inline;
  53664. begin
  53665. pTDefRegMap(@Self)^.&set := $00008000;
  53666. end;
  53667. procedure TADC10_AD1CON1.clearON; inline;
  53668. begin
  53669. pTDefRegMap(@Self)^.clr := $00008000;
  53670. end;
  53671. procedure TADC10_AD1CON1.setON(thebits : TBits_1); inline;
  53672. begin
  53673. if thebits = 0 then
  53674. pTDefRegMap(@Self)^.clr := $00008000
  53675. else
  53676. pTDefRegMap(@Self)^.&set := $00008000;
  53677. end;
  53678. function TADC10_AD1CON1.getON : TBits_1; inline;
  53679. begin
  53680. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53681. end;
  53682. procedure TADC10_AD1CON1.setSSRC0; inline;
  53683. begin
  53684. pTDefRegMap(@Self)^.&set := $00000020;
  53685. end;
  53686. procedure TADC10_AD1CON1.clearSSRC0; inline;
  53687. begin
  53688. pTDefRegMap(@Self)^.clr := $00000020;
  53689. end;
  53690. procedure TADC10_AD1CON1.setSSRC0(thebits : TBits_1); inline;
  53691. begin
  53692. if thebits = 0 then
  53693. pTDefRegMap(@Self)^.clr := $00000020
  53694. else
  53695. pTDefRegMap(@Self)^.&set := $00000020;
  53696. end;
  53697. function TADC10_AD1CON1.getSSRC0 : TBits_1; inline;
  53698. begin
  53699. getSSRC0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53700. end;
  53701. procedure TADC10_AD1CON1.setSSRC1; inline;
  53702. begin
  53703. pTDefRegMap(@Self)^.&set := $00000040;
  53704. end;
  53705. procedure TADC10_AD1CON1.clearSSRC1; inline;
  53706. begin
  53707. pTDefRegMap(@Self)^.clr := $00000040;
  53708. end;
  53709. procedure TADC10_AD1CON1.setSSRC1(thebits : TBits_1); inline;
  53710. begin
  53711. if thebits = 0 then
  53712. pTDefRegMap(@Self)^.clr := $00000040
  53713. else
  53714. pTDefRegMap(@Self)^.&set := $00000040;
  53715. end;
  53716. function TADC10_AD1CON1.getSSRC1 : TBits_1; inline;
  53717. begin
  53718. getSSRC1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53719. end;
  53720. procedure TADC10_AD1CON1.setSSRC2; inline;
  53721. begin
  53722. pTDefRegMap(@Self)^.&set := $00000080;
  53723. end;
  53724. procedure TADC10_AD1CON1.clearSSRC2; inline;
  53725. begin
  53726. pTDefRegMap(@Self)^.clr := $00000080;
  53727. end;
  53728. procedure TADC10_AD1CON1.setSSRC2(thebits : TBits_1); inline;
  53729. begin
  53730. if thebits = 0 then
  53731. pTDefRegMap(@Self)^.clr := $00000080
  53732. else
  53733. pTDefRegMap(@Self)^.&set := $00000080;
  53734. end;
  53735. function TADC10_AD1CON1.getSSRC2 : TBits_1; inline;
  53736. begin
  53737. getSSRC2 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53738. end;
  53739. procedure TADC10_AD1CON1.setFORM0; inline;
  53740. begin
  53741. pTDefRegMap(@Self)^.&set := $00000100;
  53742. end;
  53743. procedure TADC10_AD1CON1.clearFORM0; inline;
  53744. begin
  53745. pTDefRegMap(@Self)^.clr := $00000100;
  53746. end;
  53747. procedure TADC10_AD1CON1.setFORM0(thebits : TBits_1); inline;
  53748. begin
  53749. if thebits = 0 then
  53750. pTDefRegMap(@Self)^.clr := $00000100
  53751. else
  53752. pTDefRegMap(@Self)^.&set := $00000100;
  53753. end;
  53754. function TADC10_AD1CON1.getFORM0 : TBits_1; inline;
  53755. begin
  53756. getFORM0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53757. end;
  53758. procedure TADC10_AD1CON1.setFORM1; inline;
  53759. begin
  53760. pTDefRegMap(@Self)^.&set := $00000200;
  53761. end;
  53762. procedure TADC10_AD1CON1.clearFORM1; inline;
  53763. begin
  53764. pTDefRegMap(@Self)^.clr := $00000200;
  53765. end;
  53766. procedure TADC10_AD1CON1.setFORM1(thebits : TBits_1); inline;
  53767. begin
  53768. if thebits = 0 then
  53769. pTDefRegMap(@Self)^.clr := $00000200
  53770. else
  53771. pTDefRegMap(@Self)^.&set := $00000200;
  53772. end;
  53773. function TADC10_AD1CON1.getFORM1 : TBits_1; inline;
  53774. begin
  53775. getFORM1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  53776. end;
  53777. procedure TADC10_AD1CON1.setFORM2; inline;
  53778. begin
  53779. pTDefRegMap(@Self)^.&set := $00000400;
  53780. end;
  53781. procedure TADC10_AD1CON1.clearFORM2; inline;
  53782. begin
  53783. pTDefRegMap(@Self)^.clr := $00000400;
  53784. end;
  53785. procedure TADC10_AD1CON1.setFORM2(thebits : TBits_1); inline;
  53786. begin
  53787. if thebits = 0 then
  53788. pTDefRegMap(@Self)^.clr := $00000400
  53789. else
  53790. pTDefRegMap(@Self)^.&set := $00000400;
  53791. end;
  53792. function TADC10_AD1CON1.getFORM2 : TBits_1; inline;
  53793. begin
  53794. getFORM2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  53795. end;
  53796. procedure TADC10_AD1CON1.setADSIDL; inline;
  53797. begin
  53798. pTDefRegMap(@Self)^.&set := $00002000;
  53799. end;
  53800. procedure TADC10_AD1CON1.clearADSIDL; inline;
  53801. begin
  53802. pTDefRegMap(@Self)^.clr := $00002000;
  53803. end;
  53804. procedure TADC10_AD1CON1.setADSIDL(thebits : TBits_1); inline;
  53805. begin
  53806. if thebits = 0 then
  53807. pTDefRegMap(@Self)^.clr := $00002000
  53808. else
  53809. pTDefRegMap(@Self)^.&set := $00002000;
  53810. end;
  53811. function TADC10_AD1CON1.getADSIDL : TBits_1; inline;
  53812. begin
  53813. getADSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53814. end;
  53815. procedure TADC10_AD1CON1.setADON; inline;
  53816. begin
  53817. pTDefRegMap(@Self)^.&set := $00008000;
  53818. end;
  53819. procedure TADC10_AD1CON1.clearADON; inline;
  53820. begin
  53821. pTDefRegMap(@Self)^.clr := $00008000;
  53822. end;
  53823. procedure TADC10_AD1CON1.setADON(thebits : TBits_1); inline;
  53824. begin
  53825. if thebits = 0 then
  53826. pTDefRegMap(@Self)^.clr := $00008000
  53827. else
  53828. pTDefRegMap(@Self)^.&set := $00008000;
  53829. end;
  53830. function TADC10_AD1CON1.getADON : TBits_1; inline;
  53831. begin
  53832. getADON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53833. end;
  53834. procedure TADC10_AD1CON1.setw(thebits : TBits_32); inline;
  53835. begin
  53836. pTDefRegMap(@Self)^.val := thebits;
  53837. end;
  53838. function TADC10_AD1CON1.getw : TBits_32; inline;
  53839. begin
  53840. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53841. end;
  53842. procedure TADC10_AD1CON2.setALTS; inline;
  53843. begin
  53844. pTDefRegMap(@Self)^.&set := $00000001;
  53845. end;
  53846. procedure TADC10_AD1CON2.clearALTS; inline;
  53847. begin
  53848. pTDefRegMap(@Self)^.clr := $00000001;
  53849. end;
  53850. procedure TADC10_AD1CON2.setALTS(thebits : TBits_1); inline;
  53851. begin
  53852. if thebits = 0 then
  53853. pTDefRegMap(@Self)^.clr := $00000001
  53854. else
  53855. pTDefRegMap(@Self)^.&set := $00000001;
  53856. end;
  53857. function TADC10_AD1CON2.getALTS : TBits_1; inline;
  53858. begin
  53859. getALTS := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53860. end;
  53861. procedure TADC10_AD1CON2.setBUFM; inline;
  53862. begin
  53863. pTDefRegMap(@Self)^.&set := $00000002;
  53864. end;
  53865. procedure TADC10_AD1CON2.clearBUFM; inline;
  53866. begin
  53867. pTDefRegMap(@Self)^.clr := $00000002;
  53868. end;
  53869. procedure TADC10_AD1CON2.setBUFM(thebits : TBits_1); inline;
  53870. begin
  53871. if thebits = 0 then
  53872. pTDefRegMap(@Self)^.clr := $00000002
  53873. else
  53874. pTDefRegMap(@Self)^.&set := $00000002;
  53875. end;
  53876. function TADC10_AD1CON2.getBUFM : TBits_1; inline;
  53877. begin
  53878. getBUFM := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53879. end;
  53880. procedure TADC10_AD1CON2.setSMPI(thebits : TBits_4); inline;
  53881. begin
  53882. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  53883. end;
  53884. function TADC10_AD1CON2.getSMPI : TBits_4; inline;
  53885. begin
  53886. getSMPI := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  53887. end;
  53888. procedure TADC10_AD1CON2.setBUFS; inline;
  53889. begin
  53890. pTDefRegMap(@Self)^.&set := $00000080;
  53891. end;
  53892. procedure TADC10_AD1CON2.clearBUFS; inline;
  53893. begin
  53894. pTDefRegMap(@Self)^.clr := $00000080;
  53895. end;
  53896. procedure TADC10_AD1CON2.setBUFS(thebits : TBits_1); inline;
  53897. begin
  53898. if thebits = 0 then
  53899. pTDefRegMap(@Self)^.clr := $00000080
  53900. else
  53901. pTDefRegMap(@Self)^.&set := $00000080;
  53902. end;
  53903. function TADC10_AD1CON2.getBUFS : TBits_1; inline;
  53904. begin
  53905. getBUFS := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53906. end;
  53907. procedure TADC10_AD1CON2.setCSCNA; inline;
  53908. begin
  53909. pTDefRegMap(@Self)^.&set := $00000400;
  53910. end;
  53911. procedure TADC10_AD1CON2.clearCSCNA; inline;
  53912. begin
  53913. pTDefRegMap(@Self)^.clr := $00000400;
  53914. end;
  53915. procedure TADC10_AD1CON2.setCSCNA(thebits : TBits_1); inline;
  53916. begin
  53917. if thebits = 0 then
  53918. pTDefRegMap(@Self)^.clr := $00000400
  53919. else
  53920. pTDefRegMap(@Self)^.&set := $00000400;
  53921. end;
  53922. function TADC10_AD1CON2.getCSCNA : TBits_1; inline;
  53923. begin
  53924. getCSCNA := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  53925. end;
  53926. procedure TADC10_AD1CON2.setOFFCAL; inline;
  53927. begin
  53928. pTDefRegMap(@Self)^.&set := $00001000;
  53929. end;
  53930. procedure TADC10_AD1CON2.clearOFFCAL; inline;
  53931. begin
  53932. pTDefRegMap(@Self)^.clr := $00001000;
  53933. end;
  53934. procedure TADC10_AD1CON2.setOFFCAL(thebits : TBits_1); inline;
  53935. begin
  53936. if thebits = 0 then
  53937. pTDefRegMap(@Self)^.clr := $00001000
  53938. else
  53939. pTDefRegMap(@Self)^.&set := $00001000;
  53940. end;
  53941. function TADC10_AD1CON2.getOFFCAL : TBits_1; inline;
  53942. begin
  53943. getOFFCAL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  53944. end;
  53945. procedure TADC10_AD1CON2.setVCFG(thebits : TBits_3); inline;
  53946. begin
  53947. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF1FFF or ( thebits shl 13 );
  53948. end;
  53949. function TADC10_AD1CON2.getVCFG : TBits_3; inline;
  53950. begin
  53951. getVCFG := (pTDefRegMap(@Self)^.val and $0000E000) shr 13;
  53952. end;
  53953. procedure TADC10_AD1CON2.setSMPI0; inline;
  53954. begin
  53955. pTDefRegMap(@Self)^.&set := $00000004;
  53956. end;
  53957. procedure TADC10_AD1CON2.clearSMPI0; inline;
  53958. begin
  53959. pTDefRegMap(@Self)^.clr := $00000004;
  53960. end;
  53961. procedure TADC10_AD1CON2.setSMPI0(thebits : TBits_1); inline;
  53962. begin
  53963. if thebits = 0 then
  53964. pTDefRegMap(@Self)^.clr := $00000004
  53965. else
  53966. pTDefRegMap(@Self)^.&set := $00000004;
  53967. end;
  53968. function TADC10_AD1CON2.getSMPI0 : TBits_1; inline;
  53969. begin
  53970. getSMPI0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53971. end;
  53972. procedure TADC10_AD1CON2.setSMPI1; inline;
  53973. begin
  53974. pTDefRegMap(@Self)^.&set := $00000008;
  53975. end;
  53976. procedure TADC10_AD1CON2.clearSMPI1; inline;
  53977. begin
  53978. pTDefRegMap(@Self)^.clr := $00000008;
  53979. end;
  53980. procedure TADC10_AD1CON2.setSMPI1(thebits : TBits_1); inline;
  53981. begin
  53982. if thebits = 0 then
  53983. pTDefRegMap(@Self)^.clr := $00000008
  53984. else
  53985. pTDefRegMap(@Self)^.&set := $00000008;
  53986. end;
  53987. function TADC10_AD1CON2.getSMPI1 : TBits_1; inline;
  53988. begin
  53989. getSMPI1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53990. end;
  53991. procedure TADC10_AD1CON2.setSMPI2; inline;
  53992. begin
  53993. pTDefRegMap(@Self)^.&set := $00000010;
  53994. end;
  53995. procedure TADC10_AD1CON2.clearSMPI2; inline;
  53996. begin
  53997. pTDefRegMap(@Self)^.clr := $00000010;
  53998. end;
  53999. procedure TADC10_AD1CON2.setSMPI2(thebits : TBits_1); inline;
  54000. begin
  54001. if thebits = 0 then
  54002. pTDefRegMap(@Self)^.clr := $00000010
  54003. else
  54004. pTDefRegMap(@Self)^.&set := $00000010;
  54005. end;
  54006. function TADC10_AD1CON2.getSMPI2 : TBits_1; inline;
  54007. begin
  54008. getSMPI2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54009. end;
  54010. procedure TADC10_AD1CON2.setSMPI3; inline;
  54011. begin
  54012. pTDefRegMap(@Self)^.&set := $00000020;
  54013. end;
  54014. procedure TADC10_AD1CON2.clearSMPI3; inline;
  54015. begin
  54016. pTDefRegMap(@Self)^.clr := $00000020;
  54017. end;
  54018. procedure TADC10_AD1CON2.setSMPI3(thebits : TBits_1); inline;
  54019. begin
  54020. if thebits = 0 then
  54021. pTDefRegMap(@Self)^.clr := $00000020
  54022. else
  54023. pTDefRegMap(@Self)^.&set := $00000020;
  54024. end;
  54025. function TADC10_AD1CON2.getSMPI3 : TBits_1; inline;
  54026. begin
  54027. getSMPI3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54028. end;
  54029. procedure TADC10_AD1CON2.setVCFG0; inline;
  54030. begin
  54031. pTDefRegMap(@Self)^.&set := $00002000;
  54032. end;
  54033. procedure TADC10_AD1CON2.clearVCFG0; inline;
  54034. begin
  54035. pTDefRegMap(@Self)^.clr := $00002000;
  54036. end;
  54037. procedure TADC10_AD1CON2.setVCFG0(thebits : TBits_1); inline;
  54038. begin
  54039. if thebits = 0 then
  54040. pTDefRegMap(@Self)^.clr := $00002000
  54041. else
  54042. pTDefRegMap(@Self)^.&set := $00002000;
  54043. end;
  54044. function TADC10_AD1CON2.getVCFG0 : TBits_1; inline;
  54045. begin
  54046. getVCFG0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  54047. end;
  54048. procedure TADC10_AD1CON2.setVCFG1; inline;
  54049. begin
  54050. pTDefRegMap(@Self)^.&set := $00004000;
  54051. end;
  54052. procedure TADC10_AD1CON2.clearVCFG1; inline;
  54053. begin
  54054. pTDefRegMap(@Self)^.clr := $00004000;
  54055. end;
  54056. procedure TADC10_AD1CON2.setVCFG1(thebits : TBits_1); inline;
  54057. begin
  54058. if thebits = 0 then
  54059. pTDefRegMap(@Self)^.clr := $00004000
  54060. else
  54061. pTDefRegMap(@Self)^.&set := $00004000;
  54062. end;
  54063. function TADC10_AD1CON2.getVCFG1 : TBits_1; inline;
  54064. begin
  54065. getVCFG1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  54066. end;
  54067. procedure TADC10_AD1CON2.setVCFG2; inline;
  54068. begin
  54069. pTDefRegMap(@Self)^.&set := $00008000;
  54070. end;
  54071. procedure TADC10_AD1CON2.clearVCFG2; inline;
  54072. begin
  54073. pTDefRegMap(@Self)^.clr := $00008000;
  54074. end;
  54075. procedure TADC10_AD1CON2.setVCFG2(thebits : TBits_1); inline;
  54076. begin
  54077. if thebits = 0 then
  54078. pTDefRegMap(@Self)^.clr := $00008000
  54079. else
  54080. pTDefRegMap(@Self)^.&set := $00008000;
  54081. end;
  54082. function TADC10_AD1CON2.getVCFG2 : TBits_1; inline;
  54083. begin
  54084. getVCFG2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54085. end;
  54086. procedure TADC10_AD1CON2.setw(thebits : TBits_32); inline;
  54087. begin
  54088. pTDefRegMap(@Self)^.val := thebits;
  54089. end;
  54090. function TADC10_AD1CON2.getw : TBits_32; inline;
  54091. begin
  54092. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54093. end;
  54094. procedure TADC10_AD1CON3.setADCS(thebits : TBits_8); inline;
  54095. begin
  54096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  54097. end;
  54098. function TADC10_AD1CON3.getADCS : TBits_8; inline;
  54099. begin
  54100. getADCS := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  54101. end;
  54102. procedure TADC10_AD1CON3.setSAMC(thebits : TBits_5); inline;
  54103. begin
  54104. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  54105. end;
  54106. function TADC10_AD1CON3.getSAMC : TBits_5; inline;
  54107. begin
  54108. getSAMC := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  54109. end;
  54110. procedure TADC10_AD1CON3.setADRC; inline;
  54111. begin
  54112. pTDefRegMap(@Self)^.&set := $00008000;
  54113. end;
  54114. procedure TADC10_AD1CON3.clearADRC; inline;
  54115. begin
  54116. pTDefRegMap(@Self)^.clr := $00008000;
  54117. end;
  54118. procedure TADC10_AD1CON3.setADRC(thebits : TBits_1); inline;
  54119. begin
  54120. if thebits = 0 then
  54121. pTDefRegMap(@Self)^.clr := $00008000
  54122. else
  54123. pTDefRegMap(@Self)^.&set := $00008000;
  54124. end;
  54125. function TADC10_AD1CON3.getADRC : TBits_1; inline;
  54126. begin
  54127. getADRC := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54128. end;
  54129. procedure TADC10_AD1CON3.setADCS0; inline;
  54130. begin
  54131. pTDefRegMap(@Self)^.&set := $00000001;
  54132. end;
  54133. procedure TADC10_AD1CON3.clearADCS0; inline;
  54134. begin
  54135. pTDefRegMap(@Self)^.clr := $00000001;
  54136. end;
  54137. procedure TADC10_AD1CON3.setADCS0(thebits : TBits_1); inline;
  54138. begin
  54139. if thebits = 0 then
  54140. pTDefRegMap(@Self)^.clr := $00000001
  54141. else
  54142. pTDefRegMap(@Self)^.&set := $00000001;
  54143. end;
  54144. function TADC10_AD1CON3.getADCS0 : TBits_1; inline;
  54145. begin
  54146. getADCS0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54147. end;
  54148. procedure TADC10_AD1CON3.setADCS1; inline;
  54149. begin
  54150. pTDefRegMap(@Self)^.&set := $00000002;
  54151. end;
  54152. procedure TADC10_AD1CON3.clearADCS1; inline;
  54153. begin
  54154. pTDefRegMap(@Self)^.clr := $00000002;
  54155. end;
  54156. procedure TADC10_AD1CON3.setADCS1(thebits : TBits_1); inline;
  54157. begin
  54158. if thebits = 0 then
  54159. pTDefRegMap(@Self)^.clr := $00000002
  54160. else
  54161. pTDefRegMap(@Self)^.&set := $00000002;
  54162. end;
  54163. function TADC10_AD1CON3.getADCS1 : TBits_1; inline;
  54164. begin
  54165. getADCS1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54166. end;
  54167. procedure TADC10_AD1CON3.setADCS2; inline;
  54168. begin
  54169. pTDefRegMap(@Self)^.&set := $00000004;
  54170. end;
  54171. procedure TADC10_AD1CON3.clearADCS2; inline;
  54172. begin
  54173. pTDefRegMap(@Self)^.clr := $00000004;
  54174. end;
  54175. procedure TADC10_AD1CON3.setADCS2(thebits : TBits_1); inline;
  54176. begin
  54177. if thebits = 0 then
  54178. pTDefRegMap(@Self)^.clr := $00000004
  54179. else
  54180. pTDefRegMap(@Self)^.&set := $00000004;
  54181. end;
  54182. function TADC10_AD1CON3.getADCS2 : TBits_1; inline;
  54183. begin
  54184. getADCS2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54185. end;
  54186. procedure TADC10_AD1CON3.setADCS3; inline;
  54187. begin
  54188. pTDefRegMap(@Self)^.&set := $00000008;
  54189. end;
  54190. procedure TADC10_AD1CON3.clearADCS3; inline;
  54191. begin
  54192. pTDefRegMap(@Self)^.clr := $00000008;
  54193. end;
  54194. procedure TADC10_AD1CON3.setADCS3(thebits : TBits_1); inline;
  54195. begin
  54196. if thebits = 0 then
  54197. pTDefRegMap(@Self)^.clr := $00000008
  54198. else
  54199. pTDefRegMap(@Self)^.&set := $00000008;
  54200. end;
  54201. function TADC10_AD1CON3.getADCS3 : TBits_1; inline;
  54202. begin
  54203. getADCS3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54204. end;
  54205. procedure TADC10_AD1CON3.setADCS4; inline;
  54206. begin
  54207. pTDefRegMap(@Self)^.&set := $00000010;
  54208. end;
  54209. procedure TADC10_AD1CON3.clearADCS4; inline;
  54210. begin
  54211. pTDefRegMap(@Self)^.clr := $00000010;
  54212. end;
  54213. procedure TADC10_AD1CON3.setADCS4(thebits : TBits_1); inline;
  54214. begin
  54215. if thebits = 0 then
  54216. pTDefRegMap(@Self)^.clr := $00000010
  54217. else
  54218. pTDefRegMap(@Self)^.&set := $00000010;
  54219. end;
  54220. function TADC10_AD1CON3.getADCS4 : TBits_1; inline;
  54221. begin
  54222. getADCS4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54223. end;
  54224. procedure TADC10_AD1CON3.setADCS5; inline;
  54225. begin
  54226. pTDefRegMap(@Self)^.&set := $00000020;
  54227. end;
  54228. procedure TADC10_AD1CON3.clearADCS5; inline;
  54229. begin
  54230. pTDefRegMap(@Self)^.clr := $00000020;
  54231. end;
  54232. procedure TADC10_AD1CON3.setADCS5(thebits : TBits_1); inline;
  54233. begin
  54234. if thebits = 0 then
  54235. pTDefRegMap(@Self)^.clr := $00000020
  54236. else
  54237. pTDefRegMap(@Self)^.&set := $00000020;
  54238. end;
  54239. function TADC10_AD1CON3.getADCS5 : TBits_1; inline;
  54240. begin
  54241. getADCS5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54242. end;
  54243. procedure TADC10_AD1CON3.setADCS6; inline;
  54244. begin
  54245. pTDefRegMap(@Self)^.&set := $00000040;
  54246. end;
  54247. procedure TADC10_AD1CON3.clearADCS6; inline;
  54248. begin
  54249. pTDefRegMap(@Self)^.clr := $00000040;
  54250. end;
  54251. procedure TADC10_AD1CON3.setADCS6(thebits : TBits_1); inline;
  54252. begin
  54253. if thebits = 0 then
  54254. pTDefRegMap(@Self)^.clr := $00000040
  54255. else
  54256. pTDefRegMap(@Self)^.&set := $00000040;
  54257. end;
  54258. function TADC10_AD1CON3.getADCS6 : TBits_1; inline;
  54259. begin
  54260. getADCS6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54261. end;
  54262. procedure TADC10_AD1CON3.setADCS7; inline;
  54263. begin
  54264. pTDefRegMap(@Self)^.&set := $00000080;
  54265. end;
  54266. procedure TADC10_AD1CON3.clearADCS7; inline;
  54267. begin
  54268. pTDefRegMap(@Self)^.clr := $00000080;
  54269. end;
  54270. procedure TADC10_AD1CON3.setADCS7(thebits : TBits_1); inline;
  54271. begin
  54272. if thebits = 0 then
  54273. pTDefRegMap(@Self)^.clr := $00000080
  54274. else
  54275. pTDefRegMap(@Self)^.&set := $00000080;
  54276. end;
  54277. function TADC10_AD1CON3.getADCS7 : TBits_1; inline;
  54278. begin
  54279. getADCS7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54280. end;
  54281. procedure TADC10_AD1CON3.setSAMC0; inline;
  54282. begin
  54283. pTDefRegMap(@Self)^.&set := $00000100;
  54284. end;
  54285. procedure TADC10_AD1CON3.clearSAMC0; inline;
  54286. begin
  54287. pTDefRegMap(@Self)^.clr := $00000100;
  54288. end;
  54289. procedure TADC10_AD1CON3.setSAMC0(thebits : TBits_1); inline;
  54290. begin
  54291. if thebits = 0 then
  54292. pTDefRegMap(@Self)^.clr := $00000100
  54293. else
  54294. pTDefRegMap(@Self)^.&set := $00000100;
  54295. end;
  54296. function TADC10_AD1CON3.getSAMC0 : TBits_1; inline;
  54297. begin
  54298. getSAMC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54299. end;
  54300. procedure TADC10_AD1CON3.setSAMC1; inline;
  54301. begin
  54302. pTDefRegMap(@Self)^.&set := $00000200;
  54303. end;
  54304. procedure TADC10_AD1CON3.clearSAMC1; inline;
  54305. begin
  54306. pTDefRegMap(@Self)^.clr := $00000200;
  54307. end;
  54308. procedure TADC10_AD1CON3.setSAMC1(thebits : TBits_1); inline;
  54309. begin
  54310. if thebits = 0 then
  54311. pTDefRegMap(@Self)^.clr := $00000200
  54312. else
  54313. pTDefRegMap(@Self)^.&set := $00000200;
  54314. end;
  54315. function TADC10_AD1CON3.getSAMC1 : TBits_1; inline;
  54316. begin
  54317. getSAMC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  54318. end;
  54319. procedure TADC10_AD1CON3.setSAMC2; inline;
  54320. begin
  54321. pTDefRegMap(@Self)^.&set := $00000400;
  54322. end;
  54323. procedure TADC10_AD1CON3.clearSAMC2; inline;
  54324. begin
  54325. pTDefRegMap(@Self)^.clr := $00000400;
  54326. end;
  54327. procedure TADC10_AD1CON3.setSAMC2(thebits : TBits_1); inline;
  54328. begin
  54329. if thebits = 0 then
  54330. pTDefRegMap(@Self)^.clr := $00000400
  54331. else
  54332. pTDefRegMap(@Self)^.&set := $00000400;
  54333. end;
  54334. function TADC10_AD1CON3.getSAMC2 : TBits_1; inline;
  54335. begin
  54336. getSAMC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  54337. end;
  54338. procedure TADC10_AD1CON3.setSAMC3; inline;
  54339. begin
  54340. pTDefRegMap(@Self)^.&set := $00000800;
  54341. end;
  54342. procedure TADC10_AD1CON3.clearSAMC3; inline;
  54343. begin
  54344. pTDefRegMap(@Self)^.clr := $00000800;
  54345. end;
  54346. procedure TADC10_AD1CON3.setSAMC3(thebits : TBits_1); inline;
  54347. begin
  54348. if thebits = 0 then
  54349. pTDefRegMap(@Self)^.clr := $00000800
  54350. else
  54351. pTDefRegMap(@Self)^.&set := $00000800;
  54352. end;
  54353. function TADC10_AD1CON3.getSAMC3 : TBits_1; inline;
  54354. begin
  54355. getSAMC3 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  54356. end;
  54357. procedure TADC10_AD1CON3.setSAMC4; inline;
  54358. begin
  54359. pTDefRegMap(@Self)^.&set := $00001000;
  54360. end;
  54361. procedure TADC10_AD1CON3.clearSAMC4; inline;
  54362. begin
  54363. pTDefRegMap(@Self)^.clr := $00001000;
  54364. end;
  54365. procedure TADC10_AD1CON3.setSAMC4(thebits : TBits_1); inline;
  54366. begin
  54367. if thebits = 0 then
  54368. pTDefRegMap(@Self)^.clr := $00001000
  54369. else
  54370. pTDefRegMap(@Self)^.&set := $00001000;
  54371. end;
  54372. function TADC10_AD1CON3.getSAMC4 : TBits_1; inline;
  54373. begin
  54374. getSAMC4 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  54375. end;
  54376. procedure TADC10_AD1CON3.setw(thebits : TBits_32); inline;
  54377. begin
  54378. pTDefRegMap(@Self)^.val := thebits;
  54379. end;
  54380. function TADC10_AD1CON3.getw : TBits_32; inline;
  54381. begin
  54382. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54383. end;
  54384. procedure TADC10_AD1CHS.setCH0SA(thebits : TBits_4); inline;
  54385. begin
  54386. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  54387. end;
  54388. function TADC10_AD1CHS.getCH0SA : TBits_4; inline;
  54389. begin
  54390. getCH0SA := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  54391. end;
  54392. procedure TADC10_AD1CHS.setCH0NA; inline;
  54393. begin
  54394. pTDefRegMap(@Self)^.&set := $00800000;
  54395. end;
  54396. procedure TADC10_AD1CHS.clearCH0NA; inline;
  54397. begin
  54398. pTDefRegMap(@Self)^.clr := $00800000;
  54399. end;
  54400. procedure TADC10_AD1CHS.setCH0NA(thebits : TBits_1); inline;
  54401. begin
  54402. if thebits = 0 then
  54403. pTDefRegMap(@Self)^.clr := $00800000
  54404. else
  54405. pTDefRegMap(@Self)^.&set := $00800000;
  54406. end;
  54407. function TADC10_AD1CHS.getCH0NA : TBits_1; inline;
  54408. begin
  54409. getCH0NA := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  54410. end;
  54411. procedure TADC10_AD1CHS.setCH0SB(thebits : TBits_4); inline;
  54412. begin
  54413. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  54414. end;
  54415. function TADC10_AD1CHS.getCH0SB : TBits_4; inline;
  54416. begin
  54417. getCH0SB := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  54418. end;
  54419. procedure TADC10_AD1CHS.setCH0NB; inline;
  54420. begin
  54421. pTDefRegMap(@Self)^.&set := $80000000;
  54422. end;
  54423. procedure TADC10_AD1CHS.clearCH0NB; inline;
  54424. begin
  54425. pTDefRegMap(@Self)^.clr := $80000000;
  54426. end;
  54427. procedure TADC10_AD1CHS.setCH0NB(thebits : TBits_1); inline;
  54428. begin
  54429. if thebits = 0 then
  54430. pTDefRegMap(@Self)^.clr := $80000000
  54431. else
  54432. pTDefRegMap(@Self)^.&set := $80000000;
  54433. end;
  54434. function TADC10_AD1CHS.getCH0NB : TBits_1; inline;
  54435. begin
  54436. getCH0NB := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  54437. end;
  54438. procedure TADC10_AD1CHS.setCH0SA0; inline;
  54439. begin
  54440. pTDefRegMap(@Self)^.&set := $00010000;
  54441. end;
  54442. procedure TADC10_AD1CHS.clearCH0SA0; inline;
  54443. begin
  54444. pTDefRegMap(@Self)^.clr := $00010000;
  54445. end;
  54446. procedure TADC10_AD1CHS.setCH0SA0(thebits : TBits_1); inline;
  54447. begin
  54448. if thebits = 0 then
  54449. pTDefRegMap(@Self)^.clr := $00010000
  54450. else
  54451. pTDefRegMap(@Self)^.&set := $00010000;
  54452. end;
  54453. function TADC10_AD1CHS.getCH0SA0 : TBits_1; inline;
  54454. begin
  54455. getCH0SA0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  54456. end;
  54457. procedure TADC10_AD1CHS.setCH0SA1; inline;
  54458. begin
  54459. pTDefRegMap(@Self)^.&set := $00020000;
  54460. end;
  54461. procedure TADC10_AD1CHS.clearCH0SA1; inline;
  54462. begin
  54463. pTDefRegMap(@Self)^.clr := $00020000;
  54464. end;
  54465. procedure TADC10_AD1CHS.setCH0SA1(thebits : TBits_1); inline;
  54466. begin
  54467. if thebits = 0 then
  54468. pTDefRegMap(@Self)^.clr := $00020000
  54469. else
  54470. pTDefRegMap(@Self)^.&set := $00020000;
  54471. end;
  54472. function TADC10_AD1CHS.getCH0SA1 : TBits_1; inline;
  54473. begin
  54474. getCH0SA1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  54475. end;
  54476. procedure TADC10_AD1CHS.setCH0SA2; inline;
  54477. begin
  54478. pTDefRegMap(@Self)^.&set := $00040000;
  54479. end;
  54480. procedure TADC10_AD1CHS.clearCH0SA2; inline;
  54481. begin
  54482. pTDefRegMap(@Self)^.clr := $00040000;
  54483. end;
  54484. procedure TADC10_AD1CHS.setCH0SA2(thebits : TBits_1); inline;
  54485. begin
  54486. if thebits = 0 then
  54487. pTDefRegMap(@Self)^.clr := $00040000
  54488. else
  54489. pTDefRegMap(@Self)^.&set := $00040000;
  54490. end;
  54491. function TADC10_AD1CHS.getCH0SA2 : TBits_1; inline;
  54492. begin
  54493. getCH0SA2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  54494. end;
  54495. procedure TADC10_AD1CHS.setCH0SA3; inline;
  54496. begin
  54497. pTDefRegMap(@Self)^.&set := $00080000;
  54498. end;
  54499. procedure TADC10_AD1CHS.clearCH0SA3; inline;
  54500. begin
  54501. pTDefRegMap(@Self)^.clr := $00080000;
  54502. end;
  54503. procedure TADC10_AD1CHS.setCH0SA3(thebits : TBits_1); inline;
  54504. begin
  54505. if thebits = 0 then
  54506. pTDefRegMap(@Self)^.clr := $00080000
  54507. else
  54508. pTDefRegMap(@Self)^.&set := $00080000;
  54509. end;
  54510. function TADC10_AD1CHS.getCH0SA3 : TBits_1; inline;
  54511. begin
  54512. getCH0SA3 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  54513. end;
  54514. procedure TADC10_AD1CHS.setCH0SB0; inline;
  54515. begin
  54516. pTDefRegMap(@Self)^.&set := $01000000;
  54517. end;
  54518. procedure TADC10_AD1CHS.clearCH0SB0; inline;
  54519. begin
  54520. pTDefRegMap(@Self)^.clr := $01000000;
  54521. end;
  54522. procedure TADC10_AD1CHS.setCH0SB0(thebits : TBits_1); inline;
  54523. begin
  54524. if thebits = 0 then
  54525. pTDefRegMap(@Self)^.clr := $01000000
  54526. else
  54527. pTDefRegMap(@Self)^.&set := $01000000;
  54528. end;
  54529. function TADC10_AD1CHS.getCH0SB0 : TBits_1; inline;
  54530. begin
  54531. getCH0SB0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  54532. end;
  54533. procedure TADC10_AD1CHS.setCH0SB1; inline;
  54534. begin
  54535. pTDefRegMap(@Self)^.&set := $02000000;
  54536. end;
  54537. procedure TADC10_AD1CHS.clearCH0SB1; inline;
  54538. begin
  54539. pTDefRegMap(@Self)^.clr := $02000000;
  54540. end;
  54541. procedure TADC10_AD1CHS.setCH0SB1(thebits : TBits_1); inline;
  54542. begin
  54543. if thebits = 0 then
  54544. pTDefRegMap(@Self)^.clr := $02000000
  54545. else
  54546. pTDefRegMap(@Self)^.&set := $02000000;
  54547. end;
  54548. function TADC10_AD1CHS.getCH0SB1 : TBits_1; inline;
  54549. begin
  54550. getCH0SB1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  54551. end;
  54552. procedure TADC10_AD1CHS.setCH0SB2; inline;
  54553. begin
  54554. pTDefRegMap(@Self)^.&set := $04000000;
  54555. end;
  54556. procedure TADC10_AD1CHS.clearCH0SB2; inline;
  54557. begin
  54558. pTDefRegMap(@Self)^.clr := $04000000;
  54559. end;
  54560. procedure TADC10_AD1CHS.setCH0SB2(thebits : TBits_1); inline;
  54561. begin
  54562. if thebits = 0 then
  54563. pTDefRegMap(@Self)^.clr := $04000000
  54564. else
  54565. pTDefRegMap(@Self)^.&set := $04000000;
  54566. end;
  54567. function TADC10_AD1CHS.getCH0SB2 : TBits_1; inline;
  54568. begin
  54569. getCH0SB2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  54570. end;
  54571. procedure TADC10_AD1CHS.setCH0SB3; inline;
  54572. begin
  54573. pTDefRegMap(@Self)^.&set := $08000000;
  54574. end;
  54575. procedure TADC10_AD1CHS.clearCH0SB3; inline;
  54576. begin
  54577. pTDefRegMap(@Self)^.clr := $08000000;
  54578. end;
  54579. procedure TADC10_AD1CHS.setCH0SB3(thebits : TBits_1); inline;
  54580. begin
  54581. if thebits = 0 then
  54582. pTDefRegMap(@Self)^.clr := $08000000
  54583. else
  54584. pTDefRegMap(@Self)^.&set := $08000000;
  54585. end;
  54586. function TADC10_AD1CHS.getCH0SB3 : TBits_1; inline;
  54587. begin
  54588. getCH0SB3 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  54589. end;
  54590. procedure TADC10_AD1CHS.setw(thebits : TBits_32); inline;
  54591. begin
  54592. pTDefRegMap(@Self)^.val := thebits;
  54593. end;
  54594. function TADC10_AD1CHS.getw : TBits_32; inline;
  54595. begin
  54596. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54597. end;
  54598. procedure TADC10_AD1CSSL.setCSSL(thebits : TBits_16); inline;
  54599. begin
  54600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  54601. end;
  54602. function TADC10_AD1CSSL.getCSSL : TBits_16; inline;
  54603. begin
  54604. getCSSL := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  54605. end;
  54606. procedure TADC10_AD1CSSL.setCSSL0; inline;
  54607. begin
  54608. pTDefRegMap(@Self)^.&set := $00000001;
  54609. end;
  54610. procedure TADC10_AD1CSSL.clearCSSL0; inline;
  54611. begin
  54612. pTDefRegMap(@Self)^.clr := $00000001;
  54613. end;
  54614. procedure TADC10_AD1CSSL.setCSSL0(thebits : TBits_1); inline;
  54615. begin
  54616. if thebits = 0 then
  54617. pTDefRegMap(@Self)^.clr := $00000001
  54618. else
  54619. pTDefRegMap(@Self)^.&set := $00000001;
  54620. end;
  54621. function TADC10_AD1CSSL.getCSSL0 : TBits_1; inline;
  54622. begin
  54623. getCSSL0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54624. end;
  54625. procedure TADC10_AD1CSSL.setCSSL1; inline;
  54626. begin
  54627. pTDefRegMap(@Self)^.&set := $00000002;
  54628. end;
  54629. procedure TADC10_AD1CSSL.clearCSSL1; inline;
  54630. begin
  54631. pTDefRegMap(@Self)^.clr := $00000002;
  54632. end;
  54633. procedure TADC10_AD1CSSL.setCSSL1(thebits : TBits_1); inline;
  54634. begin
  54635. if thebits = 0 then
  54636. pTDefRegMap(@Self)^.clr := $00000002
  54637. else
  54638. pTDefRegMap(@Self)^.&set := $00000002;
  54639. end;
  54640. function TADC10_AD1CSSL.getCSSL1 : TBits_1; inline;
  54641. begin
  54642. getCSSL1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54643. end;
  54644. procedure TADC10_AD1CSSL.setCSSL2; inline;
  54645. begin
  54646. pTDefRegMap(@Self)^.&set := $00000004;
  54647. end;
  54648. procedure TADC10_AD1CSSL.clearCSSL2; inline;
  54649. begin
  54650. pTDefRegMap(@Self)^.clr := $00000004;
  54651. end;
  54652. procedure TADC10_AD1CSSL.setCSSL2(thebits : TBits_1); inline;
  54653. begin
  54654. if thebits = 0 then
  54655. pTDefRegMap(@Self)^.clr := $00000004
  54656. else
  54657. pTDefRegMap(@Self)^.&set := $00000004;
  54658. end;
  54659. function TADC10_AD1CSSL.getCSSL2 : TBits_1; inline;
  54660. begin
  54661. getCSSL2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54662. end;
  54663. procedure TADC10_AD1CSSL.setCSSL3; inline;
  54664. begin
  54665. pTDefRegMap(@Self)^.&set := $00000008;
  54666. end;
  54667. procedure TADC10_AD1CSSL.clearCSSL3; inline;
  54668. begin
  54669. pTDefRegMap(@Self)^.clr := $00000008;
  54670. end;
  54671. procedure TADC10_AD1CSSL.setCSSL3(thebits : TBits_1); inline;
  54672. begin
  54673. if thebits = 0 then
  54674. pTDefRegMap(@Self)^.clr := $00000008
  54675. else
  54676. pTDefRegMap(@Self)^.&set := $00000008;
  54677. end;
  54678. function TADC10_AD1CSSL.getCSSL3 : TBits_1; inline;
  54679. begin
  54680. getCSSL3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54681. end;
  54682. procedure TADC10_AD1CSSL.setCSSL4; inline;
  54683. begin
  54684. pTDefRegMap(@Self)^.&set := $00000010;
  54685. end;
  54686. procedure TADC10_AD1CSSL.clearCSSL4; inline;
  54687. begin
  54688. pTDefRegMap(@Self)^.clr := $00000010;
  54689. end;
  54690. procedure TADC10_AD1CSSL.setCSSL4(thebits : TBits_1); inline;
  54691. begin
  54692. if thebits = 0 then
  54693. pTDefRegMap(@Self)^.clr := $00000010
  54694. else
  54695. pTDefRegMap(@Self)^.&set := $00000010;
  54696. end;
  54697. function TADC10_AD1CSSL.getCSSL4 : TBits_1; inline;
  54698. begin
  54699. getCSSL4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54700. end;
  54701. procedure TADC10_AD1CSSL.setCSSL5; inline;
  54702. begin
  54703. pTDefRegMap(@Self)^.&set := $00000020;
  54704. end;
  54705. procedure TADC10_AD1CSSL.clearCSSL5; inline;
  54706. begin
  54707. pTDefRegMap(@Self)^.clr := $00000020;
  54708. end;
  54709. procedure TADC10_AD1CSSL.setCSSL5(thebits : TBits_1); inline;
  54710. begin
  54711. if thebits = 0 then
  54712. pTDefRegMap(@Self)^.clr := $00000020
  54713. else
  54714. pTDefRegMap(@Self)^.&set := $00000020;
  54715. end;
  54716. function TADC10_AD1CSSL.getCSSL5 : TBits_1; inline;
  54717. begin
  54718. getCSSL5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54719. end;
  54720. procedure TADC10_AD1CSSL.setCSSL6; inline;
  54721. begin
  54722. pTDefRegMap(@Self)^.&set := $00000040;
  54723. end;
  54724. procedure TADC10_AD1CSSL.clearCSSL6; inline;
  54725. begin
  54726. pTDefRegMap(@Self)^.clr := $00000040;
  54727. end;
  54728. procedure TADC10_AD1CSSL.setCSSL6(thebits : TBits_1); inline;
  54729. begin
  54730. if thebits = 0 then
  54731. pTDefRegMap(@Self)^.clr := $00000040
  54732. else
  54733. pTDefRegMap(@Self)^.&set := $00000040;
  54734. end;
  54735. function TADC10_AD1CSSL.getCSSL6 : TBits_1; inline;
  54736. begin
  54737. getCSSL6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54738. end;
  54739. procedure TADC10_AD1CSSL.setCSSL7; inline;
  54740. begin
  54741. pTDefRegMap(@Self)^.&set := $00000080;
  54742. end;
  54743. procedure TADC10_AD1CSSL.clearCSSL7; inline;
  54744. begin
  54745. pTDefRegMap(@Self)^.clr := $00000080;
  54746. end;
  54747. procedure TADC10_AD1CSSL.setCSSL7(thebits : TBits_1); inline;
  54748. begin
  54749. if thebits = 0 then
  54750. pTDefRegMap(@Self)^.clr := $00000080
  54751. else
  54752. pTDefRegMap(@Self)^.&set := $00000080;
  54753. end;
  54754. function TADC10_AD1CSSL.getCSSL7 : TBits_1; inline;
  54755. begin
  54756. getCSSL7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54757. end;
  54758. procedure TADC10_AD1CSSL.setCSSL8; inline;
  54759. begin
  54760. pTDefRegMap(@Self)^.&set := $00000100;
  54761. end;
  54762. procedure TADC10_AD1CSSL.clearCSSL8; inline;
  54763. begin
  54764. pTDefRegMap(@Self)^.clr := $00000100;
  54765. end;
  54766. procedure TADC10_AD1CSSL.setCSSL8(thebits : TBits_1); inline;
  54767. begin
  54768. if thebits = 0 then
  54769. pTDefRegMap(@Self)^.clr := $00000100
  54770. else
  54771. pTDefRegMap(@Self)^.&set := $00000100;
  54772. end;
  54773. function TADC10_AD1CSSL.getCSSL8 : TBits_1; inline;
  54774. begin
  54775. getCSSL8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54776. end;
  54777. procedure TADC10_AD1CSSL.setCSSL9; inline;
  54778. begin
  54779. pTDefRegMap(@Self)^.&set := $00000200;
  54780. end;
  54781. procedure TADC10_AD1CSSL.clearCSSL9; inline;
  54782. begin
  54783. pTDefRegMap(@Self)^.clr := $00000200;
  54784. end;
  54785. procedure TADC10_AD1CSSL.setCSSL9(thebits : TBits_1); inline;
  54786. begin
  54787. if thebits = 0 then
  54788. pTDefRegMap(@Self)^.clr := $00000200
  54789. else
  54790. pTDefRegMap(@Self)^.&set := $00000200;
  54791. end;
  54792. function TADC10_AD1CSSL.getCSSL9 : TBits_1; inline;
  54793. begin
  54794. getCSSL9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  54795. end;
  54796. procedure TADC10_AD1CSSL.setCSSL10; inline;
  54797. begin
  54798. pTDefRegMap(@Self)^.&set := $00000400;
  54799. end;
  54800. procedure TADC10_AD1CSSL.clearCSSL10; inline;
  54801. begin
  54802. pTDefRegMap(@Self)^.clr := $00000400;
  54803. end;
  54804. procedure TADC10_AD1CSSL.setCSSL10(thebits : TBits_1); inline;
  54805. begin
  54806. if thebits = 0 then
  54807. pTDefRegMap(@Self)^.clr := $00000400
  54808. else
  54809. pTDefRegMap(@Self)^.&set := $00000400;
  54810. end;
  54811. function TADC10_AD1CSSL.getCSSL10 : TBits_1; inline;
  54812. begin
  54813. getCSSL10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  54814. end;
  54815. procedure TADC10_AD1CSSL.setCSSL11; inline;
  54816. begin
  54817. pTDefRegMap(@Self)^.&set := $00000800;
  54818. end;
  54819. procedure TADC10_AD1CSSL.clearCSSL11; inline;
  54820. begin
  54821. pTDefRegMap(@Self)^.clr := $00000800;
  54822. end;
  54823. procedure TADC10_AD1CSSL.setCSSL11(thebits : TBits_1); inline;
  54824. begin
  54825. if thebits = 0 then
  54826. pTDefRegMap(@Self)^.clr := $00000800
  54827. else
  54828. pTDefRegMap(@Self)^.&set := $00000800;
  54829. end;
  54830. function TADC10_AD1CSSL.getCSSL11 : TBits_1; inline;
  54831. begin
  54832. getCSSL11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  54833. end;
  54834. procedure TADC10_AD1CSSL.setCSSL12; inline;
  54835. begin
  54836. pTDefRegMap(@Self)^.&set := $00001000;
  54837. end;
  54838. procedure TADC10_AD1CSSL.clearCSSL12; inline;
  54839. begin
  54840. pTDefRegMap(@Self)^.clr := $00001000;
  54841. end;
  54842. procedure TADC10_AD1CSSL.setCSSL12(thebits : TBits_1); inline;
  54843. begin
  54844. if thebits = 0 then
  54845. pTDefRegMap(@Self)^.clr := $00001000
  54846. else
  54847. pTDefRegMap(@Self)^.&set := $00001000;
  54848. end;
  54849. function TADC10_AD1CSSL.getCSSL12 : TBits_1; inline;
  54850. begin
  54851. getCSSL12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  54852. end;
  54853. procedure TADC10_AD1CSSL.setCSSL13; inline;
  54854. begin
  54855. pTDefRegMap(@Self)^.&set := $00002000;
  54856. end;
  54857. procedure TADC10_AD1CSSL.clearCSSL13; inline;
  54858. begin
  54859. pTDefRegMap(@Self)^.clr := $00002000;
  54860. end;
  54861. procedure TADC10_AD1CSSL.setCSSL13(thebits : TBits_1); inline;
  54862. begin
  54863. if thebits = 0 then
  54864. pTDefRegMap(@Self)^.clr := $00002000
  54865. else
  54866. pTDefRegMap(@Self)^.&set := $00002000;
  54867. end;
  54868. function TADC10_AD1CSSL.getCSSL13 : TBits_1; inline;
  54869. begin
  54870. getCSSL13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  54871. end;
  54872. procedure TADC10_AD1CSSL.setCSSL14; inline;
  54873. begin
  54874. pTDefRegMap(@Self)^.&set := $00004000;
  54875. end;
  54876. procedure TADC10_AD1CSSL.clearCSSL14; inline;
  54877. begin
  54878. pTDefRegMap(@Self)^.clr := $00004000;
  54879. end;
  54880. procedure TADC10_AD1CSSL.setCSSL14(thebits : TBits_1); inline;
  54881. begin
  54882. if thebits = 0 then
  54883. pTDefRegMap(@Self)^.clr := $00004000
  54884. else
  54885. pTDefRegMap(@Self)^.&set := $00004000;
  54886. end;
  54887. function TADC10_AD1CSSL.getCSSL14 : TBits_1; inline;
  54888. begin
  54889. getCSSL14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  54890. end;
  54891. procedure TADC10_AD1CSSL.setCSSL15; inline;
  54892. begin
  54893. pTDefRegMap(@Self)^.&set := $00008000;
  54894. end;
  54895. procedure TADC10_AD1CSSL.clearCSSL15; inline;
  54896. begin
  54897. pTDefRegMap(@Self)^.clr := $00008000;
  54898. end;
  54899. procedure TADC10_AD1CSSL.setCSSL15(thebits : TBits_1); inline;
  54900. begin
  54901. if thebits = 0 then
  54902. pTDefRegMap(@Self)^.clr := $00008000
  54903. else
  54904. pTDefRegMap(@Self)^.&set := $00008000;
  54905. end;
  54906. function TADC10_AD1CSSL.getCSSL15 : TBits_1; inline;
  54907. begin
  54908. getCSSL15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54909. end;
  54910. procedure TADC10_AD1CSSL.setw(thebits : TBits_32); inline;
  54911. begin
  54912. pTDefRegMap(@Self)^.val := thebits;
  54913. end;
  54914. function TADC10_AD1CSSL.getw : TBits_32; inline;
  54915. begin
  54916. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54917. end;
  54918. procedure TADC10_AD1PCFG.setPCFG(thebits : TBits_16); inline;
  54919. begin
  54920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  54921. end;
  54922. function TADC10_AD1PCFG.getPCFG : TBits_16; inline;
  54923. begin
  54924. getPCFG := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  54925. end;
  54926. procedure TADC10_AD1PCFG.setPCFG0; inline;
  54927. begin
  54928. pTDefRegMap(@Self)^.&set := $00000001;
  54929. end;
  54930. procedure TADC10_AD1PCFG.clearPCFG0; inline;
  54931. begin
  54932. pTDefRegMap(@Self)^.clr := $00000001;
  54933. end;
  54934. procedure TADC10_AD1PCFG.setPCFG0(thebits : TBits_1); inline;
  54935. begin
  54936. if thebits = 0 then
  54937. pTDefRegMap(@Self)^.clr := $00000001
  54938. else
  54939. pTDefRegMap(@Self)^.&set := $00000001;
  54940. end;
  54941. function TADC10_AD1PCFG.getPCFG0 : TBits_1; inline;
  54942. begin
  54943. getPCFG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54944. end;
  54945. procedure TADC10_AD1PCFG.setPCFG1; inline;
  54946. begin
  54947. pTDefRegMap(@Self)^.&set := $00000002;
  54948. end;
  54949. procedure TADC10_AD1PCFG.clearPCFG1; inline;
  54950. begin
  54951. pTDefRegMap(@Self)^.clr := $00000002;
  54952. end;
  54953. procedure TADC10_AD1PCFG.setPCFG1(thebits : TBits_1); inline;
  54954. begin
  54955. if thebits = 0 then
  54956. pTDefRegMap(@Self)^.clr := $00000002
  54957. else
  54958. pTDefRegMap(@Self)^.&set := $00000002;
  54959. end;
  54960. function TADC10_AD1PCFG.getPCFG1 : TBits_1; inline;
  54961. begin
  54962. getPCFG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54963. end;
  54964. procedure TADC10_AD1PCFG.setPCFG2; inline;
  54965. begin
  54966. pTDefRegMap(@Self)^.&set := $00000004;
  54967. end;
  54968. procedure TADC10_AD1PCFG.clearPCFG2; inline;
  54969. begin
  54970. pTDefRegMap(@Self)^.clr := $00000004;
  54971. end;
  54972. procedure TADC10_AD1PCFG.setPCFG2(thebits : TBits_1); inline;
  54973. begin
  54974. if thebits = 0 then
  54975. pTDefRegMap(@Self)^.clr := $00000004
  54976. else
  54977. pTDefRegMap(@Self)^.&set := $00000004;
  54978. end;
  54979. function TADC10_AD1PCFG.getPCFG2 : TBits_1; inline;
  54980. begin
  54981. getPCFG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54982. end;
  54983. procedure TADC10_AD1PCFG.setPCFG3; inline;
  54984. begin
  54985. pTDefRegMap(@Self)^.&set := $00000008;
  54986. end;
  54987. procedure TADC10_AD1PCFG.clearPCFG3; inline;
  54988. begin
  54989. pTDefRegMap(@Self)^.clr := $00000008;
  54990. end;
  54991. procedure TADC10_AD1PCFG.setPCFG3(thebits : TBits_1); inline;
  54992. begin
  54993. if thebits = 0 then
  54994. pTDefRegMap(@Self)^.clr := $00000008
  54995. else
  54996. pTDefRegMap(@Self)^.&set := $00000008;
  54997. end;
  54998. function TADC10_AD1PCFG.getPCFG3 : TBits_1; inline;
  54999. begin
  55000. getPCFG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55001. end;
  55002. procedure TADC10_AD1PCFG.setPCFG4; inline;
  55003. begin
  55004. pTDefRegMap(@Self)^.&set := $00000010;
  55005. end;
  55006. procedure TADC10_AD1PCFG.clearPCFG4; inline;
  55007. begin
  55008. pTDefRegMap(@Self)^.clr := $00000010;
  55009. end;
  55010. procedure TADC10_AD1PCFG.setPCFG4(thebits : TBits_1); inline;
  55011. begin
  55012. if thebits = 0 then
  55013. pTDefRegMap(@Self)^.clr := $00000010
  55014. else
  55015. pTDefRegMap(@Self)^.&set := $00000010;
  55016. end;
  55017. function TADC10_AD1PCFG.getPCFG4 : TBits_1; inline;
  55018. begin
  55019. getPCFG4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55020. end;
  55021. procedure TADC10_AD1PCFG.setPCFG5; inline;
  55022. begin
  55023. pTDefRegMap(@Self)^.&set := $00000020;
  55024. end;
  55025. procedure TADC10_AD1PCFG.clearPCFG5; inline;
  55026. begin
  55027. pTDefRegMap(@Self)^.clr := $00000020;
  55028. end;
  55029. procedure TADC10_AD1PCFG.setPCFG5(thebits : TBits_1); inline;
  55030. begin
  55031. if thebits = 0 then
  55032. pTDefRegMap(@Self)^.clr := $00000020
  55033. else
  55034. pTDefRegMap(@Self)^.&set := $00000020;
  55035. end;
  55036. function TADC10_AD1PCFG.getPCFG5 : TBits_1; inline;
  55037. begin
  55038. getPCFG5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55039. end;
  55040. procedure TADC10_AD1PCFG.setPCFG6; inline;
  55041. begin
  55042. pTDefRegMap(@Self)^.&set := $00000040;
  55043. end;
  55044. procedure TADC10_AD1PCFG.clearPCFG6; inline;
  55045. begin
  55046. pTDefRegMap(@Self)^.clr := $00000040;
  55047. end;
  55048. procedure TADC10_AD1PCFG.setPCFG6(thebits : TBits_1); inline;
  55049. begin
  55050. if thebits = 0 then
  55051. pTDefRegMap(@Self)^.clr := $00000040
  55052. else
  55053. pTDefRegMap(@Self)^.&set := $00000040;
  55054. end;
  55055. function TADC10_AD1PCFG.getPCFG6 : TBits_1; inline;
  55056. begin
  55057. getPCFG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55058. end;
  55059. procedure TADC10_AD1PCFG.setPCFG7; inline;
  55060. begin
  55061. pTDefRegMap(@Self)^.&set := $00000080;
  55062. end;
  55063. procedure TADC10_AD1PCFG.clearPCFG7; inline;
  55064. begin
  55065. pTDefRegMap(@Self)^.clr := $00000080;
  55066. end;
  55067. procedure TADC10_AD1PCFG.setPCFG7(thebits : TBits_1); inline;
  55068. begin
  55069. if thebits = 0 then
  55070. pTDefRegMap(@Self)^.clr := $00000080
  55071. else
  55072. pTDefRegMap(@Self)^.&set := $00000080;
  55073. end;
  55074. function TADC10_AD1PCFG.getPCFG7 : TBits_1; inline;
  55075. begin
  55076. getPCFG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55077. end;
  55078. procedure TADC10_AD1PCFG.setPCFG8; inline;
  55079. begin
  55080. pTDefRegMap(@Self)^.&set := $00000100;
  55081. end;
  55082. procedure TADC10_AD1PCFG.clearPCFG8; inline;
  55083. begin
  55084. pTDefRegMap(@Self)^.clr := $00000100;
  55085. end;
  55086. procedure TADC10_AD1PCFG.setPCFG8(thebits : TBits_1); inline;
  55087. begin
  55088. if thebits = 0 then
  55089. pTDefRegMap(@Self)^.clr := $00000100
  55090. else
  55091. pTDefRegMap(@Self)^.&set := $00000100;
  55092. end;
  55093. function TADC10_AD1PCFG.getPCFG8 : TBits_1; inline;
  55094. begin
  55095. getPCFG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55096. end;
  55097. procedure TADC10_AD1PCFG.setPCFG9; inline;
  55098. begin
  55099. pTDefRegMap(@Self)^.&set := $00000200;
  55100. end;
  55101. procedure TADC10_AD1PCFG.clearPCFG9; inline;
  55102. begin
  55103. pTDefRegMap(@Self)^.clr := $00000200;
  55104. end;
  55105. procedure TADC10_AD1PCFG.setPCFG9(thebits : TBits_1); inline;
  55106. begin
  55107. if thebits = 0 then
  55108. pTDefRegMap(@Self)^.clr := $00000200
  55109. else
  55110. pTDefRegMap(@Self)^.&set := $00000200;
  55111. end;
  55112. function TADC10_AD1PCFG.getPCFG9 : TBits_1; inline;
  55113. begin
  55114. getPCFG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  55115. end;
  55116. procedure TADC10_AD1PCFG.setPCFG10; inline;
  55117. begin
  55118. pTDefRegMap(@Self)^.&set := $00000400;
  55119. end;
  55120. procedure TADC10_AD1PCFG.clearPCFG10; inline;
  55121. begin
  55122. pTDefRegMap(@Self)^.clr := $00000400;
  55123. end;
  55124. procedure TADC10_AD1PCFG.setPCFG10(thebits : TBits_1); inline;
  55125. begin
  55126. if thebits = 0 then
  55127. pTDefRegMap(@Self)^.clr := $00000400
  55128. else
  55129. pTDefRegMap(@Self)^.&set := $00000400;
  55130. end;
  55131. function TADC10_AD1PCFG.getPCFG10 : TBits_1; inline;
  55132. begin
  55133. getPCFG10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  55134. end;
  55135. procedure TADC10_AD1PCFG.setPCFG11; inline;
  55136. begin
  55137. pTDefRegMap(@Self)^.&set := $00000800;
  55138. end;
  55139. procedure TADC10_AD1PCFG.clearPCFG11; inline;
  55140. begin
  55141. pTDefRegMap(@Self)^.clr := $00000800;
  55142. end;
  55143. procedure TADC10_AD1PCFG.setPCFG11(thebits : TBits_1); inline;
  55144. begin
  55145. if thebits = 0 then
  55146. pTDefRegMap(@Self)^.clr := $00000800
  55147. else
  55148. pTDefRegMap(@Self)^.&set := $00000800;
  55149. end;
  55150. function TADC10_AD1PCFG.getPCFG11 : TBits_1; inline;
  55151. begin
  55152. getPCFG11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  55153. end;
  55154. procedure TADC10_AD1PCFG.setPCFG12; inline;
  55155. begin
  55156. pTDefRegMap(@Self)^.&set := $00001000;
  55157. end;
  55158. procedure TADC10_AD1PCFG.clearPCFG12; inline;
  55159. begin
  55160. pTDefRegMap(@Self)^.clr := $00001000;
  55161. end;
  55162. procedure TADC10_AD1PCFG.setPCFG12(thebits : TBits_1); inline;
  55163. begin
  55164. if thebits = 0 then
  55165. pTDefRegMap(@Self)^.clr := $00001000
  55166. else
  55167. pTDefRegMap(@Self)^.&set := $00001000;
  55168. end;
  55169. function TADC10_AD1PCFG.getPCFG12 : TBits_1; inline;
  55170. begin
  55171. getPCFG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  55172. end;
  55173. procedure TADC10_AD1PCFG.setPCFG13; inline;
  55174. begin
  55175. pTDefRegMap(@Self)^.&set := $00002000;
  55176. end;
  55177. procedure TADC10_AD1PCFG.clearPCFG13; inline;
  55178. begin
  55179. pTDefRegMap(@Self)^.clr := $00002000;
  55180. end;
  55181. procedure TADC10_AD1PCFG.setPCFG13(thebits : TBits_1); inline;
  55182. begin
  55183. if thebits = 0 then
  55184. pTDefRegMap(@Self)^.clr := $00002000
  55185. else
  55186. pTDefRegMap(@Self)^.&set := $00002000;
  55187. end;
  55188. function TADC10_AD1PCFG.getPCFG13 : TBits_1; inline;
  55189. begin
  55190. getPCFG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55191. end;
  55192. procedure TADC10_AD1PCFG.setPCFG14; inline;
  55193. begin
  55194. pTDefRegMap(@Self)^.&set := $00004000;
  55195. end;
  55196. procedure TADC10_AD1PCFG.clearPCFG14; inline;
  55197. begin
  55198. pTDefRegMap(@Self)^.clr := $00004000;
  55199. end;
  55200. procedure TADC10_AD1PCFG.setPCFG14(thebits : TBits_1); inline;
  55201. begin
  55202. if thebits = 0 then
  55203. pTDefRegMap(@Self)^.clr := $00004000
  55204. else
  55205. pTDefRegMap(@Self)^.&set := $00004000;
  55206. end;
  55207. function TADC10_AD1PCFG.getPCFG14 : TBits_1; inline;
  55208. begin
  55209. getPCFG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55210. end;
  55211. procedure TADC10_AD1PCFG.setPCFG15; inline;
  55212. begin
  55213. pTDefRegMap(@Self)^.&set := $00008000;
  55214. end;
  55215. procedure TADC10_AD1PCFG.clearPCFG15; inline;
  55216. begin
  55217. pTDefRegMap(@Self)^.clr := $00008000;
  55218. end;
  55219. procedure TADC10_AD1PCFG.setPCFG15(thebits : TBits_1); inline;
  55220. begin
  55221. if thebits = 0 then
  55222. pTDefRegMap(@Self)^.clr := $00008000
  55223. else
  55224. pTDefRegMap(@Self)^.&set := $00008000;
  55225. end;
  55226. function TADC10_AD1PCFG.getPCFG15 : TBits_1; inline;
  55227. begin
  55228. getPCFG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55229. end;
  55230. procedure TADC10_AD1PCFG.setw(thebits : TBits_32); inline;
  55231. begin
  55232. pTDefRegMap(@Self)^.val := thebits;
  55233. end;
  55234. function TADC10_AD1PCFG.getw : TBits_32; inline;
  55235. begin
  55236. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55237. end;
  55238. procedure TCVR_CVRCON.setCVR(thebits : TBits_4); inline;
  55239. begin
  55240. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  55241. end;
  55242. function TCVR_CVRCON.getCVR : TBits_4; inline;
  55243. begin
  55244. getCVR := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  55245. end;
  55246. procedure TCVR_CVRCON.setCVRSS; inline;
  55247. begin
  55248. pTDefRegMap(@Self)^.&set := $00000010;
  55249. end;
  55250. procedure TCVR_CVRCON.clearCVRSS; inline;
  55251. begin
  55252. pTDefRegMap(@Self)^.clr := $00000010;
  55253. end;
  55254. procedure TCVR_CVRCON.setCVRSS(thebits : TBits_1); inline;
  55255. begin
  55256. if thebits = 0 then
  55257. pTDefRegMap(@Self)^.clr := $00000010
  55258. else
  55259. pTDefRegMap(@Self)^.&set := $00000010;
  55260. end;
  55261. function TCVR_CVRCON.getCVRSS : TBits_1; inline;
  55262. begin
  55263. getCVRSS := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55264. end;
  55265. procedure TCVR_CVRCON.setCVRR; inline;
  55266. begin
  55267. pTDefRegMap(@Self)^.&set := $00000020;
  55268. end;
  55269. procedure TCVR_CVRCON.clearCVRR; inline;
  55270. begin
  55271. pTDefRegMap(@Self)^.clr := $00000020;
  55272. end;
  55273. procedure TCVR_CVRCON.setCVRR(thebits : TBits_1); inline;
  55274. begin
  55275. if thebits = 0 then
  55276. pTDefRegMap(@Self)^.clr := $00000020
  55277. else
  55278. pTDefRegMap(@Self)^.&set := $00000020;
  55279. end;
  55280. function TCVR_CVRCON.getCVRR : TBits_1; inline;
  55281. begin
  55282. getCVRR := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55283. end;
  55284. procedure TCVR_CVRCON.setCVROE; inline;
  55285. begin
  55286. pTDefRegMap(@Self)^.&set := $00000040;
  55287. end;
  55288. procedure TCVR_CVRCON.clearCVROE; inline;
  55289. begin
  55290. pTDefRegMap(@Self)^.clr := $00000040;
  55291. end;
  55292. procedure TCVR_CVRCON.setCVROE(thebits : TBits_1); inline;
  55293. begin
  55294. if thebits = 0 then
  55295. pTDefRegMap(@Self)^.clr := $00000040
  55296. else
  55297. pTDefRegMap(@Self)^.&set := $00000040;
  55298. end;
  55299. function TCVR_CVRCON.getCVROE : TBits_1; inline;
  55300. begin
  55301. getCVROE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55302. end;
  55303. procedure TCVR_CVRCON.setON; inline;
  55304. begin
  55305. pTDefRegMap(@Self)^.&set := $00008000;
  55306. end;
  55307. procedure TCVR_CVRCON.clearON; inline;
  55308. begin
  55309. pTDefRegMap(@Self)^.clr := $00008000;
  55310. end;
  55311. procedure TCVR_CVRCON.setON(thebits : TBits_1); inline;
  55312. begin
  55313. if thebits = 0 then
  55314. pTDefRegMap(@Self)^.clr := $00008000
  55315. else
  55316. pTDefRegMap(@Self)^.&set := $00008000;
  55317. end;
  55318. function TCVR_CVRCON.getON : TBits_1; inline;
  55319. begin
  55320. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55321. end;
  55322. procedure TCVR_CVRCON.setCVR0; inline;
  55323. begin
  55324. pTDefRegMap(@Self)^.&set := $00000001;
  55325. end;
  55326. procedure TCVR_CVRCON.clearCVR0; inline;
  55327. begin
  55328. pTDefRegMap(@Self)^.clr := $00000001;
  55329. end;
  55330. procedure TCVR_CVRCON.setCVR0(thebits : TBits_1); inline;
  55331. begin
  55332. if thebits = 0 then
  55333. pTDefRegMap(@Self)^.clr := $00000001
  55334. else
  55335. pTDefRegMap(@Self)^.&set := $00000001;
  55336. end;
  55337. function TCVR_CVRCON.getCVR0 : TBits_1; inline;
  55338. begin
  55339. getCVR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55340. end;
  55341. procedure TCVR_CVRCON.setCVR1; inline;
  55342. begin
  55343. pTDefRegMap(@Self)^.&set := $00000002;
  55344. end;
  55345. procedure TCVR_CVRCON.clearCVR1; inline;
  55346. begin
  55347. pTDefRegMap(@Self)^.clr := $00000002;
  55348. end;
  55349. procedure TCVR_CVRCON.setCVR1(thebits : TBits_1); inline;
  55350. begin
  55351. if thebits = 0 then
  55352. pTDefRegMap(@Self)^.clr := $00000002
  55353. else
  55354. pTDefRegMap(@Self)^.&set := $00000002;
  55355. end;
  55356. function TCVR_CVRCON.getCVR1 : TBits_1; inline;
  55357. begin
  55358. getCVR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55359. end;
  55360. procedure TCVR_CVRCON.setCVR2; inline;
  55361. begin
  55362. pTDefRegMap(@Self)^.&set := $00000004;
  55363. end;
  55364. procedure TCVR_CVRCON.clearCVR2; inline;
  55365. begin
  55366. pTDefRegMap(@Self)^.clr := $00000004;
  55367. end;
  55368. procedure TCVR_CVRCON.setCVR2(thebits : TBits_1); inline;
  55369. begin
  55370. if thebits = 0 then
  55371. pTDefRegMap(@Self)^.clr := $00000004
  55372. else
  55373. pTDefRegMap(@Self)^.&set := $00000004;
  55374. end;
  55375. function TCVR_CVRCON.getCVR2 : TBits_1; inline;
  55376. begin
  55377. getCVR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55378. end;
  55379. procedure TCVR_CVRCON.setCVR3; inline;
  55380. begin
  55381. pTDefRegMap(@Self)^.&set := $00000008;
  55382. end;
  55383. procedure TCVR_CVRCON.clearCVR3; inline;
  55384. begin
  55385. pTDefRegMap(@Self)^.clr := $00000008;
  55386. end;
  55387. procedure TCVR_CVRCON.setCVR3(thebits : TBits_1); inline;
  55388. begin
  55389. if thebits = 0 then
  55390. pTDefRegMap(@Self)^.clr := $00000008
  55391. else
  55392. pTDefRegMap(@Self)^.&set := $00000008;
  55393. end;
  55394. function TCVR_CVRCON.getCVR3 : TBits_1; inline;
  55395. begin
  55396. getCVR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55397. end;
  55398. procedure TCVR_CVRCON.setw(thebits : TBits_32); inline;
  55399. begin
  55400. pTDefRegMap(@Self)^.val := thebits;
  55401. end;
  55402. function TCVR_CVRCON.getw : TBits_32; inline;
  55403. begin
  55404. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55405. end;
  55406. procedure TCMP_CM1CON.setCCH(thebits : TBits_2); inline;
  55407. begin
  55408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  55409. end;
  55410. function TCMP_CM1CON.getCCH : TBits_2; inline;
  55411. begin
  55412. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  55413. end;
  55414. procedure TCMP_CM1CON.setCREF; inline;
  55415. begin
  55416. pTDefRegMap(@Self)^.&set := $00000010;
  55417. end;
  55418. procedure TCMP_CM1CON.clearCREF; inline;
  55419. begin
  55420. pTDefRegMap(@Self)^.clr := $00000010;
  55421. end;
  55422. procedure TCMP_CM1CON.setCREF(thebits : TBits_1); inline;
  55423. begin
  55424. if thebits = 0 then
  55425. pTDefRegMap(@Self)^.clr := $00000010
  55426. else
  55427. pTDefRegMap(@Self)^.&set := $00000010;
  55428. end;
  55429. function TCMP_CM1CON.getCREF : TBits_1; inline;
  55430. begin
  55431. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55432. end;
  55433. procedure TCMP_CM1CON.setEVPOL(thebits : TBits_2); inline;
  55434. begin
  55435. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  55436. end;
  55437. function TCMP_CM1CON.getEVPOL : TBits_2; inline;
  55438. begin
  55439. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  55440. end;
  55441. procedure TCMP_CM1CON.setCOUT; inline;
  55442. begin
  55443. pTDefRegMap(@Self)^.&set := $00000100;
  55444. end;
  55445. procedure TCMP_CM1CON.clearCOUT; inline;
  55446. begin
  55447. pTDefRegMap(@Self)^.clr := $00000100;
  55448. end;
  55449. procedure TCMP_CM1CON.setCOUT(thebits : TBits_1); inline;
  55450. begin
  55451. if thebits = 0 then
  55452. pTDefRegMap(@Self)^.clr := $00000100
  55453. else
  55454. pTDefRegMap(@Self)^.&set := $00000100;
  55455. end;
  55456. function TCMP_CM1CON.getCOUT : TBits_1; inline;
  55457. begin
  55458. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55459. end;
  55460. procedure TCMP_CM1CON.setCPOL; inline;
  55461. begin
  55462. pTDefRegMap(@Self)^.&set := $00002000;
  55463. end;
  55464. procedure TCMP_CM1CON.clearCPOL; inline;
  55465. begin
  55466. pTDefRegMap(@Self)^.clr := $00002000;
  55467. end;
  55468. procedure TCMP_CM1CON.setCPOL(thebits : TBits_1); inline;
  55469. begin
  55470. if thebits = 0 then
  55471. pTDefRegMap(@Self)^.clr := $00002000
  55472. else
  55473. pTDefRegMap(@Self)^.&set := $00002000;
  55474. end;
  55475. function TCMP_CM1CON.getCPOL : TBits_1; inline;
  55476. begin
  55477. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55478. end;
  55479. procedure TCMP_CM1CON.setCOE; inline;
  55480. begin
  55481. pTDefRegMap(@Self)^.&set := $00004000;
  55482. end;
  55483. procedure TCMP_CM1CON.clearCOE; inline;
  55484. begin
  55485. pTDefRegMap(@Self)^.clr := $00004000;
  55486. end;
  55487. procedure TCMP_CM1CON.setCOE(thebits : TBits_1); inline;
  55488. begin
  55489. if thebits = 0 then
  55490. pTDefRegMap(@Self)^.clr := $00004000
  55491. else
  55492. pTDefRegMap(@Self)^.&set := $00004000;
  55493. end;
  55494. function TCMP_CM1CON.getCOE : TBits_1; inline;
  55495. begin
  55496. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55497. end;
  55498. procedure TCMP_CM1CON.setON; inline;
  55499. begin
  55500. pTDefRegMap(@Self)^.&set := $00008000;
  55501. end;
  55502. procedure TCMP_CM1CON.clearON; inline;
  55503. begin
  55504. pTDefRegMap(@Self)^.clr := $00008000;
  55505. end;
  55506. procedure TCMP_CM1CON.setON(thebits : TBits_1); inline;
  55507. begin
  55508. if thebits = 0 then
  55509. pTDefRegMap(@Self)^.clr := $00008000
  55510. else
  55511. pTDefRegMap(@Self)^.&set := $00008000;
  55512. end;
  55513. function TCMP_CM1CON.getON : TBits_1; inline;
  55514. begin
  55515. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55516. end;
  55517. procedure TCMP_CM1CON.setCCH0; inline;
  55518. begin
  55519. pTDefRegMap(@Self)^.&set := $00000001;
  55520. end;
  55521. procedure TCMP_CM1CON.clearCCH0; inline;
  55522. begin
  55523. pTDefRegMap(@Self)^.clr := $00000001;
  55524. end;
  55525. procedure TCMP_CM1CON.setCCH0(thebits : TBits_1); inline;
  55526. begin
  55527. if thebits = 0 then
  55528. pTDefRegMap(@Self)^.clr := $00000001
  55529. else
  55530. pTDefRegMap(@Self)^.&set := $00000001;
  55531. end;
  55532. function TCMP_CM1CON.getCCH0 : TBits_1; inline;
  55533. begin
  55534. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55535. end;
  55536. procedure TCMP_CM1CON.setCCH1; inline;
  55537. begin
  55538. pTDefRegMap(@Self)^.&set := $00000002;
  55539. end;
  55540. procedure TCMP_CM1CON.clearCCH1; inline;
  55541. begin
  55542. pTDefRegMap(@Self)^.clr := $00000002;
  55543. end;
  55544. procedure TCMP_CM1CON.setCCH1(thebits : TBits_1); inline;
  55545. begin
  55546. if thebits = 0 then
  55547. pTDefRegMap(@Self)^.clr := $00000002
  55548. else
  55549. pTDefRegMap(@Self)^.&set := $00000002;
  55550. end;
  55551. function TCMP_CM1CON.getCCH1 : TBits_1; inline;
  55552. begin
  55553. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55554. end;
  55555. procedure TCMP_CM1CON.setEVPOL0; inline;
  55556. begin
  55557. pTDefRegMap(@Self)^.&set := $00000040;
  55558. end;
  55559. procedure TCMP_CM1CON.clearEVPOL0; inline;
  55560. begin
  55561. pTDefRegMap(@Self)^.clr := $00000040;
  55562. end;
  55563. procedure TCMP_CM1CON.setEVPOL0(thebits : TBits_1); inline;
  55564. begin
  55565. if thebits = 0 then
  55566. pTDefRegMap(@Self)^.clr := $00000040
  55567. else
  55568. pTDefRegMap(@Self)^.&set := $00000040;
  55569. end;
  55570. function TCMP_CM1CON.getEVPOL0 : TBits_1; inline;
  55571. begin
  55572. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55573. end;
  55574. procedure TCMP_CM1CON.setEVPOL1; inline;
  55575. begin
  55576. pTDefRegMap(@Self)^.&set := $00000080;
  55577. end;
  55578. procedure TCMP_CM1CON.clearEVPOL1; inline;
  55579. begin
  55580. pTDefRegMap(@Self)^.clr := $00000080;
  55581. end;
  55582. procedure TCMP_CM1CON.setEVPOL1(thebits : TBits_1); inline;
  55583. begin
  55584. if thebits = 0 then
  55585. pTDefRegMap(@Self)^.clr := $00000080
  55586. else
  55587. pTDefRegMap(@Self)^.&set := $00000080;
  55588. end;
  55589. function TCMP_CM1CON.getEVPOL1 : TBits_1; inline;
  55590. begin
  55591. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55592. end;
  55593. procedure TCMP_CM1CON.setw(thebits : TBits_32); inline;
  55594. begin
  55595. pTDefRegMap(@Self)^.val := thebits;
  55596. end;
  55597. function TCMP_CM1CON.getw : TBits_32; inline;
  55598. begin
  55599. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55600. end;
  55601. procedure TCMP_CM2CON.setCCH(thebits : TBits_2); inline;
  55602. begin
  55603. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  55604. end;
  55605. function TCMP_CM2CON.getCCH : TBits_2; inline;
  55606. begin
  55607. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  55608. end;
  55609. procedure TCMP_CM2CON.setCREF; inline;
  55610. begin
  55611. pTDefRegMap(@Self)^.&set := $00000010;
  55612. end;
  55613. procedure TCMP_CM2CON.clearCREF; inline;
  55614. begin
  55615. pTDefRegMap(@Self)^.clr := $00000010;
  55616. end;
  55617. procedure TCMP_CM2CON.setCREF(thebits : TBits_1); inline;
  55618. begin
  55619. if thebits = 0 then
  55620. pTDefRegMap(@Self)^.clr := $00000010
  55621. else
  55622. pTDefRegMap(@Self)^.&set := $00000010;
  55623. end;
  55624. function TCMP_CM2CON.getCREF : TBits_1; inline;
  55625. begin
  55626. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55627. end;
  55628. procedure TCMP_CM2CON.setEVPOL(thebits : TBits_2); inline;
  55629. begin
  55630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  55631. end;
  55632. function TCMP_CM2CON.getEVPOL : TBits_2; inline;
  55633. begin
  55634. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  55635. end;
  55636. procedure TCMP_CM2CON.setCOUT; inline;
  55637. begin
  55638. pTDefRegMap(@Self)^.&set := $00000100;
  55639. end;
  55640. procedure TCMP_CM2CON.clearCOUT; inline;
  55641. begin
  55642. pTDefRegMap(@Self)^.clr := $00000100;
  55643. end;
  55644. procedure TCMP_CM2CON.setCOUT(thebits : TBits_1); inline;
  55645. begin
  55646. if thebits = 0 then
  55647. pTDefRegMap(@Self)^.clr := $00000100
  55648. else
  55649. pTDefRegMap(@Self)^.&set := $00000100;
  55650. end;
  55651. function TCMP_CM2CON.getCOUT : TBits_1; inline;
  55652. begin
  55653. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55654. end;
  55655. procedure TCMP_CM2CON.setCPOL; inline;
  55656. begin
  55657. pTDefRegMap(@Self)^.&set := $00002000;
  55658. end;
  55659. procedure TCMP_CM2CON.clearCPOL; inline;
  55660. begin
  55661. pTDefRegMap(@Self)^.clr := $00002000;
  55662. end;
  55663. procedure TCMP_CM2CON.setCPOL(thebits : TBits_1); inline;
  55664. begin
  55665. if thebits = 0 then
  55666. pTDefRegMap(@Self)^.clr := $00002000
  55667. else
  55668. pTDefRegMap(@Self)^.&set := $00002000;
  55669. end;
  55670. function TCMP_CM2CON.getCPOL : TBits_1; inline;
  55671. begin
  55672. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55673. end;
  55674. procedure TCMP_CM2CON.setCOE; inline;
  55675. begin
  55676. pTDefRegMap(@Self)^.&set := $00004000;
  55677. end;
  55678. procedure TCMP_CM2CON.clearCOE; inline;
  55679. begin
  55680. pTDefRegMap(@Self)^.clr := $00004000;
  55681. end;
  55682. procedure TCMP_CM2CON.setCOE(thebits : TBits_1); inline;
  55683. begin
  55684. if thebits = 0 then
  55685. pTDefRegMap(@Self)^.clr := $00004000
  55686. else
  55687. pTDefRegMap(@Self)^.&set := $00004000;
  55688. end;
  55689. function TCMP_CM2CON.getCOE : TBits_1; inline;
  55690. begin
  55691. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55692. end;
  55693. procedure TCMP_CM2CON.setON; inline;
  55694. begin
  55695. pTDefRegMap(@Self)^.&set := $00008000;
  55696. end;
  55697. procedure TCMP_CM2CON.clearON; inline;
  55698. begin
  55699. pTDefRegMap(@Self)^.clr := $00008000;
  55700. end;
  55701. procedure TCMP_CM2CON.setON(thebits : TBits_1); inline;
  55702. begin
  55703. if thebits = 0 then
  55704. pTDefRegMap(@Self)^.clr := $00008000
  55705. else
  55706. pTDefRegMap(@Self)^.&set := $00008000;
  55707. end;
  55708. function TCMP_CM2CON.getON : TBits_1; inline;
  55709. begin
  55710. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55711. end;
  55712. procedure TCMP_CM2CON.setCCH0; inline;
  55713. begin
  55714. pTDefRegMap(@Self)^.&set := $00000001;
  55715. end;
  55716. procedure TCMP_CM2CON.clearCCH0; inline;
  55717. begin
  55718. pTDefRegMap(@Self)^.clr := $00000001;
  55719. end;
  55720. procedure TCMP_CM2CON.setCCH0(thebits : TBits_1); inline;
  55721. begin
  55722. if thebits = 0 then
  55723. pTDefRegMap(@Self)^.clr := $00000001
  55724. else
  55725. pTDefRegMap(@Self)^.&set := $00000001;
  55726. end;
  55727. function TCMP_CM2CON.getCCH0 : TBits_1; inline;
  55728. begin
  55729. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55730. end;
  55731. procedure TCMP_CM2CON.setCCH1; inline;
  55732. begin
  55733. pTDefRegMap(@Self)^.&set := $00000002;
  55734. end;
  55735. procedure TCMP_CM2CON.clearCCH1; inline;
  55736. begin
  55737. pTDefRegMap(@Self)^.clr := $00000002;
  55738. end;
  55739. procedure TCMP_CM2CON.setCCH1(thebits : TBits_1); inline;
  55740. begin
  55741. if thebits = 0 then
  55742. pTDefRegMap(@Self)^.clr := $00000002
  55743. else
  55744. pTDefRegMap(@Self)^.&set := $00000002;
  55745. end;
  55746. function TCMP_CM2CON.getCCH1 : TBits_1; inline;
  55747. begin
  55748. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55749. end;
  55750. procedure TCMP_CM2CON.setEVPOL0; inline;
  55751. begin
  55752. pTDefRegMap(@Self)^.&set := $00000040;
  55753. end;
  55754. procedure TCMP_CM2CON.clearEVPOL0; inline;
  55755. begin
  55756. pTDefRegMap(@Self)^.clr := $00000040;
  55757. end;
  55758. procedure TCMP_CM2CON.setEVPOL0(thebits : TBits_1); inline;
  55759. begin
  55760. if thebits = 0 then
  55761. pTDefRegMap(@Self)^.clr := $00000040
  55762. else
  55763. pTDefRegMap(@Self)^.&set := $00000040;
  55764. end;
  55765. function TCMP_CM2CON.getEVPOL0 : TBits_1; inline;
  55766. begin
  55767. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55768. end;
  55769. procedure TCMP_CM2CON.setEVPOL1; inline;
  55770. begin
  55771. pTDefRegMap(@Self)^.&set := $00000080;
  55772. end;
  55773. procedure TCMP_CM2CON.clearEVPOL1; inline;
  55774. begin
  55775. pTDefRegMap(@Self)^.clr := $00000080;
  55776. end;
  55777. procedure TCMP_CM2CON.setEVPOL1(thebits : TBits_1); inline;
  55778. begin
  55779. if thebits = 0 then
  55780. pTDefRegMap(@Self)^.clr := $00000080
  55781. else
  55782. pTDefRegMap(@Self)^.&set := $00000080;
  55783. end;
  55784. function TCMP_CM2CON.getEVPOL1 : TBits_1; inline;
  55785. begin
  55786. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55787. end;
  55788. procedure TCMP_CM2CON.setw(thebits : TBits_32); inline;
  55789. begin
  55790. pTDefRegMap(@Self)^.val := thebits;
  55791. end;
  55792. function TCMP_CM2CON.getw : TBits_32; inline;
  55793. begin
  55794. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55795. end;
  55796. procedure TCMP_CMSTAT.setC1OUT; inline;
  55797. begin
  55798. pTDefRegMap(@Self)^.&set := $00000001;
  55799. end;
  55800. procedure TCMP_CMSTAT.clearC1OUT; inline;
  55801. begin
  55802. pTDefRegMap(@Self)^.clr := $00000001;
  55803. end;
  55804. procedure TCMP_CMSTAT.setC1OUT(thebits : TBits_1); inline;
  55805. begin
  55806. if thebits = 0 then
  55807. pTDefRegMap(@Self)^.clr := $00000001
  55808. else
  55809. pTDefRegMap(@Self)^.&set := $00000001;
  55810. end;
  55811. function TCMP_CMSTAT.getC1OUT : TBits_1; inline;
  55812. begin
  55813. getC1OUT := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55814. end;
  55815. procedure TCMP_CMSTAT.setC2OUT; inline;
  55816. begin
  55817. pTDefRegMap(@Self)^.&set := $00000002;
  55818. end;
  55819. procedure TCMP_CMSTAT.clearC2OUT; inline;
  55820. begin
  55821. pTDefRegMap(@Self)^.clr := $00000002;
  55822. end;
  55823. procedure TCMP_CMSTAT.setC2OUT(thebits : TBits_1); inline;
  55824. begin
  55825. if thebits = 0 then
  55826. pTDefRegMap(@Self)^.clr := $00000002
  55827. else
  55828. pTDefRegMap(@Self)^.&set := $00000002;
  55829. end;
  55830. function TCMP_CMSTAT.getC2OUT : TBits_1; inline;
  55831. begin
  55832. getC2OUT := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55833. end;
  55834. procedure TCMP_CMSTAT.setSIDL; inline;
  55835. begin
  55836. pTDefRegMap(@Self)^.&set := $00002000;
  55837. end;
  55838. procedure TCMP_CMSTAT.clearSIDL; inline;
  55839. begin
  55840. pTDefRegMap(@Self)^.clr := $00002000;
  55841. end;
  55842. procedure TCMP_CMSTAT.setSIDL(thebits : TBits_1); inline;
  55843. begin
  55844. if thebits = 0 then
  55845. pTDefRegMap(@Self)^.clr := $00002000
  55846. else
  55847. pTDefRegMap(@Self)^.&set := $00002000;
  55848. end;
  55849. function TCMP_CMSTAT.getSIDL : TBits_1; inline;
  55850. begin
  55851. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55852. end;
  55853. procedure TCMP_CMSTAT.setw(thebits : TBits_32); inline;
  55854. begin
  55855. pTDefRegMap(@Self)^.val := thebits;
  55856. end;
  55857. function TCMP_CMSTAT.getw : TBits_32; inline;
  55858. begin
  55859. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55860. end;
  55861. procedure TOSC_OSCCON.setOSWEN; inline;
  55862. begin
  55863. pTDefRegMap(@Self)^.&set := $00000001;
  55864. end;
  55865. procedure TOSC_OSCCON.clearOSWEN; inline;
  55866. begin
  55867. pTDefRegMap(@Self)^.clr := $00000001;
  55868. end;
  55869. procedure TOSC_OSCCON.setOSWEN(thebits : TBits_1); inline;
  55870. begin
  55871. if thebits = 0 then
  55872. pTDefRegMap(@Self)^.clr := $00000001
  55873. else
  55874. pTDefRegMap(@Self)^.&set := $00000001;
  55875. end;
  55876. function TOSC_OSCCON.getOSWEN : TBits_1; inline;
  55877. begin
  55878. getOSWEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55879. end;
  55880. procedure TOSC_OSCCON.setSOSCEN; inline;
  55881. begin
  55882. pTDefRegMap(@Self)^.&set := $00000002;
  55883. end;
  55884. procedure TOSC_OSCCON.clearSOSCEN; inline;
  55885. begin
  55886. pTDefRegMap(@Self)^.clr := $00000002;
  55887. end;
  55888. procedure TOSC_OSCCON.setSOSCEN(thebits : TBits_1); inline;
  55889. begin
  55890. if thebits = 0 then
  55891. pTDefRegMap(@Self)^.clr := $00000002
  55892. else
  55893. pTDefRegMap(@Self)^.&set := $00000002;
  55894. end;
  55895. function TOSC_OSCCON.getSOSCEN : TBits_1; inline;
  55896. begin
  55897. getSOSCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55898. end;
  55899. procedure TOSC_OSCCON.setUFRCEN; inline;
  55900. begin
  55901. pTDefRegMap(@Self)^.&set := $00000004;
  55902. end;
  55903. procedure TOSC_OSCCON.clearUFRCEN; inline;
  55904. begin
  55905. pTDefRegMap(@Self)^.clr := $00000004;
  55906. end;
  55907. procedure TOSC_OSCCON.setUFRCEN(thebits : TBits_1); inline;
  55908. begin
  55909. if thebits = 0 then
  55910. pTDefRegMap(@Self)^.clr := $00000004
  55911. else
  55912. pTDefRegMap(@Self)^.&set := $00000004;
  55913. end;
  55914. function TOSC_OSCCON.getUFRCEN : TBits_1; inline;
  55915. begin
  55916. getUFRCEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55917. end;
  55918. procedure TOSC_OSCCON.setCF; inline;
  55919. begin
  55920. pTDefRegMap(@Self)^.&set := $00000008;
  55921. end;
  55922. procedure TOSC_OSCCON.clearCF; inline;
  55923. begin
  55924. pTDefRegMap(@Self)^.clr := $00000008;
  55925. end;
  55926. procedure TOSC_OSCCON.setCF(thebits : TBits_1); inline;
  55927. begin
  55928. if thebits = 0 then
  55929. pTDefRegMap(@Self)^.clr := $00000008
  55930. else
  55931. pTDefRegMap(@Self)^.&set := $00000008;
  55932. end;
  55933. function TOSC_OSCCON.getCF : TBits_1; inline;
  55934. begin
  55935. getCF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55936. end;
  55937. procedure TOSC_OSCCON.setSLPEN; inline;
  55938. begin
  55939. pTDefRegMap(@Self)^.&set := $00000010;
  55940. end;
  55941. procedure TOSC_OSCCON.clearSLPEN; inline;
  55942. begin
  55943. pTDefRegMap(@Self)^.clr := $00000010;
  55944. end;
  55945. procedure TOSC_OSCCON.setSLPEN(thebits : TBits_1); inline;
  55946. begin
  55947. if thebits = 0 then
  55948. pTDefRegMap(@Self)^.clr := $00000010
  55949. else
  55950. pTDefRegMap(@Self)^.&set := $00000010;
  55951. end;
  55952. function TOSC_OSCCON.getSLPEN : TBits_1; inline;
  55953. begin
  55954. getSLPEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55955. end;
  55956. procedure TOSC_OSCCON.setSLOCK; inline;
  55957. begin
  55958. pTDefRegMap(@Self)^.&set := $00000020;
  55959. end;
  55960. procedure TOSC_OSCCON.clearSLOCK; inline;
  55961. begin
  55962. pTDefRegMap(@Self)^.clr := $00000020;
  55963. end;
  55964. procedure TOSC_OSCCON.setSLOCK(thebits : TBits_1); inline;
  55965. begin
  55966. if thebits = 0 then
  55967. pTDefRegMap(@Self)^.clr := $00000020
  55968. else
  55969. pTDefRegMap(@Self)^.&set := $00000020;
  55970. end;
  55971. function TOSC_OSCCON.getSLOCK : TBits_1; inline;
  55972. begin
  55973. getSLOCK := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55974. end;
  55975. procedure TOSC_OSCCON.setULOCK; inline;
  55976. begin
  55977. pTDefRegMap(@Self)^.&set := $00000040;
  55978. end;
  55979. procedure TOSC_OSCCON.clearULOCK; inline;
  55980. begin
  55981. pTDefRegMap(@Self)^.clr := $00000040;
  55982. end;
  55983. procedure TOSC_OSCCON.setULOCK(thebits : TBits_1); inline;
  55984. begin
  55985. if thebits = 0 then
  55986. pTDefRegMap(@Self)^.clr := $00000040
  55987. else
  55988. pTDefRegMap(@Self)^.&set := $00000040;
  55989. end;
  55990. function TOSC_OSCCON.getULOCK : TBits_1; inline;
  55991. begin
  55992. getULOCK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55993. end;
  55994. procedure TOSC_OSCCON.setCLKLOCK; inline;
  55995. begin
  55996. pTDefRegMap(@Self)^.&set := $00000080;
  55997. end;
  55998. procedure TOSC_OSCCON.clearCLKLOCK; inline;
  55999. begin
  56000. pTDefRegMap(@Self)^.clr := $00000080;
  56001. end;
  56002. procedure TOSC_OSCCON.setCLKLOCK(thebits : TBits_1); inline;
  56003. begin
  56004. if thebits = 0 then
  56005. pTDefRegMap(@Self)^.clr := $00000080
  56006. else
  56007. pTDefRegMap(@Self)^.&set := $00000080;
  56008. end;
  56009. function TOSC_OSCCON.getCLKLOCK : TBits_1; inline;
  56010. begin
  56011. getCLKLOCK := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56012. end;
  56013. procedure TOSC_OSCCON.setNOSC(thebits : TBits_3); inline;
  56014. begin
  56015. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  56016. end;
  56017. function TOSC_OSCCON.getNOSC : TBits_3; inline;
  56018. begin
  56019. getNOSC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  56020. end;
  56021. procedure TOSC_OSCCON.setCOSC(thebits : TBits_3); inline;
  56022. begin
  56023. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF8FFF or ( thebits shl 12 );
  56024. end;
  56025. function TOSC_OSCCON.getCOSC : TBits_3; inline;
  56026. begin
  56027. getCOSC := (pTDefRegMap(@Self)^.val and $00007000) shr 12;
  56028. end;
  56029. procedure TOSC_OSCCON.setPLLMULT(thebits : TBits_3); inline;
  56030. begin
  56031. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  56032. end;
  56033. function TOSC_OSCCON.getPLLMULT : TBits_3; inline;
  56034. begin
  56035. getPLLMULT := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  56036. end;
  56037. procedure TOSC_OSCCON.setPBDIV(thebits : TBits_2); inline;
  56038. begin
  56039. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE7FFFF or ( thebits shl 19 );
  56040. end;
  56041. function TOSC_OSCCON.getPBDIV : TBits_2; inline;
  56042. begin
  56043. getPBDIV := (pTDefRegMap(@Self)^.val and $00180000) shr 19;
  56044. end;
  56045. procedure TOSC_OSCCON.setSOSCRDY; inline;
  56046. begin
  56047. pTDefRegMap(@Self)^.&set := $00400000;
  56048. end;
  56049. procedure TOSC_OSCCON.clearSOSCRDY; inline;
  56050. begin
  56051. pTDefRegMap(@Self)^.clr := $00400000;
  56052. end;
  56053. procedure TOSC_OSCCON.setSOSCRDY(thebits : TBits_1); inline;
  56054. begin
  56055. if thebits = 0 then
  56056. pTDefRegMap(@Self)^.clr := $00400000
  56057. else
  56058. pTDefRegMap(@Self)^.&set := $00400000;
  56059. end;
  56060. function TOSC_OSCCON.getSOSCRDY : TBits_1; inline;
  56061. begin
  56062. getSOSCRDY := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  56063. end;
  56064. procedure TOSC_OSCCON.setFRCDIV(thebits : TBits_3); inline;
  56065. begin
  56066. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  56067. end;
  56068. function TOSC_OSCCON.getFRCDIV : TBits_3; inline;
  56069. begin
  56070. getFRCDIV := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  56071. end;
  56072. procedure TOSC_OSCCON.setPLLODIV(thebits : TBits_3); inline;
  56073. begin
  56074. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C7FFFFFF or ( thebits shl 27 );
  56075. end;
  56076. function TOSC_OSCCON.getPLLODIV : TBits_3; inline;
  56077. begin
  56078. getPLLODIV := (pTDefRegMap(@Self)^.val and $38000000) shr 27;
  56079. end;
  56080. procedure TOSC_OSCCON.setNOSC0; inline;
  56081. begin
  56082. pTDefRegMap(@Self)^.&set := $00000100;
  56083. end;
  56084. procedure TOSC_OSCCON.clearNOSC0; inline;
  56085. begin
  56086. pTDefRegMap(@Self)^.clr := $00000100;
  56087. end;
  56088. procedure TOSC_OSCCON.setNOSC0(thebits : TBits_1); inline;
  56089. begin
  56090. if thebits = 0 then
  56091. pTDefRegMap(@Self)^.clr := $00000100
  56092. else
  56093. pTDefRegMap(@Self)^.&set := $00000100;
  56094. end;
  56095. function TOSC_OSCCON.getNOSC0 : TBits_1; inline;
  56096. begin
  56097. getNOSC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56098. end;
  56099. procedure TOSC_OSCCON.setNOSC1; inline;
  56100. begin
  56101. pTDefRegMap(@Self)^.&set := $00000200;
  56102. end;
  56103. procedure TOSC_OSCCON.clearNOSC1; inline;
  56104. begin
  56105. pTDefRegMap(@Self)^.clr := $00000200;
  56106. end;
  56107. procedure TOSC_OSCCON.setNOSC1(thebits : TBits_1); inline;
  56108. begin
  56109. if thebits = 0 then
  56110. pTDefRegMap(@Self)^.clr := $00000200
  56111. else
  56112. pTDefRegMap(@Self)^.&set := $00000200;
  56113. end;
  56114. function TOSC_OSCCON.getNOSC1 : TBits_1; inline;
  56115. begin
  56116. getNOSC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56117. end;
  56118. procedure TOSC_OSCCON.setNOSC2; inline;
  56119. begin
  56120. pTDefRegMap(@Self)^.&set := $00000400;
  56121. end;
  56122. procedure TOSC_OSCCON.clearNOSC2; inline;
  56123. begin
  56124. pTDefRegMap(@Self)^.clr := $00000400;
  56125. end;
  56126. procedure TOSC_OSCCON.setNOSC2(thebits : TBits_1); inline;
  56127. begin
  56128. if thebits = 0 then
  56129. pTDefRegMap(@Self)^.clr := $00000400
  56130. else
  56131. pTDefRegMap(@Self)^.&set := $00000400;
  56132. end;
  56133. function TOSC_OSCCON.getNOSC2 : TBits_1; inline;
  56134. begin
  56135. getNOSC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56136. end;
  56137. procedure TOSC_OSCCON.setCOSC0; inline;
  56138. begin
  56139. pTDefRegMap(@Self)^.&set := $00001000;
  56140. end;
  56141. procedure TOSC_OSCCON.clearCOSC0; inline;
  56142. begin
  56143. pTDefRegMap(@Self)^.clr := $00001000;
  56144. end;
  56145. procedure TOSC_OSCCON.setCOSC0(thebits : TBits_1); inline;
  56146. begin
  56147. if thebits = 0 then
  56148. pTDefRegMap(@Self)^.clr := $00001000
  56149. else
  56150. pTDefRegMap(@Self)^.&set := $00001000;
  56151. end;
  56152. function TOSC_OSCCON.getCOSC0 : TBits_1; inline;
  56153. begin
  56154. getCOSC0 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56155. end;
  56156. procedure TOSC_OSCCON.setCOSC1; inline;
  56157. begin
  56158. pTDefRegMap(@Self)^.&set := $00002000;
  56159. end;
  56160. procedure TOSC_OSCCON.clearCOSC1; inline;
  56161. begin
  56162. pTDefRegMap(@Self)^.clr := $00002000;
  56163. end;
  56164. procedure TOSC_OSCCON.setCOSC1(thebits : TBits_1); inline;
  56165. begin
  56166. if thebits = 0 then
  56167. pTDefRegMap(@Self)^.clr := $00002000
  56168. else
  56169. pTDefRegMap(@Self)^.&set := $00002000;
  56170. end;
  56171. function TOSC_OSCCON.getCOSC1 : TBits_1; inline;
  56172. begin
  56173. getCOSC1 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56174. end;
  56175. procedure TOSC_OSCCON.setCOSC2; inline;
  56176. begin
  56177. pTDefRegMap(@Self)^.&set := $00004000;
  56178. end;
  56179. procedure TOSC_OSCCON.clearCOSC2; inline;
  56180. begin
  56181. pTDefRegMap(@Self)^.clr := $00004000;
  56182. end;
  56183. procedure TOSC_OSCCON.setCOSC2(thebits : TBits_1); inline;
  56184. begin
  56185. if thebits = 0 then
  56186. pTDefRegMap(@Self)^.clr := $00004000
  56187. else
  56188. pTDefRegMap(@Self)^.&set := $00004000;
  56189. end;
  56190. function TOSC_OSCCON.getCOSC2 : TBits_1; inline;
  56191. begin
  56192. getCOSC2 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56193. end;
  56194. procedure TOSC_OSCCON.setPLLMULT0; inline;
  56195. begin
  56196. pTDefRegMap(@Self)^.&set := $00010000;
  56197. end;
  56198. procedure TOSC_OSCCON.clearPLLMULT0; inline;
  56199. begin
  56200. pTDefRegMap(@Self)^.clr := $00010000;
  56201. end;
  56202. procedure TOSC_OSCCON.setPLLMULT0(thebits : TBits_1); inline;
  56203. begin
  56204. if thebits = 0 then
  56205. pTDefRegMap(@Self)^.clr := $00010000
  56206. else
  56207. pTDefRegMap(@Self)^.&set := $00010000;
  56208. end;
  56209. function TOSC_OSCCON.getPLLMULT0 : TBits_1; inline;
  56210. begin
  56211. getPLLMULT0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  56212. end;
  56213. procedure TOSC_OSCCON.setPLLMULT1; inline;
  56214. begin
  56215. pTDefRegMap(@Self)^.&set := $00020000;
  56216. end;
  56217. procedure TOSC_OSCCON.clearPLLMULT1; inline;
  56218. begin
  56219. pTDefRegMap(@Self)^.clr := $00020000;
  56220. end;
  56221. procedure TOSC_OSCCON.setPLLMULT1(thebits : TBits_1); inline;
  56222. begin
  56223. if thebits = 0 then
  56224. pTDefRegMap(@Self)^.clr := $00020000
  56225. else
  56226. pTDefRegMap(@Self)^.&set := $00020000;
  56227. end;
  56228. function TOSC_OSCCON.getPLLMULT1 : TBits_1; inline;
  56229. begin
  56230. getPLLMULT1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  56231. end;
  56232. procedure TOSC_OSCCON.setPLLMULT2; inline;
  56233. begin
  56234. pTDefRegMap(@Self)^.&set := $00040000;
  56235. end;
  56236. procedure TOSC_OSCCON.clearPLLMULT2; inline;
  56237. begin
  56238. pTDefRegMap(@Self)^.clr := $00040000;
  56239. end;
  56240. procedure TOSC_OSCCON.setPLLMULT2(thebits : TBits_1); inline;
  56241. begin
  56242. if thebits = 0 then
  56243. pTDefRegMap(@Self)^.clr := $00040000
  56244. else
  56245. pTDefRegMap(@Self)^.&set := $00040000;
  56246. end;
  56247. function TOSC_OSCCON.getPLLMULT2 : TBits_1; inline;
  56248. begin
  56249. getPLLMULT2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  56250. end;
  56251. procedure TOSC_OSCCON.setPBDIV0; inline;
  56252. begin
  56253. pTDefRegMap(@Self)^.&set := $00080000;
  56254. end;
  56255. procedure TOSC_OSCCON.clearPBDIV0; inline;
  56256. begin
  56257. pTDefRegMap(@Self)^.clr := $00080000;
  56258. end;
  56259. procedure TOSC_OSCCON.setPBDIV0(thebits : TBits_1); inline;
  56260. begin
  56261. if thebits = 0 then
  56262. pTDefRegMap(@Self)^.clr := $00080000
  56263. else
  56264. pTDefRegMap(@Self)^.&set := $00080000;
  56265. end;
  56266. function TOSC_OSCCON.getPBDIV0 : TBits_1; inline;
  56267. begin
  56268. getPBDIV0 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  56269. end;
  56270. procedure TOSC_OSCCON.setPBDIV1; inline;
  56271. begin
  56272. pTDefRegMap(@Self)^.&set := $00100000;
  56273. end;
  56274. procedure TOSC_OSCCON.clearPBDIV1; inline;
  56275. begin
  56276. pTDefRegMap(@Self)^.clr := $00100000;
  56277. end;
  56278. procedure TOSC_OSCCON.setPBDIV1(thebits : TBits_1); inline;
  56279. begin
  56280. if thebits = 0 then
  56281. pTDefRegMap(@Self)^.clr := $00100000
  56282. else
  56283. pTDefRegMap(@Self)^.&set := $00100000;
  56284. end;
  56285. function TOSC_OSCCON.getPBDIV1 : TBits_1; inline;
  56286. begin
  56287. getPBDIV1 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  56288. end;
  56289. procedure TOSC_OSCCON.setFRCDIV0; inline;
  56290. begin
  56291. pTDefRegMap(@Self)^.&set := $01000000;
  56292. end;
  56293. procedure TOSC_OSCCON.clearFRCDIV0; inline;
  56294. begin
  56295. pTDefRegMap(@Self)^.clr := $01000000;
  56296. end;
  56297. procedure TOSC_OSCCON.setFRCDIV0(thebits : TBits_1); inline;
  56298. begin
  56299. if thebits = 0 then
  56300. pTDefRegMap(@Self)^.clr := $01000000
  56301. else
  56302. pTDefRegMap(@Self)^.&set := $01000000;
  56303. end;
  56304. function TOSC_OSCCON.getFRCDIV0 : TBits_1; inline;
  56305. begin
  56306. getFRCDIV0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  56307. end;
  56308. procedure TOSC_OSCCON.setFRCDIV1; inline;
  56309. begin
  56310. pTDefRegMap(@Self)^.&set := $02000000;
  56311. end;
  56312. procedure TOSC_OSCCON.clearFRCDIV1; inline;
  56313. begin
  56314. pTDefRegMap(@Self)^.clr := $02000000;
  56315. end;
  56316. procedure TOSC_OSCCON.setFRCDIV1(thebits : TBits_1); inline;
  56317. begin
  56318. if thebits = 0 then
  56319. pTDefRegMap(@Self)^.clr := $02000000
  56320. else
  56321. pTDefRegMap(@Self)^.&set := $02000000;
  56322. end;
  56323. function TOSC_OSCCON.getFRCDIV1 : TBits_1; inline;
  56324. begin
  56325. getFRCDIV1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  56326. end;
  56327. procedure TOSC_OSCCON.setFRCDIV2; inline;
  56328. begin
  56329. pTDefRegMap(@Self)^.&set := $04000000;
  56330. end;
  56331. procedure TOSC_OSCCON.clearFRCDIV2; inline;
  56332. begin
  56333. pTDefRegMap(@Self)^.clr := $04000000;
  56334. end;
  56335. procedure TOSC_OSCCON.setFRCDIV2(thebits : TBits_1); inline;
  56336. begin
  56337. if thebits = 0 then
  56338. pTDefRegMap(@Self)^.clr := $04000000
  56339. else
  56340. pTDefRegMap(@Self)^.&set := $04000000;
  56341. end;
  56342. function TOSC_OSCCON.getFRCDIV2 : TBits_1; inline;
  56343. begin
  56344. getFRCDIV2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  56345. end;
  56346. procedure TOSC_OSCCON.setPLLODIV0; inline;
  56347. begin
  56348. pTDefRegMap(@Self)^.&set := $08000000;
  56349. end;
  56350. procedure TOSC_OSCCON.clearPLLODIV0; inline;
  56351. begin
  56352. pTDefRegMap(@Self)^.clr := $08000000;
  56353. end;
  56354. procedure TOSC_OSCCON.setPLLODIV0(thebits : TBits_1); inline;
  56355. begin
  56356. if thebits = 0 then
  56357. pTDefRegMap(@Self)^.clr := $08000000
  56358. else
  56359. pTDefRegMap(@Self)^.&set := $08000000;
  56360. end;
  56361. function TOSC_OSCCON.getPLLODIV0 : TBits_1; inline;
  56362. begin
  56363. getPLLODIV0 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  56364. end;
  56365. procedure TOSC_OSCCON.setPLLODIV1; inline;
  56366. begin
  56367. pTDefRegMap(@Self)^.&set := $10000000;
  56368. end;
  56369. procedure TOSC_OSCCON.clearPLLODIV1; inline;
  56370. begin
  56371. pTDefRegMap(@Self)^.clr := $10000000;
  56372. end;
  56373. procedure TOSC_OSCCON.setPLLODIV1(thebits : TBits_1); inline;
  56374. begin
  56375. if thebits = 0 then
  56376. pTDefRegMap(@Self)^.clr := $10000000
  56377. else
  56378. pTDefRegMap(@Self)^.&set := $10000000;
  56379. end;
  56380. function TOSC_OSCCON.getPLLODIV1 : TBits_1; inline;
  56381. begin
  56382. getPLLODIV1 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  56383. end;
  56384. procedure TOSC_OSCCON.setPLLODIV2; inline;
  56385. begin
  56386. pTDefRegMap(@Self)^.&set := $20000000;
  56387. end;
  56388. procedure TOSC_OSCCON.clearPLLODIV2; inline;
  56389. begin
  56390. pTDefRegMap(@Self)^.clr := $20000000;
  56391. end;
  56392. procedure TOSC_OSCCON.setPLLODIV2(thebits : TBits_1); inline;
  56393. begin
  56394. if thebits = 0 then
  56395. pTDefRegMap(@Self)^.clr := $20000000
  56396. else
  56397. pTDefRegMap(@Self)^.&set := $20000000;
  56398. end;
  56399. function TOSC_OSCCON.getPLLODIV2 : TBits_1; inline;
  56400. begin
  56401. getPLLODIV2 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  56402. end;
  56403. procedure TOSC_OSCCON.setw(thebits : TBits_32); inline;
  56404. begin
  56405. pTDefRegMap(@Self)^.val := thebits;
  56406. end;
  56407. function TOSC_OSCCON.getw : TBits_32; inline;
  56408. begin
  56409. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56410. end;
  56411. procedure TOSC_OSCTUN.setTUN(thebits : TBits_6); inline;
  56412. begin
  56413. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  56414. end;
  56415. function TOSC_OSCTUN.getTUN : TBits_6; inline;
  56416. begin
  56417. getTUN := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  56418. end;
  56419. procedure TOSC_OSCTUN.setTUN0; inline;
  56420. begin
  56421. pTDefRegMap(@Self)^.&set := $00000001;
  56422. end;
  56423. procedure TOSC_OSCTUN.clearTUN0; inline;
  56424. begin
  56425. pTDefRegMap(@Self)^.clr := $00000001;
  56426. end;
  56427. procedure TOSC_OSCTUN.setTUN0(thebits : TBits_1); inline;
  56428. begin
  56429. if thebits = 0 then
  56430. pTDefRegMap(@Self)^.clr := $00000001
  56431. else
  56432. pTDefRegMap(@Self)^.&set := $00000001;
  56433. end;
  56434. function TOSC_OSCTUN.getTUN0 : TBits_1; inline;
  56435. begin
  56436. getTUN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56437. end;
  56438. procedure TOSC_OSCTUN.setTUN1; inline;
  56439. begin
  56440. pTDefRegMap(@Self)^.&set := $00000002;
  56441. end;
  56442. procedure TOSC_OSCTUN.clearTUN1; inline;
  56443. begin
  56444. pTDefRegMap(@Self)^.clr := $00000002;
  56445. end;
  56446. procedure TOSC_OSCTUN.setTUN1(thebits : TBits_1); inline;
  56447. begin
  56448. if thebits = 0 then
  56449. pTDefRegMap(@Self)^.clr := $00000002
  56450. else
  56451. pTDefRegMap(@Self)^.&set := $00000002;
  56452. end;
  56453. function TOSC_OSCTUN.getTUN1 : TBits_1; inline;
  56454. begin
  56455. getTUN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56456. end;
  56457. procedure TOSC_OSCTUN.setTUN2; inline;
  56458. begin
  56459. pTDefRegMap(@Self)^.&set := $00000004;
  56460. end;
  56461. procedure TOSC_OSCTUN.clearTUN2; inline;
  56462. begin
  56463. pTDefRegMap(@Self)^.clr := $00000004;
  56464. end;
  56465. procedure TOSC_OSCTUN.setTUN2(thebits : TBits_1); inline;
  56466. begin
  56467. if thebits = 0 then
  56468. pTDefRegMap(@Self)^.clr := $00000004
  56469. else
  56470. pTDefRegMap(@Self)^.&set := $00000004;
  56471. end;
  56472. function TOSC_OSCTUN.getTUN2 : TBits_1; inline;
  56473. begin
  56474. getTUN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56475. end;
  56476. procedure TOSC_OSCTUN.setTUN3; inline;
  56477. begin
  56478. pTDefRegMap(@Self)^.&set := $00000008;
  56479. end;
  56480. procedure TOSC_OSCTUN.clearTUN3; inline;
  56481. begin
  56482. pTDefRegMap(@Self)^.clr := $00000008;
  56483. end;
  56484. procedure TOSC_OSCTUN.setTUN3(thebits : TBits_1); inline;
  56485. begin
  56486. if thebits = 0 then
  56487. pTDefRegMap(@Self)^.clr := $00000008
  56488. else
  56489. pTDefRegMap(@Self)^.&set := $00000008;
  56490. end;
  56491. function TOSC_OSCTUN.getTUN3 : TBits_1; inline;
  56492. begin
  56493. getTUN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56494. end;
  56495. procedure TOSC_OSCTUN.setTUN4; inline;
  56496. begin
  56497. pTDefRegMap(@Self)^.&set := $00000010;
  56498. end;
  56499. procedure TOSC_OSCTUN.clearTUN4; inline;
  56500. begin
  56501. pTDefRegMap(@Self)^.clr := $00000010;
  56502. end;
  56503. procedure TOSC_OSCTUN.setTUN4(thebits : TBits_1); inline;
  56504. begin
  56505. if thebits = 0 then
  56506. pTDefRegMap(@Self)^.clr := $00000010
  56507. else
  56508. pTDefRegMap(@Self)^.&set := $00000010;
  56509. end;
  56510. function TOSC_OSCTUN.getTUN4 : TBits_1; inline;
  56511. begin
  56512. getTUN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56513. end;
  56514. procedure TOSC_OSCTUN.setTUN5; inline;
  56515. begin
  56516. pTDefRegMap(@Self)^.&set := $00000020;
  56517. end;
  56518. procedure TOSC_OSCTUN.clearTUN5; inline;
  56519. begin
  56520. pTDefRegMap(@Self)^.clr := $00000020;
  56521. end;
  56522. procedure TOSC_OSCTUN.setTUN5(thebits : TBits_1); inline;
  56523. begin
  56524. if thebits = 0 then
  56525. pTDefRegMap(@Self)^.clr := $00000020
  56526. else
  56527. pTDefRegMap(@Self)^.&set := $00000020;
  56528. end;
  56529. function TOSC_OSCTUN.getTUN5 : TBits_1; inline;
  56530. begin
  56531. getTUN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56532. end;
  56533. procedure TOSC_OSCTUN.setw(thebits : TBits_32); inline;
  56534. begin
  56535. pTDefRegMap(@Self)^.val := thebits;
  56536. end;
  56537. function TOSC_OSCTUN.getw : TBits_32; inline;
  56538. begin
  56539. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56540. end;
  56541. procedure TNVM_NVMCON.setNVMOP(thebits : TBits_4); inline;
  56542. begin
  56543. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  56544. end;
  56545. function TNVM_NVMCON.getNVMOP : TBits_4; inline;
  56546. begin
  56547. getNVMOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  56548. end;
  56549. procedure TNVM_NVMCON.setLVDSTAT; inline;
  56550. begin
  56551. pTDefRegMap(@Self)^.&set := $00000800;
  56552. end;
  56553. procedure TNVM_NVMCON.clearLVDSTAT; inline;
  56554. begin
  56555. pTDefRegMap(@Self)^.clr := $00000800;
  56556. end;
  56557. procedure TNVM_NVMCON.setLVDSTAT(thebits : TBits_1); inline;
  56558. begin
  56559. if thebits = 0 then
  56560. pTDefRegMap(@Self)^.clr := $00000800
  56561. else
  56562. pTDefRegMap(@Self)^.&set := $00000800;
  56563. end;
  56564. function TNVM_NVMCON.getLVDSTAT : TBits_1; inline;
  56565. begin
  56566. getLVDSTAT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  56567. end;
  56568. procedure TNVM_NVMCON.setLVDERR; inline;
  56569. begin
  56570. pTDefRegMap(@Self)^.&set := $00001000;
  56571. end;
  56572. procedure TNVM_NVMCON.clearLVDERR; inline;
  56573. begin
  56574. pTDefRegMap(@Self)^.clr := $00001000;
  56575. end;
  56576. procedure TNVM_NVMCON.setLVDERR(thebits : TBits_1); inline;
  56577. begin
  56578. if thebits = 0 then
  56579. pTDefRegMap(@Self)^.clr := $00001000
  56580. else
  56581. pTDefRegMap(@Self)^.&set := $00001000;
  56582. end;
  56583. function TNVM_NVMCON.getLVDERR : TBits_1; inline;
  56584. begin
  56585. getLVDERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  56586. end;
  56587. procedure TNVM_NVMCON.setWRERR; inline;
  56588. begin
  56589. pTDefRegMap(@Self)^.&set := $00002000;
  56590. end;
  56591. procedure TNVM_NVMCON.clearWRERR; inline;
  56592. begin
  56593. pTDefRegMap(@Self)^.clr := $00002000;
  56594. end;
  56595. procedure TNVM_NVMCON.setWRERR(thebits : TBits_1); inline;
  56596. begin
  56597. if thebits = 0 then
  56598. pTDefRegMap(@Self)^.clr := $00002000
  56599. else
  56600. pTDefRegMap(@Self)^.&set := $00002000;
  56601. end;
  56602. function TNVM_NVMCON.getWRERR : TBits_1; inline;
  56603. begin
  56604. getWRERR := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  56605. end;
  56606. procedure TNVM_NVMCON.setWREN; inline;
  56607. begin
  56608. pTDefRegMap(@Self)^.&set := $00004000;
  56609. end;
  56610. procedure TNVM_NVMCON.clearWREN; inline;
  56611. begin
  56612. pTDefRegMap(@Self)^.clr := $00004000;
  56613. end;
  56614. procedure TNVM_NVMCON.setWREN(thebits : TBits_1); inline;
  56615. begin
  56616. if thebits = 0 then
  56617. pTDefRegMap(@Self)^.clr := $00004000
  56618. else
  56619. pTDefRegMap(@Self)^.&set := $00004000;
  56620. end;
  56621. function TNVM_NVMCON.getWREN : TBits_1; inline;
  56622. begin
  56623. getWREN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  56624. end;
  56625. procedure TNVM_NVMCON.setWR; inline;
  56626. begin
  56627. pTDefRegMap(@Self)^.&set := $00008000;
  56628. end;
  56629. procedure TNVM_NVMCON.clearWR; inline;
  56630. begin
  56631. pTDefRegMap(@Self)^.clr := $00008000;
  56632. end;
  56633. procedure TNVM_NVMCON.setWR(thebits : TBits_1); inline;
  56634. begin
  56635. if thebits = 0 then
  56636. pTDefRegMap(@Self)^.clr := $00008000
  56637. else
  56638. pTDefRegMap(@Self)^.&set := $00008000;
  56639. end;
  56640. function TNVM_NVMCON.getWR : TBits_1; inline;
  56641. begin
  56642. getWR := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  56643. end;
  56644. procedure TNVM_NVMCON.setNVMOP0; inline;
  56645. begin
  56646. pTDefRegMap(@Self)^.&set := $00000001;
  56647. end;
  56648. procedure TNVM_NVMCON.clearNVMOP0; inline;
  56649. begin
  56650. pTDefRegMap(@Self)^.clr := $00000001;
  56651. end;
  56652. procedure TNVM_NVMCON.setNVMOP0(thebits : TBits_1); inline;
  56653. begin
  56654. if thebits = 0 then
  56655. pTDefRegMap(@Self)^.clr := $00000001
  56656. else
  56657. pTDefRegMap(@Self)^.&set := $00000001;
  56658. end;
  56659. function TNVM_NVMCON.getNVMOP0 : TBits_1; inline;
  56660. begin
  56661. getNVMOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56662. end;
  56663. procedure TNVM_NVMCON.setNVMOP1; inline;
  56664. begin
  56665. pTDefRegMap(@Self)^.&set := $00000002;
  56666. end;
  56667. procedure TNVM_NVMCON.clearNVMOP1; inline;
  56668. begin
  56669. pTDefRegMap(@Self)^.clr := $00000002;
  56670. end;
  56671. procedure TNVM_NVMCON.setNVMOP1(thebits : TBits_1); inline;
  56672. begin
  56673. if thebits = 0 then
  56674. pTDefRegMap(@Self)^.clr := $00000002
  56675. else
  56676. pTDefRegMap(@Self)^.&set := $00000002;
  56677. end;
  56678. function TNVM_NVMCON.getNVMOP1 : TBits_1; inline;
  56679. begin
  56680. getNVMOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56681. end;
  56682. procedure TNVM_NVMCON.setNVMOP2; inline;
  56683. begin
  56684. pTDefRegMap(@Self)^.&set := $00000004;
  56685. end;
  56686. procedure TNVM_NVMCON.clearNVMOP2; inline;
  56687. begin
  56688. pTDefRegMap(@Self)^.clr := $00000004;
  56689. end;
  56690. procedure TNVM_NVMCON.setNVMOP2(thebits : TBits_1); inline;
  56691. begin
  56692. if thebits = 0 then
  56693. pTDefRegMap(@Self)^.clr := $00000004
  56694. else
  56695. pTDefRegMap(@Self)^.&set := $00000004;
  56696. end;
  56697. function TNVM_NVMCON.getNVMOP2 : TBits_1; inline;
  56698. begin
  56699. getNVMOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56700. end;
  56701. procedure TNVM_NVMCON.setNVMOP3; inline;
  56702. begin
  56703. pTDefRegMap(@Self)^.&set := $00000008;
  56704. end;
  56705. procedure TNVM_NVMCON.clearNVMOP3; inline;
  56706. begin
  56707. pTDefRegMap(@Self)^.clr := $00000008;
  56708. end;
  56709. procedure TNVM_NVMCON.setNVMOP3(thebits : TBits_1); inline;
  56710. begin
  56711. if thebits = 0 then
  56712. pTDefRegMap(@Self)^.clr := $00000008
  56713. else
  56714. pTDefRegMap(@Self)^.&set := $00000008;
  56715. end;
  56716. function TNVM_NVMCON.getNVMOP3 : TBits_1; inline;
  56717. begin
  56718. getNVMOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56719. end;
  56720. procedure TNVM_NVMCON.setPROGOP(thebits : TBits_4); inline;
  56721. begin
  56722. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  56723. end;
  56724. function TNVM_NVMCON.getPROGOP : TBits_4; inline;
  56725. begin
  56726. getPROGOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  56727. end;
  56728. procedure TNVM_NVMCON.setPROGOP0; inline;
  56729. begin
  56730. pTDefRegMap(@Self)^.&set := $00000001;
  56731. end;
  56732. procedure TNVM_NVMCON.clearPROGOP0; inline;
  56733. begin
  56734. pTDefRegMap(@Self)^.clr := $00000001;
  56735. end;
  56736. procedure TNVM_NVMCON.setPROGOP0(thebits : TBits_1); inline;
  56737. begin
  56738. if thebits = 0 then
  56739. pTDefRegMap(@Self)^.clr := $00000001
  56740. else
  56741. pTDefRegMap(@Self)^.&set := $00000001;
  56742. end;
  56743. function TNVM_NVMCON.getPROGOP0 : TBits_1; inline;
  56744. begin
  56745. getPROGOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56746. end;
  56747. procedure TNVM_NVMCON.setPROGOP1; inline;
  56748. begin
  56749. pTDefRegMap(@Self)^.&set := $00000002;
  56750. end;
  56751. procedure TNVM_NVMCON.clearPROGOP1; inline;
  56752. begin
  56753. pTDefRegMap(@Self)^.clr := $00000002;
  56754. end;
  56755. procedure TNVM_NVMCON.setPROGOP1(thebits : TBits_1); inline;
  56756. begin
  56757. if thebits = 0 then
  56758. pTDefRegMap(@Self)^.clr := $00000002
  56759. else
  56760. pTDefRegMap(@Self)^.&set := $00000002;
  56761. end;
  56762. function TNVM_NVMCON.getPROGOP1 : TBits_1; inline;
  56763. begin
  56764. getPROGOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56765. end;
  56766. procedure TNVM_NVMCON.setPROGOP2; inline;
  56767. begin
  56768. pTDefRegMap(@Self)^.&set := $00000004;
  56769. end;
  56770. procedure TNVM_NVMCON.clearPROGOP2; inline;
  56771. begin
  56772. pTDefRegMap(@Self)^.clr := $00000004;
  56773. end;
  56774. procedure TNVM_NVMCON.setPROGOP2(thebits : TBits_1); inline;
  56775. begin
  56776. if thebits = 0 then
  56777. pTDefRegMap(@Self)^.clr := $00000004
  56778. else
  56779. pTDefRegMap(@Self)^.&set := $00000004;
  56780. end;
  56781. function TNVM_NVMCON.getPROGOP2 : TBits_1; inline;
  56782. begin
  56783. getPROGOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56784. end;
  56785. procedure TNVM_NVMCON.setPROGOP3; inline;
  56786. begin
  56787. pTDefRegMap(@Self)^.&set := $00000008;
  56788. end;
  56789. procedure TNVM_NVMCON.clearPROGOP3; inline;
  56790. begin
  56791. pTDefRegMap(@Self)^.clr := $00000008;
  56792. end;
  56793. procedure TNVM_NVMCON.setPROGOP3(thebits : TBits_1); inline;
  56794. begin
  56795. if thebits = 0 then
  56796. pTDefRegMap(@Self)^.clr := $00000008
  56797. else
  56798. pTDefRegMap(@Self)^.&set := $00000008;
  56799. end;
  56800. function TNVM_NVMCON.getPROGOP3 : TBits_1; inline;
  56801. begin
  56802. getPROGOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56803. end;
  56804. procedure TNVM_NVMCON.setw(thebits : TBits_32); inline;
  56805. begin
  56806. pTDefRegMap(@Self)^.val := thebits;
  56807. end;
  56808. function TNVM_NVMCON.getw : TBits_32; inline;
  56809. begin
  56810. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56811. end;
  56812. procedure TRCON_RCON.setPOR; inline;
  56813. begin
  56814. pTDefRegMap(@Self)^.&set := $00000001;
  56815. end;
  56816. procedure TRCON_RCON.clearPOR; inline;
  56817. begin
  56818. pTDefRegMap(@Self)^.clr := $00000001;
  56819. end;
  56820. procedure TRCON_RCON.setPOR(thebits : TBits_1); inline;
  56821. begin
  56822. if thebits = 0 then
  56823. pTDefRegMap(@Self)^.clr := $00000001
  56824. else
  56825. pTDefRegMap(@Self)^.&set := $00000001;
  56826. end;
  56827. function TRCON_RCON.getPOR : TBits_1; inline;
  56828. begin
  56829. getPOR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56830. end;
  56831. procedure TRCON_RCON.setBOR; inline;
  56832. begin
  56833. pTDefRegMap(@Self)^.&set := $00000002;
  56834. end;
  56835. procedure TRCON_RCON.clearBOR; inline;
  56836. begin
  56837. pTDefRegMap(@Self)^.clr := $00000002;
  56838. end;
  56839. procedure TRCON_RCON.setBOR(thebits : TBits_1); inline;
  56840. begin
  56841. if thebits = 0 then
  56842. pTDefRegMap(@Self)^.clr := $00000002
  56843. else
  56844. pTDefRegMap(@Self)^.&set := $00000002;
  56845. end;
  56846. function TRCON_RCON.getBOR : TBits_1; inline;
  56847. begin
  56848. getBOR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56849. end;
  56850. procedure TRCON_RCON.setIDLE; inline;
  56851. begin
  56852. pTDefRegMap(@Self)^.&set := $00000004;
  56853. end;
  56854. procedure TRCON_RCON.clearIDLE; inline;
  56855. begin
  56856. pTDefRegMap(@Self)^.clr := $00000004;
  56857. end;
  56858. procedure TRCON_RCON.setIDLE(thebits : TBits_1); inline;
  56859. begin
  56860. if thebits = 0 then
  56861. pTDefRegMap(@Self)^.clr := $00000004
  56862. else
  56863. pTDefRegMap(@Self)^.&set := $00000004;
  56864. end;
  56865. function TRCON_RCON.getIDLE : TBits_1; inline;
  56866. begin
  56867. getIDLE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56868. end;
  56869. procedure TRCON_RCON.setSLEEP; inline;
  56870. begin
  56871. pTDefRegMap(@Self)^.&set := $00000008;
  56872. end;
  56873. procedure TRCON_RCON.clearSLEEP; inline;
  56874. begin
  56875. pTDefRegMap(@Self)^.clr := $00000008;
  56876. end;
  56877. procedure TRCON_RCON.setSLEEP(thebits : TBits_1); inline;
  56878. begin
  56879. if thebits = 0 then
  56880. pTDefRegMap(@Self)^.clr := $00000008
  56881. else
  56882. pTDefRegMap(@Self)^.&set := $00000008;
  56883. end;
  56884. function TRCON_RCON.getSLEEP : TBits_1; inline;
  56885. begin
  56886. getSLEEP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56887. end;
  56888. procedure TRCON_RCON.setWDTO; inline;
  56889. begin
  56890. pTDefRegMap(@Self)^.&set := $00000010;
  56891. end;
  56892. procedure TRCON_RCON.clearWDTO; inline;
  56893. begin
  56894. pTDefRegMap(@Self)^.clr := $00000010;
  56895. end;
  56896. procedure TRCON_RCON.setWDTO(thebits : TBits_1); inline;
  56897. begin
  56898. if thebits = 0 then
  56899. pTDefRegMap(@Self)^.clr := $00000010
  56900. else
  56901. pTDefRegMap(@Self)^.&set := $00000010;
  56902. end;
  56903. function TRCON_RCON.getWDTO : TBits_1; inline;
  56904. begin
  56905. getWDTO := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56906. end;
  56907. procedure TRCON_RCON.setSWR; inline;
  56908. begin
  56909. pTDefRegMap(@Self)^.&set := $00000040;
  56910. end;
  56911. procedure TRCON_RCON.clearSWR; inline;
  56912. begin
  56913. pTDefRegMap(@Self)^.clr := $00000040;
  56914. end;
  56915. procedure TRCON_RCON.setSWR(thebits : TBits_1); inline;
  56916. begin
  56917. if thebits = 0 then
  56918. pTDefRegMap(@Self)^.clr := $00000040
  56919. else
  56920. pTDefRegMap(@Self)^.&set := $00000040;
  56921. end;
  56922. function TRCON_RCON.getSWR : TBits_1; inline;
  56923. begin
  56924. getSWR := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56925. end;
  56926. procedure TRCON_RCON.setEXTR; inline;
  56927. begin
  56928. pTDefRegMap(@Self)^.&set := $00000080;
  56929. end;
  56930. procedure TRCON_RCON.clearEXTR; inline;
  56931. begin
  56932. pTDefRegMap(@Self)^.clr := $00000080;
  56933. end;
  56934. procedure TRCON_RCON.setEXTR(thebits : TBits_1); inline;
  56935. begin
  56936. if thebits = 0 then
  56937. pTDefRegMap(@Self)^.clr := $00000080
  56938. else
  56939. pTDefRegMap(@Self)^.&set := $00000080;
  56940. end;
  56941. function TRCON_RCON.getEXTR : TBits_1; inline;
  56942. begin
  56943. getEXTR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56944. end;
  56945. procedure TRCON_RCON.setVREGS; inline;
  56946. begin
  56947. pTDefRegMap(@Self)^.&set := $00000100;
  56948. end;
  56949. procedure TRCON_RCON.clearVREGS; inline;
  56950. begin
  56951. pTDefRegMap(@Self)^.clr := $00000100;
  56952. end;
  56953. procedure TRCON_RCON.setVREGS(thebits : TBits_1); inline;
  56954. begin
  56955. if thebits = 0 then
  56956. pTDefRegMap(@Self)^.clr := $00000100
  56957. else
  56958. pTDefRegMap(@Self)^.&set := $00000100;
  56959. end;
  56960. function TRCON_RCON.getVREGS : TBits_1; inline;
  56961. begin
  56962. getVREGS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56963. end;
  56964. procedure TRCON_RCON.setCMR; inline;
  56965. begin
  56966. pTDefRegMap(@Self)^.&set := $00000200;
  56967. end;
  56968. procedure TRCON_RCON.clearCMR; inline;
  56969. begin
  56970. pTDefRegMap(@Self)^.clr := $00000200;
  56971. end;
  56972. procedure TRCON_RCON.setCMR(thebits : TBits_1); inline;
  56973. begin
  56974. if thebits = 0 then
  56975. pTDefRegMap(@Self)^.clr := $00000200
  56976. else
  56977. pTDefRegMap(@Self)^.&set := $00000200;
  56978. end;
  56979. function TRCON_RCON.getCMR : TBits_1; inline;
  56980. begin
  56981. getCMR := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56982. end;
  56983. procedure TRCON_RCON.setw(thebits : TBits_32); inline;
  56984. begin
  56985. pTDefRegMap(@Self)^.val := thebits;
  56986. end;
  56987. function TRCON_RCON.getw : TBits_32; inline;
  56988. begin
  56989. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56990. end;
  56991. procedure TRCON_RSWRST.setSWRST; inline;
  56992. begin
  56993. pTDefRegMap(@Self)^.&set := $00000001;
  56994. end;
  56995. procedure TRCON_RSWRST.clearSWRST; inline;
  56996. begin
  56997. pTDefRegMap(@Self)^.clr := $00000001;
  56998. end;
  56999. procedure TRCON_RSWRST.setSWRST(thebits : TBits_1); inline;
  57000. begin
  57001. if thebits = 0 then
  57002. pTDefRegMap(@Self)^.clr := $00000001
  57003. else
  57004. pTDefRegMap(@Self)^.&set := $00000001;
  57005. end;
  57006. function TRCON_RSWRST.getSWRST : TBits_1; inline;
  57007. begin
  57008. getSWRST := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57009. end;
  57010. procedure TRCON_RSWRST.setw(thebits : TBits_32); inline;
  57011. begin
  57012. pTDefRegMap(@Self)^.val := thebits;
  57013. end;
  57014. function TRCON_RSWRST.getw : TBits_32; inline;
  57015. begin
  57016. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57017. end;
  57018. procedure TINT_INTCON.setINT0EP; inline;
  57019. begin
  57020. pTDefRegMap(@Self)^.&set := $00000001;
  57021. end;
  57022. procedure TINT_INTCON.clearINT0EP; inline;
  57023. begin
  57024. pTDefRegMap(@Self)^.clr := $00000001;
  57025. end;
  57026. procedure TINT_INTCON.setINT0EP(thebits : TBits_1); inline;
  57027. begin
  57028. if thebits = 0 then
  57029. pTDefRegMap(@Self)^.clr := $00000001
  57030. else
  57031. pTDefRegMap(@Self)^.&set := $00000001;
  57032. end;
  57033. function TINT_INTCON.getINT0EP : TBits_1; inline;
  57034. begin
  57035. getINT0EP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57036. end;
  57037. procedure TINT_INTCON.setINT1EP; inline;
  57038. begin
  57039. pTDefRegMap(@Self)^.&set := $00000002;
  57040. end;
  57041. procedure TINT_INTCON.clearINT1EP; inline;
  57042. begin
  57043. pTDefRegMap(@Self)^.clr := $00000002;
  57044. end;
  57045. procedure TINT_INTCON.setINT1EP(thebits : TBits_1); inline;
  57046. begin
  57047. if thebits = 0 then
  57048. pTDefRegMap(@Self)^.clr := $00000002
  57049. else
  57050. pTDefRegMap(@Self)^.&set := $00000002;
  57051. end;
  57052. function TINT_INTCON.getINT1EP : TBits_1; inline;
  57053. begin
  57054. getINT1EP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57055. end;
  57056. procedure TINT_INTCON.setINT2EP; inline;
  57057. begin
  57058. pTDefRegMap(@Self)^.&set := $00000004;
  57059. end;
  57060. procedure TINT_INTCON.clearINT2EP; inline;
  57061. begin
  57062. pTDefRegMap(@Self)^.clr := $00000004;
  57063. end;
  57064. procedure TINT_INTCON.setINT2EP(thebits : TBits_1); inline;
  57065. begin
  57066. if thebits = 0 then
  57067. pTDefRegMap(@Self)^.clr := $00000004
  57068. else
  57069. pTDefRegMap(@Self)^.&set := $00000004;
  57070. end;
  57071. function TINT_INTCON.getINT2EP : TBits_1; inline;
  57072. begin
  57073. getINT2EP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57074. end;
  57075. procedure TINT_INTCON.setINT3EP; inline;
  57076. begin
  57077. pTDefRegMap(@Self)^.&set := $00000008;
  57078. end;
  57079. procedure TINT_INTCON.clearINT3EP; inline;
  57080. begin
  57081. pTDefRegMap(@Self)^.clr := $00000008;
  57082. end;
  57083. procedure TINT_INTCON.setINT3EP(thebits : TBits_1); inline;
  57084. begin
  57085. if thebits = 0 then
  57086. pTDefRegMap(@Self)^.clr := $00000008
  57087. else
  57088. pTDefRegMap(@Self)^.&set := $00000008;
  57089. end;
  57090. function TINT_INTCON.getINT3EP : TBits_1; inline;
  57091. begin
  57092. getINT3EP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57093. end;
  57094. procedure TINT_INTCON.setINT4EP; inline;
  57095. begin
  57096. pTDefRegMap(@Self)^.&set := $00000010;
  57097. end;
  57098. procedure TINT_INTCON.clearINT4EP; inline;
  57099. begin
  57100. pTDefRegMap(@Self)^.clr := $00000010;
  57101. end;
  57102. procedure TINT_INTCON.setINT4EP(thebits : TBits_1); inline;
  57103. begin
  57104. if thebits = 0 then
  57105. pTDefRegMap(@Self)^.clr := $00000010
  57106. else
  57107. pTDefRegMap(@Self)^.&set := $00000010;
  57108. end;
  57109. function TINT_INTCON.getINT4EP : TBits_1; inline;
  57110. begin
  57111. getINT4EP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57112. end;
  57113. procedure TINT_INTCON.setTPC(thebits : TBits_3); inline;
  57114. begin
  57115. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  57116. end;
  57117. function TINT_INTCON.getTPC : TBits_3; inline;
  57118. begin
  57119. getTPC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  57120. end;
  57121. procedure TINT_INTCON.setMVEC; inline;
  57122. begin
  57123. pTDefRegMap(@Self)^.&set := $00001000;
  57124. end;
  57125. procedure TINT_INTCON.clearMVEC; inline;
  57126. begin
  57127. pTDefRegMap(@Self)^.clr := $00001000;
  57128. end;
  57129. procedure TINT_INTCON.setMVEC(thebits : TBits_1); inline;
  57130. begin
  57131. if thebits = 0 then
  57132. pTDefRegMap(@Self)^.clr := $00001000
  57133. else
  57134. pTDefRegMap(@Self)^.&set := $00001000;
  57135. end;
  57136. function TINT_INTCON.getMVEC : TBits_1; inline;
  57137. begin
  57138. getMVEC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  57139. end;
  57140. procedure TINT_INTCON.setFRZ; inline;
  57141. begin
  57142. pTDefRegMap(@Self)^.&set := $00004000;
  57143. end;
  57144. procedure TINT_INTCON.clearFRZ; inline;
  57145. begin
  57146. pTDefRegMap(@Self)^.clr := $00004000;
  57147. end;
  57148. procedure TINT_INTCON.setFRZ(thebits : TBits_1); inline;
  57149. begin
  57150. if thebits = 0 then
  57151. pTDefRegMap(@Self)^.clr := $00004000
  57152. else
  57153. pTDefRegMap(@Self)^.&set := $00004000;
  57154. end;
  57155. function TINT_INTCON.getFRZ : TBits_1; inline;
  57156. begin
  57157. getFRZ := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  57158. end;
  57159. procedure TINT_INTCON.setSS0; inline;
  57160. begin
  57161. pTDefRegMap(@Self)^.&set := $00010000;
  57162. end;
  57163. procedure TINT_INTCON.clearSS0; inline;
  57164. begin
  57165. pTDefRegMap(@Self)^.clr := $00010000;
  57166. end;
  57167. procedure TINT_INTCON.setSS0(thebits : TBits_1); inline;
  57168. begin
  57169. if thebits = 0 then
  57170. pTDefRegMap(@Self)^.clr := $00010000
  57171. else
  57172. pTDefRegMap(@Self)^.&set := $00010000;
  57173. end;
  57174. function TINT_INTCON.getSS0 : TBits_1; inline;
  57175. begin
  57176. getSS0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  57177. end;
  57178. procedure TINT_INTCON.setw(thebits : TBits_32); inline;
  57179. begin
  57180. pTDefRegMap(@Self)^.val := thebits;
  57181. end;
  57182. function TINT_INTCON.getw : TBits_32; inline;
  57183. begin
  57184. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57185. end;
  57186. procedure TINT_IFS0.setCTIF; inline;
  57187. begin
  57188. pTDefRegMap(@Self)^.&set := $00000001;
  57189. end;
  57190. procedure TINT_IFS0.clearCTIF; inline;
  57191. begin
  57192. pTDefRegMap(@Self)^.clr := $00000001;
  57193. end;
  57194. procedure TINT_IFS0.setCTIF(thebits : TBits_1); inline;
  57195. begin
  57196. if thebits = 0 then
  57197. pTDefRegMap(@Self)^.clr := $00000001
  57198. else
  57199. pTDefRegMap(@Self)^.&set := $00000001;
  57200. end;
  57201. function TINT_IFS0.getCTIF : TBits_1; inline;
  57202. begin
  57203. getCTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57204. end;
  57205. procedure TINT_IFS0.setCS0IF; inline;
  57206. begin
  57207. pTDefRegMap(@Self)^.&set := $00000002;
  57208. end;
  57209. procedure TINT_IFS0.clearCS0IF; inline;
  57210. begin
  57211. pTDefRegMap(@Self)^.clr := $00000002;
  57212. end;
  57213. procedure TINT_IFS0.setCS0IF(thebits : TBits_1); inline;
  57214. begin
  57215. if thebits = 0 then
  57216. pTDefRegMap(@Self)^.clr := $00000002
  57217. else
  57218. pTDefRegMap(@Self)^.&set := $00000002;
  57219. end;
  57220. function TINT_IFS0.getCS0IF : TBits_1; inline;
  57221. begin
  57222. getCS0IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57223. end;
  57224. procedure TINT_IFS0.setCS1IF; inline;
  57225. begin
  57226. pTDefRegMap(@Self)^.&set := $00000004;
  57227. end;
  57228. procedure TINT_IFS0.clearCS1IF; inline;
  57229. begin
  57230. pTDefRegMap(@Self)^.clr := $00000004;
  57231. end;
  57232. procedure TINT_IFS0.setCS1IF(thebits : TBits_1); inline;
  57233. begin
  57234. if thebits = 0 then
  57235. pTDefRegMap(@Self)^.clr := $00000004
  57236. else
  57237. pTDefRegMap(@Self)^.&set := $00000004;
  57238. end;
  57239. function TINT_IFS0.getCS1IF : TBits_1; inline;
  57240. begin
  57241. getCS1IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57242. end;
  57243. procedure TINT_IFS0.setINT0IF; inline;
  57244. begin
  57245. pTDefRegMap(@Self)^.&set := $00000008;
  57246. end;
  57247. procedure TINT_IFS0.clearINT0IF; inline;
  57248. begin
  57249. pTDefRegMap(@Self)^.clr := $00000008;
  57250. end;
  57251. procedure TINT_IFS0.setINT0IF(thebits : TBits_1); inline;
  57252. begin
  57253. if thebits = 0 then
  57254. pTDefRegMap(@Self)^.clr := $00000008
  57255. else
  57256. pTDefRegMap(@Self)^.&set := $00000008;
  57257. end;
  57258. function TINT_IFS0.getINT0IF : TBits_1; inline;
  57259. begin
  57260. getINT0IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57261. end;
  57262. procedure TINT_IFS0.setT1IF; inline;
  57263. begin
  57264. pTDefRegMap(@Self)^.&set := $00000010;
  57265. end;
  57266. procedure TINT_IFS0.clearT1IF; inline;
  57267. begin
  57268. pTDefRegMap(@Self)^.clr := $00000010;
  57269. end;
  57270. procedure TINT_IFS0.setT1IF(thebits : TBits_1); inline;
  57271. begin
  57272. if thebits = 0 then
  57273. pTDefRegMap(@Self)^.clr := $00000010
  57274. else
  57275. pTDefRegMap(@Self)^.&set := $00000010;
  57276. end;
  57277. function TINT_IFS0.getT1IF : TBits_1; inline;
  57278. begin
  57279. getT1IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57280. end;
  57281. procedure TINT_IFS0.setIC1IF; inline;
  57282. begin
  57283. pTDefRegMap(@Self)^.&set := $00000020;
  57284. end;
  57285. procedure TINT_IFS0.clearIC1IF; inline;
  57286. begin
  57287. pTDefRegMap(@Self)^.clr := $00000020;
  57288. end;
  57289. procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
  57290. begin
  57291. if thebits = 0 then
  57292. pTDefRegMap(@Self)^.clr := $00000020
  57293. else
  57294. pTDefRegMap(@Self)^.&set := $00000020;
  57295. end;
  57296. function TINT_IFS0.getIC1IF : TBits_1; inline;
  57297. begin
  57298. getIC1IF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57299. end;
  57300. procedure TINT_IFS0.setOC1IF; inline;
  57301. begin
  57302. pTDefRegMap(@Self)^.&set := $00000040;
  57303. end;
  57304. procedure TINT_IFS0.clearOC1IF; inline;
  57305. begin
  57306. pTDefRegMap(@Self)^.clr := $00000040;
  57307. end;
  57308. procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
  57309. begin
  57310. if thebits = 0 then
  57311. pTDefRegMap(@Self)^.clr := $00000040
  57312. else
  57313. pTDefRegMap(@Self)^.&set := $00000040;
  57314. end;
  57315. function TINT_IFS0.getOC1IF : TBits_1; inline;
  57316. begin
  57317. getOC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57318. end;
  57319. procedure TINT_IFS0.setINT1IF; inline;
  57320. begin
  57321. pTDefRegMap(@Self)^.&set := $00000080;
  57322. end;
  57323. procedure TINT_IFS0.clearINT1IF; inline;
  57324. begin
  57325. pTDefRegMap(@Self)^.clr := $00000080;
  57326. end;
  57327. procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
  57328. begin
  57329. if thebits = 0 then
  57330. pTDefRegMap(@Self)^.clr := $00000080
  57331. else
  57332. pTDefRegMap(@Self)^.&set := $00000080;
  57333. end;
  57334. function TINT_IFS0.getINT1IF : TBits_1; inline;
  57335. begin
  57336. getINT1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57337. end;
  57338. procedure TINT_IFS0.setT2IF; inline;
  57339. begin
  57340. pTDefRegMap(@Self)^.&set := $00000100;
  57341. end;
  57342. procedure TINT_IFS0.clearT2IF; inline;
  57343. begin
  57344. pTDefRegMap(@Self)^.clr := $00000100;
  57345. end;
  57346. procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
  57347. begin
  57348. if thebits = 0 then
  57349. pTDefRegMap(@Self)^.clr := $00000100
  57350. else
  57351. pTDefRegMap(@Self)^.&set := $00000100;
  57352. end;
  57353. function TINT_IFS0.getT2IF : TBits_1; inline;
  57354. begin
  57355. getT2IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57356. end;
  57357. procedure TINT_IFS0.setIC2IF; inline;
  57358. begin
  57359. pTDefRegMap(@Self)^.&set := $00000200;
  57360. end;
  57361. procedure TINT_IFS0.clearIC2IF; inline;
  57362. begin
  57363. pTDefRegMap(@Self)^.clr := $00000200;
  57364. end;
  57365. procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
  57366. begin
  57367. if thebits = 0 then
  57368. pTDefRegMap(@Self)^.clr := $00000200
  57369. else
  57370. pTDefRegMap(@Self)^.&set := $00000200;
  57371. end;
  57372. function TINT_IFS0.getIC2IF : TBits_1; inline;
  57373. begin
  57374. getIC2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57375. end;
  57376. procedure TINT_IFS0.setOC2IF; inline;
  57377. begin
  57378. pTDefRegMap(@Self)^.&set := $00000400;
  57379. end;
  57380. procedure TINT_IFS0.clearOC2IF; inline;
  57381. begin
  57382. pTDefRegMap(@Self)^.clr := $00000400;
  57383. end;
  57384. procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
  57385. begin
  57386. if thebits = 0 then
  57387. pTDefRegMap(@Self)^.clr := $00000400
  57388. else
  57389. pTDefRegMap(@Self)^.&set := $00000400;
  57390. end;
  57391. function TINT_IFS0.getOC2IF : TBits_1; inline;
  57392. begin
  57393. getOC2IF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57394. end;
  57395. procedure TINT_IFS0.setINT2IF; inline;
  57396. begin
  57397. pTDefRegMap(@Self)^.&set := $00000800;
  57398. end;
  57399. procedure TINT_IFS0.clearINT2IF; inline;
  57400. begin
  57401. pTDefRegMap(@Self)^.clr := $00000800;
  57402. end;
  57403. procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
  57404. begin
  57405. if thebits = 0 then
  57406. pTDefRegMap(@Self)^.clr := $00000800
  57407. else
  57408. pTDefRegMap(@Self)^.&set := $00000800;
  57409. end;
  57410. function TINT_IFS0.getINT2IF : TBits_1; inline;
  57411. begin
  57412. getINT2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57413. end;
  57414. procedure TINT_IFS0.setT3IF; inline;
  57415. begin
  57416. pTDefRegMap(@Self)^.&set := $00001000;
  57417. end;
  57418. procedure TINT_IFS0.clearT3IF; inline;
  57419. begin
  57420. pTDefRegMap(@Self)^.clr := $00001000;
  57421. end;
  57422. procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
  57423. begin
  57424. if thebits = 0 then
  57425. pTDefRegMap(@Self)^.clr := $00001000
  57426. else
  57427. pTDefRegMap(@Self)^.&set := $00001000;
  57428. end;
  57429. function TINT_IFS0.getT3IF : TBits_1; inline;
  57430. begin
  57431. getT3IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  57432. end;
  57433. procedure TINT_IFS0.setIC3IF; inline;
  57434. begin
  57435. pTDefRegMap(@Self)^.&set := $00002000;
  57436. end;
  57437. procedure TINT_IFS0.clearIC3IF; inline;
  57438. begin
  57439. pTDefRegMap(@Self)^.clr := $00002000;
  57440. end;
  57441. procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
  57442. begin
  57443. if thebits = 0 then
  57444. pTDefRegMap(@Self)^.clr := $00002000
  57445. else
  57446. pTDefRegMap(@Self)^.&set := $00002000;
  57447. end;
  57448. function TINT_IFS0.getIC3IF : TBits_1; inline;
  57449. begin
  57450. getIC3IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  57451. end;
  57452. procedure TINT_IFS0.setOC3IF; inline;
  57453. begin
  57454. pTDefRegMap(@Self)^.&set := $00004000;
  57455. end;
  57456. procedure TINT_IFS0.clearOC3IF; inline;
  57457. begin
  57458. pTDefRegMap(@Self)^.clr := $00004000;
  57459. end;
  57460. procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
  57461. begin
  57462. if thebits = 0 then
  57463. pTDefRegMap(@Self)^.clr := $00004000
  57464. else
  57465. pTDefRegMap(@Self)^.&set := $00004000;
  57466. end;
  57467. function TINT_IFS0.getOC3IF : TBits_1; inline;
  57468. begin
  57469. getOC3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  57470. end;
  57471. procedure TINT_IFS0.setINT3IF; inline;
  57472. begin
  57473. pTDefRegMap(@Self)^.&set := $00008000;
  57474. end;
  57475. procedure TINT_IFS0.clearINT3IF; inline;
  57476. begin
  57477. pTDefRegMap(@Self)^.clr := $00008000;
  57478. end;
  57479. procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
  57480. begin
  57481. if thebits = 0 then
  57482. pTDefRegMap(@Self)^.clr := $00008000
  57483. else
  57484. pTDefRegMap(@Self)^.&set := $00008000;
  57485. end;
  57486. function TINT_IFS0.getINT3IF : TBits_1; inline;
  57487. begin
  57488. getINT3IF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  57489. end;
  57490. procedure TINT_IFS0.setT4IF; inline;
  57491. begin
  57492. pTDefRegMap(@Self)^.&set := $00010000;
  57493. end;
  57494. procedure TINT_IFS0.clearT4IF; inline;
  57495. begin
  57496. pTDefRegMap(@Self)^.clr := $00010000;
  57497. end;
  57498. procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
  57499. begin
  57500. if thebits = 0 then
  57501. pTDefRegMap(@Self)^.clr := $00010000
  57502. else
  57503. pTDefRegMap(@Self)^.&set := $00010000;
  57504. end;
  57505. function TINT_IFS0.getT4IF : TBits_1; inline;
  57506. begin
  57507. getT4IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  57508. end;
  57509. procedure TINT_IFS0.setIC4IF; inline;
  57510. begin
  57511. pTDefRegMap(@Self)^.&set := $00020000;
  57512. end;
  57513. procedure TINT_IFS0.clearIC4IF; inline;
  57514. begin
  57515. pTDefRegMap(@Self)^.clr := $00020000;
  57516. end;
  57517. procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
  57518. begin
  57519. if thebits = 0 then
  57520. pTDefRegMap(@Self)^.clr := $00020000
  57521. else
  57522. pTDefRegMap(@Self)^.&set := $00020000;
  57523. end;
  57524. function TINT_IFS0.getIC4IF : TBits_1; inline;
  57525. begin
  57526. getIC4IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  57527. end;
  57528. procedure TINT_IFS0.setOC4IF; inline;
  57529. begin
  57530. pTDefRegMap(@Self)^.&set := $00040000;
  57531. end;
  57532. procedure TINT_IFS0.clearOC4IF; inline;
  57533. begin
  57534. pTDefRegMap(@Self)^.clr := $00040000;
  57535. end;
  57536. procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
  57537. begin
  57538. if thebits = 0 then
  57539. pTDefRegMap(@Self)^.clr := $00040000
  57540. else
  57541. pTDefRegMap(@Self)^.&set := $00040000;
  57542. end;
  57543. function TINT_IFS0.getOC4IF : TBits_1; inline;
  57544. begin
  57545. getOC4IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  57546. end;
  57547. procedure TINT_IFS0.setINT4IF; inline;
  57548. begin
  57549. pTDefRegMap(@Self)^.&set := $00080000;
  57550. end;
  57551. procedure TINT_IFS0.clearINT4IF; inline;
  57552. begin
  57553. pTDefRegMap(@Self)^.clr := $00080000;
  57554. end;
  57555. procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
  57556. begin
  57557. if thebits = 0 then
  57558. pTDefRegMap(@Self)^.clr := $00080000
  57559. else
  57560. pTDefRegMap(@Self)^.&set := $00080000;
  57561. end;
  57562. function TINT_IFS0.getINT4IF : TBits_1; inline;
  57563. begin
  57564. getINT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  57565. end;
  57566. procedure TINT_IFS0.setT5IF; inline;
  57567. begin
  57568. pTDefRegMap(@Self)^.&set := $00100000;
  57569. end;
  57570. procedure TINT_IFS0.clearT5IF; inline;
  57571. begin
  57572. pTDefRegMap(@Self)^.clr := $00100000;
  57573. end;
  57574. procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
  57575. begin
  57576. if thebits = 0 then
  57577. pTDefRegMap(@Self)^.clr := $00100000
  57578. else
  57579. pTDefRegMap(@Self)^.&set := $00100000;
  57580. end;
  57581. function TINT_IFS0.getT5IF : TBits_1; inline;
  57582. begin
  57583. getT5IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  57584. end;
  57585. procedure TINT_IFS0.setIC5IF; inline;
  57586. begin
  57587. pTDefRegMap(@Self)^.&set := $00200000;
  57588. end;
  57589. procedure TINT_IFS0.clearIC5IF; inline;
  57590. begin
  57591. pTDefRegMap(@Self)^.clr := $00200000;
  57592. end;
  57593. procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
  57594. begin
  57595. if thebits = 0 then
  57596. pTDefRegMap(@Self)^.clr := $00200000
  57597. else
  57598. pTDefRegMap(@Self)^.&set := $00200000;
  57599. end;
  57600. function TINT_IFS0.getIC5IF : TBits_1; inline;
  57601. begin
  57602. getIC5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  57603. end;
  57604. procedure TINT_IFS0.setOC5IF; inline;
  57605. begin
  57606. pTDefRegMap(@Self)^.&set := $00400000;
  57607. end;
  57608. procedure TINT_IFS0.clearOC5IF; inline;
  57609. begin
  57610. pTDefRegMap(@Self)^.clr := $00400000;
  57611. end;
  57612. procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
  57613. begin
  57614. if thebits = 0 then
  57615. pTDefRegMap(@Self)^.clr := $00400000
  57616. else
  57617. pTDefRegMap(@Self)^.&set := $00400000;
  57618. end;
  57619. function TINT_IFS0.getOC5IF : TBits_1; inline;
  57620. begin
  57621. getOC5IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  57622. end;
  57623. procedure TINT_IFS0.setSPI1EIF; inline;
  57624. begin
  57625. pTDefRegMap(@Self)^.&set := $00800000;
  57626. end;
  57627. procedure TINT_IFS0.clearSPI1EIF; inline;
  57628. begin
  57629. pTDefRegMap(@Self)^.clr := $00800000;
  57630. end;
  57631. procedure TINT_IFS0.setSPI1EIF(thebits : TBits_1); inline;
  57632. begin
  57633. if thebits = 0 then
  57634. pTDefRegMap(@Self)^.clr := $00800000
  57635. else
  57636. pTDefRegMap(@Self)^.&set := $00800000;
  57637. end;
  57638. function TINT_IFS0.getSPI1EIF : TBits_1; inline;
  57639. begin
  57640. getSPI1EIF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  57641. end;
  57642. procedure TINT_IFS0.setSPI1RXIF; inline;
  57643. begin
  57644. pTDefRegMap(@Self)^.&set := $01000000;
  57645. end;
  57646. procedure TINT_IFS0.clearSPI1RXIF; inline;
  57647. begin
  57648. pTDefRegMap(@Self)^.clr := $01000000;
  57649. end;
  57650. procedure TINT_IFS0.setSPI1RXIF(thebits : TBits_1); inline;
  57651. begin
  57652. if thebits = 0 then
  57653. pTDefRegMap(@Self)^.clr := $01000000
  57654. else
  57655. pTDefRegMap(@Self)^.&set := $01000000;
  57656. end;
  57657. function TINT_IFS0.getSPI1RXIF : TBits_1; inline;
  57658. begin
  57659. getSPI1RXIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  57660. end;
  57661. procedure TINT_IFS0.setSPI1TXIF; inline;
  57662. begin
  57663. pTDefRegMap(@Self)^.&set := $02000000;
  57664. end;
  57665. procedure TINT_IFS0.clearSPI1TXIF; inline;
  57666. begin
  57667. pTDefRegMap(@Self)^.clr := $02000000;
  57668. end;
  57669. procedure TINT_IFS0.setSPI1TXIF(thebits : TBits_1); inline;
  57670. begin
  57671. if thebits = 0 then
  57672. pTDefRegMap(@Self)^.clr := $02000000
  57673. else
  57674. pTDefRegMap(@Self)^.&set := $02000000;
  57675. end;
  57676. function TINT_IFS0.getSPI1TXIF : TBits_1; inline;
  57677. begin
  57678. getSPI1TXIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  57679. end;
  57680. procedure TINT_IFS0.setU1EIF; inline;
  57681. begin
  57682. pTDefRegMap(@Self)^.&set := $04000000;
  57683. end;
  57684. procedure TINT_IFS0.clearU1EIF; inline;
  57685. begin
  57686. pTDefRegMap(@Self)^.clr := $04000000;
  57687. end;
  57688. procedure TINT_IFS0.setU1EIF(thebits : TBits_1); inline;
  57689. begin
  57690. if thebits = 0 then
  57691. pTDefRegMap(@Self)^.clr := $04000000
  57692. else
  57693. pTDefRegMap(@Self)^.&set := $04000000;
  57694. end;
  57695. function TINT_IFS0.getU1EIF : TBits_1; inline;
  57696. begin
  57697. getU1EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57698. end;
  57699. procedure TINT_IFS0.setU1RXIF; inline;
  57700. begin
  57701. pTDefRegMap(@Self)^.&set := $08000000;
  57702. end;
  57703. procedure TINT_IFS0.clearU1RXIF; inline;
  57704. begin
  57705. pTDefRegMap(@Self)^.clr := $08000000;
  57706. end;
  57707. procedure TINT_IFS0.setU1RXIF(thebits : TBits_1); inline;
  57708. begin
  57709. if thebits = 0 then
  57710. pTDefRegMap(@Self)^.clr := $08000000
  57711. else
  57712. pTDefRegMap(@Self)^.&set := $08000000;
  57713. end;
  57714. function TINT_IFS0.getU1RXIF : TBits_1; inline;
  57715. begin
  57716. getU1RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57717. end;
  57718. procedure TINT_IFS0.setU1TXIF; inline;
  57719. begin
  57720. pTDefRegMap(@Self)^.&set := $10000000;
  57721. end;
  57722. procedure TINT_IFS0.clearU1TXIF; inline;
  57723. begin
  57724. pTDefRegMap(@Self)^.clr := $10000000;
  57725. end;
  57726. procedure TINT_IFS0.setU1TXIF(thebits : TBits_1); inline;
  57727. begin
  57728. if thebits = 0 then
  57729. pTDefRegMap(@Self)^.clr := $10000000
  57730. else
  57731. pTDefRegMap(@Self)^.&set := $10000000;
  57732. end;
  57733. function TINT_IFS0.getU1TXIF : TBits_1; inline;
  57734. begin
  57735. getU1TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57736. end;
  57737. procedure TINT_IFS0.setI2C1BIF; inline;
  57738. begin
  57739. pTDefRegMap(@Self)^.&set := $20000000;
  57740. end;
  57741. procedure TINT_IFS0.clearI2C1BIF; inline;
  57742. begin
  57743. pTDefRegMap(@Self)^.clr := $20000000;
  57744. end;
  57745. procedure TINT_IFS0.setI2C1BIF(thebits : TBits_1); inline;
  57746. begin
  57747. if thebits = 0 then
  57748. pTDefRegMap(@Self)^.clr := $20000000
  57749. else
  57750. pTDefRegMap(@Self)^.&set := $20000000;
  57751. end;
  57752. function TINT_IFS0.getI2C1BIF : TBits_1; inline;
  57753. begin
  57754. getI2C1BIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  57755. end;
  57756. procedure TINT_IFS0.setI2C1SIF; inline;
  57757. begin
  57758. pTDefRegMap(@Self)^.&set := $40000000;
  57759. end;
  57760. procedure TINT_IFS0.clearI2C1SIF; inline;
  57761. begin
  57762. pTDefRegMap(@Self)^.clr := $40000000;
  57763. end;
  57764. procedure TINT_IFS0.setI2C1SIF(thebits : TBits_1); inline;
  57765. begin
  57766. if thebits = 0 then
  57767. pTDefRegMap(@Self)^.clr := $40000000
  57768. else
  57769. pTDefRegMap(@Self)^.&set := $40000000;
  57770. end;
  57771. function TINT_IFS0.getI2C1SIF : TBits_1; inline;
  57772. begin
  57773. getI2C1SIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  57774. end;
  57775. procedure TINT_IFS0.setI2C1MIF; inline;
  57776. begin
  57777. pTDefRegMap(@Self)^.&set := $80000000;
  57778. end;
  57779. procedure TINT_IFS0.clearI2C1MIF; inline;
  57780. begin
  57781. pTDefRegMap(@Self)^.clr := $80000000;
  57782. end;
  57783. procedure TINT_IFS0.setI2C1MIF(thebits : TBits_1); inline;
  57784. begin
  57785. if thebits = 0 then
  57786. pTDefRegMap(@Self)^.clr := $80000000
  57787. else
  57788. pTDefRegMap(@Self)^.&set := $80000000;
  57789. end;
  57790. function TINT_IFS0.getI2C1MIF : TBits_1; inline;
  57791. begin
  57792. getI2C1MIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  57793. end;
  57794. procedure TINT_IFS0.setU1AEIF; inline;
  57795. begin
  57796. pTDefRegMap(@Self)^.&set := $04000000;
  57797. end;
  57798. procedure TINT_IFS0.clearU1AEIF; inline;
  57799. begin
  57800. pTDefRegMap(@Self)^.clr := $04000000;
  57801. end;
  57802. procedure TINT_IFS0.setU1AEIF(thebits : TBits_1); inline;
  57803. begin
  57804. if thebits = 0 then
  57805. pTDefRegMap(@Self)^.clr := $04000000
  57806. else
  57807. pTDefRegMap(@Self)^.&set := $04000000;
  57808. end;
  57809. function TINT_IFS0.getU1AEIF : TBits_1; inline;
  57810. begin
  57811. getU1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57812. end;
  57813. procedure TINT_IFS0.setU1ARXIF; inline;
  57814. begin
  57815. pTDefRegMap(@Self)^.&set := $08000000;
  57816. end;
  57817. procedure TINT_IFS0.clearU1ARXIF; inline;
  57818. begin
  57819. pTDefRegMap(@Self)^.clr := $08000000;
  57820. end;
  57821. procedure TINT_IFS0.setU1ARXIF(thebits : TBits_1); inline;
  57822. begin
  57823. if thebits = 0 then
  57824. pTDefRegMap(@Self)^.clr := $08000000
  57825. else
  57826. pTDefRegMap(@Self)^.&set := $08000000;
  57827. end;
  57828. function TINT_IFS0.getU1ARXIF : TBits_1; inline;
  57829. begin
  57830. getU1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57831. end;
  57832. procedure TINT_IFS0.setU1ATXIF; inline;
  57833. begin
  57834. pTDefRegMap(@Self)^.&set := $10000000;
  57835. end;
  57836. procedure TINT_IFS0.clearU1ATXIF; inline;
  57837. begin
  57838. pTDefRegMap(@Self)^.clr := $10000000;
  57839. end;
  57840. procedure TINT_IFS0.setU1ATXIF(thebits : TBits_1); inline;
  57841. begin
  57842. if thebits = 0 then
  57843. pTDefRegMap(@Self)^.clr := $10000000
  57844. else
  57845. pTDefRegMap(@Self)^.&set := $10000000;
  57846. end;
  57847. function TINT_IFS0.getU1ATXIF : TBits_1; inline;
  57848. begin
  57849. getU1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57850. end;
  57851. procedure TINT_IFS0.setSPI3EIF; inline;
  57852. begin
  57853. pTDefRegMap(@Self)^.&set := $04000000;
  57854. end;
  57855. procedure TINT_IFS0.clearSPI3EIF; inline;
  57856. begin
  57857. pTDefRegMap(@Self)^.clr := $04000000;
  57858. end;
  57859. procedure TINT_IFS0.setSPI3EIF(thebits : TBits_1); inline;
  57860. begin
  57861. if thebits = 0 then
  57862. pTDefRegMap(@Self)^.clr := $04000000
  57863. else
  57864. pTDefRegMap(@Self)^.&set := $04000000;
  57865. end;
  57866. function TINT_IFS0.getSPI3EIF : TBits_1; inline;
  57867. begin
  57868. getSPI3EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57869. end;
  57870. procedure TINT_IFS0.setSPI3RXIF; inline;
  57871. begin
  57872. pTDefRegMap(@Self)^.&set := $08000000;
  57873. end;
  57874. procedure TINT_IFS0.clearSPI3RXIF; inline;
  57875. begin
  57876. pTDefRegMap(@Self)^.clr := $08000000;
  57877. end;
  57878. procedure TINT_IFS0.setSPI3RXIF(thebits : TBits_1); inline;
  57879. begin
  57880. if thebits = 0 then
  57881. pTDefRegMap(@Self)^.clr := $08000000
  57882. else
  57883. pTDefRegMap(@Self)^.&set := $08000000;
  57884. end;
  57885. function TINT_IFS0.getSPI3RXIF : TBits_1; inline;
  57886. begin
  57887. getSPI3RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57888. end;
  57889. procedure TINT_IFS0.setSPI3TXIF; inline;
  57890. begin
  57891. pTDefRegMap(@Self)^.&set := $10000000;
  57892. end;
  57893. procedure TINT_IFS0.clearSPI3TXIF; inline;
  57894. begin
  57895. pTDefRegMap(@Self)^.clr := $10000000;
  57896. end;
  57897. procedure TINT_IFS0.setSPI3TXIF(thebits : TBits_1); inline;
  57898. begin
  57899. if thebits = 0 then
  57900. pTDefRegMap(@Self)^.clr := $10000000
  57901. else
  57902. pTDefRegMap(@Self)^.&set := $10000000;
  57903. end;
  57904. function TINT_IFS0.getSPI3TXIF : TBits_1; inline;
  57905. begin
  57906. getSPI3TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57907. end;
  57908. procedure TINT_IFS0.setSPI1AEIF; inline;
  57909. begin
  57910. pTDefRegMap(@Self)^.&set := $04000000;
  57911. end;
  57912. procedure TINT_IFS0.clearSPI1AEIF; inline;
  57913. begin
  57914. pTDefRegMap(@Self)^.clr := $04000000;
  57915. end;
  57916. procedure TINT_IFS0.setSPI1AEIF(thebits : TBits_1); inline;
  57917. begin
  57918. if thebits = 0 then
  57919. pTDefRegMap(@Self)^.clr := $04000000
  57920. else
  57921. pTDefRegMap(@Self)^.&set := $04000000;
  57922. end;
  57923. function TINT_IFS0.getSPI1AEIF : TBits_1; inline;
  57924. begin
  57925. getSPI1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57926. end;
  57927. procedure TINT_IFS0.setSPI1ARXIF; inline;
  57928. begin
  57929. pTDefRegMap(@Self)^.&set := $08000000;
  57930. end;
  57931. procedure TINT_IFS0.clearSPI1ARXIF; inline;
  57932. begin
  57933. pTDefRegMap(@Self)^.clr := $08000000;
  57934. end;
  57935. procedure TINT_IFS0.setSPI1ARXIF(thebits : TBits_1); inline;
  57936. begin
  57937. if thebits = 0 then
  57938. pTDefRegMap(@Self)^.clr := $08000000
  57939. else
  57940. pTDefRegMap(@Self)^.&set := $08000000;
  57941. end;
  57942. function TINT_IFS0.getSPI1ARXIF : TBits_1; inline;
  57943. begin
  57944. getSPI1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57945. end;
  57946. procedure TINT_IFS0.setSPI1ATXIF; inline;
  57947. begin
  57948. pTDefRegMap(@Self)^.&set := $10000000;
  57949. end;
  57950. procedure TINT_IFS0.clearSPI1ATXIF; inline;
  57951. begin
  57952. pTDefRegMap(@Self)^.clr := $10000000;
  57953. end;
  57954. procedure TINT_IFS0.setSPI1ATXIF(thebits : TBits_1); inline;
  57955. begin
  57956. if thebits = 0 then
  57957. pTDefRegMap(@Self)^.clr := $10000000
  57958. else
  57959. pTDefRegMap(@Self)^.&set := $10000000;
  57960. end;
  57961. function TINT_IFS0.getSPI1ATXIF : TBits_1; inline;
  57962. begin
  57963. getSPI1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57964. end;
  57965. procedure TINT_IFS0.setI2C3BIF; inline;
  57966. begin
  57967. pTDefRegMap(@Self)^.&set := $04000000;
  57968. end;
  57969. procedure TINT_IFS0.clearI2C3BIF; inline;
  57970. begin
  57971. pTDefRegMap(@Self)^.clr := $04000000;
  57972. end;
  57973. procedure TINT_IFS0.setI2C3BIF(thebits : TBits_1); inline;
  57974. begin
  57975. if thebits = 0 then
  57976. pTDefRegMap(@Self)^.clr := $04000000
  57977. else
  57978. pTDefRegMap(@Self)^.&set := $04000000;
  57979. end;
  57980. function TINT_IFS0.getI2C3BIF : TBits_1; inline;
  57981. begin
  57982. getI2C3BIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57983. end;
  57984. procedure TINT_IFS0.setI2C3SIF; inline;
  57985. begin
  57986. pTDefRegMap(@Self)^.&set := $08000000;
  57987. end;
  57988. procedure TINT_IFS0.clearI2C3SIF; inline;
  57989. begin
  57990. pTDefRegMap(@Self)^.clr := $08000000;
  57991. end;
  57992. procedure TINT_IFS0.setI2C3SIF(thebits : TBits_1); inline;
  57993. begin
  57994. if thebits = 0 then
  57995. pTDefRegMap(@Self)^.clr := $08000000
  57996. else
  57997. pTDefRegMap(@Self)^.&set := $08000000;
  57998. end;
  57999. function TINT_IFS0.getI2C3SIF : TBits_1; inline;
  58000. begin
  58001. getI2C3SIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  58002. end;
  58003. procedure TINT_IFS0.setI2C3MIF; inline;
  58004. begin
  58005. pTDefRegMap(@Self)^.&set := $10000000;
  58006. end;
  58007. procedure TINT_IFS0.clearI2C3MIF; inline;
  58008. begin
  58009. pTDefRegMap(@Self)^.clr := $10000000;
  58010. end;
  58011. procedure TINT_IFS0.setI2C3MIF(thebits : TBits_1); inline;
  58012. begin
  58013. if thebits = 0 then
  58014. pTDefRegMap(@Self)^.clr := $10000000
  58015. else
  58016. pTDefRegMap(@Self)^.&set := $10000000;
  58017. end;
  58018. function TINT_IFS0.getI2C3MIF : TBits_1; inline;
  58019. begin
  58020. getI2C3MIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  58021. end;
  58022. procedure TINT_IFS0.setI2C1ABIF; inline;
  58023. begin
  58024. pTDefRegMap(@Self)^.&set := $04000000;
  58025. end;
  58026. procedure TINT_IFS0.clearI2C1ABIF; inline;
  58027. begin
  58028. pTDefRegMap(@Self)^.clr := $04000000;
  58029. end;
  58030. procedure TINT_IFS0.setI2C1ABIF(thebits : TBits_1); inline;
  58031. begin
  58032. if thebits = 0 then
  58033. pTDefRegMap(@Self)^.clr := $04000000
  58034. else
  58035. pTDefRegMap(@Self)^.&set := $04000000;
  58036. end;
  58037. function TINT_IFS0.getI2C1ABIF : TBits_1; inline;
  58038. begin
  58039. getI2C1ABIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  58040. end;
  58041. procedure TINT_IFS0.setI2C1ASIF; inline;
  58042. begin
  58043. pTDefRegMap(@Self)^.&set := $08000000;
  58044. end;
  58045. procedure TINT_IFS0.clearI2C1ASIF; inline;
  58046. begin
  58047. pTDefRegMap(@Self)^.clr := $08000000;
  58048. end;
  58049. procedure TINT_IFS0.setI2C1ASIF(thebits : TBits_1); inline;
  58050. begin
  58051. if thebits = 0 then
  58052. pTDefRegMap(@Self)^.clr := $08000000
  58053. else
  58054. pTDefRegMap(@Self)^.&set := $08000000;
  58055. end;
  58056. function TINT_IFS0.getI2C1ASIF : TBits_1; inline;
  58057. begin
  58058. getI2C1ASIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  58059. end;
  58060. procedure TINT_IFS0.setI2C1AMIF; inline;
  58061. begin
  58062. pTDefRegMap(@Self)^.&set := $10000000;
  58063. end;
  58064. procedure TINT_IFS0.clearI2C1AMIF; inline;
  58065. begin
  58066. pTDefRegMap(@Self)^.clr := $10000000;
  58067. end;
  58068. procedure TINT_IFS0.setI2C1AMIF(thebits : TBits_1); inline;
  58069. begin
  58070. if thebits = 0 then
  58071. pTDefRegMap(@Self)^.clr := $10000000
  58072. else
  58073. pTDefRegMap(@Self)^.&set := $10000000;
  58074. end;
  58075. function TINT_IFS0.getI2C1AMIF : TBits_1; inline;
  58076. begin
  58077. getI2C1AMIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  58078. end;
  58079. procedure TINT_IFS0.setw(thebits : TBits_32); inline;
  58080. begin
  58081. pTDefRegMap(@Self)^.val := thebits;
  58082. end;
  58083. function TINT_IFS0.getw : TBits_32; inline;
  58084. begin
  58085. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  58086. end;
  58087. procedure TINT_IFS1.setCNIF; inline;
  58088. begin
  58089. pTDefRegMap(@Self)^.&set := $00000001;
  58090. end;
  58091. procedure TINT_IFS1.clearCNIF; inline;
  58092. begin
  58093. pTDefRegMap(@Self)^.clr := $00000001;
  58094. end;
  58095. procedure TINT_IFS1.setCNIF(thebits : TBits_1); inline;
  58096. begin
  58097. if thebits = 0 then
  58098. pTDefRegMap(@Self)^.clr := $00000001
  58099. else
  58100. pTDefRegMap(@Self)^.&set := $00000001;
  58101. end;
  58102. function TINT_IFS1.getCNIF : TBits_1; inline;
  58103. begin
  58104. getCNIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58105. end;
  58106. procedure TINT_IFS1.setAD1IF; inline;
  58107. begin
  58108. pTDefRegMap(@Self)^.&set := $00000002;
  58109. end;
  58110. procedure TINT_IFS1.clearAD1IF; inline;
  58111. begin
  58112. pTDefRegMap(@Self)^.clr := $00000002;
  58113. end;
  58114. procedure TINT_IFS1.setAD1IF(thebits : TBits_1); inline;
  58115. begin
  58116. if thebits = 0 then
  58117. pTDefRegMap(@Self)^.clr := $00000002
  58118. else
  58119. pTDefRegMap(@Self)^.&set := $00000002;
  58120. end;
  58121. function TINT_IFS1.getAD1IF : TBits_1; inline;
  58122. begin
  58123. getAD1IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58124. end;
  58125. procedure TINT_IFS1.setPMPIF; inline;
  58126. begin
  58127. pTDefRegMap(@Self)^.&set := $00000004;
  58128. end;
  58129. procedure TINT_IFS1.clearPMPIF; inline;
  58130. begin
  58131. pTDefRegMap(@Self)^.clr := $00000004;
  58132. end;
  58133. procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
  58134. begin
  58135. if thebits = 0 then
  58136. pTDefRegMap(@Self)^.clr := $00000004
  58137. else
  58138. pTDefRegMap(@Self)^.&set := $00000004;
  58139. end;
  58140. function TINT_IFS1.getPMPIF : TBits_1; inline;
  58141. begin
  58142. getPMPIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58143. end;
  58144. procedure TINT_IFS1.setCMP1IF; inline;
  58145. begin
  58146. pTDefRegMap(@Self)^.&set := $00000008;
  58147. end;
  58148. procedure TINT_IFS1.clearCMP1IF; inline;
  58149. begin
  58150. pTDefRegMap(@Self)^.clr := $00000008;
  58151. end;
  58152. procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
  58153. begin
  58154. if thebits = 0 then
  58155. pTDefRegMap(@Self)^.clr := $00000008
  58156. else
  58157. pTDefRegMap(@Self)^.&set := $00000008;
  58158. end;
  58159. function TINT_IFS1.getCMP1IF : TBits_1; inline;
  58160. begin
  58161. getCMP1IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58162. end;
  58163. procedure TINT_IFS1.setCMP2IF; inline;
  58164. begin
  58165. pTDefRegMap(@Self)^.&set := $00000010;
  58166. end;
  58167. procedure TINT_IFS1.clearCMP2IF; inline;
  58168. begin
  58169. pTDefRegMap(@Self)^.clr := $00000010;
  58170. end;
  58171. procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
  58172. begin
  58173. if thebits = 0 then
  58174. pTDefRegMap(@Self)^.clr := $00000010
  58175. else
  58176. pTDefRegMap(@Self)^.&set := $00000010;
  58177. end;
  58178. function TINT_IFS1.getCMP2IF : TBits_1; inline;
  58179. begin
  58180. getCMP2IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58181. end;
  58182. procedure TINT_IFS1.setU3EIF; inline;
  58183. begin
  58184. pTDefRegMap(@Self)^.&set := $00000020;
  58185. end;
  58186. procedure TINT_IFS1.clearU3EIF; inline;
  58187. begin
  58188. pTDefRegMap(@Self)^.clr := $00000020;
  58189. end;
  58190. procedure TINT_IFS1.setU3EIF(thebits : TBits_1); inline;
  58191. begin
  58192. if thebits = 0 then
  58193. pTDefRegMap(@Self)^.clr := $00000020
  58194. else
  58195. pTDefRegMap(@Self)^.&set := $00000020;
  58196. end;
  58197. function TINT_IFS1.getU3EIF : TBits_1; inline;
  58198. begin
  58199. getU3EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58200. end;
  58201. procedure TINT_IFS1.setU3RXIF; inline;
  58202. begin
  58203. pTDefRegMap(@Self)^.&set := $00000040;
  58204. end;
  58205. procedure TINT_IFS1.clearU3RXIF; inline;
  58206. begin
  58207. pTDefRegMap(@Self)^.clr := $00000040;
  58208. end;
  58209. procedure TINT_IFS1.setU3RXIF(thebits : TBits_1); inline;
  58210. begin
  58211. if thebits = 0 then
  58212. pTDefRegMap(@Self)^.clr := $00000040
  58213. else
  58214. pTDefRegMap(@Self)^.&set := $00000040;
  58215. end;
  58216. function TINT_IFS1.getU3RXIF : TBits_1; inline;
  58217. begin
  58218. getU3RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58219. end;
  58220. procedure TINT_IFS1.setU3TXIF; inline;
  58221. begin
  58222. pTDefRegMap(@Self)^.&set := $00000080;
  58223. end;
  58224. procedure TINT_IFS1.clearU3TXIF; inline;
  58225. begin
  58226. pTDefRegMap(@Self)^.clr := $00000080;
  58227. end;
  58228. procedure TINT_IFS1.setU3TXIF(thebits : TBits_1); inline;
  58229. begin
  58230. if thebits = 0 then
  58231. pTDefRegMap(@Self)^.clr := $00000080
  58232. else
  58233. pTDefRegMap(@Self)^.&set := $00000080;
  58234. end;
  58235. function TINT_IFS1.getU3TXIF : TBits_1; inline;
  58236. begin
  58237. getU3TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58238. end;
  58239. procedure TINT_IFS1.setU2EIF; inline;
  58240. begin
  58241. pTDefRegMap(@Self)^.&set := $00000100;
  58242. end;
  58243. procedure TINT_IFS1.clearU2EIF; inline;
  58244. begin
  58245. pTDefRegMap(@Self)^.clr := $00000100;
  58246. end;
  58247. procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
  58248. begin
  58249. if thebits = 0 then
  58250. pTDefRegMap(@Self)^.clr := $00000100
  58251. else
  58252. pTDefRegMap(@Self)^.&set := $00000100;
  58253. end;
  58254. function TINT_IFS1.getU2EIF : TBits_1; inline;
  58255. begin
  58256. getU2EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58257. end;
  58258. procedure TINT_IFS1.setU2RXIF; inline;
  58259. begin
  58260. pTDefRegMap(@Self)^.&set := $00000200;
  58261. end;
  58262. procedure TINT_IFS1.clearU2RXIF; inline;
  58263. begin
  58264. pTDefRegMap(@Self)^.clr := $00000200;
  58265. end;
  58266. procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
  58267. begin
  58268. if thebits = 0 then
  58269. pTDefRegMap(@Self)^.clr := $00000200
  58270. else
  58271. pTDefRegMap(@Self)^.&set := $00000200;
  58272. end;
  58273. function TINT_IFS1.getU2RXIF : TBits_1; inline;
  58274. begin
  58275. getU2RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58276. end;
  58277. procedure TINT_IFS1.setU2TXIF; inline;
  58278. begin
  58279. pTDefRegMap(@Self)^.&set := $00000400;
  58280. end;
  58281. procedure TINT_IFS1.clearU2TXIF; inline;
  58282. begin
  58283. pTDefRegMap(@Self)^.clr := $00000400;
  58284. end;
  58285. procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
  58286. begin
  58287. if thebits = 0 then
  58288. pTDefRegMap(@Self)^.clr := $00000400
  58289. else
  58290. pTDefRegMap(@Self)^.&set := $00000400;
  58291. end;
  58292. function TINT_IFS1.getU2TXIF : TBits_1; inline;
  58293. begin
  58294. getU2TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58295. end;
  58296. procedure TINT_IFS1.setI2C2BIF; inline;
  58297. begin
  58298. pTDefRegMap(@Self)^.&set := $00000800;
  58299. end;
  58300. procedure TINT_IFS1.clearI2C2BIF; inline;
  58301. begin
  58302. pTDefRegMap(@Self)^.clr := $00000800;
  58303. end;
  58304. procedure TINT_IFS1.setI2C2BIF(thebits : TBits_1); inline;
  58305. begin
  58306. if thebits = 0 then
  58307. pTDefRegMap(@Self)^.clr := $00000800
  58308. else
  58309. pTDefRegMap(@Self)^.&set := $00000800;
  58310. end;
  58311. function TINT_IFS1.getI2C2BIF : TBits_1; inline;
  58312. begin
  58313. getI2C2BIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  58314. end;
  58315. procedure TINT_IFS1.setI2C2SIF; inline;
  58316. begin
  58317. pTDefRegMap(@Self)^.&set := $00001000;
  58318. end;
  58319. procedure TINT_IFS1.clearI2C2SIF; inline;
  58320. begin
  58321. pTDefRegMap(@Self)^.clr := $00001000;
  58322. end;
  58323. procedure TINT_IFS1.setI2C2SIF(thebits : TBits_1); inline;
  58324. begin
  58325. if thebits = 0 then
  58326. pTDefRegMap(@Self)^.clr := $00001000
  58327. else
  58328. pTDefRegMap(@Self)^.&set := $00001000;
  58329. end;
  58330. function TINT_IFS1.getI2C2SIF : TBits_1; inline;
  58331. begin
  58332. getI2C2SIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  58333. end;
  58334. procedure TINT_IFS1.setI2C2MIF; inline;
  58335. begin
  58336. pTDefRegMap(@Self)^.&set := $00002000;
  58337. end;
  58338. procedure TINT_IFS1.clearI2C2MIF; inline;
  58339. begin
  58340. pTDefRegMap(@Self)^.clr := $00002000;
  58341. end;
  58342. procedure TINT_IFS1.setI2C2MIF(thebits : TBits_1); inline;
  58343. begin
  58344. if thebits = 0 then
  58345. pTDefRegMap(@Self)^.clr := $00002000
  58346. else
  58347. pTDefRegMap(@Self)^.&set := $00002000;
  58348. end;
  58349. function TINT_IFS1.getI2C2MIF : TBits_1; inline;
  58350. begin
  58351. getI2C2MIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  58352. end;
  58353. procedure TINT_IFS1.setFSCMIF; inline;
  58354. begin
  58355. pTDefRegMap(@Self)^.&set := $00004000;
  58356. end;
  58357. procedure TINT_IFS1.clearFSCMIF; inline;
  58358. begin
  58359. pTDefRegMap(@Self)^.clr := $00004000;
  58360. end;
  58361. procedure TINT_IFS1.setFSCMIF(thebits : TBits_1); inline;
  58362. begin
  58363. if thebits = 0 then
  58364. pTDefRegMap(@Self)^.clr := $00004000
  58365. else
  58366. pTDefRegMap(@Self)^.&set := $00004000;
  58367. end;
  58368. function TINT_IFS1.getFSCMIF : TBits_1; inline;
  58369. begin
  58370. getFSCMIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58371. end;
  58372. procedure TINT_IFS1.setRTCCIF; inline;
  58373. begin
  58374. pTDefRegMap(@Self)^.&set := $00008000;
  58375. end;
  58376. procedure TINT_IFS1.clearRTCCIF; inline;
  58377. begin
  58378. pTDefRegMap(@Self)^.clr := $00008000;
  58379. end;
  58380. procedure TINT_IFS1.setRTCCIF(thebits : TBits_1); inline;
  58381. begin
  58382. if thebits = 0 then
  58383. pTDefRegMap(@Self)^.clr := $00008000
  58384. else
  58385. pTDefRegMap(@Self)^.&set := $00008000;
  58386. end;
  58387. function TINT_IFS1.getRTCCIF : TBits_1; inline;
  58388. begin
  58389. getRTCCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58390. end;
  58391. procedure TINT_IFS1.setDMA0IF; inline;
  58392. begin
  58393. pTDefRegMap(@Self)^.&set := $00010000;
  58394. end;
  58395. procedure TINT_IFS1.clearDMA0IF; inline;
  58396. begin
  58397. pTDefRegMap(@Self)^.clr := $00010000;
  58398. end;
  58399. procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
  58400. begin
  58401. if thebits = 0 then
  58402. pTDefRegMap(@Self)^.clr := $00010000
  58403. else
  58404. pTDefRegMap(@Self)^.&set := $00010000;
  58405. end;
  58406. function TINT_IFS1.getDMA0IF : TBits_1; inline;
  58407. begin
  58408. getDMA0IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  58409. end;
  58410. procedure TINT_IFS1.setDMA1IF; inline;
  58411. begin
  58412. pTDefRegMap(@Self)^.&set := $00020000;
  58413. end;
  58414. procedure TINT_IFS1.clearDMA1IF; inline;
  58415. begin
  58416. pTDefRegMap(@Self)^.clr := $00020000;
  58417. end;
  58418. procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
  58419. begin
  58420. if thebits = 0 then
  58421. pTDefRegMap(@Self)^.clr := $00020000
  58422. else
  58423. pTDefRegMap(@Self)^.&set := $00020000;
  58424. end;
  58425. function TINT_IFS1.getDMA1IF : TBits_1; inline;
  58426. begin
  58427. getDMA1IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  58428. end;
  58429. procedure TINT_IFS1.setDMA2IF; inline;
  58430. begin
  58431. pTDefRegMap(@Self)^.&set := $00040000;
  58432. end;
  58433. procedure TINT_IFS1.clearDMA2IF; inline;
  58434. begin
  58435. pTDefRegMap(@Self)^.clr := $00040000;
  58436. end;
  58437. procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
  58438. begin
  58439. if thebits = 0 then
  58440. pTDefRegMap(@Self)^.clr := $00040000
  58441. else
  58442. pTDefRegMap(@Self)^.&set := $00040000;
  58443. end;
  58444. function TINT_IFS1.getDMA2IF : TBits_1; inline;
  58445. begin
  58446. getDMA2IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  58447. end;
  58448. procedure TINT_IFS1.setDMA3IF; inline;
  58449. begin
  58450. pTDefRegMap(@Self)^.&set := $00080000;
  58451. end;
  58452. procedure TINT_IFS1.clearDMA3IF; inline;
  58453. begin
  58454. pTDefRegMap(@Self)^.clr := $00080000;
  58455. end;
  58456. procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
  58457. begin
  58458. if thebits = 0 then
  58459. pTDefRegMap(@Self)^.clr := $00080000
  58460. else
  58461. pTDefRegMap(@Self)^.&set := $00080000;
  58462. end;
  58463. function TINT_IFS1.getDMA3IF : TBits_1; inline;
  58464. begin
  58465. getDMA3IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  58466. end;
  58467. procedure TINT_IFS1.setDMA4IF; inline;
  58468. begin
  58469. pTDefRegMap(@Self)^.&set := $00100000;
  58470. end;
  58471. procedure TINT_IFS1.clearDMA4IF; inline;
  58472. begin
  58473. pTDefRegMap(@Self)^.clr := $00100000;
  58474. end;
  58475. procedure TINT_IFS1.setDMA4IF(thebits : TBits_1); inline;
  58476. begin
  58477. if thebits = 0 then
  58478. pTDefRegMap(@Self)^.clr := $00100000
  58479. else
  58480. pTDefRegMap(@Self)^.&set := $00100000;
  58481. end;
  58482. function TINT_IFS1.getDMA4IF : TBits_1; inline;
  58483. begin
  58484. getDMA4IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  58485. end;
  58486. procedure TINT_IFS1.setDMA5IF; inline;
  58487. begin
  58488. pTDefRegMap(@Self)^.&set := $00200000;
  58489. end;
  58490. procedure TINT_IFS1.clearDMA5IF; inline;
  58491. begin
  58492. pTDefRegMap(@Self)^.clr := $00200000;
  58493. end;
  58494. procedure TINT_IFS1.setDMA5IF(thebits : TBits_1); inline;
  58495. begin
  58496. if thebits = 0 then
  58497. pTDefRegMap(@Self)^.clr := $00200000
  58498. else
  58499. pTDefRegMap(@Self)^.&set := $00200000;
  58500. end;
  58501. function TINT_IFS1.getDMA5IF : TBits_1; inline;
  58502. begin
  58503. getDMA5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  58504. end;
  58505. procedure TINT_IFS1.setDMA6IF; inline;
  58506. begin
  58507. pTDefRegMap(@Self)^.&set := $00400000;
  58508. end;
  58509. procedure TINT_IFS1.clearDMA6IF; inline;
  58510. begin
  58511. pTDefRegMap(@Self)^.clr := $00400000;
  58512. end;
  58513. procedure TINT_IFS1.setDMA6IF(thebits : TBits_1); inline;
  58514. begin
  58515. if thebits = 0 then
  58516. pTDefRegMap(@Self)^.clr := $00400000
  58517. else
  58518. pTDefRegMap(@Self)^.&set := $00400000;
  58519. end;
  58520. function TINT_IFS1.getDMA6IF : TBits_1; inline;
  58521. begin
  58522. getDMA6IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  58523. end;
  58524. procedure TINT_IFS1.setDMA7IF; inline;
  58525. begin
  58526. pTDefRegMap(@Self)^.&set := $00800000;
  58527. end;
  58528. procedure TINT_IFS1.clearDMA7IF; inline;
  58529. begin
  58530. pTDefRegMap(@Self)^.clr := $00800000;
  58531. end;
  58532. procedure TINT_IFS1.setDMA7IF(thebits : TBits_1); inline;
  58533. begin
  58534. if thebits = 0 then
  58535. pTDefRegMap(@Self)^.clr := $00800000
  58536. else
  58537. pTDefRegMap(@Self)^.&set := $00800000;
  58538. end;
  58539. function TINT_IFS1.getDMA7IF : TBits_1; inline;
  58540. begin
  58541. getDMA7IF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  58542. end;
  58543. procedure TINT_IFS1.setFCEIF; inline;
  58544. begin
  58545. pTDefRegMap(@Self)^.&set := $01000000;
  58546. end;
  58547. procedure TINT_IFS1.clearFCEIF; inline;
  58548. begin
  58549. pTDefRegMap(@Self)^.clr := $01000000;
  58550. end;
  58551. procedure TINT_IFS1.setFCEIF(thebits : TBits_1); inline;
  58552. begin
  58553. if thebits = 0 then
  58554. pTDefRegMap(@Self)^.clr := $01000000
  58555. else
  58556. pTDefRegMap(@Self)^.&set := $01000000;
  58557. end;
  58558. function TINT_IFS1.getFCEIF : TBits_1; inline;
  58559. begin
  58560. getFCEIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  58561. end;
  58562. procedure TINT_IFS1.setUSBIF; inline;
  58563. begin
  58564. pTDefRegMap(@Self)^.&set := $02000000;
  58565. end;
  58566. procedure TINT_IFS1.clearUSBIF; inline;
  58567. begin
  58568. pTDefRegMap(@Self)^.clr := $02000000;
  58569. end;
  58570. procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
  58571. begin
  58572. if thebits = 0 then
  58573. pTDefRegMap(@Self)^.clr := $02000000
  58574. else
  58575. pTDefRegMap(@Self)^.&set := $02000000;
  58576. end;
  58577. function TINT_IFS1.getUSBIF : TBits_1; inline;
  58578. begin
  58579. getUSBIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  58580. end;
  58581. procedure TINT_IFS1.setCAN1IF; inline;
  58582. begin
  58583. pTDefRegMap(@Self)^.&set := $04000000;
  58584. end;
  58585. procedure TINT_IFS1.clearCAN1IF; inline;
  58586. begin
  58587. pTDefRegMap(@Self)^.clr := $04000000;
  58588. end;
  58589. procedure TINT_IFS1.setCAN1IF(thebits : TBits_1); inline;
  58590. begin
  58591. if thebits = 0 then
  58592. pTDefRegMap(@Self)^.clr := $04000000
  58593. else
  58594. pTDefRegMap(@Self)^.&set := $04000000;
  58595. end;
  58596. function TINT_IFS1.getCAN1IF : TBits_1; inline;
  58597. begin
  58598. getCAN1IF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  58599. end;
  58600. procedure TINT_IFS1.setCAN2IF; inline;
  58601. begin
  58602. pTDefRegMap(@Self)^.&set := $08000000;
  58603. end;
  58604. procedure TINT_IFS1.clearCAN2IF; inline;
  58605. begin
  58606. pTDefRegMap(@Self)^.clr := $08000000;
  58607. end;
  58608. procedure TINT_IFS1.setCAN2IF(thebits : TBits_1); inline;
  58609. begin
  58610. if thebits = 0 then
  58611. pTDefRegMap(@Self)^.clr := $08000000
  58612. else
  58613. pTDefRegMap(@Self)^.&set := $08000000;
  58614. end;
  58615. function TINT_IFS1.getCAN2IF : TBits_1; inline;
  58616. begin
  58617. getCAN2IF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  58618. end;
  58619. procedure TINT_IFS1.setETHIF; inline;
  58620. begin
  58621. pTDefRegMap(@Self)^.&set := $10000000;
  58622. end;
  58623. procedure TINT_IFS1.clearETHIF; inline;
  58624. begin
  58625. pTDefRegMap(@Self)^.clr := $10000000;
  58626. end;
  58627. procedure TINT_IFS1.setETHIF(thebits : TBits_1); inline;
  58628. begin
  58629. if thebits = 0 then
  58630. pTDefRegMap(@Self)^.clr := $10000000
  58631. else
  58632. pTDefRegMap(@Self)^.&set := $10000000;
  58633. end;
  58634. function TINT_IFS1.getETHIF : TBits_1; inline;
  58635. begin
  58636. getETHIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  58637. end;
  58638. procedure TINT_IFS1.setIC1EIF; inline;
  58639. begin
  58640. pTDefRegMap(@Self)^.&set := $20000000;
  58641. end;
  58642. procedure TINT_IFS1.clearIC1EIF; inline;
  58643. begin
  58644. pTDefRegMap(@Self)^.clr := $20000000;
  58645. end;
  58646. procedure TINT_IFS1.setIC1EIF(thebits : TBits_1); inline;
  58647. begin
  58648. if thebits = 0 then
  58649. pTDefRegMap(@Self)^.clr := $20000000
  58650. else
  58651. pTDefRegMap(@Self)^.&set := $20000000;
  58652. end;
  58653. function TINT_IFS1.getIC1EIF : TBits_1; inline;
  58654. begin
  58655. getIC1EIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  58656. end;
  58657. procedure TINT_IFS1.setIC2EIF; inline;
  58658. begin
  58659. pTDefRegMap(@Self)^.&set := $40000000;
  58660. end;
  58661. procedure TINT_IFS1.clearIC2EIF; inline;
  58662. begin
  58663. pTDefRegMap(@Self)^.clr := $40000000;
  58664. end;
  58665. procedure TINT_IFS1.setIC2EIF(thebits : TBits_1); inline;
  58666. begin
  58667. if thebits = 0 then
  58668. pTDefRegMap(@Self)^.clr := $40000000
  58669. else
  58670. pTDefRegMap(@Self)^.&set := $40000000;
  58671. end;
  58672. function TINT_IFS1.getIC2EIF : TBits_1; inline;
  58673. begin
  58674. getIC2EIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  58675. end;
  58676. procedure TINT_IFS1.setIC3EIF; inline;
  58677. begin
  58678. pTDefRegMap(@Self)^.&set := $80000000;
  58679. end;
  58680. procedure TINT_IFS1.clearIC3EIF; inline;
  58681. begin
  58682. pTDefRegMap(@Self)^.clr := $80000000;
  58683. end;
  58684. procedure TINT_IFS1.setIC3EIF(thebits : TBits_1); inline;
  58685. begin
  58686. if thebits = 0 then
  58687. pTDefRegMap(@Self)^.clr := $80000000
  58688. else
  58689. pTDefRegMap(@Self)^.&set := $80000000;
  58690. end;
  58691. function TINT_IFS1.getIC3EIF : TBits_1; inline;
  58692. begin
  58693. getIC3EIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  58694. end;
  58695. procedure TINT_IFS1.setU2AEIF; inline;
  58696. begin
  58697. pTDefRegMap(@Self)^.&set := $00000020;
  58698. end;
  58699. procedure TINT_IFS1.clearU2AEIF; inline;
  58700. begin
  58701. pTDefRegMap(@Self)^.clr := $00000020;
  58702. end;
  58703. procedure TINT_IFS1.setU2AEIF(thebits : TBits_1); inline;
  58704. begin
  58705. if thebits = 0 then
  58706. pTDefRegMap(@Self)^.clr := $00000020
  58707. else
  58708. pTDefRegMap(@Self)^.&set := $00000020;
  58709. end;
  58710. function TINT_IFS1.getU2AEIF : TBits_1; inline;
  58711. begin
  58712. getU2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58713. end;
  58714. procedure TINT_IFS1.setU2ARXIF; inline;
  58715. begin
  58716. pTDefRegMap(@Self)^.&set := $00000040;
  58717. end;
  58718. procedure TINT_IFS1.clearU2ARXIF; inline;
  58719. begin
  58720. pTDefRegMap(@Self)^.clr := $00000040;
  58721. end;
  58722. procedure TINT_IFS1.setU2ARXIF(thebits : TBits_1); inline;
  58723. begin
  58724. if thebits = 0 then
  58725. pTDefRegMap(@Self)^.clr := $00000040
  58726. else
  58727. pTDefRegMap(@Self)^.&set := $00000040;
  58728. end;
  58729. function TINT_IFS1.getU2ARXIF : TBits_1; inline;
  58730. begin
  58731. getU2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58732. end;
  58733. procedure TINT_IFS1.setU2ATXIF; inline;
  58734. begin
  58735. pTDefRegMap(@Self)^.&set := $00000080;
  58736. end;
  58737. procedure TINT_IFS1.clearU2ATXIF; inline;
  58738. begin
  58739. pTDefRegMap(@Self)^.clr := $00000080;
  58740. end;
  58741. procedure TINT_IFS1.setU2ATXIF(thebits : TBits_1); inline;
  58742. begin
  58743. if thebits = 0 then
  58744. pTDefRegMap(@Self)^.clr := $00000080
  58745. else
  58746. pTDefRegMap(@Self)^.&set := $00000080;
  58747. end;
  58748. function TINT_IFS1.getU2ATXIF : TBits_1; inline;
  58749. begin
  58750. getU2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58751. end;
  58752. procedure TINT_IFS1.setU3AEIF; inline;
  58753. begin
  58754. pTDefRegMap(@Self)^.&set := $00000100;
  58755. end;
  58756. procedure TINT_IFS1.clearU3AEIF; inline;
  58757. begin
  58758. pTDefRegMap(@Self)^.clr := $00000100;
  58759. end;
  58760. procedure TINT_IFS1.setU3AEIF(thebits : TBits_1); inline;
  58761. begin
  58762. if thebits = 0 then
  58763. pTDefRegMap(@Self)^.clr := $00000100
  58764. else
  58765. pTDefRegMap(@Self)^.&set := $00000100;
  58766. end;
  58767. function TINT_IFS1.getU3AEIF : TBits_1; inline;
  58768. begin
  58769. getU3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58770. end;
  58771. procedure TINT_IFS1.setU3ARXIF; inline;
  58772. begin
  58773. pTDefRegMap(@Self)^.&set := $00000200;
  58774. end;
  58775. procedure TINT_IFS1.clearU3ARXIF; inline;
  58776. begin
  58777. pTDefRegMap(@Self)^.clr := $00000200;
  58778. end;
  58779. procedure TINT_IFS1.setU3ARXIF(thebits : TBits_1); inline;
  58780. begin
  58781. if thebits = 0 then
  58782. pTDefRegMap(@Self)^.clr := $00000200
  58783. else
  58784. pTDefRegMap(@Self)^.&set := $00000200;
  58785. end;
  58786. function TINT_IFS1.getU3ARXIF : TBits_1; inline;
  58787. begin
  58788. getU3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58789. end;
  58790. procedure TINT_IFS1.setU3ATXIF; inline;
  58791. begin
  58792. pTDefRegMap(@Self)^.&set := $00000400;
  58793. end;
  58794. procedure TINT_IFS1.clearU3ATXIF; inline;
  58795. begin
  58796. pTDefRegMap(@Self)^.clr := $00000400;
  58797. end;
  58798. procedure TINT_IFS1.setU3ATXIF(thebits : TBits_1); inline;
  58799. begin
  58800. if thebits = 0 then
  58801. pTDefRegMap(@Self)^.clr := $00000400
  58802. else
  58803. pTDefRegMap(@Self)^.&set := $00000400;
  58804. end;
  58805. function TINT_IFS1.getU3ATXIF : TBits_1; inline;
  58806. begin
  58807. getU3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58808. end;
  58809. procedure TINT_IFS1.setSPI2EIF; inline;
  58810. begin
  58811. pTDefRegMap(@Self)^.&set := $00000020;
  58812. end;
  58813. procedure TINT_IFS1.clearSPI2EIF; inline;
  58814. begin
  58815. pTDefRegMap(@Self)^.clr := $00000020;
  58816. end;
  58817. procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
  58818. begin
  58819. if thebits = 0 then
  58820. pTDefRegMap(@Self)^.clr := $00000020
  58821. else
  58822. pTDefRegMap(@Self)^.&set := $00000020;
  58823. end;
  58824. function TINT_IFS1.getSPI2EIF : TBits_1; inline;
  58825. begin
  58826. getSPI2EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58827. end;
  58828. procedure TINT_IFS1.setSPI2RXIF; inline;
  58829. begin
  58830. pTDefRegMap(@Self)^.&set := $00000040;
  58831. end;
  58832. procedure TINT_IFS1.clearSPI2RXIF; inline;
  58833. begin
  58834. pTDefRegMap(@Self)^.clr := $00000040;
  58835. end;
  58836. procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
  58837. begin
  58838. if thebits = 0 then
  58839. pTDefRegMap(@Self)^.clr := $00000040
  58840. else
  58841. pTDefRegMap(@Self)^.&set := $00000040;
  58842. end;
  58843. function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
  58844. begin
  58845. getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58846. end;
  58847. procedure TINT_IFS1.setSPI2TXIF; inline;
  58848. begin
  58849. pTDefRegMap(@Self)^.&set := $00000080;
  58850. end;
  58851. procedure TINT_IFS1.clearSPI2TXIF; inline;
  58852. begin
  58853. pTDefRegMap(@Self)^.clr := $00000080;
  58854. end;
  58855. procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
  58856. begin
  58857. if thebits = 0 then
  58858. pTDefRegMap(@Self)^.clr := $00000080
  58859. else
  58860. pTDefRegMap(@Self)^.&set := $00000080;
  58861. end;
  58862. function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
  58863. begin
  58864. getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58865. end;
  58866. procedure TINT_IFS1.setSPI4EIF; inline;
  58867. begin
  58868. pTDefRegMap(@Self)^.&set := $00000100;
  58869. end;
  58870. procedure TINT_IFS1.clearSPI4EIF; inline;
  58871. begin
  58872. pTDefRegMap(@Self)^.clr := $00000100;
  58873. end;
  58874. procedure TINT_IFS1.setSPI4EIF(thebits : TBits_1); inline;
  58875. begin
  58876. if thebits = 0 then
  58877. pTDefRegMap(@Self)^.clr := $00000100
  58878. else
  58879. pTDefRegMap(@Self)^.&set := $00000100;
  58880. end;
  58881. function TINT_IFS1.getSPI4EIF : TBits_1; inline;
  58882. begin
  58883. getSPI4EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58884. end;
  58885. procedure TINT_IFS1.setSPI4RXIF; inline;
  58886. begin
  58887. pTDefRegMap(@Self)^.&set := $00000200;
  58888. end;
  58889. procedure TINT_IFS1.clearSPI4RXIF; inline;
  58890. begin
  58891. pTDefRegMap(@Self)^.clr := $00000200;
  58892. end;
  58893. procedure TINT_IFS1.setSPI4RXIF(thebits : TBits_1); inline;
  58894. begin
  58895. if thebits = 0 then
  58896. pTDefRegMap(@Self)^.clr := $00000200
  58897. else
  58898. pTDefRegMap(@Self)^.&set := $00000200;
  58899. end;
  58900. function TINT_IFS1.getSPI4RXIF : TBits_1; inline;
  58901. begin
  58902. getSPI4RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58903. end;
  58904. procedure TINT_IFS1.setSPI4TXIF; inline;
  58905. begin
  58906. pTDefRegMap(@Self)^.&set := $00000400;
  58907. end;
  58908. procedure TINT_IFS1.clearSPI4TXIF; inline;
  58909. begin
  58910. pTDefRegMap(@Self)^.clr := $00000400;
  58911. end;
  58912. procedure TINT_IFS1.setSPI4TXIF(thebits : TBits_1); inline;
  58913. begin
  58914. if thebits = 0 then
  58915. pTDefRegMap(@Self)^.clr := $00000400
  58916. else
  58917. pTDefRegMap(@Self)^.&set := $00000400;
  58918. end;
  58919. function TINT_IFS1.getSPI4TXIF : TBits_1; inline;
  58920. begin
  58921. getSPI4TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58922. end;
  58923. procedure TINT_IFS1.setSPI2AEIF; inline;
  58924. begin
  58925. pTDefRegMap(@Self)^.&set := $00000020;
  58926. end;
  58927. procedure TINT_IFS1.clearSPI2AEIF; inline;
  58928. begin
  58929. pTDefRegMap(@Self)^.clr := $00000020;
  58930. end;
  58931. procedure TINT_IFS1.setSPI2AEIF(thebits : TBits_1); inline;
  58932. begin
  58933. if thebits = 0 then
  58934. pTDefRegMap(@Self)^.clr := $00000020
  58935. else
  58936. pTDefRegMap(@Self)^.&set := $00000020;
  58937. end;
  58938. function TINT_IFS1.getSPI2AEIF : TBits_1; inline;
  58939. begin
  58940. getSPI2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58941. end;
  58942. procedure TINT_IFS1.setSPI2ARXIF; inline;
  58943. begin
  58944. pTDefRegMap(@Self)^.&set := $00000040;
  58945. end;
  58946. procedure TINT_IFS1.clearSPI2ARXIF; inline;
  58947. begin
  58948. pTDefRegMap(@Self)^.clr := $00000040;
  58949. end;
  58950. procedure TINT_IFS1.setSPI2ARXIF(thebits : TBits_1); inline;
  58951. begin
  58952. if thebits = 0 then
  58953. pTDefRegMap(@Self)^.clr := $00000040
  58954. else
  58955. pTDefRegMap(@Self)^.&set := $00000040;
  58956. end;
  58957. function TINT_IFS1.getSPI2ARXIF : TBits_1; inline;
  58958. begin
  58959. getSPI2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58960. end;
  58961. procedure TINT_IFS1.setSPI2ATXIF; inline;
  58962. begin
  58963. pTDefRegMap(@Self)^.&set := $00000080;
  58964. end;
  58965. procedure TINT_IFS1.clearSPI2ATXIF; inline;
  58966. begin
  58967. pTDefRegMap(@Self)^.clr := $00000080;
  58968. end;
  58969. procedure TINT_IFS1.setSPI2ATXIF(thebits : TBits_1); inline;
  58970. begin
  58971. if thebits = 0 then
  58972. pTDefRegMap(@Self)^.clr := $00000080
  58973. else
  58974. pTDefRegMap(@Self)^.&set := $00000080;
  58975. end;
  58976. function TINT_IFS1.getSPI2ATXIF : TBits_1; inline;
  58977. begin
  58978. getSPI2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58979. end;
  58980. procedure TINT_IFS1.setSPI3AEIF; inline;
  58981. begin
  58982. pTDefRegMap(@Self)^.&set := $00000100;
  58983. end;
  58984. procedure TINT_IFS1.clearSPI3AEIF; inline;
  58985. begin
  58986. pTDefRegMap(@Self)^.clr := $00000100;
  58987. end;
  58988. procedure TINT_IFS1.setSPI3AEIF(thebits : TBits_1); inline;
  58989. begin
  58990. if thebits = 0 then
  58991. pTDefRegMap(@Self)^.clr := $00000100
  58992. else
  58993. pTDefRegMap(@Self)^.&set := $00000100;
  58994. end;
  58995. function TINT_IFS1.getSPI3AEIF : TBits_1; inline;
  58996. begin
  58997. getSPI3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58998. end;
  58999. procedure TINT_IFS1.setSPI3ARXIF; inline;
  59000. begin
  59001. pTDefRegMap(@Self)^.&set := $00000200;
  59002. end;
  59003. procedure TINT_IFS1.clearSPI3ARXIF; inline;
  59004. begin
  59005. pTDefRegMap(@Self)^.clr := $00000200;
  59006. end;
  59007. procedure TINT_IFS1.setSPI3ARXIF(thebits : TBits_1); inline;
  59008. begin
  59009. if thebits = 0 then
  59010. pTDefRegMap(@Self)^.clr := $00000200
  59011. else
  59012. pTDefRegMap(@Self)^.&set := $00000200;
  59013. end;
  59014. function TINT_IFS1.getSPI3ARXIF : TBits_1; inline;
  59015. begin
  59016. getSPI3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59017. end;
  59018. procedure TINT_IFS1.setSPI3ATXIF; inline;
  59019. begin
  59020. pTDefRegMap(@Self)^.&set := $00000400;
  59021. end;
  59022. procedure TINT_IFS1.clearSPI3ATXIF; inline;
  59023. begin
  59024. pTDefRegMap(@Self)^.clr := $00000400;
  59025. end;
  59026. procedure TINT_IFS1.setSPI3ATXIF(thebits : TBits_1); inline;
  59027. begin
  59028. if thebits = 0 then
  59029. pTDefRegMap(@Self)^.clr := $00000400
  59030. else
  59031. pTDefRegMap(@Self)^.&set := $00000400;
  59032. end;
  59033. function TINT_IFS1.getSPI3ATXIF : TBits_1; inline;
  59034. begin
  59035. getSPI3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59036. end;
  59037. procedure TINT_IFS1.setI2C4BIF; inline;
  59038. begin
  59039. pTDefRegMap(@Self)^.&set := $00000020;
  59040. end;
  59041. procedure TINT_IFS1.clearI2C4BIF; inline;
  59042. begin
  59043. pTDefRegMap(@Self)^.clr := $00000020;
  59044. end;
  59045. procedure TINT_IFS1.setI2C4BIF(thebits : TBits_1); inline;
  59046. begin
  59047. if thebits = 0 then
  59048. pTDefRegMap(@Self)^.clr := $00000020
  59049. else
  59050. pTDefRegMap(@Self)^.&set := $00000020;
  59051. end;
  59052. function TINT_IFS1.getI2C4BIF : TBits_1; inline;
  59053. begin
  59054. getI2C4BIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59055. end;
  59056. procedure TINT_IFS1.setI2C4SIF; inline;
  59057. begin
  59058. pTDefRegMap(@Self)^.&set := $00000040;
  59059. end;
  59060. procedure TINT_IFS1.clearI2C4SIF; inline;
  59061. begin
  59062. pTDefRegMap(@Self)^.clr := $00000040;
  59063. end;
  59064. procedure TINT_IFS1.setI2C4SIF(thebits : TBits_1); inline;
  59065. begin
  59066. if thebits = 0 then
  59067. pTDefRegMap(@Self)^.clr := $00000040
  59068. else
  59069. pTDefRegMap(@Self)^.&set := $00000040;
  59070. end;
  59071. function TINT_IFS1.getI2C4SIF : TBits_1; inline;
  59072. begin
  59073. getI2C4SIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59074. end;
  59075. procedure TINT_IFS1.setI2C4MIF; inline;
  59076. begin
  59077. pTDefRegMap(@Self)^.&set := $00000080;
  59078. end;
  59079. procedure TINT_IFS1.clearI2C4MIF; inline;
  59080. begin
  59081. pTDefRegMap(@Self)^.clr := $00000080;
  59082. end;
  59083. procedure TINT_IFS1.setI2C4MIF(thebits : TBits_1); inline;
  59084. begin
  59085. if thebits = 0 then
  59086. pTDefRegMap(@Self)^.clr := $00000080
  59087. else
  59088. pTDefRegMap(@Self)^.&set := $00000080;
  59089. end;
  59090. function TINT_IFS1.getI2C4MIF : TBits_1; inline;
  59091. begin
  59092. getI2C4MIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59093. end;
  59094. procedure TINT_IFS1.setI2C5BIF; inline;
  59095. begin
  59096. pTDefRegMap(@Self)^.&set := $00000100;
  59097. end;
  59098. procedure TINT_IFS1.clearI2C5BIF; inline;
  59099. begin
  59100. pTDefRegMap(@Self)^.clr := $00000100;
  59101. end;
  59102. procedure TINT_IFS1.setI2C5BIF(thebits : TBits_1); inline;
  59103. begin
  59104. if thebits = 0 then
  59105. pTDefRegMap(@Self)^.clr := $00000100
  59106. else
  59107. pTDefRegMap(@Self)^.&set := $00000100;
  59108. end;
  59109. function TINT_IFS1.getI2C5BIF : TBits_1; inline;
  59110. begin
  59111. getI2C5BIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59112. end;
  59113. procedure TINT_IFS1.setI2C5SIF; inline;
  59114. begin
  59115. pTDefRegMap(@Self)^.&set := $00000200;
  59116. end;
  59117. procedure TINT_IFS1.clearI2C5SIF; inline;
  59118. begin
  59119. pTDefRegMap(@Self)^.clr := $00000200;
  59120. end;
  59121. procedure TINT_IFS1.setI2C5SIF(thebits : TBits_1); inline;
  59122. begin
  59123. if thebits = 0 then
  59124. pTDefRegMap(@Self)^.clr := $00000200
  59125. else
  59126. pTDefRegMap(@Self)^.&set := $00000200;
  59127. end;
  59128. function TINT_IFS1.getI2C5SIF : TBits_1; inline;
  59129. begin
  59130. getI2C5SIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59131. end;
  59132. procedure TINT_IFS1.setI2C5MIF; inline;
  59133. begin
  59134. pTDefRegMap(@Self)^.&set := $00000400;
  59135. end;
  59136. procedure TINT_IFS1.clearI2C5MIF; inline;
  59137. begin
  59138. pTDefRegMap(@Self)^.clr := $00000400;
  59139. end;
  59140. procedure TINT_IFS1.setI2C5MIF(thebits : TBits_1); inline;
  59141. begin
  59142. if thebits = 0 then
  59143. pTDefRegMap(@Self)^.clr := $00000400
  59144. else
  59145. pTDefRegMap(@Self)^.&set := $00000400;
  59146. end;
  59147. function TINT_IFS1.getI2C5MIF : TBits_1; inline;
  59148. begin
  59149. getI2C5MIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59150. end;
  59151. procedure TINT_IFS1.setI2C2ABIF; inline;
  59152. begin
  59153. pTDefRegMap(@Self)^.&set := $00000020;
  59154. end;
  59155. procedure TINT_IFS1.clearI2C2ABIF; inline;
  59156. begin
  59157. pTDefRegMap(@Self)^.clr := $00000020;
  59158. end;
  59159. procedure TINT_IFS1.setI2C2ABIF(thebits : TBits_1); inline;
  59160. begin
  59161. if thebits = 0 then
  59162. pTDefRegMap(@Self)^.clr := $00000020
  59163. else
  59164. pTDefRegMap(@Self)^.&set := $00000020;
  59165. end;
  59166. function TINT_IFS1.getI2C2ABIF : TBits_1; inline;
  59167. begin
  59168. getI2C2ABIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59169. end;
  59170. procedure TINT_IFS1.setI2C2ASIF; inline;
  59171. begin
  59172. pTDefRegMap(@Self)^.&set := $00000040;
  59173. end;
  59174. procedure TINT_IFS1.clearI2C2ASIF; inline;
  59175. begin
  59176. pTDefRegMap(@Self)^.clr := $00000040;
  59177. end;
  59178. procedure TINT_IFS1.setI2C2ASIF(thebits : TBits_1); inline;
  59179. begin
  59180. if thebits = 0 then
  59181. pTDefRegMap(@Self)^.clr := $00000040
  59182. else
  59183. pTDefRegMap(@Self)^.&set := $00000040;
  59184. end;
  59185. function TINT_IFS1.getI2C2ASIF : TBits_1; inline;
  59186. begin
  59187. getI2C2ASIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59188. end;
  59189. procedure TINT_IFS1.setI2C2AMIF; inline;
  59190. begin
  59191. pTDefRegMap(@Self)^.&set := $00000080;
  59192. end;
  59193. procedure TINT_IFS1.clearI2C2AMIF; inline;
  59194. begin
  59195. pTDefRegMap(@Self)^.clr := $00000080;
  59196. end;
  59197. procedure TINT_IFS1.setI2C2AMIF(thebits : TBits_1); inline;
  59198. begin
  59199. if thebits = 0 then
  59200. pTDefRegMap(@Self)^.clr := $00000080
  59201. else
  59202. pTDefRegMap(@Self)^.&set := $00000080;
  59203. end;
  59204. function TINT_IFS1.getI2C2AMIF : TBits_1; inline;
  59205. begin
  59206. getI2C2AMIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59207. end;
  59208. procedure TINT_IFS1.setI2C3ABIF; inline;
  59209. begin
  59210. pTDefRegMap(@Self)^.&set := $00000100;
  59211. end;
  59212. procedure TINT_IFS1.clearI2C3ABIF; inline;
  59213. begin
  59214. pTDefRegMap(@Self)^.clr := $00000100;
  59215. end;
  59216. procedure TINT_IFS1.setI2C3ABIF(thebits : TBits_1); inline;
  59217. begin
  59218. if thebits = 0 then
  59219. pTDefRegMap(@Self)^.clr := $00000100
  59220. else
  59221. pTDefRegMap(@Self)^.&set := $00000100;
  59222. end;
  59223. function TINT_IFS1.getI2C3ABIF : TBits_1; inline;
  59224. begin
  59225. getI2C3ABIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59226. end;
  59227. procedure TINT_IFS1.setI2C3ASIF; inline;
  59228. begin
  59229. pTDefRegMap(@Self)^.&set := $00000200;
  59230. end;
  59231. procedure TINT_IFS1.clearI2C3ASIF; inline;
  59232. begin
  59233. pTDefRegMap(@Self)^.clr := $00000200;
  59234. end;
  59235. procedure TINT_IFS1.setI2C3ASIF(thebits : TBits_1); inline;
  59236. begin
  59237. if thebits = 0 then
  59238. pTDefRegMap(@Self)^.clr := $00000200
  59239. else
  59240. pTDefRegMap(@Self)^.&set := $00000200;
  59241. end;
  59242. function TINT_IFS1.getI2C3ASIF : TBits_1; inline;
  59243. begin
  59244. getI2C3ASIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59245. end;
  59246. procedure TINT_IFS1.setI2C3AMIF; inline;
  59247. begin
  59248. pTDefRegMap(@Self)^.&set := $00000400;
  59249. end;
  59250. procedure TINT_IFS1.clearI2C3AMIF; inline;
  59251. begin
  59252. pTDefRegMap(@Self)^.clr := $00000400;
  59253. end;
  59254. procedure TINT_IFS1.setI2C3AMIF(thebits : TBits_1); inline;
  59255. begin
  59256. if thebits = 0 then
  59257. pTDefRegMap(@Self)^.clr := $00000400
  59258. else
  59259. pTDefRegMap(@Self)^.&set := $00000400;
  59260. end;
  59261. function TINT_IFS1.getI2C3AMIF : TBits_1; inline;
  59262. begin
  59263. getI2C3AMIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59264. end;
  59265. procedure TINT_IFS1.setw(thebits : TBits_32); inline;
  59266. begin
  59267. pTDefRegMap(@Self)^.val := thebits;
  59268. end;
  59269. function TINT_IFS1.getw : TBits_32; inline;
  59270. begin
  59271. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59272. end;
  59273. procedure TINT_IFS2.setIC4EIF; inline;
  59274. begin
  59275. pTDefRegMap(@Self)^.&set := $00000001;
  59276. end;
  59277. procedure TINT_IFS2.clearIC4EIF; inline;
  59278. begin
  59279. pTDefRegMap(@Self)^.clr := $00000001;
  59280. end;
  59281. procedure TINT_IFS2.setIC4EIF(thebits : TBits_1); inline;
  59282. begin
  59283. if thebits = 0 then
  59284. pTDefRegMap(@Self)^.clr := $00000001
  59285. else
  59286. pTDefRegMap(@Self)^.&set := $00000001;
  59287. end;
  59288. function TINT_IFS2.getIC4EIF : TBits_1; inline;
  59289. begin
  59290. getIC4EIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59291. end;
  59292. procedure TINT_IFS2.setIC5EIF; inline;
  59293. begin
  59294. pTDefRegMap(@Self)^.&set := $00000002;
  59295. end;
  59296. procedure TINT_IFS2.clearIC5EIF; inline;
  59297. begin
  59298. pTDefRegMap(@Self)^.clr := $00000002;
  59299. end;
  59300. procedure TINT_IFS2.setIC5EIF(thebits : TBits_1); inline;
  59301. begin
  59302. if thebits = 0 then
  59303. pTDefRegMap(@Self)^.clr := $00000002
  59304. else
  59305. pTDefRegMap(@Self)^.&set := $00000002;
  59306. end;
  59307. function TINT_IFS2.getIC5EIF : TBits_1; inline;
  59308. begin
  59309. getIC5EIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59310. end;
  59311. procedure TINT_IFS2.setPMPEIF; inline;
  59312. begin
  59313. pTDefRegMap(@Self)^.&set := $00000004;
  59314. end;
  59315. procedure TINT_IFS2.clearPMPEIF; inline;
  59316. begin
  59317. pTDefRegMap(@Self)^.clr := $00000004;
  59318. end;
  59319. procedure TINT_IFS2.setPMPEIF(thebits : TBits_1); inline;
  59320. begin
  59321. if thebits = 0 then
  59322. pTDefRegMap(@Self)^.clr := $00000004
  59323. else
  59324. pTDefRegMap(@Self)^.&set := $00000004;
  59325. end;
  59326. function TINT_IFS2.getPMPEIF : TBits_1; inline;
  59327. begin
  59328. getPMPEIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59329. end;
  59330. procedure TINT_IFS2.setU1BEIF; inline;
  59331. begin
  59332. pTDefRegMap(@Self)^.&set := $00000008;
  59333. end;
  59334. procedure TINT_IFS2.clearU1BEIF; inline;
  59335. begin
  59336. pTDefRegMap(@Self)^.clr := $00000008;
  59337. end;
  59338. procedure TINT_IFS2.setU1BEIF(thebits : TBits_1); inline;
  59339. begin
  59340. if thebits = 0 then
  59341. pTDefRegMap(@Self)^.clr := $00000008
  59342. else
  59343. pTDefRegMap(@Self)^.&set := $00000008;
  59344. end;
  59345. function TINT_IFS2.getU1BEIF : TBits_1; inline;
  59346. begin
  59347. getU1BEIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59348. end;
  59349. procedure TINT_IFS2.setU1BRXIF; inline;
  59350. begin
  59351. pTDefRegMap(@Self)^.&set := $00000010;
  59352. end;
  59353. procedure TINT_IFS2.clearU1BRXIF; inline;
  59354. begin
  59355. pTDefRegMap(@Self)^.clr := $00000010;
  59356. end;
  59357. procedure TINT_IFS2.setU1BRXIF(thebits : TBits_1); inline;
  59358. begin
  59359. if thebits = 0 then
  59360. pTDefRegMap(@Self)^.clr := $00000010
  59361. else
  59362. pTDefRegMap(@Self)^.&set := $00000010;
  59363. end;
  59364. function TINT_IFS2.getU1BRXIF : TBits_1; inline;
  59365. begin
  59366. getU1BRXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59367. end;
  59368. procedure TINT_IFS2.setU1BTXIF; inline;
  59369. begin
  59370. pTDefRegMap(@Self)^.&set := $00000020;
  59371. end;
  59372. procedure TINT_IFS2.clearU1BTXIF; inline;
  59373. begin
  59374. pTDefRegMap(@Self)^.clr := $00000020;
  59375. end;
  59376. procedure TINT_IFS2.setU1BTXIF(thebits : TBits_1); inline;
  59377. begin
  59378. if thebits = 0 then
  59379. pTDefRegMap(@Self)^.clr := $00000020
  59380. else
  59381. pTDefRegMap(@Self)^.&set := $00000020;
  59382. end;
  59383. function TINT_IFS2.getU1BTXIF : TBits_1; inline;
  59384. begin
  59385. getU1BTXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59386. end;
  59387. procedure TINT_IFS2.setU2BEIF; inline;
  59388. begin
  59389. pTDefRegMap(@Self)^.&set := $00000040;
  59390. end;
  59391. procedure TINT_IFS2.clearU2BEIF; inline;
  59392. begin
  59393. pTDefRegMap(@Self)^.clr := $00000040;
  59394. end;
  59395. procedure TINT_IFS2.setU2BEIF(thebits : TBits_1); inline;
  59396. begin
  59397. if thebits = 0 then
  59398. pTDefRegMap(@Self)^.clr := $00000040
  59399. else
  59400. pTDefRegMap(@Self)^.&set := $00000040;
  59401. end;
  59402. function TINT_IFS2.getU2BEIF : TBits_1; inline;
  59403. begin
  59404. getU2BEIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59405. end;
  59406. procedure TINT_IFS2.setU2BRXIF; inline;
  59407. begin
  59408. pTDefRegMap(@Self)^.&set := $00000080;
  59409. end;
  59410. procedure TINT_IFS2.clearU2BRXIF; inline;
  59411. begin
  59412. pTDefRegMap(@Self)^.clr := $00000080;
  59413. end;
  59414. procedure TINT_IFS2.setU2BRXIF(thebits : TBits_1); inline;
  59415. begin
  59416. if thebits = 0 then
  59417. pTDefRegMap(@Self)^.clr := $00000080
  59418. else
  59419. pTDefRegMap(@Self)^.&set := $00000080;
  59420. end;
  59421. function TINT_IFS2.getU2BRXIF : TBits_1; inline;
  59422. begin
  59423. getU2BRXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59424. end;
  59425. procedure TINT_IFS2.setU2BTXIF; inline;
  59426. begin
  59427. pTDefRegMap(@Self)^.&set := $00000100;
  59428. end;
  59429. procedure TINT_IFS2.clearU2BTXIF; inline;
  59430. begin
  59431. pTDefRegMap(@Self)^.clr := $00000100;
  59432. end;
  59433. procedure TINT_IFS2.setU2BTXIF(thebits : TBits_1); inline;
  59434. begin
  59435. if thebits = 0 then
  59436. pTDefRegMap(@Self)^.clr := $00000100
  59437. else
  59438. pTDefRegMap(@Self)^.&set := $00000100;
  59439. end;
  59440. function TINT_IFS2.getU2BTXIF : TBits_1; inline;
  59441. begin
  59442. getU2BTXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59443. end;
  59444. procedure TINT_IFS2.setU3BEIF; inline;
  59445. begin
  59446. pTDefRegMap(@Self)^.&set := $00000200;
  59447. end;
  59448. procedure TINT_IFS2.clearU3BEIF; inline;
  59449. begin
  59450. pTDefRegMap(@Self)^.clr := $00000200;
  59451. end;
  59452. procedure TINT_IFS2.setU3BEIF(thebits : TBits_1); inline;
  59453. begin
  59454. if thebits = 0 then
  59455. pTDefRegMap(@Self)^.clr := $00000200
  59456. else
  59457. pTDefRegMap(@Self)^.&set := $00000200;
  59458. end;
  59459. function TINT_IFS2.getU3BEIF : TBits_1; inline;
  59460. begin
  59461. getU3BEIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59462. end;
  59463. procedure TINT_IFS2.setU3BRXIF; inline;
  59464. begin
  59465. pTDefRegMap(@Self)^.&set := $00000400;
  59466. end;
  59467. procedure TINT_IFS2.clearU3BRXIF; inline;
  59468. begin
  59469. pTDefRegMap(@Self)^.clr := $00000400;
  59470. end;
  59471. procedure TINT_IFS2.setU3BRXIF(thebits : TBits_1); inline;
  59472. begin
  59473. if thebits = 0 then
  59474. pTDefRegMap(@Self)^.clr := $00000400
  59475. else
  59476. pTDefRegMap(@Self)^.&set := $00000400;
  59477. end;
  59478. function TINT_IFS2.getU3BRXIF : TBits_1; inline;
  59479. begin
  59480. getU3BRXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59481. end;
  59482. procedure TINT_IFS2.setU3BTXIF; inline;
  59483. begin
  59484. pTDefRegMap(@Self)^.&set := $00000800;
  59485. end;
  59486. procedure TINT_IFS2.clearU3BTXIF; inline;
  59487. begin
  59488. pTDefRegMap(@Self)^.clr := $00000800;
  59489. end;
  59490. procedure TINT_IFS2.setU3BTXIF(thebits : TBits_1); inline;
  59491. begin
  59492. if thebits = 0 then
  59493. pTDefRegMap(@Self)^.clr := $00000800
  59494. else
  59495. pTDefRegMap(@Self)^.&set := $00000800;
  59496. end;
  59497. function TINT_IFS2.getU3BTXIF : TBits_1; inline;
  59498. begin
  59499. getU3BTXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59500. end;
  59501. procedure TINT_IFS2.setU4EIF; inline;
  59502. begin
  59503. pTDefRegMap(@Self)^.&set := $00000008;
  59504. end;
  59505. procedure TINT_IFS2.clearU4EIF; inline;
  59506. begin
  59507. pTDefRegMap(@Self)^.clr := $00000008;
  59508. end;
  59509. procedure TINT_IFS2.setU4EIF(thebits : TBits_1); inline;
  59510. begin
  59511. if thebits = 0 then
  59512. pTDefRegMap(@Self)^.clr := $00000008
  59513. else
  59514. pTDefRegMap(@Self)^.&set := $00000008;
  59515. end;
  59516. function TINT_IFS2.getU4EIF : TBits_1; inline;
  59517. begin
  59518. getU4EIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59519. end;
  59520. procedure TINT_IFS2.setU4RXIF; inline;
  59521. begin
  59522. pTDefRegMap(@Self)^.&set := $00000010;
  59523. end;
  59524. procedure TINT_IFS2.clearU4RXIF; inline;
  59525. begin
  59526. pTDefRegMap(@Self)^.clr := $00000010;
  59527. end;
  59528. procedure TINT_IFS2.setU4RXIF(thebits : TBits_1); inline;
  59529. begin
  59530. if thebits = 0 then
  59531. pTDefRegMap(@Self)^.clr := $00000010
  59532. else
  59533. pTDefRegMap(@Self)^.&set := $00000010;
  59534. end;
  59535. function TINT_IFS2.getU4RXIF : TBits_1; inline;
  59536. begin
  59537. getU4RXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59538. end;
  59539. procedure TINT_IFS2.setU4TXIF; inline;
  59540. begin
  59541. pTDefRegMap(@Self)^.&set := $00000020;
  59542. end;
  59543. procedure TINT_IFS2.clearU4TXIF; inline;
  59544. begin
  59545. pTDefRegMap(@Self)^.clr := $00000020;
  59546. end;
  59547. procedure TINT_IFS2.setU4TXIF(thebits : TBits_1); inline;
  59548. begin
  59549. if thebits = 0 then
  59550. pTDefRegMap(@Self)^.clr := $00000020
  59551. else
  59552. pTDefRegMap(@Self)^.&set := $00000020;
  59553. end;
  59554. function TINT_IFS2.getU4TXIF : TBits_1; inline;
  59555. begin
  59556. getU4TXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59557. end;
  59558. procedure TINT_IFS2.setU6EIF; inline;
  59559. begin
  59560. pTDefRegMap(@Self)^.&set := $00000040;
  59561. end;
  59562. procedure TINT_IFS2.clearU6EIF; inline;
  59563. begin
  59564. pTDefRegMap(@Self)^.clr := $00000040;
  59565. end;
  59566. procedure TINT_IFS2.setU6EIF(thebits : TBits_1); inline;
  59567. begin
  59568. if thebits = 0 then
  59569. pTDefRegMap(@Self)^.clr := $00000040
  59570. else
  59571. pTDefRegMap(@Self)^.&set := $00000040;
  59572. end;
  59573. function TINT_IFS2.getU6EIF : TBits_1; inline;
  59574. begin
  59575. getU6EIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59576. end;
  59577. procedure TINT_IFS2.setU6RXIF; inline;
  59578. begin
  59579. pTDefRegMap(@Self)^.&set := $00000080;
  59580. end;
  59581. procedure TINT_IFS2.clearU6RXIF; inline;
  59582. begin
  59583. pTDefRegMap(@Self)^.clr := $00000080;
  59584. end;
  59585. procedure TINT_IFS2.setU6RXIF(thebits : TBits_1); inline;
  59586. begin
  59587. if thebits = 0 then
  59588. pTDefRegMap(@Self)^.clr := $00000080
  59589. else
  59590. pTDefRegMap(@Self)^.&set := $00000080;
  59591. end;
  59592. function TINT_IFS2.getU6RXIF : TBits_1; inline;
  59593. begin
  59594. getU6RXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59595. end;
  59596. procedure TINT_IFS2.setU6TXIF; inline;
  59597. begin
  59598. pTDefRegMap(@Self)^.&set := $00000100;
  59599. end;
  59600. procedure TINT_IFS2.clearU6TXIF; inline;
  59601. begin
  59602. pTDefRegMap(@Self)^.clr := $00000100;
  59603. end;
  59604. procedure TINT_IFS2.setU6TXIF(thebits : TBits_1); inline;
  59605. begin
  59606. if thebits = 0 then
  59607. pTDefRegMap(@Self)^.clr := $00000100
  59608. else
  59609. pTDefRegMap(@Self)^.&set := $00000100;
  59610. end;
  59611. function TINT_IFS2.getU6TXIF : TBits_1; inline;
  59612. begin
  59613. getU6TXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59614. end;
  59615. procedure TINT_IFS2.setU5EIF; inline;
  59616. begin
  59617. pTDefRegMap(@Self)^.&set := $00000200;
  59618. end;
  59619. procedure TINT_IFS2.clearU5EIF; inline;
  59620. begin
  59621. pTDefRegMap(@Self)^.clr := $00000200;
  59622. end;
  59623. procedure TINT_IFS2.setU5EIF(thebits : TBits_1); inline;
  59624. begin
  59625. if thebits = 0 then
  59626. pTDefRegMap(@Self)^.clr := $00000200
  59627. else
  59628. pTDefRegMap(@Self)^.&set := $00000200;
  59629. end;
  59630. function TINT_IFS2.getU5EIF : TBits_1; inline;
  59631. begin
  59632. getU5EIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59633. end;
  59634. procedure TINT_IFS2.setU5RXIF; inline;
  59635. begin
  59636. pTDefRegMap(@Self)^.&set := $00000400;
  59637. end;
  59638. procedure TINT_IFS2.clearU5RXIF; inline;
  59639. begin
  59640. pTDefRegMap(@Self)^.clr := $00000400;
  59641. end;
  59642. procedure TINT_IFS2.setU5RXIF(thebits : TBits_1); inline;
  59643. begin
  59644. if thebits = 0 then
  59645. pTDefRegMap(@Self)^.clr := $00000400
  59646. else
  59647. pTDefRegMap(@Self)^.&set := $00000400;
  59648. end;
  59649. function TINT_IFS2.getU5RXIF : TBits_1; inline;
  59650. begin
  59651. getU5RXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59652. end;
  59653. procedure TINT_IFS2.setU5TXIF; inline;
  59654. begin
  59655. pTDefRegMap(@Self)^.&set := $00000800;
  59656. end;
  59657. procedure TINT_IFS2.clearU5TXIF; inline;
  59658. begin
  59659. pTDefRegMap(@Self)^.clr := $00000800;
  59660. end;
  59661. procedure TINT_IFS2.setU5TXIF(thebits : TBits_1); inline;
  59662. begin
  59663. if thebits = 0 then
  59664. pTDefRegMap(@Self)^.clr := $00000800
  59665. else
  59666. pTDefRegMap(@Self)^.&set := $00000800;
  59667. end;
  59668. function TINT_IFS2.getU5TXIF : TBits_1; inline;
  59669. begin
  59670. getU5TXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59671. end;
  59672. procedure TINT_IFS2.setw(thebits : TBits_32); inline;
  59673. begin
  59674. pTDefRegMap(@Self)^.val := thebits;
  59675. end;
  59676. function TINT_IFS2.getw : TBits_32; inline;
  59677. begin
  59678. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59679. end;
  59680. procedure TINT_IEC0.setCTIE; inline;
  59681. begin
  59682. pTDefRegMap(@Self)^.&set := $00000001;
  59683. end;
  59684. procedure TINT_IEC0.clearCTIE; inline;
  59685. begin
  59686. pTDefRegMap(@Self)^.clr := $00000001;
  59687. end;
  59688. procedure TINT_IEC0.setCTIE(thebits : TBits_1); inline;
  59689. begin
  59690. if thebits = 0 then
  59691. pTDefRegMap(@Self)^.clr := $00000001
  59692. else
  59693. pTDefRegMap(@Self)^.&set := $00000001;
  59694. end;
  59695. function TINT_IEC0.getCTIE : TBits_1; inline;
  59696. begin
  59697. getCTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59698. end;
  59699. procedure TINT_IEC0.setCS0IE; inline;
  59700. begin
  59701. pTDefRegMap(@Self)^.&set := $00000002;
  59702. end;
  59703. procedure TINT_IEC0.clearCS0IE; inline;
  59704. begin
  59705. pTDefRegMap(@Self)^.clr := $00000002;
  59706. end;
  59707. procedure TINT_IEC0.setCS0IE(thebits : TBits_1); inline;
  59708. begin
  59709. if thebits = 0 then
  59710. pTDefRegMap(@Self)^.clr := $00000002
  59711. else
  59712. pTDefRegMap(@Self)^.&set := $00000002;
  59713. end;
  59714. function TINT_IEC0.getCS0IE : TBits_1; inline;
  59715. begin
  59716. getCS0IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59717. end;
  59718. procedure TINT_IEC0.setCS1IE; inline;
  59719. begin
  59720. pTDefRegMap(@Self)^.&set := $00000004;
  59721. end;
  59722. procedure TINT_IEC0.clearCS1IE; inline;
  59723. begin
  59724. pTDefRegMap(@Self)^.clr := $00000004;
  59725. end;
  59726. procedure TINT_IEC0.setCS1IE(thebits : TBits_1); inline;
  59727. begin
  59728. if thebits = 0 then
  59729. pTDefRegMap(@Self)^.clr := $00000004
  59730. else
  59731. pTDefRegMap(@Self)^.&set := $00000004;
  59732. end;
  59733. function TINT_IEC0.getCS1IE : TBits_1; inline;
  59734. begin
  59735. getCS1IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59736. end;
  59737. procedure TINT_IEC0.setINT0IE; inline;
  59738. begin
  59739. pTDefRegMap(@Self)^.&set := $00000008;
  59740. end;
  59741. procedure TINT_IEC0.clearINT0IE; inline;
  59742. begin
  59743. pTDefRegMap(@Self)^.clr := $00000008;
  59744. end;
  59745. procedure TINT_IEC0.setINT0IE(thebits : TBits_1); inline;
  59746. begin
  59747. if thebits = 0 then
  59748. pTDefRegMap(@Self)^.clr := $00000008
  59749. else
  59750. pTDefRegMap(@Self)^.&set := $00000008;
  59751. end;
  59752. function TINT_IEC0.getINT0IE : TBits_1; inline;
  59753. begin
  59754. getINT0IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59755. end;
  59756. procedure TINT_IEC0.setT1IE; inline;
  59757. begin
  59758. pTDefRegMap(@Self)^.&set := $00000010;
  59759. end;
  59760. procedure TINT_IEC0.clearT1IE; inline;
  59761. begin
  59762. pTDefRegMap(@Self)^.clr := $00000010;
  59763. end;
  59764. procedure TINT_IEC0.setT1IE(thebits : TBits_1); inline;
  59765. begin
  59766. if thebits = 0 then
  59767. pTDefRegMap(@Self)^.clr := $00000010
  59768. else
  59769. pTDefRegMap(@Self)^.&set := $00000010;
  59770. end;
  59771. function TINT_IEC0.getT1IE : TBits_1; inline;
  59772. begin
  59773. getT1IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59774. end;
  59775. procedure TINT_IEC0.setIC1IE; inline;
  59776. begin
  59777. pTDefRegMap(@Self)^.&set := $00000020;
  59778. end;
  59779. procedure TINT_IEC0.clearIC1IE; inline;
  59780. begin
  59781. pTDefRegMap(@Self)^.clr := $00000020;
  59782. end;
  59783. procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
  59784. begin
  59785. if thebits = 0 then
  59786. pTDefRegMap(@Self)^.clr := $00000020
  59787. else
  59788. pTDefRegMap(@Self)^.&set := $00000020;
  59789. end;
  59790. function TINT_IEC0.getIC1IE : TBits_1; inline;
  59791. begin
  59792. getIC1IE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59793. end;
  59794. procedure TINT_IEC0.setOC1IE; inline;
  59795. begin
  59796. pTDefRegMap(@Self)^.&set := $00000040;
  59797. end;
  59798. procedure TINT_IEC0.clearOC1IE; inline;
  59799. begin
  59800. pTDefRegMap(@Self)^.clr := $00000040;
  59801. end;
  59802. procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
  59803. begin
  59804. if thebits = 0 then
  59805. pTDefRegMap(@Self)^.clr := $00000040
  59806. else
  59807. pTDefRegMap(@Self)^.&set := $00000040;
  59808. end;
  59809. function TINT_IEC0.getOC1IE : TBits_1; inline;
  59810. begin
  59811. getOC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59812. end;
  59813. procedure TINT_IEC0.setINT1IE; inline;
  59814. begin
  59815. pTDefRegMap(@Self)^.&set := $00000080;
  59816. end;
  59817. procedure TINT_IEC0.clearINT1IE; inline;
  59818. begin
  59819. pTDefRegMap(@Self)^.clr := $00000080;
  59820. end;
  59821. procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
  59822. begin
  59823. if thebits = 0 then
  59824. pTDefRegMap(@Self)^.clr := $00000080
  59825. else
  59826. pTDefRegMap(@Self)^.&set := $00000080;
  59827. end;
  59828. function TINT_IEC0.getINT1IE : TBits_1; inline;
  59829. begin
  59830. getINT1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59831. end;
  59832. procedure TINT_IEC0.setT2IE; inline;
  59833. begin
  59834. pTDefRegMap(@Self)^.&set := $00000100;
  59835. end;
  59836. procedure TINT_IEC0.clearT2IE; inline;
  59837. begin
  59838. pTDefRegMap(@Self)^.clr := $00000100;
  59839. end;
  59840. procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
  59841. begin
  59842. if thebits = 0 then
  59843. pTDefRegMap(@Self)^.clr := $00000100
  59844. else
  59845. pTDefRegMap(@Self)^.&set := $00000100;
  59846. end;
  59847. function TINT_IEC0.getT2IE : TBits_1; inline;
  59848. begin
  59849. getT2IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59850. end;
  59851. procedure TINT_IEC0.setIC2IE; inline;
  59852. begin
  59853. pTDefRegMap(@Self)^.&set := $00000200;
  59854. end;
  59855. procedure TINT_IEC0.clearIC2IE; inline;
  59856. begin
  59857. pTDefRegMap(@Self)^.clr := $00000200;
  59858. end;
  59859. procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
  59860. begin
  59861. if thebits = 0 then
  59862. pTDefRegMap(@Self)^.clr := $00000200
  59863. else
  59864. pTDefRegMap(@Self)^.&set := $00000200;
  59865. end;
  59866. function TINT_IEC0.getIC2IE : TBits_1; inline;
  59867. begin
  59868. getIC2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59869. end;
  59870. procedure TINT_IEC0.setOC2IE; inline;
  59871. begin
  59872. pTDefRegMap(@Self)^.&set := $00000400;
  59873. end;
  59874. procedure TINT_IEC0.clearOC2IE; inline;
  59875. begin
  59876. pTDefRegMap(@Self)^.clr := $00000400;
  59877. end;
  59878. procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
  59879. begin
  59880. if thebits = 0 then
  59881. pTDefRegMap(@Self)^.clr := $00000400
  59882. else
  59883. pTDefRegMap(@Self)^.&set := $00000400;
  59884. end;
  59885. function TINT_IEC0.getOC2IE : TBits_1; inline;
  59886. begin
  59887. getOC2IE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59888. end;
  59889. procedure TINT_IEC0.setINT2IE; inline;
  59890. begin
  59891. pTDefRegMap(@Self)^.&set := $00000800;
  59892. end;
  59893. procedure TINT_IEC0.clearINT2IE; inline;
  59894. begin
  59895. pTDefRegMap(@Self)^.clr := $00000800;
  59896. end;
  59897. procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
  59898. begin
  59899. if thebits = 0 then
  59900. pTDefRegMap(@Self)^.clr := $00000800
  59901. else
  59902. pTDefRegMap(@Self)^.&set := $00000800;
  59903. end;
  59904. function TINT_IEC0.getINT2IE : TBits_1; inline;
  59905. begin
  59906. getINT2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59907. end;
  59908. procedure TINT_IEC0.setT3IE; inline;
  59909. begin
  59910. pTDefRegMap(@Self)^.&set := $00001000;
  59911. end;
  59912. procedure TINT_IEC0.clearT3IE; inline;
  59913. begin
  59914. pTDefRegMap(@Self)^.clr := $00001000;
  59915. end;
  59916. procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
  59917. begin
  59918. if thebits = 0 then
  59919. pTDefRegMap(@Self)^.clr := $00001000
  59920. else
  59921. pTDefRegMap(@Self)^.&set := $00001000;
  59922. end;
  59923. function TINT_IEC0.getT3IE : TBits_1; inline;
  59924. begin
  59925. getT3IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  59926. end;
  59927. procedure TINT_IEC0.setIC3IE; inline;
  59928. begin
  59929. pTDefRegMap(@Self)^.&set := $00002000;
  59930. end;
  59931. procedure TINT_IEC0.clearIC3IE; inline;
  59932. begin
  59933. pTDefRegMap(@Self)^.clr := $00002000;
  59934. end;
  59935. procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
  59936. begin
  59937. if thebits = 0 then
  59938. pTDefRegMap(@Self)^.clr := $00002000
  59939. else
  59940. pTDefRegMap(@Self)^.&set := $00002000;
  59941. end;
  59942. function TINT_IEC0.getIC3IE : TBits_1; inline;
  59943. begin
  59944. getIC3IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  59945. end;
  59946. procedure TINT_IEC0.setOC3IE; inline;
  59947. begin
  59948. pTDefRegMap(@Self)^.&set := $00004000;
  59949. end;
  59950. procedure TINT_IEC0.clearOC3IE; inline;
  59951. begin
  59952. pTDefRegMap(@Self)^.clr := $00004000;
  59953. end;
  59954. procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
  59955. begin
  59956. if thebits = 0 then
  59957. pTDefRegMap(@Self)^.clr := $00004000
  59958. else
  59959. pTDefRegMap(@Self)^.&set := $00004000;
  59960. end;
  59961. function TINT_IEC0.getOC3IE : TBits_1; inline;
  59962. begin
  59963. getOC3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  59964. end;
  59965. procedure TINT_IEC0.setINT3IE; inline;
  59966. begin
  59967. pTDefRegMap(@Self)^.&set := $00008000;
  59968. end;
  59969. procedure TINT_IEC0.clearINT3IE; inline;
  59970. begin
  59971. pTDefRegMap(@Self)^.clr := $00008000;
  59972. end;
  59973. procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
  59974. begin
  59975. if thebits = 0 then
  59976. pTDefRegMap(@Self)^.clr := $00008000
  59977. else
  59978. pTDefRegMap(@Self)^.&set := $00008000;
  59979. end;
  59980. function TINT_IEC0.getINT3IE : TBits_1; inline;
  59981. begin
  59982. getINT3IE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  59983. end;
  59984. procedure TINT_IEC0.setT4IE; inline;
  59985. begin
  59986. pTDefRegMap(@Self)^.&set := $00010000;
  59987. end;
  59988. procedure TINT_IEC0.clearT4IE; inline;
  59989. begin
  59990. pTDefRegMap(@Self)^.clr := $00010000;
  59991. end;
  59992. procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
  59993. begin
  59994. if thebits = 0 then
  59995. pTDefRegMap(@Self)^.clr := $00010000
  59996. else
  59997. pTDefRegMap(@Self)^.&set := $00010000;
  59998. end;
  59999. function TINT_IEC0.getT4IE : TBits_1; inline;
  60000. begin
  60001. getT4IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  60002. end;
  60003. procedure TINT_IEC0.setIC4IE; inline;
  60004. begin
  60005. pTDefRegMap(@Self)^.&set := $00020000;
  60006. end;
  60007. procedure TINT_IEC0.clearIC4IE; inline;
  60008. begin
  60009. pTDefRegMap(@Self)^.clr := $00020000;
  60010. end;
  60011. procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
  60012. begin
  60013. if thebits = 0 then
  60014. pTDefRegMap(@Self)^.clr := $00020000
  60015. else
  60016. pTDefRegMap(@Self)^.&set := $00020000;
  60017. end;
  60018. function TINT_IEC0.getIC4IE : TBits_1; inline;
  60019. begin
  60020. getIC4IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  60021. end;
  60022. procedure TINT_IEC0.setOC4IE; inline;
  60023. begin
  60024. pTDefRegMap(@Self)^.&set := $00040000;
  60025. end;
  60026. procedure TINT_IEC0.clearOC4IE; inline;
  60027. begin
  60028. pTDefRegMap(@Self)^.clr := $00040000;
  60029. end;
  60030. procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
  60031. begin
  60032. if thebits = 0 then
  60033. pTDefRegMap(@Self)^.clr := $00040000
  60034. else
  60035. pTDefRegMap(@Self)^.&set := $00040000;
  60036. end;
  60037. function TINT_IEC0.getOC4IE : TBits_1; inline;
  60038. begin
  60039. getOC4IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  60040. end;
  60041. procedure TINT_IEC0.setINT4IE; inline;
  60042. begin
  60043. pTDefRegMap(@Self)^.&set := $00080000;
  60044. end;
  60045. procedure TINT_IEC0.clearINT4IE; inline;
  60046. begin
  60047. pTDefRegMap(@Self)^.clr := $00080000;
  60048. end;
  60049. procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
  60050. begin
  60051. if thebits = 0 then
  60052. pTDefRegMap(@Self)^.clr := $00080000
  60053. else
  60054. pTDefRegMap(@Self)^.&set := $00080000;
  60055. end;
  60056. function TINT_IEC0.getINT4IE : TBits_1; inline;
  60057. begin
  60058. getINT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  60059. end;
  60060. procedure TINT_IEC0.setT5IE; inline;
  60061. begin
  60062. pTDefRegMap(@Self)^.&set := $00100000;
  60063. end;
  60064. procedure TINT_IEC0.clearT5IE; inline;
  60065. begin
  60066. pTDefRegMap(@Self)^.clr := $00100000;
  60067. end;
  60068. procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
  60069. begin
  60070. if thebits = 0 then
  60071. pTDefRegMap(@Self)^.clr := $00100000
  60072. else
  60073. pTDefRegMap(@Self)^.&set := $00100000;
  60074. end;
  60075. function TINT_IEC0.getT5IE : TBits_1; inline;
  60076. begin
  60077. getT5IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  60078. end;
  60079. procedure TINT_IEC0.setIC5IE; inline;
  60080. begin
  60081. pTDefRegMap(@Self)^.&set := $00200000;
  60082. end;
  60083. procedure TINT_IEC0.clearIC5IE; inline;
  60084. begin
  60085. pTDefRegMap(@Self)^.clr := $00200000;
  60086. end;
  60087. procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
  60088. begin
  60089. if thebits = 0 then
  60090. pTDefRegMap(@Self)^.clr := $00200000
  60091. else
  60092. pTDefRegMap(@Self)^.&set := $00200000;
  60093. end;
  60094. function TINT_IEC0.getIC5IE : TBits_1; inline;
  60095. begin
  60096. getIC5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  60097. end;
  60098. procedure TINT_IEC0.setOC5IE; inline;
  60099. begin
  60100. pTDefRegMap(@Self)^.&set := $00400000;
  60101. end;
  60102. procedure TINT_IEC0.clearOC5IE; inline;
  60103. begin
  60104. pTDefRegMap(@Self)^.clr := $00400000;
  60105. end;
  60106. procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
  60107. begin
  60108. if thebits = 0 then
  60109. pTDefRegMap(@Self)^.clr := $00400000
  60110. else
  60111. pTDefRegMap(@Self)^.&set := $00400000;
  60112. end;
  60113. function TINT_IEC0.getOC5IE : TBits_1; inline;
  60114. begin
  60115. getOC5IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  60116. end;
  60117. procedure TINT_IEC0.setSPI1EIE; inline;
  60118. begin
  60119. pTDefRegMap(@Self)^.&set := $00800000;
  60120. end;
  60121. procedure TINT_IEC0.clearSPI1EIE; inline;
  60122. begin
  60123. pTDefRegMap(@Self)^.clr := $00800000;
  60124. end;
  60125. procedure TINT_IEC0.setSPI1EIE(thebits : TBits_1); inline;
  60126. begin
  60127. if thebits = 0 then
  60128. pTDefRegMap(@Self)^.clr := $00800000
  60129. else
  60130. pTDefRegMap(@Self)^.&set := $00800000;
  60131. end;
  60132. function TINT_IEC0.getSPI1EIE : TBits_1; inline;
  60133. begin
  60134. getSPI1EIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  60135. end;
  60136. procedure TINT_IEC0.setSPI1RXIE; inline;
  60137. begin
  60138. pTDefRegMap(@Self)^.&set := $01000000;
  60139. end;
  60140. procedure TINT_IEC0.clearSPI1RXIE; inline;
  60141. begin
  60142. pTDefRegMap(@Self)^.clr := $01000000;
  60143. end;
  60144. procedure TINT_IEC0.setSPI1RXIE(thebits : TBits_1); inline;
  60145. begin
  60146. if thebits = 0 then
  60147. pTDefRegMap(@Self)^.clr := $01000000
  60148. else
  60149. pTDefRegMap(@Self)^.&set := $01000000;
  60150. end;
  60151. function TINT_IEC0.getSPI1RXIE : TBits_1; inline;
  60152. begin
  60153. getSPI1RXIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  60154. end;
  60155. procedure TINT_IEC0.setSPI1TXIE; inline;
  60156. begin
  60157. pTDefRegMap(@Self)^.&set := $02000000;
  60158. end;
  60159. procedure TINT_IEC0.clearSPI1TXIE; inline;
  60160. begin
  60161. pTDefRegMap(@Self)^.clr := $02000000;
  60162. end;
  60163. procedure TINT_IEC0.setSPI1TXIE(thebits : TBits_1); inline;
  60164. begin
  60165. if thebits = 0 then
  60166. pTDefRegMap(@Self)^.clr := $02000000
  60167. else
  60168. pTDefRegMap(@Self)^.&set := $02000000;
  60169. end;
  60170. function TINT_IEC0.getSPI1TXIE : TBits_1; inline;
  60171. begin
  60172. getSPI1TXIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  60173. end;
  60174. procedure TINT_IEC0.setU1EIE; inline;
  60175. begin
  60176. pTDefRegMap(@Self)^.&set := $04000000;
  60177. end;
  60178. procedure TINT_IEC0.clearU1EIE; inline;
  60179. begin
  60180. pTDefRegMap(@Self)^.clr := $04000000;
  60181. end;
  60182. procedure TINT_IEC0.setU1EIE(thebits : TBits_1); inline;
  60183. begin
  60184. if thebits = 0 then
  60185. pTDefRegMap(@Self)^.clr := $04000000
  60186. else
  60187. pTDefRegMap(@Self)^.&set := $04000000;
  60188. end;
  60189. function TINT_IEC0.getU1EIE : TBits_1; inline;
  60190. begin
  60191. getU1EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60192. end;
  60193. procedure TINT_IEC0.setU1RXIE; inline;
  60194. begin
  60195. pTDefRegMap(@Self)^.&set := $08000000;
  60196. end;
  60197. procedure TINT_IEC0.clearU1RXIE; inline;
  60198. begin
  60199. pTDefRegMap(@Self)^.clr := $08000000;
  60200. end;
  60201. procedure TINT_IEC0.setU1RXIE(thebits : TBits_1); inline;
  60202. begin
  60203. if thebits = 0 then
  60204. pTDefRegMap(@Self)^.clr := $08000000
  60205. else
  60206. pTDefRegMap(@Self)^.&set := $08000000;
  60207. end;
  60208. function TINT_IEC0.getU1RXIE : TBits_1; inline;
  60209. begin
  60210. getU1RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60211. end;
  60212. procedure TINT_IEC0.setU1TXIE; inline;
  60213. begin
  60214. pTDefRegMap(@Self)^.&set := $10000000;
  60215. end;
  60216. procedure TINT_IEC0.clearU1TXIE; inline;
  60217. begin
  60218. pTDefRegMap(@Self)^.clr := $10000000;
  60219. end;
  60220. procedure TINT_IEC0.setU1TXIE(thebits : TBits_1); inline;
  60221. begin
  60222. if thebits = 0 then
  60223. pTDefRegMap(@Self)^.clr := $10000000
  60224. else
  60225. pTDefRegMap(@Self)^.&set := $10000000;
  60226. end;
  60227. function TINT_IEC0.getU1TXIE : TBits_1; inline;
  60228. begin
  60229. getU1TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60230. end;
  60231. procedure TINT_IEC0.setI2C1BIE; inline;
  60232. begin
  60233. pTDefRegMap(@Self)^.&set := $20000000;
  60234. end;
  60235. procedure TINT_IEC0.clearI2C1BIE; inline;
  60236. begin
  60237. pTDefRegMap(@Self)^.clr := $20000000;
  60238. end;
  60239. procedure TINT_IEC0.setI2C1BIE(thebits : TBits_1); inline;
  60240. begin
  60241. if thebits = 0 then
  60242. pTDefRegMap(@Self)^.clr := $20000000
  60243. else
  60244. pTDefRegMap(@Self)^.&set := $20000000;
  60245. end;
  60246. function TINT_IEC0.getI2C1BIE : TBits_1; inline;
  60247. begin
  60248. getI2C1BIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  60249. end;
  60250. procedure TINT_IEC0.setI2C1SIE; inline;
  60251. begin
  60252. pTDefRegMap(@Self)^.&set := $40000000;
  60253. end;
  60254. procedure TINT_IEC0.clearI2C1SIE; inline;
  60255. begin
  60256. pTDefRegMap(@Self)^.clr := $40000000;
  60257. end;
  60258. procedure TINT_IEC0.setI2C1SIE(thebits : TBits_1); inline;
  60259. begin
  60260. if thebits = 0 then
  60261. pTDefRegMap(@Self)^.clr := $40000000
  60262. else
  60263. pTDefRegMap(@Self)^.&set := $40000000;
  60264. end;
  60265. function TINT_IEC0.getI2C1SIE : TBits_1; inline;
  60266. begin
  60267. getI2C1SIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  60268. end;
  60269. procedure TINT_IEC0.setI2C1MIE; inline;
  60270. begin
  60271. pTDefRegMap(@Self)^.&set := $80000000;
  60272. end;
  60273. procedure TINT_IEC0.clearI2C1MIE; inline;
  60274. begin
  60275. pTDefRegMap(@Self)^.clr := $80000000;
  60276. end;
  60277. procedure TINT_IEC0.setI2C1MIE(thebits : TBits_1); inline;
  60278. begin
  60279. if thebits = 0 then
  60280. pTDefRegMap(@Self)^.clr := $80000000
  60281. else
  60282. pTDefRegMap(@Self)^.&set := $80000000;
  60283. end;
  60284. function TINT_IEC0.getI2C1MIE : TBits_1; inline;
  60285. begin
  60286. getI2C1MIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  60287. end;
  60288. procedure TINT_IEC0.setU1AEIE; inline;
  60289. begin
  60290. pTDefRegMap(@Self)^.&set := $04000000;
  60291. end;
  60292. procedure TINT_IEC0.clearU1AEIE; inline;
  60293. begin
  60294. pTDefRegMap(@Self)^.clr := $04000000;
  60295. end;
  60296. procedure TINT_IEC0.setU1AEIE(thebits : TBits_1); inline;
  60297. begin
  60298. if thebits = 0 then
  60299. pTDefRegMap(@Self)^.clr := $04000000
  60300. else
  60301. pTDefRegMap(@Self)^.&set := $04000000;
  60302. end;
  60303. function TINT_IEC0.getU1AEIE : TBits_1; inline;
  60304. begin
  60305. getU1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60306. end;
  60307. procedure TINT_IEC0.setU1ARXIE; inline;
  60308. begin
  60309. pTDefRegMap(@Self)^.&set := $08000000;
  60310. end;
  60311. procedure TINT_IEC0.clearU1ARXIE; inline;
  60312. begin
  60313. pTDefRegMap(@Self)^.clr := $08000000;
  60314. end;
  60315. procedure TINT_IEC0.setU1ARXIE(thebits : TBits_1); inline;
  60316. begin
  60317. if thebits = 0 then
  60318. pTDefRegMap(@Self)^.clr := $08000000
  60319. else
  60320. pTDefRegMap(@Self)^.&set := $08000000;
  60321. end;
  60322. function TINT_IEC0.getU1ARXIE : TBits_1; inline;
  60323. begin
  60324. getU1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60325. end;
  60326. procedure TINT_IEC0.setU1ATXIE; inline;
  60327. begin
  60328. pTDefRegMap(@Self)^.&set := $10000000;
  60329. end;
  60330. procedure TINT_IEC0.clearU1ATXIE; inline;
  60331. begin
  60332. pTDefRegMap(@Self)^.clr := $10000000;
  60333. end;
  60334. procedure TINT_IEC0.setU1ATXIE(thebits : TBits_1); inline;
  60335. begin
  60336. if thebits = 0 then
  60337. pTDefRegMap(@Self)^.clr := $10000000
  60338. else
  60339. pTDefRegMap(@Self)^.&set := $10000000;
  60340. end;
  60341. function TINT_IEC0.getU1ATXIE : TBits_1; inline;
  60342. begin
  60343. getU1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60344. end;
  60345. procedure TINT_IEC0.setSPI3EIE; inline;
  60346. begin
  60347. pTDefRegMap(@Self)^.&set := $04000000;
  60348. end;
  60349. procedure TINT_IEC0.clearSPI3EIE; inline;
  60350. begin
  60351. pTDefRegMap(@Self)^.clr := $04000000;
  60352. end;
  60353. procedure TINT_IEC0.setSPI3EIE(thebits : TBits_1); inline;
  60354. begin
  60355. if thebits = 0 then
  60356. pTDefRegMap(@Self)^.clr := $04000000
  60357. else
  60358. pTDefRegMap(@Self)^.&set := $04000000;
  60359. end;
  60360. function TINT_IEC0.getSPI3EIE : TBits_1; inline;
  60361. begin
  60362. getSPI3EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60363. end;
  60364. procedure TINT_IEC0.setSPI3RXIE; inline;
  60365. begin
  60366. pTDefRegMap(@Self)^.&set := $08000000;
  60367. end;
  60368. procedure TINT_IEC0.clearSPI3RXIE; inline;
  60369. begin
  60370. pTDefRegMap(@Self)^.clr := $08000000;
  60371. end;
  60372. procedure TINT_IEC0.setSPI3RXIE(thebits : TBits_1); inline;
  60373. begin
  60374. if thebits = 0 then
  60375. pTDefRegMap(@Self)^.clr := $08000000
  60376. else
  60377. pTDefRegMap(@Self)^.&set := $08000000;
  60378. end;
  60379. function TINT_IEC0.getSPI3RXIE : TBits_1; inline;
  60380. begin
  60381. getSPI3RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60382. end;
  60383. procedure TINT_IEC0.setSPI3TXIE; inline;
  60384. begin
  60385. pTDefRegMap(@Self)^.&set := $10000000;
  60386. end;
  60387. procedure TINT_IEC0.clearSPI3TXIE; inline;
  60388. begin
  60389. pTDefRegMap(@Self)^.clr := $10000000;
  60390. end;
  60391. procedure TINT_IEC0.setSPI3TXIE(thebits : TBits_1); inline;
  60392. begin
  60393. if thebits = 0 then
  60394. pTDefRegMap(@Self)^.clr := $10000000
  60395. else
  60396. pTDefRegMap(@Self)^.&set := $10000000;
  60397. end;
  60398. function TINT_IEC0.getSPI3TXIE : TBits_1; inline;
  60399. begin
  60400. getSPI3TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60401. end;
  60402. procedure TINT_IEC0.setSPI1AEIE; inline;
  60403. begin
  60404. pTDefRegMap(@Self)^.&set := $04000000;
  60405. end;
  60406. procedure TINT_IEC0.clearSPI1AEIE; inline;
  60407. begin
  60408. pTDefRegMap(@Self)^.clr := $04000000;
  60409. end;
  60410. procedure TINT_IEC0.setSPI1AEIE(thebits : TBits_1); inline;
  60411. begin
  60412. if thebits = 0 then
  60413. pTDefRegMap(@Self)^.clr := $04000000
  60414. else
  60415. pTDefRegMap(@Self)^.&set := $04000000;
  60416. end;
  60417. function TINT_IEC0.getSPI1AEIE : TBits_1; inline;
  60418. begin
  60419. getSPI1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60420. end;
  60421. procedure TINT_IEC0.setSPI1ARXIE; inline;
  60422. begin
  60423. pTDefRegMap(@Self)^.&set := $08000000;
  60424. end;
  60425. procedure TINT_IEC0.clearSPI1ARXIE; inline;
  60426. begin
  60427. pTDefRegMap(@Self)^.clr := $08000000;
  60428. end;
  60429. procedure TINT_IEC0.setSPI1ARXIE(thebits : TBits_1); inline;
  60430. begin
  60431. if thebits = 0 then
  60432. pTDefRegMap(@Self)^.clr := $08000000
  60433. else
  60434. pTDefRegMap(@Self)^.&set := $08000000;
  60435. end;
  60436. function TINT_IEC0.getSPI1ARXIE : TBits_1; inline;
  60437. begin
  60438. getSPI1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60439. end;
  60440. procedure TINT_IEC0.setSPI1ATXIE; inline;
  60441. begin
  60442. pTDefRegMap(@Self)^.&set := $10000000;
  60443. end;
  60444. procedure TINT_IEC0.clearSPI1ATXIE; inline;
  60445. begin
  60446. pTDefRegMap(@Self)^.clr := $10000000;
  60447. end;
  60448. procedure TINT_IEC0.setSPI1ATXIE(thebits : TBits_1); inline;
  60449. begin
  60450. if thebits = 0 then
  60451. pTDefRegMap(@Self)^.clr := $10000000
  60452. else
  60453. pTDefRegMap(@Self)^.&set := $10000000;
  60454. end;
  60455. function TINT_IEC0.getSPI1ATXIE : TBits_1; inline;
  60456. begin
  60457. getSPI1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60458. end;
  60459. procedure TINT_IEC0.setI2C3BIE; inline;
  60460. begin
  60461. pTDefRegMap(@Self)^.&set := $04000000;
  60462. end;
  60463. procedure TINT_IEC0.clearI2C3BIE; inline;
  60464. begin
  60465. pTDefRegMap(@Self)^.clr := $04000000;
  60466. end;
  60467. procedure TINT_IEC0.setI2C3BIE(thebits : TBits_1); inline;
  60468. begin
  60469. if thebits = 0 then
  60470. pTDefRegMap(@Self)^.clr := $04000000
  60471. else
  60472. pTDefRegMap(@Self)^.&set := $04000000;
  60473. end;
  60474. function TINT_IEC0.getI2C3BIE : TBits_1; inline;
  60475. begin
  60476. getI2C3BIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60477. end;
  60478. procedure TINT_IEC0.setI2C3SIE; inline;
  60479. begin
  60480. pTDefRegMap(@Self)^.&set := $08000000;
  60481. end;
  60482. procedure TINT_IEC0.clearI2C3SIE; inline;
  60483. begin
  60484. pTDefRegMap(@Self)^.clr := $08000000;
  60485. end;
  60486. procedure TINT_IEC0.setI2C3SIE(thebits : TBits_1); inline;
  60487. begin
  60488. if thebits = 0 then
  60489. pTDefRegMap(@Self)^.clr := $08000000
  60490. else
  60491. pTDefRegMap(@Self)^.&set := $08000000;
  60492. end;
  60493. function TINT_IEC0.getI2C3SIE : TBits_1; inline;
  60494. begin
  60495. getI2C3SIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60496. end;
  60497. procedure TINT_IEC0.setI2C3MIE; inline;
  60498. begin
  60499. pTDefRegMap(@Self)^.&set := $10000000;
  60500. end;
  60501. procedure TINT_IEC0.clearI2C3MIE; inline;
  60502. begin
  60503. pTDefRegMap(@Self)^.clr := $10000000;
  60504. end;
  60505. procedure TINT_IEC0.setI2C3MIE(thebits : TBits_1); inline;
  60506. begin
  60507. if thebits = 0 then
  60508. pTDefRegMap(@Self)^.clr := $10000000
  60509. else
  60510. pTDefRegMap(@Self)^.&set := $10000000;
  60511. end;
  60512. function TINT_IEC0.getI2C3MIE : TBits_1; inline;
  60513. begin
  60514. getI2C3MIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60515. end;
  60516. procedure TINT_IEC0.setI2C1ABIE; inline;
  60517. begin
  60518. pTDefRegMap(@Self)^.&set := $04000000;
  60519. end;
  60520. procedure TINT_IEC0.clearI2C1ABIE; inline;
  60521. begin
  60522. pTDefRegMap(@Self)^.clr := $04000000;
  60523. end;
  60524. procedure TINT_IEC0.setI2C1ABIE(thebits : TBits_1); inline;
  60525. begin
  60526. if thebits = 0 then
  60527. pTDefRegMap(@Self)^.clr := $04000000
  60528. else
  60529. pTDefRegMap(@Self)^.&set := $04000000;
  60530. end;
  60531. function TINT_IEC0.getI2C1ABIE : TBits_1; inline;
  60532. begin
  60533. getI2C1ABIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60534. end;
  60535. procedure TINT_IEC0.setI2C1ASIE; inline;
  60536. begin
  60537. pTDefRegMap(@Self)^.&set := $08000000;
  60538. end;
  60539. procedure TINT_IEC0.clearI2C1ASIE; inline;
  60540. begin
  60541. pTDefRegMap(@Self)^.clr := $08000000;
  60542. end;
  60543. procedure TINT_IEC0.setI2C1ASIE(thebits : TBits_1); inline;
  60544. begin
  60545. if thebits = 0 then
  60546. pTDefRegMap(@Self)^.clr := $08000000
  60547. else
  60548. pTDefRegMap(@Self)^.&set := $08000000;
  60549. end;
  60550. function TINT_IEC0.getI2C1ASIE : TBits_1; inline;
  60551. begin
  60552. getI2C1ASIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  60553. end;
  60554. procedure TINT_IEC0.setI2C1AMIE; inline;
  60555. begin
  60556. pTDefRegMap(@Self)^.&set := $10000000;
  60557. end;
  60558. procedure TINT_IEC0.clearI2C1AMIE; inline;
  60559. begin
  60560. pTDefRegMap(@Self)^.clr := $10000000;
  60561. end;
  60562. procedure TINT_IEC0.setI2C1AMIE(thebits : TBits_1); inline;
  60563. begin
  60564. if thebits = 0 then
  60565. pTDefRegMap(@Self)^.clr := $10000000
  60566. else
  60567. pTDefRegMap(@Self)^.&set := $10000000;
  60568. end;
  60569. function TINT_IEC0.getI2C1AMIE : TBits_1; inline;
  60570. begin
  60571. getI2C1AMIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  60572. end;
  60573. procedure TINT_IEC0.setw(thebits : TBits_32); inline;
  60574. begin
  60575. pTDefRegMap(@Self)^.val := thebits;
  60576. end;
  60577. function TINT_IEC0.getw : TBits_32; inline;
  60578. begin
  60579. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60580. end;
  60581. procedure TINT_IEC1.setCNIE; inline;
  60582. begin
  60583. pTDefRegMap(@Self)^.&set := $00000001;
  60584. end;
  60585. procedure TINT_IEC1.clearCNIE; inline;
  60586. begin
  60587. pTDefRegMap(@Self)^.clr := $00000001;
  60588. end;
  60589. procedure TINT_IEC1.setCNIE(thebits : TBits_1); inline;
  60590. begin
  60591. if thebits = 0 then
  60592. pTDefRegMap(@Self)^.clr := $00000001
  60593. else
  60594. pTDefRegMap(@Self)^.&set := $00000001;
  60595. end;
  60596. function TINT_IEC1.getCNIE : TBits_1; inline;
  60597. begin
  60598. getCNIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  60599. end;
  60600. procedure TINT_IEC1.setAD1IE; inline;
  60601. begin
  60602. pTDefRegMap(@Self)^.&set := $00000002;
  60603. end;
  60604. procedure TINT_IEC1.clearAD1IE; inline;
  60605. begin
  60606. pTDefRegMap(@Self)^.clr := $00000002;
  60607. end;
  60608. procedure TINT_IEC1.setAD1IE(thebits : TBits_1); inline;
  60609. begin
  60610. if thebits = 0 then
  60611. pTDefRegMap(@Self)^.clr := $00000002
  60612. else
  60613. pTDefRegMap(@Self)^.&set := $00000002;
  60614. end;
  60615. function TINT_IEC1.getAD1IE : TBits_1; inline;
  60616. begin
  60617. getAD1IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  60618. end;
  60619. procedure TINT_IEC1.setPMPIE; inline;
  60620. begin
  60621. pTDefRegMap(@Self)^.&set := $00000004;
  60622. end;
  60623. procedure TINT_IEC1.clearPMPIE; inline;
  60624. begin
  60625. pTDefRegMap(@Self)^.clr := $00000004;
  60626. end;
  60627. procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
  60628. begin
  60629. if thebits = 0 then
  60630. pTDefRegMap(@Self)^.clr := $00000004
  60631. else
  60632. pTDefRegMap(@Self)^.&set := $00000004;
  60633. end;
  60634. function TINT_IEC1.getPMPIE : TBits_1; inline;
  60635. begin
  60636. getPMPIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  60637. end;
  60638. procedure TINT_IEC1.setCMP1IE; inline;
  60639. begin
  60640. pTDefRegMap(@Self)^.&set := $00000008;
  60641. end;
  60642. procedure TINT_IEC1.clearCMP1IE; inline;
  60643. begin
  60644. pTDefRegMap(@Self)^.clr := $00000008;
  60645. end;
  60646. procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
  60647. begin
  60648. if thebits = 0 then
  60649. pTDefRegMap(@Self)^.clr := $00000008
  60650. else
  60651. pTDefRegMap(@Self)^.&set := $00000008;
  60652. end;
  60653. function TINT_IEC1.getCMP1IE : TBits_1; inline;
  60654. begin
  60655. getCMP1IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60656. end;
  60657. procedure TINT_IEC1.setCMP2IE; inline;
  60658. begin
  60659. pTDefRegMap(@Self)^.&set := $00000010;
  60660. end;
  60661. procedure TINT_IEC1.clearCMP2IE; inline;
  60662. begin
  60663. pTDefRegMap(@Self)^.clr := $00000010;
  60664. end;
  60665. procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
  60666. begin
  60667. if thebits = 0 then
  60668. pTDefRegMap(@Self)^.clr := $00000010
  60669. else
  60670. pTDefRegMap(@Self)^.&set := $00000010;
  60671. end;
  60672. function TINT_IEC1.getCMP2IE : TBits_1; inline;
  60673. begin
  60674. getCMP2IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  60675. end;
  60676. procedure TINT_IEC1.setU3EIE; inline;
  60677. begin
  60678. pTDefRegMap(@Self)^.&set := $00000020;
  60679. end;
  60680. procedure TINT_IEC1.clearU3EIE; inline;
  60681. begin
  60682. pTDefRegMap(@Self)^.clr := $00000020;
  60683. end;
  60684. procedure TINT_IEC1.setU3EIE(thebits : TBits_1); inline;
  60685. begin
  60686. if thebits = 0 then
  60687. pTDefRegMap(@Self)^.clr := $00000020
  60688. else
  60689. pTDefRegMap(@Self)^.&set := $00000020;
  60690. end;
  60691. function TINT_IEC1.getU3EIE : TBits_1; inline;
  60692. begin
  60693. getU3EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60694. end;
  60695. procedure TINT_IEC1.setU3RXIE; inline;
  60696. begin
  60697. pTDefRegMap(@Self)^.&set := $00000040;
  60698. end;
  60699. procedure TINT_IEC1.clearU3RXIE; inline;
  60700. begin
  60701. pTDefRegMap(@Self)^.clr := $00000040;
  60702. end;
  60703. procedure TINT_IEC1.setU3RXIE(thebits : TBits_1); inline;
  60704. begin
  60705. if thebits = 0 then
  60706. pTDefRegMap(@Self)^.clr := $00000040
  60707. else
  60708. pTDefRegMap(@Self)^.&set := $00000040;
  60709. end;
  60710. function TINT_IEC1.getU3RXIE : TBits_1; inline;
  60711. begin
  60712. getU3RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60713. end;
  60714. procedure TINT_IEC1.setU3TXIE; inline;
  60715. begin
  60716. pTDefRegMap(@Self)^.&set := $00000080;
  60717. end;
  60718. procedure TINT_IEC1.clearU3TXIE; inline;
  60719. begin
  60720. pTDefRegMap(@Self)^.clr := $00000080;
  60721. end;
  60722. procedure TINT_IEC1.setU3TXIE(thebits : TBits_1); inline;
  60723. begin
  60724. if thebits = 0 then
  60725. pTDefRegMap(@Self)^.clr := $00000080
  60726. else
  60727. pTDefRegMap(@Self)^.&set := $00000080;
  60728. end;
  60729. function TINT_IEC1.getU3TXIE : TBits_1; inline;
  60730. begin
  60731. getU3TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  60732. end;
  60733. procedure TINT_IEC1.setU2EIE; inline;
  60734. begin
  60735. pTDefRegMap(@Self)^.&set := $00000100;
  60736. end;
  60737. procedure TINT_IEC1.clearU2EIE; inline;
  60738. begin
  60739. pTDefRegMap(@Self)^.clr := $00000100;
  60740. end;
  60741. procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
  60742. begin
  60743. if thebits = 0 then
  60744. pTDefRegMap(@Self)^.clr := $00000100
  60745. else
  60746. pTDefRegMap(@Self)^.&set := $00000100;
  60747. end;
  60748. function TINT_IEC1.getU2EIE : TBits_1; inline;
  60749. begin
  60750. getU2EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  60751. end;
  60752. procedure TINT_IEC1.setU2RXIE; inline;
  60753. begin
  60754. pTDefRegMap(@Self)^.&set := $00000200;
  60755. end;
  60756. procedure TINT_IEC1.clearU2RXIE; inline;
  60757. begin
  60758. pTDefRegMap(@Self)^.clr := $00000200;
  60759. end;
  60760. procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
  60761. begin
  60762. if thebits = 0 then
  60763. pTDefRegMap(@Self)^.clr := $00000200
  60764. else
  60765. pTDefRegMap(@Self)^.&set := $00000200;
  60766. end;
  60767. function TINT_IEC1.getU2RXIE : TBits_1; inline;
  60768. begin
  60769. getU2RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  60770. end;
  60771. procedure TINT_IEC1.setU2TXIE; inline;
  60772. begin
  60773. pTDefRegMap(@Self)^.&set := $00000400;
  60774. end;
  60775. procedure TINT_IEC1.clearU2TXIE; inline;
  60776. begin
  60777. pTDefRegMap(@Self)^.clr := $00000400;
  60778. end;
  60779. procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
  60780. begin
  60781. if thebits = 0 then
  60782. pTDefRegMap(@Self)^.clr := $00000400
  60783. else
  60784. pTDefRegMap(@Self)^.&set := $00000400;
  60785. end;
  60786. function TINT_IEC1.getU2TXIE : TBits_1; inline;
  60787. begin
  60788. getU2TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  60789. end;
  60790. procedure TINT_IEC1.setI2C2BIE; inline;
  60791. begin
  60792. pTDefRegMap(@Self)^.&set := $00000800;
  60793. end;
  60794. procedure TINT_IEC1.clearI2C2BIE; inline;
  60795. begin
  60796. pTDefRegMap(@Self)^.clr := $00000800;
  60797. end;
  60798. procedure TINT_IEC1.setI2C2BIE(thebits : TBits_1); inline;
  60799. begin
  60800. if thebits = 0 then
  60801. pTDefRegMap(@Self)^.clr := $00000800
  60802. else
  60803. pTDefRegMap(@Self)^.&set := $00000800;
  60804. end;
  60805. function TINT_IEC1.getI2C2BIE : TBits_1; inline;
  60806. begin
  60807. getI2C2BIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60808. end;
  60809. procedure TINT_IEC1.setI2C2SIE; inline;
  60810. begin
  60811. pTDefRegMap(@Self)^.&set := $00001000;
  60812. end;
  60813. procedure TINT_IEC1.clearI2C2SIE; inline;
  60814. begin
  60815. pTDefRegMap(@Self)^.clr := $00001000;
  60816. end;
  60817. procedure TINT_IEC1.setI2C2SIE(thebits : TBits_1); inline;
  60818. begin
  60819. if thebits = 0 then
  60820. pTDefRegMap(@Self)^.clr := $00001000
  60821. else
  60822. pTDefRegMap(@Self)^.&set := $00001000;
  60823. end;
  60824. function TINT_IEC1.getI2C2SIE : TBits_1; inline;
  60825. begin
  60826. getI2C2SIE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60827. end;
  60828. procedure TINT_IEC1.setI2C2MIE; inline;
  60829. begin
  60830. pTDefRegMap(@Self)^.&set := $00002000;
  60831. end;
  60832. procedure TINT_IEC1.clearI2C2MIE; inline;
  60833. begin
  60834. pTDefRegMap(@Self)^.clr := $00002000;
  60835. end;
  60836. procedure TINT_IEC1.setI2C2MIE(thebits : TBits_1); inline;
  60837. begin
  60838. if thebits = 0 then
  60839. pTDefRegMap(@Self)^.clr := $00002000
  60840. else
  60841. pTDefRegMap(@Self)^.&set := $00002000;
  60842. end;
  60843. function TINT_IEC1.getI2C2MIE : TBits_1; inline;
  60844. begin
  60845. getI2C2MIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  60846. end;
  60847. procedure TINT_IEC1.setFSCMIE; inline;
  60848. begin
  60849. pTDefRegMap(@Self)^.&set := $00004000;
  60850. end;
  60851. procedure TINT_IEC1.clearFSCMIE; inline;
  60852. begin
  60853. pTDefRegMap(@Self)^.clr := $00004000;
  60854. end;
  60855. procedure TINT_IEC1.setFSCMIE(thebits : TBits_1); inline;
  60856. begin
  60857. if thebits = 0 then
  60858. pTDefRegMap(@Self)^.clr := $00004000
  60859. else
  60860. pTDefRegMap(@Self)^.&set := $00004000;
  60861. end;
  60862. function TINT_IEC1.getFSCMIE : TBits_1; inline;
  60863. begin
  60864. getFSCMIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  60865. end;
  60866. procedure TINT_IEC1.setRTCCIE; inline;
  60867. begin
  60868. pTDefRegMap(@Self)^.&set := $00008000;
  60869. end;
  60870. procedure TINT_IEC1.clearRTCCIE; inline;
  60871. begin
  60872. pTDefRegMap(@Self)^.clr := $00008000;
  60873. end;
  60874. procedure TINT_IEC1.setRTCCIE(thebits : TBits_1); inline;
  60875. begin
  60876. if thebits = 0 then
  60877. pTDefRegMap(@Self)^.clr := $00008000
  60878. else
  60879. pTDefRegMap(@Self)^.&set := $00008000;
  60880. end;
  60881. function TINT_IEC1.getRTCCIE : TBits_1; inline;
  60882. begin
  60883. getRTCCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60884. end;
  60885. procedure TINT_IEC1.setDMA0IE; inline;
  60886. begin
  60887. pTDefRegMap(@Self)^.&set := $00010000;
  60888. end;
  60889. procedure TINT_IEC1.clearDMA0IE; inline;
  60890. begin
  60891. pTDefRegMap(@Self)^.clr := $00010000;
  60892. end;
  60893. procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
  60894. begin
  60895. if thebits = 0 then
  60896. pTDefRegMap(@Self)^.clr := $00010000
  60897. else
  60898. pTDefRegMap(@Self)^.&set := $00010000;
  60899. end;
  60900. function TINT_IEC1.getDMA0IE : TBits_1; inline;
  60901. begin
  60902. getDMA0IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  60903. end;
  60904. procedure TINT_IEC1.setDMA1IE; inline;
  60905. begin
  60906. pTDefRegMap(@Self)^.&set := $00020000;
  60907. end;
  60908. procedure TINT_IEC1.clearDMA1IE; inline;
  60909. begin
  60910. pTDefRegMap(@Self)^.clr := $00020000;
  60911. end;
  60912. procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
  60913. begin
  60914. if thebits = 0 then
  60915. pTDefRegMap(@Self)^.clr := $00020000
  60916. else
  60917. pTDefRegMap(@Self)^.&set := $00020000;
  60918. end;
  60919. function TINT_IEC1.getDMA1IE : TBits_1; inline;
  60920. begin
  60921. getDMA1IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  60922. end;
  60923. procedure TINT_IEC1.setDMA2IE; inline;
  60924. begin
  60925. pTDefRegMap(@Self)^.&set := $00040000;
  60926. end;
  60927. procedure TINT_IEC1.clearDMA2IE; inline;
  60928. begin
  60929. pTDefRegMap(@Self)^.clr := $00040000;
  60930. end;
  60931. procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
  60932. begin
  60933. if thebits = 0 then
  60934. pTDefRegMap(@Self)^.clr := $00040000
  60935. else
  60936. pTDefRegMap(@Self)^.&set := $00040000;
  60937. end;
  60938. function TINT_IEC1.getDMA2IE : TBits_1; inline;
  60939. begin
  60940. getDMA2IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  60941. end;
  60942. procedure TINT_IEC1.setDMA3IE; inline;
  60943. begin
  60944. pTDefRegMap(@Self)^.&set := $00080000;
  60945. end;
  60946. procedure TINT_IEC1.clearDMA3IE; inline;
  60947. begin
  60948. pTDefRegMap(@Self)^.clr := $00080000;
  60949. end;
  60950. procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
  60951. begin
  60952. if thebits = 0 then
  60953. pTDefRegMap(@Self)^.clr := $00080000
  60954. else
  60955. pTDefRegMap(@Self)^.&set := $00080000;
  60956. end;
  60957. function TINT_IEC1.getDMA3IE : TBits_1; inline;
  60958. begin
  60959. getDMA3IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  60960. end;
  60961. procedure TINT_IEC1.setDMA4IE; inline;
  60962. begin
  60963. pTDefRegMap(@Self)^.&set := $00100000;
  60964. end;
  60965. procedure TINT_IEC1.clearDMA4IE; inline;
  60966. begin
  60967. pTDefRegMap(@Self)^.clr := $00100000;
  60968. end;
  60969. procedure TINT_IEC1.setDMA4IE(thebits : TBits_1); inline;
  60970. begin
  60971. if thebits = 0 then
  60972. pTDefRegMap(@Self)^.clr := $00100000
  60973. else
  60974. pTDefRegMap(@Self)^.&set := $00100000;
  60975. end;
  60976. function TINT_IEC1.getDMA4IE : TBits_1; inline;
  60977. begin
  60978. getDMA4IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  60979. end;
  60980. procedure TINT_IEC1.setDMA5IE; inline;
  60981. begin
  60982. pTDefRegMap(@Self)^.&set := $00200000;
  60983. end;
  60984. procedure TINT_IEC1.clearDMA5IE; inline;
  60985. begin
  60986. pTDefRegMap(@Self)^.clr := $00200000;
  60987. end;
  60988. procedure TINT_IEC1.setDMA5IE(thebits : TBits_1); inline;
  60989. begin
  60990. if thebits = 0 then
  60991. pTDefRegMap(@Self)^.clr := $00200000
  60992. else
  60993. pTDefRegMap(@Self)^.&set := $00200000;
  60994. end;
  60995. function TINT_IEC1.getDMA5IE : TBits_1; inline;
  60996. begin
  60997. getDMA5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  60998. end;
  60999. procedure TINT_IEC1.setDMA6IE; inline;
  61000. begin
  61001. pTDefRegMap(@Self)^.&set := $00400000;
  61002. end;
  61003. procedure TINT_IEC1.clearDMA6IE; inline;
  61004. begin
  61005. pTDefRegMap(@Self)^.clr := $00400000;
  61006. end;
  61007. procedure TINT_IEC1.setDMA6IE(thebits : TBits_1); inline;
  61008. begin
  61009. if thebits = 0 then
  61010. pTDefRegMap(@Self)^.clr := $00400000
  61011. else
  61012. pTDefRegMap(@Self)^.&set := $00400000;
  61013. end;
  61014. function TINT_IEC1.getDMA6IE : TBits_1; inline;
  61015. begin
  61016. getDMA6IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  61017. end;
  61018. procedure TINT_IEC1.setDMA7IE; inline;
  61019. begin
  61020. pTDefRegMap(@Self)^.&set := $00800000;
  61021. end;
  61022. procedure TINT_IEC1.clearDMA7IE; inline;
  61023. begin
  61024. pTDefRegMap(@Self)^.clr := $00800000;
  61025. end;
  61026. procedure TINT_IEC1.setDMA7IE(thebits : TBits_1); inline;
  61027. begin
  61028. if thebits = 0 then
  61029. pTDefRegMap(@Self)^.clr := $00800000
  61030. else
  61031. pTDefRegMap(@Self)^.&set := $00800000;
  61032. end;
  61033. function TINT_IEC1.getDMA7IE : TBits_1; inline;
  61034. begin
  61035. getDMA7IE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  61036. end;
  61037. procedure TINT_IEC1.setFCEIE; inline;
  61038. begin
  61039. pTDefRegMap(@Self)^.&set := $01000000;
  61040. end;
  61041. procedure TINT_IEC1.clearFCEIE; inline;
  61042. begin
  61043. pTDefRegMap(@Self)^.clr := $01000000;
  61044. end;
  61045. procedure TINT_IEC1.setFCEIE(thebits : TBits_1); inline;
  61046. begin
  61047. if thebits = 0 then
  61048. pTDefRegMap(@Self)^.clr := $01000000
  61049. else
  61050. pTDefRegMap(@Self)^.&set := $01000000;
  61051. end;
  61052. function TINT_IEC1.getFCEIE : TBits_1; inline;
  61053. begin
  61054. getFCEIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  61055. end;
  61056. procedure TINT_IEC1.setUSBIE; inline;
  61057. begin
  61058. pTDefRegMap(@Self)^.&set := $02000000;
  61059. end;
  61060. procedure TINT_IEC1.clearUSBIE; inline;
  61061. begin
  61062. pTDefRegMap(@Self)^.clr := $02000000;
  61063. end;
  61064. procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
  61065. begin
  61066. if thebits = 0 then
  61067. pTDefRegMap(@Self)^.clr := $02000000
  61068. else
  61069. pTDefRegMap(@Self)^.&set := $02000000;
  61070. end;
  61071. function TINT_IEC1.getUSBIE : TBits_1; inline;
  61072. begin
  61073. getUSBIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  61074. end;
  61075. procedure TINT_IEC1.setCAN1IE; inline;
  61076. begin
  61077. pTDefRegMap(@Self)^.&set := $04000000;
  61078. end;
  61079. procedure TINT_IEC1.clearCAN1IE; inline;
  61080. begin
  61081. pTDefRegMap(@Self)^.clr := $04000000;
  61082. end;
  61083. procedure TINT_IEC1.setCAN1IE(thebits : TBits_1); inline;
  61084. begin
  61085. if thebits = 0 then
  61086. pTDefRegMap(@Self)^.clr := $04000000
  61087. else
  61088. pTDefRegMap(@Self)^.&set := $04000000;
  61089. end;
  61090. function TINT_IEC1.getCAN1IE : TBits_1; inline;
  61091. begin
  61092. getCAN1IE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  61093. end;
  61094. procedure TINT_IEC1.setCAN2IE; inline;
  61095. begin
  61096. pTDefRegMap(@Self)^.&set := $08000000;
  61097. end;
  61098. procedure TINT_IEC1.clearCAN2IE; inline;
  61099. begin
  61100. pTDefRegMap(@Self)^.clr := $08000000;
  61101. end;
  61102. procedure TINT_IEC1.setCAN2IE(thebits : TBits_1); inline;
  61103. begin
  61104. if thebits = 0 then
  61105. pTDefRegMap(@Self)^.clr := $08000000
  61106. else
  61107. pTDefRegMap(@Self)^.&set := $08000000;
  61108. end;
  61109. function TINT_IEC1.getCAN2IE : TBits_1; inline;
  61110. begin
  61111. getCAN2IE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  61112. end;
  61113. procedure TINT_IEC1.setETHIE; inline;
  61114. begin
  61115. pTDefRegMap(@Self)^.&set := $10000000;
  61116. end;
  61117. procedure TINT_IEC1.clearETHIE; inline;
  61118. begin
  61119. pTDefRegMap(@Self)^.clr := $10000000;
  61120. end;
  61121. procedure TINT_IEC1.setETHIE(thebits : TBits_1); inline;
  61122. begin
  61123. if thebits = 0 then
  61124. pTDefRegMap(@Self)^.clr := $10000000
  61125. else
  61126. pTDefRegMap(@Self)^.&set := $10000000;
  61127. end;
  61128. function TINT_IEC1.getETHIE : TBits_1; inline;
  61129. begin
  61130. getETHIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  61131. end;
  61132. procedure TINT_IEC1.setIC1EIE; inline;
  61133. begin
  61134. pTDefRegMap(@Self)^.&set := $20000000;
  61135. end;
  61136. procedure TINT_IEC1.clearIC1EIE; inline;
  61137. begin
  61138. pTDefRegMap(@Self)^.clr := $20000000;
  61139. end;
  61140. procedure TINT_IEC1.setIC1EIE(thebits : TBits_1); inline;
  61141. begin
  61142. if thebits = 0 then
  61143. pTDefRegMap(@Self)^.clr := $20000000
  61144. else
  61145. pTDefRegMap(@Self)^.&set := $20000000;
  61146. end;
  61147. function TINT_IEC1.getIC1EIE : TBits_1; inline;
  61148. begin
  61149. getIC1EIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  61150. end;
  61151. procedure TINT_IEC1.setIC2EIE; inline;
  61152. begin
  61153. pTDefRegMap(@Self)^.&set := $40000000;
  61154. end;
  61155. procedure TINT_IEC1.clearIC2EIE; inline;
  61156. begin
  61157. pTDefRegMap(@Self)^.clr := $40000000;
  61158. end;
  61159. procedure TINT_IEC1.setIC2EIE(thebits : TBits_1); inline;
  61160. begin
  61161. if thebits = 0 then
  61162. pTDefRegMap(@Self)^.clr := $40000000
  61163. else
  61164. pTDefRegMap(@Self)^.&set := $40000000;
  61165. end;
  61166. function TINT_IEC1.getIC2EIE : TBits_1; inline;
  61167. begin
  61168. getIC2EIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  61169. end;
  61170. procedure TINT_IEC1.setIC3EIE; inline;
  61171. begin
  61172. pTDefRegMap(@Self)^.&set := $80000000;
  61173. end;
  61174. procedure TINT_IEC1.clearIC3EIE; inline;
  61175. begin
  61176. pTDefRegMap(@Self)^.clr := $80000000;
  61177. end;
  61178. procedure TINT_IEC1.setIC3EIE(thebits : TBits_1); inline;
  61179. begin
  61180. if thebits = 0 then
  61181. pTDefRegMap(@Self)^.clr := $80000000
  61182. else
  61183. pTDefRegMap(@Self)^.&set := $80000000;
  61184. end;
  61185. function TINT_IEC1.getIC3EIE : TBits_1; inline;
  61186. begin
  61187. getIC3EIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  61188. end;
  61189. procedure TINT_IEC1.setU2AEIE; inline;
  61190. begin
  61191. pTDefRegMap(@Self)^.&set := $00000020;
  61192. end;
  61193. procedure TINT_IEC1.clearU2AEIE; inline;
  61194. begin
  61195. pTDefRegMap(@Self)^.clr := $00000020;
  61196. end;
  61197. procedure TINT_IEC1.setU2AEIE(thebits : TBits_1); inline;
  61198. begin
  61199. if thebits = 0 then
  61200. pTDefRegMap(@Self)^.clr := $00000020
  61201. else
  61202. pTDefRegMap(@Self)^.&set := $00000020;
  61203. end;
  61204. function TINT_IEC1.getU2AEIE : TBits_1; inline;
  61205. begin
  61206. getU2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61207. end;
  61208. procedure TINT_IEC1.setU2ARXIE; inline;
  61209. begin
  61210. pTDefRegMap(@Self)^.&set := $00000040;
  61211. end;
  61212. procedure TINT_IEC1.clearU2ARXIE; inline;
  61213. begin
  61214. pTDefRegMap(@Self)^.clr := $00000040;
  61215. end;
  61216. procedure TINT_IEC1.setU2ARXIE(thebits : TBits_1); inline;
  61217. begin
  61218. if thebits = 0 then
  61219. pTDefRegMap(@Self)^.clr := $00000040
  61220. else
  61221. pTDefRegMap(@Self)^.&set := $00000040;
  61222. end;
  61223. function TINT_IEC1.getU2ARXIE : TBits_1; inline;
  61224. begin
  61225. getU2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61226. end;
  61227. procedure TINT_IEC1.setU2ATXIE; inline;
  61228. begin
  61229. pTDefRegMap(@Self)^.&set := $00000080;
  61230. end;
  61231. procedure TINT_IEC1.clearU2ATXIE; inline;
  61232. begin
  61233. pTDefRegMap(@Self)^.clr := $00000080;
  61234. end;
  61235. procedure TINT_IEC1.setU2ATXIE(thebits : TBits_1); inline;
  61236. begin
  61237. if thebits = 0 then
  61238. pTDefRegMap(@Self)^.clr := $00000080
  61239. else
  61240. pTDefRegMap(@Self)^.&set := $00000080;
  61241. end;
  61242. function TINT_IEC1.getU2ATXIE : TBits_1; inline;
  61243. begin
  61244. getU2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61245. end;
  61246. procedure TINT_IEC1.setU3AEIE; inline;
  61247. begin
  61248. pTDefRegMap(@Self)^.&set := $00000100;
  61249. end;
  61250. procedure TINT_IEC1.clearU3AEIE; inline;
  61251. begin
  61252. pTDefRegMap(@Self)^.clr := $00000100;
  61253. end;
  61254. procedure TINT_IEC1.setU3AEIE(thebits : TBits_1); inline;
  61255. begin
  61256. if thebits = 0 then
  61257. pTDefRegMap(@Self)^.clr := $00000100
  61258. else
  61259. pTDefRegMap(@Self)^.&set := $00000100;
  61260. end;
  61261. function TINT_IEC1.getU3AEIE : TBits_1; inline;
  61262. begin
  61263. getU3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61264. end;
  61265. procedure TINT_IEC1.setU3ARXIE; inline;
  61266. begin
  61267. pTDefRegMap(@Self)^.&set := $00000200;
  61268. end;
  61269. procedure TINT_IEC1.clearU3ARXIE; inline;
  61270. begin
  61271. pTDefRegMap(@Self)^.clr := $00000200;
  61272. end;
  61273. procedure TINT_IEC1.setU3ARXIE(thebits : TBits_1); inline;
  61274. begin
  61275. if thebits = 0 then
  61276. pTDefRegMap(@Self)^.clr := $00000200
  61277. else
  61278. pTDefRegMap(@Self)^.&set := $00000200;
  61279. end;
  61280. function TINT_IEC1.getU3ARXIE : TBits_1; inline;
  61281. begin
  61282. getU3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61283. end;
  61284. procedure TINT_IEC1.setU3ATXIE; inline;
  61285. begin
  61286. pTDefRegMap(@Self)^.&set := $00000400;
  61287. end;
  61288. procedure TINT_IEC1.clearU3ATXIE; inline;
  61289. begin
  61290. pTDefRegMap(@Self)^.clr := $00000400;
  61291. end;
  61292. procedure TINT_IEC1.setU3ATXIE(thebits : TBits_1); inline;
  61293. begin
  61294. if thebits = 0 then
  61295. pTDefRegMap(@Self)^.clr := $00000400
  61296. else
  61297. pTDefRegMap(@Self)^.&set := $00000400;
  61298. end;
  61299. function TINT_IEC1.getU3ATXIE : TBits_1; inline;
  61300. begin
  61301. getU3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61302. end;
  61303. procedure TINT_IEC1.setSPI2EIE; inline;
  61304. begin
  61305. pTDefRegMap(@Self)^.&set := $00000020;
  61306. end;
  61307. procedure TINT_IEC1.clearSPI2EIE; inline;
  61308. begin
  61309. pTDefRegMap(@Self)^.clr := $00000020;
  61310. end;
  61311. procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
  61312. begin
  61313. if thebits = 0 then
  61314. pTDefRegMap(@Self)^.clr := $00000020
  61315. else
  61316. pTDefRegMap(@Self)^.&set := $00000020;
  61317. end;
  61318. function TINT_IEC1.getSPI2EIE : TBits_1; inline;
  61319. begin
  61320. getSPI2EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61321. end;
  61322. procedure TINT_IEC1.setSPI2RXIE; inline;
  61323. begin
  61324. pTDefRegMap(@Self)^.&set := $00000040;
  61325. end;
  61326. procedure TINT_IEC1.clearSPI2RXIE; inline;
  61327. begin
  61328. pTDefRegMap(@Self)^.clr := $00000040;
  61329. end;
  61330. procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
  61331. begin
  61332. if thebits = 0 then
  61333. pTDefRegMap(@Self)^.clr := $00000040
  61334. else
  61335. pTDefRegMap(@Self)^.&set := $00000040;
  61336. end;
  61337. function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
  61338. begin
  61339. getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61340. end;
  61341. procedure TINT_IEC1.setSPI2TXIE; inline;
  61342. begin
  61343. pTDefRegMap(@Self)^.&set := $00000080;
  61344. end;
  61345. procedure TINT_IEC1.clearSPI2TXIE; inline;
  61346. begin
  61347. pTDefRegMap(@Self)^.clr := $00000080;
  61348. end;
  61349. procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
  61350. begin
  61351. if thebits = 0 then
  61352. pTDefRegMap(@Self)^.clr := $00000080
  61353. else
  61354. pTDefRegMap(@Self)^.&set := $00000080;
  61355. end;
  61356. function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
  61357. begin
  61358. getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61359. end;
  61360. procedure TINT_IEC1.setSPI4EIE; inline;
  61361. begin
  61362. pTDefRegMap(@Self)^.&set := $00000100;
  61363. end;
  61364. procedure TINT_IEC1.clearSPI4EIE; inline;
  61365. begin
  61366. pTDefRegMap(@Self)^.clr := $00000100;
  61367. end;
  61368. procedure TINT_IEC1.setSPI4EIE(thebits : TBits_1); inline;
  61369. begin
  61370. if thebits = 0 then
  61371. pTDefRegMap(@Self)^.clr := $00000100
  61372. else
  61373. pTDefRegMap(@Self)^.&set := $00000100;
  61374. end;
  61375. function TINT_IEC1.getSPI4EIE : TBits_1; inline;
  61376. begin
  61377. getSPI4EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61378. end;
  61379. procedure TINT_IEC1.setSPI4RXIE; inline;
  61380. begin
  61381. pTDefRegMap(@Self)^.&set := $00000200;
  61382. end;
  61383. procedure TINT_IEC1.clearSPI4RXIE; inline;
  61384. begin
  61385. pTDefRegMap(@Self)^.clr := $00000200;
  61386. end;
  61387. procedure TINT_IEC1.setSPI4RXIE(thebits : TBits_1); inline;
  61388. begin
  61389. if thebits = 0 then
  61390. pTDefRegMap(@Self)^.clr := $00000200
  61391. else
  61392. pTDefRegMap(@Self)^.&set := $00000200;
  61393. end;
  61394. function TINT_IEC1.getSPI4RXIE : TBits_1; inline;
  61395. begin
  61396. getSPI4RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61397. end;
  61398. procedure TINT_IEC1.setSPI4TXIE; inline;
  61399. begin
  61400. pTDefRegMap(@Self)^.&set := $00000400;
  61401. end;
  61402. procedure TINT_IEC1.clearSPI4TXIE; inline;
  61403. begin
  61404. pTDefRegMap(@Self)^.clr := $00000400;
  61405. end;
  61406. procedure TINT_IEC1.setSPI4TXIE(thebits : TBits_1); inline;
  61407. begin
  61408. if thebits = 0 then
  61409. pTDefRegMap(@Self)^.clr := $00000400
  61410. else
  61411. pTDefRegMap(@Self)^.&set := $00000400;
  61412. end;
  61413. function TINT_IEC1.getSPI4TXIE : TBits_1; inline;
  61414. begin
  61415. getSPI4TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61416. end;
  61417. procedure TINT_IEC1.setSPI2AEIE; inline;
  61418. begin
  61419. pTDefRegMap(@Self)^.&set := $00000020;
  61420. end;
  61421. procedure TINT_IEC1.clearSPI2AEIE; inline;
  61422. begin
  61423. pTDefRegMap(@Self)^.clr := $00000020;
  61424. end;
  61425. procedure TINT_IEC1.setSPI2AEIE(thebits : TBits_1); inline;
  61426. begin
  61427. if thebits = 0 then
  61428. pTDefRegMap(@Self)^.clr := $00000020
  61429. else
  61430. pTDefRegMap(@Self)^.&set := $00000020;
  61431. end;
  61432. function TINT_IEC1.getSPI2AEIE : TBits_1; inline;
  61433. begin
  61434. getSPI2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61435. end;
  61436. procedure TINT_IEC1.setSPI2ARXIE; inline;
  61437. begin
  61438. pTDefRegMap(@Self)^.&set := $00000040;
  61439. end;
  61440. procedure TINT_IEC1.clearSPI2ARXIE; inline;
  61441. begin
  61442. pTDefRegMap(@Self)^.clr := $00000040;
  61443. end;
  61444. procedure TINT_IEC1.setSPI2ARXIE(thebits : TBits_1); inline;
  61445. begin
  61446. if thebits = 0 then
  61447. pTDefRegMap(@Self)^.clr := $00000040
  61448. else
  61449. pTDefRegMap(@Self)^.&set := $00000040;
  61450. end;
  61451. function TINT_IEC1.getSPI2ARXIE : TBits_1; inline;
  61452. begin
  61453. getSPI2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61454. end;
  61455. procedure TINT_IEC1.setSPI2ATXIE; inline;
  61456. begin
  61457. pTDefRegMap(@Self)^.&set := $00000080;
  61458. end;
  61459. procedure TINT_IEC1.clearSPI2ATXIE; inline;
  61460. begin
  61461. pTDefRegMap(@Self)^.clr := $00000080;
  61462. end;
  61463. procedure TINT_IEC1.setSPI2ATXIE(thebits : TBits_1); inline;
  61464. begin
  61465. if thebits = 0 then
  61466. pTDefRegMap(@Self)^.clr := $00000080
  61467. else
  61468. pTDefRegMap(@Self)^.&set := $00000080;
  61469. end;
  61470. function TINT_IEC1.getSPI2ATXIE : TBits_1; inline;
  61471. begin
  61472. getSPI2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61473. end;
  61474. procedure TINT_IEC1.setSPI3AEIE; inline;
  61475. begin
  61476. pTDefRegMap(@Self)^.&set := $00000100;
  61477. end;
  61478. procedure TINT_IEC1.clearSPI3AEIE; inline;
  61479. begin
  61480. pTDefRegMap(@Self)^.clr := $00000100;
  61481. end;
  61482. procedure TINT_IEC1.setSPI3AEIE(thebits : TBits_1); inline;
  61483. begin
  61484. if thebits = 0 then
  61485. pTDefRegMap(@Self)^.clr := $00000100
  61486. else
  61487. pTDefRegMap(@Self)^.&set := $00000100;
  61488. end;
  61489. function TINT_IEC1.getSPI3AEIE : TBits_1; inline;
  61490. begin
  61491. getSPI3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61492. end;
  61493. procedure TINT_IEC1.setSPI3ARXIE; inline;
  61494. begin
  61495. pTDefRegMap(@Self)^.&set := $00000200;
  61496. end;
  61497. procedure TINT_IEC1.clearSPI3ARXIE; inline;
  61498. begin
  61499. pTDefRegMap(@Self)^.clr := $00000200;
  61500. end;
  61501. procedure TINT_IEC1.setSPI3ARXIE(thebits : TBits_1); inline;
  61502. begin
  61503. if thebits = 0 then
  61504. pTDefRegMap(@Self)^.clr := $00000200
  61505. else
  61506. pTDefRegMap(@Self)^.&set := $00000200;
  61507. end;
  61508. function TINT_IEC1.getSPI3ARXIE : TBits_1; inline;
  61509. begin
  61510. getSPI3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61511. end;
  61512. procedure TINT_IEC1.setSPI3ATXIE; inline;
  61513. begin
  61514. pTDefRegMap(@Self)^.&set := $00000400;
  61515. end;
  61516. procedure TINT_IEC1.clearSPI3ATXIE; inline;
  61517. begin
  61518. pTDefRegMap(@Self)^.clr := $00000400;
  61519. end;
  61520. procedure TINT_IEC1.setSPI3ATXIE(thebits : TBits_1); inline;
  61521. begin
  61522. if thebits = 0 then
  61523. pTDefRegMap(@Self)^.clr := $00000400
  61524. else
  61525. pTDefRegMap(@Self)^.&set := $00000400;
  61526. end;
  61527. function TINT_IEC1.getSPI3ATXIE : TBits_1; inline;
  61528. begin
  61529. getSPI3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61530. end;
  61531. procedure TINT_IEC1.setI2C4BIE; inline;
  61532. begin
  61533. pTDefRegMap(@Self)^.&set := $00000020;
  61534. end;
  61535. procedure TINT_IEC1.clearI2C4BIE; inline;
  61536. begin
  61537. pTDefRegMap(@Self)^.clr := $00000020;
  61538. end;
  61539. procedure TINT_IEC1.setI2C4BIE(thebits : TBits_1); inline;
  61540. begin
  61541. if thebits = 0 then
  61542. pTDefRegMap(@Self)^.clr := $00000020
  61543. else
  61544. pTDefRegMap(@Self)^.&set := $00000020;
  61545. end;
  61546. function TINT_IEC1.getI2C4BIE : TBits_1; inline;
  61547. begin
  61548. getI2C4BIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61549. end;
  61550. procedure TINT_IEC1.setI2C4SIE; inline;
  61551. begin
  61552. pTDefRegMap(@Self)^.&set := $00000040;
  61553. end;
  61554. procedure TINT_IEC1.clearI2C4SIE; inline;
  61555. begin
  61556. pTDefRegMap(@Self)^.clr := $00000040;
  61557. end;
  61558. procedure TINT_IEC1.setI2C4SIE(thebits : TBits_1); inline;
  61559. begin
  61560. if thebits = 0 then
  61561. pTDefRegMap(@Self)^.clr := $00000040
  61562. else
  61563. pTDefRegMap(@Self)^.&set := $00000040;
  61564. end;
  61565. function TINT_IEC1.getI2C4SIE : TBits_1; inline;
  61566. begin
  61567. getI2C4SIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61568. end;
  61569. procedure TINT_IEC1.setI2C4MIE; inline;
  61570. begin
  61571. pTDefRegMap(@Self)^.&set := $00000080;
  61572. end;
  61573. procedure TINT_IEC1.clearI2C4MIE; inline;
  61574. begin
  61575. pTDefRegMap(@Self)^.clr := $00000080;
  61576. end;
  61577. procedure TINT_IEC1.setI2C4MIE(thebits : TBits_1); inline;
  61578. begin
  61579. if thebits = 0 then
  61580. pTDefRegMap(@Self)^.clr := $00000080
  61581. else
  61582. pTDefRegMap(@Self)^.&set := $00000080;
  61583. end;
  61584. function TINT_IEC1.getI2C4MIE : TBits_1; inline;
  61585. begin
  61586. getI2C4MIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61587. end;
  61588. procedure TINT_IEC1.setI2C5BIE; inline;
  61589. begin
  61590. pTDefRegMap(@Self)^.&set := $00000100;
  61591. end;
  61592. procedure TINT_IEC1.clearI2C5BIE; inline;
  61593. begin
  61594. pTDefRegMap(@Self)^.clr := $00000100;
  61595. end;
  61596. procedure TINT_IEC1.setI2C5BIE(thebits : TBits_1); inline;
  61597. begin
  61598. if thebits = 0 then
  61599. pTDefRegMap(@Self)^.clr := $00000100
  61600. else
  61601. pTDefRegMap(@Self)^.&set := $00000100;
  61602. end;
  61603. function TINT_IEC1.getI2C5BIE : TBits_1; inline;
  61604. begin
  61605. getI2C5BIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61606. end;
  61607. procedure TINT_IEC1.setI2C5SIE; inline;
  61608. begin
  61609. pTDefRegMap(@Self)^.&set := $00000200;
  61610. end;
  61611. procedure TINT_IEC1.clearI2C5SIE; inline;
  61612. begin
  61613. pTDefRegMap(@Self)^.clr := $00000200;
  61614. end;
  61615. procedure TINT_IEC1.setI2C5SIE(thebits : TBits_1); inline;
  61616. begin
  61617. if thebits = 0 then
  61618. pTDefRegMap(@Self)^.clr := $00000200
  61619. else
  61620. pTDefRegMap(@Self)^.&set := $00000200;
  61621. end;
  61622. function TINT_IEC1.getI2C5SIE : TBits_1; inline;
  61623. begin
  61624. getI2C5SIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61625. end;
  61626. procedure TINT_IEC1.setI2C5MIE; inline;
  61627. begin
  61628. pTDefRegMap(@Self)^.&set := $00000400;
  61629. end;
  61630. procedure TINT_IEC1.clearI2C5MIE; inline;
  61631. begin
  61632. pTDefRegMap(@Self)^.clr := $00000400;
  61633. end;
  61634. procedure TINT_IEC1.setI2C5MIE(thebits : TBits_1); inline;
  61635. begin
  61636. if thebits = 0 then
  61637. pTDefRegMap(@Self)^.clr := $00000400
  61638. else
  61639. pTDefRegMap(@Self)^.&set := $00000400;
  61640. end;
  61641. function TINT_IEC1.getI2C5MIE : TBits_1; inline;
  61642. begin
  61643. getI2C5MIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61644. end;
  61645. procedure TINT_IEC1.setI2C2ABIE; inline;
  61646. begin
  61647. pTDefRegMap(@Self)^.&set := $00000020;
  61648. end;
  61649. procedure TINT_IEC1.clearI2C2ABIE; inline;
  61650. begin
  61651. pTDefRegMap(@Self)^.clr := $00000020;
  61652. end;
  61653. procedure TINT_IEC1.setI2C2ABIE(thebits : TBits_1); inline;
  61654. begin
  61655. if thebits = 0 then
  61656. pTDefRegMap(@Self)^.clr := $00000020
  61657. else
  61658. pTDefRegMap(@Self)^.&set := $00000020;
  61659. end;
  61660. function TINT_IEC1.getI2C2ABIE : TBits_1; inline;
  61661. begin
  61662. getI2C2ABIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61663. end;
  61664. procedure TINT_IEC1.setI2C2ASIE; inline;
  61665. begin
  61666. pTDefRegMap(@Self)^.&set := $00000040;
  61667. end;
  61668. procedure TINT_IEC1.clearI2C2ASIE; inline;
  61669. begin
  61670. pTDefRegMap(@Self)^.clr := $00000040;
  61671. end;
  61672. procedure TINT_IEC1.setI2C2ASIE(thebits : TBits_1); inline;
  61673. begin
  61674. if thebits = 0 then
  61675. pTDefRegMap(@Self)^.clr := $00000040
  61676. else
  61677. pTDefRegMap(@Self)^.&set := $00000040;
  61678. end;
  61679. function TINT_IEC1.getI2C2ASIE : TBits_1; inline;
  61680. begin
  61681. getI2C2ASIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61682. end;
  61683. procedure TINT_IEC1.setI2C2AMIE; inline;
  61684. begin
  61685. pTDefRegMap(@Self)^.&set := $00000080;
  61686. end;
  61687. procedure TINT_IEC1.clearI2C2AMIE; inline;
  61688. begin
  61689. pTDefRegMap(@Self)^.clr := $00000080;
  61690. end;
  61691. procedure TINT_IEC1.setI2C2AMIE(thebits : TBits_1); inline;
  61692. begin
  61693. if thebits = 0 then
  61694. pTDefRegMap(@Self)^.clr := $00000080
  61695. else
  61696. pTDefRegMap(@Self)^.&set := $00000080;
  61697. end;
  61698. function TINT_IEC1.getI2C2AMIE : TBits_1; inline;
  61699. begin
  61700. getI2C2AMIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61701. end;
  61702. procedure TINT_IEC1.setI2C3ABIE; inline;
  61703. begin
  61704. pTDefRegMap(@Self)^.&set := $00000100;
  61705. end;
  61706. procedure TINT_IEC1.clearI2C3ABIE; inline;
  61707. begin
  61708. pTDefRegMap(@Self)^.clr := $00000100;
  61709. end;
  61710. procedure TINT_IEC1.setI2C3ABIE(thebits : TBits_1); inline;
  61711. begin
  61712. if thebits = 0 then
  61713. pTDefRegMap(@Self)^.clr := $00000100
  61714. else
  61715. pTDefRegMap(@Self)^.&set := $00000100;
  61716. end;
  61717. function TINT_IEC1.getI2C3ABIE : TBits_1; inline;
  61718. begin
  61719. getI2C3ABIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61720. end;
  61721. procedure TINT_IEC1.setI2C3ASIE; inline;
  61722. begin
  61723. pTDefRegMap(@Self)^.&set := $00000200;
  61724. end;
  61725. procedure TINT_IEC1.clearI2C3ASIE; inline;
  61726. begin
  61727. pTDefRegMap(@Self)^.clr := $00000200;
  61728. end;
  61729. procedure TINT_IEC1.setI2C3ASIE(thebits : TBits_1); inline;
  61730. begin
  61731. if thebits = 0 then
  61732. pTDefRegMap(@Self)^.clr := $00000200
  61733. else
  61734. pTDefRegMap(@Self)^.&set := $00000200;
  61735. end;
  61736. function TINT_IEC1.getI2C3ASIE : TBits_1; inline;
  61737. begin
  61738. getI2C3ASIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61739. end;
  61740. procedure TINT_IEC1.setI2C3AMIE; inline;
  61741. begin
  61742. pTDefRegMap(@Self)^.&set := $00000400;
  61743. end;
  61744. procedure TINT_IEC1.clearI2C3AMIE; inline;
  61745. begin
  61746. pTDefRegMap(@Self)^.clr := $00000400;
  61747. end;
  61748. procedure TINT_IEC1.setI2C3AMIE(thebits : TBits_1); inline;
  61749. begin
  61750. if thebits = 0 then
  61751. pTDefRegMap(@Self)^.clr := $00000400
  61752. else
  61753. pTDefRegMap(@Self)^.&set := $00000400;
  61754. end;
  61755. function TINT_IEC1.getI2C3AMIE : TBits_1; inline;
  61756. begin
  61757. getI2C3AMIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61758. end;
  61759. procedure TINT_IEC1.setw(thebits : TBits_32); inline;
  61760. begin
  61761. pTDefRegMap(@Self)^.val := thebits;
  61762. end;
  61763. function TINT_IEC1.getw : TBits_32; inline;
  61764. begin
  61765. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61766. end;
  61767. procedure TINT_IEC2.setIC4EIE; inline;
  61768. begin
  61769. pTDefRegMap(@Self)^.&set := $00000001;
  61770. end;
  61771. procedure TINT_IEC2.clearIC4EIE; inline;
  61772. begin
  61773. pTDefRegMap(@Self)^.clr := $00000001;
  61774. end;
  61775. procedure TINT_IEC2.setIC4EIE(thebits : TBits_1); inline;
  61776. begin
  61777. if thebits = 0 then
  61778. pTDefRegMap(@Self)^.clr := $00000001
  61779. else
  61780. pTDefRegMap(@Self)^.&set := $00000001;
  61781. end;
  61782. function TINT_IEC2.getIC4EIE : TBits_1; inline;
  61783. begin
  61784. getIC4EIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61785. end;
  61786. procedure TINT_IEC2.setIC5EIE; inline;
  61787. begin
  61788. pTDefRegMap(@Self)^.&set := $00000002;
  61789. end;
  61790. procedure TINT_IEC2.clearIC5EIE; inline;
  61791. begin
  61792. pTDefRegMap(@Self)^.clr := $00000002;
  61793. end;
  61794. procedure TINT_IEC2.setIC5EIE(thebits : TBits_1); inline;
  61795. begin
  61796. if thebits = 0 then
  61797. pTDefRegMap(@Self)^.clr := $00000002
  61798. else
  61799. pTDefRegMap(@Self)^.&set := $00000002;
  61800. end;
  61801. function TINT_IEC2.getIC5EIE : TBits_1; inline;
  61802. begin
  61803. getIC5EIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61804. end;
  61805. procedure TINT_IEC2.setPMPEIE; inline;
  61806. begin
  61807. pTDefRegMap(@Self)^.&set := $00000004;
  61808. end;
  61809. procedure TINT_IEC2.clearPMPEIE; inline;
  61810. begin
  61811. pTDefRegMap(@Self)^.clr := $00000004;
  61812. end;
  61813. procedure TINT_IEC2.setPMPEIE(thebits : TBits_1); inline;
  61814. begin
  61815. if thebits = 0 then
  61816. pTDefRegMap(@Self)^.clr := $00000004
  61817. else
  61818. pTDefRegMap(@Self)^.&set := $00000004;
  61819. end;
  61820. function TINT_IEC2.getPMPEIE : TBits_1; inline;
  61821. begin
  61822. getPMPEIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61823. end;
  61824. procedure TINT_IEC2.setU1BEIE; inline;
  61825. begin
  61826. pTDefRegMap(@Self)^.&set := $00000008;
  61827. end;
  61828. procedure TINT_IEC2.clearU1BEIE; inline;
  61829. begin
  61830. pTDefRegMap(@Self)^.clr := $00000008;
  61831. end;
  61832. procedure TINT_IEC2.setU1BEIE(thebits : TBits_1); inline;
  61833. begin
  61834. if thebits = 0 then
  61835. pTDefRegMap(@Self)^.clr := $00000008
  61836. else
  61837. pTDefRegMap(@Self)^.&set := $00000008;
  61838. end;
  61839. function TINT_IEC2.getU1BEIE : TBits_1; inline;
  61840. begin
  61841. getU1BEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61842. end;
  61843. procedure TINT_IEC2.setU1BRXIE; inline;
  61844. begin
  61845. pTDefRegMap(@Self)^.&set := $00000010;
  61846. end;
  61847. procedure TINT_IEC2.clearU1BRXIE; inline;
  61848. begin
  61849. pTDefRegMap(@Self)^.clr := $00000010;
  61850. end;
  61851. procedure TINT_IEC2.setU1BRXIE(thebits : TBits_1); inline;
  61852. begin
  61853. if thebits = 0 then
  61854. pTDefRegMap(@Self)^.clr := $00000010
  61855. else
  61856. pTDefRegMap(@Self)^.&set := $00000010;
  61857. end;
  61858. function TINT_IEC2.getU1BRXIE : TBits_1; inline;
  61859. begin
  61860. getU1BRXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61861. end;
  61862. procedure TINT_IEC2.setU1BTXIE; inline;
  61863. begin
  61864. pTDefRegMap(@Self)^.&set := $00000020;
  61865. end;
  61866. procedure TINT_IEC2.clearU1BTXIE; inline;
  61867. begin
  61868. pTDefRegMap(@Self)^.clr := $00000020;
  61869. end;
  61870. procedure TINT_IEC2.setU1BTXIE(thebits : TBits_1); inline;
  61871. begin
  61872. if thebits = 0 then
  61873. pTDefRegMap(@Self)^.clr := $00000020
  61874. else
  61875. pTDefRegMap(@Self)^.&set := $00000020;
  61876. end;
  61877. function TINT_IEC2.getU1BTXIE : TBits_1; inline;
  61878. begin
  61879. getU1BTXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61880. end;
  61881. procedure TINT_IEC2.setU2BEIE; inline;
  61882. begin
  61883. pTDefRegMap(@Self)^.&set := $00000040;
  61884. end;
  61885. procedure TINT_IEC2.clearU2BEIE; inline;
  61886. begin
  61887. pTDefRegMap(@Self)^.clr := $00000040;
  61888. end;
  61889. procedure TINT_IEC2.setU2BEIE(thebits : TBits_1); inline;
  61890. begin
  61891. if thebits = 0 then
  61892. pTDefRegMap(@Self)^.clr := $00000040
  61893. else
  61894. pTDefRegMap(@Self)^.&set := $00000040;
  61895. end;
  61896. function TINT_IEC2.getU2BEIE : TBits_1; inline;
  61897. begin
  61898. getU2BEIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61899. end;
  61900. procedure TINT_IEC2.setU2BRXIE; inline;
  61901. begin
  61902. pTDefRegMap(@Self)^.&set := $00000080;
  61903. end;
  61904. procedure TINT_IEC2.clearU2BRXIE; inline;
  61905. begin
  61906. pTDefRegMap(@Self)^.clr := $00000080;
  61907. end;
  61908. procedure TINT_IEC2.setU2BRXIE(thebits : TBits_1); inline;
  61909. begin
  61910. if thebits = 0 then
  61911. pTDefRegMap(@Self)^.clr := $00000080
  61912. else
  61913. pTDefRegMap(@Self)^.&set := $00000080;
  61914. end;
  61915. function TINT_IEC2.getU2BRXIE : TBits_1; inline;
  61916. begin
  61917. getU2BRXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61918. end;
  61919. procedure TINT_IEC2.setU2BTXIE; inline;
  61920. begin
  61921. pTDefRegMap(@Self)^.&set := $00000100;
  61922. end;
  61923. procedure TINT_IEC2.clearU2BTXIE; inline;
  61924. begin
  61925. pTDefRegMap(@Self)^.clr := $00000100;
  61926. end;
  61927. procedure TINT_IEC2.setU2BTXIE(thebits : TBits_1); inline;
  61928. begin
  61929. if thebits = 0 then
  61930. pTDefRegMap(@Self)^.clr := $00000100
  61931. else
  61932. pTDefRegMap(@Self)^.&set := $00000100;
  61933. end;
  61934. function TINT_IEC2.getU2BTXIE : TBits_1; inline;
  61935. begin
  61936. getU2BTXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61937. end;
  61938. procedure TINT_IEC2.setU3BEIE; inline;
  61939. begin
  61940. pTDefRegMap(@Self)^.&set := $00000200;
  61941. end;
  61942. procedure TINT_IEC2.clearU3BEIE; inline;
  61943. begin
  61944. pTDefRegMap(@Self)^.clr := $00000200;
  61945. end;
  61946. procedure TINT_IEC2.setU3BEIE(thebits : TBits_1); inline;
  61947. begin
  61948. if thebits = 0 then
  61949. pTDefRegMap(@Self)^.clr := $00000200
  61950. else
  61951. pTDefRegMap(@Self)^.&set := $00000200;
  61952. end;
  61953. function TINT_IEC2.getU3BEIE : TBits_1; inline;
  61954. begin
  61955. getU3BEIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  61956. end;
  61957. procedure TINT_IEC2.setU3BRXIE; inline;
  61958. begin
  61959. pTDefRegMap(@Self)^.&set := $00000400;
  61960. end;
  61961. procedure TINT_IEC2.clearU3BRXIE; inline;
  61962. begin
  61963. pTDefRegMap(@Self)^.clr := $00000400;
  61964. end;
  61965. procedure TINT_IEC2.setU3BRXIE(thebits : TBits_1); inline;
  61966. begin
  61967. if thebits = 0 then
  61968. pTDefRegMap(@Self)^.clr := $00000400
  61969. else
  61970. pTDefRegMap(@Self)^.&set := $00000400;
  61971. end;
  61972. function TINT_IEC2.getU3BRXIE : TBits_1; inline;
  61973. begin
  61974. getU3BRXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  61975. end;
  61976. procedure TINT_IEC2.setU3BTXIE; inline;
  61977. begin
  61978. pTDefRegMap(@Self)^.&set := $00000800;
  61979. end;
  61980. procedure TINT_IEC2.clearU3BTXIE; inline;
  61981. begin
  61982. pTDefRegMap(@Self)^.clr := $00000800;
  61983. end;
  61984. procedure TINT_IEC2.setU3BTXIE(thebits : TBits_1); inline;
  61985. begin
  61986. if thebits = 0 then
  61987. pTDefRegMap(@Self)^.clr := $00000800
  61988. else
  61989. pTDefRegMap(@Self)^.&set := $00000800;
  61990. end;
  61991. function TINT_IEC2.getU3BTXIE : TBits_1; inline;
  61992. begin
  61993. getU3BTXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  61994. end;
  61995. procedure TINT_IEC2.setU4EIE; inline;
  61996. begin
  61997. pTDefRegMap(@Self)^.&set := $00000008;
  61998. end;
  61999. procedure TINT_IEC2.clearU4EIE; inline;
  62000. begin
  62001. pTDefRegMap(@Self)^.clr := $00000008;
  62002. end;
  62003. procedure TINT_IEC2.setU4EIE(thebits : TBits_1); inline;
  62004. begin
  62005. if thebits = 0 then
  62006. pTDefRegMap(@Self)^.clr := $00000008
  62007. else
  62008. pTDefRegMap(@Self)^.&set := $00000008;
  62009. end;
  62010. function TINT_IEC2.getU4EIE : TBits_1; inline;
  62011. begin
  62012. getU4EIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62013. end;
  62014. procedure TINT_IEC2.setU4RXIE; inline;
  62015. begin
  62016. pTDefRegMap(@Self)^.&set := $00000010;
  62017. end;
  62018. procedure TINT_IEC2.clearU4RXIE; inline;
  62019. begin
  62020. pTDefRegMap(@Self)^.clr := $00000010;
  62021. end;
  62022. procedure TINT_IEC2.setU4RXIE(thebits : TBits_1); inline;
  62023. begin
  62024. if thebits = 0 then
  62025. pTDefRegMap(@Self)^.clr := $00000010
  62026. else
  62027. pTDefRegMap(@Self)^.&set := $00000010;
  62028. end;
  62029. function TINT_IEC2.getU4RXIE : TBits_1; inline;
  62030. begin
  62031. getU4RXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62032. end;
  62033. procedure TINT_IEC2.setU4TXIE; inline;
  62034. begin
  62035. pTDefRegMap(@Self)^.&set := $00000020;
  62036. end;
  62037. procedure TINT_IEC2.clearU4TXIE; inline;
  62038. begin
  62039. pTDefRegMap(@Self)^.clr := $00000020;
  62040. end;
  62041. procedure TINT_IEC2.setU4TXIE(thebits : TBits_1); inline;
  62042. begin
  62043. if thebits = 0 then
  62044. pTDefRegMap(@Self)^.clr := $00000020
  62045. else
  62046. pTDefRegMap(@Self)^.&set := $00000020;
  62047. end;
  62048. function TINT_IEC2.getU4TXIE : TBits_1; inline;
  62049. begin
  62050. getU4TXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62051. end;
  62052. procedure TINT_IEC2.setU6EIE; inline;
  62053. begin
  62054. pTDefRegMap(@Self)^.&set := $00000040;
  62055. end;
  62056. procedure TINT_IEC2.clearU6EIE; inline;
  62057. begin
  62058. pTDefRegMap(@Self)^.clr := $00000040;
  62059. end;
  62060. procedure TINT_IEC2.setU6EIE(thebits : TBits_1); inline;
  62061. begin
  62062. if thebits = 0 then
  62063. pTDefRegMap(@Self)^.clr := $00000040
  62064. else
  62065. pTDefRegMap(@Self)^.&set := $00000040;
  62066. end;
  62067. function TINT_IEC2.getU6EIE : TBits_1; inline;
  62068. begin
  62069. getU6EIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62070. end;
  62071. procedure TINT_IEC2.setU6RXIE; inline;
  62072. begin
  62073. pTDefRegMap(@Self)^.&set := $00000080;
  62074. end;
  62075. procedure TINT_IEC2.clearU6RXIE; inline;
  62076. begin
  62077. pTDefRegMap(@Self)^.clr := $00000080;
  62078. end;
  62079. procedure TINT_IEC2.setU6RXIE(thebits : TBits_1); inline;
  62080. begin
  62081. if thebits = 0 then
  62082. pTDefRegMap(@Self)^.clr := $00000080
  62083. else
  62084. pTDefRegMap(@Self)^.&set := $00000080;
  62085. end;
  62086. function TINT_IEC2.getU6RXIE : TBits_1; inline;
  62087. begin
  62088. getU6RXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62089. end;
  62090. procedure TINT_IEC2.setU6TXIE; inline;
  62091. begin
  62092. pTDefRegMap(@Self)^.&set := $00000100;
  62093. end;
  62094. procedure TINT_IEC2.clearU6TXIE; inline;
  62095. begin
  62096. pTDefRegMap(@Self)^.clr := $00000100;
  62097. end;
  62098. procedure TINT_IEC2.setU6TXIE(thebits : TBits_1); inline;
  62099. begin
  62100. if thebits = 0 then
  62101. pTDefRegMap(@Self)^.clr := $00000100
  62102. else
  62103. pTDefRegMap(@Self)^.&set := $00000100;
  62104. end;
  62105. function TINT_IEC2.getU6TXIE : TBits_1; inline;
  62106. begin
  62107. getU6TXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62108. end;
  62109. procedure TINT_IEC2.setU5EIE; inline;
  62110. begin
  62111. pTDefRegMap(@Self)^.&set := $00000200;
  62112. end;
  62113. procedure TINT_IEC2.clearU5EIE; inline;
  62114. begin
  62115. pTDefRegMap(@Self)^.clr := $00000200;
  62116. end;
  62117. procedure TINT_IEC2.setU5EIE(thebits : TBits_1); inline;
  62118. begin
  62119. if thebits = 0 then
  62120. pTDefRegMap(@Self)^.clr := $00000200
  62121. else
  62122. pTDefRegMap(@Self)^.&set := $00000200;
  62123. end;
  62124. function TINT_IEC2.getU5EIE : TBits_1; inline;
  62125. begin
  62126. getU5EIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  62127. end;
  62128. procedure TINT_IEC2.setU5RXIE; inline;
  62129. begin
  62130. pTDefRegMap(@Self)^.&set := $00000400;
  62131. end;
  62132. procedure TINT_IEC2.clearU5RXIE; inline;
  62133. begin
  62134. pTDefRegMap(@Self)^.clr := $00000400;
  62135. end;
  62136. procedure TINT_IEC2.setU5RXIE(thebits : TBits_1); inline;
  62137. begin
  62138. if thebits = 0 then
  62139. pTDefRegMap(@Self)^.clr := $00000400
  62140. else
  62141. pTDefRegMap(@Self)^.&set := $00000400;
  62142. end;
  62143. function TINT_IEC2.getU5RXIE : TBits_1; inline;
  62144. begin
  62145. getU5RXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  62146. end;
  62147. procedure TINT_IEC2.setU5TXIE; inline;
  62148. begin
  62149. pTDefRegMap(@Self)^.&set := $00000800;
  62150. end;
  62151. procedure TINT_IEC2.clearU5TXIE; inline;
  62152. begin
  62153. pTDefRegMap(@Self)^.clr := $00000800;
  62154. end;
  62155. procedure TINT_IEC2.setU5TXIE(thebits : TBits_1); inline;
  62156. begin
  62157. if thebits = 0 then
  62158. pTDefRegMap(@Self)^.clr := $00000800
  62159. else
  62160. pTDefRegMap(@Self)^.&set := $00000800;
  62161. end;
  62162. function TINT_IEC2.getU5TXIE : TBits_1; inline;
  62163. begin
  62164. getU5TXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  62165. end;
  62166. procedure TINT_IEC2.setw(thebits : TBits_32); inline;
  62167. begin
  62168. pTDefRegMap(@Self)^.val := thebits;
  62169. end;
  62170. function TINT_IEC2.getw : TBits_32; inline;
  62171. begin
  62172. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62173. end;
  62174. procedure TINT_IPC0.setCTIS(thebits : TBits_2); inline;
  62175. begin
  62176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62177. end;
  62178. function TINT_IPC0.getCTIS : TBits_2; inline;
  62179. begin
  62180. getCTIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62181. end;
  62182. procedure TINT_IPC0.setCTIP(thebits : TBits_3); inline;
  62183. begin
  62184. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62185. end;
  62186. function TINT_IPC0.getCTIP : TBits_3; inline;
  62187. begin
  62188. getCTIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62189. end;
  62190. procedure TINT_IPC0.setCS0IS(thebits : TBits_2); inline;
  62191. begin
  62192. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62193. end;
  62194. function TINT_IPC0.getCS0IS : TBits_2; inline;
  62195. begin
  62196. getCS0IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62197. end;
  62198. procedure TINT_IPC0.setCS0IP(thebits : TBits_3); inline;
  62199. begin
  62200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62201. end;
  62202. function TINT_IPC0.getCS0IP : TBits_3; inline;
  62203. begin
  62204. getCS0IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62205. end;
  62206. procedure TINT_IPC0.setCS1IS(thebits : TBits_2); inline;
  62207. begin
  62208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62209. end;
  62210. function TINT_IPC0.getCS1IS : TBits_2; inline;
  62211. begin
  62212. getCS1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62213. end;
  62214. procedure TINT_IPC0.setCS1IP(thebits : TBits_3); inline;
  62215. begin
  62216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62217. end;
  62218. function TINT_IPC0.getCS1IP : TBits_3; inline;
  62219. begin
  62220. getCS1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62221. end;
  62222. procedure TINT_IPC0.setINT0IS(thebits : TBits_2); inline;
  62223. begin
  62224. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62225. end;
  62226. function TINT_IPC0.getINT0IS : TBits_2; inline;
  62227. begin
  62228. getINT0IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62229. end;
  62230. procedure TINT_IPC0.setINT0IP(thebits : TBits_3); inline;
  62231. begin
  62232. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62233. end;
  62234. function TINT_IPC0.getINT0IP : TBits_3; inline;
  62235. begin
  62236. getINT0IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62237. end;
  62238. procedure TINT_IPC0.setw(thebits : TBits_32); inline;
  62239. begin
  62240. pTDefRegMap(@Self)^.val := thebits;
  62241. end;
  62242. function TINT_IPC0.getw : TBits_32; inline;
  62243. begin
  62244. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62245. end;
  62246. procedure TINT_IPC1.setT1IS(thebits : TBits_2); inline;
  62247. begin
  62248. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62249. end;
  62250. function TINT_IPC1.getT1IS : TBits_2; inline;
  62251. begin
  62252. getT1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62253. end;
  62254. procedure TINT_IPC1.setT1IP(thebits : TBits_3); inline;
  62255. begin
  62256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62257. end;
  62258. function TINT_IPC1.getT1IP : TBits_3; inline;
  62259. begin
  62260. getT1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62261. end;
  62262. procedure TINT_IPC1.setIC1IS(thebits : TBits_2); inline;
  62263. begin
  62264. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62265. end;
  62266. function TINT_IPC1.getIC1IS : TBits_2; inline;
  62267. begin
  62268. getIC1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62269. end;
  62270. procedure TINT_IPC1.setIC1IP(thebits : TBits_3); inline;
  62271. begin
  62272. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62273. end;
  62274. function TINT_IPC1.getIC1IP : TBits_3; inline;
  62275. begin
  62276. getIC1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62277. end;
  62278. procedure TINT_IPC1.setOC1IS(thebits : TBits_2); inline;
  62279. begin
  62280. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62281. end;
  62282. function TINT_IPC1.getOC1IS : TBits_2; inline;
  62283. begin
  62284. getOC1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62285. end;
  62286. procedure TINT_IPC1.setOC1IP(thebits : TBits_3); inline;
  62287. begin
  62288. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62289. end;
  62290. function TINT_IPC1.getOC1IP : TBits_3; inline;
  62291. begin
  62292. getOC1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62293. end;
  62294. procedure TINT_IPC1.setINT1IS(thebits : TBits_2); inline;
  62295. begin
  62296. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62297. end;
  62298. function TINT_IPC1.getINT1IS : TBits_2; inline;
  62299. begin
  62300. getINT1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62301. end;
  62302. procedure TINT_IPC1.setINT1IP(thebits : TBits_3); inline;
  62303. begin
  62304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62305. end;
  62306. function TINT_IPC1.getINT1IP : TBits_3; inline;
  62307. begin
  62308. getINT1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62309. end;
  62310. procedure TINT_IPC1.setw(thebits : TBits_32); inline;
  62311. begin
  62312. pTDefRegMap(@Self)^.val := thebits;
  62313. end;
  62314. function TINT_IPC1.getw : TBits_32; inline;
  62315. begin
  62316. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62317. end;
  62318. procedure TINT_IPC2.setT2IS(thebits : TBits_2); inline;
  62319. begin
  62320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62321. end;
  62322. function TINT_IPC2.getT2IS : TBits_2; inline;
  62323. begin
  62324. getT2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62325. end;
  62326. procedure TINT_IPC2.setT2IP(thebits : TBits_3); inline;
  62327. begin
  62328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62329. end;
  62330. function TINT_IPC2.getT2IP : TBits_3; inline;
  62331. begin
  62332. getT2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62333. end;
  62334. procedure TINT_IPC2.setIC2IS(thebits : TBits_2); inline;
  62335. begin
  62336. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62337. end;
  62338. function TINT_IPC2.getIC2IS : TBits_2; inline;
  62339. begin
  62340. getIC2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62341. end;
  62342. procedure TINT_IPC2.setIC2IP(thebits : TBits_3); inline;
  62343. begin
  62344. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62345. end;
  62346. function TINT_IPC2.getIC2IP : TBits_3; inline;
  62347. begin
  62348. getIC2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62349. end;
  62350. procedure TINT_IPC2.setOC2IS(thebits : TBits_2); inline;
  62351. begin
  62352. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62353. end;
  62354. function TINT_IPC2.getOC2IS : TBits_2; inline;
  62355. begin
  62356. getOC2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62357. end;
  62358. procedure TINT_IPC2.setOC2IP(thebits : TBits_3); inline;
  62359. begin
  62360. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62361. end;
  62362. function TINT_IPC2.getOC2IP : TBits_3; inline;
  62363. begin
  62364. getOC2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62365. end;
  62366. procedure TINT_IPC2.setINT2IS(thebits : TBits_2); inline;
  62367. begin
  62368. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62369. end;
  62370. function TINT_IPC2.getINT2IS : TBits_2; inline;
  62371. begin
  62372. getINT2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62373. end;
  62374. procedure TINT_IPC2.setINT2IP(thebits : TBits_3); inline;
  62375. begin
  62376. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62377. end;
  62378. function TINT_IPC2.getINT2IP : TBits_3; inline;
  62379. begin
  62380. getINT2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62381. end;
  62382. procedure TINT_IPC2.setw(thebits : TBits_32); inline;
  62383. begin
  62384. pTDefRegMap(@Self)^.val := thebits;
  62385. end;
  62386. function TINT_IPC2.getw : TBits_32; inline;
  62387. begin
  62388. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62389. end;
  62390. procedure TINT_IPC3.setT3IS(thebits : TBits_2); inline;
  62391. begin
  62392. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62393. end;
  62394. function TINT_IPC3.getT3IS : TBits_2; inline;
  62395. begin
  62396. getT3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62397. end;
  62398. procedure TINT_IPC3.setT3IP(thebits : TBits_3); inline;
  62399. begin
  62400. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62401. end;
  62402. function TINT_IPC3.getT3IP : TBits_3; inline;
  62403. begin
  62404. getT3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62405. end;
  62406. procedure TINT_IPC3.setIC3IS(thebits : TBits_2); inline;
  62407. begin
  62408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62409. end;
  62410. function TINT_IPC3.getIC3IS : TBits_2; inline;
  62411. begin
  62412. getIC3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62413. end;
  62414. procedure TINT_IPC3.setIC3IP(thebits : TBits_3); inline;
  62415. begin
  62416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62417. end;
  62418. function TINT_IPC3.getIC3IP : TBits_3; inline;
  62419. begin
  62420. getIC3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62421. end;
  62422. procedure TINT_IPC3.setOC3IS(thebits : TBits_2); inline;
  62423. begin
  62424. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62425. end;
  62426. function TINT_IPC3.getOC3IS : TBits_2; inline;
  62427. begin
  62428. getOC3IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62429. end;
  62430. procedure TINT_IPC3.setOC3IP(thebits : TBits_3); inline;
  62431. begin
  62432. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62433. end;
  62434. function TINT_IPC3.getOC3IP : TBits_3; inline;
  62435. begin
  62436. getOC3IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62437. end;
  62438. procedure TINT_IPC3.setINT3IS(thebits : TBits_2); inline;
  62439. begin
  62440. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62441. end;
  62442. function TINT_IPC3.getINT3IS : TBits_2; inline;
  62443. begin
  62444. getINT3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62445. end;
  62446. procedure TINT_IPC3.setINT3IP(thebits : TBits_3); inline;
  62447. begin
  62448. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62449. end;
  62450. function TINT_IPC3.getINT3IP : TBits_3; inline;
  62451. begin
  62452. getINT3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62453. end;
  62454. procedure TINT_IPC3.setw(thebits : TBits_32); inline;
  62455. begin
  62456. pTDefRegMap(@Self)^.val := thebits;
  62457. end;
  62458. function TINT_IPC3.getw : TBits_32; inline;
  62459. begin
  62460. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62461. end;
  62462. procedure TINT_IPC4.setT4IS(thebits : TBits_2); inline;
  62463. begin
  62464. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62465. end;
  62466. function TINT_IPC4.getT4IS : TBits_2; inline;
  62467. begin
  62468. getT4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62469. end;
  62470. procedure TINT_IPC4.setT4IP(thebits : TBits_3); inline;
  62471. begin
  62472. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62473. end;
  62474. function TINT_IPC4.getT4IP : TBits_3; inline;
  62475. begin
  62476. getT4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62477. end;
  62478. procedure TINT_IPC4.setIC4IS(thebits : TBits_2); inline;
  62479. begin
  62480. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62481. end;
  62482. function TINT_IPC4.getIC4IS : TBits_2; inline;
  62483. begin
  62484. getIC4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62485. end;
  62486. procedure TINT_IPC4.setIC4IP(thebits : TBits_3); inline;
  62487. begin
  62488. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62489. end;
  62490. function TINT_IPC4.getIC4IP : TBits_3; inline;
  62491. begin
  62492. getIC4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62493. end;
  62494. procedure TINT_IPC4.setOC4IS(thebits : TBits_2); inline;
  62495. begin
  62496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62497. end;
  62498. function TINT_IPC4.getOC4IS : TBits_2; inline;
  62499. begin
  62500. getOC4IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62501. end;
  62502. procedure TINT_IPC4.setOC4IP(thebits : TBits_3); inline;
  62503. begin
  62504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62505. end;
  62506. function TINT_IPC4.getOC4IP : TBits_3; inline;
  62507. begin
  62508. getOC4IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62509. end;
  62510. procedure TINT_IPC4.setINT4IS(thebits : TBits_2); inline;
  62511. begin
  62512. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62513. end;
  62514. function TINT_IPC4.getINT4IS : TBits_2; inline;
  62515. begin
  62516. getINT4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62517. end;
  62518. procedure TINT_IPC4.setINT4IP(thebits : TBits_3); inline;
  62519. begin
  62520. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62521. end;
  62522. function TINT_IPC4.getINT4IP : TBits_3; inline;
  62523. begin
  62524. getINT4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62525. end;
  62526. procedure TINT_IPC4.setw(thebits : TBits_32); inline;
  62527. begin
  62528. pTDefRegMap(@Self)^.val := thebits;
  62529. end;
  62530. function TINT_IPC4.getw : TBits_32; inline;
  62531. begin
  62532. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62533. end;
  62534. procedure TINT_IPC5.setT5IS(thebits : TBits_2); inline;
  62535. begin
  62536. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62537. end;
  62538. function TINT_IPC5.getT5IS : TBits_2; inline;
  62539. begin
  62540. getT5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62541. end;
  62542. procedure TINT_IPC5.setT5IP(thebits : TBits_3); inline;
  62543. begin
  62544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62545. end;
  62546. function TINT_IPC5.getT5IP : TBits_3; inline;
  62547. begin
  62548. getT5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62549. end;
  62550. procedure TINT_IPC5.setIC5IS(thebits : TBits_2); inline;
  62551. begin
  62552. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62553. end;
  62554. function TINT_IPC5.getIC5IS : TBits_2; inline;
  62555. begin
  62556. getIC5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62557. end;
  62558. procedure TINT_IPC5.setIC5IP(thebits : TBits_3); inline;
  62559. begin
  62560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62561. end;
  62562. function TINT_IPC5.getIC5IP : TBits_3; inline;
  62563. begin
  62564. getIC5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62565. end;
  62566. procedure TINT_IPC5.setOC5IS(thebits : TBits_2); inline;
  62567. begin
  62568. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62569. end;
  62570. function TINT_IPC5.getOC5IS : TBits_2; inline;
  62571. begin
  62572. getOC5IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62573. end;
  62574. procedure TINT_IPC5.setOC5IP(thebits : TBits_3); inline;
  62575. begin
  62576. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62577. end;
  62578. function TINT_IPC5.getOC5IP : TBits_3; inline;
  62579. begin
  62580. getOC5IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62581. end;
  62582. procedure TINT_IPC5.setSPI1IS(thebits : TBits_2); inline;
  62583. begin
  62584. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62585. end;
  62586. function TINT_IPC5.getSPI1IS : TBits_2; inline;
  62587. begin
  62588. getSPI1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62589. end;
  62590. procedure TINT_IPC5.setSPI1IP(thebits : TBits_3); inline;
  62591. begin
  62592. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62593. end;
  62594. function TINT_IPC5.getSPI1IP : TBits_3; inline;
  62595. begin
  62596. getSPI1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62597. end;
  62598. procedure TINT_IPC5.setw(thebits : TBits_32); inline;
  62599. begin
  62600. pTDefRegMap(@Self)^.val := thebits;
  62601. end;
  62602. function TINT_IPC5.getw : TBits_32; inline;
  62603. begin
  62604. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62605. end;
  62606. procedure TINT_IPC6.setU1IS(thebits : TBits_2); inline;
  62607. begin
  62608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62609. end;
  62610. function TINT_IPC6.getU1IS : TBits_2; inline;
  62611. begin
  62612. getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62613. end;
  62614. procedure TINT_IPC6.setU1IP(thebits : TBits_3); inline;
  62615. begin
  62616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62617. end;
  62618. function TINT_IPC6.getU1IP : TBits_3; inline;
  62619. begin
  62620. getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62621. end;
  62622. procedure TINT_IPC6.setI2C1IS(thebits : TBits_2); inline;
  62623. begin
  62624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62625. end;
  62626. function TINT_IPC6.getI2C1IS : TBits_2; inline;
  62627. begin
  62628. getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62629. end;
  62630. procedure TINT_IPC6.setI2C1IP(thebits : TBits_3); inline;
  62631. begin
  62632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62633. end;
  62634. function TINT_IPC6.getI2C1IP : TBits_3; inline;
  62635. begin
  62636. getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62637. end;
  62638. procedure TINT_IPC6.setCNIS(thebits : TBits_2); inline;
  62639. begin
  62640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62641. end;
  62642. function TINT_IPC6.getCNIS : TBits_2; inline;
  62643. begin
  62644. getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62645. end;
  62646. procedure TINT_IPC6.setCNIP(thebits : TBits_3); inline;
  62647. begin
  62648. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62649. end;
  62650. function TINT_IPC6.getCNIP : TBits_3; inline;
  62651. begin
  62652. getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62653. end;
  62654. procedure TINT_IPC6.setAD1IS(thebits : TBits_2); inline;
  62655. begin
  62656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62657. end;
  62658. function TINT_IPC6.getAD1IS : TBits_2; inline;
  62659. begin
  62660. getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62661. end;
  62662. procedure TINT_IPC6.setAD1IP(thebits : TBits_3); inline;
  62663. begin
  62664. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62665. end;
  62666. function TINT_IPC6.getAD1IP : TBits_3; inline;
  62667. begin
  62668. getAD1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62669. end;
  62670. procedure TINT_IPC6.setU1AIS(thebits : TBits_2); inline;
  62671. begin
  62672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62673. end;
  62674. function TINT_IPC6.getU1AIS : TBits_2; inline;
  62675. begin
  62676. getU1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62677. end;
  62678. procedure TINT_IPC6.setU1AIP(thebits : TBits_3); inline;
  62679. begin
  62680. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62681. end;
  62682. function TINT_IPC6.getU1AIP : TBits_3; inline;
  62683. begin
  62684. getU1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62685. end;
  62686. procedure TINT_IPC6.setSPI3IS(thebits : TBits_2); inline;
  62687. begin
  62688. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62689. end;
  62690. function TINT_IPC6.getSPI3IS : TBits_2; inline;
  62691. begin
  62692. getSPI3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62693. end;
  62694. procedure TINT_IPC6.setSPI3IP(thebits : TBits_3); inline;
  62695. begin
  62696. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62697. end;
  62698. function TINT_IPC6.getSPI3IP : TBits_3; inline;
  62699. begin
  62700. getSPI3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62701. end;
  62702. procedure TINT_IPC6.setSPI1AIS(thebits : TBits_2); inline;
  62703. begin
  62704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62705. end;
  62706. function TINT_IPC6.getSPI1AIS : TBits_2; inline;
  62707. begin
  62708. getSPI1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62709. end;
  62710. procedure TINT_IPC6.setSPI1AIP(thebits : TBits_3); inline;
  62711. begin
  62712. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62713. end;
  62714. function TINT_IPC6.getSPI1AIP : TBits_3; inline;
  62715. begin
  62716. getSPI1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62717. end;
  62718. procedure TINT_IPC6.setI2C3IS(thebits : TBits_2); inline;
  62719. begin
  62720. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62721. end;
  62722. function TINT_IPC6.getI2C3IS : TBits_2; inline;
  62723. begin
  62724. getI2C3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62725. end;
  62726. procedure TINT_IPC6.setI2C3IP(thebits : TBits_3); inline;
  62727. begin
  62728. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62729. end;
  62730. function TINT_IPC6.getI2C3IP : TBits_3; inline;
  62731. begin
  62732. getI2C3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62733. end;
  62734. procedure TINT_IPC6.setI2C1AIS(thebits : TBits_2); inline;
  62735. begin
  62736. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62737. end;
  62738. function TINT_IPC6.getI2C1AIS : TBits_2; inline;
  62739. begin
  62740. getI2C1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62741. end;
  62742. procedure TINT_IPC6.setI2C1AIP(thebits : TBits_3); inline;
  62743. begin
  62744. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62745. end;
  62746. function TINT_IPC6.getI2C1AIP : TBits_3; inline;
  62747. begin
  62748. getI2C1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62749. end;
  62750. procedure TINT_IPC6.setw(thebits : TBits_32); inline;
  62751. begin
  62752. pTDefRegMap(@Self)^.val := thebits;
  62753. end;
  62754. function TINT_IPC6.getw : TBits_32; inline;
  62755. begin
  62756. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62757. end;
  62758. procedure TINT_IPC7.setPMPIS(thebits : TBits_2); inline;
  62759. begin
  62760. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62761. end;
  62762. function TINT_IPC7.getPMPIS : TBits_2; inline;
  62763. begin
  62764. getPMPIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62765. end;
  62766. procedure TINT_IPC7.setPMPIP(thebits : TBits_3); inline;
  62767. begin
  62768. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62769. end;
  62770. function TINT_IPC7.getPMPIP : TBits_3; inline;
  62771. begin
  62772. getPMPIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62773. end;
  62774. procedure TINT_IPC7.setCMP1IS(thebits : TBits_2); inline;
  62775. begin
  62776. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62777. end;
  62778. function TINT_IPC7.getCMP1IS : TBits_2; inline;
  62779. begin
  62780. getCMP1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62781. end;
  62782. procedure TINT_IPC7.setCMP1IP(thebits : TBits_3); inline;
  62783. begin
  62784. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62785. end;
  62786. function TINT_IPC7.getCMP1IP : TBits_3; inline;
  62787. begin
  62788. getCMP1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62789. end;
  62790. procedure TINT_IPC7.setCMP2IS(thebits : TBits_2); inline;
  62791. begin
  62792. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62793. end;
  62794. function TINT_IPC7.getCMP2IS : TBits_2; inline;
  62795. begin
  62796. getCMP2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62797. end;
  62798. procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
  62799. begin
  62800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62801. end;
  62802. function TINT_IPC7.getCMP2IP : TBits_3; inline;
  62803. begin
  62804. getCMP2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62805. end;
  62806. procedure TINT_IPC7.setU3IS(thebits : TBits_2); inline;
  62807. begin
  62808. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62809. end;
  62810. function TINT_IPC7.getU3IS : TBits_2; inline;
  62811. begin
  62812. getU3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62813. end;
  62814. procedure TINT_IPC7.setU3IP(thebits : TBits_3); inline;
  62815. begin
  62816. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62817. end;
  62818. function TINT_IPC7.getU3IP : TBits_3; inline;
  62819. begin
  62820. getU3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62821. end;
  62822. procedure TINT_IPC7.setU2AIS(thebits : TBits_2); inline;
  62823. begin
  62824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62825. end;
  62826. function TINT_IPC7.getU2AIS : TBits_2; inline;
  62827. begin
  62828. getU2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62829. end;
  62830. procedure TINT_IPC7.setU2AIP(thebits : TBits_3); inline;
  62831. begin
  62832. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62833. end;
  62834. function TINT_IPC7.getU2AIP : TBits_3; inline;
  62835. begin
  62836. getU2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62837. end;
  62838. procedure TINT_IPC7.setSPI2IS(thebits : TBits_2); inline;
  62839. begin
  62840. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62841. end;
  62842. function TINT_IPC7.getSPI2IS : TBits_2; inline;
  62843. begin
  62844. getSPI2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62845. end;
  62846. procedure TINT_IPC7.setSPI2IP(thebits : TBits_3); inline;
  62847. begin
  62848. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62849. end;
  62850. function TINT_IPC7.getSPI2IP : TBits_3; inline;
  62851. begin
  62852. getSPI2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62853. end;
  62854. procedure TINT_IPC7.setSPI2AIS(thebits : TBits_2); inline;
  62855. begin
  62856. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62857. end;
  62858. function TINT_IPC7.getSPI2AIS : TBits_2; inline;
  62859. begin
  62860. getSPI2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62861. end;
  62862. procedure TINT_IPC7.setSPI2AIP(thebits : TBits_3); inline;
  62863. begin
  62864. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62865. end;
  62866. function TINT_IPC7.getSPI2AIP : TBits_3; inline;
  62867. begin
  62868. getSPI2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62869. end;
  62870. procedure TINT_IPC7.setI2C4IS(thebits : TBits_2); inline;
  62871. begin
  62872. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62873. end;
  62874. function TINT_IPC7.getI2C4IS : TBits_2; inline;
  62875. begin
  62876. getI2C4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62877. end;
  62878. procedure TINT_IPC7.setI2C4IP(thebits : TBits_3); inline;
  62879. begin
  62880. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62881. end;
  62882. function TINT_IPC7.getI2C4IP : TBits_3; inline;
  62883. begin
  62884. getI2C4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62885. end;
  62886. procedure TINT_IPC7.setI2C2AIS(thebits : TBits_2); inline;
  62887. begin
  62888. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62889. end;
  62890. function TINT_IPC7.getI2C2AIS : TBits_2; inline;
  62891. begin
  62892. getI2C2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62893. end;
  62894. procedure TINT_IPC7.setI2C2AIP(thebits : TBits_3); inline;
  62895. begin
  62896. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62897. end;
  62898. function TINT_IPC7.getI2C2AIP : TBits_3; inline;
  62899. begin
  62900. getI2C2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62901. end;
  62902. procedure TINT_IPC7.setw(thebits : TBits_32); inline;
  62903. begin
  62904. pTDefRegMap(@Self)^.val := thebits;
  62905. end;
  62906. function TINT_IPC7.getw : TBits_32; inline;
  62907. begin
  62908. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62909. end;
  62910. procedure TINT_IPC8.setU2IS(thebits : TBits_2); inline;
  62911. begin
  62912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62913. end;
  62914. function TINT_IPC8.getU2IS : TBits_2; inline;
  62915. begin
  62916. getU2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62917. end;
  62918. procedure TINT_IPC8.setU2IP(thebits : TBits_3); inline;
  62919. begin
  62920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62921. end;
  62922. function TINT_IPC8.getU2IP : TBits_3; inline;
  62923. begin
  62924. getU2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62925. end;
  62926. procedure TINT_IPC8.setI2C2IS(thebits : TBits_2); inline;
  62927. begin
  62928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  62929. end;
  62930. function TINT_IPC8.getI2C2IS : TBits_2; inline;
  62931. begin
  62932. getI2C2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  62933. end;
  62934. procedure TINT_IPC8.setI2C2IP(thebits : TBits_3); inline;
  62935. begin
  62936. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  62937. end;
  62938. function TINT_IPC8.getI2C2IP : TBits_3; inline;
  62939. begin
  62940. getI2C2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  62941. end;
  62942. procedure TINT_IPC8.setFSCMIS(thebits : TBits_2); inline;
  62943. begin
  62944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  62945. end;
  62946. function TINT_IPC8.getFSCMIS : TBits_2; inline;
  62947. begin
  62948. getFSCMIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  62949. end;
  62950. procedure TINT_IPC8.setFSCMIP(thebits : TBits_3); inline;
  62951. begin
  62952. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  62953. end;
  62954. function TINT_IPC8.getFSCMIP : TBits_3; inline;
  62955. begin
  62956. getFSCMIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  62957. end;
  62958. procedure TINT_IPC8.setRTCCIS(thebits : TBits_2); inline;
  62959. begin
  62960. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  62961. end;
  62962. function TINT_IPC8.getRTCCIS : TBits_2; inline;
  62963. begin
  62964. getRTCCIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  62965. end;
  62966. procedure TINT_IPC8.setRTCCIP(thebits : TBits_3); inline;
  62967. begin
  62968. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  62969. end;
  62970. function TINT_IPC8.getRTCCIP : TBits_3; inline;
  62971. begin
  62972. getRTCCIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  62973. end;
  62974. procedure TINT_IPC8.setU3AIS(thebits : TBits_2); inline;
  62975. begin
  62976. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62977. end;
  62978. function TINT_IPC8.getU3AIS : TBits_2; inline;
  62979. begin
  62980. getU3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62981. end;
  62982. procedure TINT_IPC8.setU3AIP(thebits : TBits_3); inline;
  62983. begin
  62984. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  62985. end;
  62986. function TINT_IPC8.getU3AIP : TBits_3; inline;
  62987. begin
  62988. getU3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  62989. end;
  62990. procedure TINT_IPC8.setSPI4IS(thebits : TBits_2); inline;
  62991. begin
  62992. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62993. end;
  62994. function TINT_IPC8.getSPI4IS : TBits_2; inline;
  62995. begin
  62996. getSPI4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62997. end;
  62998. procedure TINT_IPC8.setSPI4IP(thebits : TBits_3); inline;
  62999. begin
  63000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63001. end;
  63002. function TINT_IPC8.getSPI4IP : TBits_3; inline;
  63003. begin
  63004. getSPI4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63005. end;
  63006. procedure TINT_IPC8.setSPI3AIS(thebits : TBits_2); inline;
  63007. begin
  63008. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63009. end;
  63010. function TINT_IPC8.getSPI3AIS : TBits_2; inline;
  63011. begin
  63012. getSPI3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63013. end;
  63014. procedure TINT_IPC8.setSPI3AIP(thebits : TBits_3); inline;
  63015. begin
  63016. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63017. end;
  63018. function TINT_IPC8.getSPI3AIP : TBits_3; inline;
  63019. begin
  63020. getSPI3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63021. end;
  63022. procedure TINT_IPC8.setI2C5IS(thebits : TBits_2); inline;
  63023. begin
  63024. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63025. end;
  63026. function TINT_IPC8.getI2C5IS : TBits_2; inline;
  63027. begin
  63028. getI2C5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63029. end;
  63030. procedure TINT_IPC8.setI2C5IP(thebits : TBits_3); inline;
  63031. begin
  63032. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63033. end;
  63034. function TINT_IPC8.getI2C5IP : TBits_3; inline;
  63035. begin
  63036. getI2C5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63037. end;
  63038. procedure TINT_IPC8.setI2C3AIS(thebits : TBits_2); inline;
  63039. begin
  63040. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63041. end;
  63042. function TINT_IPC8.getI2C3AIS : TBits_2; inline;
  63043. begin
  63044. getI2C3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63045. end;
  63046. procedure TINT_IPC8.setI2C3AIP(thebits : TBits_3); inline;
  63047. begin
  63048. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63049. end;
  63050. function TINT_IPC8.getI2C3AIP : TBits_3; inline;
  63051. begin
  63052. getI2C3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63053. end;
  63054. procedure TINT_IPC8.setw(thebits : TBits_32); inline;
  63055. begin
  63056. pTDefRegMap(@Self)^.val := thebits;
  63057. end;
  63058. function TINT_IPC8.getw : TBits_32; inline;
  63059. begin
  63060. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63061. end;
  63062. procedure TINT_IPC9.setDMA0IS(thebits : TBits_2); inline;
  63063. begin
  63064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63065. end;
  63066. function TINT_IPC9.getDMA0IS : TBits_2; inline;
  63067. begin
  63068. getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63069. end;
  63070. procedure TINT_IPC9.setDMA0IP(thebits : TBits_3); inline;
  63071. begin
  63072. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63073. end;
  63074. function TINT_IPC9.getDMA0IP : TBits_3; inline;
  63075. begin
  63076. getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63077. end;
  63078. procedure TINT_IPC9.setDMA1IS(thebits : TBits_2); inline;
  63079. begin
  63080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  63081. end;
  63082. function TINT_IPC9.getDMA1IS : TBits_2; inline;
  63083. begin
  63084. getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  63085. end;
  63086. procedure TINT_IPC9.setDMA1IP(thebits : TBits_3); inline;
  63087. begin
  63088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  63089. end;
  63090. function TINT_IPC9.getDMA1IP : TBits_3; inline;
  63091. begin
  63092. getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  63093. end;
  63094. procedure TINT_IPC9.setDMA2IS(thebits : TBits_2); inline;
  63095. begin
  63096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  63097. end;
  63098. function TINT_IPC9.getDMA2IS : TBits_2; inline;
  63099. begin
  63100. getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  63101. end;
  63102. procedure TINT_IPC9.setDMA2IP(thebits : TBits_3); inline;
  63103. begin
  63104. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  63105. end;
  63106. function TINT_IPC9.getDMA2IP : TBits_3; inline;
  63107. begin
  63108. getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  63109. end;
  63110. procedure TINT_IPC9.setDMA3IS(thebits : TBits_2); inline;
  63111. begin
  63112. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  63113. end;
  63114. function TINT_IPC9.getDMA3IS : TBits_2; inline;
  63115. begin
  63116. getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  63117. end;
  63118. procedure TINT_IPC9.setDMA3IP(thebits : TBits_3); inline;
  63119. begin
  63120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  63121. end;
  63122. function TINT_IPC9.getDMA3IP : TBits_3; inline;
  63123. begin
  63124. getDMA3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  63125. end;
  63126. procedure TINT_IPC9.setw(thebits : TBits_32); inline;
  63127. begin
  63128. pTDefRegMap(@Self)^.val := thebits;
  63129. end;
  63130. function TINT_IPC9.getw : TBits_32; inline;
  63131. begin
  63132. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63133. end;
  63134. procedure TINT_IPC10.setDMA4IS(thebits : TBits_2); inline;
  63135. begin
  63136. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63137. end;
  63138. function TINT_IPC10.getDMA4IS : TBits_2; inline;
  63139. begin
  63140. getDMA4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63141. end;
  63142. procedure TINT_IPC10.setDMA4IP(thebits : TBits_3); inline;
  63143. begin
  63144. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63145. end;
  63146. function TINT_IPC10.getDMA4IP : TBits_3; inline;
  63147. begin
  63148. getDMA4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63149. end;
  63150. procedure TINT_IPC10.setDMA5IS(thebits : TBits_2); inline;
  63151. begin
  63152. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  63153. end;
  63154. function TINT_IPC10.getDMA5IS : TBits_2; inline;
  63155. begin
  63156. getDMA5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  63157. end;
  63158. procedure TINT_IPC10.setDMA5IP(thebits : TBits_3); inline;
  63159. begin
  63160. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  63161. end;
  63162. function TINT_IPC10.getDMA5IP : TBits_3; inline;
  63163. begin
  63164. getDMA5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  63165. end;
  63166. procedure TINT_IPC10.setDMA6IS(thebits : TBits_2); inline;
  63167. begin
  63168. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  63169. end;
  63170. function TINT_IPC10.getDMA6IS : TBits_2; inline;
  63171. begin
  63172. getDMA6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  63173. end;
  63174. procedure TINT_IPC10.setDMA6IP(thebits : TBits_3); inline;
  63175. begin
  63176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  63177. end;
  63178. function TINT_IPC10.getDMA6IP : TBits_3; inline;
  63179. begin
  63180. getDMA6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  63181. end;
  63182. procedure TINT_IPC10.setDMA7IS(thebits : TBits_2); inline;
  63183. begin
  63184. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  63185. end;
  63186. function TINT_IPC10.getDMA7IS : TBits_2; inline;
  63187. begin
  63188. getDMA7IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  63189. end;
  63190. procedure TINT_IPC10.setDMA7IP(thebits : TBits_3); inline;
  63191. begin
  63192. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  63193. end;
  63194. function TINT_IPC10.getDMA7IP : TBits_3; inline;
  63195. begin
  63196. getDMA7IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  63197. end;
  63198. procedure TINT_IPC10.setw(thebits : TBits_32); inline;
  63199. begin
  63200. pTDefRegMap(@Self)^.val := thebits;
  63201. end;
  63202. function TINT_IPC10.getw : TBits_32; inline;
  63203. begin
  63204. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63205. end;
  63206. procedure TINT_IPC11.setFCEIS(thebits : TBits_2); inline;
  63207. begin
  63208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63209. end;
  63210. function TINT_IPC11.getFCEIS : TBits_2; inline;
  63211. begin
  63212. getFCEIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63213. end;
  63214. procedure TINT_IPC11.setFCEIP(thebits : TBits_3); inline;
  63215. begin
  63216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63217. end;
  63218. function TINT_IPC11.getFCEIP : TBits_3; inline;
  63219. begin
  63220. getFCEIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63221. end;
  63222. procedure TINT_IPC11.setUSBIS(thebits : TBits_2); inline;
  63223. begin
  63224. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  63225. end;
  63226. function TINT_IPC11.getUSBIS : TBits_2; inline;
  63227. begin
  63228. getUSBIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  63229. end;
  63230. procedure TINT_IPC11.setUSBIP(thebits : TBits_3); inline;
  63231. begin
  63232. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  63233. end;
  63234. function TINT_IPC11.getUSBIP : TBits_3; inline;
  63235. begin
  63236. getUSBIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  63237. end;
  63238. procedure TINT_IPC11.setCAN1IS(thebits : TBits_2); inline;
  63239. begin
  63240. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  63241. end;
  63242. function TINT_IPC11.getCAN1IS : TBits_2; inline;
  63243. begin
  63244. getCAN1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  63245. end;
  63246. procedure TINT_IPC11.setCAN1IP(thebits : TBits_3); inline;
  63247. begin
  63248. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  63249. end;
  63250. function TINT_IPC11.getCAN1IP : TBits_3; inline;
  63251. begin
  63252. getCAN1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  63253. end;
  63254. procedure TINT_IPC11.setCAN2IS(thebits : TBits_2); inline;
  63255. begin
  63256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  63257. end;
  63258. function TINT_IPC11.getCAN2IS : TBits_2; inline;
  63259. begin
  63260. getCAN2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  63261. end;
  63262. procedure TINT_IPC11.setCAN2IP(thebits : TBits_3); inline;
  63263. begin
  63264. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  63265. end;
  63266. function TINT_IPC11.getCAN2IP : TBits_3; inline;
  63267. begin
  63268. getCAN2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  63269. end;
  63270. procedure TINT_IPC11.setw(thebits : TBits_32); inline;
  63271. begin
  63272. pTDefRegMap(@Self)^.val := thebits;
  63273. end;
  63274. function TINT_IPC11.getw : TBits_32; inline;
  63275. begin
  63276. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63277. end;
  63278. procedure TINT_IPC12.setETHIS(thebits : TBits_2); inline;
  63279. begin
  63280. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63281. end;
  63282. function TINT_IPC12.getETHIS : TBits_2; inline;
  63283. begin
  63284. getETHIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63285. end;
  63286. procedure TINT_IPC12.setETHIP(thebits : TBits_3); inline;
  63287. begin
  63288. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  63289. end;
  63290. function TINT_IPC12.getETHIP : TBits_3; inline;
  63291. begin
  63292. getETHIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  63293. end;
  63294. procedure TINT_IPC12.setU4IS(thebits : TBits_2); inline;
  63295. begin
  63296. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  63297. end;
  63298. function TINT_IPC12.getU4IS : TBits_2; inline;
  63299. begin
  63300. getU4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  63301. end;
  63302. procedure TINT_IPC12.setU4IP(thebits : TBits_3); inline;
  63303. begin
  63304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  63305. end;
  63306. function TINT_IPC12.getU4IP : TBits_3; inline;
  63307. begin
  63308. getU4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  63309. end;
  63310. procedure TINT_IPC12.setU6IS(thebits : TBits_2); inline;
  63311. begin
  63312. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  63313. end;
  63314. function TINT_IPC12.getU6IS : TBits_2; inline;
  63315. begin
  63316. getU6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  63317. end;
  63318. procedure TINT_IPC12.setU6IP(thebits : TBits_3); inline;
  63319. begin
  63320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  63321. end;
  63322. function TINT_IPC12.getU6IP : TBits_3; inline;
  63323. begin
  63324. getU6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  63325. end;
  63326. procedure TINT_IPC12.setU5IS(thebits : TBits_2); inline;
  63327. begin
  63328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  63329. end;
  63330. function TINT_IPC12.getU5IS : TBits_2; inline;
  63331. begin
  63332. getU5IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  63333. end;
  63334. procedure TINT_IPC12.setU5IP(thebits : TBits_3); inline;
  63335. begin
  63336. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  63337. end;
  63338. function TINT_IPC12.getU5IP : TBits_3; inline;
  63339. begin
  63340. getU5IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  63341. end;
  63342. procedure TINT_IPC12.setU1BIS(thebits : TBits_2); inline;
  63343. begin
  63344. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  63345. end;
  63346. function TINT_IPC12.getU1BIS : TBits_2; inline;
  63347. begin
  63348. getU1BIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  63349. end;
  63350. procedure TINT_IPC12.setU1BIP(thebits : TBits_3); inline;
  63351. begin
  63352. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  63353. end;
  63354. function TINT_IPC12.getU1BIP : TBits_3; inline;
  63355. begin
  63356. getU1BIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  63357. end;
  63358. procedure TINT_IPC12.setU2BIS(thebits : TBits_2); inline;
  63359. begin
  63360. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  63361. end;
  63362. function TINT_IPC12.getU2BIS : TBits_2; inline;
  63363. begin
  63364. getU2BIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  63365. end;
  63366. procedure TINT_IPC12.setU2BIP(thebits : TBits_3); inline;
  63367. begin
  63368. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  63369. end;
  63370. function TINT_IPC12.getU2BIP : TBits_3; inline;
  63371. begin
  63372. getU2BIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  63373. end;
  63374. procedure TINT_IPC12.setU3BIS(thebits : TBits_2); inline;
  63375. begin
  63376. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  63377. end;
  63378. function TINT_IPC12.getU3BIS : TBits_2; inline;
  63379. begin
  63380. getU3BIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  63381. end;
  63382. procedure TINT_IPC12.setU3BIP(thebits : TBits_3); inline;
  63383. begin
  63384. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  63385. end;
  63386. function TINT_IPC12.getU3BIP : TBits_3; inline;
  63387. begin
  63388. getU3BIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  63389. end;
  63390. procedure TINT_IPC12.setw(thebits : TBits_32); inline;
  63391. begin
  63392. pTDefRegMap(@Self)^.val := thebits;
  63393. end;
  63394. function TINT_IPC12.getw : TBits_32; inline;
  63395. begin
  63396. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63397. end;
  63398. procedure TBMX_BMXCON.setBMXARB(thebits : TBits_3); inline;
  63399. begin
  63400. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  63401. end;
  63402. function TBMX_BMXCON.getBMXARB : TBits_3; inline;
  63403. begin
  63404. getBMXARB := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  63405. end;
  63406. procedure TBMX_BMXCON.setBMXWSDRM; inline;
  63407. begin
  63408. pTDefRegMap(@Self)^.&set := $00000040;
  63409. end;
  63410. procedure TBMX_BMXCON.clearBMXWSDRM; inline;
  63411. begin
  63412. pTDefRegMap(@Self)^.clr := $00000040;
  63413. end;
  63414. procedure TBMX_BMXCON.setBMXWSDRM(thebits : TBits_1); inline;
  63415. begin
  63416. if thebits = 0 then
  63417. pTDefRegMap(@Self)^.clr := $00000040
  63418. else
  63419. pTDefRegMap(@Self)^.&set := $00000040;
  63420. end;
  63421. function TBMX_BMXCON.getBMXWSDRM : TBits_1; inline;
  63422. begin
  63423. getBMXWSDRM := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63424. end;
  63425. procedure TBMX_BMXCON.setBMXERRIS; inline;
  63426. begin
  63427. pTDefRegMap(@Self)^.&set := $00010000;
  63428. end;
  63429. procedure TBMX_BMXCON.clearBMXERRIS; inline;
  63430. begin
  63431. pTDefRegMap(@Self)^.clr := $00010000;
  63432. end;
  63433. procedure TBMX_BMXCON.setBMXERRIS(thebits : TBits_1); inline;
  63434. begin
  63435. if thebits = 0 then
  63436. pTDefRegMap(@Self)^.clr := $00010000
  63437. else
  63438. pTDefRegMap(@Self)^.&set := $00010000;
  63439. end;
  63440. function TBMX_BMXCON.getBMXERRIS : TBits_1; inline;
  63441. begin
  63442. getBMXERRIS := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  63443. end;
  63444. procedure TBMX_BMXCON.setBMXERRDS; inline;
  63445. begin
  63446. pTDefRegMap(@Self)^.&set := $00020000;
  63447. end;
  63448. procedure TBMX_BMXCON.clearBMXERRDS; inline;
  63449. begin
  63450. pTDefRegMap(@Self)^.clr := $00020000;
  63451. end;
  63452. procedure TBMX_BMXCON.setBMXERRDS(thebits : TBits_1); inline;
  63453. begin
  63454. if thebits = 0 then
  63455. pTDefRegMap(@Self)^.clr := $00020000
  63456. else
  63457. pTDefRegMap(@Self)^.&set := $00020000;
  63458. end;
  63459. function TBMX_BMXCON.getBMXERRDS : TBits_1; inline;
  63460. begin
  63461. getBMXERRDS := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  63462. end;
  63463. procedure TBMX_BMXCON.setBMXERRDMA; inline;
  63464. begin
  63465. pTDefRegMap(@Self)^.&set := $00040000;
  63466. end;
  63467. procedure TBMX_BMXCON.clearBMXERRDMA; inline;
  63468. begin
  63469. pTDefRegMap(@Self)^.clr := $00040000;
  63470. end;
  63471. procedure TBMX_BMXCON.setBMXERRDMA(thebits : TBits_1); inline;
  63472. begin
  63473. if thebits = 0 then
  63474. pTDefRegMap(@Self)^.clr := $00040000
  63475. else
  63476. pTDefRegMap(@Self)^.&set := $00040000;
  63477. end;
  63478. function TBMX_BMXCON.getBMXERRDMA : TBits_1; inline;
  63479. begin
  63480. getBMXERRDMA := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  63481. end;
  63482. procedure TBMX_BMXCON.setBMXERRICD; inline;
  63483. begin
  63484. pTDefRegMap(@Self)^.&set := $00080000;
  63485. end;
  63486. procedure TBMX_BMXCON.clearBMXERRICD; inline;
  63487. begin
  63488. pTDefRegMap(@Self)^.clr := $00080000;
  63489. end;
  63490. procedure TBMX_BMXCON.setBMXERRICD(thebits : TBits_1); inline;
  63491. begin
  63492. if thebits = 0 then
  63493. pTDefRegMap(@Self)^.clr := $00080000
  63494. else
  63495. pTDefRegMap(@Self)^.&set := $00080000;
  63496. end;
  63497. function TBMX_BMXCON.getBMXERRICD : TBits_1; inline;
  63498. begin
  63499. getBMXERRICD := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63500. end;
  63501. procedure TBMX_BMXCON.setBMXERRIXI; inline;
  63502. begin
  63503. pTDefRegMap(@Self)^.&set := $00100000;
  63504. end;
  63505. procedure TBMX_BMXCON.clearBMXERRIXI; inline;
  63506. begin
  63507. pTDefRegMap(@Self)^.clr := $00100000;
  63508. end;
  63509. procedure TBMX_BMXCON.setBMXERRIXI(thebits : TBits_1); inline;
  63510. begin
  63511. if thebits = 0 then
  63512. pTDefRegMap(@Self)^.clr := $00100000
  63513. else
  63514. pTDefRegMap(@Self)^.&set := $00100000;
  63515. end;
  63516. function TBMX_BMXCON.getBMXERRIXI : TBits_1; inline;
  63517. begin
  63518. getBMXERRIXI := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  63519. end;
  63520. procedure TBMX_BMXCON.setBMXCHEDMA; inline;
  63521. begin
  63522. pTDefRegMap(@Self)^.&set := $04000000;
  63523. end;
  63524. procedure TBMX_BMXCON.clearBMXCHEDMA; inline;
  63525. begin
  63526. pTDefRegMap(@Self)^.clr := $04000000;
  63527. end;
  63528. procedure TBMX_BMXCON.setBMXCHEDMA(thebits : TBits_1); inline;
  63529. begin
  63530. if thebits = 0 then
  63531. pTDefRegMap(@Self)^.clr := $04000000
  63532. else
  63533. pTDefRegMap(@Self)^.&set := $04000000;
  63534. end;
  63535. function TBMX_BMXCON.getBMXCHEDMA : TBits_1; inline;
  63536. begin
  63537. getBMXCHEDMA := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  63538. end;
  63539. procedure TBMX_BMXCON.setw(thebits : TBits_32); inline;
  63540. begin
  63541. pTDefRegMap(@Self)^.val := thebits;
  63542. end;
  63543. function TBMX_BMXCON.getw : TBits_32; inline;
  63544. begin
  63545. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63546. end;
  63547. procedure TDMAC_DMACON.setDMABUSY; inline;
  63548. begin
  63549. pTDefRegMap(@Self)^.&set := $00000800;
  63550. end;
  63551. procedure TDMAC_DMACON.clearDMABUSY; inline;
  63552. begin
  63553. pTDefRegMap(@Self)^.clr := $00000800;
  63554. end;
  63555. procedure TDMAC_DMACON.setDMABUSY(thebits : TBits_1); inline;
  63556. begin
  63557. if thebits = 0 then
  63558. pTDefRegMap(@Self)^.clr := $00000800
  63559. else
  63560. pTDefRegMap(@Self)^.&set := $00000800;
  63561. end;
  63562. function TDMAC_DMACON.getDMABUSY : TBits_1; inline;
  63563. begin
  63564. getDMABUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  63565. end;
  63566. procedure TDMAC_DMACON.setSUSPEND; inline;
  63567. begin
  63568. pTDefRegMap(@Self)^.&set := $00001000;
  63569. end;
  63570. procedure TDMAC_DMACON.clearSUSPEND; inline;
  63571. begin
  63572. pTDefRegMap(@Self)^.clr := $00001000;
  63573. end;
  63574. procedure TDMAC_DMACON.setSUSPEND(thebits : TBits_1); inline;
  63575. begin
  63576. if thebits = 0 then
  63577. pTDefRegMap(@Self)^.clr := $00001000
  63578. else
  63579. pTDefRegMap(@Self)^.&set := $00001000;
  63580. end;
  63581. function TDMAC_DMACON.getSUSPEND : TBits_1; inline;
  63582. begin
  63583. getSUSPEND := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  63584. end;
  63585. procedure TDMAC_DMACON.setON; inline;
  63586. begin
  63587. pTDefRegMap(@Self)^.&set := $00008000;
  63588. end;
  63589. procedure TDMAC_DMACON.clearON; inline;
  63590. begin
  63591. pTDefRegMap(@Self)^.clr := $00008000;
  63592. end;
  63593. procedure TDMAC_DMACON.setON(thebits : TBits_1); inline;
  63594. begin
  63595. if thebits = 0 then
  63596. pTDefRegMap(@Self)^.clr := $00008000
  63597. else
  63598. pTDefRegMap(@Self)^.&set := $00008000;
  63599. end;
  63600. function TDMAC_DMACON.getON : TBits_1; inline;
  63601. begin
  63602. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63603. end;
  63604. procedure TDMAC_DMACON.setw(thebits : TBits_32); inline;
  63605. begin
  63606. pTDefRegMap(@Self)^.val := thebits;
  63607. end;
  63608. function TDMAC_DMACON.getw : TBits_32; inline;
  63609. begin
  63610. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63611. end;
  63612. procedure TDMAC_DMASTAT.setDMACH(thebits : TBits_3); inline;
  63613. begin
  63614. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  63615. end;
  63616. function TDMAC_DMASTAT.getDMACH : TBits_3; inline;
  63617. begin
  63618. getDMACH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  63619. end;
  63620. procedure TDMAC_DMASTAT.setRDWR; inline;
  63621. begin
  63622. pTDefRegMap(@Self)^.&set := $00000008;
  63623. end;
  63624. procedure TDMAC_DMASTAT.clearRDWR; inline;
  63625. begin
  63626. pTDefRegMap(@Self)^.clr := $00000008;
  63627. end;
  63628. procedure TDMAC_DMASTAT.setRDWR(thebits : TBits_1); inline;
  63629. begin
  63630. if thebits = 0 then
  63631. pTDefRegMap(@Self)^.clr := $00000008
  63632. else
  63633. pTDefRegMap(@Self)^.&set := $00000008;
  63634. end;
  63635. function TDMAC_DMASTAT.getRDWR : TBits_1; inline;
  63636. begin
  63637. getRDWR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63638. end;
  63639. procedure TDMAC_DMASTAT.setw(thebits : TBits_32); inline;
  63640. begin
  63641. pTDefRegMap(@Self)^.val := thebits;
  63642. end;
  63643. function TDMAC_DMASTAT.getw : TBits_32; inline;
  63644. begin
  63645. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63646. end;
  63647. procedure TDMAC_DCRCCON.setCRCCH(thebits : TBits_3); inline;
  63648. begin
  63649. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  63650. end;
  63651. function TDMAC_DCRCCON.getCRCCH : TBits_3; inline;
  63652. begin
  63653. getCRCCH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  63654. end;
  63655. procedure TDMAC_DCRCCON.setCRCTYP; inline;
  63656. begin
  63657. pTDefRegMap(@Self)^.&set := $00000020;
  63658. end;
  63659. procedure TDMAC_DCRCCON.clearCRCTYP; inline;
  63660. begin
  63661. pTDefRegMap(@Self)^.clr := $00000020;
  63662. end;
  63663. procedure TDMAC_DCRCCON.setCRCTYP(thebits : TBits_1); inline;
  63664. begin
  63665. if thebits = 0 then
  63666. pTDefRegMap(@Self)^.clr := $00000020
  63667. else
  63668. pTDefRegMap(@Self)^.&set := $00000020;
  63669. end;
  63670. function TDMAC_DCRCCON.getCRCTYP : TBits_1; inline;
  63671. begin
  63672. getCRCTYP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63673. end;
  63674. procedure TDMAC_DCRCCON.setCRCAPP; inline;
  63675. begin
  63676. pTDefRegMap(@Self)^.&set := $00000040;
  63677. end;
  63678. procedure TDMAC_DCRCCON.clearCRCAPP; inline;
  63679. begin
  63680. pTDefRegMap(@Self)^.clr := $00000040;
  63681. end;
  63682. procedure TDMAC_DCRCCON.setCRCAPP(thebits : TBits_1); inline;
  63683. begin
  63684. if thebits = 0 then
  63685. pTDefRegMap(@Self)^.clr := $00000040
  63686. else
  63687. pTDefRegMap(@Self)^.&set := $00000040;
  63688. end;
  63689. function TDMAC_DCRCCON.getCRCAPP : TBits_1; inline;
  63690. begin
  63691. getCRCAPP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63692. end;
  63693. procedure TDMAC_DCRCCON.setCRCEN; inline;
  63694. begin
  63695. pTDefRegMap(@Self)^.&set := $00000080;
  63696. end;
  63697. procedure TDMAC_DCRCCON.clearCRCEN; inline;
  63698. begin
  63699. pTDefRegMap(@Self)^.clr := $00000080;
  63700. end;
  63701. procedure TDMAC_DCRCCON.setCRCEN(thebits : TBits_1); inline;
  63702. begin
  63703. if thebits = 0 then
  63704. pTDefRegMap(@Self)^.clr := $00000080
  63705. else
  63706. pTDefRegMap(@Self)^.&set := $00000080;
  63707. end;
  63708. function TDMAC_DCRCCON.getCRCEN : TBits_1; inline;
  63709. begin
  63710. getCRCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63711. end;
  63712. procedure TDMAC_DCRCCON.setPLEN(thebits : TBits_5); inline;
  63713. begin
  63714. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  63715. end;
  63716. function TDMAC_DCRCCON.getPLEN : TBits_5; inline;
  63717. begin
  63718. getPLEN := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  63719. end;
  63720. procedure TDMAC_DCRCCON.setBITO; inline;
  63721. begin
  63722. pTDefRegMap(@Self)^.&set := $01000000;
  63723. end;
  63724. procedure TDMAC_DCRCCON.clearBITO; inline;
  63725. begin
  63726. pTDefRegMap(@Self)^.clr := $01000000;
  63727. end;
  63728. procedure TDMAC_DCRCCON.setBITO(thebits : TBits_1); inline;
  63729. begin
  63730. if thebits = 0 then
  63731. pTDefRegMap(@Self)^.clr := $01000000
  63732. else
  63733. pTDefRegMap(@Self)^.&set := $01000000;
  63734. end;
  63735. function TDMAC_DCRCCON.getBITO : TBits_1; inline;
  63736. begin
  63737. getBITO := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  63738. end;
  63739. procedure TDMAC_DCRCCON.setWBO; inline;
  63740. begin
  63741. pTDefRegMap(@Self)^.&set := $08000000;
  63742. end;
  63743. procedure TDMAC_DCRCCON.clearWBO; inline;
  63744. begin
  63745. pTDefRegMap(@Self)^.clr := $08000000;
  63746. end;
  63747. procedure TDMAC_DCRCCON.setWBO(thebits : TBits_1); inline;
  63748. begin
  63749. if thebits = 0 then
  63750. pTDefRegMap(@Self)^.clr := $08000000
  63751. else
  63752. pTDefRegMap(@Self)^.&set := $08000000;
  63753. end;
  63754. function TDMAC_DCRCCON.getWBO : TBits_1; inline;
  63755. begin
  63756. getWBO := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  63757. end;
  63758. procedure TDMAC_DCRCCON.setBYTO(thebits : TBits_2); inline;
  63759. begin
  63760. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $CFFFFFFF or ( thebits shl 28 );
  63761. end;
  63762. function TDMAC_DCRCCON.getBYTO : TBits_2; inline;
  63763. begin
  63764. getBYTO := (pTDefRegMap(@Self)^.val and $30000000) shr 28;
  63765. end;
  63766. procedure TDMAC_DCRCCON.setw(thebits : TBits_32); inline;
  63767. begin
  63768. pTDefRegMap(@Self)^.val := thebits;
  63769. end;
  63770. function TDMAC_DCRCCON.getw : TBits_32; inline;
  63771. begin
  63772. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63773. end;
  63774. procedure TDMAC0_DCH0CON.setCHPRI(thebits : TBits_2); inline;
  63775. begin
  63776. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63777. end;
  63778. function TDMAC0_DCH0CON.getCHPRI : TBits_2; inline;
  63779. begin
  63780. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63781. end;
  63782. procedure TDMAC0_DCH0CON.setCHEDET; inline;
  63783. begin
  63784. pTDefRegMap(@Self)^.&set := $00000004;
  63785. end;
  63786. procedure TDMAC0_DCH0CON.clearCHEDET; inline;
  63787. begin
  63788. pTDefRegMap(@Self)^.clr := $00000004;
  63789. end;
  63790. procedure TDMAC0_DCH0CON.setCHEDET(thebits : TBits_1); inline;
  63791. begin
  63792. if thebits = 0 then
  63793. pTDefRegMap(@Self)^.clr := $00000004
  63794. else
  63795. pTDefRegMap(@Self)^.&set := $00000004;
  63796. end;
  63797. function TDMAC0_DCH0CON.getCHEDET : TBits_1; inline;
  63798. begin
  63799. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63800. end;
  63801. procedure TDMAC0_DCH0CON.setCHAEN; inline;
  63802. begin
  63803. pTDefRegMap(@Self)^.&set := $00000010;
  63804. end;
  63805. procedure TDMAC0_DCH0CON.clearCHAEN; inline;
  63806. begin
  63807. pTDefRegMap(@Self)^.clr := $00000010;
  63808. end;
  63809. procedure TDMAC0_DCH0CON.setCHAEN(thebits : TBits_1); inline;
  63810. begin
  63811. if thebits = 0 then
  63812. pTDefRegMap(@Self)^.clr := $00000010
  63813. else
  63814. pTDefRegMap(@Self)^.&set := $00000010;
  63815. end;
  63816. function TDMAC0_DCH0CON.getCHAEN : TBits_1; inline;
  63817. begin
  63818. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63819. end;
  63820. procedure TDMAC0_DCH0CON.setCHCHN; inline;
  63821. begin
  63822. pTDefRegMap(@Self)^.&set := $00000020;
  63823. end;
  63824. procedure TDMAC0_DCH0CON.clearCHCHN; inline;
  63825. begin
  63826. pTDefRegMap(@Self)^.clr := $00000020;
  63827. end;
  63828. procedure TDMAC0_DCH0CON.setCHCHN(thebits : TBits_1); inline;
  63829. begin
  63830. if thebits = 0 then
  63831. pTDefRegMap(@Self)^.clr := $00000020
  63832. else
  63833. pTDefRegMap(@Self)^.&set := $00000020;
  63834. end;
  63835. function TDMAC0_DCH0CON.getCHCHN : TBits_1; inline;
  63836. begin
  63837. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63838. end;
  63839. procedure TDMAC0_DCH0CON.setCHAED; inline;
  63840. begin
  63841. pTDefRegMap(@Self)^.&set := $00000040;
  63842. end;
  63843. procedure TDMAC0_DCH0CON.clearCHAED; inline;
  63844. begin
  63845. pTDefRegMap(@Self)^.clr := $00000040;
  63846. end;
  63847. procedure TDMAC0_DCH0CON.setCHAED(thebits : TBits_1); inline;
  63848. begin
  63849. if thebits = 0 then
  63850. pTDefRegMap(@Self)^.clr := $00000040
  63851. else
  63852. pTDefRegMap(@Self)^.&set := $00000040;
  63853. end;
  63854. function TDMAC0_DCH0CON.getCHAED : TBits_1; inline;
  63855. begin
  63856. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63857. end;
  63858. procedure TDMAC0_DCH0CON.setCHEN; inline;
  63859. begin
  63860. pTDefRegMap(@Self)^.&set := $00000080;
  63861. end;
  63862. procedure TDMAC0_DCH0CON.clearCHEN; inline;
  63863. begin
  63864. pTDefRegMap(@Self)^.clr := $00000080;
  63865. end;
  63866. procedure TDMAC0_DCH0CON.setCHEN(thebits : TBits_1); inline;
  63867. begin
  63868. if thebits = 0 then
  63869. pTDefRegMap(@Self)^.clr := $00000080
  63870. else
  63871. pTDefRegMap(@Self)^.&set := $00000080;
  63872. end;
  63873. function TDMAC0_DCH0CON.getCHEN : TBits_1; inline;
  63874. begin
  63875. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63876. end;
  63877. procedure TDMAC0_DCH0CON.setCHCHNS; inline;
  63878. begin
  63879. pTDefRegMap(@Self)^.&set := $00000100;
  63880. end;
  63881. procedure TDMAC0_DCH0CON.clearCHCHNS; inline;
  63882. begin
  63883. pTDefRegMap(@Self)^.clr := $00000100;
  63884. end;
  63885. procedure TDMAC0_DCH0CON.setCHCHNS(thebits : TBits_1); inline;
  63886. begin
  63887. if thebits = 0 then
  63888. pTDefRegMap(@Self)^.clr := $00000100
  63889. else
  63890. pTDefRegMap(@Self)^.&set := $00000100;
  63891. end;
  63892. function TDMAC0_DCH0CON.getCHCHNS : TBits_1; inline;
  63893. begin
  63894. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63895. end;
  63896. procedure TDMAC0_DCH0CON.setCHBUSY; inline;
  63897. begin
  63898. pTDefRegMap(@Self)^.&set := $00008000;
  63899. end;
  63900. procedure TDMAC0_DCH0CON.clearCHBUSY; inline;
  63901. begin
  63902. pTDefRegMap(@Self)^.clr := $00008000;
  63903. end;
  63904. procedure TDMAC0_DCH0CON.setCHBUSY(thebits : TBits_1); inline;
  63905. begin
  63906. if thebits = 0 then
  63907. pTDefRegMap(@Self)^.clr := $00008000
  63908. else
  63909. pTDefRegMap(@Self)^.&set := $00008000;
  63910. end;
  63911. function TDMAC0_DCH0CON.getCHBUSY : TBits_1; inline;
  63912. begin
  63913. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63914. end;
  63915. procedure TDMAC0_DCH0CON.setw(thebits : TBits_32); inline;
  63916. begin
  63917. pTDefRegMap(@Self)^.val := thebits;
  63918. end;
  63919. function TDMAC0_DCH0CON.getw : TBits_32; inline;
  63920. begin
  63921. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63922. end;
  63923. procedure TDMAC0_DCH0ECON.setAIRQEN; inline;
  63924. begin
  63925. pTDefRegMap(@Self)^.&set := $00000008;
  63926. end;
  63927. procedure TDMAC0_DCH0ECON.clearAIRQEN; inline;
  63928. begin
  63929. pTDefRegMap(@Self)^.clr := $00000008;
  63930. end;
  63931. procedure TDMAC0_DCH0ECON.setAIRQEN(thebits : TBits_1); inline;
  63932. begin
  63933. if thebits = 0 then
  63934. pTDefRegMap(@Self)^.clr := $00000008
  63935. else
  63936. pTDefRegMap(@Self)^.&set := $00000008;
  63937. end;
  63938. function TDMAC0_DCH0ECON.getAIRQEN : TBits_1; inline;
  63939. begin
  63940. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63941. end;
  63942. procedure TDMAC0_DCH0ECON.setSIRQEN; inline;
  63943. begin
  63944. pTDefRegMap(@Self)^.&set := $00000010;
  63945. end;
  63946. procedure TDMAC0_DCH0ECON.clearSIRQEN; inline;
  63947. begin
  63948. pTDefRegMap(@Self)^.clr := $00000010;
  63949. end;
  63950. procedure TDMAC0_DCH0ECON.setSIRQEN(thebits : TBits_1); inline;
  63951. begin
  63952. if thebits = 0 then
  63953. pTDefRegMap(@Self)^.clr := $00000010
  63954. else
  63955. pTDefRegMap(@Self)^.&set := $00000010;
  63956. end;
  63957. function TDMAC0_DCH0ECON.getSIRQEN : TBits_1; inline;
  63958. begin
  63959. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63960. end;
  63961. procedure TDMAC0_DCH0ECON.setPATEN; inline;
  63962. begin
  63963. pTDefRegMap(@Self)^.&set := $00000020;
  63964. end;
  63965. procedure TDMAC0_DCH0ECON.clearPATEN; inline;
  63966. begin
  63967. pTDefRegMap(@Self)^.clr := $00000020;
  63968. end;
  63969. procedure TDMAC0_DCH0ECON.setPATEN(thebits : TBits_1); inline;
  63970. begin
  63971. if thebits = 0 then
  63972. pTDefRegMap(@Self)^.clr := $00000020
  63973. else
  63974. pTDefRegMap(@Self)^.&set := $00000020;
  63975. end;
  63976. function TDMAC0_DCH0ECON.getPATEN : TBits_1; inline;
  63977. begin
  63978. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63979. end;
  63980. procedure TDMAC0_DCH0ECON.setCABORT; inline;
  63981. begin
  63982. pTDefRegMap(@Self)^.&set := $00000040;
  63983. end;
  63984. procedure TDMAC0_DCH0ECON.clearCABORT; inline;
  63985. begin
  63986. pTDefRegMap(@Self)^.clr := $00000040;
  63987. end;
  63988. procedure TDMAC0_DCH0ECON.setCABORT(thebits : TBits_1); inline;
  63989. begin
  63990. if thebits = 0 then
  63991. pTDefRegMap(@Self)^.clr := $00000040
  63992. else
  63993. pTDefRegMap(@Self)^.&set := $00000040;
  63994. end;
  63995. function TDMAC0_DCH0ECON.getCABORT : TBits_1; inline;
  63996. begin
  63997. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63998. end;
  63999. procedure TDMAC0_DCH0ECON.setCFORCE; inline;
  64000. begin
  64001. pTDefRegMap(@Self)^.&set := $00000080;
  64002. end;
  64003. procedure TDMAC0_DCH0ECON.clearCFORCE; inline;
  64004. begin
  64005. pTDefRegMap(@Self)^.clr := $00000080;
  64006. end;
  64007. procedure TDMAC0_DCH0ECON.setCFORCE(thebits : TBits_1); inline;
  64008. begin
  64009. if thebits = 0 then
  64010. pTDefRegMap(@Self)^.clr := $00000080
  64011. else
  64012. pTDefRegMap(@Self)^.&set := $00000080;
  64013. end;
  64014. function TDMAC0_DCH0ECON.getCFORCE : TBits_1; inline;
  64015. begin
  64016. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64017. end;
  64018. procedure TDMAC0_DCH0ECON.setCHSIRQ(thebits : TBits_8); inline;
  64019. begin
  64020. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64021. end;
  64022. function TDMAC0_DCH0ECON.getCHSIRQ : TBits_8; inline;
  64023. begin
  64024. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64025. end;
  64026. procedure TDMAC0_DCH0ECON.setCHAIRQ(thebits : TBits_8); inline;
  64027. begin
  64028. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  64029. end;
  64030. function TDMAC0_DCH0ECON.getCHAIRQ : TBits_8; inline;
  64031. begin
  64032. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  64033. end;
  64034. procedure TDMAC0_DCH0ECON.setw(thebits : TBits_32); inline;
  64035. begin
  64036. pTDefRegMap(@Self)^.val := thebits;
  64037. end;
  64038. function TDMAC0_DCH0ECON.getw : TBits_32; inline;
  64039. begin
  64040. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64041. end;
  64042. procedure TDMAC0_DCH0INT.setCHERIF; inline;
  64043. begin
  64044. pTDefRegMap(@Self)^.&set := $00000001;
  64045. end;
  64046. procedure TDMAC0_DCH0INT.clearCHERIF; inline;
  64047. begin
  64048. pTDefRegMap(@Self)^.clr := $00000001;
  64049. end;
  64050. procedure TDMAC0_DCH0INT.setCHERIF(thebits : TBits_1); inline;
  64051. begin
  64052. if thebits = 0 then
  64053. pTDefRegMap(@Self)^.clr := $00000001
  64054. else
  64055. pTDefRegMap(@Self)^.&set := $00000001;
  64056. end;
  64057. function TDMAC0_DCH0INT.getCHERIF : TBits_1; inline;
  64058. begin
  64059. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64060. end;
  64061. procedure TDMAC0_DCH0INT.setCHTAIF; inline;
  64062. begin
  64063. pTDefRegMap(@Self)^.&set := $00000002;
  64064. end;
  64065. procedure TDMAC0_DCH0INT.clearCHTAIF; inline;
  64066. begin
  64067. pTDefRegMap(@Self)^.clr := $00000002;
  64068. end;
  64069. procedure TDMAC0_DCH0INT.setCHTAIF(thebits : TBits_1); inline;
  64070. begin
  64071. if thebits = 0 then
  64072. pTDefRegMap(@Self)^.clr := $00000002
  64073. else
  64074. pTDefRegMap(@Self)^.&set := $00000002;
  64075. end;
  64076. function TDMAC0_DCH0INT.getCHTAIF : TBits_1; inline;
  64077. begin
  64078. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64079. end;
  64080. procedure TDMAC0_DCH0INT.setCHCCIF; inline;
  64081. begin
  64082. pTDefRegMap(@Self)^.&set := $00000004;
  64083. end;
  64084. procedure TDMAC0_DCH0INT.clearCHCCIF; inline;
  64085. begin
  64086. pTDefRegMap(@Self)^.clr := $00000004;
  64087. end;
  64088. procedure TDMAC0_DCH0INT.setCHCCIF(thebits : TBits_1); inline;
  64089. begin
  64090. if thebits = 0 then
  64091. pTDefRegMap(@Self)^.clr := $00000004
  64092. else
  64093. pTDefRegMap(@Self)^.&set := $00000004;
  64094. end;
  64095. function TDMAC0_DCH0INT.getCHCCIF : TBits_1; inline;
  64096. begin
  64097. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64098. end;
  64099. procedure TDMAC0_DCH0INT.setCHBCIF; inline;
  64100. begin
  64101. pTDefRegMap(@Self)^.&set := $00000008;
  64102. end;
  64103. procedure TDMAC0_DCH0INT.clearCHBCIF; inline;
  64104. begin
  64105. pTDefRegMap(@Self)^.clr := $00000008;
  64106. end;
  64107. procedure TDMAC0_DCH0INT.setCHBCIF(thebits : TBits_1); inline;
  64108. begin
  64109. if thebits = 0 then
  64110. pTDefRegMap(@Self)^.clr := $00000008
  64111. else
  64112. pTDefRegMap(@Self)^.&set := $00000008;
  64113. end;
  64114. function TDMAC0_DCH0INT.getCHBCIF : TBits_1; inline;
  64115. begin
  64116. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64117. end;
  64118. procedure TDMAC0_DCH0INT.setCHDHIF; inline;
  64119. begin
  64120. pTDefRegMap(@Self)^.&set := $00000010;
  64121. end;
  64122. procedure TDMAC0_DCH0INT.clearCHDHIF; inline;
  64123. begin
  64124. pTDefRegMap(@Self)^.clr := $00000010;
  64125. end;
  64126. procedure TDMAC0_DCH0INT.setCHDHIF(thebits : TBits_1); inline;
  64127. begin
  64128. if thebits = 0 then
  64129. pTDefRegMap(@Self)^.clr := $00000010
  64130. else
  64131. pTDefRegMap(@Self)^.&set := $00000010;
  64132. end;
  64133. function TDMAC0_DCH0INT.getCHDHIF : TBits_1; inline;
  64134. begin
  64135. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64136. end;
  64137. procedure TDMAC0_DCH0INT.setCHDDIF; inline;
  64138. begin
  64139. pTDefRegMap(@Self)^.&set := $00000020;
  64140. end;
  64141. procedure TDMAC0_DCH0INT.clearCHDDIF; inline;
  64142. begin
  64143. pTDefRegMap(@Self)^.clr := $00000020;
  64144. end;
  64145. procedure TDMAC0_DCH0INT.setCHDDIF(thebits : TBits_1); inline;
  64146. begin
  64147. if thebits = 0 then
  64148. pTDefRegMap(@Self)^.clr := $00000020
  64149. else
  64150. pTDefRegMap(@Self)^.&set := $00000020;
  64151. end;
  64152. function TDMAC0_DCH0INT.getCHDDIF : TBits_1; inline;
  64153. begin
  64154. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64155. end;
  64156. procedure TDMAC0_DCH0INT.setCHSHIF; inline;
  64157. begin
  64158. pTDefRegMap(@Self)^.&set := $00000040;
  64159. end;
  64160. procedure TDMAC0_DCH0INT.clearCHSHIF; inline;
  64161. begin
  64162. pTDefRegMap(@Self)^.clr := $00000040;
  64163. end;
  64164. procedure TDMAC0_DCH0INT.setCHSHIF(thebits : TBits_1); inline;
  64165. begin
  64166. if thebits = 0 then
  64167. pTDefRegMap(@Self)^.clr := $00000040
  64168. else
  64169. pTDefRegMap(@Self)^.&set := $00000040;
  64170. end;
  64171. function TDMAC0_DCH0INT.getCHSHIF : TBits_1; inline;
  64172. begin
  64173. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64174. end;
  64175. procedure TDMAC0_DCH0INT.setCHSDIF; inline;
  64176. begin
  64177. pTDefRegMap(@Self)^.&set := $00000080;
  64178. end;
  64179. procedure TDMAC0_DCH0INT.clearCHSDIF; inline;
  64180. begin
  64181. pTDefRegMap(@Self)^.clr := $00000080;
  64182. end;
  64183. procedure TDMAC0_DCH0INT.setCHSDIF(thebits : TBits_1); inline;
  64184. begin
  64185. if thebits = 0 then
  64186. pTDefRegMap(@Self)^.clr := $00000080
  64187. else
  64188. pTDefRegMap(@Self)^.&set := $00000080;
  64189. end;
  64190. function TDMAC0_DCH0INT.getCHSDIF : TBits_1; inline;
  64191. begin
  64192. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64193. end;
  64194. procedure TDMAC0_DCH0INT.setCHERIE; inline;
  64195. begin
  64196. pTDefRegMap(@Self)^.&set := $00010000;
  64197. end;
  64198. procedure TDMAC0_DCH0INT.clearCHERIE; inline;
  64199. begin
  64200. pTDefRegMap(@Self)^.clr := $00010000;
  64201. end;
  64202. procedure TDMAC0_DCH0INT.setCHERIE(thebits : TBits_1); inline;
  64203. begin
  64204. if thebits = 0 then
  64205. pTDefRegMap(@Self)^.clr := $00010000
  64206. else
  64207. pTDefRegMap(@Self)^.&set := $00010000;
  64208. end;
  64209. function TDMAC0_DCH0INT.getCHERIE : TBits_1; inline;
  64210. begin
  64211. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  64212. end;
  64213. procedure TDMAC0_DCH0INT.setCHTAIE; inline;
  64214. begin
  64215. pTDefRegMap(@Self)^.&set := $00020000;
  64216. end;
  64217. procedure TDMAC0_DCH0INT.clearCHTAIE; inline;
  64218. begin
  64219. pTDefRegMap(@Self)^.clr := $00020000;
  64220. end;
  64221. procedure TDMAC0_DCH0INT.setCHTAIE(thebits : TBits_1); inline;
  64222. begin
  64223. if thebits = 0 then
  64224. pTDefRegMap(@Self)^.clr := $00020000
  64225. else
  64226. pTDefRegMap(@Self)^.&set := $00020000;
  64227. end;
  64228. function TDMAC0_DCH0INT.getCHTAIE : TBits_1; inline;
  64229. begin
  64230. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  64231. end;
  64232. procedure TDMAC0_DCH0INT.setCHCCIE; inline;
  64233. begin
  64234. pTDefRegMap(@Self)^.&set := $00040000;
  64235. end;
  64236. procedure TDMAC0_DCH0INT.clearCHCCIE; inline;
  64237. begin
  64238. pTDefRegMap(@Self)^.clr := $00040000;
  64239. end;
  64240. procedure TDMAC0_DCH0INT.setCHCCIE(thebits : TBits_1); inline;
  64241. begin
  64242. if thebits = 0 then
  64243. pTDefRegMap(@Self)^.clr := $00040000
  64244. else
  64245. pTDefRegMap(@Self)^.&set := $00040000;
  64246. end;
  64247. function TDMAC0_DCH0INT.getCHCCIE : TBits_1; inline;
  64248. begin
  64249. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  64250. end;
  64251. procedure TDMAC0_DCH0INT.setCHBCIE; inline;
  64252. begin
  64253. pTDefRegMap(@Self)^.&set := $00080000;
  64254. end;
  64255. procedure TDMAC0_DCH0INT.clearCHBCIE; inline;
  64256. begin
  64257. pTDefRegMap(@Self)^.clr := $00080000;
  64258. end;
  64259. procedure TDMAC0_DCH0INT.setCHBCIE(thebits : TBits_1); inline;
  64260. begin
  64261. if thebits = 0 then
  64262. pTDefRegMap(@Self)^.clr := $00080000
  64263. else
  64264. pTDefRegMap(@Self)^.&set := $00080000;
  64265. end;
  64266. function TDMAC0_DCH0INT.getCHBCIE : TBits_1; inline;
  64267. begin
  64268. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64269. end;
  64270. procedure TDMAC0_DCH0INT.setCHDHIE; inline;
  64271. begin
  64272. pTDefRegMap(@Self)^.&set := $00100000;
  64273. end;
  64274. procedure TDMAC0_DCH0INT.clearCHDHIE; inline;
  64275. begin
  64276. pTDefRegMap(@Self)^.clr := $00100000;
  64277. end;
  64278. procedure TDMAC0_DCH0INT.setCHDHIE(thebits : TBits_1); inline;
  64279. begin
  64280. if thebits = 0 then
  64281. pTDefRegMap(@Self)^.clr := $00100000
  64282. else
  64283. pTDefRegMap(@Self)^.&set := $00100000;
  64284. end;
  64285. function TDMAC0_DCH0INT.getCHDHIE : TBits_1; inline;
  64286. begin
  64287. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  64288. end;
  64289. procedure TDMAC0_DCH0INT.setCHDDIE; inline;
  64290. begin
  64291. pTDefRegMap(@Self)^.&set := $00200000;
  64292. end;
  64293. procedure TDMAC0_DCH0INT.clearCHDDIE; inline;
  64294. begin
  64295. pTDefRegMap(@Self)^.clr := $00200000;
  64296. end;
  64297. procedure TDMAC0_DCH0INT.setCHDDIE(thebits : TBits_1); inline;
  64298. begin
  64299. if thebits = 0 then
  64300. pTDefRegMap(@Self)^.clr := $00200000
  64301. else
  64302. pTDefRegMap(@Self)^.&set := $00200000;
  64303. end;
  64304. function TDMAC0_DCH0INT.getCHDDIE : TBits_1; inline;
  64305. begin
  64306. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  64307. end;
  64308. procedure TDMAC0_DCH0INT.setCHSHIE; inline;
  64309. begin
  64310. pTDefRegMap(@Self)^.&set := $00400000;
  64311. end;
  64312. procedure TDMAC0_DCH0INT.clearCHSHIE; inline;
  64313. begin
  64314. pTDefRegMap(@Self)^.clr := $00400000;
  64315. end;
  64316. procedure TDMAC0_DCH0INT.setCHSHIE(thebits : TBits_1); inline;
  64317. begin
  64318. if thebits = 0 then
  64319. pTDefRegMap(@Self)^.clr := $00400000
  64320. else
  64321. pTDefRegMap(@Self)^.&set := $00400000;
  64322. end;
  64323. function TDMAC0_DCH0INT.getCHSHIE : TBits_1; inline;
  64324. begin
  64325. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  64326. end;
  64327. procedure TDMAC0_DCH0INT.setCHSDIE; inline;
  64328. begin
  64329. pTDefRegMap(@Self)^.&set := $00800000;
  64330. end;
  64331. procedure TDMAC0_DCH0INT.clearCHSDIE; inline;
  64332. begin
  64333. pTDefRegMap(@Self)^.clr := $00800000;
  64334. end;
  64335. procedure TDMAC0_DCH0INT.setCHSDIE(thebits : TBits_1); inline;
  64336. begin
  64337. if thebits = 0 then
  64338. pTDefRegMap(@Self)^.clr := $00800000
  64339. else
  64340. pTDefRegMap(@Self)^.&set := $00800000;
  64341. end;
  64342. function TDMAC0_DCH0INT.getCHSDIE : TBits_1; inline;
  64343. begin
  64344. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  64345. end;
  64346. procedure TDMAC0_DCH0INT.setw(thebits : TBits_32); inline;
  64347. begin
  64348. pTDefRegMap(@Self)^.val := thebits;
  64349. end;
  64350. function TDMAC0_DCH0INT.getw : TBits_32; inline;
  64351. begin
  64352. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64353. end;
  64354. procedure TDMAC1_DCH1CON.setCHPRI(thebits : TBits_2); inline;
  64355. begin
  64356. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  64357. end;
  64358. function TDMAC1_DCH1CON.getCHPRI : TBits_2; inline;
  64359. begin
  64360. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  64361. end;
  64362. procedure TDMAC1_DCH1CON.setCHEDET; inline;
  64363. begin
  64364. pTDefRegMap(@Self)^.&set := $00000004;
  64365. end;
  64366. procedure TDMAC1_DCH1CON.clearCHEDET; inline;
  64367. begin
  64368. pTDefRegMap(@Self)^.clr := $00000004;
  64369. end;
  64370. procedure TDMAC1_DCH1CON.setCHEDET(thebits : TBits_1); inline;
  64371. begin
  64372. if thebits = 0 then
  64373. pTDefRegMap(@Self)^.clr := $00000004
  64374. else
  64375. pTDefRegMap(@Self)^.&set := $00000004;
  64376. end;
  64377. function TDMAC1_DCH1CON.getCHEDET : TBits_1; inline;
  64378. begin
  64379. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64380. end;
  64381. procedure TDMAC1_DCH1CON.setCHAEN; inline;
  64382. begin
  64383. pTDefRegMap(@Self)^.&set := $00000010;
  64384. end;
  64385. procedure TDMAC1_DCH1CON.clearCHAEN; inline;
  64386. begin
  64387. pTDefRegMap(@Self)^.clr := $00000010;
  64388. end;
  64389. procedure TDMAC1_DCH1CON.setCHAEN(thebits : TBits_1); inline;
  64390. begin
  64391. if thebits = 0 then
  64392. pTDefRegMap(@Self)^.clr := $00000010
  64393. else
  64394. pTDefRegMap(@Self)^.&set := $00000010;
  64395. end;
  64396. function TDMAC1_DCH1CON.getCHAEN : TBits_1; inline;
  64397. begin
  64398. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64399. end;
  64400. procedure TDMAC1_DCH1CON.setCHCHN; inline;
  64401. begin
  64402. pTDefRegMap(@Self)^.&set := $00000020;
  64403. end;
  64404. procedure TDMAC1_DCH1CON.clearCHCHN; inline;
  64405. begin
  64406. pTDefRegMap(@Self)^.clr := $00000020;
  64407. end;
  64408. procedure TDMAC1_DCH1CON.setCHCHN(thebits : TBits_1); inline;
  64409. begin
  64410. if thebits = 0 then
  64411. pTDefRegMap(@Self)^.clr := $00000020
  64412. else
  64413. pTDefRegMap(@Self)^.&set := $00000020;
  64414. end;
  64415. function TDMAC1_DCH1CON.getCHCHN : TBits_1; inline;
  64416. begin
  64417. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64418. end;
  64419. procedure TDMAC1_DCH1CON.setCHAED; inline;
  64420. begin
  64421. pTDefRegMap(@Self)^.&set := $00000040;
  64422. end;
  64423. procedure TDMAC1_DCH1CON.clearCHAED; inline;
  64424. begin
  64425. pTDefRegMap(@Self)^.clr := $00000040;
  64426. end;
  64427. procedure TDMAC1_DCH1CON.setCHAED(thebits : TBits_1); inline;
  64428. begin
  64429. if thebits = 0 then
  64430. pTDefRegMap(@Self)^.clr := $00000040
  64431. else
  64432. pTDefRegMap(@Self)^.&set := $00000040;
  64433. end;
  64434. function TDMAC1_DCH1CON.getCHAED : TBits_1; inline;
  64435. begin
  64436. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64437. end;
  64438. procedure TDMAC1_DCH1CON.setCHEN; inline;
  64439. begin
  64440. pTDefRegMap(@Self)^.&set := $00000080;
  64441. end;
  64442. procedure TDMAC1_DCH1CON.clearCHEN; inline;
  64443. begin
  64444. pTDefRegMap(@Self)^.clr := $00000080;
  64445. end;
  64446. procedure TDMAC1_DCH1CON.setCHEN(thebits : TBits_1); inline;
  64447. begin
  64448. if thebits = 0 then
  64449. pTDefRegMap(@Self)^.clr := $00000080
  64450. else
  64451. pTDefRegMap(@Self)^.&set := $00000080;
  64452. end;
  64453. function TDMAC1_DCH1CON.getCHEN : TBits_1; inline;
  64454. begin
  64455. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64456. end;
  64457. procedure TDMAC1_DCH1CON.setCHCHNS; inline;
  64458. begin
  64459. pTDefRegMap(@Self)^.&set := $00000100;
  64460. end;
  64461. procedure TDMAC1_DCH1CON.clearCHCHNS; inline;
  64462. begin
  64463. pTDefRegMap(@Self)^.clr := $00000100;
  64464. end;
  64465. procedure TDMAC1_DCH1CON.setCHCHNS(thebits : TBits_1); inline;
  64466. begin
  64467. if thebits = 0 then
  64468. pTDefRegMap(@Self)^.clr := $00000100
  64469. else
  64470. pTDefRegMap(@Self)^.&set := $00000100;
  64471. end;
  64472. function TDMAC1_DCH1CON.getCHCHNS : TBits_1; inline;
  64473. begin
  64474. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  64475. end;
  64476. procedure TDMAC1_DCH1CON.setCHBUSY; inline;
  64477. begin
  64478. pTDefRegMap(@Self)^.&set := $00008000;
  64479. end;
  64480. procedure TDMAC1_DCH1CON.clearCHBUSY; inline;
  64481. begin
  64482. pTDefRegMap(@Self)^.clr := $00008000;
  64483. end;
  64484. procedure TDMAC1_DCH1CON.setCHBUSY(thebits : TBits_1); inline;
  64485. begin
  64486. if thebits = 0 then
  64487. pTDefRegMap(@Self)^.clr := $00008000
  64488. else
  64489. pTDefRegMap(@Self)^.&set := $00008000;
  64490. end;
  64491. function TDMAC1_DCH1CON.getCHBUSY : TBits_1; inline;
  64492. begin
  64493. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64494. end;
  64495. procedure TDMAC1_DCH1CON.setw(thebits : TBits_32); inline;
  64496. begin
  64497. pTDefRegMap(@Self)^.val := thebits;
  64498. end;
  64499. function TDMAC1_DCH1CON.getw : TBits_32; inline;
  64500. begin
  64501. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64502. end;
  64503. procedure TDMAC1_DCH1ECON.setAIRQEN; inline;
  64504. begin
  64505. pTDefRegMap(@Self)^.&set := $00000008;
  64506. end;
  64507. procedure TDMAC1_DCH1ECON.clearAIRQEN; inline;
  64508. begin
  64509. pTDefRegMap(@Self)^.clr := $00000008;
  64510. end;
  64511. procedure TDMAC1_DCH1ECON.setAIRQEN(thebits : TBits_1); inline;
  64512. begin
  64513. if thebits = 0 then
  64514. pTDefRegMap(@Self)^.clr := $00000008
  64515. else
  64516. pTDefRegMap(@Self)^.&set := $00000008;
  64517. end;
  64518. function TDMAC1_DCH1ECON.getAIRQEN : TBits_1; inline;
  64519. begin
  64520. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64521. end;
  64522. procedure TDMAC1_DCH1ECON.setSIRQEN; inline;
  64523. begin
  64524. pTDefRegMap(@Self)^.&set := $00000010;
  64525. end;
  64526. procedure TDMAC1_DCH1ECON.clearSIRQEN; inline;
  64527. begin
  64528. pTDefRegMap(@Self)^.clr := $00000010;
  64529. end;
  64530. procedure TDMAC1_DCH1ECON.setSIRQEN(thebits : TBits_1); inline;
  64531. begin
  64532. if thebits = 0 then
  64533. pTDefRegMap(@Self)^.clr := $00000010
  64534. else
  64535. pTDefRegMap(@Self)^.&set := $00000010;
  64536. end;
  64537. function TDMAC1_DCH1ECON.getSIRQEN : TBits_1; inline;
  64538. begin
  64539. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64540. end;
  64541. procedure TDMAC1_DCH1ECON.setPATEN; inline;
  64542. begin
  64543. pTDefRegMap(@Self)^.&set := $00000020;
  64544. end;
  64545. procedure TDMAC1_DCH1ECON.clearPATEN; inline;
  64546. begin
  64547. pTDefRegMap(@Self)^.clr := $00000020;
  64548. end;
  64549. procedure TDMAC1_DCH1ECON.setPATEN(thebits : TBits_1); inline;
  64550. begin
  64551. if thebits = 0 then
  64552. pTDefRegMap(@Self)^.clr := $00000020
  64553. else
  64554. pTDefRegMap(@Self)^.&set := $00000020;
  64555. end;
  64556. function TDMAC1_DCH1ECON.getPATEN : TBits_1; inline;
  64557. begin
  64558. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64559. end;
  64560. procedure TDMAC1_DCH1ECON.setCABORT; inline;
  64561. begin
  64562. pTDefRegMap(@Self)^.&set := $00000040;
  64563. end;
  64564. procedure TDMAC1_DCH1ECON.clearCABORT; inline;
  64565. begin
  64566. pTDefRegMap(@Self)^.clr := $00000040;
  64567. end;
  64568. procedure TDMAC1_DCH1ECON.setCABORT(thebits : TBits_1); inline;
  64569. begin
  64570. if thebits = 0 then
  64571. pTDefRegMap(@Self)^.clr := $00000040
  64572. else
  64573. pTDefRegMap(@Self)^.&set := $00000040;
  64574. end;
  64575. function TDMAC1_DCH1ECON.getCABORT : TBits_1; inline;
  64576. begin
  64577. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64578. end;
  64579. procedure TDMAC1_DCH1ECON.setCFORCE; inline;
  64580. begin
  64581. pTDefRegMap(@Self)^.&set := $00000080;
  64582. end;
  64583. procedure TDMAC1_DCH1ECON.clearCFORCE; inline;
  64584. begin
  64585. pTDefRegMap(@Self)^.clr := $00000080;
  64586. end;
  64587. procedure TDMAC1_DCH1ECON.setCFORCE(thebits : TBits_1); inline;
  64588. begin
  64589. if thebits = 0 then
  64590. pTDefRegMap(@Self)^.clr := $00000080
  64591. else
  64592. pTDefRegMap(@Self)^.&set := $00000080;
  64593. end;
  64594. function TDMAC1_DCH1ECON.getCFORCE : TBits_1; inline;
  64595. begin
  64596. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64597. end;
  64598. procedure TDMAC1_DCH1ECON.setCHSIRQ(thebits : TBits_8); inline;
  64599. begin
  64600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64601. end;
  64602. function TDMAC1_DCH1ECON.getCHSIRQ : TBits_8; inline;
  64603. begin
  64604. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64605. end;
  64606. procedure TDMAC1_DCH1ECON.setCHAIRQ(thebits : TBits_8); inline;
  64607. begin
  64608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  64609. end;
  64610. function TDMAC1_DCH1ECON.getCHAIRQ : TBits_8; inline;
  64611. begin
  64612. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  64613. end;
  64614. procedure TDMAC1_DCH1ECON.setw(thebits : TBits_32); inline;
  64615. begin
  64616. pTDefRegMap(@Self)^.val := thebits;
  64617. end;
  64618. function TDMAC1_DCH1ECON.getw : TBits_32; inline;
  64619. begin
  64620. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64621. end;
  64622. procedure TDMAC1_DCH1INT.setCHERIF; inline;
  64623. begin
  64624. pTDefRegMap(@Self)^.&set := $00000001;
  64625. end;
  64626. procedure TDMAC1_DCH1INT.clearCHERIF; inline;
  64627. begin
  64628. pTDefRegMap(@Self)^.clr := $00000001;
  64629. end;
  64630. procedure TDMAC1_DCH1INT.setCHERIF(thebits : TBits_1); inline;
  64631. begin
  64632. if thebits = 0 then
  64633. pTDefRegMap(@Self)^.clr := $00000001
  64634. else
  64635. pTDefRegMap(@Self)^.&set := $00000001;
  64636. end;
  64637. function TDMAC1_DCH1INT.getCHERIF : TBits_1; inline;
  64638. begin
  64639. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64640. end;
  64641. procedure TDMAC1_DCH1INT.setCHTAIF; inline;
  64642. begin
  64643. pTDefRegMap(@Self)^.&set := $00000002;
  64644. end;
  64645. procedure TDMAC1_DCH1INT.clearCHTAIF; inline;
  64646. begin
  64647. pTDefRegMap(@Self)^.clr := $00000002;
  64648. end;
  64649. procedure TDMAC1_DCH1INT.setCHTAIF(thebits : TBits_1); inline;
  64650. begin
  64651. if thebits = 0 then
  64652. pTDefRegMap(@Self)^.clr := $00000002
  64653. else
  64654. pTDefRegMap(@Self)^.&set := $00000002;
  64655. end;
  64656. function TDMAC1_DCH1INT.getCHTAIF : TBits_1; inline;
  64657. begin
  64658. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64659. end;
  64660. procedure TDMAC1_DCH1INT.setCHCCIF; inline;
  64661. begin
  64662. pTDefRegMap(@Self)^.&set := $00000004;
  64663. end;
  64664. procedure TDMAC1_DCH1INT.clearCHCCIF; inline;
  64665. begin
  64666. pTDefRegMap(@Self)^.clr := $00000004;
  64667. end;
  64668. procedure TDMAC1_DCH1INT.setCHCCIF(thebits : TBits_1); inline;
  64669. begin
  64670. if thebits = 0 then
  64671. pTDefRegMap(@Self)^.clr := $00000004
  64672. else
  64673. pTDefRegMap(@Self)^.&set := $00000004;
  64674. end;
  64675. function TDMAC1_DCH1INT.getCHCCIF : TBits_1; inline;
  64676. begin
  64677. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64678. end;
  64679. procedure TDMAC1_DCH1INT.setCHBCIF; inline;
  64680. begin
  64681. pTDefRegMap(@Self)^.&set := $00000008;
  64682. end;
  64683. procedure TDMAC1_DCH1INT.clearCHBCIF; inline;
  64684. begin
  64685. pTDefRegMap(@Self)^.clr := $00000008;
  64686. end;
  64687. procedure TDMAC1_DCH1INT.setCHBCIF(thebits : TBits_1); inline;
  64688. begin
  64689. if thebits = 0 then
  64690. pTDefRegMap(@Self)^.clr := $00000008
  64691. else
  64692. pTDefRegMap(@Self)^.&set := $00000008;
  64693. end;
  64694. function TDMAC1_DCH1INT.getCHBCIF : TBits_1; inline;
  64695. begin
  64696. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64697. end;
  64698. procedure TDMAC1_DCH1INT.setCHDHIF; inline;
  64699. begin
  64700. pTDefRegMap(@Self)^.&set := $00000010;
  64701. end;
  64702. procedure TDMAC1_DCH1INT.clearCHDHIF; inline;
  64703. begin
  64704. pTDefRegMap(@Self)^.clr := $00000010;
  64705. end;
  64706. procedure TDMAC1_DCH1INT.setCHDHIF(thebits : TBits_1); inline;
  64707. begin
  64708. if thebits = 0 then
  64709. pTDefRegMap(@Self)^.clr := $00000010
  64710. else
  64711. pTDefRegMap(@Self)^.&set := $00000010;
  64712. end;
  64713. function TDMAC1_DCH1INT.getCHDHIF : TBits_1; inline;
  64714. begin
  64715. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64716. end;
  64717. procedure TDMAC1_DCH1INT.setCHDDIF; inline;
  64718. begin
  64719. pTDefRegMap(@Self)^.&set := $00000020;
  64720. end;
  64721. procedure TDMAC1_DCH1INT.clearCHDDIF; inline;
  64722. begin
  64723. pTDefRegMap(@Self)^.clr := $00000020;
  64724. end;
  64725. procedure TDMAC1_DCH1INT.setCHDDIF(thebits : TBits_1); inline;
  64726. begin
  64727. if thebits = 0 then
  64728. pTDefRegMap(@Self)^.clr := $00000020
  64729. else
  64730. pTDefRegMap(@Self)^.&set := $00000020;
  64731. end;
  64732. function TDMAC1_DCH1INT.getCHDDIF : TBits_1; inline;
  64733. begin
  64734. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64735. end;
  64736. procedure TDMAC1_DCH1INT.setCHSHIF; inline;
  64737. begin
  64738. pTDefRegMap(@Self)^.&set := $00000040;
  64739. end;
  64740. procedure TDMAC1_DCH1INT.clearCHSHIF; inline;
  64741. begin
  64742. pTDefRegMap(@Self)^.clr := $00000040;
  64743. end;
  64744. procedure TDMAC1_DCH1INT.setCHSHIF(thebits : TBits_1); inline;
  64745. begin
  64746. if thebits = 0 then
  64747. pTDefRegMap(@Self)^.clr := $00000040
  64748. else
  64749. pTDefRegMap(@Self)^.&set := $00000040;
  64750. end;
  64751. function TDMAC1_DCH1INT.getCHSHIF : TBits_1; inline;
  64752. begin
  64753. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64754. end;
  64755. procedure TDMAC1_DCH1INT.setCHSDIF; inline;
  64756. begin
  64757. pTDefRegMap(@Self)^.&set := $00000080;
  64758. end;
  64759. procedure TDMAC1_DCH1INT.clearCHSDIF; inline;
  64760. begin
  64761. pTDefRegMap(@Self)^.clr := $00000080;
  64762. end;
  64763. procedure TDMAC1_DCH1INT.setCHSDIF(thebits : TBits_1); inline;
  64764. begin
  64765. if thebits = 0 then
  64766. pTDefRegMap(@Self)^.clr := $00000080
  64767. else
  64768. pTDefRegMap(@Self)^.&set := $00000080;
  64769. end;
  64770. function TDMAC1_DCH1INT.getCHSDIF : TBits_1; inline;
  64771. begin
  64772. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64773. end;
  64774. procedure TDMAC1_DCH1INT.setCHERIE; inline;
  64775. begin
  64776. pTDefRegMap(@Self)^.&set := $00010000;
  64777. end;
  64778. procedure TDMAC1_DCH1INT.clearCHERIE; inline;
  64779. begin
  64780. pTDefRegMap(@Self)^.clr := $00010000;
  64781. end;
  64782. procedure TDMAC1_DCH1INT.setCHERIE(thebits : TBits_1); inline;
  64783. begin
  64784. if thebits = 0 then
  64785. pTDefRegMap(@Self)^.clr := $00010000
  64786. else
  64787. pTDefRegMap(@Self)^.&set := $00010000;
  64788. end;
  64789. function TDMAC1_DCH1INT.getCHERIE : TBits_1; inline;
  64790. begin
  64791. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  64792. end;
  64793. procedure TDMAC1_DCH1INT.setCHTAIE; inline;
  64794. begin
  64795. pTDefRegMap(@Self)^.&set := $00020000;
  64796. end;
  64797. procedure TDMAC1_DCH1INT.clearCHTAIE; inline;
  64798. begin
  64799. pTDefRegMap(@Self)^.clr := $00020000;
  64800. end;
  64801. procedure TDMAC1_DCH1INT.setCHTAIE(thebits : TBits_1); inline;
  64802. begin
  64803. if thebits = 0 then
  64804. pTDefRegMap(@Self)^.clr := $00020000
  64805. else
  64806. pTDefRegMap(@Self)^.&set := $00020000;
  64807. end;
  64808. function TDMAC1_DCH1INT.getCHTAIE : TBits_1; inline;
  64809. begin
  64810. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  64811. end;
  64812. procedure TDMAC1_DCH1INT.setCHCCIE; inline;
  64813. begin
  64814. pTDefRegMap(@Self)^.&set := $00040000;
  64815. end;
  64816. procedure TDMAC1_DCH1INT.clearCHCCIE; inline;
  64817. begin
  64818. pTDefRegMap(@Self)^.clr := $00040000;
  64819. end;
  64820. procedure TDMAC1_DCH1INT.setCHCCIE(thebits : TBits_1); inline;
  64821. begin
  64822. if thebits = 0 then
  64823. pTDefRegMap(@Self)^.clr := $00040000
  64824. else
  64825. pTDefRegMap(@Self)^.&set := $00040000;
  64826. end;
  64827. function TDMAC1_DCH1INT.getCHCCIE : TBits_1; inline;
  64828. begin
  64829. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  64830. end;
  64831. procedure TDMAC1_DCH1INT.setCHBCIE; inline;
  64832. begin
  64833. pTDefRegMap(@Self)^.&set := $00080000;
  64834. end;
  64835. procedure TDMAC1_DCH1INT.clearCHBCIE; inline;
  64836. begin
  64837. pTDefRegMap(@Self)^.clr := $00080000;
  64838. end;
  64839. procedure TDMAC1_DCH1INT.setCHBCIE(thebits : TBits_1); inline;
  64840. begin
  64841. if thebits = 0 then
  64842. pTDefRegMap(@Self)^.clr := $00080000
  64843. else
  64844. pTDefRegMap(@Self)^.&set := $00080000;
  64845. end;
  64846. function TDMAC1_DCH1INT.getCHBCIE : TBits_1; inline;
  64847. begin
  64848. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64849. end;
  64850. procedure TDMAC1_DCH1INT.setCHDHIE; inline;
  64851. begin
  64852. pTDefRegMap(@Self)^.&set := $00100000;
  64853. end;
  64854. procedure TDMAC1_DCH1INT.clearCHDHIE; inline;
  64855. begin
  64856. pTDefRegMap(@Self)^.clr := $00100000;
  64857. end;
  64858. procedure TDMAC1_DCH1INT.setCHDHIE(thebits : TBits_1); inline;
  64859. begin
  64860. if thebits = 0 then
  64861. pTDefRegMap(@Self)^.clr := $00100000
  64862. else
  64863. pTDefRegMap(@Self)^.&set := $00100000;
  64864. end;
  64865. function TDMAC1_DCH1INT.getCHDHIE : TBits_1; inline;
  64866. begin
  64867. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  64868. end;
  64869. procedure TDMAC1_DCH1INT.setCHDDIE; inline;
  64870. begin
  64871. pTDefRegMap(@Self)^.&set := $00200000;
  64872. end;
  64873. procedure TDMAC1_DCH1INT.clearCHDDIE; inline;
  64874. begin
  64875. pTDefRegMap(@Self)^.clr := $00200000;
  64876. end;
  64877. procedure TDMAC1_DCH1INT.setCHDDIE(thebits : TBits_1); inline;
  64878. begin
  64879. if thebits = 0 then
  64880. pTDefRegMap(@Self)^.clr := $00200000
  64881. else
  64882. pTDefRegMap(@Self)^.&set := $00200000;
  64883. end;
  64884. function TDMAC1_DCH1INT.getCHDDIE : TBits_1; inline;
  64885. begin
  64886. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  64887. end;
  64888. procedure TDMAC1_DCH1INT.setCHSHIE; inline;
  64889. begin
  64890. pTDefRegMap(@Self)^.&set := $00400000;
  64891. end;
  64892. procedure TDMAC1_DCH1INT.clearCHSHIE; inline;
  64893. begin
  64894. pTDefRegMap(@Self)^.clr := $00400000;
  64895. end;
  64896. procedure TDMAC1_DCH1INT.setCHSHIE(thebits : TBits_1); inline;
  64897. begin
  64898. if thebits = 0 then
  64899. pTDefRegMap(@Self)^.clr := $00400000
  64900. else
  64901. pTDefRegMap(@Self)^.&set := $00400000;
  64902. end;
  64903. function TDMAC1_DCH1INT.getCHSHIE : TBits_1; inline;
  64904. begin
  64905. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  64906. end;
  64907. procedure TDMAC1_DCH1INT.setCHSDIE; inline;
  64908. begin
  64909. pTDefRegMap(@Self)^.&set := $00800000;
  64910. end;
  64911. procedure TDMAC1_DCH1INT.clearCHSDIE; inline;
  64912. begin
  64913. pTDefRegMap(@Self)^.clr := $00800000;
  64914. end;
  64915. procedure TDMAC1_DCH1INT.setCHSDIE(thebits : TBits_1); inline;
  64916. begin
  64917. if thebits = 0 then
  64918. pTDefRegMap(@Self)^.clr := $00800000
  64919. else
  64920. pTDefRegMap(@Self)^.&set := $00800000;
  64921. end;
  64922. function TDMAC1_DCH1INT.getCHSDIE : TBits_1; inline;
  64923. begin
  64924. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  64925. end;
  64926. procedure TDMAC1_DCH1INT.setw(thebits : TBits_32); inline;
  64927. begin
  64928. pTDefRegMap(@Self)^.val := thebits;
  64929. end;
  64930. function TDMAC1_DCH1INT.getw : TBits_32; inline;
  64931. begin
  64932. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64933. end;
  64934. procedure TDMAC2_DCH2CON.setCHPRI(thebits : TBits_2); inline;
  64935. begin
  64936. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  64937. end;
  64938. function TDMAC2_DCH2CON.getCHPRI : TBits_2; inline;
  64939. begin
  64940. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  64941. end;
  64942. procedure TDMAC2_DCH2CON.setCHEDET; inline;
  64943. begin
  64944. pTDefRegMap(@Self)^.&set := $00000004;
  64945. end;
  64946. procedure TDMAC2_DCH2CON.clearCHEDET; inline;
  64947. begin
  64948. pTDefRegMap(@Self)^.clr := $00000004;
  64949. end;
  64950. procedure TDMAC2_DCH2CON.setCHEDET(thebits : TBits_1); inline;
  64951. begin
  64952. if thebits = 0 then
  64953. pTDefRegMap(@Self)^.clr := $00000004
  64954. else
  64955. pTDefRegMap(@Self)^.&set := $00000004;
  64956. end;
  64957. function TDMAC2_DCH2CON.getCHEDET : TBits_1; inline;
  64958. begin
  64959. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64960. end;
  64961. procedure TDMAC2_DCH2CON.setCHAEN; inline;
  64962. begin
  64963. pTDefRegMap(@Self)^.&set := $00000010;
  64964. end;
  64965. procedure TDMAC2_DCH2CON.clearCHAEN; inline;
  64966. begin
  64967. pTDefRegMap(@Self)^.clr := $00000010;
  64968. end;
  64969. procedure TDMAC2_DCH2CON.setCHAEN(thebits : TBits_1); inline;
  64970. begin
  64971. if thebits = 0 then
  64972. pTDefRegMap(@Self)^.clr := $00000010
  64973. else
  64974. pTDefRegMap(@Self)^.&set := $00000010;
  64975. end;
  64976. function TDMAC2_DCH2CON.getCHAEN : TBits_1; inline;
  64977. begin
  64978. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64979. end;
  64980. procedure TDMAC2_DCH2CON.setCHCHN; inline;
  64981. begin
  64982. pTDefRegMap(@Self)^.&set := $00000020;
  64983. end;
  64984. procedure TDMAC2_DCH2CON.clearCHCHN; inline;
  64985. begin
  64986. pTDefRegMap(@Self)^.clr := $00000020;
  64987. end;
  64988. procedure TDMAC2_DCH2CON.setCHCHN(thebits : TBits_1); inline;
  64989. begin
  64990. if thebits = 0 then
  64991. pTDefRegMap(@Self)^.clr := $00000020
  64992. else
  64993. pTDefRegMap(@Self)^.&set := $00000020;
  64994. end;
  64995. function TDMAC2_DCH2CON.getCHCHN : TBits_1; inline;
  64996. begin
  64997. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64998. end;
  64999. procedure TDMAC2_DCH2CON.setCHAED; inline;
  65000. begin
  65001. pTDefRegMap(@Self)^.&set := $00000040;
  65002. end;
  65003. procedure TDMAC2_DCH2CON.clearCHAED; inline;
  65004. begin
  65005. pTDefRegMap(@Self)^.clr := $00000040;
  65006. end;
  65007. procedure TDMAC2_DCH2CON.setCHAED(thebits : TBits_1); inline;
  65008. begin
  65009. if thebits = 0 then
  65010. pTDefRegMap(@Self)^.clr := $00000040
  65011. else
  65012. pTDefRegMap(@Self)^.&set := $00000040;
  65013. end;
  65014. function TDMAC2_DCH2CON.getCHAED : TBits_1; inline;
  65015. begin
  65016. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65017. end;
  65018. procedure TDMAC2_DCH2CON.setCHEN; inline;
  65019. begin
  65020. pTDefRegMap(@Self)^.&set := $00000080;
  65021. end;
  65022. procedure TDMAC2_DCH2CON.clearCHEN; inline;
  65023. begin
  65024. pTDefRegMap(@Self)^.clr := $00000080;
  65025. end;
  65026. procedure TDMAC2_DCH2CON.setCHEN(thebits : TBits_1); inline;
  65027. begin
  65028. if thebits = 0 then
  65029. pTDefRegMap(@Self)^.clr := $00000080
  65030. else
  65031. pTDefRegMap(@Self)^.&set := $00000080;
  65032. end;
  65033. function TDMAC2_DCH2CON.getCHEN : TBits_1; inline;
  65034. begin
  65035. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65036. end;
  65037. procedure TDMAC2_DCH2CON.setCHCHNS; inline;
  65038. begin
  65039. pTDefRegMap(@Self)^.&set := $00000100;
  65040. end;
  65041. procedure TDMAC2_DCH2CON.clearCHCHNS; inline;
  65042. begin
  65043. pTDefRegMap(@Self)^.clr := $00000100;
  65044. end;
  65045. procedure TDMAC2_DCH2CON.setCHCHNS(thebits : TBits_1); inline;
  65046. begin
  65047. if thebits = 0 then
  65048. pTDefRegMap(@Self)^.clr := $00000100
  65049. else
  65050. pTDefRegMap(@Self)^.&set := $00000100;
  65051. end;
  65052. function TDMAC2_DCH2CON.getCHCHNS : TBits_1; inline;
  65053. begin
  65054. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65055. end;
  65056. procedure TDMAC2_DCH2CON.setCHBUSY; inline;
  65057. begin
  65058. pTDefRegMap(@Self)^.&set := $00008000;
  65059. end;
  65060. procedure TDMAC2_DCH2CON.clearCHBUSY; inline;
  65061. begin
  65062. pTDefRegMap(@Self)^.clr := $00008000;
  65063. end;
  65064. procedure TDMAC2_DCH2CON.setCHBUSY(thebits : TBits_1); inline;
  65065. begin
  65066. if thebits = 0 then
  65067. pTDefRegMap(@Self)^.clr := $00008000
  65068. else
  65069. pTDefRegMap(@Self)^.&set := $00008000;
  65070. end;
  65071. function TDMAC2_DCH2CON.getCHBUSY : TBits_1; inline;
  65072. begin
  65073. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65074. end;
  65075. procedure TDMAC2_DCH2CON.setw(thebits : TBits_32); inline;
  65076. begin
  65077. pTDefRegMap(@Self)^.val := thebits;
  65078. end;
  65079. function TDMAC2_DCH2CON.getw : TBits_32; inline;
  65080. begin
  65081. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65082. end;
  65083. procedure TDMAC2_DCH2ECON.setAIRQEN; inline;
  65084. begin
  65085. pTDefRegMap(@Self)^.&set := $00000008;
  65086. end;
  65087. procedure TDMAC2_DCH2ECON.clearAIRQEN; inline;
  65088. begin
  65089. pTDefRegMap(@Self)^.clr := $00000008;
  65090. end;
  65091. procedure TDMAC2_DCH2ECON.setAIRQEN(thebits : TBits_1); inline;
  65092. begin
  65093. if thebits = 0 then
  65094. pTDefRegMap(@Self)^.clr := $00000008
  65095. else
  65096. pTDefRegMap(@Self)^.&set := $00000008;
  65097. end;
  65098. function TDMAC2_DCH2ECON.getAIRQEN : TBits_1; inline;
  65099. begin
  65100. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65101. end;
  65102. procedure TDMAC2_DCH2ECON.setSIRQEN; inline;
  65103. begin
  65104. pTDefRegMap(@Self)^.&set := $00000010;
  65105. end;
  65106. procedure TDMAC2_DCH2ECON.clearSIRQEN; inline;
  65107. begin
  65108. pTDefRegMap(@Self)^.clr := $00000010;
  65109. end;
  65110. procedure TDMAC2_DCH2ECON.setSIRQEN(thebits : TBits_1); inline;
  65111. begin
  65112. if thebits = 0 then
  65113. pTDefRegMap(@Self)^.clr := $00000010
  65114. else
  65115. pTDefRegMap(@Self)^.&set := $00000010;
  65116. end;
  65117. function TDMAC2_DCH2ECON.getSIRQEN : TBits_1; inline;
  65118. begin
  65119. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65120. end;
  65121. procedure TDMAC2_DCH2ECON.setPATEN; inline;
  65122. begin
  65123. pTDefRegMap(@Self)^.&set := $00000020;
  65124. end;
  65125. procedure TDMAC2_DCH2ECON.clearPATEN; inline;
  65126. begin
  65127. pTDefRegMap(@Self)^.clr := $00000020;
  65128. end;
  65129. procedure TDMAC2_DCH2ECON.setPATEN(thebits : TBits_1); inline;
  65130. begin
  65131. if thebits = 0 then
  65132. pTDefRegMap(@Self)^.clr := $00000020
  65133. else
  65134. pTDefRegMap(@Self)^.&set := $00000020;
  65135. end;
  65136. function TDMAC2_DCH2ECON.getPATEN : TBits_1; inline;
  65137. begin
  65138. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65139. end;
  65140. procedure TDMAC2_DCH2ECON.setCABORT; inline;
  65141. begin
  65142. pTDefRegMap(@Self)^.&set := $00000040;
  65143. end;
  65144. procedure TDMAC2_DCH2ECON.clearCABORT; inline;
  65145. begin
  65146. pTDefRegMap(@Self)^.clr := $00000040;
  65147. end;
  65148. procedure TDMAC2_DCH2ECON.setCABORT(thebits : TBits_1); inline;
  65149. begin
  65150. if thebits = 0 then
  65151. pTDefRegMap(@Self)^.clr := $00000040
  65152. else
  65153. pTDefRegMap(@Self)^.&set := $00000040;
  65154. end;
  65155. function TDMAC2_DCH2ECON.getCABORT : TBits_1; inline;
  65156. begin
  65157. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65158. end;
  65159. procedure TDMAC2_DCH2ECON.setCFORCE; inline;
  65160. begin
  65161. pTDefRegMap(@Self)^.&set := $00000080;
  65162. end;
  65163. procedure TDMAC2_DCH2ECON.clearCFORCE; inline;
  65164. begin
  65165. pTDefRegMap(@Self)^.clr := $00000080;
  65166. end;
  65167. procedure TDMAC2_DCH2ECON.setCFORCE(thebits : TBits_1); inline;
  65168. begin
  65169. if thebits = 0 then
  65170. pTDefRegMap(@Self)^.clr := $00000080
  65171. else
  65172. pTDefRegMap(@Self)^.&set := $00000080;
  65173. end;
  65174. function TDMAC2_DCH2ECON.getCFORCE : TBits_1; inline;
  65175. begin
  65176. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65177. end;
  65178. procedure TDMAC2_DCH2ECON.setCHSIRQ(thebits : TBits_8); inline;
  65179. begin
  65180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  65181. end;
  65182. function TDMAC2_DCH2ECON.getCHSIRQ : TBits_8; inline;
  65183. begin
  65184. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  65185. end;
  65186. procedure TDMAC2_DCH2ECON.setCHAIRQ(thebits : TBits_8); inline;
  65187. begin
  65188. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  65189. end;
  65190. function TDMAC2_DCH2ECON.getCHAIRQ : TBits_8; inline;
  65191. begin
  65192. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  65193. end;
  65194. procedure TDMAC2_DCH2ECON.setw(thebits : TBits_32); inline;
  65195. begin
  65196. pTDefRegMap(@Self)^.val := thebits;
  65197. end;
  65198. function TDMAC2_DCH2ECON.getw : TBits_32; inline;
  65199. begin
  65200. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65201. end;
  65202. procedure TDMAC2_DCH2INT.setCHERIF; inline;
  65203. begin
  65204. pTDefRegMap(@Self)^.&set := $00000001;
  65205. end;
  65206. procedure TDMAC2_DCH2INT.clearCHERIF; inline;
  65207. begin
  65208. pTDefRegMap(@Self)^.clr := $00000001;
  65209. end;
  65210. procedure TDMAC2_DCH2INT.setCHERIF(thebits : TBits_1); inline;
  65211. begin
  65212. if thebits = 0 then
  65213. pTDefRegMap(@Self)^.clr := $00000001
  65214. else
  65215. pTDefRegMap(@Self)^.&set := $00000001;
  65216. end;
  65217. function TDMAC2_DCH2INT.getCHERIF : TBits_1; inline;
  65218. begin
  65219. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65220. end;
  65221. procedure TDMAC2_DCH2INT.setCHTAIF; inline;
  65222. begin
  65223. pTDefRegMap(@Self)^.&set := $00000002;
  65224. end;
  65225. procedure TDMAC2_DCH2INT.clearCHTAIF; inline;
  65226. begin
  65227. pTDefRegMap(@Self)^.clr := $00000002;
  65228. end;
  65229. procedure TDMAC2_DCH2INT.setCHTAIF(thebits : TBits_1); inline;
  65230. begin
  65231. if thebits = 0 then
  65232. pTDefRegMap(@Self)^.clr := $00000002
  65233. else
  65234. pTDefRegMap(@Self)^.&set := $00000002;
  65235. end;
  65236. function TDMAC2_DCH2INT.getCHTAIF : TBits_1; inline;
  65237. begin
  65238. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65239. end;
  65240. procedure TDMAC2_DCH2INT.setCHCCIF; inline;
  65241. begin
  65242. pTDefRegMap(@Self)^.&set := $00000004;
  65243. end;
  65244. procedure TDMAC2_DCH2INT.clearCHCCIF; inline;
  65245. begin
  65246. pTDefRegMap(@Self)^.clr := $00000004;
  65247. end;
  65248. procedure TDMAC2_DCH2INT.setCHCCIF(thebits : TBits_1); inline;
  65249. begin
  65250. if thebits = 0 then
  65251. pTDefRegMap(@Self)^.clr := $00000004
  65252. else
  65253. pTDefRegMap(@Self)^.&set := $00000004;
  65254. end;
  65255. function TDMAC2_DCH2INT.getCHCCIF : TBits_1; inline;
  65256. begin
  65257. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65258. end;
  65259. procedure TDMAC2_DCH2INT.setCHBCIF; inline;
  65260. begin
  65261. pTDefRegMap(@Self)^.&set := $00000008;
  65262. end;
  65263. procedure TDMAC2_DCH2INT.clearCHBCIF; inline;
  65264. begin
  65265. pTDefRegMap(@Self)^.clr := $00000008;
  65266. end;
  65267. procedure TDMAC2_DCH2INT.setCHBCIF(thebits : TBits_1); inline;
  65268. begin
  65269. if thebits = 0 then
  65270. pTDefRegMap(@Self)^.clr := $00000008
  65271. else
  65272. pTDefRegMap(@Self)^.&set := $00000008;
  65273. end;
  65274. function TDMAC2_DCH2INT.getCHBCIF : TBits_1; inline;
  65275. begin
  65276. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65277. end;
  65278. procedure TDMAC2_DCH2INT.setCHDHIF; inline;
  65279. begin
  65280. pTDefRegMap(@Self)^.&set := $00000010;
  65281. end;
  65282. procedure TDMAC2_DCH2INT.clearCHDHIF; inline;
  65283. begin
  65284. pTDefRegMap(@Self)^.clr := $00000010;
  65285. end;
  65286. procedure TDMAC2_DCH2INT.setCHDHIF(thebits : TBits_1); inline;
  65287. begin
  65288. if thebits = 0 then
  65289. pTDefRegMap(@Self)^.clr := $00000010
  65290. else
  65291. pTDefRegMap(@Self)^.&set := $00000010;
  65292. end;
  65293. function TDMAC2_DCH2INT.getCHDHIF : TBits_1; inline;
  65294. begin
  65295. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65296. end;
  65297. procedure TDMAC2_DCH2INT.setCHDDIF; inline;
  65298. begin
  65299. pTDefRegMap(@Self)^.&set := $00000020;
  65300. end;
  65301. procedure TDMAC2_DCH2INT.clearCHDDIF; inline;
  65302. begin
  65303. pTDefRegMap(@Self)^.clr := $00000020;
  65304. end;
  65305. procedure TDMAC2_DCH2INT.setCHDDIF(thebits : TBits_1); inline;
  65306. begin
  65307. if thebits = 0 then
  65308. pTDefRegMap(@Self)^.clr := $00000020
  65309. else
  65310. pTDefRegMap(@Self)^.&set := $00000020;
  65311. end;
  65312. function TDMAC2_DCH2INT.getCHDDIF : TBits_1; inline;
  65313. begin
  65314. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65315. end;
  65316. procedure TDMAC2_DCH2INT.setCHSHIF; inline;
  65317. begin
  65318. pTDefRegMap(@Self)^.&set := $00000040;
  65319. end;
  65320. procedure TDMAC2_DCH2INT.clearCHSHIF; inline;
  65321. begin
  65322. pTDefRegMap(@Self)^.clr := $00000040;
  65323. end;
  65324. procedure TDMAC2_DCH2INT.setCHSHIF(thebits : TBits_1); inline;
  65325. begin
  65326. if thebits = 0 then
  65327. pTDefRegMap(@Self)^.clr := $00000040
  65328. else
  65329. pTDefRegMap(@Self)^.&set := $00000040;
  65330. end;
  65331. function TDMAC2_DCH2INT.getCHSHIF : TBits_1; inline;
  65332. begin
  65333. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65334. end;
  65335. procedure TDMAC2_DCH2INT.setCHSDIF; inline;
  65336. begin
  65337. pTDefRegMap(@Self)^.&set := $00000080;
  65338. end;
  65339. procedure TDMAC2_DCH2INT.clearCHSDIF; inline;
  65340. begin
  65341. pTDefRegMap(@Self)^.clr := $00000080;
  65342. end;
  65343. procedure TDMAC2_DCH2INT.setCHSDIF(thebits : TBits_1); inline;
  65344. begin
  65345. if thebits = 0 then
  65346. pTDefRegMap(@Self)^.clr := $00000080
  65347. else
  65348. pTDefRegMap(@Self)^.&set := $00000080;
  65349. end;
  65350. function TDMAC2_DCH2INT.getCHSDIF : TBits_1; inline;
  65351. begin
  65352. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65353. end;
  65354. procedure TDMAC2_DCH2INT.setCHERIE; inline;
  65355. begin
  65356. pTDefRegMap(@Self)^.&set := $00010000;
  65357. end;
  65358. procedure TDMAC2_DCH2INT.clearCHERIE; inline;
  65359. begin
  65360. pTDefRegMap(@Self)^.clr := $00010000;
  65361. end;
  65362. procedure TDMAC2_DCH2INT.setCHERIE(thebits : TBits_1); inline;
  65363. begin
  65364. if thebits = 0 then
  65365. pTDefRegMap(@Self)^.clr := $00010000
  65366. else
  65367. pTDefRegMap(@Self)^.&set := $00010000;
  65368. end;
  65369. function TDMAC2_DCH2INT.getCHERIE : TBits_1; inline;
  65370. begin
  65371. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65372. end;
  65373. procedure TDMAC2_DCH2INT.setCHTAIE; inline;
  65374. begin
  65375. pTDefRegMap(@Self)^.&set := $00020000;
  65376. end;
  65377. procedure TDMAC2_DCH2INT.clearCHTAIE; inline;
  65378. begin
  65379. pTDefRegMap(@Self)^.clr := $00020000;
  65380. end;
  65381. procedure TDMAC2_DCH2INT.setCHTAIE(thebits : TBits_1); inline;
  65382. begin
  65383. if thebits = 0 then
  65384. pTDefRegMap(@Self)^.clr := $00020000
  65385. else
  65386. pTDefRegMap(@Self)^.&set := $00020000;
  65387. end;
  65388. function TDMAC2_DCH2INT.getCHTAIE : TBits_1; inline;
  65389. begin
  65390. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65391. end;
  65392. procedure TDMAC2_DCH2INT.setCHCCIE; inline;
  65393. begin
  65394. pTDefRegMap(@Self)^.&set := $00040000;
  65395. end;
  65396. procedure TDMAC2_DCH2INT.clearCHCCIE; inline;
  65397. begin
  65398. pTDefRegMap(@Self)^.clr := $00040000;
  65399. end;
  65400. procedure TDMAC2_DCH2INT.setCHCCIE(thebits : TBits_1); inline;
  65401. begin
  65402. if thebits = 0 then
  65403. pTDefRegMap(@Self)^.clr := $00040000
  65404. else
  65405. pTDefRegMap(@Self)^.&set := $00040000;
  65406. end;
  65407. function TDMAC2_DCH2INT.getCHCCIE : TBits_1; inline;
  65408. begin
  65409. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65410. end;
  65411. procedure TDMAC2_DCH2INT.setCHBCIE; inline;
  65412. begin
  65413. pTDefRegMap(@Self)^.&set := $00080000;
  65414. end;
  65415. procedure TDMAC2_DCH2INT.clearCHBCIE; inline;
  65416. begin
  65417. pTDefRegMap(@Self)^.clr := $00080000;
  65418. end;
  65419. procedure TDMAC2_DCH2INT.setCHBCIE(thebits : TBits_1); inline;
  65420. begin
  65421. if thebits = 0 then
  65422. pTDefRegMap(@Self)^.clr := $00080000
  65423. else
  65424. pTDefRegMap(@Self)^.&set := $00080000;
  65425. end;
  65426. function TDMAC2_DCH2INT.getCHBCIE : TBits_1; inline;
  65427. begin
  65428. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65429. end;
  65430. procedure TDMAC2_DCH2INT.setCHDHIE; inline;
  65431. begin
  65432. pTDefRegMap(@Self)^.&set := $00100000;
  65433. end;
  65434. procedure TDMAC2_DCH2INT.clearCHDHIE; inline;
  65435. begin
  65436. pTDefRegMap(@Self)^.clr := $00100000;
  65437. end;
  65438. procedure TDMAC2_DCH2INT.setCHDHIE(thebits : TBits_1); inline;
  65439. begin
  65440. if thebits = 0 then
  65441. pTDefRegMap(@Self)^.clr := $00100000
  65442. else
  65443. pTDefRegMap(@Self)^.&set := $00100000;
  65444. end;
  65445. function TDMAC2_DCH2INT.getCHDHIE : TBits_1; inline;
  65446. begin
  65447. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  65448. end;
  65449. procedure TDMAC2_DCH2INT.setCHDDIE; inline;
  65450. begin
  65451. pTDefRegMap(@Self)^.&set := $00200000;
  65452. end;
  65453. procedure TDMAC2_DCH2INT.clearCHDDIE; inline;
  65454. begin
  65455. pTDefRegMap(@Self)^.clr := $00200000;
  65456. end;
  65457. procedure TDMAC2_DCH2INT.setCHDDIE(thebits : TBits_1); inline;
  65458. begin
  65459. if thebits = 0 then
  65460. pTDefRegMap(@Self)^.clr := $00200000
  65461. else
  65462. pTDefRegMap(@Self)^.&set := $00200000;
  65463. end;
  65464. function TDMAC2_DCH2INT.getCHDDIE : TBits_1; inline;
  65465. begin
  65466. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  65467. end;
  65468. procedure TDMAC2_DCH2INT.setCHSHIE; inline;
  65469. begin
  65470. pTDefRegMap(@Self)^.&set := $00400000;
  65471. end;
  65472. procedure TDMAC2_DCH2INT.clearCHSHIE; inline;
  65473. begin
  65474. pTDefRegMap(@Self)^.clr := $00400000;
  65475. end;
  65476. procedure TDMAC2_DCH2INT.setCHSHIE(thebits : TBits_1); inline;
  65477. begin
  65478. if thebits = 0 then
  65479. pTDefRegMap(@Self)^.clr := $00400000
  65480. else
  65481. pTDefRegMap(@Self)^.&set := $00400000;
  65482. end;
  65483. function TDMAC2_DCH2INT.getCHSHIE : TBits_1; inline;
  65484. begin
  65485. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  65486. end;
  65487. procedure TDMAC2_DCH2INT.setCHSDIE; inline;
  65488. begin
  65489. pTDefRegMap(@Self)^.&set := $00800000;
  65490. end;
  65491. procedure TDMAC2_DCH2INT.clearCHSDIE; inline;
  65492. begin
  65493. pTDefRegMap(@Self)^.clr := $00800000;
  65494. end;
  65495. procedure TDMAC2_DCH2INT.setCHSDIE(thebits : TBits_1); inline;
  65496. begin
  65497. if thebits = 0 then
  65498. pTDefRegMap(@Self)^.clr := $00800000
  65499. else
  65500. pTDefRegMap(@Self)^.&set := $00800000;
  65501. end;
  65502. function TDMAC2_DCH2INT.getCHSDIE : TBits_1; inline;
  65503. begin
  65504. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  65505. end;
  65506. procedure TDMAC2_DCH2INT.setw(thebits : TBits_32); inline;
  65507. begin
  65508. pTDefRegMap(@Self)^.val := thebits;
  65509. end;
  65510. function TDMAC2_DCH2INT.getw : TBits_32; inline;
  65511. begin
  65512. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65513. end;
  65514. procedure TDMAC3_DCH3CON.setCHPRI(thebits : TBits_2); inline;
  65515. begin
  65516. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  65517. end;
  65518. function TDMAC3_DCH3CON.getCHPRI : TBits_2; inline;
  65519. begin
  65520. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  65521. end;
  65522. procedure TDMAC3_DCH3CON.setCHEDET; inline;
  65523. begin
  65524. pTDefRegMap(@Self)^.&set := $00000004;
  65525. end;
  65526. procedure TDMAC3_DCH3CON.clearCHEDET; inline;
  65527. begin
  65528. pTDefRegMap(@Self)^.clr := $00000004;
  65529. end;
  65530. procedure TDMAC3_DCH3CON.setCHEDET(thebits : TBits_1); inline;
  65531. begin
  65532. if thebits = 0 then
  65533. pTDefRegMap(@Self)^.clr := $00000004
  65534. else
  65535. pTDefRegMap(@Self)^.&set := $00000004;
  65536. end;
  65537. function TDMAC3_DCH3CON.getCHEDET : TBits_1; inline;
  65538. begin
  65539. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65540. end;
  65541. procedure TDMAC3_DCH3CON.setCHAEN; inline;
  65542. begin
  65543. pTDefRegMap(@Self)^.&set := $00000010;
  65544. end;
  65545. procedure TDMAC3_DCH3CON.clearCHAEN; inline;
  65546. begin
  65547. pTDefRegMap(@Self)^.clr := $00000010;
  65548. end;
  65549. procedure TDMAC3_DCH3CON.setCHAEN(thebits : TBits_1); inline;
  65550. begin
  65551. if thebits = 0 then
  65552. pTDefRegMap(@Self)^.clr := $00000010
  65553. else
  65554. pTDefRegMap(@Self)^.&set := $00000010;
  65555. end;
  65556. function TDMAC3_DCH3CON.getCHAEN : TBits_1; inline;
  65557. begin
  65558. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65559. end;
  65560. procedure TDMAC3_DCH3CON.setCHCHN; inline;
  65561. begin
  65562. pTDefRegMap(@Self)^.&set := $00000020;
  65563. end;
  65564. procedure TDMAC3_DCH3CON.clearCHCHN; inline;
  65565. begin
  65566. pTDefRegMap(@Self)^.clr := $00000020;
  65567. end;
  65568. procedure TDMAC3_DCH3CON.setCHCHN(thebits : TBits_1); inline;
  65569. begin
  65570. if thebits = 0 then
  65571. pTDefRegMap(@Self)^.clr := $00000020
  65572. else
  65573. pTDefRegMap(@Self)^.&set := $00000020;
  65574. end;
  65575. function TDMAC3_DCH3CON.getCHCHN : TBits_1; inline;
  65576. begin
  65577. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65578. end;
  65579. procedure TDMAC3_DCH3CON.setCHAED; inline;
  65580. begin
  65581. pTDefRegMap(@Self)^.&set := $00000040;
  65582. end;
  65583. procedure TDMAC3_DCH3CON.clearCHAED; inline;
  65584. begin
  65585. pTDefRegMap(@Self)^.clr := $00000040;
  65586. end;
  65587. procedure TDMAC3_DCH3CON.setCHAED(thebits : TBits_1); inline;
  65588. begin
  65589. if thebits = 0 then
  65590. pTDefRegMap(@Self)^.clr := $00000040
  65591. else
  65592. pTDefRegMap(@Self)^.&set := $00000040;
  65593. end;
  65594. function TDMAC3_DCH3CON.getCHAED : TBits_1; inline;
  65595. begin
  65596. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65597. end;
  65598. procedure TDMAC3_DCH3CON.setCHEN; inline;
  65599. begin
  65600. pTDefRegMap(@Self)^.&set := $00000080;
  65601. end;
  65602. procedure TDMAC3_DCH3CON.clearCHEN; inline;
  65603. begin
  65604. pTDefRegMap(@Self)^.clr := $00000080;
  65605. end;
  65606. procedure TDMAC3_DCH3CON.setCHEN(thebits : TBits_1); inline;
  65607. begin
  65608. if thebits = 0 then
  65609. pTDefRegMap(@Self)^.clr := $00000080
  65610. else
  65611. pTDefRegMap(@Self)^.&set := $00000080;
  65612. end;
  65613. function TDMAC3_DCH3CON.getCHEN : TBits_1; inline;
  65614. begin
  65615. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65616. end;
  65617. procedure TDMAC3_DCH3CON.setCHCHNS; inline;
  65618. begin
  65619. pTDefRegMap(@Self)^.&set := $00000100;
  65620. end;
  65621. procedure TDMAC3_DCH3CON.clearCHCHNS; inline;
  65622. begin
  65623. pTDefRegMap(@Self)^.clr := $00000100;
  65624. end;
  65625. procedure TDMAC3_DCH3CON.setCHCHNS(thebits : TBits_1); inline;
  65626. begin
  65627. if thebits = 0 then
  65628. pTDefRegMap(@Self)^.clr := $00000100
  65629. else
  65630. pTDefRegMap(@Self)^.&set := $00000100;
  65631. end;
  65632. function TDMAC3_DCH3CON.getCHCHNS : TBits_1; inline;
  65633. begin
  65634. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65635. end;
  65636. procedure TDMAC3_DCH3CON.setCHBUSY; inline;
  65637. begin
  65638. pTDefRegMap(@Self)^.&set := $00008000;
  65639. end;
  65640. procedure TDMAC3_DCH3CON.clearCHBUSY; inline;
  65641. begin
  65642. pTDefRegMap(@Self)^.clr := $00008000;
  65643. end;
  65644. procedure TDMAC3_DCH3CON.setCHBUSY(thebits : TBits_1); inline;
  65645. begin
  65646. if thebits = 0 then
  65647. pTDefRegMap(@Self)^.clr := $00008000
  65648. else
  65649. pTDefRegMap(@Self)^.&set := $00008000;
  65650. end;
  65651. function TDMAC3_DCH3CON.getCHBUSY : TBits_1; inline;
  65652. begin
  65653. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65654. end;
  65655. procedure TDMAC3_DCH3CON.setw(thebits : TBits_32); inline;
  65656. begin
  65657. pTDefRegMap(@Self)^.val := thebits;
  65658. end;
  65659. function TDMAC3_DCH3CON.getw : TBits_32; inline;
  65660. begin
  65661. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65662. end;
  65663. procedure TDMAC3_DCH3ECON.setAIRQEN; inline;
  65664. begin
  65665. pTDefRegMap(@Self)^.&set := $00000008;
  65666. end;
  65667. procedure TDMAC3_DCH3ECON.clearAIRQEN; inline;
  65668. begin
  65669. pTDefRegMap(@Self)^.clr := $00000008;
  65670. end;
  65671. procedure TDMAC3_DCH3ECON.setAIRQEN(thebits : TBits_1); inline;
  65672. begin
  65673. if thebits = 0 then
  65674. pTDefRegMap(@Self)^.clr := $00000008
  65675. else
  65676. pTDefRegMap(@Self)^.&set := $00000008;
  65677. end;
  65678. function TDMAC3_DCH3ECON.getAIRQEN : TBits_1; inline;
  65679. begin
  65680. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65681. end;
  65682. procedure TDMAC3_DCH3ECON.setSIRQEN; inline;
  65683. begin
  65684. pTDefRegMap(@Self)^.&set := $00000010;
  65685. end;
  65686. procedure TDMAC3_DCH3ECON.clearSIRQEN; inline;
  65687. begin
  65688. pTDefRegMap(@Self)^.clr := $00000010;
  65689. end;
  65690. procedure TDMAC3_DCH3ECON.setSIRQEN(thebits : TBits_1); inline;
  65691. begin
  65692. if thebits = 0 then
  65693. pTDefRegMap(@Self)^.clr := $00000010
  65694. else
  65695. pTDefRegMap(@Self)^.&set := $00000010;
  65696. end;
  65697. function TDMAC3_DCH3ECON.getSIRQEN : TBits_1; inline;
  65698. begin
  65699. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65700. end;
  65701. procedure TDMAC3_DCH3ECON.setPATEN; inline;
  65702. begin
  65703. pTDefRegMap(@Self)^.&set := $00000020;
  65704. end;
  65705. procedure TDMAC3_DCH3ECON.clearPATEN; inline;
  65706. begin
  65707. pTDefRegMap(@Self)^.clr := $00000020;
  65708. end;
  65709. procedure TDMAC3_DCH3ECON.setPATEN(thebits : TBits_1); inline;
  65710. begin
  65711. if thebits = 0 then
  65712. pTDefRegMap(@Self)^.clr := $00000020
  65713. else
  65714. pTDefRegMap(@Self)^.&set := $00000020;
  65715. end;
  65716. function TDMAC3_DCH3ECON.getPATEN : TBits_1; inline;
  65717. begin
  65718. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65719. end;
  65720. procedure TDMAC3_DCH3ECON.setCABORT; inline;
  65721. begin
  65722. pTDefRegMap(@Self)^.&set := $00000040;
  65723. end;
  65724. procedure TDMAC3_DCH3ECON.clearCABORT; inline;
  65725. begin
  65726. pTDefRegMap(@Self)^.clr := $00000040;
  65727. end;
  65728. procedure TDMAC3_DCH3ECON.setCABORT(thebits : TBits_1); inline;
  65729. begin
  65730. if thebits = 0 then
  65731. pTDefRegMap(@Self)^.clr := $00000040
  65732. else
  65733. pTDefRegMap(@Self)^.&set := $00000040;
  65734. end;
  65735. function TDMAC3_DCH3ECON.getCABORT : TBits_1; inline;
  65736. begin
  65737. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65738. end;
  65739. procedure TDMAC3_DCH3ECON.setCFORCE; inline;
  65740. begin
  65741. pTDefRegMap(@Self)^.&set := $00000080;
  65742. end;
  65743. procedure TDMAC3_DCH3ECON.clearCFORCE; inline;
  65744. begin
  65745. pTDefRegMap(@Self)^.clr := $00000080;
  65746. end;
  65747. procedure TDMAC3_DCH3ECON.setCFORCE(thebits : TBits_1); inline;
  65748. begin
  65749. if thebits = 0 then
  65750. pTDefRegMap(@Self)^.clr := $00000080
  65751. else
  65752. pTDefRegMap(@Self)^.&set := $00000080;
  65753. end;
  65754. function TDMAC3_DCH3ECON.getCFORCE : TBits_1; inline;
  65755. begin
  65756. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65757. end;
  65758. procedure TDMAC3_DCH3ECON.setCHSIRQ(thebits : TBits_8); inline;
  65759. begin
  65760. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  65761. end;
  65762. function TDMAC3_DCH3ECON.getCHSIRQ : TBits_8; inline;
  65763. begin
  65764. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  65765. end;
  65766. procedure TDMAC3_DCH3ECON.setCHAIRQ(thebits : TBits_8); inline;
  65767. begin
  65768. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  65769. end;
  65770. function TDMAC3_DCH3ECON.getCHAIRQ : TBits_8; inline;
  65771. begin
  65772. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  65773. end;
  65774. procedure TDMAC3_DCH3ECON.setw(thebits : TBits_32); inline;
  65775. begin
  65776. pTDefRegMap(@Self)^.val := thebits;
  65777. end;
  65778. function TDMAC3_DCH3ECON.getw : TBits_32; inline;
  65779. begin
  65780. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65781. end;
  65782. procedure TDMAC3_DCH3INT.setCHERIF; inline;
  65783. begin
  65784. pTDefRegMap(@Self)^.&set := $00000001;
  65785. end;
  65786. procedure TDMAC3_DCH3INT.clearCHERIF; inline;
  65787. begin
  65788. pTDefRegMap(@Self)^.clr := $00000001;
  65789. end;
  65790. procedure TDMAC3_DCH3INT.setCHERIF(thebits : TBits_1); inline;
  65791. begin
  65792. if thebits = 0 then
  65793. pTDefRegMap(@Self)^.clr := $00000001
  65794. else
  65795. pTDefRegMap(@Self)^.&set := $00000001;
  65796. end;
  65797. function TDMAC3_DCH3INT.getCHERIF : TBits_1; inline;
  65798. begin
  65799. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65800. end;
  65801. procedure TDMAC3_DCH3INT.setCHTAIF; inline;
  65802. begin
  65803. pTDefRegMap(@Self)^.&set := $00000002;
  65804. end;
  65805. procedure TDMAC3_DCH3INT.clearCHTAIF; inline;
  65806. begin
  65807. pTDefRegMap(@Self)^.clr := $00000002;
  65808. end;
  65809. procedure TDMAC3_DCH3INT.setCHTAIF(thebits : TBits_1); inline;
  65810. begin
  65811. if thebits = 0 then
  65812. pTDefRegMap(@Self)^.clr := $00000002
  65813. else
  65814. pTDefRegMap(@Self)^.&set := $00000002;
  65815. end;
  65816. function TDMAC3_DCH3INT.getCHTAIF : TBits_1; inline;
  65817. begin
  65818. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65819. end;
  65820. procedure TDMAC3_DCH3INT.setCHCCIF; inline;
  65821. begin
  65822. pTDefRegMap(@Self)^.&set := $00000004;
  65823. end;
  65824. procedure TDMAC3_DCH3INT.clearCHCCIF; inline;
  65825. begin
  65826. pTDefRegMap(@Self)^.clr := $00000004;
  65827. end;
  65828. procedure TDMAC3_DCH3INT.setCHCCIF(thebits : TBits_1); inline;
  65829. begin
  65830. if thebits = 0 then
  65831. pTDefRegMap(@Self)^.clr := $00000004
  65832. else
  65833. pTDefRegMap(@Self)^.&set := $00000004;
  65834. end;
  65835. function TDMAC3_DCH3INT.getCHCCIF : TBits_1; inline;
  65836. begin
  65837. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65838. end;
  65839. procedure TDMAC3_DCH3INT.setCHBCIF; inline;
  65840. begin
  65841. pTDefRegMap(@Self)^.&set := $00000008;
  65842. end;
  65843. procedure TDMAC3_DCH3INT.clearCHBCIF; inline;
  65844. begin
  65845. pTDefRegMap(@Self)^.clr := $00000008;
  65846. end;
  65847. procedure TDMAC3_DCH3INT.setCHBCIF(thebits : TBits_1); inline;
  65848. begin
  65849. if thebits = 0 then
  65850. pTDefRegMap(@Self)^.clr := $00000008
  65851. else
  65852. pTDefRegMap(@Self)^.&set := $00000008;
  65853. end;
  65854. function TDMAC3_DCH3INT.getCHBCIF : TBits_1; inline;
  65855. begin
  65856. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65857. end;
  65858. procedure TDMAC3_DCH3INT.setCHDHIF; inline;
  65859. begin
  65860. pTDefRegMap(@Self)^.&set := $00000010;
  65861. end;
  65862. procedure TDMAC3_DCH3INT.clearCHDHIF; inline;
  65863. begin
  65864. pTDefRegMap(@Self)^.clr := $00000010;
  65865. end;
  65866. procedure TDMAC3_DCH3INT.setCHDHIF(thebits : TBits_1); inline;
  65867. begin
  65868. if thebits = 0 then
  65869. pTDefRegMap(@Self)^.clr := $00000010
  65870. else
  65871. pTDefRegMap(@Self)^.&set := $00000010;
  65872. end;
  65873. function TDMAC3_DCH3INT.getCHDHIF : TBits_1; inline;
  65874. begin
  65875. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65876. end;
  65877. procedure TDMAC3_DCH3INT.setCHDDIF; inline;
  65878. begin
  65879. pTDefRegMap(@Self)^.&set := $00000020;
  65880. end;
  65881. procedure TDMAC3_DCH3INT.clearCHDDIF; inline;
  65882. begin
  65883. pTDefRegMap(@Self)^.clr := $00000020;
  65884. end;
  65885. procedure TDMAC3_DCH3INT.setCHDDIF(thebits : TBits_1); inline;
  65886. begin
  65887. if thebits = 0 then
  65888. pTDefRegMap(@Self)^.clr := $00000020
  65889. else
  65890. pTDefRegMap(@Self)^.&set := $00000020;
  65891. end;
  65892. function TDMAC3_DCH3INT.getCHDDIF : TBits_1; inline;
  65893. begin
  65894. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65895. end;
  65896. procedure TDMAC3_DCH3INT.setCHSHIF; inline;
  65897. begin
  65898. pTDefRegMap(@Self)^.&set := $00000040;
  65899. end;
  65900. procedure TDMAC3_DCH3INT.clearCHSHIF; inline;
  65901. begin
  65902. pTDefRegMap(@Self)^.clr := $00000040;
  65903. end;
  65904. procedure TDMAC3_DCH3INT.setCHSHIF(thebits : TBits_1); inline;
  65905. begin
  65906. if thebits = 0 then
  65907. pTDefRegMap(@Self)^.clr := $00000040
  65908. else
  65909. pTDefRegMap(@Self)^.&set := $00000040;
  65910. end;
  65911. function TDMAC3_DCH3INT.getCHSHIF : TBits_1; inline;
  65912. begin
  65913. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65914. end;
  65915. procedure TDMAC3_DCH3INT.setCHSDIF; inline;
  65916. begin
  65917. pTDefRegMap(@Self)^.&set := $00000080;
  65918. end;
  65919. procedure TDMAC3_DCH3INT.clearCHSDIF; inline;
  65920. begin
  65921. pTDefRegMap(@Self)^.clr := $00000080;
  65922. end;
  65923. procedure TDMAC3_DCH3INT.setCHSDIF(thebits : TBits_1); inline;
  65924. begin
  65925. if thebits = 0 then
  65926. pTDefRegMap(@Self)^.clr := $00000080
  65927. else
  65928. pTDefRegMap(@Self)^.&set := $00000080;
  65929. end;
  65930. function TDMAC3_DCH3INT.getCHSDIF : TBits_1; inline;
  65931. begin
  65932. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65933. end;
  65934. procedure TDMAC3_DCH3INT.setCHERIE; inline;
  65935. begin
  65936. pTDefRegMap(@Self)^.&set := $00010000;
  65937. end;
  65938. procedure TDMAC3_DCH3INT.clearCHERIE; inline;
  65939. begin
  65940. pTDefRegMap(@Self)^.clr := $00010000;
  65941. end;
  65942. procedure TDMAC3_DCH3INT.setCHERIE(thebits : TBits_1); inline;
  65943. begin
  65944. if thebits = 0 then
  65945. pTDefRegMap(@Self)^.clr := $00010000
  65946. else
  65947. pTDefRegMap(@Self)^.&set := $00010000;
  65948. end;
  65949. function TDMAC3_DCH3INT.getCHERIE : TBits_1; inline;
  65950. begin
  65951. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65952. end;
  65953. procedure TDMAC3_DCH3INT.setCHTAIE; inline;
  65954. begin
  65955. pTDefRegMap(@Self)^.&set := $00020000;
  65956. end;
  65957. procedure TDMAC3_DCH3INT.clearCHTAIE; inline;
  65958. begin
  65959. pTDefRegMap(@Self)^.clr := $00020000;
  65960. end;
  65961. procedure TDMAC3_DCH3INT.setCHTAIE(thebits : TBits_1); inline;
  65962. begin
  65963. if thebits = 0 then
  65964. pTDefRegMap(@Self)^.clr := $00020000
  65965. else
  65966. pTDefRegMap(@Self)^.&set := $00020000;
  65967. end;
  65968. function TDMAC3_DCH3INT.getCHTAIE : TBits_1; inline;
  65969. begin
  65970. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65971. end;
  65972. procedure TDMAC3_DCH3INT.setCHCCIE; inline;
  65973. begin
  65974. pTDefRegMap(@Self)^.&set := $00040000;
  65975. end;
  65976. procedure TDMAC3_DCH3INT.clearCHCCIE; inline;
  65977. begin
  65978. pTDefRegMap(@Self)^.clr := $00040000;
  65979. end;
  65980. procedure TDMAC3_DCH3INT.setCHCCIE(thebits : TBits_1); inline;
  65981. begin
  65982. if thebits = 0 then
  65983. pTDefRegMap(@Self)^.clr := $00040000
  65984. else
  65985. pTDefRegMap(@Self)^.&set := $00040000;
  65986. end;
  65987. function TDMAC3_DCH3INT.getCHCCIE : TBits_1; inline;
  65988. begin
  65989. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65990. end;
  65991. procedure TDMAC3_DCH3INT.setCHBCIE; inline;
  65992. begin
  65993. pTDefRegMap(@Self)^.&set := $00080000;
  65994. end;
  65995. procedure TDMAC3_DCH3INT.clearCHBCIE; inline;
  65996. begin
  65997. pTDefRegMap(@Self)^.clr := $00080000;
  65998. end;
  65999. procedure TDMAC3_DCH3INT.setCHBCIE(thebits : TBits_1); inline;
  66000. begin
  66001. if thebits = 0 then
  66002. pTDefRegMap(@Self)^.clr := $00080000
  66003. else
  66004. pTDefRegMap(@Self)^.&set := $00080000;
  66005. end;
  66006. function TDMAC3_DCH3INT.getCHBCIE : TBits_1; inline;
  66007. begin
  66008. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  66009. end;
  66010. procedure TDMAC3_DCH3INT.setCHDHIE; inline;
  66011. begin
  66012. pTDefRegMap(@Self)^.&set := $00100000;
  66013. end;
  66014. procedure TDMAC3_DCH3INT.clearCHDHIE; inline;
  66015. begin
  66016. pTDefRegMap(@Self)^.clr := $00100000;
  66017. end;
  66018. procedure TDMAC3_DCH3INT.setCHDHIE(thebits : TBits_1); inline;
  66019. begin
  66020. if thebits = 0 then
  66021. pTDefRegMap(@Self)^.clr := $00100000
  66022. else
  66023. pTDefRegMap(@Self)^.&set := $00100000;
  66024. end;
  66025. function TDMAC3_DCH3INT.getCHDHIE : TBits_1; inline;
  66026. begin
  66027. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  66028. end;
  66029. procedure TDMAC3_DCH3INT.setCHDDIE; inline;
  66030. begin
  66031. pTDefRegMap(@Self)^.&set := $00200000;
  66032. end;
  66033. procedure TDMAC3_DCH3INT.clearCHDDIE; inline;
  66034. begin
  66035. pTDefRegMap(@Self)^.clr := $00200000;
  66036. end;
  66037. procedure TDMAC3_DCH3INT.setCHDDIE(thebits : TBits_1); inline;
  66038. begin
  66039. if thebits = 0 then
  66040. pTDefRegMap(@Self)^.clr := $00200000
  66041. else
  66042. pTDefRegMap(@Self)^.&set := $00200000;
  66043. end;
  66044. function TDMAC3_DCH3INT.getCHDDIE : TBits_1; inline;
  66045. begin
  66046. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  66047. end;
  66048. procedure TDMAC3_DCH3INT.setCHSHIE; inline;
  66049. begin
  66050. pTDefRegMap(@Self)^.&set := $00400000;
  66051. end;
  66052. procedure TDMAC3_DCH3INT.clearCHSHIE; inline;
  66053. begin
  66054. pTDefRegMap(@Self)^.clr := $00400000;
  66055. end;
  66056. procedure TDMAC3_DCH3INT.setCHSHIE(thebits : TBits_1); inline;
  66057. begin
  66058. if thebits = 0 then
  66059. pTDefRegMap(@Self)^.clr := $00400000
  66060. else
  66061. pTDefRegMap(@Self)^.&set := $00400000;
  66062. end;
  66063. function TDMAC3_DCH3INT.getCHSHIE : TBits_1; inline;
  66064. begin
  66065. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  66066. end;
  66067. procedure TDMAC3_DCH3INT.setCHSDIE; inline;
  66068. begin
  66069. pTDefRegMap(@Self)^.&set := $00800000;
  66070. end;
  66071. procedure TDMAC3_DCH3INT.clearCHSDIE; inline;
  66072. begin
  66073. pTDefRegMap(@Self)^.clr := $00800000;
  66074. end;
  66075. procedure TDMAC3_DCH3INT.setCHSDIE(thebits : TBits_1); inline;
  66076. begin
  66077. if thebits = 0 then
  66078. pTDefRegMap(@Self)^.clr := $00800000
  66079. else
  66080. pTDefRegMap(@Self)^.&set := $00800000;
  66081. end;
  66082. function TDMAC3_DCH3INT.getCHSDIE : TBits_1; inline;
  66083. begin
  66084. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66085. end;
  66086. procedure TDMAC3_DCH3INT.setw(thebits : TBits_32); inline;
  66087. begin
  66088. pTDefRegMap(@Self)^.val := thebits;
  66089. end;
  66090. function TDMAC3_DCH3INT.getw : TBits_32; inline;
  66091. begin
  66092. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66093. end;
  66094. procedure TDMAC4_DCH4CON.setCHPRI(thebits : TBits_2); inline;
  66095. begin
  66096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  66097. end;
  66098. function TDMAC4_DCH4CON.getCHPRI : TBits_2; inline;
  66099. begin
  66100. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  66101. end;
  66102. procedure TDMAC4_DCH4CON.setCHEDET; inline;
  66103. begin
  66104. pTDefRegMap(@Self)^.&set := $00000004;
  66105. end;
  66106. procedure TDMAC4_DCH4CON.clearCHEDET; inline;
  66107. begin
  66108. pTDefRegMap(@Self)^.clr := $00000004;
  66109. end;
  66110. procedure TDMAC4_DCH4CON.setCHEDET(thebits : TBits_1); inline;
  66111. begin
  66112. if thebits = 0 then
  66113. pTDefRegMap(@Self)^.clr := $00000004
  66114. else
  66115. pTDefRegMap(@Self)^.&set := $00000004;
  66116. end;
  66117. function TDMAC4_DCH4CON.getCHEDET : TBits_1; inline;
  66118. begin
  66119. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66120. end;
  66121. procedure TDMAC4_DCH4CON.setCHAEN; inline;
  66122. begin
  66123. pTDefRegMap(@Self)^.&set := $00000010;
  66124. end;
  66125. procedure TDMAC4_DCH4CON.clearCHAEN; inline;
  66126. begin
  66127. pTDefRegMap(@Self)^.clr := $00000010;
  66128. end;
  66129. procedure TDMAC4_DCH4CON.setCHAEN(thebits : TBits_1); inline;
  66130. begin
  66131. if thebits = 0 then
  66132. pTDefRegMap(@Self)^.clr := $00000010
  66133. else
  66134. pTDefRegMap(@Self)^.&set := $00000010;
  66135. end;
  66136. function TDMAC4_DCH4CON.getCHAEN : TBits_1; inline;
  66137. begin
  66138. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66139. end;
  66140. procedure TDMAC4_DCH4CON.setCHCHN; inline;
  66141. begin
  66142. pTDefRegMap(@Self)^.&set := $00000020;
  66143. end;
  66144. procedure TDMAC4_DCH4CON.clearCHCHN; inline;
  66145. begin
  66146. pTDefRegMap(@Self)^.clr := $00000020;
  66147. end;
  66148. procedure TDMAC4_DCH4CON.setCHCHN(thebits : TBits_1); inline;
  66149. begin
  66150. if thebits = 0 then
  66151. pTDefRegMap(@Self)^.clr := $00000020
  66152. else
  66153. pTDefRegMap(@Self)^.&set := $00000020;
  66154. end;
  66155. function TDMAC4_DCH4CON.getCHCHN : TBits_1; inline;
  66156. begin
  66157. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66158. end;
  66159. procedure TDMAC4_DCH4CON.setCHAED; inline;
  66160. begin
  66161. pTDefRegMap(@Self)^.&set := $00000040;
  66162. end;
  66163. procedure TDMAC4_DCH4CON.clearCHAED; inline;
  66164. begin
  66165. pTDefRegMap(@Self)^.clr := $00000040;
  66166. end;
  66167. procedure TDMAC4_DCH4CON.setCHAED(thebits : TBits_1); inline;
  66168. begin
  66169. if thebits = 0 then
  66170. pTDefRegMap(@Self)^.clr := $00000040
  66171. else
  66172. pTDefRegMap(@Self)^.&set := $00000040;
  66173. end;
  66174. function TDMAC4_DCH4CON.getCHAED : TBits_1; inline;
  66175. begin
  66176. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66177. end;
  66178. procedure TDMAC4_DCH4CON.setCHEN; inline;
  66179. begin
  66180. pTDefRegMap(@Self)^.&set := $00000080;
  66181. end;
  66182. procedure TDMAC4_DCH4CON.clearCHEN; inline;
  66183. begin
  66184. pTDefRegMap(@Self)^.clr := $00000080;
  66185. end;
  66186. procedure TDMAC4_DCH4CON.setCHEN(thebits : TBits_1); inline;
  66187. begin
  66188. if thebits = 0 then
  66189. pTDefRegMap(@Self)^.clr := $00000080
  66190. else
  66191. pTDefRegMap(@Self)^.&set := $00000080;
  66192. end;
  66193. function TDMAC4_DCH4CON.getCHEN : TBits_1; inline;
  66194. begin
  66195. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66196. end;
  66197. procedure TDMAC4_DCH4CON.setCHCHNS; inline;
  66198. begin
  66199. pTDefRegMap(@Self)^.&set := $00000100;
  66200. end;
  66201. procedure TDMAC4_DCH4CON.clearCHCHNS; inline;
  66202. begin
  66203. pTDefRegMap(@Self)^.clr := $00000100;
  66204. end;
  66205. procedure TDMAC4_DCH4CON.setCHCHNS(thebits : TBits_1); inline;
  66206. begin
  66207. if thebits = 0 then
  66208. pTDefRegMap(@Self)^.clr := $00000100
  66209. else
  66210. pTDefRegMap(@Self)^.&set := $00000100;
  66211. end;
  66212. function TDMAC4_DCH4CON.getCHCHNS : TBits_1; inline;
  66213. begin
  66214. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  66215. end;
  66216. procedure TDMAC4_DCH4CON.setCHBUSY; inline;
  66217. begin
  66218. pTDefRegMap(@Self)^.&set := $00008000;
  66219. end;
  66220. procedure TDMAC4_DCH4CON.clearCHBUSY; inline;
  66221. begin
  66222. pTDefRegMap(@Self)^.clr := $00008000;
  66223. end;
  66224. procedure TDMAC4_DCH4CON.setCHBUSY(thebits : TBits_1); inline;
  66225. begin
  66226. if thebits = 0 then
  66227. pTDefRegMap(@Self)^.clr := $00008000
  66228. else
  66229. pTDefRegMap(@Self)^.&set := $00008000;
  66230. end;
  66231. function TDMAC4_DCH4CON.getCHBUSY : TBits_1; inline;
  66232. begin
  66233. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66234. end;
  66235. procedure TDMAC4_DCH4CON.setw(thebits : TBits_32); inline;
  66236. begin
  66237. pTDefRegMap(@Self)^.val := thebits;
  66238. end;
  66239. function TDMAC4_DCH4CON.getw : TBits_32; inline;
  66240. begin
  66241. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66242. end;
  66243. procedure TDMAC4_DCH4ECON.setAIRQEN; inline;
  66244. begin
  66245. pTDefRegMap(@Self)^.&set := $00000008;
  66246. end;
  66247. procedure TDMAC4_DCH4ECON.clearAIRQEN; inline;
  66248. begin
  66249. pTDefRegMap(@Self)^.clr := $00000008;
  66250. end;
  66251. procedure TDMAC4_DCH4ECON.setAIRQEN(thebits : TBits_1); inline;
  66252. begin
  66253. if thebits = 0 then
  66254. pTDefRegMap(@Self)^.clr := $00000008
  66255. else
  66256. pTDefRegMap(@Self)^.&set := $00000008;
  66257. end;
  66258. function TDMAC4_DCH4ECON.getAIRQEN : TBits_1; inline;
  66259. begin
  66260. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66261. end;
  66262. procedure TDMAC4_DCH4ECON.setSIRQEN; inline;
  66263. begin
  66264. pTDefRegMap(@Self)^.&set := $00000010;
  66265. end;
  66266. procedure TDMAC4_DCH4ECON.clearSIRQEN; inline;
  66267. begin
  66268. pTDefRegMap(@Self)^.clr := $00000010;
  66269. end;
  66270. procedure TDMAC4_DCH4ECON.setSIRQEN(thebits : TBits_1); inline;
  66271. begin
  66272. if thebits = 0 then
  66273. pTDefRegMap(@Self)^.clr := $00000010
  66274. else
  66275. pTDefRegMap(@Self)^.&set := $00000010;
  66276. end;
  66277. function TDMAC4_DCH4ECON.getSIRQEN : TBits_1; inline;
  66278. begin
  66279. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66280. end;
  66281. procedure TDMAC4_DCH4ECON.setPATEN; inline;
  66282. begin
  66283. pTDefRegMap(@Self)^.&set := $00000020;
  66284. end;
  66285. procedure TDMAC4_DCH4ECON.clearPATEN; inline;
  66286. begin
  66287. pTDefRegMap(@Self)^.clr := $00000020;
  66288. end;
  66289. procedure TDMAC4_DCH4ECON.setPATEN(thebits : TBits_1); inline;
  66290. begin
  66291. if thebits = 0 then
  66292. pTDefRegMap(@Self)^.clr := $00000020
  66293. else
  66294. pTDefRegMap(@Self)^.&set := $00000020;
  66295. end;
  66296. function TDMAC4_DCH4ECON.getPATEN : TBits_1; inline;
  66297. begin
  66298. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66299. end;
  66300. procedure TDMAC4_DCH4ECON.setCABORT; inline;
  66301. begin
  66302. pTDefRegMap(@Self)^.&set := $00000040;
  66303. end;
  66304. procedure TDMAC4_DCH4ECON.clearCABORT; inline;
  66305. begin
  66306. pTDefRegMap(@Self)^.clr := $00000040;
  66307. end;
  66308. procedure TDMAC4_DCH4ECON.setCABORT(thebits : TBits_1); inline;
  66309. begin
  66310. if thebits = 0 then
  66311. pTDefRegMap(@Self)^.clr := $00000040
  66312. else
  66313. pTDefRegMap(@Self)^.&set := $00000040;
  66314. end;
  66315. function TDMAC4_DCH4ECON.getCABORT : TBits_1; inline;
  66316. begin
  66317. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66318. end;
  66319. procedure TDMAC4_DCH4ECON.setCFORCE; inline;
  66320. begin
  66321. pTDefRegMap(@Self)^.&set := $00000080;
  66322. end;
  66323. procedure TDMAC4_DCH4ECON.clearCFORCE; inline;
  66324. begin
  66325. pTDefRegMap(@Self)^.clr := $00000080;
  66326. end;
  66327. procedure TDMAC4_DCH4ECON.setCFORCE(thebits : TBits_1); inline;
  66328. begin
  66329. if thebits = 0 then
  66330. pTDefRegMap(@Self)^.clr := $00000080
  66331. else
  66332. pTDefRegMap(@Self)^.&set := $00000080;
  66333. end;
  66334. function TDMAC4_DCH4ECON.getCFORCE : TBits_1; inline;
  66335. begin
  66336. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66337. end;
  66338. procedure TDMAC4_DCH4ECON.setCHSIRQ(thebits : TBits_8); inline;
  66339. begin
  66340. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  66341. end;
  66342. function TDMAC4_DCH4ECON.getCHSIRQ : TBits_8; inline;
  66343. begin
  66344. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  66345. end;
  66346. procedure TDMAC4_DCH4ECON.setCHAIRQ(thebits : TBits_8); inline;
  66347. begin
  66348. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  66349. end;
  66350. function TDMAC4_DCH4ECON.getCHAIRQ : TBits_8; inline;
  66351. begin
  66352. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  66353. end;
  66354. procedure TDMAC4_DCH4ECON.setw(thebits : TBits_32); inline;
  66355. begin
  66356. pTDefRegMap(@Self)^.val := thebits;
  66357. end;
  66358. function TDMAC4_DCH4ECON.getw : TBits_32; inline;
  66359. begin
  66360. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66361. end;
  66362. procedure TDMAC4_DCH4INT.setCHERIF; inline;
  66363. begin
  66364. pTDefRegMap(@Self)^.&set := $00000001;
  66365. end;
  66366. procedure TDMAC4_DCH4INT.clearCHERIF; inline;
  66367. begin
  66368. pTDefRegMap(@Self)^.clr := $00000001;
  66369. end;
  66370. procedure TDMAC4_DCH4INT.setCHERIF(thebits : TBits_1); inline;
  66371. begin
  66372. if thebits = 0 then
  66373. pTDefRegMap(@Self)^.clr := $00000001
  66374. else
  66375. pTDefRegMap(@Self)^.&set := $00000001;
  66376. end;
  66377. function TDMAC4_DCH4INT.getCHERIF : TBits_1; inline;
  66378. begin
  66379. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66380. end;
  66381. procedure TDMAC4_DCH4INT.setCHTAIF; inline;
  66382. begin
  66383. pTDefRegMap(@Self)^.&set := $00000002;
  66384. end;
  66385. procedure TDMAC4_DCH4INT.clearCHTAIF; inline;
  66386. begin
  66387. pTDefRegMap(@Self)^.clr := $00000002;
  66388. end;
  66389. procedure TDMAC4_DCH4INT.setCHTAIF(thebits : TBits_1); inline;
  66390. begin
  66391. if thebits = 0 then
  66392. pTDefRegMap(@Self)^.clr := $00000002
  66393. else
  66394. pTDefRegMap(@Self)^.&set := $00000002;
  66395. end;
  66396. function TDMAC4_DCH4INT.getCHTAIF : TBits_1; inline;
  66397. begin
  66398. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66399. end;
  66400. procedure TDMAC4_DCH4INT.setCHCCIF; inline;
  66401. begin
  66402. pTDefRegMap(@Self)^.&set := $00000004;
  66403. end;
  66404. procedure TDMAC4_DCH4INT.clearCHCCIF; inline;
  66405. begin
  66406. pTDefRegMap(@Self)^.clr := $00000004;
  66407. end;
  66408. procedure TDMAC4_DCH4INT.setCHCCIF(thebits : TBits_1); inline;
  66409. begin
  66410. if thebits = 0 then
  66411. pTDefRegMap(@Self)^.clr := $00000004
  66412. else
  66413. pTDefRegMap(@Self)^.&set := $00000004;
  66414. end;
  66415. function TDMAC4_DCH4INT.getCHCCIF : TBits_1; inline;
  66416. begin
  66417. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66418. end;
  66419. procedure TDMAC4_DCH4INT.setCHBCIF; inline;
  66420. begin
  66421. pTDefRegMap(@Self)^.&set := $00000008;
  66422. end;
  66423. procedure TDMAC4_DCH4INT.clearCHBCIF; inline;
  66424. begin
  66425. pTDefRegMap(@Self)^.clr := $00000008;
  66426. end;
  66427. procedure TDMAC4_DCH4INT.setCHBCIF(thebits : TBits_1); inline;
  66428. begin
  66429. if thebits = 0 then
  66430. pTDefRegMap(@Self)^.clr := $00000008
  66431. else
  66432. pTDefRegMap(@Self)^.&set := $00000008;
  66433. end;
  66434. function TDMAC4_DCH4INT.getCHBCIF : TBits_1; inline;
  66435. begin
  66436. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66437. end;
  66438. procedure TDMAC4_DCH4INT.setCHDHIF; inline;
  66439. begin
  66440. pTDefRegMap(@Self)^.&set := $00000010;
  66441. end;
  66442. procedure TDMAC4_DCH4INT.clearCHDHIF; inline;
  66443. begin
  66444. pTDefRegMap(@Self)^.clr := $00000010;
  66445. end;
  66446. procedure TDMAC4_DCH4INT.setCHDHIF(thebits : TBits_1); inline;
  66447. begin
  66448. if thebits = 0 then
  66449. pTDefRegMap(@Self)^.clr := $00000010
  66450. else
  66451. pTDefRegMap(@Self)^.&set := $00000010;
  66452. end;
  66453. function TDMAC4_DCH4INT.getCHDHIF : TBits_1; inline;
  66454. begin
  66455. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66456. end;
  66457. procedure TDMAC4_DCH4INT.setCHDDIF; inline;
  66458. begin
  66459. pTDefRegMap(@Self)^.&set := $00000020;
  66460. end;
  66461. procedure TDMAC4_DCH4INT.clearCHDDIF; inline;
  66462. begin
  66463. pTDefRegMap(@Self)^.clr := $00000020;
  66464. end;
  66465. procedure TDMAC4_DCH4INT.setCHDDIF(thebits : TBits_1); inline;
  66466. begin
  66467. if thebits = 0 then
  66468. pTDefRegMap(@Self)^.clr := $00000020
  66469. else
  66470. pTDefRegMap(@Self)^.&set := $00000020;
  66471. end;
  66472. function TDMAC4_DCH4INT.getCHDDIF : TBits_1; inline;
  66473. begin
  66474. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66475. end;
  66476. procedure TDMAC4_DCH4INT.setCHSHIF; inline;
  66477. begin
  66478. pTDefRegMap(@Self)^.&set := $00000040;
  66479. end;
  66480. procedure TDMAC4_DCH4INT.clearCHSHIF; inline;
  66481. begin
  66482. pTDefRegMap(@Self)^.clr := $00000040;
  66483. end;
  66484. procedure TDMAC4_DCH4INT.setCHSHIF(thebits : TBits_1); inline;
  66485. begin
  66486. if thebits = 0 then
  66487. pTDefRegMap(@Self)^.clr := $00000040
  66488. else
  66489. pTDefRegMap(@Self)^.&set := $00000040;
  66490. end;
  66491. function TDMAC4_DCH4INT.getCHSHIF : TBits_1; inline;
  66492. begin
  66493. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66494. end;
  66495. procedure TDMAC4_DCH4INT.setCHSDIF; inline;
  66496. begin
  66497. pTDefRegMap(@Self)^.&set := $00000080;
  66498. end;
  66499. procedure TDMAC4_DCH4INT.clearCHSDIF; inline;
  66500. begin
  66501. pTDefRegMap(@Self)^.clr := $00000080;
  66502. end;
  66503. procedure TDMAC4_DCH4INT.setCHSDIF(thebits : TBits_1); inline;
  66504. begin
  66505. if thebits = 0 then
  66506. pTDefRegMap(@Self)^.clr := $00000080
  66507. else
  66508. pTDefRegMap(@Self)^.&set := $00000080;
  66509. end;
  66510. function TDMAC4_DCH4INT.getCHSDIF : TBits_1; inline;
  66511. begin
  66512. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66513. end;
  66514. procedure TDMAC4_DCH4INT.setCHERIE; inline;
  66515. begin
  66516. pTDefRegMap(@Self)^.&set := $00010000;
  66517. end;
  66518. procedure TDMAC4_DCH4INT.clearCHERIE; inline;
  66519. begin
  66520. pTDefRegMap(@Self)^.clr := $00010000;
  66521. end;
  66522. procedure TDMAC4_DCH4INT.setCHERIE(thebits : TBits_1); inline;
  66523. begin
  66524. if thebits = 0 then
  66525. pTDefRegMap(@Self)^.clr := $00010000
  66526. else
  66527. pTDefRegMap(@Self)^.&set := $00010000;
  66528. end;
  66529. function TDMAC4_DCH4INT.getCHERIE : TBits_1; inline;
  66530. begin
  66531. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  66532. end;
  66533. procedure TDMAC4_DCH4INT.setCHTAIE; inline;
  66534. begin
  66535. pTDefRegMap(@Self)^.&set := $00020000;
  66536. end;
  66537. procedure TDMAC4_DCH4INT.clearCHTAIE; inline;
  66538. begin
  66539. pTDefRegMap(@Self)^.clr := $00020000;
  66540. end;
  66541. procedure TDMAC4_DCH4INT.setCHTAIE(thebits : TBits_1); inline;
  66542. begin
  66543. if thebits = 0 then
  66544. pTDefRegMap(@Self)^.clr := $00020000
  66545. else
  66546. pTDefRegMap(@Self)^.&set := $00020000;
  66547. end;
  66548. function TDMAC4_DCH4INT.getCHTAIE : TBits_1; inline;
  66549. begin
  66550. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  66551. end;
  66552. procedure TDMAC4_DCH4INT.setCHCCIE; inline;
  66553. begin
  66554. pTDefRegMap(@Self)^.&set := $00040000;
  66555. end;
  66556. procedure TDMAC4_DCH4INT.clearCHCCIE; inline;
  66557. begin
  66558. pTDefRegMap(@Self)^.clr := $00040000;
  66559. end;
  66560. procedure TDMAC4_DCH4INT.setCHCCIE(thebits : TBits_1); inline;
  66561. begin
  66562. if thebits = 0 then
  66563. pTDefRegMap(@Self)^.clr := $00040000
  66564. else
  66565. pTDefRegMap(@Self)^.&set := $00040000;
  66566. end;
  66567. function TDMAC4_DCH4INT.getCHCCIE : TBits_1; inline;
  66568. begin
  66569. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  66570. end;
  66571. procedure TDMAC4_DCH4INT.setCHBCIE; inline;
  66572. begin
  66573. pTDefRegMap(@Self)^.&set := $00080000;
  66574. end;
  66575. procedure TDMAC4_DCH4INT.clearCHBCIE; inline;
  66576. begin
  66577. pTDefRegMap(@Self)^.clr := $00080000;
  66578. end;
  66579. procedure TDMAC4_DCH4INT.setCHBCIE(thebits : TBits_1); inline;
  66580. begin
  66581. if thebits = 0 then
  66582. pTDefRegMap(@Self)^.clr := $00080000
  66583. else
  66584. pTDefRegMap(@Self)^.&set := $00080000;
  66585. end;
  66586. function TDMAC4_DCH4INT.getCHBCIE : TBits_1; inline;
  66587. begin
  66588. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  66589. end;
  66590. procedure TDMAC4_DCH4INT.setCHDHIE; inline;
  66591. begin
  66592. pTDefRegMap(@Self)^.&set := $00100000;
  66593. end;
  66594. procedure TDMAC4_DCH4INT.clearCHDHIE; inline;
  66595. begin
  66596. pTDefRegMap(@Self)^.clr := $00100000;
  66597. end;
  66598. procedure TDMAC4_DCH4INT.setCHDHIE(thebits : TBits_1); inline;
  66599. begin
  66600. if thebits = 0 then
  66601. pTDefRegMap(@Self)^.clr := $00100000
  66602. else
  66603. pTDefRegMap(@Self)^.&set := $00100000;
  66604. end;
  66605. function TDMAC4_DCH4INT.getCHDHIE : TBits_1; inline;
  66606. begin
  66607. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  66608. end;
  66609. procedure TDMAC4_DCH4INT.setCHDDIE; inline;
  66610. begin
  66611. pTDefRegMap(@Self)^.&set := $00200000;
  66612. end;
  66613. procedure TDMAC4_DCH4INT.clearCHDDIE; inline;
  66614. begin
  66615. pTDefRegMap(@Self)^.clr := $00200000;
  66616. end;
  66617. procedure TDMAC4_DCH4INT.setCHDDIE(thebits : TBits_1); inline;
  66618. begin
  66619. if thebits = 0 then
  66620. pTDefRegMap(@Self)^.clr := $00200000
  66621. else
  66622. pTDefRegMap(@Self)^.&set := $00200000;
  66623. end;
  66624. function TDMAC4_DCH4INT.getCHDDIE : TBits_1; inline;
  66625. begin
  66626. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  66627. end;
  66628. procedure TDMAC4_DCH4INT.setCHSHIE; inline;
  66629. begin
  66630. pTDefRegMap(@Self)^.&set := $00400000;
  66631. end;
  66632. procedure TDMAC4_DCH4INT.clearCHSHIE; inline;
  66633. begin
  66634. pTDefRegMap(@Self)^.clr := $00400000;
  66635. end;
  66636. procedure TDMAC4_DCH4INT.setCHSHIE(thebits : TBits_1); inline;
  66637. begin
  66638. if thebits = 0 then
  66639. pTDefRegMap(@Self)^.clr := $00400000
  66640. else
  66641. pTDefRegMap(@Self)^.&set := $00400000;
  66642. end;
  66643. function TDMAC4_DCH4INT.getCHSHIE : TBits_1; inline;
  66644. begin
  66645. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  66646. end;
  66647. procedure TDMAC4_DCH4INT.setCHSDIE; inline;
  66648. begin
  66649. pTDefRegMap(@Self)^.&set := $00800000;
  66650. end;
  66651. procedure TDMAC4_DCH4INT.clearCHSDIE; inline;
  66652. begin
  66653. pTDefRegMap(@Self)^.clr := $00800000;
  66654. end;
  66655. procedure TDMAC4_DCH4INT.setCHSDIE(thebits : TBits_1); inline;
  66656. begin
  66657. if thebits = 0 then
  66658. pTDefRegMap(@Self)^.clr := $00800000
  66659. else
  66660. pTDefRegMap(@Self)^.&set := $00800000;
  66661. end;
  66662. function TDMAC4_DCH4INT.getCHSDIE : TBits_1; inline;
  66663. begin
  66664. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  66665. end;
  66666. procedure TDMAC4_DCH4INT.setw(thebits : TBits_32); inline;
  66667. begin
  66668. pTDefRegMap(@Self)^.val := thebits;
  66669. end;
  66670. function TDMAC4_DCH4INT.getw : TBits_32; inline;
  66671. begin
  66672. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66673. end;
  66674. procedure TDMAC5_DCH5CON.setCHPRI(thebits : TBits_2); inline;
  66675. begin
  66676. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  66677. end;
  66678. function TDMAC5_DCH5CON.getCHPRI : TBits_2; inline;
  66679. begin
  66680. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  66681. end;
  66682. procedure TDMAC5_DCH5CON.setCHEDET; inline;
  66683. begin
  66684. pTDefRegMap(@Self)^.&set := $00000004;
  66685. end;
  66686. procedure TDMAC5_DCH5CON.clearCHEDET; inline;
  66687. begin
  66688. pTDefRegMap(@Self)^.clr := $00000004;
  66689. end;
  66690. procedure TDMAC5_DCH5CON.setCHEDET(thebits : TBits_1); inline;
  66691. begin
  66692. if thebits = 0 then
  66693. pTDefRegMap(@Self)^.clr := $00000004
  66694. else
  66695. pTDefRegMap(@Self)^.&set := $00000004;
  66696. end;
  66697. function TDMAC5_DCH5CON.getCHEDET : TBits_1; inline;
  66698. begin
  66699. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66700. end;
  66701. procedure TDMAC5_DCH5CON.setCHAEN; inline;
  66702. begin
  66703. pTDefRegMap(@Self)^.&set := $00000010;
  66704. end;
  66705. procedure TDMAC5_DCH5CON.clearCHAEN; inline;
  66706. begin
  66707. pTDefRegMap(@Self)^.clr := $00000010;
  66708. end;
  66709. procedure TDMAC5_DCH5CON.setCHAEN(thebits : TBits_1); inline;
  66710. begin
  66711. if thebits = 0 then
  66712. pTDefRegMap(@Self)^.clr := $00000010
  66713. else
  66714. pTDefRegMap(@Self)^.&set := $00000010;
  66715. end;
  66716. function TDMAC5_DCH5CON.getCHAEN : TBits_1; inline;
  66717. begin
  66718. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66719. end;
  66720. procedure TDMAC5_DCH5CON.setCHCHN; inline;
  66721. begin
  66722. pTDefRegMap(@Self)^.&set := $00000020;
  66723. end;
  66724. procedure TDMAC5_DCH5CON.clearCHCHN; inline;
  66725. begin
  66726. pTDefRegMap(@Self)^.clr := $00000020;
  66727. end;
  66728. procedure TDMAC5_DCH5CON.setCHCHN(thebits : TBits_1); inline;
  66729. begin
  66730. if thebits = 0 then
  66731. pTDefRegMap(@Self)^.clr := $00000020
  66732. else
  66733. pTDefRegMap(@Self)^.&set := $00000020;
  66734. end;
  66735. function TDMAC5_DCH5CON.getCHCHN : TBits_1; inline;
  66736. begin
  66737. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66738. end;
  66739. procedure TDMAC5_DCH5CON.setCHAED; inline;
  66740. begin
  66741. pTDefRegMap(@Self)^.&set := $00000040;
  66742. end;
  66743. procedure TDMAC5_DCH5CON.clearCHAED; inline;
  66744. begin
  66745. pTDefRegMap(@Self)^.clr := $00000040;
  66746. end;
  66747. procedure TDMAC5_DCH5CON.setCHAED(thebits : TBits_1); inline;
  66748. begin
  66749. if thebits = 0 then
  66750. pTDefRegMap(@Self)^.clr := $00000040
  66751. else
  66752. pTDefRegMap(@Self)^.&set := $00000040;
  66753. end;
  66754. function TDMAC5_DCH5CON.getCHAED : TBits_1; inline;
  66755. begin
  66756. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66757. end;
  66758. procedure TDMAC5_DCH5CON.setCHEN; inline;
  66759. begin
  66760. pTDefRegMap(@Self)^.&set := $00000080;
  66761. end;
  66762. procedure TDMAC5_DCH5CON.clearCHEN; inline;
  66763. begin
  66764. pTDefRegMap(@Self)^.clr := $00000080;
  66765. end;
  66766. procedure TDMAC5_DCH5CON.setCHEN(thebits : TBits_1); inline;
  66767. begin
  66768. if thebits = 0 then
  66769. pTDefRegMap(@Self)^.clr := $00000080
  66770. else
  66771. pTDefRegMap(@Self)^.&set := $00000080;
  66772. end;
  66773. function TDMAC5_DCH5CON.getCHEN : TBits_1; inline;
  66774. begin
  66775. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66776. end;
  66777. procedure TDMAC5_DCH5CON.setCHCHNS; inline;
  66778. begin
  66779. pTDefRegMap(@Self)^.&set := $00000100;
  66780. end;
  66781. procedure TDMAC5_DCH5CON.clearCHCHNS; inline;
  66782. begin
  66783. pTDefRegMap(@Self)^.clr := $00000100;
  66784. end;
  66785. procedure TDMAC5_DCH5CON.setCHCHNS(thebits : TBits_1); inline;
  66786. begin
  66787. if thebits = 0 then
  66788. pTDefRegMap(@Self)^.clr := $00000100
  66789. else
  66790. pTDefRegMap(@Self)^.&set := $00000100;
  66791. end;
  66792. function TDMAC5_DCH5CON.getCHCHNS : TBits_1; inline;
  66793. begin
  66794. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  66795. end;
  66796. procedure TDMAC5_DCH5CON.setCHBUSY; inline;
  66797. begin
  66798. pTDefRegMap(@Self)^.&set := $00008000;
  66799. end;
  66800. procedure TDMAC5_DCH5CON.clearCHBUSY; inline;
  66801. begin
  66802. pTDefRegMap(@Self)^.clr := $00008000;
  66803. end;
  66804. procedure TDMAC5_DCH5CON.setCHBUSY(thebits : TBits_1); inline;
  66805. begin
  66806. if thebits = 0 then
  66807. pTDefRegMap(@Self)^.clr := $00008000
  66808. else
  66809. pTDefRegMap(@Self)^.&set := $00008000;
  66810. end;
  66811. function TDMAC5_DCH5CON.getCHBUSY : TBits_1; inline;
  66812. begin
  66813. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  66814. end;
  66815. procedure TDMAC5_DCH5CON.setw(thebits : TBits_32); inline;
  66816. begin
  66817. pTDefRegMap(@Self)^.val := thebits;
  66818. end;
  66819. function TDMAC5_DCH5CON.getw : TBits_32; inline;
  66820. begin
  66821. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66822. end;
  66823. procedure TDMAC5_DCH5ECON.setAIRQEN; inline;
  66824. begin
  66825. pTDefRegMap(@Self)^.&set := $00000008;
  66826. end;
  66827. procedure TDMAC5_DCH5ECON.clearAIRQEN; inline;
  66828. begin
  66829. pTDefRegMap(@Self)^.clr := $00000008;
  66830. end;
  66831. procedure TDMAC5_DCH5ECON.setAIRQEN(thebits : TBits_1); inline;
  66832. begin
  66833. if thebits = 0 then
  66834. pTDefRegMap(@Self)^.clr := $00000008
  66835. else
  66836. pTDefRegMap(@Self)^.&set := $00000008;
  66837. end;
  66838. function TDMAC5_DCH5ECON.getAIRQEN : TBits_1; inline;
  66839. begin
  66840. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66841. end;
  66842. procedure TDMAC5_DCH5ECON.setSIRQEN; inline;
  66843. begin
  66844. pTDefRegMap(@Self)^.&set := $00000010;
  66845. end;
  66846. procedure TDMAC5_DCH5ECON.clearSIRQEN; inline;
  66847. begin
  66848. pTDefRegMap(@Self)^.clr := $00000010;
  66849. end;
  66850. procedure TDMAC5_DCH5ECON.setSIRQEN(thebits : TBits_1); inline;
  66851. begin
  66852. if thebits = 0 then
  66853. pTDefRegMap(@Self)^.clr := $00000010
  66854. else
  66855. pTDefRegMap(@Self)^.&set := $00000010;
  66856. end;
  66857. function TDMAC5_DCH5ECON.getSIRQEN : TBits_1; inline;
  66858. begin
  66859. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66860. end;
  66861. procedure TDMAC5_DCH5ECON.setPATEN; inline;
  66862. begin
  66863. pTDefRegMap(@Self)^.&set := $00000020;
  66864. end;
  66865. procedure TDMAC5_DCH5ECON.clearPATEN; inline;
  66866. begin
  66867. pTDefRegMap(@Self)^.clr := $00000020;
  66868. end;
  66869. procedure TDMAC5_DCH5ECON.setPATEN(thebits : TBits_1); inline;
  66870. begin
  66871. if thebits = 0 then
  66872. pTDefRegMap(@Self)^.clr := $00000020
  66873. else
  66874. pTDefRegMap(@Self)^.&set := $00000020;
  66875. end;
  66876. function TDMAC5_DCH5ECON.getPATEN : TBits_1; inline;
  66877. begin
  66878. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66879. end;
  66880. procedure TDMAC5_DCH5ECON.setCABORT; inline;
  66881. begin
  66882. pTDefRegMap(@Self)^.&set := $00000040;
  66883. end;
  66884. procedure TDMAC5_DCH5ECON.clearCABORT; inline;
  66885. begin
  66886. pTDefRegMap(@Self)^.clr := $00000040;
  66887. end;
  66888. procedure TDMAC5_DCH5ECON.setCABORT(thebits : TBits_1); inline;
  66889. begin
  66890. if thebits = 0 then
  66891. pTDefRegMap(@Self)^.clr := $00000040
  66892. else
  66893. pTDefRegMap(@Self)^.&set := $00000040;
  66894. end;
  66895. function TDMAC5_DCH5ECON.getCABORT : TBits_1; inline;
  66896. begin
  66897. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66898. end;
  66899. procedure TDMAC5_DCH5ECON.setCFORCE; inline;
  66900. begin
  66901. pTDefRegMap(@Self)^.&set := $00000080;
  66902. end;
  66903. procedure TDMAC5_DCH5ECON.clearCFORCE; inline;
  66904. begin
  66905. pTDefRegMap(@Self)^.clr := $00000080;
  66906. end;
  66907. procedure TDMAC5_DCH5ECON.setCFORCE(thebits : TBits_1); inline;
  66908. begin
  66909. if thebits = 0 then
  66910. pTDefRegMap(@Self)^.clr := $00000080
  66911. else
  66912. pTDefRegMap(@Self)^.&set := $00000080;
  66913. end;
  66914. function TDMAC5_DCH5ECON.getCFORCE : TBits_1; inline;
  66915. begin
  66916. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66917. end;
  66918. procedure TDMAC5_DCH5ECON.setCHSIRQ(thebits : TBits_8); inline;
  66919. begin
  66920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  66921. end;
  66922. function TDMAC5_DCH5ECON.getCHSIRQ : TBits_8; inline;
  66923. begin
  66924. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  66925. end;
  66926. procedure TDMAC5_DCH5ECON.setCHAIRQ(thebits : TBits_8); inline;
  66927. begin
  66928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  66929. end;
  66930. function TDMAC5_DCH5ECON.getCHAIRQ : TBits_8; inline;
  66931. begin
  66932. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  66933. end;
  66934. procedure TDMAC5_DCH5ECON.setw(thebits : TBits_32); inline;
  66935. begin
  66936. pTDefRegMap(@Self)^.val := thebits;
  66937. end;
  66938. function TDMAC5_DCH5ECON.getw : TBits_32; inline;
  66939. begin
  66940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  66941. end;
  66942. procedure TDMAC5_DCH5INT.setCHERIF; inline;
  66943. begin
  66944. pTDefRegMap(@Self)^.&set := $00000001;
  66945. end;
  66946. procedure TDMAC5_DCH5INT.clearCHERIF; inline;
  66947. begin
  66948. pTDefRegMap(@Self)^.clr := $00000001;
  66949. end;
  66950. procedure TDMAC5_DCH5INT.setCHERIF(thebits : TBits_1); inline;
  66951. begin
  66952. if thebits = 0 then
  66953. pTDefRegMap(@Self)^.clr := $00000001
  66954. else
  66955. pTDefRegMap(@Self)^.&set := $00000001;
  66956. end;
  66957. function TDMAC5_DCH5INT.getCHERIF : TBits_1; inline;
  66958. begin
  66959. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66960. end;
  66961. procedure TDMAC5_DCH5INT.setCHTAIF; inline;
  66962. begin
  66963. pTDefRegMap(@Self)^.&set := $00000002;
  66964. end;
  66965. procedure TDMAC5_DCH5INT.clearCHTAIF; inline;
  66966. begin
  66967. pTDefRegMap(@Self)^.clr := $00000002;
  66968. end;
  66969. procedure TDMAC5_DCH5INT.setCHTAIF(thebits : TBits_1); inline;
  66970. begin
  66971. if thebits = 0 then
  66972. pTDefRegMap(@Self)^.clr := $00000002
  66973. else
  66974. pTDefRegMap(@Self)^.&set := $00000002;
  66975. end;
  66976. function TDMAC5_DCH5INT.getCHTAIF : TBits_1; inline;
  66977. begin
  66978. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66979. end;
  66980. procedure TDMAC5_DCH5INT.setCHCCIF; inline;
  66981. begin
  66982. pTDefRegMap(@Self)^.&set := $00000004;
  66983. end;
  66984. procedure TDMAC5_DCH5INT.clearCHCCIF; inline;
  66985. begin
  66986. pTDefRegMap(@Self)^.clr := $00000004;
  66987. end;
  66988. procedure TDMAC5_DCH5INT.setCHCCIF(thebits : TBits_1); inline;
  66989. begin
  66990. if thebits = 0 then
  66991. pTDefRegMap(@Self)^.clr := $00000004
  66992. else
  66993. pTDefRegMap(@Self)^.&set := $00000004;
  66994. end;
  66995. function TDMAC5_DCH5INT.getCHCCIF : TBits_1; inline;
  66996. begin
  66997. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66998. end;
  66999. procedure TDMAC5_DCH5INT.setCHBCIF; inline;
  67000. begin
  67001. pTDefRegMap(@Self)^.&set := $00000008;
  67002. end;
  67003. procedure TDMAC5_DCH5INT.clearCHBCIF; inline;
  67004. begin
  67005. pTDefRegMap(@Self)^.clr := $00000008;
  67006. end;
  67007. procedure TDMAC5_DCH5INT.setCHBCIF(thebits : TBits_1); inline;
  67008. begin
  67009. if thebits = 0 then
  67010. pTDefRegMap(@Self)^.clr := $00000008
  67011. else
  67012. pTDefRegMap(@Self)^.&set := $00000008;
  67013. end;
  67014. function TDMAC5_DCH5INT.getCHBCIF : TBits_1; inline;
  67015. begin
  67016. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67017. end;
  67018. procedure TDMAC5_DCH5INT.setCHDHIF; inline;
  67019. begin
  67020. pTDefRegMap(@Self)^.&set := $00000010;
  67021. end;
  67022. procedure TDMAC5_DCH5INT.clearCHDHIF; inline;
  67023. begin
  67024. pTDefRegMap(@Self)^.clr := $00000010;
  67025. end;
  67026. procedure TDMAC5_DCH5INT.setCHDHIF(thebits : TBits_1); inline;
  67027. begin
  67028. if thebits = 0 then
  67029. pTDefRegMap(@Self)^.clr := $00000010
  67030. else
  67031. pTDefRegMap(@Self)^.&set := $00000010;
  67032. end;
  67033. function TDMAC5_DCH5INT.getCHDHIF : TBits_1; inline;
  67034. begin
  67035. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67036. end;
  67037. procedure TDMAC5_DCH5INT.setCHDDIF; inline;
  67038. begin
  67039. pTDefRegMap(@Self)^.&set := $00000020;
  67040. end;
  67041. procedure TDMAC5_DCH5INT.clearCHDDIF; inline;
  67042. begin
  67043. pTDefRegMap(@Self)^.clr := $00000020;
  67044. end;
  67045. procedure TDMAC5_DCH5INT.setCHDDIF(thebits : TBits_1); inline;
  67046. begin
  67047. if thebits = 0 then
  67048. pTDefRegMap(@Self)^.clr := $00000020
  67049. else
  67050. pTDefRegMap(@Self)^.&set := $00000020;
  67051. end;
  67052. function TDMAC5_DCH5INT.getCHDDIF : TBits_1; inline;
  67053. begin
  67054. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67055. end;
  67056. procedure TDMAC5_DCH5INT.setCHSHIF; inline;
  67057. begin
  67058. pTDefRegMap(@Self)^.&set := $00000040;
  67059. end;
  67060. procedure TDMAC5_DCH5INT.clearCHSHIF; inline;
  67061. begin
  67062. pTDefRegMap(@Self)^.clr := $00000040;
  67063. end;
  67064. procedure TDMAC5_DCH5INT.setCHSHIF(thebits : TBits_1); inline;
  67065. begin
  67066. if thebits = 0 then
  67067. pTDefRegMap(@Self)^.clr := $00000040
  67068. else
  67069. pTDefRegMap(@Self)^.&set := $00000040;
  67070. end;
  67071. function TDMAC5_DCH5INT.getCHSHIF : TBits_1; inline;
  67072. begin
  67073. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67074. end;
  67075. procedure TDMAC5_DCH5INT.setCHSDIF; inline;
  67076. begin
  67077. pTDefRegMap(@Self)^.&set := $00000080;
  67078. end;
  67079. procedure TDMAC5_DCH5INT.clearCHSDIF; inline;
  67080. begin
  67081. pTDefRegMap(@Self)^.clr := $00000080;
  67082. end;
  67083. procedure TDMAC5_DCH5INT.setCHSDIF(thebits : TBits_1); inline;
  67084. begin
  67085. if thebits = 0 then
  67086. pTDefRegMap(@Self)^.clr := $00000080
  67087. else
  67088. pTDefRegMap(@Self)^.&set := $00000080;
  67089. end;
  67090. function TDMAC5_DCH5INT.getCHSDIF : TBits_1; inline;
  67091. begin
  67092. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67093. end;
  67094. procedure TDMAC5_DCH5INT.setCHERIE; inline;
  67095. begin
  67096. pTDefRegMap(@Self)^.&set := $00010000;
  67097. end;
  67098. procedure TDMAC5_DCH5INT.clearCHERIE; inline;
  67099. begin
  67100. pTDefRegMap(@Self)^.clr := $00010000;
  67101. end;
  67102. procedure TDMAC5_DCH5INT.setCHERIE(thebits : TBits_1); inline;
  67103. begin
  67104. if thebits = 0 then
  67105. pTDefRegMap(@Self)^.clr := $00010000
  67106. else
  67107. pTDefRegMap(@Self)^.&set := $00010000;
  67108. end;
  67109. function TDMAC5_DCH5INT.getCHERIE : TBits_1; inline;
  67110. begin
  67111. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  67112. end;
  67113. procedure TDMAC5_DCH5INT.setCHTAIE; inline;
  67114. begin
  67115. pTDefRegMap(@Self)^.&set := $00020000;
  67116. end;
  67117. procedure TDMAC5_DCH5INT.clearCHTAIE; inline;
  67118. begin
  67119. pTDefRegMap(@Self)^.clr := $00020000;
  67120. end;
  67121. procedure TDMAC5_DCH5INT.setCHTAIE(thebits : TBits_1); inline;
  67122. begin
  67123. if thebits = 0 then
  67124. pTDefRegMap(@Self)^.clr := $00020000
  67125. else
  67126. pTDefRegMap(@Self)^.&set := $00020000;
  67127. end;
  67128. function TDMAC5_DCH5INT.getCHTAIE : TBits_1; inline;
  67129. begin
  67130. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  67131. end;
  67132. procedure TDMAC5_DCH5INT.setCHCCIE; inline;
  67133. begin
  67134. pTDefRegMap(@Self)^.&set := $00040000;
  67135. end;
  67136. procedure TDMAC5_DCH5INT.clearCHCCIE; inline;
  67137. begin
  67138. pTDefRegMap(@Self)^.clr := $00040000;
  67139. end;
  67140. procedure TDMAC5_DCH5INT.setCHCCIE(thebits : TBits_1); inline;
  67141. begin
  67142. if thebits = 0 then
  67143. pTDefRegMap(@Self)^.clr := $00040000
  67144. else
  67145. pTDefRegMap(@Self)^.&set := $00040000;
  67146. end;
  67147. function TDMAC5_DCH5INT.getCHCCIE : TBits_1; inline;
  67148. begin
  67149. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  67150. end;
  67151. procedure TDMAC5_DCH5INT.setCHBCIE; inline;
  67152. begin
  67153. pTDefRegMap(@Self)^.&set := $00080000;
  67154. end;
  67155. procedure TDMAC5_DCH5INT.clearCHBCIE; inline;
  67156. begin
  67157. pTDefRegMap(@Self)^.clr := $00080000;
  67158. end;
  67159. procedure TDMAC5_DCH5INT.setCHBCIE(thebits : TBits_1); inline;
  67160. begin
  67161. if thebits = 0 then
  67162. pTDefRegMap(@Self)^.clr := $00080000
  67163. else
  67164. pTDefRegMap(@Self)^.&set := $00080000;
  67165. end;
  67166. function TDMAC5_DCH5INT.getCHBCIE : TBits_1; inline;
  67167. begin
  67168. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67169. end;
  67170. procedure TDMAC5_DCH5INT.setCHDHIE; inline;
  67171. begin
  67172. pTDefRegMap(@Self)^.&set := $00100000;
  67173. end;
  67174. procedure TDMAC5_DCH5INT.clearCHDHIE; inline;
  67175. begin
  67176. pTDefRegMap(@Self)^.clr := $00100000;
  67177. end;
  67178. procedure TDMAC5_DCH5INT.setCHDHIE(thebits : TBits_1); inline;
  67179. begin
  67180. if thebits = 0 then
  67181. pTDefRegMap(@Self)^.clr := $00100000
  67182. else
  67183. pTDefRegMap(@Self)^.&set := $00100000;
  67184. end;
  67185. function TDMAC5_DCH5INT.getCHDHIE : TBits_1; inline;
  67186. begin
  67187. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  67188. end;
  67189. procedure TDMAC5_DCH5INT.setCHDDIE; inline;
  67190. begin
  67191. pTDefRegMap(@Self)^.&set := $00200000;
  67192. end;
  67193. procedure TDMAC5_DCH5INT.clearCHDDIE; inline;
  67194. begin
  67195. pTDefRegMap(@Self)^.clr := $00200000;
  67196. end;
  67197. procedure TDMAC5_DCH5INT.setCHDDIE(thebits : TBits_1); inline;
  67198. begin
  67199. if thebits = 0 then
  67200. pTDefRegMap(@Self)^.clr := $00200000
  67201. else
  67202. pTDefRegMap(@Self)^.&set := $00200000;
  67203. end;
  67204. function TDMAC5_DCH5INT.getCHDDIE : TBits_1; inline;
  67205. begin
  67206. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  67207. end;
  67208. procedure TDMAC5_DCH5INT.setCHSHIE; inline;
  67209. begin
  67210. pTDefRegMap(@Self)^.&set := $00400000;
  67211. end;
  67212. procedure TDMAC5_DCH5INT.clearCHSHIE; inline;
  67213. begin
  67214. pTDefRegMap(@Self)^.clr := $00400000;
  67215. end;
  67216. procedure TDMAC5_DCH5INT.setCHSHIE(thebits : TBits_1); inline;
  67217. begin
  67218. if thebits = 0 then
  67219. pTDefRegMap(@Self)^.clr := $00400000
  67220. else
  67221. pTDefRegMap(@Self)^.&set := $00400000;
  67222. end;
  67223. function TDMAC5_DCH5INT.getCHSHIE : TBits_1; inline;
  67224. begin
  67225. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  67226. end;
  67227. procedure TDMAC5_DCH5INT.setCHSDIE; inline;
  67228. begin
  67229. pTDefRegMap(@Self)^.&set := $00800000;
  67230. end;
  67231. procedure TDMAC5_DCH5INT.clearCHSDIE; inline;
  67232. begin
  67233. pTDefRegMap(@Self)^.clr := $00800000;
  67234. end;
  67235. procedure TDMAC5_DCH5INT.setCHSDIE(thebits : TBits_1); inline;
  67236. begin
  67237. if thebits = 0 then
  67238. pTDefRegMap(@Self)^.clr := $00800000
  67239. else
  67240. pTDefRegMap(@Self)^.&set := $00800000;
  67241. end;
  67242. function TDMAC5_DCH5INT.getCHSDIE : TBits_1; inline;
  67243. begin
  67244. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67245. end;
  67246. procedure TDMAC5_DCH5INT.setw(thebits : TBits_32); inline;
  67247. begin
  67248. pTDefRegMap(@Self)^.val := thebits;
  67249. end;
  67250. function TDMAC5_DCH5INT.getw : TBits_32; inline;
  67251. begin
  67252. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67253. end;
  67254. procedure TDMAC6_DCH6CON.setCHPRI(thebits : TBits_2); inline;
  67255. begin
  67256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  67257. end;
  67258. function TDMAC6_DCH6CON.getCHPRI : TBits_2; inline;
  67259. begin
  67260. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  67261. end;
  67262. procedure TDMAC6_DCH6CON.setCHEDET; inline;
  67263. begin
  67264. pTDefRegMap(@Self)^.&set := $00000004;
  67265. end;
  67266. procedure TDMAC6_DCH6CON.clearCHEDET; inline;
  67267. begin
  67268. pTDefRegMap(@Self)^.clr := $00000004;
  67269. end;
  67270. procedure TDMAC6_DCH6CON.setCHEDET(thebits : TBits_1); inline;
  67271. begin
  67272. if thebits = 0 then
  67273. pTDefRegMap(@Self)^.clr := $00000004
  67274. else
  67275. pTDefRegMap(@Self)^.&set := $00000004;
  67276. end;
  67277. function TDMAC6_DCH6CON.getCHEDET : TBits_1; inline;
  67278. begin
  67279. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67280. end;
  67281. procedure TDMAC6_DCH6CON.setCHAEN; inline;
  67282. begin
  67283. pTDefRegMap(@Self)^.&set := $00000010;
  67284. end;
  67285. procedure TDMAC6_DCH6CON.clearCHAEN; inline;
  67286. begin
  67287. pTDefRegMap(@Self)^.clr := $00000010;
  67288. end;
  67289. procedure TDMAC6_DCH6CON.setCHAEN(thebits : TBits_1); inline;
  67290. begin
  67291. if thebits = 0 then
  67292. pTDefRegMap(@Self)^.clr := $00000010
  67293. else
  67294. pTDefRegMap(@Self)^.&set := $00000010;
  67295. end;
  67296. function TDMAC6_DCH6CON.getCHAEN : TBits_1; inline;
  67297. begin
  67298. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67299. end;
  67300. procedure TDMAC6_DCH6CON.setCHCHN; inline;
  67301. begin
  67302. pTDefRegMap(@Self)^.&set := $00000020;
  67303. end;
  67304. procedure TDMAC6_DCH6CON.clearCHCHN; inline;
  67305. begin
  67306. pTDefRegMap(@Self)^.clr := $00000020;
  67307. end;
  67308. procedure TDMAC6_DCH6CON.setCHCHN(thebits : TBits_1); inline;
  67309. begin
  67310. if thebits = 0 then
  67311. pTDefRegMap(@Self)^.clr := $00000020
  67312. else
  67313. pTDefRegMap(@Self)^.&set := $00000020;
  67314. end;
  67315. function TDMAC6_DCH6CON.getCHCHN : TBits_1; inline;
  67316. begin
  67317. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67318. end;
  67319. procedure TDMAC6_DCH6CON.setCHAED; inline;
  67320. begin
  67321. pTDefRegMap(@Self)^.&set := $00000040;
  67322. end;
  67323. procedure TDMAC6_DCH6CON.clearCHAED; inline;
  67324. begin
  67325. pTDefRegMap(@Self)^.clr := $00000040;
  67326. end;
  67327. procedure TDMAC6_DCH6CON.setCHAED(thebits : TBits_1); inline;
  67328. begin
  67329. if thebits = 0 then
  67330. pTDefRegMap(@Self)^.clr := $00000040
  67331. else
  67332. pTDefRegMap(@Self)^.&set := $00000040;
  67333. end;
  67334. function TDMAC6_DCH6CON.getCHAED : TBits_1; inline;
  67335. begin
  67336. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67337. end;
  67338. procedure TDMAC6_DCH6CON.setCHEN; inline;
  67339. begin
  67340. pTDefRegMap(@Self)^.&set := $00000080;
  67341. end;
  67342. procedure TDMAC6_DCH6CON.clearCHEN; inline;
  67343. begin
  67344. pTDefRegMap(@Self)^.clr := $00000080;
  67345. end;
  67346. procedure TDMAC6_DCH6CON.setCHEN(thebits : TBits_1); inline;
  67347. begin
  67348. if thebits = 0 then
  67349. pTDefRegMap(@Self)^.clr := $00000080
  67350. else
  67351. pTDefRegMap(@Self)^.&set := $00000080;
  67352. end;
  67353. function TDMAC6_DCH6CON.getCHEN : TBits_1; inline;
  67354. begin
  67355. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67356. end;
  67357. procedure TDMAC6_DCH6CON.setCHCHNS; inline;
  67358. begin
  67359. pTDefRegMap(@Self)^.&set := $00000100;
  67360. end;
  67361. procedure TDMAC6_DCH6CON.clearCHCHNS; inline;
  67362. begin
  67363. pTDefRegMap(@Self)^.clr := $00000100;
  67364. end;
  67365. procedure TDMAC6_DCH6CON.setCHCHNS(thebits : TBits_1); inline;
  67366. begin
  67367. if thebits = 0 then
  67368. pTDefRegMap(@Self)^.clr := $00000100
  67369. else
  67370. pTDefRegMap(@Self)^.&set := $00000100;
  67371. end;
  67372. function TDMAC6_DCH6CON.getCHCHNS : TBits_1; inline;
  67373. begin
  67374. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  67375. end;
  67376. procedure TDMAC6_DCH6CON.setCHBUSY; inline;
  67377. begin
  67378. pTDefRegMap(@Self)^.&set := $00008000;
  67379. end;
  67380. procedure TDMAC6_DCH6CON.clearCHBUSY; inline;
  67381. begin
  67382. pTDefRegMap(@Self)^.clr := $00008000;
  67383. end;
  67384. procedure TDMAC6_DCH6CON.setCHBUSY(thebits : TBits_1); inline;
  67385. begin
  67386. if thebits = 0 then
  67387. pTDefRegMap(@Self)^.clr := $00008000
  67388. else
  67389. pTDefRegMap(@Self)^.&set := $00008000;
  67390. end;
  67391. function TDMAC6_DCH6CON.getCHBUSY : TBits_1; inline;
  67392. begin
  67393. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67394. end;
  67395. procedure TDMAC6_DCH6CON.setw(thebits : TBits_32); inline;
  67396. begin
  67397. pTDefRegMap(@Self)^.val := thebits;
  67398. end;
  67399. function TDMAC6_DCH6CON.getw : TBits_32; inline;
  67400. begin
  67401. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67402. end;
  67403. procedure TDMAC6_DCH6ECON.setAIRQEN; inline;
  67404. begin
  67405. pTDefRegMap(@Self)^.&set := $00000008;
  67406. end;
  67407. procedure TDMAC6_DCH6ECON.clearAIRQEN; inline;
  67408. begin
  67409. pTDefRegMap(@Self)^.clr := $00000008;
  67410. end;
  67411. procedure TDMAC6_DCH6ECON.setAIRQEN(thebits : TBits_1); inline;
  67412. begin
  67413. if thebits = 0 then
  67414. pTDefRegMap(@Self)^.clr := $00000008
  67415. else
  67416. pTDefRegMap(@Self)^.&set := $00000008;
  67417. end;
  67418. function TDMAC6_DCH6ECON.getAIRQEN : TBits_1; inline;
  67419. begin
  67420. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67421. end;
  67422. procedure TDMAC6_DCH6ECON.setSIRQEN; inline;
  67423. begin
  67424. pTDefRegMap(@Self)^.&set := $00000010;
  67425. end;
  67426. procedure TDMAC6_DCH6ECON.clearSIRQEN; inline;
  67427. begin
  67428. pTDefRegMap(@Self)^.clr := $00000010;
  67429. end;
  67430. procedure TDMAC6_DCH6ECON.setSIRQEN(thebits : TBits_1); inline;
  67431. begin
  67432. if thebits = 0 then
  67433. pTDefRegMap(@Self)^.clr := $00000010
  67434. else
  67435. pTDefRegMap(@Self)^.&set := $00000010;
  67436. end;
  67437. function TDMAC6_DCH6ECON.getSIRQEN : TBits_1; inline;
  67438. begin
  67439. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67440. end;
  67441. procedure TDMAC6_DCH6ECON.setPATEN; inline;
  67442. begin
  67443. pTDefRegMap(@Self)^.&set := $00000020;
  67444. end;
  67445. procedure TDMAC6_DCH6ECON.clearPATEN; inline;
  67446. begin
  67447. pTDefRegMap(@Self)^.clr := $00000020;
  67448. end;
  67449. procedure TDMAC6_DCH6ECON.setPATEN(thebits : TBits_1); inline;
  67450. begin
  67451. if thebits = 0 then
  67452. pTDefRegMap(@Self)^.clr := $00000020
  67453. else
  67454. pTDefRegMap(@Self)^.&set := $00000020;
  67455. end;
  67456. function TDMAC6_DCH6ECON.getPATEN : TBits_1; inline;
  67457. begin
  67458. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67459. end;
  67460. procedure TDMAC6_DCH6ECON.setCABORT; inline;
  67461. begin
  67462. pTDefRegMap(@Self)^.&set := $00000040;
  67463. end;
  67464. procedure TDMAC6_DCH6ECON.clearCABORT; inline;
  67465. begin
  67466. pTDefRegMap(@Self)^.clr := $00000040;
  67467. end;
  67468. procedure TDMAC6_DCH6ECON.setCABORT(thebits : TBits_1); inline;
  67469. begin
  67470. if thebits = 0 then
  67471. pTDefRegMap(@Self)^.clr := $00000040
  67472. else
  67473. pTDefRegMap(@Self)^.&set := $00000040;
  67474. end;
  67475. function TDMAC6_DCH6ECON.getCABORT : TBits_1; inline;
  67476. begin
  67477. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67478. end;
  67479. procedure TDMAC6_DCH6ECON.setCFORCE; inline;
  67480. begin
  67481. pTDefRegMap(@Self)^.&set := $00000080;
  67482. end;
  67483. procedure TDMAC6_DCH6ECON.clearCFORCE; inline;
  67484. begin
  67485. pTDefRegMap(@Self)^.clr := $00000080;
  67486. end;
  67487. procedure TDMAC6_DCH6ECON.setCFORCE(thebits : TBits_1); inline;
  67488. begin
  67489. if thebits = 0 then
  67490. pTDefRegMap(@Self)^.clr := $00000080
  67491. else
  67492. pTDefRegMap(@Self)^.&set := $00000080;
  67493. end;
  67494. function TDMAC6_DCH6ECON.getCFORCE : TBits_1; inline;
  67495. begin
  67496. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67497. end;
  67498. procedure TDMAC6_DCH6ECON.setCHSIRQ(thebits : TBits_8); inline;
  67499. begin
  67500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  67501. end;
  67502. function TDMAC6_DCH6ECON.getCHSIRQ : TBits_8; inline;
  67503. begin
  67504. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  67505. end;
  67506. procedure TDMAC6_DCH6ECON.setCHAIRQ(thebits : TBits_8); inline;
  67507. begin
  67508. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  67509. end;
  67510. function TDMAC6_DCH6ECON.getCHAIRQ : TBits_8; inline;
  67511. begin
  67512. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  67513. end;
  67514. procedure TDMAC6_DCH6ECON.setw(thebits : TBits_32); inline;
  67515. begin
  67516. pTDefRegMap(@Self)^.val := thebits;
  67517. end;
  67518. function TDMAC6_DCH6ECON.getw : TBits_32; inline;
  67519. begin
  67520. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67521. end;
  67522. procedure TDMAC6_DCH6INT.setCHERIF; inline;
  67523. begin
  67524. pTDefRegMap(@Self)^.&set := $00000001;
  67525. end;
  67526. procedure TDMAC6_DCH6INT.clearCHERIF; inline;
  67527. begin
  67528. pTDefRegMap(@Self)^.clr := $00000001;
  67529. end;
  67530. procedure TDMAC6_DCH6INT.setCHERIF(thebits : TBits_1); inline;
  67531. begin
  67532. if thebits = 0 then
  67533. pTDefRegMap(@Self)^.clr := $00000001
  67534. else
  67535. pTDefRegMap(@Self)^.&set := $00000001;
  67536. end;
  67537. function TDMAC6_DCH6INT.getCHERIF : TBits_1; inline;
  67538. begin
  67539. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67540. end;
  67541. procedure TDMAC6_DCH6INT.setCHTAIF; inline;
  67542. begin
  67543. pTDefRegMap(@Self)^.&set := $00000002;
  67544. end;
  67545. procedure TDMAC6_DCH6INT.clearCHTAIF; inline;
  67546. begin
  67547. pTDefRegMap(@Self)^.clr := $00000002;
  67548. end;
  67549. procedure TDMAC6_DCH6INT.setCHTAIF(thebits : TBits_1); inline;
  67550. begin
  67551. if thebits = 0 then
  67552. pTDefRegMap(@Self)^.clr := $00000002
  67553. else
  67554. pTDefRegMap(@Self)^.&set := $00000002;
  67555. end;
  67556. function TDMAC6_DCH6INT.getCHTAIF : TBits_1; inline;
  67557. begin
  67558. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67559. end;
  67560. procedure TDMAC6_DCH6INT.setCHCCIF; inline;
  67561. begin
  67562. pTDefRegMap(@Self)^.&set := $00000004;
  67563. end;
  67564. procedure TDMAC6_DCH6INT.clearCHCCIF; inline;
  67565. begin
  67566. pTDefRegMap(@Self)^.clr := $00000004;
  67567. end;
  67568. procedure TDMAC6_DCH6INT.setCHCCIF(thebits : TBits_1); inline;
  67569. begin
  67570. if thebits = 0 then
  67571. pTDefRegMap(@Self)^.clr := $00000004
  67572. else
  67573. pTDefRegMap(@Self)^.&set := $00000004;
  67574. end;
  67575. function TDMAC6_DCH6INT.getCHCCIF : TBits_1; inline;
  67576. begin
  67577. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67578. end;
  67579. procedure TDMAC6_DCH6INT.setCHBCIF; inline;
  67580. begin
  67581. pTDefRegMap(@Self)^.&set := $00000008;
  67582. end;
  67583. procedure TDMAC6_DCH6INT.clearCHBCIF; inline;
  67584. begin
  67585. pTDefRegMap(@Self)^.clr := $00000008;
  67586. end;
  67587. procedure TDMAC6_DCH6INT.setCHBCIF(thebits : TBits_1); inline;
  67588. begin
  67589. if thebits = 0 then
  67590. pTDefRegMap(@Self)^.clr := $00000008
  67591. else
  67592. pTDefRegMap(@Self)^.&set := $00000008;
  67593. end;
  67594. function TDMAC6_DCH6INT.getCHBCIF : TBits_1; inline;
  67595. begin
  67596. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67597. end;
  67598. procedure TDMAC6_DCH6INT.setCHDHIF; inline;
  67599. begin
  67600. pTDefRegMap(@Self)^.&set := $00000010;
  67601. end;
  67602. procedure TDMAC6_DCH6INT.clearCHDHIF; inline;
  67603. begin
  67604. pTDefRegMap(@Self)^.clr := $00000010;
  67605. end;
  67606. procedure TDMAC6_DCH6INT.setCHDHIF(thebits : TBits_1); inline;
  67607. begin
  67608. if thebits = 0 then
  67609. pTDefRegMap(@Self)^.clr := $00000010
  67610. else
  67611. pTDefRegMap(@Self)^.&set := $00000010;
  67612. end;
  67613. function TDMAC6_DCH6INT.getCHDHIF : TBits_1; inline;
  67614. begin
  67615. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67616. end;
  67617. procedure TDMAC6_DCH6INT.setCHDDIF; inline;
  67618. begin
  67619. pTDefRegMap(@Self)^.&set := $00000020;
  67620. end;
  67621. procedure TDMAC6_DCH6INT.clearCHDDIF; inline;
  67622. begin
  67623. pTDefRegMap(@Self)^.clr := $00000020;
  67624. end;
  67625. procedure TDMAC6_DCH6INT.setCHDDIF(thebits : TBits_1); inline;
  67626. begin
  67627. if thebits = 0 then
  67628. pTDefRegMap(@Self)^.clr := $00000020
  67629. else
  67630. pTDefRegMap(@Self)^.&set := $00000020;
  67631. end;
  67632. function TDMAC6_DCH6INT.getCHDDIF : TBits_1; inline;
  67633. begin
  67634. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67635. end;
  67636. procedure TDMAC6_DCH6INT.setCHSHIF; inline;
  67637. begin
  67638. pTDefRegMap(@Self)^.&set := $00000040;
  67639. end;
  67640. procedure TDMAC6_DCH6INT.clearCHSHIF; inline;
  67641. begin
  67642. pTDefRegMap(@Self)^.clr := $00000040;
  67643. end;
  67644. procedure TDMAC6_DCH6INT.setCHSHIF(thebits : TBits_1); inline;
  67645. begin
  67646. if thebits = 0 then
  67647. pTDefRegMap(@Self)^.clr := $00000040
  67648. else
  67649. pTDefRegMap(@Self)^.&set := $00000040;
  67650. end;
  67651. function TDMAC6_DCH6INT.getCHSHIF : TBits_1; inline;
  67652. begin
  67653. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67654. end;
  67655. procedure TDMAC6_DCH6INT.setCHSDIF; inline;
  67656. begin
  67657. pTDefRegMap(@Self)^.&set := $00000080;
  67658. end;
  67659. procedure TDMAC6_DCH6INT.clearCHSDIF; inline;
  67660. begin
  67661. pTDefRegMap(@Self)^.clr := $00000080;
  67662. end;
  67663. procedure TDMAC6_DCH6INT.setCHSDIF(thebits : TBits_1); inline;
  67664. begin
  67665. if thebits = 0 then
  67666. pTDefRegMap(@Self)^.clr := $00000080
  67667. else
  67668. pTDefRegMap(@Self)^.&set := $00000080;
  67669. end;
  67670. function TDMAC6_DCH6INT.getCHSDIF : TBits_1; inline;
  67671. begin
  67672. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67673. end;
  67674. procedure TDMAC6_DCH6INT.setCHERIE; inline;
  67675. begin
  67676. pTDefRegMap(@Self)^.&set := $00010000;
  67677. end;
  67678. procedure TDMAC6_DCH6INT.clearCHERIE; inline;
  67679. begin
  67680. pTDefRegMap(@Self)^.clr := $00010000;
  67681. end;
  67682. procedure TDMAC6_DCH6INT.setCHERIE(thebits : TBits_1); inline;
  67683. begin
  67684. if thebits = 0 then
  67685. pTDefRegMap(@Self)^.clr := $00010000
  67686. else
  67687. pTDefRegMap(@Self)^.&set := $00010000;
  67688. end;
  67689. function TDMAC6_DCH6INT.getCHERIE : TBits_1; inline;
  67690. begin
  67691. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  67692. end;
  67693. procedure TDMAC6_DCH6INT.setCHTAIE; inline;
  67694. begin
  67695. pTDefRegMap(@Self)^.&set := $00020000;
  67696. end;
  67697. procedure TDMAC6_DCH6INT.clearCHTAIE; inline;
  67698. begin
  67699. pTDefRegMap(@Self)^.clr := $00020000;
  67700. end;
  67701. procedure TDMAC6_DCH6INT.setCHTAIE(thebits : TBits_1); inline;
  67702. begin
  67703. if thebits = 0 then
  67704. pTDefRegMap(@Self)^.clr := $00020000
  67705. else
  67706. pTDefRegMap(@Self)^.&set := $00020000;
  67707. end;
  67708. function TDMAC6_DCH6INT.getCHTAIE : TBits_1; inline;
  67709. begin
  67710. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  67711. end;
  67712. procedure TDMAC6_DCH6INT.setCHCCIE; inline;
  67713. begin
  67714. pTDefRegMap(@Self)^.&set := $00040000;
  67715. end;
  67716. procedure TDMAC6_DCH6INT.clearCHCCIE; inline;
  67717. begin
  67718. pTDefRegMap(@Self)^.clr := $00040000;
  67719. end;
  67720. procedure TDMAC6_DCH6INT.setCHCCIE(thebits : TBits_1); inline;
  67721. begin
  67722. if thebits = 0 then
  67723. pTDefRegMap(@Self)^.clr := $00040000
  67724. else
  67725. pTDefRegMap(@Self)^.&set := $00040000;
  67726. end;
  67727. function TDMAC6_DCH6INT.getCHCCIE : TBits_1; inline;
  67728. begin
  67729. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  67730. end;
  67731. procedure TDMAC6_DCH6INT.setCHBCIE; inline;
  67732. begin
  67733. pTDefRegMap(@Self)^.&set := $00080000;
  67734. end;
  67735. procedure TDMAC6_DCH6INT.clearCHBCIE; inline;
  67736. begin
  67737. pTDefRegMap(@Self)^.clr := $00080000;
  67738. end;
  67739. procedure TDMAC6_DCH6INT.setCHBCIE(thebits : TBits_1); inline;
  67740. begin
  67741. if thebits = 0 then
  67742. pTDefRegMap(@Self)^.clr := $00080000
  67743. else
  67744. pTDefRegMap(@Self)^.&set := $00080000;
  67745. end;
  67746. function TDMAC6_DCH6INT.getCHBCIE : TBits_1; inline;
  67747. begin
  67748. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  67749. end;
  67750. procedure TDMAC6_DCH6INT.setCHDHIE; inline;
  67751. begin
  67752. pTDefRegMap(@Self)^.&set := $00100000;
  67753. end;
  67754. procedure TDMAC6_DCH6INT.clearCHDHIE; inline;
  67755. begin
  67756. pTDefRegMap(@Self)^.clr := $00100000;
  67757. end;
  67758. procedure TDMAC6_DCH6INT.setCHDHIE(thebits : TBits_1); inline;
  67759. begin
  67760. if thebits = 0 then
  67761. pTDefRegMap(@Self)^.clr := $00100000
  67762. else
  67763. pTDefRegMap(@Self)^.&set := $00100000;
  67764. end;
  67765. function TDMAC6_DCH6INT.getCHDHIE : TBits_1; inline;
  67766. begin
  67767. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  67768. end;
  67769. procedure TDMAC6_DCH6INT.setCHDDIE; inline;
  67770. begin
  67771. pTDefRegMap(@Self)^.&set := $00200000;
  67772. end;
  67773. procedure TDMAC6_DCH6INT.clearCHDDIE; inline;
  67774. begin
  67775. pTDefRegMap(@Self)^.clr := $00200000;
  67776. end;
  67777. procedure TDMAC6_DCH6INT.setCHDDIE(thebits : TBits_1); inline;
  67778. begin
  67779. if thebits = 0 then
  67780. pTDefRegMap(@Self)^.clr := $00200000
  67781. else
  67782. pTDefRegMap(@Self)^.&set := $00200000;
  67783. end;
  67784. function TDMAC6_DCH6INT.getCHDDIE : TBits_1; inline;
  67785. begin
  67786. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  67787. end;
  67788. procedure TDMAC6_DCH6INT.setCHSHIE; inline;
  67789. begin
  67790. pTDefRegMap(@Self)^.&set := $00400000;
  67791. end;
  67792. procedure TDMAC6_DCH6INT.clearCHSHIE; inline;
  67793. begin
  67794. pTDefRegMap(@Self)^.clr := $00400000;
  67795. end;
  67796. procedure TDMAC6_DCH6INT.setCHSHIE(thebits : TBits_1); inline;
  67797. begin
  67798. if thebits = 0 then
  67799. pTDefRegMap(@Self)^.clr := $00400000
  67800. else
  67801. pTDefRegMap(@Self)^.&set := $00400000;
  67802. end;
  67803. function TDMAC6_DCH6INT.getCHSHIE : TBits_1; inline;
  67804. begin
  67805. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  67806. end;
  67807. procedure TDMAC6_DCH6INT.setCHSDIE; inline;
  67808. begin
  67809. pTDefRegMap(@Self)^.&set := $00800000;
  67810. end;
  67811. procedure TDMAC6_DCH6INT.clearCHSDIE; inline;
  67812. begin
  67813. pTDefRegMap(@Self)^.clr := $00800000;
  67814. end;
  67815. procedure TDMAC6_DCH6INT.setCHSDIE(thebits : TBits_1); inline;
  67816. begin
  67817. if thebits = 0 then
  67818. pTDefRegMap(@Self)^.clr := $00800000
  67819. else
  67820. pTDefRegMap(@Self)^.&set := $00800000;
  67821. end;
  67822. function TDMAC6_DCH6INT.getCHSDIE : TBits_1; inline;
  67823. begin
  67824. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  67825. end;
  67826. procedure TDMAC6_DCH6INT.setw(thebits : TBits_32); inline;
  67827. begin
  67828. pTDefRegMap(@Self)^.val := thebits;
  67829. end;
  67830. function TDMAC6_DCH6INT.getw : TBits_32; inline;
  67831. begin
  67832. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67833. end;
  67834. procedure TDMAC7_DCH7CON.setCHPRI(thebits : TBits_2); inline;
  67835. begin
  67836. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  67837. end;
  67838. function TDMAC7_DCH7CON.getCHPRI : TBits_2; inline;
  67839. begin
  67840. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  67841. end;
  67842. procedure TDMAC7_DCH7CON.setCHEDET; inline;
  67843. begin
  67844. pTDefRegMap(@Self)^.&set := $00000004;
  67845. end;
  67846. procedure TDMAC7_DCH7CON.clearCHEDET; inline;
  67847. begin
  67848. pTDefRegMap(@Self)^.clr := $00000004;
  67849. end;
  67850. procedure TDMAC7_DCH7CON.setCHEDET(thebits : TBits_1); inline;
  67851. begin
  67852. if thebits = 0 then
  67853. pTDefRegMap(@Self)^.clr := $00000004
  67854. else
  67855. pTDefRegMap(@Self)^.&set := $00000004;
  67856. end;
  67857. function TDMAC7_DCH7CON.getCHEDET : TBits_1; inline;
  67858. begin
  67859. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67860. end;
  67861. procedure TDMAC7_DCH7CON.setCHAEN; inline;
  67862. begin
  67863. pTDefRegMap(@Self)^.&set := $00000010;
  67864. end;
  67865. procedure TDMAC7_DCH7CON.clearCHAEN; inline;
  67866. begin
  67867. pTDefRegMap(@Self)^.clr := $00000010;
  67868. end;
  67869. procedure TDMAC7_DCH7CON.setCHAEN(thebits : TBits_1); inline;
  67870. begin
  67871. if thebits = 0 then
  67872. pTDefRegMap(@Self)^.clr := $00000010
  67873. else
  67874. pTDefRegMap(@Self)^.&set := $00000010;
  67875. end;
  67876. function TDMAC7_DCH7CON.getCHAEN : TBits_1; inline;
  67877. begin
  67878. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67879. end;
  67880. procedure TDMAC7_DCH7CON.setCHCHN; inline;
  67881. begin
  67882. pTDefRegMap(@Self)^.&set := $00000020;
  67883. end;
  67884. procedure TDMAC7_DCH7CON.clearCHCHN; inline;
  67885. begin
  67886. pTDefRegMap(@Self)^.clr := $00000020;
  67887. end;
  67888. procedure TDMAC7_DCH7CON.setCHCHN(thebits : TBits_1); inline;
  67889. begin
  67890. if thebits = 0 then
  67891. pTDefRegMap(@Self)^.clr := $00000020
  67892. else
  67893. pTDefRegMap(@Self)^.&set := $00000020;
  67894. end;
  67895. function TDMAC7_DCH7CON.getCHCHN : TBits_1; inline;
  67896. begin
  67897. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67898. end;
  67899. procedure TDMAC7_DCH7CON.setCHAED; inline;
  67900. begin
  67901. pTDefRegMap(@Self)^.&set := $00000040;
  67902. end;
  67903. procedure TDMAC7_DCH7CON.clearCHAED; inline;
  67904. begin
  67905. pTDefRegMap(@Self)^.clr := $00000040;
  67906. end;
  67907. procedure TDMAC7_DCH7CON.setCHAED(thebits : TBits_1); inline;
  67908. begin
  67909. if thebits = 0 then
  67910. pTDefRegMap(@Self)^.clr := $00000040
  67911. else
  67912. pTDefRegMap(@Self)^.&set := $00000040;
  67913. end;
  67914. function TDMAC7_DCH7CON.getCHAED : TBits_1; inline;
  67915. begin
  67916. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67917. end;
  67918. procedure TDMAC7_DCH7CON.setCHEN; inline;
  67919. begin
  67920. pTDefRegMap(@Self)^.&set := $00000080;
  67921. end;
  67922. procedure TDMAC7_DCH7CON.clearCHEN; inline;
  67923. begin
  67924. pTDefRegMap(@Self)^.clr := $00000080;
  67925. end;
  67926. procedure TDMAC7_DCH7CON.setCHEN(thebits : TBits_1); inline;
  67927. begin
  67928. if thebits = 0 then
  67929. pTDefRegMap(@Self)^.clr := $00000080
  67930. else
  67931. pTDefRegMap(@Self)^.&set := $00000080;
  67932. end;
  67933. function TDMAC7_DCH7CON.getCHEN : TBits_1; inline;
  67934. begin
  67935. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67936. end;
  67937. procedure TDMAC7_DCH7CON.setCHCHNS; inline;
  67938. begin
  67939. pTDefRegMap(@Self)^.&set := $00000100;
  67940. end;
  67941. procedure TDMAC7_DCH7CON.clearCHCHNS; inline;
  67942. begin
  67943. pTDefRegMap(@Self)^.clr := $00000100;
  67944. end;
  67945. procedure TDMAC7_DCH7CON.setCHCHNS(thebits : TBits_1); inline;
  67946. begin
  67947. if thebits = 0 then
  67948. pTDefRegMap(@Self)^.clr := $00000100
  67949. else
  67950. pTDefRegMap(@Self)^.&set := $00000100;
  67951. end;
  67952. function TDMAC7_DCH7CON.getCHCHNS : TBits_1; inline;
  67953. begin
  67954. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  67955. end;
  67956. procedure TDMAC7_DCH7CON.setCHBUSY; inline;
  67957. begin
  67958. pTDefRegMap(@Self)^.&set := $00008000;
  67959. end;
  67960. procedure TDMAC7_DCH7CON.clearCHBUSY; inline;
  67961. begin
  67962. pTDefRegMap(@Self)^.clr := $00008000;
  67963. end;
  67964. procedure TDMAC7_DCH7CON.setCHBUSY(thebits : TBits_1); inline;
  67965. begin
  67966. if thebits = 0 then
  67967. pTDefRegMap(@Self)^.clr := $00008000
  67968. else
  67969. pTDefRegMap(@Self)^.&set := $00008000;
  67970. end;
  67971. function TDMAC7_DCH7CON.getCHBUSY : TBits_1; inline;
  67972. begin
  67973. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67974. end;
  67975. procedure TDMAC7_DCH7CON.setw(thebits : TBits_32); inline;
  67976. begin
  67977. pTDefRegMap(@Self)^.val := thebits;
  67978. end;
  67979. function TDMAC7_DCH7CON.getw : TBits_32; inline;
  67980. begin
  67981. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67982. end;
  67983. procedure TDMAC7_DCH7ECON.setAIRQEN; inline;
  67984. begin
  67985. pTDefRegMap(@Self)^.&set := $00000008;
  67986. end;
  67987. procedure TDMAC7_DCH7ECON.clearAIRQEN; inline;
  67988. begin
  67989. pTDefRegMap(@Self)^.clr := $00000008;
  67990. end;
  67991. procedure TDMAC7_DCH7ECON.setAIRQEN(thebits : TBits_1); inline;
  67992. begin
  67993. if thebits = 0 then
  67994. pTDefRegMap(@Self)^.clr := $00000008
  67995. else
  67996. pTDefRegMap(@Self)^.&set := $00000008;
  67997. end;
  67998. function TDMAC7_DCH7ECON.getAIRQEN : TBits_1; inline;
  67999. begin
  68000. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68001. end;
  68002. procedure TDMAC7_DCH7ECON.setSIRQEN; inline;
  68003. begin
  68004. pTDefRegMap(@Self)^.&set := $00000010;
  68005. end;
  68006. procedure TDMAC7_DCH7ECON.clearSIRQEN; inline;
  68007. begin
  68008. pTDefRegMap(@Self)^.clr := $00000010;
  68009. end;
  68010. procedure TDMAC7_DCH7ECON.setSIRQEN(thebits : TBits_1); inline;
  68011. begin
  68012. if thebits = 0 then
  68013. pTDefRegMap(@Self)^.clr := $00000010
  68014. else
  68015. pTDefRegMap(@Self)^.&set := $00000010;
  68016. end;
  68017. function TDMAC7_DCH7ECON.getSIRQEN : TBits_1; inline;
  68018. begin
  68019. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68020. end;
  68021. procedure TDMAC7_DCH7ECON.setPATEN; inline;
  68022. begin
  68023. pTDefRegMap(@Self)^.&set := $00000020;
  68024. end;
  68025. procedure TDMAC7_DCH7ECON.clearPATEN; inline;
  68026. begin
  68027. pTDefRegMap(@Self)^.clr := $00000020;
  68028. end;
  68029. procedure TDMAC7_DCH7ECON.setPATEN(thebits : TBits_1); inline;
  68030. begin
  68031. if thebits = 0 then
  68032. pTDefRegMap(@Self)^.clr := $00000020
  68033. else
  68034. pTDefRegMap(@Self)^.&set := $00000020;
  68035. end;
  68036. function TDMAC7_DCH7ECON.getPATEN : TBits_1; inline;
  68037. begin
  68038. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68039. end;
  68040. procedure TDMAC7_DCH7ECON.setCABORT; inline;
  68041. begin
  68042. pTDefRegMap(@Self)^.&set := $00000040;
  68043. end;
  68044. procedure TDMAC7_DCH7ECON.clearCABORT; inline;
  68045. begin
  68046. pTDefRegMap(@Self)^.clr := $00000040;
  68047. end;
  68048. procedure TDMAC7_DCH7ECON.setCABORT(thebits : TBits_1); inline;
  68049. begin
  68050. if thebits = 0 then
  68051. pTDefRegMap(@Self)^.clr := $00000040
  68052. else
  68053. pTDefRegMap(@Self)^.&set := $00000040;
  68054. end;
  68055. function TDMAC7_DCH7ECON.getCABORT : TBits_1; inline;
  68056. begin
  68057. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68058. end;
  68059. procedure TDMAC7_DCH7ECON.setCFORCE; inline;
  68060. begin
  68061. pTDefRegMap(@Self)^.&set := $00000080;
  68062. end;
  68063. procedure TDMAC7_DCH7ECON.clearCFORCE; inline;
  68064. begin
  68065. pTDefRegMap(@Self)^.clr := $00000080;
  68066. end;
  68067. procedure TDMAC7_DCH7ECON.setCFORCE(thebits : TBits_1); inline;
  68068. begin
  68069. if thebits = 0 then
  68070. pTDefRegMap(@Self)^.clr := $00000080
  68071. else
  68072. pTDefRegMap(@Self)^.&set := $00000080;
  68073. end;
  68074. function TDMAC7_DCH7ECON.getCFORCE : TBits_1; inline;
  68075. begin
  68076. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68077. end;
  68078. procedure TDMAC7_DCH7ECON.setCHSIRQ(thebits : TBits_8); inline;
  68079. begin
  68080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  68081. end;
  68082. function TDMAC7_DCH7ECON.getCHSIRQ : TBits_8; inline;
  68083. begin
  68084. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  68085. end;
  68086. procedure TDMAC7_DCH7ECON.setCHAIRQ(thebits : TBits_8); inline;
  68087. begin
  68088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  68089. end;
  68090. function TDMAC7_DCH7ECON.getCHAIRQ : TBits_8; inline;
  68091. begin
  68092. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  68093. end;
  68094. procedure TDMAC7_DCH7ECON.setw(thebits : TBits_32); inline;
  68095. begin
  68096. pTDefRegMap(@Self)^.val := thebits;
  68097. end;
  68098. function TDMAC7_DCH7ECON.getw : TBits_32; inline;
  68099. begin
  68100. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68101. end;
  68102. procedure TDMAC7_DCH7INT.setCHERIF; inline;
  68103. begin
  68104. pTDefRegMap(@Self)^.&set := $00000001;
  68105. end;
  68106. procedure TDMAC7_DCH7INT.clearCHERIF; inline;
  68107. begin
  68108. pTDefRegMap(@Self)^.clr := $00000001;
  68109. end;
  68110. procedure TDMAC7_DCH7INT.setCHERIF(thebits : TBits_1); inline;
  68111. begin
  68112. if thebits = 0 then
  68113. pTDefRegMap(@Self)^.clr := $00000001
  68114. else
  68115. pTDefRegMap(@Self)^.&set := $00000001;
  68116. end;
  68117. function TDMAC7_DCH7INT.getCHERIF : TBits_1; inline;
  68118. begin
  68119. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68120. end;
  68121. procedure TDMAC7_DCH7INT.setCHTAIF; inline;
  68122. begin
  68123. pTDefRegMap(@Self)^.&set := $00000002;
  68124. end;
  68125. procedure TDMAC7_DCH7INT.clearCHTAIF; inline;
  68126. begin
  68127. pTDefRegMap(@Self)^.clr := $00000002;
  68128. end;
  68129. procedure TDMAC7_DCH7INT.setCHTAIF(thebits : TBits_1); inline;
  68130. begin
  68131. if thebits = 0 then
  68132. pTDefRegMap(@Self)^.clr := $00000002
  68133. else
  68134. pTDefRegMap(@Self)^.&set := $00000002;
  68135. end;
  68136. function TDMAC7_DCH7INT.getCHTAIF : TBits_1; inline;
  68137. begin
  68138. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68139. end;
  68140. procedure TDMAC7_DCH7INT.setCHCCIF; inline;
  68141. begin
  68142. pTDefRegMap(@Self)^.&set := $00000004;
  68143. end;
  68144. procedure TDMAC7_DCH7INT.clearCHCCIF; inline;
  68145. begin
  68146. pTDefRegMap(@Self)^.clr := $00000004;
  68147. end;
  68148. procedure TDMAC7_DCH7INT.setCHCCIF(thebits : TBits_1); inline;
  68149. begin
  68150. if thebits = 0 then
  68151. pTDefRegMap(@Self)^.clr := $00000004
  68152. else
  68153. pTDefRegMap(@Self)^.&set := $00000004;
  68154. end;
  68155. function TDMAC7_DCH7INT.getCHCCIF : TBits_1; inline;
  68156. begin
  68157. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68158. end;
  68159. procedure TDMAC7_DCH7INT.setCHBCIF; inline;
  68160. begin
  68161. pTDefRegMap(@Self)^.&set := $00000008;
  68162. end;
  68163. procedure TDMAC7_DCH7INT.clearCHBCIF; inline;
  68164. begin
  68165. pTDefRegMap(@Self)^.clr := $00000008;
  68166. end;
  68167. procedure TDMAC7_DCH7INT.setCHBCIF(thebits : TBits_1); inline;
  68168. begin
  68169. if thebits = 0 then
  68170. pTDefRegMap(@Self)^.clr := $00000008
  68171. else
  68172. pTDefRegMap(@Self)^.&set := $00000008;
  68173. end;
  68174. function TDMAC7_DCH7INT.getCHBCIF : TBits_1; inline;
  68175. begin
  68176. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68177. end;
  68178. procedure TDMAC7_DCH7INT.setCHDHIF; inline;
  68179. begin
  68180. pTDefRegMap(@Self)^.&set := $00000010;
  68181. end;
  68182. procedure TDMAC7_DCH7INT.clearCHDHIF; inline;
  68183. begin
  68184. pTDefRegMap(@Self)^.clr := $00000010;
  68185. end;
  68186. procedure TDMAC7_DCH7INT.setCHDHIF(thebits : TBits_1); inline;
  68187. begin
  68188. if thebits = 0 then
  68189. pTDefRegMap(@Self)^.clr := $00000010
  68190. else
  68191. pTDefRegMap(@Self)^.&set := $00000010;
  68192. end;
  68193. function TDMAC7_DCH7INT.getCHDHIF : TBits_1; inline;
  68194. begin
  68195. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68196. end;
  68197. procedure TDMAC7_DCH7INT.setCHDDIF; inline;
  68198. begin
  68199. pTDefRegMap(@Self)^.&set := $00000020;
  68200. end;
  68201. procedure TDMAC7_DCH7INT.clearCHDDIF; inline;
  68202. begin
  68203. pTDefRegMap(@Self)^.clr := $00000020;
  68204. end;
  68205. procedure TDMAC7_DCH7INT.setCHDDIF(thebits : TBits_1); inline;
  68206. begin
  68207. if thebits = 0 then
  68208. pTDefRegMap(@Self)^.clr := $00000020
  68209. else
  68210. pTDefRegMap(@Self)^.&set := $00000020;
  68211. end;
  68212. function TDMAC7_DCH7INT.getCHDDIF : TBits_1; inline;
  68213. begin
  68214. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68215. end;
  68216. procedure TDMAC7_DCH7INT.setCHSHIF; inline;
  68217. begin
  68218. pTDefRegMap(@Self)^.&set := $00000040;
  68219. end;
  68220. procedure TDMAC7_DCH7INT.clearCHSHIF; inline;
  68221. begin
  68222. pTDefRegMap(@Self)^.clr := $00000040;
  68223. end;
  68224. procedure TDMAC7_DCH7INT.setCHSHIF(thebits : TBits_1); inline;
  68225. begin
  68226. if thebits = 0 then
  68227. pTDefRegMap(@Self)^.clr := $00000040
  68228. else
  68229. pTDefRegMap(@Self)^.&set := $00000040;
  68230. end;
  68231. function TDMAC7_DCH7INT.getCHSHIF : TBits_1; inline;
  68232. begin
  68233. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68234. end;
  68235. procedure TDMAC7_DCH7INT.setCHSDIF; inline;
  68236. begin
  68237. pTDefRegMap(@Self)^.&set := $00000080;
  68238. end;
  68239. procedure TDMAC7_DCH7INT.clearCHSDIF; inline;
  68240. begin
  68241. pTDefRegMap(@Self)^.clr := $00000080;
  68242. end;
  68243. procedure TDMAC7_DCH7INT.setCHSDIF(thebits : TBits_1); inline;
  68244. begin
  68245. if thebits = 0 then
  68246. pTDefRegMap(@Self)^.clr := $00000080
  68247. else
  68248. pTDefRegMap(@Self)^.&set := $00000080;
  68249. end;
  68250. function TDMAC7_DCH7INT.getCHSDIF : TBits_1; inline;
  68251. begin
  68252. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68253. end;
  68254. procedure TDMAC7_DCH7INT.setCHERIE; inline;
  68255. begin
  68256. pTDefRegMap(@Self)^.&set := $00010000;
  68257. end;
  68258. procedure TDMAC7_DCH7INT.clearCHERIE; inline;
  68259. begin
  68260. pTDefRegMap(@Self)^.clr := $00010000;
  68261. end;
  68262. procedure TDMAC7_DCH7INT.setCHERIE(thebits : TBits_1); inline;
  68263. begin
  68264. if thebits = 0 then
  68265. pTDefRegMap(@Self)^.clr := $00010000
  68266. else
  68267. pTDefRegMap(@Self)^.&set := $00010000;
  68268. end;
  68269. function TDMAC7_DCH7INT.getCHERIE : TBits_1; inline;
  68270. begin
  68271. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  68272. end;
  68273. procedure TDMAC7_DCH7INT.setCHTAIE; inline;
  68274. begin
  68275. pTDefRegMap(@Self)^.&set := $00020000;
  68276. end;
  68277. procedure TDMAC7_DCH7INT.clearCHTAIE; inline;
  68278. begin
  68279. pTDefRegMap(@Self)^.clr := $00020000;
  68280. end;
  68281. procedure TDMAC7_DCH7INT.setCHTAIE(thebits : TBits_1); inline;
  68282. begin
  68283. if thebits = 0 then
  68284. pTDefRegMap(@Self)^.clr := $00020000
  68285. else
  68286. pTDefRegMap(@Self)^.&set := $00020000;
  68287. end;
  68288. function TDMAC7_DCH7INT.getCHTAIE : TBits_1; inline;
  68289. begin
  68290. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  68291. end;
  68292. procedure TDMAC7_DCH7INT.setCHCCIE; inline;
  68293. begin
  68294. pTDefRegMap(@Self)^.&set := $00040000;
  68295. end;
  68296. procedure TDMAC7_DCH7INT.clearCHCCIE; inline;
  68297. begin
  68298. pTDefRegMap(@Self)^.clr := $00040000;
  68299. end;
  68300. procedure TDMAC7_DCH7INT.setCHCCIE(thebits : TBits_1); inline;
  68301. begin
  68302. if thebits = 0 then
  68303. pTDefRegMap(@Self)^.clr := $00040000
  68304. else
  68305. pTDefRegMap(@Self)^.&set := $00040000;
  68306. end;
  68307. function TDMAC7_DCH7INT.getCHCCIE : TBits_1; inline;
  68308. begin
  68309. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  68310. end;
  68311. procedure TDMAC7_DCH7INT.setCHBCIE; inline;
  68312. begin
  68313. pTDefRegMap(@Self)^.&set := $00080000;
  68314. end;
  68315. procedure TDMAC7_DCH7INT.clearCHBCIE; inline;
  68316. begin
  68317. pTDefRegMap(@Self)^.clr := $00080000;
  68318. end;
  68319. procedure TDMAC7_DCH7INT.setCHBCIE(thebits : TBits_1); inline;
  68320. begin
  68321. if thebits = 0 then
  68322. pTDefRegMap(@Self)^.clr := $00080000
  68323. else
  68324. pTDefRegMap(@Self)^.&set := $00080000;
  68325. end;
  68326. function TDMAC7_DCH7INT.getCHBCIE : TBits_1; inline;
  68327. begin
  68328. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  68329. end;
  68330. procedure TDMAC7_DCH7INT.setCHDHIE; inline;
  68331. begin
  68332. pTDefRegMap(@Self)^.&set := $00100000;
  68333. end;
  68334. procedure TDMAC7_DCH7INT.clearCHDHIE; inline;
  68335. begin
  68336. pTDefRegMap(@Self)^.clr := $00100000;
  68337. end;
  68338. procedure TDMAC7_DCH7INT.setCHDHIE(thebits : TBits_1); inline;
  68339. begin
  68340. if thebits = 0 then
  68341. pTDefRegMap(@Self)^.clr := $00100000
  68342. else
  68343. pTDefRegMap(@Self)^.&set := $00100000;
  68344. end;
  68345. function TDMAC7_DCH7INT.getCHDHIE : TBits_1; inline;
  68346. begin
  68347. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  68348. end;
  68349. procedure TDMAC7_DCH7INT.setCHDDIE; inline;
  68350. begin
  68351. pTDefRegMap(@Self)^.&set := $00200000;
  68352. end;
  68353. procedure TDMAC7_DCH7INT.clearCHDDIE; inline;
  68354. begin
  68355. pTDefRegMap(@Self)^.clr := $00200000;
  68356. end;
  68357. procedure TDMAC7_DCH7INT.setCHDDIE(thebits : TBits_1); inline;
  68358. begin
  68359. if thebits = 0 then
  68360. pTDefRegMap(@Self)^.clr := $00200000
  68361. else
  68362. pTDefRegMap(@Self)^.&set := $00200000;
  68363. end;
  68364. function TDMAC7_DCH7INT.getCHDDIE : TBits_1; inline;
  68365. begin
  68366. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  68367. end;
  68368. procedure TDMAC7_DCH7INT.setCHSHIE; inline;
  68369. begin
  68370. pTDefRegMap(@Self)^.&set := $00400000;
  68371. end;
  68372. procedure TDMAC7_DCH7INT.clearCHSHIE; inline;
  68373. begin
  68374. pTDefRegMap(@Self)^.clr := $00400000;
  68375. end;
  68376. procedure TDMAC7_DCH7INT.setCHSHIE(thebits : TBits_1); inline;
  68377. begin
  68378. if thebits = 0 then
  68379. pTDefRegMap(@Self)^.clr := $00400000
  68380. else
  68381. pTDefRegMap(@Self)^.&set := $00400000;
  68382. end;
  68383. function TDMAC7_DCH7INT.getCHSHIE : TBits_1; inline;
  68384. begin
  68385. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  68386. end;
  68387. procedure TDMAC7_DCH7INT.setCHSDIE; inline;
  68388. begin
  68389. pTDefRegMap(@Self)^.&set := $00800000;
  68390. end;
  68391. procedure TDMAC7_DCH7INT.clearCHSDIE; inline;
  68392. begin
  68393. pTDefRegMap(@Self)^.clr := $00800000;
  68394. end;
  68395. procedure TDMAC7_DCH7INT.setCHSDIE(thebits : TBits_1); inline;
  68396. begin
  68397. if thebits = 0 then
  68398. pTDefRegMap(@Self)^.clr := $00800000
  68399. else
  68400. pTDefRegMap(@Self)^.&set := $00800000;
  68401. end;
  68402. function TDMAC7_DCH7INT.getCHSDIE : TBits_1; inline;
  68403. begin
  68404. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  68405. end;
  68406. procedure TDMAC7_DCH7INT.setw(thebits : TBits_32); inline;
  68407. begin
  68408. pTDefRegMap(@Self)^.val := thebits;
  68409. end;
  68410. function TDMAC7_DCH7INT.getw : TBits_32; inline;
  68411. begin
  68412. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68413. end;
  68414. procedure TPCACHE_CHECON.setPFMWS(thebits : TBits_3); inline;
  68415. begin
  68416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  68417. end;
  68418. function TPCACHE_CHECON.getPFMWS : TBits_3; inline;
  68419. begin
  68420. getPFMWS := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  68421. end;
  68422. procedure TPCACHE_CHECON.setPREFEN(thebits : TBits_2); inline;
  68423. begin
  68424. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  68425. end;
  68426. function TPCACHE_CHECON.getPREFEN : TBits_2; inline;
  68427. begin
  68428. getPREFEN := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  68429. end;
  68430. procedure TPCACHE_CHECON.setDCSZ(thebits : TBits_2); inline;
  68431. begin
  68432. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  68433. end;
  68434. function TPCACHE_CHECON.getDCSZ : TBits_2; inline;
  68435. begin
  68436. getDCSZ := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  68437. end;
  68438. procedure TPCACHE_CHECON.setCHECOH; inline;
  68439. begin
  68440. pTDefRegMap(@Self)^.&set := $00010000;
  68441. end;
  68442. procedure TPCACHE_CHECON.clearCHECOH; inline;
  68443. begin
  68444. pTDefRegMap(@Self)^.clr := $00010000;
  68445. end;
  68446. procedure TPCACHE_CHECON.setCHECOH(thebits : TBits_1); inline;
  68447. begin
  68448. if thebits = 0 then
  68449. pTDefRegMap(@Self)^.clr := $00010000
  68450. else
  68451. pTDefRegMap(@Self)^.&set := $00010000;
  68452. end;
  68453. function TPCACHE_CHECON.getCHECOH : TBits_1; inline;
  68454. begin
  68455. getCHECOH := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  68456. end;
  68457. procedure TPCACHE_CHECON.setw(thebits : TBits_32); inline;
  68458. begin
  68459. pTDefRegMap(@Self)^.val := thebits;
  68460. end;
  68461. function TPCACHE_CHECON.getw : TBits_32; inline;
  68462. begin
  68463. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68464. end;
  68465. procedure TPCACHE_CHETAG.setLTYPE; inline;
  68466. begin
  68467. pTDefRegMap(@Self)^.&set := $00000002;
  68468. end;
  68469. procedure TPCACHE_CHETAG.clearLTYPE; inline;
  68470. begin
  68471. pTDefRegMap(@Self)^.clr := $00000002;
  68472. end;
  68473. procedure TPCACHE_CHETAG.setLTYPE(thebits : TBits_1); inline;
  68474. begin
  68475. if thebits = 0 then
  68476. pTDefRegMap(@Self)^.clr := $00000002
  68477. else
  68478. pTDefRegMap(@Self)^.&set := $00000002;
  68479. end;
  68480. function TPCACHE_CHETAG.getLTYPE : TBits_1; inline;
  68481. begin
  68482. getLTYPE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68483. end;
  68484. procedure TPCACHE_CHETAG.setLLOCK; inline;
  68485. begin
  68486. pTDefRegMap(@Self)^.&set := $00000004;
  68487. end;
  68488. procedure TPCACHE_CHETAG.clearLLOCK; inline;
  68489. begin
  68490. pTDefRegMap(@Self)^.clr := $00000004;
  68491. end;
  68492. procedure TPCACHE_CHETAG.setLLOCK(thebits : TBits_1); inline;
  68493. begin
  68494. if thebits = 0 then
  68495. pTDefRegMap(@Self)^.clr := $00000004
  68496. else
  68497. pTDefRegMap(@Self)^.&set := $00000004;
  68498. end;
  68499. function TPCACHE_CHETAG.getLLOCK : TBits_1; inline;
  68500. begin
  68501. getLLOCK := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68502. end;
  68503. procedure TPCACHE_CHETAG.setLVALID; inline;
  68504. begin
  68505. pTDefRegMap(@Self)^.&set := $00000008;
  68506. end;
  68507. procedure TPCACHE_CHETAG.clearLVALID; inline;
  68508. begin
  68509. pTDefRegMap(@Self)^.clr := $00000008;
  68510. end;
  68511. procedure TPCACHE_CHETAG.setLVALID(thebits : TBits_1); inline;
  68512. begin
  68513. if thebits = 0 then
  68514. pTDefRegMap(@Self)^.clr := $00000008
  68515. else
  68516. pTDefRegMap(@Self)^.&set := $00000008;
  68517. end;
  68518. function TPCACHE_CHETAG.getLVALID : TBits_1; inline;
  68519. begin
  68520. getLVALID := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68521. end;
  68522. procedure TPCACHE_CHETAG.setLTAG(thebits : TBits_20); inline;
  68523. begin
  68524. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00000F or ( thebits shl 4 );
  68525. end;
  68526. function TPCACHE_CHETAG.getLTAG : TBits_20; inline;
  68527. begin
  68528. getLTAG := (pTDefRegMap(@Self)^.val and $00FFFFF0) shr 4;
  68529. end;
  68530. procedure TPCACHE_CHETAG.setLTAGBOOT; inline;
  68531. begin
  68532. pTDefRegMap(@Self)^.&set := $80000000;
  68533. end;
  68534. procedure TPCACHE_CHETAG.clearLTAGBOOT; inline;
  68535. begin
  68536. pTDefRegMap(@Self)^.clr := $80000000;
  68537. end;
  68538. procedure TPCACHE_CHETAG.setLTAGBOOT(thebits : TBits_1); inline;
  68539. begin
  68540. if thebits = 0 then
  68541. pTDefRegMap(@Self)^.clr := $80000000
  68542. else
  68543. pTDefRegMap(@Self)^.&set := $80000000;
  68544. end;
  68545. function TPCACHE_CHETAG.getLTAGBOOT : TBits_1; inline;
  68546. begin
  68547. getLTAGBOOT := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  68548. end;
  68549. procedure TPCACHE_CHETAG.setw(thebits : TBits_32); inline;
  68550. begin
  68551. pTDefRegMap(@Self)^.val := thebits;
  68552. end;
  68553. function TPCACHE_CHETAG.getw : TBits_32; inline;
  68554. begin
  68555. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68556. end;
  68557. procedure TUSB_U1IR.setURSTIF_DETACHIF; inline;
  68558. begin
  68559. pTDefRegMap(@Self)^.&set := $00000001;
  68560. end;
  68561. procedure TUSB_U1IR.clearURSTIF_DETACHIF; inline;
  68562. begin
  68563. pTDefRegMap(@Self)^.clr := $00000001;
  68564. end;
  68565. procedure TUSB_U1IR.setURSTIF_DETACHIF(thebits : TBits_1); inline;
  68566. begin
  68567. if thebits = 0 then
  68568. pTDefRegMap(@Self)^.clr := $00000001
  68569. else
  68570. pTDefRegMap(@Self)^.&set := $00000001;
  68571. end;
  68572. function TUSB_U1IR.getURSTIF_DETACHIF : TBits_1; inline;
  68573. begin
  68574. getURSTIF_DETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68575. end;
  68576. procedure TUSB_U1IR.setUERRIF; inline;
  68577. begin
  68578. pTDefRegMap(@Self)^.&set := $00000002;
  68579. end;
  68580. procedure TUSB_U1IR.clearUERRIF; inline;
  68581. begin
  68582. pTDefRegMap(@Self)^.clr := $00000002;
  68583. end;
  68584. procedure TUSB_U1IR.setUERRIF(thebits : TBits_1); inline;
  68585. begin
  68586. if thebits = 0 then
  68587. pTDefRegMap(@Self)^.clr := $00000002
  68588. else
  68589. pTDefRegMap(@Self)^.&set := $00000002;
  68590. end;
  68591. function TUSB_U1IR.getUERRIF : TBits_1; inline;
  68592. begin
  68593. getUERRIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68594. end;
  68595. procedure TUSB_U1IR.setSOFIF; inline;
  68596. begin
  68597. pTDefRegMap(@Self)^.&set := $00000004;
  68598. end;
  68599. procedure TUSB_U1IR.clearSOFIF; inline;
  68600. begin
  68601. pTDefRegMap(@Self)^.clr := $00000004;
  68602. end;
  68603. procedure TUSB_U1IR.setSOFIF(thebits : TBits_1); inline;
  68604. begin
  68605. if thebits = 0 then
  68606. pTDefRegMap(@Self)^.clr := $00000004
  68607. else
  68608. pTDefRegMap(@Self)^.&set := $00000004;
  68609. end;
  68610. function TUSB_U1IR.getSOFIF : TBits_1; inline;
  68611. begin
  68612. getSOFIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68613. end;
  68614. procedure TUSB_U1IR.setTRNIF; inline;
  68615. begin
  68616. pTDefRegMap(@Self)^.&set := $00000008;
  68617. end;
  68618. procedure TUSB_U1IR.clearTRNIF; inline;
  68619. begin
  68620. pTDefRegMap(@Self)^.clr := $00000008;
  68621. end;
  68622. procedure TUSB_U1IR.setTRNIF(thebits : TBits_1); inline;
  68623. begin
  68624. if thebits = 0 then
  68625. pTDefRegMap(@Self)^.clr := $00000008
  68626. else
  68627. pTDefRegMap(@Self)^.&set := $00000008;
  68628. end;
  68629. function TUSB_U1IR.getTRNIF : TBits_1; inline;
  68630. begin
  68631. getTRNIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68632. end;
  68633. procedure TUSB_U1IR.setIDLEIF; inline;
  68634. begin
  68635. pTDefRegMap(@Self)^.&set := $00000010;
  68636. end;
  68637. procedure TUSB_U1IR.clearIDLEIF; inline;
  68638. begin
  68639. pTDefRegMap(@Self)^.clr := $00000010;
  68640. end;
  68641. procedure TUSB_U1IR.setIDLEIF(thebits : TBits_1); inline;
  68642. begin
  68643. if thebits = 0 then
  68644. pTDefRegMap(@Self)^.clr := $00000010
  68645. else
  68646. pTDefRegMap(@Self)^.&set := $00000010;
  68647. end;
  68648. function TUSB_U1IR.getIDLEIF : TBits_1; inline;
  68649. begin
  68650. getIDLEIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68651. end;
  68652. procedure TUSB_U1IR.setRESUMEIF; inline;
  68653. begin
  68654. pTDefRegMap(@Self)^.&set := $00000020;
  68655. end;
  68656. procedure TUSB_U1IR.clearRESUMEIF; inline;
  68657. begin
  68658. pTDefRegMap(@Self)^.clr := $00000020;
  68659. end;
  68660. procedure TUSB_U1IR.setRESUMEIF(thebits : TBits_1); inline;
  68661. begin
  68662. if thebits = 0 then
  68663. pTDefRegMap(@Self)^.clr := $00000020
  68664. else
  68665. pTDefRegMap(@Self)^.&set := $00000020;
  68666. end;
  68667. function TUSB_U1IR.getRESUMEIF : TBits_1; inline;
  68668. begin
  68669. getRESUMEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68670. end;
  68671. procedure TUSB_U1IR.setATTACHIF; inline;
  68672. begin
  68673. pTDefRegMap(@Self)^.&set := $00000040;
  68674. end;
  68675. procedure TUSB_U1IR.clearATTACHIF; inline;
  68676. begin
  68677. pTDefRegMap(@Self)^.clr := $00000040;
  68678. end;
  68679. procedure TUSB_U1IR.setATTACHIF(thebits : TBits_1); inline;
  68680. begin
  68681. if thebits = 0 then
  68682. pTDefRegMap(@Self)^.clr := $00000040
  68683. else
  68684. pTDefRegMap(@Self)^.&set := $00000040;
  68685. end;
  68686. function TUSB_U1IR.getATTACHIF : TBits_1; inline;
  68687. begin
  68688. getATTACHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68689. end;
  68690. procedure TUSB_U1IR.setSTALLIF; inline;
  68691. begin
  68692. pTDefRegMap(@Self)^.&set := $00000080;
  68693. end;
  68694. procedure TUSB_U1IR.clearSTALLIF; inline;
  68695. begin
  68696. pTDefRegMap(@Self)^.clr := $00000080;
  68697. end;
  68698. procedure TUSB_U1IR.setSTALLIF(thebits : TBits_1); inline;
  68699. begin
  68700. if thebits = 0 then
  68701. pTDefRegMap(@Self)^.clr := $00000080
  68702. else
  68703. pTDefRegMap(@Self)^.&set := $00000080;
  68704. end;
  68705. function TUSB_U1IR.getSTALLIF : TBits_1; inline;
  68706. begin
  68707. getSTALLIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68708. end;
  68709. procedure TUSB_U1IR.setDETACHIF; inline;
  68710. begin
  68711. pTDefRegMap(@Self)^.&set := $00000001;
  68712. end;
  68713. procedure TUSB_U1IR.clearDETACHIF; inline;
  68714. begin
  68715. pTDefRegMap(@Self)^.clr := $00000001;
  68716. end;
  68717. procedure TUSB_U1IR.setDETACHIF(thebits : TBits_1); inline;
  68718. begin
  68719. if thebits = 0 then
  68720. pTDefRegMap(@Self)^.clr := $00000001
  68721. else
  68722. pTDefRegMap(@Self)^.&set := $00000001;
  68723. end;
  68724. function TUSB_U1IR.getDETACHIF : TBits_1; inline;
  68725. begin
  68726. getDETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68727. end;
  68728. procedure TUSB_U1IR.setURSTIF; inline;
  68729. begin
  68730. pTDefRegMap(@Self)^.&set := $00000001;
  68731. end;
  68732. procedure TUSB_U1IR.clearURSTIF; inline;
  68733. begin
  68734. pTDefRegMap(@Self)^.clr := $00000001;
  68735. end;
  68736. procedure TUSB_U1IR.setURSTIF(thebits : TBits_1); inline;
  68737. begin
  68738. if thebits = 0 then
  68739. pTDefRegMap(@Self)^.clr := $00000001
  68740. else
  68741. pTDefRegMap(@Self)^.&set := $00000001;
  68742. end;
  68743. function TUSB_U1IR.getURSTIF : TBits_1; inline;
  68744. begin
  68745. getURSTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68746. end;
  68747. procedure TUSB_U1IE.setURSTIE_DETACHIE; inline;
  68748. begin
  68749. pTDefRegMap(@Self)^.&set := $00000001;
  68750. end;
  68751. procedure TUSB_U1IE.clearURSTIE_DETACHIE; inline;
  68752. begin
  68753. pTDefRegMap(@Self)^.clr := $00000001;
  68754. end;
  68755. procedure TUSB_U1IE.setURSTIE_DETACHIE(thebits : TBits_1); inline;
  68756. begin
  68757. if thebits = 0 then
  68758. pTDefRegMap(@Self)^.clr := $00000001
  68759. else
  68760. pTDefRegMap(@Self)^.&set := $00000001;
  68761. end;
  68762. function TUSB_U1IE.getURSTIE_DETACHIE : TBits_1; inline;
  68763. begin
  68764. getURSTIE_DETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68765. end;
  68766. procedure TUSB_U1IE.setUERRIE; inline;
  68767. begin
  68768. pTDefRegMap(@Self)^.&set := $00000002;
  68769. end;
  68770. procedure TUSB_U1IE.clearUERRIE; inline;
  68771. begin
  68772. pTDefRegMap(@Self)^.clr := $00000002;
  68773. end;
  68774. procedure TUSB_U1IE.setUERRIE(thebits : TBits_1); inline;
  68775. begin
  68776. if thebits = 0 then
  68777. pTDefRegMap(@Self)^.clr := $00000002
  68778. else
  68779. pTDefRegMap(@Self)^.&set := $00000002;
  68780. end;
  68781. function TUSB_U1IE.getUERRIE : TBits_1; inline;
  68782. begin
  68783. getUERRIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68784. end;
  68785. procedure TUSB_U1IE.setSOFIE; inline;
  68786. begin
  68787. pTDefRegMap(@Self)^.&set := $00000004;
  68788. end;
  68789. procedure TUSB_U1IE.clearSOFIE; inline;
  68790. begin
  68791. pTDefRegMap(@Self)^.clr := $00000004;
  68792. end;
  68793. procedure TUSB_U1IE.setSOFIE(thebits : TBits_1); inline;
  68794. begin
  68795. if thebits = 0 then
  68796. pTDefRegMap(@Self)^.clr := $00000004
  68797. else
  68798. pTDefRegMap(@Self)^.&set := $00000004;
  68799. end;
  68800. function TUSB_U1IE.getSOFIE : TBits_1; inline;
  68801. begin
  68802. getSOFIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68803. end;
  68804. procedure TUSB_U1IE.setTRNIE; inline;
  68805. begin
  68806. pTDefRegMap(@Self)^.&set := $00000008;
  68807. end;
  68808. procedure TUSB_U1IE.clearTRNIE; inline;
  68809. begin
  68810. pTDefRegMap(@Self)^.clr := $00000008;
  68811. end;
  68812. procedure TUSB_U1IE.setTRNIE(thebits : TBits_1); inline;
  68813. begin
  68814. if thebits = 0 then
  68815. pTDefRegMap(@Self)^.clr := $00000008
  68816. else
  68817. pTDefRegMap(@Self)^.&set := $00000008;
  68818. end;
  68819. function TUSB_U1IE.getTRNIE : TBits_1; inline;
  68820. begin
  68821. getTRNIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68822. end;
  68823. procedure TUSB_U1IE.setIDLEIE; inline;
  68824. begin
  68825. pTDefRegMap(@Self)^.&set := $00000010;
  68826. end;
  68827. procedure TUSB_U1IE.clearIDLEIE; inline;
  68828. begin
  68829. pTDefRegMap(@Self)^.clr := $00000010;
  68830. end;
  68831. procedure TUSB_U1IE.setIDLEIE(thebits : TBits_1); inline;
  68832. begin
  68833. if thebits = 0 then
  68834. pTDefRegMap(@Self)^.clr := $00000010
  68835. else
  68836. pTDefRegMap(@Self)^.&set := $00000010;
  68837. end;
  68838. function TUSB_U1IE.getIDLEIE : TBits_1; inline;
  68839. begin
  68840. getIDLEIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68841. end;
  68842. procedure TUSB_U1IE.setRESUMEIE; inline;
  68843. begin
  68844. pTDefRegMap(@Self)^.&set := $00000020;
  68845. end;
  68846. procedure TUSB_U1IE.clearRESUMEIE; inline;
  68847. begin
  68848. pTDefRegMap(@Self)^.clr := $00000020;
  68849. end;
  68850. procedure TUSB_U1IE.setRESUMEIE(thebits : TBits_1); inline;
  68851. begin
  68852. if thebits = 0 then
  68853. pTDefRegMap(@Self)^.clr := $00000020
  68854. else
  68855. pTDefRegMap(@Self)^.&set := $00000020;
  68856. end;
  68857. function TUSB_U1IE.getRESUMEIE : TBits_1; inline;
  68858. begin
  68859. getRESUMEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68860. end;
  68861. procedure TUSB_U1IE.setATTACHIE; inline;
  68862. begin
  68863. pTDefRegMap(@Self)^.&set := $00000040;
  68864. end;
  68865. procedure TUSB_U1IE.clearATTACHIE; inline;
  68866. begin
  68867. pTDefRegMap(@Self)^.clr := $00000040;
  68868. end;
  68869. procedure TUSB_U1IE.setATTACHIE(thebits : TBits_1); inline;
  68870. begin
  68871. if thebits = 0 then
  68872. pTDefRegMap(@Self)^.clr := $00000040
  68873. else
  68874. pTDefRegMap(@Self)^.&set := $00000040;
  68875. end;
  68876. function TUSB_U1IE.getATTACHIE : TBits_1; inline;
  68877. begin
  68878. getATTACHIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68879. end;
  68880. procedure TUSB_U1IE.setSTALLIE; inline;
  68881. begin
  68882. pTDefRegMap(@Self)^.&set := $00000080;
  68883. end;
  68884. procedure TUSB_U1IE.clearSTALLIE; inline;
  68885. begin
  68886. pTDefRegMap(@Self)^.clr := $00000080;
  68887. end;
  68888. procedure TUSB_U1IE.setSTALLIE(thebits : TBits_1); inline;
  68889. begin
  68890. if thebits = 0 then
  68891. pTDefRegMap(@Self)^.clr := $00000080
  68892. else
  68893. pTDefRegMap(@Self)^.&set := $00000080;
  68894. end;
  68895. function TUSB_U1IE.getSTALLIE : TBits_1; inline;
  68896. begin
  68897. getSTALLIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68898. end;
  68899. procedure TUSB_U1IE.setDETACHIE; inline;
  68900. begin
  68901. pTDefRegMap(@Self)^.&set := $00000001;
  68902. end;
  68903. procedure TUSB_U1IE.clearDETACHIE; inline;
  68904. begin
  68905. pTDefRegMap(@Self)^.clr := $00000001;
  68906. end;
  68907. procedure TUSB_U1IE.setDETACHIE(thebits : TBits_1); inline;
  68908. begin
  68909. if thebits = 0 then
  68910. pTDefRegMap(@Self)^.clr := $00000001
  68911. else
  68912. pTDefRegMap(@Self)^.&set := $00000001;
  68913. end;
  68914. function TUSB_U1IE.getDETACHIE : TBits_1; inline;
  68915. begin
  68916. getDETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68917. end;
  68918. procedure TUSB_U1IE.setURSTIE; inline;
  68919. begin
  68920. pTDefRegMap(@Self)^.&set := $00000001;
  68921. end;
  68922. procedure TUSB_U1IE.clearURSTIE; inline;
  68923. begin
  68924. pTDefRegMap(@Self)^.clr := $00000001;
  68925. end;
  68926. procedure TUSB_U1IE.setURSTIE(thebits : TBits_1); inline;
  68927. begin
  68928. if thebits = 0 then
  68929. pTDefRegMap(@Self)^.clr := $00000001
  68930. else
  68931. pTDefRegMap(@Self)^.&set := $00000001;
  68932. end;
  68933. function TUSB_U1IE.getURSTIE : TBits_1; inline;
  68934. begin
  68935. getURSTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68936. end;
  68937. procedure TUSB_U1EIR.setPIDEF; inline;
  68938. begin
  68939. pTDefRegMap(@Self)^.&set := $00000001;
  68940. end;
  68941. procedure TUSB_U1EIR.clearPIDEF; inline;
  68942. begin
  68943. pTDefRegMap(@Self)^.clr := $00000001;
  68944. end;
  68945. procedure TUSB_U1EIR.setPIDEF(thebits : TBits_1); inline;
  68946. begin
  68947. if thebits = 0 then
  68948. pTDefRegMap(@Self)^.clr := $00000001
  68949. else
  68950. pTDefRegMap(@Self)^.&set := $00000001;
  68951. end;
  68952. function TUSB_U1EIR.getPIDEF : TBits_1; inline;
  68953. begin
  68954. getPIDEF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68955. end;
  68956. procedure TUSB_U1EIR.setCRC5EF_EOFEF; inline;
  68957. begin
  68958. pTDefRegMap(@Self)^.&set := $00000002;
  68959. end;
  68960. procedure TUSB_U1EIR.clearCRC5EF_EOFEF; inline;
  68961. begin
  68962. pTDefRegMap(@Self)^.clr := $00000002;
  68963. end;
  68964. procedure TUSB_U1EIR.setCRC5EF_EOFEF(thebits : TBits_1); inline;
  68965. begin
  68966. if thebits = 0 then
  68967. pTDefRegMap(@Self)^.clr := $00000002
  68968. else
  68969. pTDefRegMap(@Self)^.&set := $00000002;
  68970. end;
  68971. function TUSB_U1EIR.getCRC5EF_EOFEF : TBits_1; inline;
  68972. begin
  68973. getCRC5EF_EOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68974. end;
  68975. procedure TUSB_U1EIR.setCRC16EF; inline;
  68976. begin
  68977. pTDefRegMap(@Self)^.&set := $00000004;
  68978. end;
  68979. procedure TUSB_U1EIR.clearCRC16EF; inline;
  68980. begin
  68981. pTDefRegMap(@Self)^.clr := $00000004;
  68982. end;
  68983. procedure TUSB_U1EIR.setCRC16EF(thebits : TBits_1); inline;
  68984. begin
  68985. if thebits = 0 then
  68986. pTDefRegMap(@Self)^.clr := $00000004
  68987. else
  68988. pTDefRegMap(@Self)^.&set := $00000004;
  68989. end;
  68990. function TUSB_U1EIR.getCRC16EF : TBits_1; inline;
  68991. begin
  68992. getCRC16EF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68993. end;
  68994. procedure TUSB_U1EIR.setDFN8EF; inline;
  68995. begin
  68996. pTDefRegMap(@Self)^.&set := $00000008;
  68997. end;
  68998. procedure TUSB_U1EIR.clearDFN8EF; inline;
  68999. begin
  69000. pTDefRegMap(@Self)^.clr := $00000008;
  69001. end;
  69002. procedure TUSB_U1EIR.setDFN8EF(thebits : TBits_1); inline;
  69003. begin
  69004. if thebits = 0 then
  69005. pTDefRegMap(@Self)^.clr := $00000008
  69006. else
  69007. pTDefRegMap(@Self)^.&set := $00000008;
  69008. end;
  69009. function TUSB_U1EIR.getDFN8EF : TBits_1; inline;
  69010. begin
  69011. getDFN8EF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69012. end;
  69013. procedure TUSB_U1EIR.setBTOEF; inline;
  69014. begin
  69015. pTDefRegMap(@Self)^.&set := $00000010;
  69016. end;
  69017. procedure TUSB_U1EIR.clearBTOEF; inline;
  69018. begin
  69019. pTDefRegMap(@Self)^.clr := $00000010;
  69020. end;
  69021. procedure TUSB_U1EIR.setBTOEF(thebits : TBits_1); inline;
  69022. begin
  69023. if thebits = 0 then
  69024. pTDefRegMap(@Self)^.clr := $00000010
  69025. else
  69026. pTDefRegMap(@Self)^.&set := $00000010;
  69027. end;
  69028. function TUSB_U1EIR.getBTOEF : TBits_1; inline;
  69029. begin
  69030. getBTOEF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69031. end;
  69032. procedure TUSB_U1EIR.setDMAEF; inline;
  69033. begin
  69034. pTDefRegMap(@Self)^.&set := $00000020;
  69035. end;
  69036. procedure TUSB_U1EIR.clearDMAEF; inline;
  69037. begin
  69038. pTDefRegMap(@Self)^.clr := $00000020;
  69039. end;
  69040. procedure TUSB_U1EIR.setDMAEF(thebits : TBits_1); inline;
  69041. begin
  69042. if thebits = 0 then
  69043. pTDefRegMap(@Self)^.clr := $00000020
  69044. else
  69045. pTDefRegMap(@Self)^.&set := $00000020;
  69046. end;
  69047. function TUSB_U1EIR.getDMAEF : TBits_1; inline;
  69048. begin
  69049. getDMAEF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69050. end;
  69051. procedure TUSB_U1EIR.setBMXEF; inline;
  69052. begin
  69053. pTDefRegMap(@Self)^.&set := $00000040;
  69054. end;
  69055. procedure TUSB_U1EIR.clearBMXEF; inline;
  69056. begin
  69057. pTDefRegMap(@Self)^.clr := $00000040;
  69058. end;
  69059. procedure TUSB_U1EIR.setBMXEF(thebits : TBits_1); inline;
  69060. begin
  69061. if thebits = 0 then
  69062. pTDefRegMap(@Self)^.clr := $00000040
  69063. else
  69064. pTDefRegMap(@Self)^.&set := $00000040;
  69065. end;
  69066. function TUSB_U1EIR.getBMXEF : TBits_1; inline;
  69067. begin
  69068. getBMXEF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69069. end;
  69070. procedure TUSB_U1EIR.setBTSEF; inline;
  69071. begin
  69072. pTDefRegMap(@Self)^.&set := $00000080;
  69073. end;
  69074. procedure TUSB_U1EIR.clearBTSEF; inline;
  69075. begin
  69076. pTDefRegMap(@Self)^.clr := $00000080;
  69077. end;
  69078. procedure TUSB_U1EIR.setBTSEF(thebits : TBits_1); inline;
  69079. begin
  69080. if thebits = 0 then
  69081. pTDefRegMap(@Self)^.clr := $00000080
  69082. else
  69083. pTDefRegMap(@Self)^.&set := $00000080;
  69084. end;
  69085. function TUSB_U1EIR.getBTSEF : TBits_1; inline;
  69086. begin
  69087. getBTSEF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69088. end;
  69089. procedure TUSB_U1EIR.setCRC5EF; inline;
  69090. begin
  69091. pTDefRegMap(@Self)^.&set := $00000002;
  69092. end;
  69093. procedure TUSB_U1EIR.clearCRC5EF; inline;
  69094. begin
  69095. pTDefRegMap(@Self)^.clr := $00000002;
  69096. end;
  69097. procedure TUSB_U1EIR.setCRC5EF(thebits : TBits_1); inline;
  69098. begin
  69099. if thebits = 0 then
  69100. pTDefRegMap(@Self)^.clr := $00000002
  69101. else
  69102. pTDefRegMap(@Self)^.&set := $00000002;
  69103. end;
  69104. function TUSB_U1EIR.getCRC5EF : TBits_1; inline;
  69105. begin
  69106. getCRC5EF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69107. end;
  69108. procedure TUSB_U1EIR.setEOFEF; inline;
  69109. begin
  69110. pTDefRegMap(@Self)^.&set := $00000002;
  69111. end;
  69112. procedure TUSB_U1EIR.clearEOFEF; inline;
  69113. begin
  69114. pTDefRegMap(@Self)^.clr := $00000002;
  69115. end;
  69116. procedure TUSB_U1EIR.setEOFEF(thebits : TBits_1); inline;
  69117. begin
  69118. if thebits = 0 then
  69119. pTDefRegMap(@Self)^.clr := $00000002
  69120. else
  69121. pTDefRegMap(@Self)^.&set := $00000002;
  69122. end;
  69123. function TUSB_U1EIR.getEOFEF : TBits_1; inline;
  69124. begin
  69125. getEOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69126. end;
  69127. procedure TUSB_U1EIE.setPIDEE; inline;
  69128. begin
  69129. pTDefRegMap(@Self)^.&set := $00000001;
  69130. end;
  69131. procedure TUSB_U1EIE.clearPIDEE; inline;
  69132. begin
  69133. pTDefRegMap(@Self)^.clr := $00000001;
  69134. end;
  69135. procedure TUSB_U1EIE.setPIDEE(thebits : TBits_1); inline;
  69136. begin
  69137. if thebits = 0 then
  69138. pTDefRegMap(@Self)^.clr := $00000001
  69139. else
  69140. pTDefRegMap(@Self)^.&set := $00000001;
  69141. end;
  69142. function TUSB_U1EIE.getPIDEE : TBits_1; inline;
  69143. begin
  69144. getPIDEE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69145. end;
  69146. procedure TUSB_U1EIE.setCRC5EE_EOFEE; inline;
  69147. begin
  69148. pTDefRegMap(@Self)^.&set := $00000002;
  69149. end;
  69150. procedure TUSB_U1EIE.clearCRC5EE_EOFEE; inline;
  69151. begin
  69152. pTDefRegMap(@Self)^.clr := $00000002;
  69153. end;
  69154. procedure TUSB_U1EIE.setCRC5EE_EOFEE(thebits : TBits_1); inline;
  69155. begin
  69156. if thebits = 0 then
  69157. pTDefRegMap(@Self)^.clr := $00000002
  69158. else
  69159. pTDefRegMap(@Self)^.&set := $00000002;
  69160. end;
  69161. function TUSB_U1EIE.getCRC5EE_EOFEE : TBits_1; inline;
  69162. begin
  69163. getCRC5EE_EOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69164. end;
  69165. procedure TUSB_U1EIE.setCRC16EE; inline;
  69166. begin
  69167. pTDefRegMap(@Self)^.&set := $00000004;
  69168. end;
  69169. procedure TUSB_U1EIE.clearCRC16EE; inline;
  69170. begin
  69171. pTDefRegMap(@Self)^.clr := $00000004;
  69172. end;
  69173. procedure TUSB_U1EIE.setCRC16EE(thebits : TBits_1); inline;
  69174. begin
  69175. if thebits = 0 then
  69176. pTDefRegMap(@Self)^.clr := $00000004
  69177. else
  69178. pTDefRegMap(@Self)^.&set := $00000004;
  69179. end;
  69180. function TUSB_U1EIE.getCRC16EE : TBits_1; inline;
  69181. begin
  69182. getCRC16EE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69183. end;
  69184. procedure TUSB_U1EIE.setDFN8EE; inline;
  69185. begin
  69186. pTDefRegMap(@Self)^.&set := $00000008;
  69187. end;
  69188. procedure TUSB_U1EIE.clearDFN8EE; inline;
  69189. begin
  69190. pTDefRegMap(@Self)^.clr := $00000008;
  69191. end;
  69192. procedure TUSB_U1EIE.setDFN8EE(thebits : TBits_1); inline;
  69193. begin
  69194. if thebits = 0 then
  69195. pTDefRegMap(@Self)^.clr := $00000008
  69196. else
  69197. pTDefRegMap(@Self)^.&set := $00000008;
  69198. end;
  69199. function TUSB_U1EIE.getDFN8EE : TBits_1; inline;
  69200. begin
  69201. getDFN8EE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69202. end;
  69203. procedure TUSB_U1EIE.setBTOEE; inline;
  69204. begin
  69205. pTDefRegMap(@Self)^.&set := $00000010;
  69206. end;
  69207. procedure TUSB_U1EIE.clearBTOEE; inline;
  69208. begin
  69209. pTDefRegMap(@Self)^.clr := $00000010;
  69210. end;
  69211. procedure TUSB_U1EIE.setBTOEE(thebits : TBits_1); inline;
  69212. begin
  69213. if thebits = 0 then
  69214. pTDefRegMap(@Self)^.clr := $00000010
  69215. else
  69216. pTDefRegMap(@Self)^.&set := $00000010;
  69217. end;
  69218. function TUSB_U1EIE.getBTOEE : TBits_1; inline;
  69219. begin
  69220. getBTOEE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69221. end;
  69222. procedure TUSB_U1EIE.setDMAEE; inline;
  69223. begin
  69224. pTDefRegMap(@Self)^.&set := $00000020;
  69225. end;
  69226. procedure TUSB_U1EIE.clearDMAEE; inline;
  69227. begin
  69228. pTDefRegMap(@Self)^.clr := $00000020;
  69229. end;
  69230. procedure TUSB_U1EIE.setDMAEE(thebits : TBits_1); inline;
  69231. begin
  69232. if thebits = 0 then
  69233. pTDefRegMap(@Self)^.clr := $00000020
  69234. else
  69235. pTDefRegMap(@Self)^.&set := $00000020;
  69236. end;
  69237. function TUSB_U1EIE.getDMAEE : TBits_1; inline;
  69238. begin
  69239. getDMAEE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69240. end;
  69241. procedure TUSB_U1EIE.setBMXEE; inline;
  69242. begin
  69243. pTDefRegMap(@Self)^.&set := $00000040;
  69244. end;
  69245. procedure TUSB_U1EIE.clearBMXEE; inline;
  69246. begin
  69247. pTDefRegMap(@Self)^.clr := $00000040;
  69248. end;
  69249. procedure TUSB_U1EIE.setBMXEE(thebits : TBits_1); inline;
  69250. begin
  69251. if thebits = 0 then
  69252. pTDefRegMap(@Self)^.clr := $00000040
  69253. else
  69254. pTDefRegMap(@Self)^.&set := $00000040;
  69255. end;
  69256. function TUSB_U1EIE.getBMXEE : TBits_1; inline;
  69257. begin
  69258. getBMXEE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69259. end;
  69260. procedure TUSB_U1EIE.setBTSEE; inline;
  69261. begin
  69262. pTDefRegMap(@Self)^.&set := $00000080;
  69263. end;
  69264. procedure TUSB_U1EIE.clearBTSEE; inline;
  69265. begin
  69266. pTDefRegMap(@Self)^.clr := $00000080;
  69267. end;
  69268. procedure TUSB_U1EIE.setBTSEE(thebits : TBits_1); inline;
  69269. begin
  69270. if thebits = 0 then
  69271. pTDefRegMap(@Self)^.clr := $00000080
  69272. else
  69273. pTDefRegMap(@Self)^.&set := $00000080;
  69274. end;
  69275. function TUSB_U1EIE.getBTSEE : TBits_1; inline;
  69276. begin
  69277. getBTSEE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69278. end;
  69279. procedure TUSB_U1EIE.setCRC5EE; inline;
  69280. begin
  69281. pTDefRegMap(@Self)^.&set := $00000002;
  69282. end;
  69283. procedure TUSB_U1EIE.clearCRC5EE; inline;
  69284. begin
  69285. pTDefRegMap(@Self)^.clr := $00000002;
  69286. end;
  69287. procedure TUSB_U1EIE.setCRC5EE(thebits : TBits_1); inline;
  69288. begin
  69289. if thebits = 0 then
  69290. pTDefRegMap(@Self)^.clr := $00000002
  69291. else
  69292. pTDefRegMap(@Self)^.&set := $00000002;
  69293. end;
  69294. function TUSB_U1EIE.getCRC5EE : TBits_1; inline;
  69295. begin
  69296. getCRC5EE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69297. end;
  69298. procedure TUSB_U1EIE.setEOFEE; inline;
  69299. begin
  69300. pTDefRegMap(@Self)^.&set := $00000002;
  69301. end;
  69302. procedure TUSB_U1EIE.clearEOFEE; inline;
  69303. begin
  69304. pTDefRegMap(@Self)^.clr := $00000002;
  69305. end;
  69306. procedure TUSB_U1EIE.setEOFEE(thebits : TBits_1); inline;
  69307. begin
  69308. if thebits = 0 then
  69309. pTDefRegMap(@Self)^.clr := $00000002
  69310. else
  69311. pTDefRegMap(@Self)^.&set := $00000002;
  69312. end;
  69313. function TUSB_U1EIE.getEOFEE : TBits_1; inline;
  69314. begin
  69315. getEOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69316. end;
  69317. procedure TUSB_U1STAT.setPPBI; inline;
  69318. begin
  69319. pTDefRegMap(@Self)^.&set := $00000004;
  69320. end;
  69321. procedure TUSB_U1STAT.clearPPBI; inline;
  69322. begin
  69323. pTDefRegMap(@Self)^.clr := $00000004;
  69324. end;
  69325. procedure TUSB_U1STAT.setPPBI(thebits : TBits_1); inline;
  69326. begin
  69327. if thebits = 0 then
  69328. pTDefRegMap(@Self)^.clr := $00000004
  69329. else
  69330. pTDefRegMap(@Self)^.&set := $00000004;
  69331. end;
  69332. function TUSB_U1STAT.getPPBI : TBits_1; inline;
  69333. begin
  69334. getPPBI := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69335. end;
  69336. procedure TUSB_U1STAT.setDIR; inline;
  69337. begin
  69338. pTDefRegMap(@Self)^.&set := $00000008;
  69339. end;
  69340. procedure TUSB_U1STAT.clearDIR; inline;
  69341. begin
  69342. pTDefRegMap(@Self)^.clr := $00000008;
  69343. end;
  69344. procedure TUSB_U1STAT.setDIR(thebits : TBits_1); inline;
  69345. begin
  69346. if thebits = 0 then
  69347. pTDefRegMap(@Self)^.clr := $00000008
  69348. else
  69349. pTDefRegMap(@Self)^.&set := $00000008;
  69350. end;
  69351. function TUSB_U1STAT.getDIR : TBits_1; inline;
  69352. begin
  69353. getDIR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69354. end;
  69355. procedure TUSB_U1STAT.setENDPT(thebits : TBits_4); inline;
  69356. begin
  69357. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  69358. end;
  69359. function TUSB_U1STAT.getENDPT : TBits_4; inline;
  69360. begin
  69361. getENDPT := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  69362. end;
  69363. procedure TUSB_U1STAT.setENDPT0; inline;
  69364. begin
  69365. pTDefRegMap(@Self)^.&set := $00000010;
  69366. end;
  69367. procedure TUSB_U1STAT.clearENDPT0; inline;
  69368. begin
  69369. pTDefRegMap(@Self)^.clr := $00000010;
  69370. end;
  69371. procedure TUSB_U1STAT.setENDPT0(thebits : TBits_1); inline;
  69372. begin
  69373. if thebits = 0 then
  69374. pTDefRegMap(@Self)^.clr := $00000010
  69375. else
  69376. pTDefRegMap(@Self)^.&set := $00000010;
  69377. end;
  69378. function TUSB_U1STAT.getENDPT0 : TBits_1; inline;
  69379. begin
  69380. getENDPT0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69381. end;
  69382. procedure TUSB_U1STAT.setENDPT1; inline;
  69383. begin
  69384. pTDefRegMap(@Self)^.&set := $00000020;
  69385. end;
  69386. procedure TUSB_U1STAT.clearENDPT1; inline;
  69387. begin
  69388. pTDefRegMap(@Self)^.clr := $00000020;
  69389. end;
  69390. procedure TUSB_U1STAT.setENDPT1(thebits : TBits_1); inline;
  69391. begin
  69392. if thebits = 0 then
  69393. pTDefRegMap(@Self)^.clr := $00000020
  69394. else
  69395. pTDefRegMap(@Self)^.&set := $00000020;
  69396. end;
  69397. function TUSB_U1STAT.getENDPT1 : TBits_1; inline;
  69398. begin
  69399. getENDPT1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69400. end;
  69401. procedure TUSB_U1STAT.setENDPT2; inline;
  69402. begin
  69403. pTDefRegMap(@Self)^.&set := $00000040;
  69404. end;
  69405. procedure TUSB_U1STAT.clearENDPT2; inline;
  69406. begin
  69407. pTDefRegMap(@Self)^.clr := $00000040;
  69408. end;
  69409. procedure TUSB_U1STAT.setENDPT2(thebits : TBits_1); inline;
  69410. begin
  69411. if thebits = 0 then
  69412. pTDefRegMap(@Self)^.clr := $00000040
  69413. else
  69414. pTDefRegMap(@Self)^.&set := $00000040;
  69415. end;
  69416. function TUSB_U1STAT.getENDPT2 : TBits_1; inline;
  69417. begin
  69418. getENDPT2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69419. end;
  69420. procedure TUSB_U1STAT.setENDPT3; inline;
  69421. begin
  69422. pTDefRegMap(@Self)^.&set := $00000080;
  69423. end;
  69424. procedure TUSB_U1STAT.clearENDPT3; inline;
  69425. begin
  69426. pTDefRegMap(@Self)^.clr := $00000080;
  69427. end;
  69428. procedure TUSB_U1STAT.setENDPT3(thebits : TBits_1); inline;
  69429. begin
  69430. if thebits = 0 then
  69431. pTDefRegMap(@Self)^.clr := $00000080
  69432. else
  69433. pTDefRegMap(@Self)^.&set := $00000080;
  69434. end;
  69435. function TUSB_U1STAT.getENDPT3 : TBits_1; inline;
  69436. begin
  69437. getENDPT3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69438. end;
  69439. procedure TUSB_U1CON.setUSBEN_SOFEN; inline;
  69440. begin
  69441. pTDefRegMap(@Self)^.&set := $00000001;
  69442. end;
  69443. procedure TUSB_U1CON.clearUSBEN_SOFEN; inline;
  69444. begin
  69445. pTDefRegMap(@Self)^.clr := $00000001;
  69446. end;
  69447. procedure TUSB_U1CON.setUSBEN_SOFEN(thebits : TBits_1); inline;
  69448. begin
  69449. if thebits = 0 then
  69450. pTDefRegMap(@Self)^.clr := $00000001
  69451. else
  69452. pTDefRegMap(@Self)^.&set := $00000001;
  69453. end;
  69454. function TUSB_U1CON.getUSBEN_SOFEN : TBits_1; inline;
  69455. begin
  69456. getUSBEN_SOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69457. end;
  69458. procedure TUSB_U1CON.setPPBRST; inline;
  69459. begin
  69460. pTDefRegMap(@Self)^.&set := $00000002;
  69461. end;
  69462. procedure TUSB_U1CON.clearPPBRST; inline;
  69463. begin
  69464. pTDefRegMap(@Self)^.clr := $00000002;
  69465. end;
  69466. procedure TUSB_U1CON.setPPBRST(thebits : TBits_1); inline;
  69467. begin
  69468. if thebits = 0 then
  69469. pTDefRegMap(@Self)^.clr := $00000002
  69470. else
  69471. pTDefRegMap(@Self)^.&set := $00000002;
  69472. end;
  69473. function TUSB_U1CON.getPPBRST : TBits_1; inline;
  69474. begin
  69475. getPPBRST := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69476. end;
  69477. procedure TUSB_U1CON.setRESUME; inline;
  69478. begin
  69479. pTDefRegMap(@Self)^.&set := $00000004;
  69480. end;
  69481. procedure TUSB_U1CON.clearRESUME; inline;
  69482. begin
  69483. pTDefRegMap(@Self)^.clr := $00000004;
  69484. end;
  69485. procedure TUSB_U1CON.setRESUME(thebits : TBits_1); inline;
  69486. begin
  69487. if thebits = 0 then
  69488. pTDefRegMap(@Self)^.clr := $00000004
  69489. else
  69490. pTDefRegMap(@Self)^.&set := $00000004;
  69491. end;
  69492. function TUSB_U1CON.getRESUME : TBits_1; inline;
  69493. begin
  69494. getRESUME := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69495. end;
  69496. procedure TUSB_U1CON.setHOSTEN; inline;
  69497. begin
  69498. pTDefRegMap(@Self)^.&set := $00000008;
  69499. end;
  69500. procedure TUSB_U1CON.clearHOSTEN; inline;
  69501. begin
  69502. pTDefRegMap(@Self)^.clr := $00000008;
  69503. end;
  69504. procedure TUSB_U1CON.setHOSTEN(thebits : TBits_1); inline;
  69505. begin
  69506. if thebits = 0 then
  69507. pTDefRegMap(@Self)^.clr := $00000008
  69508. else
  69509. pTDefRegMap(@Self)^.&set := $00000008;
  69510. end;
  69511. function TUSB_U1CON.getHOSTEN : TBits_1; inline;
  69512. begin
  69513. getHOSTEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69514. end;
  69515. procedure TUSB_U1CON.setUSBRST; inline;
  69516. begin
  69517. pTDefRegMap(@Self)^.&set := $00000010;
  69518. end;
  69519. procedure TUSB_U1CON.clearUSBRST; inline;
  69520. begin
  69521. pTDefRegMap(@Self)^.clr := $00000010;
  69522. end;
  69523. procedure TUSB_U1CON.setUSBRST(thebits : TBits_1); inline;
  69524. begin
  69525. if thebits = 0 then
  69526. pTDefRegMap(@Self)^.clr := $00000010
  69527. else
  69528. pTDefRegMap(@Self)^.&set := $00000010;
  69529. end;
  69530. function TUSB_U1CON.getUSBRST : TBits_1; inline;
  69531. begin
  69532. getUSBRST := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69533. end;
  69534. procedure TUSB_U1CON.setPKTDIS_TOKBUSY; inline;
  69535. begin
  69536. pTDefRegMap(@Self)^.&set := $00000020;
  69537. end;
  69538. procedure TUSB_U1CON.clearPKTDIS_TOKBUSY; inline;
  69539. begin
  69540. pTDefRegMap(@Self)^.clr := $00000020;
  69541. end;
  69542. procedure TUSB_U1CON.setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  69543. begin
  69544. if thebits = 0 then
  69545. pTDefRegMap(@Self)^.clr := $00000020
  69546. else
  69547. pTDefRegMap(@Self)^.&set := $00000020;
  69548. end;
  69549. function TUSB_U1CON.getPKTDIS_TOKBUSY : TBits_1; inline;
  69550. begin
  69551. getPKTDIS_TOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69552. end;
  69553. procedure TUSB_U1CON.setSE0; inline;
  69554. begin
  69555. pTDefRegMap(@Self)^.&set := $00000040;
  69556. end;
  69557. procedure TUSB_U1CON.clearSE0; inline;
  69558. begin
  69559. pTDefRegMap(@Self)^.clr := $00000040;
  69560. end;
  69561. procedure TUSB_U1CON.setSE0(thebits : TBits_1); inline;
  69562. begin
  69563. if thebits = 0 then
  69564. pTDefRegMap(@Self)^.clr := $00000040
  69565. else
  69566. pTDefRegMap(@Self)^.&set := $00000040;
  69567. end;
  69568. function TUSB_U1CON.getSE0 : TBits_1; inline;
  69569. begin
  69570. getSE0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69571. end;
  69572. procedure TUSB_U1CON.setJSTATE; inline;
  69573. begin
  69574. pTDefRegMap(@Self)^.&set := $00000080;
  69575. end;
  69576. procedure TUSB_U1CON.clearJSTATE; inline;
  69577. begin
  69578. pTDefRegMap(@Self)^.clr := $00000080;
  69579. end;
  69580. procedure TUSB_U1CON.setJSTATE(thebits : TBits_1); inline;
  69581. begin
  69582. if thebits = 0 then
  69583. pTDefRegMap(@Self)^.clr := $00000080
  69584. else
  69585. pTDefRegMap(@Self)^.&set := $00000080;
  69586. end;
  69587. function TUSB_U1CON.getJSTATE : TBits_1; inline;
  69588. begin
  69589. getJSTATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69590. end;
  69591. procedure TUSB_U1CON.setUSBEN; inline;
  69592. begin
  69593. pTDefRegMap(@Self)^.&set := $00000001;
  69594. end;
  69595. procedure TUSB_U1CON.clearUSBEN; inline;
  69596. begin
  69597. pTDefRegMap(@Self)^.clr := $00000001;
  69598. end;
  69599. procedure TUSB_U1CON.setUSBEN(thebits : TBits_1); inline;
  69600. begin
  69601. if thebits = 0 then
  69602. pTDefRegMap(@Self)^.clr := $00000001
  69603. else
  69604. pTDefRegMap(@Self)^.&set := $00000001;
  69605. end;
  69606. function TUSB_U1CON.getUSBEN : TBits_1; inline;
  69607. begin
  69608. getUSBEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69609. end;
  69610. procedure TUSB_U1CON.setSOFEN; inline;
  69611. begin
  69612. pTDefRegMap(@Self)^.&set := $00000001;
  69613. end;
  69614. procedure TUSB_U1CON.clearSOFEN; inline;
  69615. begin
  69616. pTDefRegMap(@Self)^.clr := $00000001;
  69617. end;
  69618. procedure TUSB_U1CON.setSOFEN(thebits : TBits_1); inline;
  69619. begin
  69620. if thebits = 0 then
  69621. pTDefRegMap(@Self)^.clr := $00000001
  69622. else
  69623. pTDefRegMap(@Self)^.&set := $00000001;
  69624. end;
  69625. function TUSB_U1CON.getSOFEN : TBits_1; inline;
  69626. begin
  69627. getSOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69628. end;
  69629. procedure TUSB_U1CON.setPKTDIS; inline;
  69630. begin
  69631. pTDefRegMap(@Self)^.&set := $00000020;
  69632. end;
  69633. procedure TUSB_U1CON.clearPKTDIS; inline;
  69634. begin
  69635. pTDefRegMap(@Self)^.clr := $00000020;
  69636. end;
  69637. procedure TUSB_U1CON.setPKTDIS(thebits : TBits_1); inline;
  69638. begin
  69639. if thebits = 0 then
  69640. pTDefRegMap(@Self)^.clr := $00000020
  69641. else
  69642. pTDefRegMap(@Self)^.&set := $00000020;
  69643. end;
  69644. function TUSB_U1CON.getPKTDIS : TBits_1; inline;
  69645. begin
  69646. getPKTDIS := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69647. end;
  69648. procedure TUSB_U1CON.setTOKBUSY; inline;
  69649. begin
  69650. pTDefRegMap(@Self)^.&set := $00000020;
  69651. end;
  69652. procedure TUSB_U1CON.clearTOKBUSY; inline;
  69653. begin
  69654. pTDefRegMap(@Self)^.clr := $00000020;
  69655. end;
  69656. procedure TUSB_U1CON.setTOKBUSY(thebits : TBits_1); inline;
  69657. begin
  69658. if thebits = 0 then
  69659. pTDefRegMap(@Self)^.clr := $00000020
  69660. else
  69661. pTDefRegMap(@Self)^.&set := $00000020;
  69662. end;
  69663. function TUSB_U1CON.getTOKBUSY : TBits_1; inline;
  69664. begin
  69665. getTOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69666. end;
  69667. procedure TUSB_U1ADDR.setDEVADDR(thebits : TBits_7); inline;
  69668. begin
  69669. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  69670. end;
  69671. function TUSB_U1ADDR.getDEVADDR : TBits_7; inline;
  69672. begin
  69673. getDEVADDR := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  69674. end;
  69675. procedure TUSB_U1ADDR.setLSPDEN; inline;
  69676. begin
  69677. pTDefRegMap(@Self)^.&set := $00000080;
  69678. end;
  69679. procedure TUSB_U1ADDR.clearLSPDEN; inline;
  69680. begin
  69681. pTDefRegMap(@Self)^.clr := $00000080;
  69682. end;
  69683. procedure TUSB_U1ADDR.setLSPDEN(thebits : TBits_1); inline;
  69684. begin
  69685. if thebits = 0 then
  69686. pTDefRegMap(@Self)^.clr := $00000080
  69687. else
  69688. pTDefRegMap(@Self)^.&set := $00000080;
  69689. end;
  69690. function TUSB_U1ADDR.getLSPDEN : TBits_1; inline;
  69691. begin
  69692. getLSPDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69693. end;
  69694. procedure TUSB_U1ADDR.setDEVADDR0; inline;
  69695. begin
  69696. pTDefRegMap(@Self)^.&set := $00000001;
  69697. end;
  69698. procedure TUSB_U1ADDR.clearDEVADDR0; inline;
  69699. begin
  69700. pTDefRegMap(@Self)^.clr := $00000001;
  69701. end;
  69702. procedure TUSB_U1ADDR.setDEVADDR0(thebits : TBits_1); inline;
  69703. begin
  69704. if thebits = 0 then
  69705. pTDefRegMap(@Self)^.clr := $00000001
  69706. else
  69707. pTDefRegMap(@Self)^.&set := $00000001;
  69708. end;
  69709. function TUSB_U1ADDR.getDEVADDR0 : TBits_1; inline;
  69710. begin
  69711. getDEVADDR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69712. end;
  69713. procedure TUSB_U1ADDR.setDEVADDR1; inline;
  69714. begin
  69715. pTDefRegMap(@Self)^.&set := $00000002;
  69716. end;
  69717. procedure TUSB_U1ADDR.clearDEVADDR1; inline;
  69718. begin
  69719. pTDefRegMap(@Self)^.clr := $00000002;
  69720. end;
  69721. procedure TUSB_U1ADDR.setDEVADDR1(thebits : TBits_1); inline;
  69722. begin
  69723. if thebits = 0 then
  69724. pTDefRegMap(@Self)^.clr := $00000002
  69725. else
  69726. pTDefRegMap(@Self)^.&set := $00000002;
  69727. end;
  69728. function TUSB_U1ADDR.getDEVADDR1 : TBits_1; inline;
  69729. begin
  69730. getDEVADDR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69731. end;
  69732. procedure TUSB_U1ADDR.setDEVADDR2; inline;
  69733. begin
  69734. pTDefRegMap(@Self)^.&set := $00000004;
  69735. end;
  69736. procedure TUSB_U1ADDR.clearDEVADDR2; inline;
  69737. begin
  69738. pTDefRegMap(@Self)^.clr := $00000004;
  69739. end;
  69740. procedure TUSB_U1ADDR.setDEVADDR2(thebits : TBits_1); inline;
  69741. begin
  69742. if thebits = 0 then
  69743. pTDefRegMap(@Self)^.clr := $00000004
  69744. else
  69745. pTDefRegMap(@Self)^.&set := $00000004;
  69746. end;
  69747. function TUSB_U1ADDR.getDEVADDR2 : TBits_1; inline;
  69748. begin
  69749. getDEVADDR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69750. end;
  69751. procedure TUSB_U1ADDR.setDEVADDR3; inline;
  69752. begin
  69753. pTDefRegMap(@Self)^.&set := $00000008;
  69754. end;
  69755. procedure TUSB_U1ADDR.clearDEVADDR3; inline;
  69756. begin
  69757. pTDefRegMap(@Self)^.clr := $00000008;
  69758. end;
  69759. procedure TUSB_U1ADDR.setDEVADDR3(thebits : TBits_1); inline;
  69760. begin
  69761. if thebits = 0 then
  69762. pTDefRegMap(@Self)^.clr := $00000008
  69763. else
  69764. pTDefRegMap(@Self)^.&set := $00000008;
  69765. end;
  69766. function TUSB_U1ADDR.getDEVADDR3 : TBits_1; inline;
  69767. begin
  69768. getDEVADDR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69769. end;
  69770. procedure TUSB_U1ADDR.setDEVADDR4; inline;
  69771. begin
  69772. pTDefRegMap(@Self)^.&set := $00000010;
  69773. end;
  69774. procedure TUSB_U1ADDR.clearDEVADDR4; inline;
  69775. begin
  69776. pTDefRegMap(@Self)^.clr := $00000010;
  69777. end;
  69778. procedure TUSB_U1ADDR.setDEVADDR4(thebits : TBits_1); inline;
  69779. begin
  69780. if thebits = 0 then
  69781. pTDefRegMap(@Self)^.clr := $00000010
  69782. else
  69783. pTDefRegMap(@Self)^.&set := $00000010;
  69784. end;
  69785. function TUSB_U1ADDR.getDEVADDR4 : TBits_1; inline;
  69786. begin
  69787. getDEVADDR4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69788. end;
  69789. procedure TUSB_U1ADDR.setDEVADDR5; inline;
  69790. begin
  69791. pTDefRegMap(@Self)^.&set := $00000020;
  69792. end;
  69793. procedure TUSB_U1ADDR.clearDEVADDR5; inline;
  69794. begin
  69795. pTDefRegMap(@Self)^.clr := $00000020;
  69796. end;
  69797. procedure TUSB_U1ADDR.setDEVADDR5(thebits : TBits_1); inline;
  69798. begin
  69799. if thebits = 0 then
  69800. pTDefRegMap(@Self)^.clr := $00000020
  69801. else
  69802. pTDefRegMap(@Self)^.&set := $00000020;
  69803. end;
  69804. function TUSB_U1ADDR.getDEVADDR5 : TBits_1; inline;
  69805. begin
  69806. getDEVADDR5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69807. end;
  69808. procedure TUSB_U1ADDR.setDEVADDR6; inline;
  69809. begin
  69810. pTDefRegMap(@Self)^.&set := $00000040;
  69811. end;
  69812. procedure TUSB_U1ADDR.clearDEVADDR6; inline;
  69813. begin
  69814. pTDefRegMap(@Self)^.clr := $00000040;
  69815. end;
  69816. procedure TUSB_U1ADDR.setDEVADDR6(thebits : TBits_1); inline;
  69817. begin
  69818. if thebits = 0 then
  69819. pTDefRegMap(@Self)^.clr := $00000040
  69820. else
  69821. pTDefRegMap(@Self)^.&set := $00000040;
  69822. end;
  69823. function TUSB_U1ADDR.getDEVADDR6 : TBits_1; inline;
  69824. begin
  69825. getDEVADDR6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69826. end;
  69827. procedure TUSB_U1FRML.setFRML(thebits : TBits_8); inline;
  69828. begin
  69829. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  69830. end;
  69831. function TUSB_U1FRML.getFRML : TBits_8; inline;
  69832. begin
  69833. getFRML := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  69834. end;
  69835. procedure TUSB_U1FRML.setFRM0; inline;
  69836. begin
  69837. pTDefRegMap(@Self)^.&set := $00000001;
  69838. end;
  69839. procedure TUSB_U1FRML.clearFRM0; inline;
  69840. begin
  69841. pTDefRegMap(@Self)^.clr := $00000001;
  69842. end;
  69843. procedure TUSB_U1FRML.setFRM0(thebits : TBits_1); inline;
  69844. begin
  69845. if thebits = 0 then
  69846. pTDefRegMap(@Self)^.clr := $00000001
  69847. else
  69848. pTDefRegMap(@Self)^.&set := $00000001;
  69849. end;
  69850. function TUSB_U1FRML.getFRM0 : TBits_1; inline;
  69851. begin
  69852. getFRM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69853. end;
  69854. procedure TUSB_U1FRML.setFRM1; inline;
  69855. begin
  69856. pTDefRegMap(@Self)^.&set := $00000002;
  69857. end;
  69858. procedure TUSB_U1FRML.clearFRM1; inline;
  69859. begin
  69860. pTDefRegMap(@Self)^.clr := $00000002;
  69861. end;
  69862. procedure TUSB_U1FRML.setFRM1(thebits : TBits_1); inline;
  69863. begin
  69864. if thebits = 0 then
  69865. pTDefRegMap(@Self)^.clr := $00000002
  69866. else
  69867. pTDefRegMap(@Self)^.&set := $00000002;
  69868. end;
  69869. function TUSB_U1FRML.getFRM1 : TBits_1; inline;
  69870. begin
  69871. getFRM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69872. end;
  69873. procedure TUSB_U1FRML.setFRM2; inline;
  69874. begin
  69875. pTDefRegMap(@Self)^.&set := $00000004;
  69876. end;
  69877. procedure TUSB_U1FRML.clearFRM2; inline;
  69878. begin
  69879. pTDefRegMap(@Self)^.clr := $00000004;
  69880. end;
  69881. procedure TUSB_U1FRML.setFRM2(thebits : TBits_1); inline;
  69882. begin
  69883. if thebits = 0 then
  69884. pTDefRegMap(@Self)^.clr := $00000004
  69885. else
  69886. pTDefRegMap(@Self)^.&set := $00000004;
  69887. end;
  69888. function TUSB_U1FRML.getFRM2 : TBits_1; inline;
  69889. begin
  69890. getFRM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69891. end;
  69892. procedure TUSB_U1FRML.setFRM3; inline;
  69893. begin
  69894. pTDefRegMap(@Self)^.&set := $00000008;
  69895. end;
  69896. procedure TUSB_U1FRML.clearFRM3; inline;
  69897. begin
  69898. pTDefRegMap(@Self)^.clr := $00000008;
  69899. end;
  69900. procedure TUSB_U1FRML.setFRM3(thebits : TBits_1); inline;
  69901. begin
  69902. if thebits = 0 then
  69903. pTDefRegMap(@Self)^.clr := $00000008
  69904. else
  69905. pTDefRegMap(@Self)^.&set := $00000008;
  69906. end;
  69907. function TUSB_U1FRML.getFRM3 : TBits_1; inline;
  69908. begin
  69909. getFRM3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69910. end;
  69911. procedure TUSB_U1FRML.setFRM4; inline;
  69912. begin
  69913. pTDefRegMap(@Self)^.&set := $00000010;
  69914. end;
  69915. procedure TUSB_U1FRML.clearFRM4; inline;
  69916. begin
  69917. pTDefRegMap(@Self)^.clr := $00000010;
  69918. end;
  69919. procedure TUSB_U1FRML.setFRM4(thebits : TBits_1); inline;
  69920. begin
  69921. if thebits = 0 then
  69922. pTDefRegMap(@Self)^.clr := $00000010
  69923. else
  69924. pTDefRegMap(@Self)^.&set := $00000010;
  69925. end;
  69926. function TUSB_U1FRML.getFRM4 : TBits_1; inline;
  69927. begin
  69928. getFRM4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69929. end;
  69930. procedure TUSB_U1FRML.setFRM5; inline;
  69931. begin
  69932. pTDefRegMap(@Self)^.&set := $00000020;
  69933. end;
  69934. procedure TUSB_U1FRML.clearFRM5; inline;
  69935. begin
  69936. pTDefRegMap(@Self)^.clr := $00000020;
  69937. end;
  69938. procedure TUSB_U1FRML.setFRM5(thebits : TBits_1); inline;
  69939. begin
  69940. if thebits = 0 then
  69941. pTDefRegMap(@Self)^.clr := $00000020
  69942. else
  69943. pTDefRegMap(@Self)^.&set := $00000020;
  69944. end;
  69945. function TUSB_U1FRML.getFRM5 : TBits_1; inline;
  69946. begin
  69947. getFRM5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69948. end;
  69949. procedure TUSB_U1FRML.setFRM6; inline;
  69950. begin
  69951. pTDefRegMap(@Self)^.&set := $00000040;
  69952. end;
  69953. procedure TUSB_U1FRML.clearFRM6; inline;
  69954. begin
  69955. pTDefRegMap(@Self)^.clr := $00000040;
  69956. end;
  69957. procedure TUSB_U1FRML.setFRM6(thebits : TBits_1); inline;
  69958. begin
  69959. if thebits = 0 then
  69960. pTDefRegMap(@Self)^.clr := $00000040
  69961. else
  69962. pTDefRegMap(@Self)^.&set := $00000040;
  69963. end;
  69964. function TUSB_U1FRML.getFRM6 : TBits_1; inline;
  69965. begin
  69966. getFRM6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69967. end;
  69968. procedure TUSB_U1FRML.setFRM7; inline;
  69969. begin
  69970. pTDefRegMap(@Self)^.&set := $00000080;
  69971. end;
  69972. procedure TUSB_U1FRML.clearFRM7; inline;
  69973. begin
  69974. pTDefRegMap(@Self)^.clr := $00000080;
  69975. end;
  69976. procedure TUSB_U1FRML.setFRM7(thebits : TBits_1); inline;
  69977. begin
  69978. if thebits = 0 then
  69979. pTDefRegMap(@Self)^.clr := $00000080
  69980. else
  69981. pTDefRegMap(@Self)^.&set := $00000080;
  69982. end;
  69983. function TUSB_U1FRML.getFRM7 : TBits_1; inline;
  69984. begin
  69985. getFRM7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69986. end;
  69987. procedure TUSB_U1FRMH.setFRMH(thebits : TBits_3); inline;
  69988. begin
  69989. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  69990. end;
  69991. function TUSB_U1FRMH.getFRMH : TBits_3; inline;
  69992. begin
  69993. getFRMH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  69994. end;
  69995. procedure TUSB_U1FRMH.setFRM8; inline;
  69996. begin
  69997. pTDefRegMap(@Self)^.&set := $00000001;
  69998. end;
  69999. procedure TUSB_U1FRMH.clearFRM8; inline;
  70000. begin
  70001. pTDefRegMap(@Self)^.clr := $00000001;
  70002. end;
  70003. procedure TUSB_U1FRMH.setFRM8(thebits : TBits_1); inline;
  70004. begin
  70005. if thebits = 0 then
  70006. pTDefRegMap(@Self)^.clr := $00000001
  70007. else
  70008. pTDefRegMap(@Self)^.&set := $00000001;
  70009. end;
  70010. function TUSB_U1FRMH.getFRM8 : TBits_1; inline;
  70011. begin
  70012. getFRM8 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70013. end;
  70014. procedure TUSB_U1FRMH.setFRM9; inline;
  70015. begin
  70016. pTDefRegMap(@Self)^.&set := $00000002;
  70017. end;
  70018. procedure TUSB_U1FRMH.clearFRM9; inline;
  70019. begin
  70020. pTDefRegMap(@Self)^.clr := $00000002;
  70021. end;
  70022. procedure TUSB_U1FRMH.setFRM9(thebits : TBits_1); inline;
  70023. begin
  70024. if thebits = 0 then
  70025. pTDefRegMap(@Self)^.clr := $00000002
  70026. else
  70027. pTDefRegMap(@Self)^.&set := $00000002;
  70028. end;
  70029. function TUSB_U1FRMH.getFRM9 : TBits_1; inline;
  70030. begin
  70031. getFRM9 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70032. end;
  70033. procedure TUSB_U1FRMH.setFRM10; inline;
  70034. begin
  70035. pTDefRegMap(@Self)^.&set := $00000004;
  70036. end;
  70037. procedure TUSB_U1FRMH.clearFRM10; inline;
  70038. begin
  70039. pTDefRegMap(@Self)^.clr := $00000004;
  70040. end;
  70041. procedure TUSB_U1FRMH.setFRM10(thebits : TBits_1); inline;
  70042. begin
  70043. if thebits = 0 then
  70044. pTDefRegMap(@Self)^.clr := $00000004
  70045. else
  70046. pTDefRegMap(@Self)^.&set := $00000004;
  70047. end;
  70048. function TUSB_U1FRMH.getFRM10 : TBits_1; inline;
  70049. begin
  70050. getFRM10 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70051. end;
  70052. procedure TUSB_U1TOK.setEP(thebits : TBits_4); inline;
  70053. begin
  70054. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  70055. end;
  70056. function TUSB_U1TOK.getEP : TBits_4; inline;
  70057. begin
  70058. getEP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  70059. end;
  70060. procedure TUSB_U1TOK.setPID(thebits : TBits_4); inline;
  70061. begin
  70062. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  70063. end;
  70064. function TUSB_U1TOK.getPID : TBits_4; inline;
  70065. begin
  70066. getPID := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  70067. end;
  70068. procedure TUSB_U1TOK.setEP0; inline;
  70069. begin
  70070. pTDefRegMap(@Self)^.&set := $00000001;
  70071. end;
  70072. procedure TUSB_U1TOK.clearEP0; inline;
  70073. begin
  70074. pTDefRegMap(@Self)^.clr := $00000001;
  70075. end;
  70076. procedure TUSB_U1TOK.setEP0(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 TUSB_U1TOK.getEP0 : TBits_1; inline;
  70084. begin
  70085. getEP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70086. end;
  70087. procedure TUSB_U1TOK.setEP1; inline;
  70088. begin
  70089. pTDefRegMap(@Self)^.&set := $00000002;
  70090. end;
  70091. procedure TUSB_U1TOK.clearEP1; inline;
  70092. begin
  70093. pTDefRegMap(@Self)^.clr := $00000002;
  70094. end;
  70095. procedure TUSB_U1TOK.setEP1(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 TUSB_U1TOK.getEP1 : TBits_1; inline;
  70103. begin
  70104. getEP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70105. end;
  70106. procedure TUSB_U1TOK.setEP2; inline;
  70107. begin
  70108. pTDefRegMap(@Self)^.&set := $00000004;
  70109. end;
  70110. procedure TUSB_U1TOK.clearEP2; inline;
  70111. begin
  70112. pTDefRegMap(@Self)^.clr := $00000004;
  70113. end;
  70114. procedure TUSB_U1TOK.setEP2(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 TUSB_U1TOK.getEP2 : TBits_1; inline;
  70122. begin
  70123. getEP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70124. end;
  70125. procedure TUSB_U1TOK.setEP3; inline;
  70126. begin
  70127. pTDefRegMap(@Self)^.&set := $00000008;
  70128. end;
  70129. procedure TUSB_U1TOK.clearEP3; inline;
  70130. begin
  70131. pTDefRegMap(@Self)^.clr := $00000008;
  70132. end;
  70133. procedure TUSB_U1TOK.setEP3(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 TUSB_U1TOK.getEP3 : TBits_1; inline;
  70141. begin
  70142. getEP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70143. end;
  70144. procedure TUSB_U1TOK.setPID0; inline;
  70145. begin
  70146. pTDefRegMap(@Self)^.&set := $00000010;
  70147. end;
  70148. procedure TUSB_U1TOK.clearPID0; inline;
  70149. begin
  70150. pTDefRegMap(@Self)^.clr := $00000010;
  70151. end;
  70152. procedure TUSB_U1TOK.setPID0(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 TUSB_U1TOK.getPID0 : TBits_1; inline;
  70160. begin
  70161. getPID0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70162. end;
  70163. procedure TUSB_U1TOK.setPID1; inline;
  70164. begin
  70165. pTDefRegMap(@Self)^.&set := $00000020;
  70166. end;
  70167. procedure TUSB_U1TOK.clearPID1; inline;
  70168. begin
  70169. pTDefRegMap(@Self)^.clr := $00000020;
  70170. end;
  70171. procedure TUSB_U1TOK.setPID1(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 TUSB_U1TOK.getPID1 : TBits_1; inline;
  70179. begin
  70180. getPID1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70181. end;
  70182. procedure TUSB_U1TOK.setPID2; inline;
  70183. begin
  70184. pTDefRegMap(@Self)^.&set := $00000040;
  70185. end;
  70186. procedure TUSB_U1TOK.clearPID2; inline;
  70187. begin
  70188. pTDefRegMap(@Self)^.clr := $00000040;
  70189. end;
  70190. procedure TUSB_U1TOK.setPID2(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 TUSB_U1TOK.getPID2 : TBits_1; inline;
  70198. begin
  70199. getPID2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70200. end;
  70201. procedure TUSB_U1TOK.setPID3; inline;
  70202. begin
  70203. pTDefRegMap(@Self)^.&set := $00000080;
  70204. end;
  70205. procedure TUSB_U1TOK.clearPID3; inline;
  70206. begin
  70207. pTDefRegMap(@Self)^.clr := $00000080;
  70208. end;
  70209. procedure TUSB_U1TOK.setPID3(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 TUSB_U1TOK.getPID3 : TBits_1; inline;
  70217. begin
  70218. getPID3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70219. end;
  70220. procedure TPORTA_TRISA.setTRISA0; inline;
  70221. begin
  70222. pTDefRegMap(@Self)^.&set := $00000001;
  70223. end;
  70224. procedure TPORTA_TRISA.clearTRISA0; inline;
  70225. begin
  70226. pTDefRegMap(@Self)^.clr := $00000001;
  70227. end;
  70228. procedure TPORTA_TRISA.setTRISA0(thebits : TBits_1); inline;
  70229. begin
  70230. if thebits = 0 then
  70231. pTDefRegMap(@Self)^.clr := $00000001
  70232. else
  70233. pTDefRegMap(@Self)^.&set := $00000001;
  70234. end;
  70235. function TPORTA_TRISA.getTRISA0 : TBits_1; inline;
  70236. begin
  70237. getTRISA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70238. end;
  70239. procedure TPORTA_TRISA.setTRISA1; inline;
  70240. begin
  70241. pTDefRegMap(@Self)^.&set := $00000002;
  70242. end;
  70243. procedure TPORTA_TRISA.clearTRISA1; inline;
  70244. begin
  70245. pTDefRegMap(@Self)^.clr := $00000002;
  70246. end;
  70247. procedure TPORTA_TRISA.setTRISA1(thebits : TBits_1); inline;
  70248. begin
  70249. if thebits = 0 then
  70250. pTDefRegMap(@Self)^.clr := $00000002
  70251. else
  70252. pTDefRegMap(@Self)^.&set := $00000002;
  70253. end;
  70254. function TPORTA_TRISA.getTRISA1 : TBits_1; inline;
  70255. begin
  70256. getTRISA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70257. end;
  70258. procedure TPORTA_TRISA.setTRISA2; inline;
  70259. begin
  70260. pTDefRegMap(@Self)^.&set := $00000004;
  70261. end;
  70262. procedure TPORTA_TRISA.clearTRISA2; inline;
  70263. begin
  70264. pTDefRegMap(@Self)^.clr := $00000004;
  70265. end;
  70266. procedure TPORTA_TRISA.setTRISA2(thebits : TBits_1); inline;
  70267. begin
  70268. if thebits = 0 then
  70269. pTDefRegMap(@Self)^.clr := $00000004
  70270. else
  70271. pTDefRegMap(@Self)^.&set := $00000004;
  70272. end;
  70273. function TPORTA_TRISA.getTRISA2 : TBits_1; inline;
  70274. begin
  70275. getTRISA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70276. end;
  70277. procedure TPORTA_TRISA.setTRISA3; inline;
  70278. begin
  70279. pTDefRegMap(@Self)^.&set := $00000008;
  70280. end;
  70281. procedure TPORTA_TRISA.clearTRISA3; inline;
  70282. begin
  70283. pTDefRegMap(@Self)^.clr := $00000008;
  70284. end;
  70285. procedure TPORTA_TRISA.setTRISA3(thebits : TBits_1); inline;
  70286. begin
  70287. if thebits = 0 then
  70288. pTDefRegMap(@Self)^.clr := $00000008
  70289. else
  70290. pTDefRegMap(@Self)^.&set := $00000008;
  70291. end;
  70292. function TPORTA_TRISA.getTRISA3 : TBits_1; inline;
  70293. begin
  70294. getTRISA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70295. end;
  70296. procedure TPORTA_TRISA.setTRISA4; inline;
  70297. begin
  70298. pTDefRegMap(@Self)^.&set := $00000010;
  70299. end;
  70300. procedure TPORTA_TRISA.clearTRISA4; inline;
  70301. begin
  70302. pTDefRegMap(@Self)^.clr := $00000010;
  70303. end;
  70304. procedure TPORTA_TRISA.setTRISA4(thebits : TBits_1); inline;
  70305. begin
  70306. if thebits = 0 then
  70307. pTDefRegMap(@Self)^.clr := $00000010
  70308. else
  70309. pTDefRegMap(@Self)^.&set := $00000010;
  70310. end;
  70311. function TPORTA_TRISA.getTRISA4 : TBits_1; inline;
  70312. begin
  70313. getTRISA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70314. end;
  70315. procedure TPORTA_TRISA.setTRISA5; inline;
  70316. begin
  70317. pTDefRegMap(@Self)^.&set := $00000020;
  70318. end;
  70319. procedure TPORTA_TRISA.clearTRISA5; inline;
  70320. begin
  70321. pTDefRegMap(@Self)^.clr := $00000020;
  70322. end;
  70323. procedure TPORTA_TRISA.setTRISA5(thebits : TBits_1); inline;
  70324. begin
  70325. if thebits = 0 then
  70326. pTDefRegMap(@Self)^.clr := $00000020
  70327. else
  70328. pTDefRegMap(@Self)^.&set := $00000020;
  70329. end;
  70330. function TPORTA_TRISA.getTRISA5 : TBits_1; inline;
  70331. begin
  70332. getTRISA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70333. end;
  70334. procedure TPORTA_TRISA.setTRISA6; inline;
  70335. begin
  70336. pTDefRegMap(@Self)^.&set := $00000040;
  70337. end;
  70338. procedure TPORTA_TRISA.clearTRISA6; inline;
  70339. begin
  70340. pTDefRegMap(@Self)^.clr := $00000040;
  70341. end;
  70342. procedure TPORTA_TRISA.setTRISA6(thebits : TBits_1); inline;
  70343. begin
  70344. if thebits = 0 then
  70345. pTDefRegMap(@Self)^.clr := $00000040
  70346. else
  70347. pTDefRegMap(@Self)^.&set := $00000040;
  70348. end;
  70349. function TPORTA_TRISA.getTRISA6 : TBits_1; inline;
  70350. begin
  70351. getTRISA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70352. end;
  70353. procedure TPORTA_TRISA.setTRISA7; inline;
  70354. begin
  70355. pTDefRegMap(@Self)^.&set := $00000080;
  70356. end;
  70357. procedure TPORTA_TRISA.clearTRISA7; inline;
  70358. begin
  70359. pTDefRegMap(@Self)^.clr := $00000080;
  70360. end;
  70361. procedure TPORTA_TRISA.setTRISA7(thebits : TBits_1); inline;
  70362. begin
  70363. if thebits = 0 then
  70364. pTDefRegMap(@Self)^.clr := $00000080
  70365. else
  70366. pTDefRegMap(@Self)^.&set := $00000080;
  70367. end;
  70368. function TPORTA_TRISA.getTRISA7 : TBits_1; inline;
  70369. begin
  70370. getTRISA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70371. end;
  70372. procedure TPORTA_TRISA.setTRISA9; inline;
  70373. begin
  70374. pTDefRegMap(@Self)^.&set := $00000200;
  70375. end;
  70376. procedure TPORTA_TRISA.clearTRISA9; inline;
  70377. begin
  70378. pTDefRegMap(@Self)^.clr := $00000200;
  70379. end;
  70380. procedure TPORTA_TRISA.setTRISA9(thebits : TBits_1); inline;
  70381. begin
  70382. if thebits = 0 then
  70383. pTDefRegMap(@Self)^.clr := $00000200
  70384. else
  70385. pTDefRegMap(@Self)^.&set := $00000200;
  70386. end;
  70387. function TPORTA_TRISA.getTRISA9 : TBits_1; inline;
  70388. begin
  70389. getTRISA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70390. end;
  70391. procedure TPORTA_TRISA.setTRISA10; inline;
  70392. begin
  70393. pTDefRegMap(@Self)^.&set := $00000400;
  70394. end;
  70395. procedure TPORTA_TRISA.clearTRISA10; inline;
  70396. begin
  70397. pTDefRegMap(@Self)^.clr := $00000400;
  70398. end;
  70399. procedure TPORTA_TRISA.setTRISA10(thebits : TBits_1); inline;
  70400. begin
  70401. if thebits = 0 then
  70402. pTDefRegMap(@Self)^.clr := $00000400
  70403. else
  70404. pTDefRegMap(@Self)^.&set := $00000400;
  70405. end;
  70406. function TPORTA_TRISA.getTRISA10 : TBits_1; inline;
  70407. begin
  70408. getTRISA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70409. end;
  70410. procedure TPORTA_TRISA.setTRISA14; inline;
  70411. begin
  70412. pTDefRegMap(@Self)^.&set := $00004000;
  70413. end;
  70414. procedure TPORTA_TRISA.clearTRISA14; inline;
  70415. begin
  70416. pTDefRegMap(@Self)^.clr := $00004000;
  70417. end;
  70418. procedure TPORTA_TRISA.setTRISA14(thebits : TBits_1); inline;
  70419. begin
  70420. if thebits = 0 then
  70421. pTDefRegMap(@Self)^.clr := $00004000
  70422. else
  70423. pTDefRegMap(@Self)^.&set := $00004000;
  70424. end;
  70425. function TPORTA_TRISA.getTRISA14 : TBits_1; inline;
  70426. begin
  70427. getTRISA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70428. end;
  70429. procedure TPORTA_TRISA.setTRISA15; inline;
  70430. begin
  70431. pTDefRegMap(@Self)^.&set := $00008000;
  70432. end;
  70433. procedure TPORTA_TRISA.clearTRISA15; inline;
  70434. begin
  70435. pTDefRegMap(@Self)^.clr := $00008000;
  70436. end;
  70437. procedure TPORTA_TRISA.setTRISA15(thebits : TBits_1); inline;
  70438. begin
  70439. if thebits = 0 then
  70440. pTDefRegMap(@Self)^.clr := $00008000
  70441. else
  70442. pTDefRegMap(@Self)^.&set := $00008000;
  70443. end;
  70444. function TPORTA_TRISA.getTRISA15 : TBits_1; inline;
  70445. begin
  70446. getTRISA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  70447. end;
  70448. procedure TPORTA_TRISA.setw(thebits : TBits_32); inline;
  70449. begin
  70450. pTDefRegMap(@Self)^.val := thebits;
  70451. end;
  70452. function TPORTA_TRISA.getw : TBits_32; inline;
  70453. begin
  70454. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70455. end;
  70456. procedure TPORTA_PORTA.setRA0; inline;
  70457. begin
  70458. pTDefRegMap(@Self)^.&set := $00000001;
  70459. end;
  70460. procedure TPORTA_PORTA.clearRA0; inline;
  70461. begin
  70462. pTDefRegMap(@Self)^.clr := $00000001;
  70463. end;
  70464. procedure TPORTA_PORTA.setRA0(thebits : TBits_1); inline;
  70465. begin
  70466. if thebits = 0 then
  70467. pTDefRegMap(@Self)^.clr := $00000001
  70468. else
  70469. pTDefRegMap(@Self)^.&set := $00000001;
  70470. end;
  70471. function TPORTA_PORTA.getRA0 : TBits_1; inline;
  70472. begin
  70473. getRA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70474. end;
  70475. procedure TPORTA_PORTA.setRA1; inline;
  70476. begin
  70477. pTDefRegMap(@Self)^.&set := $00000002;
  70478. end;
  70479. procedure TPORTA_PORTA.clearRA1; inline;
  70480. begin
  70481. pTDefRegMap(@Self)^.clr := $00000002;
  70482. end;
  70483. procedure TPORTA_PORTA.setRA1(thebits : TBits_1); inline;
  70484. begin
  70485. if thebits = 0 then
  70486. pTDefRegMap(@Self)^.clr := $00000002
  70487. else
  70488. pTDefRegMap(@Self)^.&set := $00000002;
  70489. end;
  70490. function TPORTA_PORTA.getRA1 : TBits_1; inline;
  70491. begin
  70492. getRA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70493. end;
  70494. procedure TPORTA_PORTA.setRA2; inline;
  70495. begin
  70496. pTDefRegMap(@Self)^.&set := $00000004;
  70497. end;
  70498. procedure TPORTA_PORTA.clearRA2; inline;
  70499. begin
  70500. pTDefRegMap(@Self)^.clr := $00000004;
  70501. end;
  70502. procedure TPORTA_PORTA.setRA2(thebits : TBits_1); inline;
  70503. begin
  70504. if thebits = 0 then
  70505. pTDefRegMap(@Self)^.clr := $00000004
  70506. else
  70507. pTDefRegMap(@Self)^.&set := $00000004;
  70508. end;
  70509. function TPORTA_PORTA.getRA2 : TBits_1; inline;
  70510. begin
  70511. getRA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70512. end;
  70513. procedure TPORTA_PORTA.setRA3; inline;
  70514. begin
  70515. pTDefRegMap(@Self)^.&set := $00000008;
  70516. end;
  70517. procedure TPORTA_PORTA.clearRA3; inline;
  70518. begin
  70519. pTDefRegMap(@Self)^.clr := $00000008;
  70520. end;
  70521. procedure TPORTA_PORTA.setRA3(thebits : TBits_1); inline;
  70522. begin
  70523. if thebits = 0 then
  70524. pTDefRegMap(@Self)^.clr := $00000008
  70525. else
  70526. pTDefRegMap(@Self)^.&set := $00000008;
  70527. end;
  70528. function TPORTA_PORTA.getRA3 : TBits_1; inline;
  70529. begin
  70530. getRA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70531. end;
  70532. procedure TPORTA_PORTA.setRA4; inline;
  70533. begin
  70534. pTDefRegMap(@Self)^.&set := $00000010;
  70535. end;
  70536. procedure TPORTA_PORTA.clearRA4; inline;
  70537. begin
  70538. pTDefRegMap(@Self)^.clr := $00000010;
  70539. end;
  70540. procedure TPORTA_PORTA.setRA4(thebits : TBits_1); inline;
  70541. begin
  70542. if thebits = 0 then
  70543. pTDefRegMap(@Self)^.clr := $00000010
  70544. else
  70545. pTDefRegMap(@Self)^.&set := $00000010;
  70546. end;
  70547. function TPORTA_PORTA.getRA4 : TBits_1; inline;
  70548. begin
  70549. getRA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70550. end;
  70551. procedure TPORTA_PORTA.setRA5; inline;
  70552. begin
  70553. pTDefRegMap(@Self)^.&set := $00000020;
  70554. end;
  70555. procedure TPORTA_PORTA.clearRA5; inline;
  70556. begin
  70557. pTDefRegMap(@Self)^.clr := $00000020;
  70558. end;
  70559. procedure TPORTA_PORTA.setRA5(thebits : TBits_1); inline;
  70560. begin
  70561. if thebits = 0 then
  70562. pTDefRegMap(@Self)^.clr := $00000020
  70563. else
  70564. pTDefRegMap(@Self)^.&set := $00000020;
  70565. end;
  70566. function TPORTA_PORTA.getRA5 : TBits_1; inline;
  70567. begin
  70568. getRA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70569. end;
  70570. procedure TPORTA_PORTA.setRA6; inline;
  70571. begin
  70572. pTDefRegMap(@Self)^.&set := $00000040;
  70573. end;
  70574. procedure TPORTA_PORTA.clearRA6; inline;
  70575. begin
  70576. pTDefRegMap(@Self)^.clr := $00000040;
  70577. end;
  70578. procedure TPORTA_PORTA.setRA6(thebits : TBits_1); inline;
  70579. begin
  70580. if thebits = 0 then
  70581. pTDefRegMap(@Self)^.clr := $00000040
  70582. else
  70583. pTDefRegMap(@Self)^.&set := $00000040;
  70584. end;
  70585. function TPORTA_PORTA.getRA6 : TBits_1; inline;
  70586. begin
  70587. getRA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70588. end;
  70589. procedure TPORTA_PORTA.setRA7; inline;
  70590. begin
  70591. pTDefRegMap(@Self)^.&set := $00000080;
  70592. end;
  70593. procedure TPORTA_PORTA.clearRA7; inline;
  70594. begin
  70595. pTDefRegMap(@Self)^.clr := $00000080;
  70596. end;
  70597. procedure TPORTA_PORTA.setRA7(thebits : TBits_1); inline;
  70598. begin
  70599. if thebits = 0 then
  70600. pTDefRegMap(@Self)^.clr := $00000080
  70601. else
  70602. pTDefRegMap(@Self)^.&set := $00000080;
  70603. end;
  70604. function TPORTA_PORTA.getRA7 : TBits_1; inline;
  70605. begin
  70606. getRA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70607. end;
  70608. procedure TPORTA_PORTA.setRA9; inline;
  70609. begin
  70610. pTDefRegMap(@Self)^.&set := $00000200;
  70611. end;
  70612. procedure TPORTA_PORTA.clearRA9; inline;
  70613. begin
  70614. pTDefRegMap(@Self)^.clr := $00000200;
  70615. end;
  70616. procedure TPORTA_PORTA.setRA9(thebits : TBits_1); inline;
  70617. begin
  70618. if thebits = 0 then
  70619. pTDefRegMap(@Self)^.clr := $00000200
  70620. else
  70621. pTDefRegMap(@Self)^.&set := $00000200;
  70622. end;
  70623. function TPORTA_PORTA.getRA9 : TBits_1; inline;
  70624. begin
  70625. getRA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70626. end;
  70627. procedure TPORTA_PORTA.setRA10; inline;
  70628. begin
  70629. pTDefRegMap(@Self)^.&set := $00000400;
  70630. end;
  70631. procedure TPORTA_PORTA.clearRA10; inline;
  70632. begin
  70633. pTDefRegMap(@Self)^.clr := $00000400;
  70634. end;
  70635. procedure TPORTA_PORTA.setRA10(thebits : TBits_1); inline;
  70636. begin
  70637. if thebits = 0 then
  70638. pTDefRegMap(@Self)^.clr := $00000400
  70639. else
  70640. pTDefRegMap(@Self)^.&set := $00000400;
  70641. end;
  70642. function TPORTA_PORTA.getRA10 : TBits_1; inline;
  70643. begin
  70644. getRA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70645. end;
  70646. procedure TPORTA_PORTA.setRA14; inline;
  70647. begin
  70648. pTDefRegMap(@Self)^.&set := $00004000;
  70649. end;
  70650. procedure TPORTA_PORTA.clearRA14; inline;
  70651. begin
  70652. pTDefRegMap(@Self)^.clr := $00004000;
  70653. end;
  70654. procedure TPORTA_PORTA.setRA14(thebits : TBits_1); inline;
  70655. begin
  70656. if thebits = 0 then
  70657. pTDefRegMap(@Self)^.clr := $00004000
  70658. else
  70659. pTDefRegMap(@Self)^.&set := $00004000;
  70660. end;
  70661. function TPORTA_PORTA.getRA14 : TBits_1; inline;
  70662. begin
  70663. getRA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70664. end;
  70665. procedure TPORTA_PORTA.setRA15; inline;
  70666. begin
  70667. pTDefRegMap(@Self)^.&set := $00008000;
  70668. end;
  70669. procedure TPORTA_PORTA.clearRA15; inline;
  70670. begin
  70671. pTDefRegMap(@Self)^.clr := $00008000;
  70672. end;
  70673. procedure TPORTA_PORTA.setRA15(thebits : TBits_1); inline;
  70674. begin
  70675. if thebits = 0 then
  70676. pTDefRegMap(@Self)^.clr := $00008000
  70677. else
  70678. pTDefRegMap(@Self)^.&set := $00008000;
  70679. end;
  70680. function TPORTA_PORTA.getRA15 : TBits_1; inline;
  70681. begin
  70682. getRA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  70683. end;
  70684. procedure TPORTA_PORTA.setw(thebits : TBits_32); inline;
  70685. begin
  70686. pTDefRegMap(@Self)^.val := thebits;
  70687. end;
  70688. function TPORTA_PORTA.getw : TBits_32; inline;
  70689. begin
  70690. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70691. end;
  70692. procedure TPORTA_LATA.setLATA0; inline;
  70693. begin
  70694. pTDefRegMap(@Self)^.&set := $00000001;
  70695. end;
  70696. procedure TPORTA_LATA.clearLATA0; inline;
  70697. begin
  70698. pTDefRegMap(@Self)^.clr := $00000001;
  70699. end;
  70700. procedure TPORTA_LATA.setLATA0(thebits : TBits_1); inline;
  70701. begin
  70702. if thebits = 0 then
  70703. pTDefRegMap(@Self)^.clr := $00000001
  70704. else
  70705. pTDefRegMap(@Self)^.&set := $00000001;
  70706. end;
  70707. function TPORTA_LATA.getLATA0 : TBits_1; inline;
  70708. begin
  70709. getLATA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70710. end;
  70711. procedure TPORTA_LATA.setLATA1; inline;
  70712. begin
  70713. pTDefRegMap(@Self)^.&set := $00000002;
  70714. end;
  70715. procedure TPORTA_LATA.clearLATA1; inline;
  70716. begin
  70717. pTDefRegMap(@Self)^.clr := $00000002;
  70718. end;
  70719. procedure TPORTA_LATA.setLATA1(thebits : TBits_1); inline;
  70720. begin
  70721. if thebits = 0 then
  70722. pTDefRegMap(@Self)^.clr := $00000002
  70723. else
  70724. pTDefRegMap(@Self)^.&set := $00000002;
  70725. end;
  70726. function TPORTA_LATA.getLATA1 : TBits_1; inline;
  70727. begin
  70728. getLATA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70729. end;
  70730. procedure TPORTA_LATA.setLATA2; inline;
  70731. begin
  70732. pTDefRegMap(@Self)^.&set := $00000004;
  70733. end;
  70734. procedure TPORTA_LATA.clearLATA2; inline;
  70735. begin
  70736. pTDefRegMap(@Self)^.clr := $00000004;
  70737. end;
  70738. procedure TPORTA_LATA.setLATA2(thebits : TBits_1); inline;
  70739. begin
  70740. if thebits = 0 then
  70741. pTDefRegMap(@Self)^.clr := $00000004
  70742. else
  70743. pTDefRegMap(@Self)^.&set := $00000004;
  70744. end;
  70745. function TPORTA_LATA.getLATA2 : TBits_1; inline;
  70746. begin
  70747. getLATA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70748. end;
  70749. procedure TPORTA_LATA.setLATA3; inline;
  70750. begin
  70751. pTDefRegMap(@Self)^.&set := $00000008;
  70752. end;
  70753. procedure TPORTA_LATA.clearLATA3; inline;
  70754. begin
  70755. pTDefRegMap(@Self)^.clr := $00000008;
  70756. end;
  70757. procedure TPORTA_LATA.setLATA3(thebits : TBits_1); inline;
  70758. begin
  70759. if thebits = 0 then
  70760. pTDefRegMap(@Self)^.clr := $00000008
  70761. else
  70762. pTDefRegMap(@Self)^.&set := $00000008;
  70763. end;
  70764. function TPORTA_LATA.getLATA3 : TBits_1; inline;
  70765. begin
  70766. getLATA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70767. end;
  70768. procedure TPORTA_LATA.setLATA4; inline;
  70769. begin
  70770. pTDefRegMap(@Self)^.&set := $00000010;
  70771. end;
  70772. procedure TPORTA_LATA.clearLATA4; inline;
  70773. begin
  70774. pTDefRegMap(@Self)^.clr := $00000010;
  70775. end;
  70776. procedure TPORTA_LATA.setLATA4(thebits : TBits_1); inline;
  70777. begin
  70778. if thebits = 0 then
  70779. pTDefRegMap(@Self)^.clr := $00000010
  70780. else
  70781. pTDefRegMap(@Self)^.&set := $00000010;
  70782. end;
  70783. function TPORTA_LATA.getLATA4 : TBits_1; inline;
  70784. begin
  70785. getLATA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70786. end;
  70787. procedure TPORTA_LATA.setLATA5; inline;
  70788. begin
  70789. pTDefRegMap(@Self)^.&set := $00000020;
  70790. end;
  70791. procedure TPORTA_LATA.clearLATA5; inline;
  70792. begin
  70793. pTDefRegMap(@Self)^.clr := $00000020;
  70794. end;
  70795. procedure TPORTA_LATA.setLATA5(thebits : TBits_1); inline;
  70796. begin
  70797. if thebits = 0 then
  70798. pTDefRegMap(@Self)^.clr := $00000020
  70799. else
  70800. pTDefRegMap(@Self)^.&set := $00000020;
  70801. end;
  70802. function TPORTA_LATA.getLATA5 : TBits_1; inline;
  70803. begin
  70804. getLATA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70805. end;
  70806. procedure TPORTA_LATA.setLATA6; inline;
  70807. begin
  70808. pTDefRegMap(@Self)^.&set := $00000040;
  70809. end;
  70810. procedure TPORTA_LATA.clearLATA6; inline;
  70811. begin
  70812. pTDefRegMap(@Self)^.clr := $00000040;
  70813. end;
  70814. procedure TPORTA_LATA.setLATA6(thebits : TBits_1); inline;
  70815. begin
  70816. if thebits = 0 then
  70817. pTDefRegMap(@Self)^.clr := $00000040
  70818. else
  70819. pTDefRegMap(@Self)^.&set := $00000040;
  70820. end;
  70821. function TPORTA_LATA.getLATA6 : TBits_1; inline;
  70822. begin
  70823. getLATA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70824. end;
  70825. procedure TPORTA_LATA.setLATA7; inline;
  70826. begin
  70827. pTDefRegMap(@Self)^.&set := $00000080;
  70828. end;
  70829. procedure TPORTA_LATA.clearLATA7; inline;
  70830. begin
  70831. pTDefRegMap(@Self)^.clr := $00000080;
  70832. end;
  70833. procedure TPORTA_LATA.setLATA7(thebits : TBits_1); inline;
  70834. begin
  70835. if thebits = 0 then
  70836. pTDefRegMap(@Self)^.clr := $00000080
  70837. else
  70838. pTDefRegMap(@Self)^.&set := $00000080;
  70839. end;
  70840. function TPORTA_LATA.getLATA7 : TBits_1; inline;
  70841. begin
  70842. getLATA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70843. end;
  70844. procedure TPORTA_LATA.setLATA9; inline;
  70845. begin
  70846. pTDefRegMap(@Self)^.&set := $00000200;
  70847. end;
  70848. procedure TPORTA_LATA.clearLATA9; inline;
  70849. begin
  70850. pTDefRegMap(@Self)^.clr := $00000200;
  70851. end;
  70852. procedure TPORTA_LATA.setLATA9(thebits : TBits_1); inline;
  70853. begin
  70854. if thebits = 0 then
  70855. pTDefRegMap(@Self)^.clr := $00000200
  70856. else
  70857. pTDefRegMap(@Self)^.&set := $00000200;
  70858. end;
  70859. function TPORTA_LATA.getLATA9 : TBits_1; inline;
  70860. begin
  70861. getLATA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70862. end;
  70863. procedure TPORTA_LATA.setLATA10; inline;
  70864. begin
  70865. pTDefRegMap(@Self)^.&set := $00000400;
  70866. end;
  70867. procedure TPORTA_LATA.clearLATA10; inline;
  70868. begin
  70869. pTDefRegMap(@Self)^.clr := $00000400;
  70870. end;
  70871. procedure TPORTA_LATA.setLATA10(thebits : TBits_1); inline;
  70872. begin
  70873. if thebits = 0 then
  70874. pTDefRegMap(@Self)^.clr := $00000400
  70875. else
  70876. pTDefRegMap(@Self)^.&set := $00000400;
  70877. end;
  70878. function TPORTA_LATA.getLATA10 : TBits_1; inline;
  70879. begin
  70880. getLATA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70881. end;
  70882. procedure TPORTA_LATA.setLATA14; inline;
  70883. begin
  70884. pTDefRegMap(@Self)^.&set := $00004000;
  70885. end;
  70886. procedure TPORTA_LATA.clearLATA14; inline;
  70887. begin
  70888. pTDefRegMap(@Self)^.clr := $00004000;
  70889. end;
  70890. procedure TPORTA_LATA.setLATA14(thebits : TBits_1); inline;
  70891. begin
  70892. if thebits = 0 then
  70893. pTDefRegMap(@Self)^.clr := $00004000
  70894. else
  70895. pTDefRegMap(@Self)^.&set := $00004000;
  70896. end;
  70897. function TPORTA_LATA.getLATA14 : TBits_1; inline;
  70898. begin
  70899. getLATA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  70900. end;
  70901. procedure TPORTA_LATA.setLATA15; inline;
  70902. begin
  70903. pTDefRegMap(@Self)^.&set := $00008000;
  70904. end;
  70905. procedure TPORTA_LATA.clearLATA15; inline;
  70906. begin
  70907. pTDefRegMap(@Self)^.clr := $00008000;
  70908. end;
  70909. procedure TPORTA_LATA.setLATA15(thebits : TBits_1); inline;
  70910. begin
  70911. if thebits = 0 then
  70912. pTDefRegMap(@Self)^.clr := $00008000
  70913. else
  70914. pTDefRegMap(@Self)^.&set := $00008000;
  70915. end;
  70916. function TPORTA_LATA.getLATA15 : TBits_1; inline;
  70917. begin
  70918. getLATA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  70919. end;
  70920. procedure TPORTA_LATA.setw(thebits : TBits_32); inline;
  70921. begin
  70922. pTDefRegMap(@Self)^.val := thebits;
  70923. end;
  70924. function TPORTA_LATA.getw : TBits_32; inline;
  70925. begin
  70926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70927. end;
  70928. procedure TPORTA_ODCA.setODCA0; inline;
  70929. begin
  70930. pTDefRegMap(@Self)^.&set := $00000001;
  70931. end;
  70932. procedure TPORTA_ODCA.clearODCA0; inline;
  70933. begin
  70934. pTDefRegMap(@Self)^.clr := $00000001;
  70935. end;
  70936. procedure TPORTA_ODCA.setODCA0(thebits : TBits_1); inline;
  70937. begin
  70938. if thebits = 0 then
  70939. pTDefRegMap(@Self)^.clr := $00000001
  70940. else
  70941. pTDefRegMap(@Self)^.&set := $00000001;
  70942. end;
  70943. function TPORTA_ODCA.getODCA0 : TBits_1; inline;
  70944. begin
  70945. getODCA0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70946. end;
  70947. procedure TPORTA_ODCA.setODCA1; inline;
  70948. begin
  70949. pTDefRegMap(@Self)^.&set := $00000002;
  70950. end;
  70951. procedure TPORTA_ODCA.clearODCA1; inline;
  70952. begin
  70953. pTDefRegMap(@Self)^.clr := $00000002;
  70954. end;
  70955. procedure TPORTA_ODCA.setODCA1(thebits : TBits_1); inline;
  70956. begin
  70957. if thebits = 0 then
  70958. pTDefRegMap(@Self)^.clr := $00000002
  70959. else
  70960. pTDefRegMap(@Self)^.&set := $00000002;
  70961. end;
  70962. function TPORTA_ODCA.getODCA1 : TBits_1; inline;
  70963. begin
  70964. getODCA1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70965. end;
  70966. procedure TPORTA_ODCA.setODCA2; inline;
  70967. begin
  70968. pTDefRegMap(@Self)^.&set := $00000004;
  70969. end;
  70970. procedure TPORTA_ODCA.clearODCA2; inline;
  70971. begin
  70972. pTDefRegMap(@Self)^.clr := $00000004;
  70973. end;
  70974. procedure TPORTA_ODCA.setODCA2(thebits : TBits_1); inline;
  70975. begin
  70976. if thebits = 0 then
  70977. pTDefRegMap(@Self)^.clr := $00000004
  70978. else
  70979. pTDefRegMap(@Self)^.&set := $00000004;
  70980. end;
  70981. function TPORTA_ODCA.getODCA2 : TBits_1; inline;
  70982. begin
  70983. getODCA2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70984. end;
  70985. procedure TPORTA_ODCA.setODCA3; inline;
  70986. begin
  70987. pTDefRegMap(@Self)^.&set := $00000008;
  70988. end;
  70989. procedure TPORTA_ODCA.clearODCA3; inline;
  70990. begin
  70991. pTDefRegMap(@Self)^.clr := $00000008;
  70992. end;
  70993. procedure TPORTA_ODCA.setODCA3(thebits : TBits_1); inline;
  70994. begin
  70995. if thebits = 0 then
  70996. pTDefRegMap(@Self)^.clr := $00000008
  70997. else
  70998. pTDefRegMap(@Self)^.&set := $00000008;
  70999. end;
  71000. function TPORTA_ODCA.getODCA3 : TBits_1; inline;
  71001. begin
  71002. getODCA3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71003. end;
  71004. procedure TPORTA_ODCA.setODCA4; inline;
  71005. begin
  71006. pTDefRegMap(@Self)^.&set := $00000010;
  71007. end;
  71008. procedure TPORTA_ODCA.clearODCA4; inline;
  71009. begin
  71010. pTDefRegMap(@Self)^.clr := $00000010;
  71011. end;
  71012. procedure TPORTA_ODCA.setODCA4(thebits : TBits_1); inline;
  71013. begin
  71014. if thebits = 0 then
  71015. pTDefRegMap(@Self)^.clr := $00000010
  71016. else
  71017. pTDefRegMap(@Self)^.&set := $00000010;
  71018. end;
  71019. function TPORTA_ODCA.getODCA4 : TBits_1; inline;
  71020. begin
  71021. getODCA4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71022. end;
  71023. procedure TPORTA_ODCA.setODCA5; inline;
  71024. begin
  71025. pTDefRegMap(@Self)^.&set := $00000020;
  71026. end;
  71027. procedure TPORTA_ODCA.clearODCA5; inline;
  71028. begin
  71029. pTDefRegMap(@Self)^.clr := $00000020;
  71030. end;
  71031. procedure TPORTA_ODCA.setODCA5(thebits : TBits_1); inline;
  71032. begin
  71033. if thebits = 0 then
  71034. pTDefRegMap(@Self)^.clr := $00000020
  71035. else
  71036. pTDefRegMap(@Self)^.&set := $00000020;
  71037. end;
  71038. function TPORTA_ODCA.getODCA5 : TBits_1; inline;
  71039. begin
  71040. getODCA5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71041. end;
  71042. procedure TPORTA_ODCA.setODCA6; inline;
  71043. begin
  71044. pTDefRegMap(@Self)^.&set := $00000040;
  71045. end;
  71046. procedure TPORTA_ODCA.clearODCA6; inline;
  71047. begin
  71048. pTDefRegMap(@Self)^.clr := $00000040;
  71049. end;
  71050. procedure TPORTA_ODCA.setODCA6(thebits : TBits_1); inline;
  71051. begin
  71052. if thebits = 0 then
  71053. pTDefRegMap(@Self)^.clr := $00000040
  71054. else
  71055. pTDefRegMap(@Self)^.&set := $00000040;
  71056. end;
  71057. function TPORTA_ODCA.getODCA6 : TBits_1; inline;
  71058. begin
  71059. getODCA6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71060. end;
  71061. procedure TPORTA_ODCA.setODCA7; inline;
  71062. begin
  71063. pTDefRegMap(@Self)^.&set := $00000080;
  71064. end;
  71065. procedure TPORTA_ODCA.clearODCA7; inline;
  71066. begin
  71067. pTDefRegMap(@Self)^.clr := $00000080;
  71068. end;
  71069. procedure TPORTA_ODCA.setODCA7(thebits : TBits_1); inline;
  71070. begin
  71071. if thebits = 0 then
  71072. pTDefRegMap(@Self)^.clr := $00000080
  71073. else
  71074. pTDefRegMap(@Self)^.&set := $00000080;
  71075. end;
  71076. function TPORTA_ODCA.getODCA7 : TBits_1; inline;
  71077. begin
  71078. getODCA7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71079. end;
  71080. procedure TPORTA_ODCA.setODCA9; inline;
  71081. begin
  71082. pTDefRegMap(@Self)^.&set := $00000200;
  71083. end;
  71084. procedure TPORTA_ODCA.clearODCA9; inline;
  71085. begin
  71086. pTDefRegMap(@Self)^.clr := $00000200;
  71087. end;
  71088. procedure TPORTA_ODCA.setODCA9(thebits : TBits_1); inline;
  71089. begin
  71090. if thebits = 0 then
  71091. pTDefRegMap(@Self)^.clr := $00000200
  71092. else
  71093. pTDefRegMap(@Self)^.&set := $00000200;
  71094. end;
  71095. function TPORTA_ODCA.getODCA9 : TBits_1; inline;
  71096. begin
  71097. getODCA9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71098. end;
  71099. procedure TPORTA_ODCA.setODCA10; inline;
  71100. begin
  71101. pTDefRegMap(@Self)^.&set := $00000400;
  71102. end;
  71103. procedure TPORTA_ODCA.clearODCA10; inline;
  71104. begin
  71105. pTDefRegMap(@Self)^.clr := $00000400;
  71106. end;
  71107. procedure TPORTA_ODCA.setODCA10(thebits : TBits_1); inline;
  71108. begin
  71109. if thebits = 0 then
  71110. pTDefRegMap(@Self)^.clr := $00000400
  71111. else
  71112. pTDefRegMap(@Self)^.&set := $00000400;
  71113. end;
  71114. function TPORTA_ODCA.getODCA10 : TBits_1; inline;
  71115. begin
  71116. getODCA10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71117. end;
  71118. procedure TPORTA_ODCA.setODCA14; inline;
  71119. begin
  71120. pTDefRegMap(@Self)^.&set := $00004000;
  71121. end;
  71122. procedure TPORTA_ODCA.clearODCA14; inline;
  71123. begin
  71124. pTDefRegMap(@Self)^.clr := $00004000;
  71125. end;
  71126. procedure TPORTA_ODCA.setODCA14(thebits : TBits_1); inline;
  71127. begin
  71128. if thebits = 0 then
  71129. pTDefRegMap(@Self)^.clr := $00004000
  71130. else
  71131. pTDefRegMap(@Self)^.&set := $00004000;
  71132. end;
  71133. function TPORTA_ODCA.getODCA14 : TBits_1; inline;
  71134. begin
  71135. getODCA14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71136. end;
  71137. procedure TPORTA_ODCA.setODCA15; inline;
  71138. begin
  71139. pTDefRegMap(@Self)^.&set := $00008000;
  71140. end;
  71141. procedure TPORTA_ODCA.clearODCA15; inline;
  71142. begin
  71143. pTDefRegMap(@Self)^.clr := $00008000;
  71144. end;
  71145. procedure TPORTA_ODCA.setODCA15(thebits : TBits_1); inline;
  71146. begin
  71147. if thebits = 0 then
  71148. pTDefRegMap(@Self)^.clr := $00008000
  71149. else
  71150. pTDefRegMap(@Self)^.&set := $00008000;
  71151. end;
  71152. function TPORTA_ODCA.getODCA15 : TBits_1; inline;
  71153. begin
  71154. getODCA15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  71155. end;
  71156. procedure TPORTA_ODCA.setw(thebits : TBits_32); inline;
  71157. begin
  71158. pTDefRegMap(@Self)^.val := thebits;
  71159. end;
  71160. function TPORTA_ODCA.getw : TBits_32; inline;
  71161. begin
  71162. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71163. end;
  71164. procedure TPORTB_TRISB.setTRISB0; inline;
  71165. begin
  71166. pTDefRegMap(@Self)^.&set := $00000001;
  71167. end;
  71168. procedure TPORTB_TRISB.clearTRISB0; inline;
  71169. begin
  71170. pTDefRegMap(@Self)^.clr := $00000001;
  71171. end;
  71172. procedure TPORTB_TRISB.setTRISB0(thebits : TBits_1); inline;
  71173. begin
  71174. if thebits = 0 then
  71175. pTDefRegMap(@Self)^.clr := $00000001
  71176. else
  71177. pTDefRegMap(@Self)^.&set := $00000001;
  71178. end;
  71179. function TPORTB_TRISB.getTRISB0 : TBits_1; inline;
  71180. begin
  71181. getTRISB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71182. end;
  71183. procedure TPORTB_TRISB.setTRISB1; inline;
  71184. begin
  71185. pTDefRegMap(@Self)^.&set := $00000002;
  71186. end;
  71187. procedure TPORTB_TRISB.clearTRISB1; inline;
  71188. begin
  71189. pTDefRegMap(@Self)^.clr := $00000002;
  71190. end;
  71191. procedure TPORTB_TRISB.setTRISB1(thebits : TBits_1); inline;
  71192. begin
  71193. if thebits = 0 then
  71194. pTDefRegMap(@Self)^.clr := $00000002
  71195. else
  71196. pTDefRegMap(@Self)^.&set := $00000002;
  71197. end;
  71198. function TPORTB_TRISB.getTRISB1 : TBits_1; inline;
  71199. begin
  71200. getTRISB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71201. end;
  71202. procedure TPORTB_TRISB.setTRISB2; inline;
  71203. begin
  71204. pTDefRegMap(@Self)^.&set := $00000004;
  71205. end;
  71206. procedure TPORTB_TRISB.clearTRISB2; inline;
  71207. begin
  71208. pTDefRegMap(@Self)^.clr := $00000004;
  71209. end;
  71210. procedure TPORTB_TRISB.setTRISB2(thebits : TBits_1); inline;
  71211. begin
  71212. if thebits = 0 then
  71213. pTDefRegMap(@Self)^.clr := $00000004
  71214. else
  71215. pTDefRegMap(@Self)^.&set := $00000004;
  71216. end;
  71217. function TPORTB_TRISB.getTRISB2 : TBits_1; inline;
  71218. begin
  71219. getTRISB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71220. end;
  71221. procedure TPORTB_TRISB.setTRISB3; inline;
  71222. begin
  71223. pTDefRegMap(@Self)^.&set := $00000008;
  71224. end;
  71225. procedure TPORTB_TRISB.clearTRISB3; inline;
  71226. begin
  71227. pTDefRegMap(@Self)^.clr := $00000008;
  71228. end;
  71229. procedure TPORTB_TRISB.setTRISB3(thebits : TBits_1); inline;
  71230. begin
  71231. if thebits = 0 then
  71232. pTDefRegMap(@Self)^.clr := $00000008
  71233. else
  71234. pTDefRegMap(@Self)^.&set := $00000008;
  71235. end;
  71236. function TPORTB_TRISB.getTRISB3 : TBits_1; inline;
  71237. begin
  71238. getTRISB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71239. end;
  71240. procedure TPORTB_TRISB.setTRISB4; inline;
  71241. begin
  71242. pTDefRegMap(@Self)^.&set := $00000010;
  71243. end;
  71244. procedure TPORTB_TRISB.clearTRISB4; inline;
  71245. begin
  71246. pTDefRegMap(@Self)^.clr := $00000010;
  71247. end;
  71248. procedure TPORTB_TRISB.setTRISB4(thebits : TBits_1); inline;
  71249. begin
  71250. if thebits = 0 then
  71251. pTDefRegMap(@Self)^.clr := $00000010
  71252. else
  71253. pTDefRegMap(@Self)^.&set := $00000010;
  71254. end;
  71255. function TPORTB_TRISB.getTRISB4 : TBits_1; inline;
  71256. begin
  71257. getTRISB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71258. end;
  71259. procedure TPORTB_TRISB.setTRISB5; inline;
  71260. begin
  71261. pTDefRegMap(@Self)^.&set := $00000020;
  71262. end;
  71263. procedure TPORTB_TRISB.clearTRISB5; inline;
  71264. begin
  71265. pTDefRegMap(@Self)^.clr := $00000020;
  71266. end;
  71267. procedure TPORTB_TRISB.setTRISB5(thebits : TBits_1); inline;
  71268. begin
  71269. if thebits = 0 then
  71270. pTDefRegMap(@Self)^.clr := $00000020
  71271. else
  71272. pTDefRegMap(@Self)^.&set := $00000020;
  71273. end;
  71274. function TPORTB_TRISB.getTRISB5 : TBits_1; inline;
  71275. begin
  71276. getTRISB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71277. end;
  71278. procedure TPORTB_TRISB.setTRISB6; inline;
  71279. begin
  71280. pTDefRegMap(@Self)^.&set := $00000040;
  71281. end;
  71282. procedure TPORTB_TRISB.clearTRISB6; inline;
  71283. begin
  71284. pTDefRegMap(@Self)^.clr := $00000040;
  71285. end;
  71286. procedure TPORTB_TRISB.setTRISB6(thebits : TBits_1); inline;
  71287. begin
  71288. if thebits = 0 then
  71289. pTDefRegMap(@Self)^.clr := $00000040
  71290. else
  71291. pTDefRegMap(@Self)^.&set := $00000040;
  71292. end;
  71293. function TPORTB_TRISB.getTRISB6 : TBits_1; inline;
  71294. begin
  71295. getTRISB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71296. end;
  71297. procedure TPORTB_TRISB.setTRISB7; inline;
  71298. begin
  71299. pTDefRegMap(@Self)^.&set := $00000080;
  71300. end;
  71301. procedure TPORTB_TRISB.clearTRISB7; inline;
  71302. begin
  71303. pTDefRegMap(@Self)^.clr := $00000080;
  71304. end;
  71305. procedure TPORTB_TRISB.setTRISB7(thebits : TBits_1); inline;
  71306. begin
  71307. if thebits = 0 then
  71308. pTDefRegMap(@Self)^.clr := $00000080
  71309. else
  71310. pTDefRegMap(@Self)^.&set := $00000080;
  71311. end;
  71312. function TPORTB_TRISB.getTRISB7 : TBits_1; inline;
  71313. begin
  71314. getTRISB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71315. end;
  71316. procedure TPORTB_TRISB.setTRISB8; inline;
  71317. begin
  71318. pTDefRegMap(@Self)^.&set := $00000100;
  71319. end;
  71320. procedure TPORTB_TRISB.clearTRISB8; inline;
  71321. begin
  71322. pTDefRegMap(@Self)^.clr := $00000100;
  71323. end;
  71324. procedure TPORTB_TRISB.setTRISB8(thebits : TBits_1); inline;
  71325. begin
  71326. if thebits = 0 then
  71327. pTDefRegMap(@Self)^.clr := $00000100
  71328. else
  71329. pTDefRegMap(@Self)^.&set := $00000100;
  71330. end;
  71331. function TPORTB_TRISB.getTRISB8 : TBits_1; inline;
  71332. begin
  71333. getTRISB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71334. end;
  71335. procedure TPORTB_TRISB.setTRISB9; inline;
  71336. begin
  71337. pTDefRegMap(@Self)^.&set := $00000200;
  71338. end;
  71339. procedure TPORTB_TRISB.clearTRISB9; inline;
  71340. begin
  71341. pTDefRegMap(@Self)^.clr := $00000200;
  71342. end;
  71343. procedure TPORTB_TRISB.setTRISB9(thebits : TBits_1); inline;
  71344. begin
  71345. if thebits = 0 then
  71346. pTDefRegMap(@Self)^.clr := $00000200
  71347. else
  71348. pTDefRegMap(@Self)^.&set := $00000200;
  71349. end;
  71350. function TPORTB_TRISB.getTRISB9 : TBits_1; inline;
  71351. begin
  71352. getTRISB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71353. end;
  71354. procedure TPORTB_TRISB.setTRISB10; inline;
  71355. begin
  71356. pTDefRegMap(@Self)^.&set := $00000400;
  71357. end;
  71358. procedure TPORTB_TRISB.clearTRISB10; inline;
  71359. begin
  71360. pTDefRegMap(@Self)^.clr := $00000400;
  71361. end;
  71362. procedure TPORTB_TRISB.setTRISB10(thebits : TBits_1); inline;
  71363. begin
  71364. if thebits = 0 then
  71365. pTDefRegMap(@Self)^.clr := $00000400
  71366. else
  71367. pTDefRegMap(@Self)^.&set := $00000400;
  71368. end;
  71369. function TPORTB_TRISB.getTRISB10 : TBits_1; inline;
  71370. begin
  71371. getTRISB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71372. end;
  71373. procedure TPORTB_TRISB.setTRISB11; inline;
  71374. begin
  71375. pTDefRegMap(@Self)^.&set := $00000800;
  71376. end;
  71377. procedure TPORTB_TRISB.clearTRISB11; inline;
  71378. begin
  71379. pTDefRegMap(@Self)^.clr := $00000800;
  71380. end;
  71381. procedure TPORTB_TRISB.setTRISB11(thebits : TBits_1); inline;
  71382. begin
  71383. if thebits = 0 then
  71384. pTDefRegMap(@Self)^.clr := $00000800
  71385. else
  71386. pTDefRegMap(@Self)^.&set := $00000800;
  71387. end;
  71388. function TPORTB_TRISB.getTRISB11 : TBits_1; inline;
  71389. begin
  71390. getTRISB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  71391. end;
  71392. procedure TPORTB_TRISB.setTRISB12; inline;
  71393. begin
  71394. pTDefRegMap(@Self)^.&set := $00001000;
  71395. end;
  71396. procedure TPORTB_TRISB.clearTRISB12; inline;
  71397. begin
  71398. pTDefRegMap(@Self)^.clr := $00001000;
  71399. end;
  71400. procedure TPORTB_TRISB.setTRISB12(thebits : TBits_1); inline;
  71401. begin
  71402. if thebits = 0 then
  71403. pTDefRegMap(@Self)^.clr := $00001000
  71404. else
  71405. pTDefRegMap(@Self)^.&set := $00001000;
  71406. end;
  71407. function TPORTB_TRISB.getTRISB12 : TBits_1; inline;
  71408. begin
  71409. getTRISB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71410. end;
  71411. procedure TPORTB_TRISB.setTRISB13; inline;
  71412. begin
  71413. pTDefRegMap(@Self)^.&set := $00002000;
  71414. end;
  71415. procedure TPORTB_TRISB.clearTRISB13; inline;
  71416. begin
  71417. pTDefRegMap(@Self)^.clr := $00002000;
  71418. end;
  71419. procedure TPORTB_TRISB.setTRISB13(thebits : TBits_1); inline;
  71420. begin
  71421. if thebits = 0 then
  71422. pTDefRegMap(@Self)^.clr := $00002000
  71423. else
  71424. pTDefRegMap(@Self)^.&set := $00002000;
  71425. end;
  71426. function TPORTB_TRISB.getTRISB13 : TBits_1; inline;
  71427. begin
  71428. getTRISB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71429. end;
  71430. procedure TPORTB_TRISB.setTRISB14; inline;
  71431. begin
  71432. pTDefRegMap(@Self)^.&set := $00004000;
  71433. end;
  71434. procedure TPORTB_TRISB.clearTRISB14; inline;
  71435. begin
  71436. pTDefRegMap(@Self)^.clr := $00004000;
  71437. end;
  71438. procedure TPORTB_TRISB.setTRISB14(thebits : TBits_1); inline;
  71439. begin
  71440. if thebits = 0 then
  71441. pTDefRegMap(@Self)^.clr := $00004000
  71442. else
  71443. pTDefRegMap(@Self)^.&set := $00004000;
  71444. end;
  71445. function TPORTB_TRISB.getTRISB14 : TBits_1; inline;
  71446. begin
  71447. getTRISB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71448. end;
  71449. procedure TPORTB_TRISB.setTRISB15; inline;
  71450. begin
  71451. pTDefRegMap(@Self)^.&set := $00008000;
  71452. end;
  71453. procedure TPORTB_TRISB.clearTRISB15; inline;
  71454. begin
  71455. pTDefRegMap(@Self)^.clr := $00008000;
  71456. end;
  71457. procedure TPORTB_TRISB.setTRISB15(thebits : TBits_1); inline;
  71458. begin
  71459. if thebits = 0 then
  71460. pTDefRegMap(@Self)^.clr := $00008000
  71461. else
  71462. pTDefRegMap(@Self)^.&set := $00008000;
  71463. end;
  71464. function TPORTB_TRISB.getTRISB15 : TBits_1; inline;
  71465. begin
  71466. getTRISB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  71467. end;
  71468. procedure TPORTB_TRISB.setw(thebits : TBits_32); inline;
  71469. begin
  71470. pTDefRegMap(@Self)^.val := thebits;
  71471. end;
  71472. function TPORTB_TRISB.getw : TBits_32; inline;
  71473. begin
  71474. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71475. end;
  71476. procedure TPORTB_PORTB.setRB0; inline;
  71477. begin
  71478. pTDefRegMap(@Self)^.&set := $00000001;
  71479. end;
  71480. procedure TPORTB_PORTB.clearRB0; inline;
  71481. begin
  71482. pTDefRegMap(@Self)^.clr := $00000001;
  71483. end;
  71484. procedure TPORTB_PORTB.setRB0(thebits : TBits_1); inline;
  71485. begin
  71486. if thebits = 0 then
  71487. pTDefRegMap(@Self)^.clr := $00000001
  71488. else
  71489. pTDefRegMap(@Self)^.&set := $00000001;
  71490. end;
  71491. function TPORTB_PORTB.getRB0 : TBits_1; inline;
  71492. begin
  71493. getRB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71494. end;
  71495. procedure TPORTB_PORTB.setRB1; inline;
  71496. begin
  71497. pTDefRegMap(@Self)^.&set := $00000002;
  71498. end;
  71499. procedure TPORTB_PORTB.clearRB1; inline;
  71500. begin
  71501. pTDefRegMap(@Self)^.clr := $00000002;
  71502. end;
  71503. procedure TPORTB_PORTB.setRB1(thebits : TBits_1); inline;
  71504. begin
  71505. if thebits = 0 then
  71506. pTDefRegMap(@Self)^.clr := $00000002
  71507. else
  71508. pTDefRegMap(@Self)^.&set := $00000002;
  71509. end;
  71510. function TPORTB_PORTB.getRB1 : TBits_1; inline;
  71511. begin
  71512. getRB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71513. end;
  71514. procedure TPORTB_PORTB.setRB2; inline;
  71515. begin
  71516. pTDefRegMap(@Self)^.&set := $00000004;
  71517. end;
  71518. procedure TPORTB_PORTB.clearRB2; inline;
  71519. begin
  71520. pTDefRegMap(@Self)^.clr := $00000004;
  71521. end;
  71522. procedure TPORTB_PORTB.setRB2(thebits : TBits_1); inline;
  71523. begin
  71524. if thebits = 0 then
  71525. pTDefRegMap(@Self)^.clr := $00000004
  71526. else
  71527. pTDefRegMap(@Self)^.&set := $00000004;
  71528. end;
  71529. function TPORTB_PORTB.getRB2 : TBits_1; inline;
  71530. begin
  71531. getRB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71532. end;
  71533. procedure TPORTB_PORTB.setRB3; inline;
  71534. begin
  71535. pTDefRegMap(@Self)^.&set := $00000008;
  71536. end;
  71537. procedure TPORTB_PORTB.clearRB3; inline;
  71538. begin
  71539. pTDefRegMap(@Self)^.clr := $00000008;
  71540. end;
  71541. procedure TPORTB_PORTB.setRB3(thebits : TBits_1); inline;
  71542. begin
  71543. if thebits = 0 then
  71544. pTDefRegMap(@Self)^.clr := $00000008
  71545. else
  71546. pTDefRegMap(@Self)^.&set := $00000008;
  71547. end;
  71548. function TPORTB_PORTB.getRB3 : TBits_1; inline;
  71549. begin
  71550. getRB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71551. end;
  71552. procedure TPORTB_PORTB.setRB4; inline;
  71553. begin
  71554. pTDefRegMap(@Self)^.&set := $00000010;
  71555. end;
  71556. procedure TPORTB_PORTB.clearRB4; inline;
  71557. begin
  71558. pTDefRegMap(@Self)^.clr := $00000010;
  71559. end;
  71560. procedure TPORTB_PORTB.setRB4(thebits : TBits_1); inline;
  71561. begin
  71562. if thebits = 0 then
  71563. pTDefRegMap(@Self)^.clr := $00000010
  71564. else
  71565. pTDefRegMap(@Self)^.&set := $00000010;
  71566. end;
  71567. function TPORTB_PORTB.getRB4 : TBits_1; inline;
  71568. begin
  71569. getRB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71570. end;
  71571. procedure TPORTB_PORTB.setRB5; inline;
  71572. begin
  71573. pTDefRegMap(@Self)^.&set := $00000020;
  71574. end;
  71575. procedure TPORTB_PORTB.clearRB5; inline;
  71576. begin
  71577. pTDefRegMap(@Self)^.clr := $00000020;
  71578. end;
  71579. procedure TPORTB_PORTB.setRB5(thebits : TBits_1); inline;
  71580. begin
  71581. if thebits = 0 then
  71582. pTDefRegMap(@Self)^.clr := $00000020
  71583. else
  71584. pTDefRegMap(@Self)^.&set := $00000020;
  71585. end;
  71586. function TPORTB_PORTB.getRB5 : TBits_1; inline;
  71587. begin
  71588. getRB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71589. end;
  71590. procedure TPORTB_PORTB.setRB6; inline;
  71591. begin
  71592. pTDefRegMap(@Self)^.&set := $00000040;
  71593. end;
  71594. procedure TPORTB_PORTB.clearRB6; inline;
  71595. begin
  71596. pTDefRegMap(@Self)^.clr := $00000040;
  71597. end;
  71598. procedure TPORTB_PORTB.setRB6(thebits : TBits_1); inline;
  71599. begin
  71600. if thebits = 0 then
  71601. pTDefRegMap(@Self)^.clr := $00000040
  71602. else
  71603. pTDefRegMap(@Self)^.&set := $00000040;
  71604. end;
  71605. function TPORTB_PORTB.getRB6 : TBits_1; inline;
  71606. begin
  71607. getRB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71608. end;
  71609. procedure TPORTB_PORTB.setRB7; inline;
  71610. begin
  71611. pTDefRegMap(@Self)^.&set := $00000080;
  71612. end;
  71613. procedure TPORTB_PORTB.clearRB7; inline;
  71614. begin
  71615. pTDefRegMap(@Self)^.clr := $00000080;
  71616. end;
  71617. procedure TPORTB_PORTB.setRB7(thebits : TBits_1); inline;
  71618. begin
  71619. if thebits = 0 then
  71620. pTDefRegMap(@Self)^.clr := $00000080
  71621. else
  71622. pTDefRegMap(@Self)^.&set := $00000080;
  71623. end;
  71624. function TPORTB_PORTB.getRB7 : TBits_1; inline;
  71625. begin
  71626. getRB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71627. end;
  71628. procedure TPORTB_PORTB.setRB8; inline;
  71629. begin
  71630. pTDefRegMap(@Self)^.&set := $00000100;
  71631. end;
  71632. procedure TPORTB_PORTB.clearRB8; inline;
  71633. begin
  71634. pTDefRegMap(@Self)^.clr := $00000100;
  71635. end;
  71636. procedure TPORTB_PORTB.setRB8(thebits : TBits_1); inline;
  71637. begin
  71638. if thebits = 0 then
  71639. pTDefRegMap(@Self)^.clr := $00000100
  71640. else
  71641. pTDefRegMap(@Self)^.&set := $00000100;
  71642. end;
  71643. function TPORTB_PORTB.getRB8 : TBits_1; inline;
  71644. begin
  71645. getRB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71646. end;
  71647. procedure TPORTB_PORTB.setRB9; inline;
  71648. begin
  71649. pTDefRegMap(@Self)^.&set := $00000200;
  71650. end;
  71651. procedure TPORTB_PORTB.clearRB9; inline;
  71652. begin
  71653. pTDefRegMap(@Self)^.clr := $00000200;
  71654. end;
  71655. procedure TPORTB_PORTB.setRB9(thebits : TBits_1); inline;
  71656. begin
  71657. if thebits = 0 then
  71658. pTDefRegMap(@Self)^.clr := $00000200
  71659. else
  71660. pTDefRegMap(@Self)^.&set := $00000200;
  71661. end;
  71662. function TPORTB_PORTB.getRB9 : TBits_1; inline;
  71663. begin
  71664. getRB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71665. end;
  71666. procedure TPORTB_PORTB.setRB10; inline;
  71667. begin
  71668. pTDefRegMap(@Self)^.&set := $00000400;
  71669. end;
  71670. procedure TPORTB_PORTB.clearRB10; inline;
  71671. begin
  71672. pTDefRegMap(@Self)^.clr := $00000400;
  71673. end;
  71674. procedure TPORTB_PORTB.setRB10(thebits : TBits_1); inline;
  71675. begin
  71676. if thebits = 0 then
  71677. pTDefRegMap(@Self)^.clr := $00000400
  71678. else
  71679. pTDefRegMap(@Self)^.&set := $00000400;
  71680. end;
  71681. function TPORTB_PORTB.getRB10 : TBits_1; inline;
  71682. begin
  71683. getRB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71684. end;
  71685. procedure TPORTB_PORTB.setRB11; inline;
  71686. begin
  71687. pTDefRegMap(@Self)^.&set := $00000800;
  71688. end;
  71689. procedure TPORTB_PORTB.clearRB11; inline;
  71690. begin
  71691. pTDefRegMap(@Self)^.clr := $00000800;
  71692. end;
  71693. procedure TPORTB_PORTB.setRB11(thebits : TBits_1); inline;
  71694. begin
  71695. if thebits = 0 then
  71696. pTDefRegMap(@Self)^.clr := $00000800
  71697. else
  71698. pTDefRegMap(@Self)^.&set := $00000800;
  71699. end;
  71700. function TPORTB_PORTB.getRB11 : TBits_1; inline;
  71701. begin
  71702. getRB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  71703. end;
  71704. procedure TPORTB_PORTB.setRB12; inline;
  71705. begin
  71706. pTDefRegMap(@Self)^.&set := $00001000;
  71707. end;
  71708. procedure TPORTB_PORTB.clearRB12; inline;
  71709. begin
  71710. pTDefRegMap(@Self)^.clr := $00001000;
  71711. end;
  71712. procedure TPORTB_PORTB.setRB12(thebits : TBits_1); inline;
  71713. begin
  71714. if thebits = 0 then
  71715. pTDefRegMap(@Self)^.clr := $00001000
  71716. else
  71717. pTDefRegMap(@Self)^.&set := $00001000;
  71718. end;
  71719. function TPORTB_PORTB.getRB12 : TBits_1; inline;
  71720. begin
  71721. getRB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71722. end;
  71723. procedure TPORTB_PORTB.setRB13; inline;
  71724. begin
  71725. pTDefRegMap(@Self)^.&set := $00002000;
  71726. end;
  71727. procedure TPORTB_PORTB.clearRB13; inline;
  71728. begin
  71729. pTDefRegMap(@Self)^.clr := $00002000;
  71730. end;
  71731. procedure TPORTB_PORTB.setRB13(thebits : TBits_1); inline;
  71732. begin
  71733. if thebits = 0 then
  71734. pTDefRegMap(@Self)^.clr := $00002000
  71735. else
  71736. pTDefRegMap(@Self)^.&set := $00002000;
  71737. end;
  71738. function TPORTB_PORTB.getRB13 : TBits_1; inline;
  71739. begin
  71740. getRB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71741. end;
  71742. procedure TPORTB_PORTB.setRB14; inline;
  71743. begin
  71744. pTDefRegMap(@Self)^.&set := $00004000;
  71745. end;
  71746. procedure TPORTB_PORTB.clearRB14; inline;
  71747. begin
  71748. pTDefRegMap(@Self)^.clr := $00004000;
  71749. end;
  71750. procedure TPORTB_PORTB.setRB14(thebits : TBits_1); inline;
  71751. begin
  71752. if thebits = 0 then
  71753. pTDefRegMap(@Self)^.clr := $00004000
  71754. else
  71755. pTDefRegMap(@Self)^.&set := $00004000;
  71756. end;
  71757. function TPORTB_PORTB.getRB14 : TBits_1; inline;
  71758. begin
  71759. getRB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  71760. end;
  71761. procedure TPORTB_PORTB.setRB15; inline;
  71762. begin
  71763. pTDefRegMap(@Self)^.&set := $00008000;
  71764. end;
  71765. procedure TPORTB_PORTB.clearRB15; inline;
  71766. begin
  71767. pTDefRegMap(@Self)^.clr := $00008000;
  71768. end;
  71769. procedure TPORTB_PORTB.setRB15(thebits : TBits_1); inline;
  71770. begin
  71771. if thebits = 0 then
  71772. pTDefRegMap(@Self)^.clr := $00008000
  71773. else
  71774. pTDefRegMap(@Self)^.&set := $00008000;
  71775. end;
  71776. function TPORTB_PORTB.getRB15 : TBits_1; inline;
  71777. begin
  71778. getRB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  71779. end;
  71780. procedure TPORTB_PORTB.setw(thebits : TBits_32); inline;
  71781. begin
  71782. pTDefRegMap(@Self)^.val := thebits;
  71783. end;
  71784. function TPORTB_PORTB.getw : TBits_32; inline;
  71785. begin
  71786. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71787. end;
  71788. procedure TPORTB_LATB.setLATB0; inline;
  71789. begin
  71790. pTDefRegMap(@Self)^.&set := $00000001;
  71791. end;
  71792. procedure TPORTB_LATB.clearLATB0; inline;
  71793. begin
  71794. pTDefRegMap(@Self)^.clr := $00000001;
  71795. end;
  71796. procedure TPORTB_LATB.setLATB0(thebits : TBits_1); inline;
  71797. begin
  71798. if thebits = 0 then
  71799. pTDefRegMap(@Self)^.clr := $00000001
  71800. else
  71801. pTDefRegMap(@Self)^.&set := $00000001;
  71802. end;
  71803. function TPORTB_LATB.getLATB0 : TBits_1; inline;
  71804. begin
  71805. getLATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71806. end;
  71807. procedure TPORTB_LATB.setLATB1; inline;
  71808. begin
  71809. pTDefRegMap(@Self)^.&set := $00000002;
  71810. end;
  71811. procedure TPORTB_LATB.clearLATB1; inline;
  71812. begin
  71813. pTDefRegMap(@Self)^.clr := $00000002;
  71814. end;
  71815. procedure TPORTB_LATB.setLATB1(thebits : TBits_1); inline;
  71816. begin
  71817. if thebits = 0 then
  71818. pTDefRegMap(@Self)^.clr := $00000002
  71819. else
  71820. pTDefRegMap(@Self)^.&set := $00000002;
  71821. end;
  71822. function TPORTB_LATB.getLATB1 : TBits_1; inline;
  71823. begin
  71824. getLATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71825. end;
  71826. procedure TPORTB_LATB.setLATB2; inline;
  71827. begin
  71828. pTDefRegMap(@Self)^.&set := $00000004;
  71829. end;
  71830. procedure TPORTB_LATB.clearLATB2; inline;
  71831. begin
  71832. pTDefRegMap(@Self)^.clr := $00000004;
  71833. end;
  71834. procedure TPORTB_LATB.setLATB2(thebits : TBits_1); inline;
  71835. begin
  71836. if thebits = 0 then
  71837. pTDefRegMap(@Self)^.clr := $00000004
  71838. else
  71839. pTDefRegMap(@Self)^.&set := $00000004;
  71840. end;
  71841. function TPORTB_LATB.getLATB2 : TBits_1; inline;
  71842. begin
  71843. getLATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71844. end;
  71845. procedure TPORTB_LATB.setLATB3; inline;
  71846. begin
  71847. pTDefRegMap(@Self)^.&set := $00000008;
  71848. end;
  71849. procedure TPORTB_LATB.clearLATB3; inline;
  71850. begin
  71851. pTDefRegMap(@Self)^.clr := $00000008;
  71852. end;
  71853. procedure TPORTB_LATB.setLATB3(thebits : TBits_1); inline;
  71854. begin
  71855. if thebits = 0 then
  71856. pTDefRegMap(@Self)^.clr := $00000008
  71857. else
  71858. pTDefRegMap(@Self)^.&set := $00000008;
  71859. end;
  71860. function TPORTB_LATB.getLATB3 : TBits_1; inline;
  71861. begin
  71862. getLATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71863. end;
  71864. procedure TPORTB_LATB.setLATB4; inline;
  71865. begin
  71866. pTDefRegMap(@Self)^.&set := $00000010;
  71867. end;
  71868. procedure TPORTB_LATB.clearLATB4; inline;
  71869. begin
  71870. pTDefRegMap(@Self)^.clr := $00000010;
  71871. end;
  71872. procedure TPORTB_LATB.setLATB4(thebits : TBits_1); inline;
  71873. begin
  71874. if thebits = 0 then
  71875. pTDefRegMap(@Self)^.clr := $00000010
  71876. else
  71877. pTDefRegMap(@Self)^.&set := $00000010;
  71878. end;
  71879. function TPORTB_LATB.getLATB4 : TBits_1; inline;
  71880. begin
  71881. getLATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71882. end;
  71883. procedure TPORTB_LATB.setLATB5; inline;
  71884. begin
  71885. pTDefRegMap(@Self)^.&set := $00000020;
  71886. end;
  71887. procedure TPORTB_LATB.clearLATB5; inline;
  71888. begin
  71889. pTDefRegMap(@Self)^.clr := $00000020;
  71890. end;
  71891. procedure TPORTB_LATB.setLATB5(thebits : TBits_1); inline;
  71892. begin
  71893. if thebits = 0 then
  71894. pTDefRegMap(@Self)^.clr := $00000020
  71895. else
  71896. pTDefRegMap(@Self)^.&set := $00000020;
  71897. end;
  71898. function TPORTB_LATB.getLATB5 : TBits_1; inline;
  71899. begin
  71900. getLATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71901. end;
  71902. procedure TPORTB_LATB.setLATB6; inline;
  71903. begin
  71904. pTDefRegMap(@Self)^.&set := $00000040;
  71905. end;
  71906. procedure TPORTB_LATB.clearLATB6; inline;
  71907. begin
  71908. pTDefRegMap(@Self)^.clr := $00000040;
  71909. end;
  71910. procedure TPORTB_LATB.setLATB6(thebits : TBits_1); inline;
  71911. begin
  71912. if thebits = 0 then
  71913. pTDefRegMap(@Self)^.clr := $00000040
  71914. else
  71915. pTDefRegMap(@Self)^.&set := $00000040;
  71916. end;
  71917. function TPORTB_LATB.getLATB6 : TBits_1; inline;
  71918. begin
  71919. getLATB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71920. end;
  71921. procedure TPORTB_LATB.setLATB7; inline;
  71922. begin
  71923. pTDefRegMap(@Self)^.&set := $00000080;
  71924. end;
  71925. procedure TPORTB_LATB.clearLATB7; inline;
  71926. begin
  71927. pTDefRegMap(@Self)^.clr := $00000080;
  71928. end;
  71929. procedure TPORTB_LATB.setLATB7(thebits : TBits_1); inline;
  71930. begin
  71931. if thebits = 0 then
  71932. pTDefRegMap(@Self)^.clr := $00000080
  71933. else
  71934. pTDefRegMap(@Self)^.&set := $00000080;
  71935. end;
  71936. function TPORTB_LATB.getLATB7 : TBits_1; inline;
  71937. begin
  71938. getLATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71939. end;
  71940. procedure TPORTB_LATB.setLATB8; inline;
  71941. begin
  71942. pTDefRegMap(@Self)^.&set := $00000100;
  71943. end;
  71944. procedure TPORTB_LATB.clearLATB8; inline;
  71945. begin
  71946. pTDefRegMap(@Self)^.clr := $00000100;
  71947. end;
  71948. procedure TPORTB_LATB.setLATB8(thebits : TBits_1); inline;
  71949. begin
  71950. if thebits = 0 then
  71951. pTDefRegMap(@Self)^.clr := $00000100
  71952. else
  71953. pTDefRegMap(@Self)^.&set := $00000100;
  71954. end;
  71955. function TPORTB_LATB.getLATB8 : TBits_1; inline;
  71956. begin
  71957. getLATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71958. end;
  71959. procedure TPORTB_LATB.setLATB9; inline;
  71960. begin
  71961. pTDefRegMap(@Self)^.&set := $00000200;
  71962. end;
  71963. procedure TPORTB_LATB.clearLATB9; inline;
  71964. begin
  71965. pTDefRegMap(@Self)^.clr := $00000200;
  71966. end;
  71967. procedure TPORTB_LATB.setLATB9(thebits : TBits_1); inline;
  71968. begin
  71969. if thebits = 0 then
  71970. pTDefRegMap(@Self)^.clr := $00000200
  71971. else
  71972. pTDefRegMap(@Self)^.&set := $00000200;
  71973. end;
  71974. function TPORTB_LATB.getLATB9 : TBits_1; inline;
  71975. begin
  71976. getLATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71977. end;
  71978. procedure TPORTB_LATB.setLATB10; inline;
  71979. begin
  71980. pTDefRegMap(@Self)^.&set := $00000400;
  71981. end;
  71982. procedure TPORTB_LATB.clearLATB10; inline;
  71983. begin
  71984. pTDefRegMap(@Self)^.clr := $00000400;
  71985. end;
  71986. procedure TPORTB_LATB.setLATB10(thebits : TBits_1); inline;
  71987. begin
  71988. if thebits = 0 then
  71989. pTDefRegMap(@Self)^.clr := $00000400
  71990. else
  71991. pTDefRegMap(@Self)^.&set := $00000400;
  71992. end;
  71993. function TPORTB_LATB.getLATB10 : TBits_1; inline;
  71994. begin
  71995. getLATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71996. end;
  71997. procedure TPORTB_LATB.setLATB11; inline;
  71998. begin
  71999. pTDefRegMap(@Self)^.&set := $00000800;
  72000. end;
  72001. procedure TPORTB_LATB.clearLATB11; inline;
  72002. begin
  72003. pTDefRegMap(@Self)^.clr := $00000800;
  72004. end;
  72005. procedure TPORTB_LATB.setLATB11(thebits : TBits_1); inline;
  72006. begin
  72007. if thebits = 0 then
  72008. pTDefRegMap(@Self)^.clr := $00000800
  72009. else
  72010. pTDefRegMap(@Self)^.&set := $00000800;
  72011. end;
  72012. function TPORTB_LATB.getLATB11 : TBits_1; inline;
  72013. begin
  72014. getLATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  72015. end;
  72016. procedure TPORTB_LATB.setLATB12; inline;
  72017. begin
  72018. pTDefRegMap(@Self)^.&set := $00001000;
  72019. end;
  72020. procedure TPORTB_LATB.clearLATB12; inline;
  72021. begin
  72022. pTDefRegMap(@Self)^.clr := $00001000;
  72023. end;
  72024. procedure TPORTB_LATB.setLATB12(thebits : TBits_1); inline;
  72025. begin
  72026. if thebits = 0 then
  72027. pTDefRegMap(@Self)^.clr := $00001000
  72028. else
  72029. pTDefRegMap(@Self)^.&set := $00001000;
  72030. end;
  72031. function TPORTB_LATB.getLATB12 : TBits_1; inline;
  72032. begin
  72033. getLATB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72034. end;
  72035. procedure TPORTB_LATB.setLATB13; inline;
  72036. begin
  72037. pTDefRegMap(@Self)^.&set := $00002000;
  72038. end;
  72039. procedure TPORTB_LATB.clearLATB13; inline;
  72040. begin
  72041. pTDefRegMap(@Self)^.clr := $00002000;
  72042. end;
  72043. procedure TPORTB_LATB.setLATB13(thebits : TBits_1); inline;
  72044. begin
  72045. if thebits = 0 then
  72046. pTDefRegMap(@Self)^.clr := $00002000
  72047. else
  72048. pTDefRegMap(@Self)^.&set := $00002000;
  72049. end;
  72050. function TPORTB_LATB.getLATB13 : TBits_1; inline;
  72051. begin
  72052. getLATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72053. end;
  72054. procedure TPORTB_LATB.setLATB14; inline;
  72055. begin
  72056. pTDefRegMap(@Self)^.&set := $00004000;
  72057. end;
  72058. procedure TPORTB_LATB.clearLATB14; inline;
  72059. begin
  72060. pTDefRegMap(@Self)^.clr := $00004000;
  72061. end;
  72062. procedure TPORTB_LATB.setLATB14(thebits : TBits_1); inline;
  72063. begin
  72064. if thebits = 0 then
  72065. pTDefRegMap(@Self)^.clr := $00004000
  72066. else
  72067. pTDefRegMap(@Self)^.&set := $00004000;
  72068. end;
  72069. function TPORTB_LATB.getLATB14 : TBits_1; inline;
  72070. begin
  72071. getLATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72072. end;
  72073. procedure TPORTB_LATB.setLATB15; inline;
  72074. begin
  72075. pTDefRegMap(@Self)^.&set := $00008000;
  72076. end;
  72077. procedure TPORTB_LATB.clearLATB15; inline;
  72078. begin
  72079. pTDefRegMap(@Self)^.clr := $00008000;
  72080. end;
  72081. procedure TPORTB_LATB.setLATB15(thebits : TBits_1); inline;
  72082. begin
  72083. if thebits = 0 then
  72084. pTDefRegMap(@Self)^.clr := $00008000
  72085. else
  72086. pTDefRegMap(@Self)^.&set := $00008000;
  72087. end;
  72088. function TPORTB_LATB.getLATB15 : TBits_1; inline;
  72089. begin
  72090. getLATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72091. end;
  72092. procedure TPORTB_LATB.setw(thebits : TBits_32); inline;
  72093. begin
  72094. pTDefRegMap(@Self)^.val := thebits;
  72095. end;
  72096. function TPORTB_LATB.getw : TBits_32; inline;
  72097. begin
  72098. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72099. end;
  72100. procedure TPORTB_ODCB.setODCB0; inline;
  72101. begin
  72102. pTDefRegMap(@Self)^.&set := $00000001;
  72103. end;
  72104. procedure TPORTB_ODCB.clearODCB0; inline;
  72105. begin
  72106. pTDefRegMap(@Self)^.clr := $00000001;
  72107. end;
  72108. procedure TPORTB_ODCB.setODCB0(thebits : TBits_1); inline;
  72109. begin
  72110. if thebits = 0 then
  72111. pTDefRegMap(@Self)^.clr := $00000001
  72112. else
  72113. pTDefRegMap(@Self)^.&set := $00000001;
  72114. end;
  72115. function TPORTB_ODCB.getODCB0 : TBits_1; inline;
  72116. begin
  72117. getODCB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72118. end;
  72119. procedure TPORTB_ODCB.setODCB1; inline;
  72120. begin
  72121. pTDefRegMap(@Self)^.&set := $00000002;
  72122. end;
  72123. procedure TPORTB_ODCB.clearODCB1; inline;
  72124. begin
  72125. pTDefRegMap(@Self)^.clr := $00000002;
  72126. end;
  72127. procedure TPORTB_ODCB.setODCB1(thebits : TBits_1); inline;
  72128. begin
  72129. if thebits = 0 then
  72130. pTDefRegMap(@Self)^.clr := $00000002
  72131. else
  72132. pTDefRegMap(@Self)^.&set := $00000002;
  72133. end;
  72134. function TPORTB_ODCB.getODCB1 : TBits_1; inline;
  72135. begin
  72136. getODCB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72137. end;
  72138. procedure TPORTB_ODCB.setODCB2; inline;
  72139. begin
  72140. pTDefRegMap(@Self)^.&set := $00000004;
  72141. end;
  72142. procedure TPORTB_ODCB.clearODCB2; inline;
  72143. begin
  72144. pTDefRegMap(@Self)^.clr := $00000004;
  72145. end;
  72146. procedure TPORTB_ODCB.setODCB2(thebits : TBits_1); inline;
  72147. begin
  72148. if thebits = 0 then
  72149. pTDefRegMap(@Self)^.clr := $00000004
  72150. else
  72151. pTDefRegMap(@Self)^.&set := $00000004;
  72152. end;
  72153. function TPORTB_ODCB.getODCB2 : TBits_1; inline;
  72154. begin
  72155. getODCB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72156. end;
  72157. procedure TPORTB_ODCB.setODCB3; inline;
  72158. begin
  72159. pTDefRegMap(@Self)^.&set := $00000008;
  72160. end;
  72161. procedure TPORTB_ODCB.clearODCB3; inline;
  72162. begin
  72163. pTDefRegMap(@Self)^.clr := $00000008;
  72164. end;
  72165. procedure TPORTB_ODCB.setODCB3(thebits : TBits_1); inline;
  72166. begin
  72167. if thebits = 0 then
  72168. pTDefRegMap(@Self)^.clr := $00000008
  72169. else
  72170. pTDefRegMap(@Self)^.&set := $00000008;
  72171. end;
  72172. function TPORTB_ODCB.getODCB3 : TBits_1; inline;
  72173. begin
  72174. getODCB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72175. end;
  72176. procedure TPORTB_ODCB.setODCB4; inline;
  72177. begin
  72178. pTDefRegMap(@Self)^.&set := $00000010;
  72179. end;
  72180. procedure TPORTB_ODCB.clearODCB4; inline;
  72181. begin
  72182. pTDefRegMap(@Self)^.clr := $00000010;
  72183. end;
  72184. procedure TPORTB_ODCB.setODCB4(thebits : TBits_1); inline;
  72185. begin
  72186. if thebits = 0 then
  72187. pTDefRegMap(@Self)^.clr := $00000010
  72188. else
  72189. pTDefRegMap(@Self)^.&set := $00000010;
  72190. end;
  72191. function TPORTB_ODCB.getODCB4 : TBits_1; inline;
  72192. begin
  72193. getODCB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72194. end;
  72195. procedure TPORTB_ODCB.setODCB5; inline;
  72196. begin
  72197. pTDefRegMap(@Self)^.&set := $00000020;
  72198. end;
  72199. procedure TPORTB_ODCB.clearODCB5; inline;
  72200. begin
  72201. pTDefRegMap(@Self)^.clr := $00000020;
  72202. end;
  72203. procedure TPORTB_ODCB.setODCB5(thebits : TBits_1); inline;
  72204. begin
  72205. if thebits = 0 then
  72206. pTDefRegMap(@Self)^.clr := $00000020
  72207. else
  72208. pTDefRegMap(@Self)^.&set := $00000020;
  72209. end;
  72210. function TPORTB_ODCB.getODCB5 : TBits_1; inline;
  72211. begin
  72212. getODCB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72213. end;
  72214. procedure TPORTB_ODCB.setODCB6; inline;
  72215. begin
  72216. pTDefRegMap(@Self)^.&set := $00000040;
  72217. end;
  72218. procedure TPORTB_ODCB.clearODCB6; inline;
  72219. begin
  72220. pTDefRegMap(@Self)^.clr := $00000040;
  72221. end;
  72222. procedure TPORTB_ODCB.setODCB6(thebits : TBits_1); inline;
  72223. begin
  72224. if thebits = 0 then
  72225. pTDefRegMap(@Self)^.clr := $00000040
  72226. else
  72227. pTDefRegMap(@Self)^.&set := $00000040;
  72228. end;
  72229. function TPORTB_ODCB.getODCB6 : TBits_1; inline;
  72230. begin
  72231. getODCB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72232. end;
  72233. procedure TPORTB_ODCB.setODCB7; inline;
  72234. begin
  72235. pTDefRegMap(@Self)^.&set := $00000080;
  72236. end;
  72237. procedure TPORTB_ODCB.clearODCB7; inline;
  72238. begin
  72239. pTDefRegMap(@Self)^.clr := $00000080;
  72240. end;
  72241. procedure TPORTB_ODCB.setODCB7(thebits : TBits_1); inline;
  72242. begin
  72243. if thebits = 0 then
  72244. pTDefRegMap(@Self)^.clr := $00000080
  72245. else
  72246. pTDefRegMap(@Self)^.&set := $00000080;
  72247. end;
  72248. function TPORTB_ODCB.getODCB7 : TBits_1; inline;
  72249. begin
  72250. getODCB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72251. end;
  72252. procedure TPORTB_ODCB.setODCB8; inline;
  72253. begin
  72254. pTDefRegMap(@Self)^.&set := $00000100;
  72255. end;
  72256. procedure TPORTB_ODCB.clearODCB8; inline;
  72257. begin
  72258. pTDefRegMap(@Self)^.clr := $00000100;
  72259. end;
  72260. procedure TPORTB_ODCB.setODCB8(thebits : TBits_1); inline;
  72261. begin
  72262. if thebits = 0 then
  72263. pTDefRegMap(@Self)^.clr := $00000100
  72264. else
  72265. pTDefRegMap(@Self)^.&set := $00000100;
  72266. end;
  72267. function TPORTB_ODCB.getODCB8 : TBits_1; inline;
  72268. begin
  72269. getODCB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72270. end;
  72271. procedure TPORTB_ODCB.setODCB9; inline;
  72272. begin
  72273. pTDefRegMap(@Self)^.&set := $00000200;
  72274. end;
  72275. procedure TPORTB_ODCB.clearODCB9; inline;
  72276. begin
  72277. pTDefRegMap(@Self)^.clr := $00000200;
  72278. end;
  72279. procedure TPORTB_ODCB.setODCB9(thebits : TBits_1); inline;
  72280. begin
  72281. if thebits = 0 then
  72282. pTDefRegMap(@Self)^.clr := $00000200
  72283. else
  72284. pTDefRegMap(@Self)^.&set := $00000200;
  72285. end;
  72286. function TPORTB_ODCB.getODCB9 : TBits_1; inline;
  72287. begin
  72288. getODCB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72289. end;
  72290. procedure TPORTB_ODCB.setODCB10; inline;
  72291. begin
  72292. pTDefRegMap(@Self)^.&set := $00000400;
  72293. end;
  72294. procedure TPORTB_ODCB.clearODCB10; inline;
  72295. begin
  72296. pTDefRegMap(@Self)^.clr := $00000400;
  72297. end;
  72298. procedure TPORTB_ODCB.setODCB10(thebits : TBits_1); inline;
  72299. begin
  72300. if thebits = 0 then
  72301. pTDefRegMap(@Self)^.clr := $00000400
  72302. else
  72303. pTDefRegMap(@Self)^.&set := $00000400;
  72304. end;
  72305. function TPORTB_ODCB.getODCB10 : TBits_1; inline;
  72306. begin
  72307. getODCB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72308. end;
  72309. procedure TPORTB_ODCB.setODCB11; inline;
  72310. begin
  72311. pTDefRegMap(@Self)^.&set := $00000800;
  72312. end;
  72313. procedure TPORTB_ODCB.clearODCB11; inline;
  72314. begin
  72315. pTDefRegMap(@Self)^.clr := $00000800;
  72316. end;
  72317. procedure TPORTB_ODCB.setODCB11(thebits : TBits_1); inline;
  72318. begin
  72319. if thebits = 0 then
  72320. pTDefRegMap(@Self)^.clr := $00000800
  72321. else
  72322. pTDefRegMap(@Self)^.&set := $00000800;
  72323. end;
  72324. function TPORTB_ODCB.getODCB11 : TBits_1; inline;
  72325. begin
  72326. getODCB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  72327. end;
  72328. procedure TPORTB_ODCB.setODCB12; inline;
  72329. begin
  72330. pTDefRegMap(@Self)^.&set := $00001000;
  72331. end;
  72332. procedure TPORTB_ODCB.clearODCB12; inline;
  72333. begin
  72334. pTDefRegMap(@Self)^.clr := $00001000;
  72335. end;
  72336. procedure TPORTB_ODCB.setODCB12(thebits : TBits_1); inline;
  72337. begin
  72338. if thebits = 0 then
  72339. pTDefRegMap(@Self)^.clr := $00001000
  72340. else
  72341. pTDefRegMap(@Self)^.&set := $00001000;
  72342. end;
  72343. function TPORTB_ODCB.getODCB12 : TBits_1; inline;
  72344. begin
  72345. getODCB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72346. end;
  72347. procedure TPORTB_ODCB.setODCB13; inline;
  72348. begin
  72349. pTDefRegMap(@Self)^.&set := $00002000;
  72350. end;
  72351. procedure TPORTB_ODCB.clearODCB13; inline;
  72352. begin
  72353. pTDefRegMap(@Self)^.clr := $00002000;
  72354. end;
  72355. procedure TPORTB_ODCB.setODCB13(thebits : TBits_1); inline;
  72356. begin
  72357. if thebits = 0 then
  72358. pTDefRegMap(@Self)^.clr := $00002000
  72359. else
  72360. pTDefRegMap(@Self)^.&set := $00002000;
  72361. end;
  72362. function TPORTB_ODCB.getODCB13 : TBits_1; inline;
  72363. begin
  72364. getODCB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72365. end;
  72366. procedure TPORTB_ODCB.setODCB14; inline;
  72367. begin
  72368. pTDefRegMap(@Self)^.&set := $00004000;
  72369. end;
  72370. procedure TPORTB_ODCB.clearODCB14; inline;
  72371. begin
  72372. pTDefRegMap(@Self)^.clr := $00004000;
  72373. end;
  72374. procedure TPORTB_ODCB.setODCB14(thebits : TBits_1); inline;
  72375. begin
  72376. if thebits = 0 then
  72377. pTDefRegMap(@Self)^.clr := $00004000
  72378. else
  72379. pTDefRegMap(@Self)^.&set := $00004000;
  72380. end;
  72381. function TPORTB_ODCB.getODCB14 : TBits_1; inline;
  72382. begin
  72383. getODCB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72384. end;
  72385. procedure TPORTB_ODCB.setODCB15; inline;
  72386. begin
  72387. pTDefRegMap(@Self)^.&set := $00008000;
  72388. end;
  72389. procedure TPORTB_ODCB.clearODCB15; inline;
  72390. begin
  72391. pTDefRegMap(@Self)^.clr := $00008000;
  72392. end;
  72393. procedure TPORTB_ODCB.setODCB15(thebits : TBits_1); inline;
  72394. begin
  72395. if thebits = 0 then
  72396. pTDefRegMap(@Self)^.clr := $00008000
  72397. else
  72398. pTDefRegMap(@Self)^.&set := $00008000;
  72399. end;
  72400. function TPORTB_ODCB.getODCB15 : TBits_1; inline;
  72401. begin
  72402. getODCB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72403. end;
  72404. procedure TPORTB_ODCB.setw(thebits : TBits_32); inline;
  72405. begin
  72406. pTDefRegMap(@Self)^.val := thebits;
  72407. end;
  72408. function TPORTB_ODCB.getw : TBits_32; inline;
  72409. begin
  72410. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72411. end;
  72412. procedure TPORTC_TRISC.setTRISC1; inline;
  72413. begin
  72414. pTDefRegMap(@Self)^.&set := $00000002;
  72415. end;
  72416. procedure TPORTC_TRISC.clearTRISC1; inline;
  72417. begin
  72418. pTDefRegMap(@Self)^.clr := $00000002;
  72419. end;
  72420. procedure TPORTC_TRISC.setTRISC1(thebits : TBits_1); inline;
  72421. begin
  72422. if thebits = 0 then
  72423. pTDefRegMap(@Self)^.clr := $00000002
  72424. else
  72425. pTDefRegMap(@Self)^.&set := $00000002;
  72426. end;
  72427. function TPORTC_TRISC.getTRISC1 : TBits_1; inline;
  72428. begin
  72429. getTRISC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72430. end;
  72431. procedure TPORTC_TRISC.setTRISC2; inline;
  72432. begin
  72433. pTDefRegMap(@Self)^.&set := $00000004;
  72434. end;
  72435. procedure TPORTC_TRISC.clearTRISC2; inline;
  72436. begin
  72437. pTDefRegMap(@Self)^.clr := $00000004;
  72438. end;
  72439. procedure TPORTC_TRISC.setTRISC2(thebits : TBits_1); inline;
  72440. begin
  72441. if thebits = 0 then
  72442. pTDefRegMap(@Self)^.clr := $00000004
  72443. else
  72444. pTDefRegMap(@Self)^.&set := $00000004;
  72445. end;
  72446. function TPORTC_TRISC.getTRISC2 : TBits_1; inline;
  72447. begin
  72448. getTRISC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72449. end;
  72450. procedure TPORTC_TRISC.setTRISC3; inline;
  72451. begin
  72452. pTDefRegMap(@Self)^.&set := $00000008;
  72453. end;
  72454. procedure TPORTC_TRISC.clearTRISC3; inline;
  72455. begin
  72456. pTDefRegMap(@Self)^.clr := $00000008;
  72457. end;
  72458. procedure TPORTC_TRISC.setTRISC3(thebits : TBits_1); inline;
  72459. begin
  72460. if thebits = 0 then
  72461. pTDefRegMap(@Self)^.clr := $00000008
  72462. else
  72463. pTDefRegMap(@Self)^.&set := $00000008;
  72464. end;
  72465. function TPORTC_TRISC.getTRISC3 : TBits_1; inline;
  72466. begin
  72467. getTRISC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72468. end;
  72469. procedure TPORTC_TRISC.setTRISC4; inline;
  72470. begin
  72471. pTDefRegMap(@Self)^.&set := $00000010;
  72472. end;
  72473. procedure TPORTC_TRISC.clearTRISC4; inline;
  72474. begin
  72475. pTDefRegMap(@Self)^.clr := $00000010;
  72476. end;
  72477. procedure TPORTC_TRISC.setTRISC4(thebits : TBits_1); inline;
  72478. begin
  72479. if thebits = 0 then
  72480. pTDefRegMap(@Self)^.clr := $00000010
  72481. else
  72482. pTDefRegMap(@Self)^.&set := $00000010;
  72483. end;
  72484. function TPORTC_TRISC.getTRISC4 : TBits_1; inline;
  72485. begin
  72486. getTRISC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72487. end;
  72488. procedure TPORTC_TRISC.setTRISC12; inline;
  72489. begin
  72490. pTDefRegMap(@Self)^.&set := $00001000;
  72491. end;
  72492. procedure TPORTC_TRISC.clearTRISC12; inline;
  72493. begin
  72494. pTDefRegMap(@Self)^.clr := $00001000;
  72495. end;
  72496. procedure TPORTC_TRISC.setTRISC12(thebits : TBits_1); inline;
  72497. begin
  72498. if thebits = 0 then
  72499. pTDefRegMap(@Self)^.clr := $00001000
  72500. else
  72501. pTDefRegMap(@Self)^.&set := $00001000;
  72502. end;
  72503. function TPORTC_TRISC.getTRISC12 : TBits_1; inline;
  72504. begin
  72505. getTRISC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72506. end;
  72507. procedure TPORTC_TRISC.setTRISC13; inline;
  72508. begin
  72509. pTDefRegMap(@Self)^.&set := $00002000;
  72510. end;
  72511. procedure TPORTC_TRISC.clearTRISC13; inline;
  72512. begin
  72513. pTDefRegMap(@Self)^.clr := $00002000;
  72514. end;
  72515. procedure TPORTC_TRISC.setTRISC13(thebits : TBits_1); inline;
  72516. begin
  72517. if thebits = 0 then
  72518. pTDefRegMap(@Self)^.clr := $00002000
  72519. else
  72520. pTDefRegMap(@Self)^.&set := $00002000;
  72521. end;
  72522. function TPORTC_TRISC.getTRISC13 : TBits_1; inline;
  72523. begin
  72524. getTRISC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72525. end;
  72526. procedure TPORTC_TRISC.setTRISC14; inline;
  72527. begin
  72528. pTDefRegMap(@Self)^.&set := $00004000;
  72529. end;
  72530. procedure TPORTC_TRISC.clearTRISC14; inline;
  72531. begin
  72532. pTDefRegMap(@Self)^.clr := $00004000;
  72533. end;
  72534. procedure TPORTC_TRISC.setTRISC14(thebits : TBits_1); inline;
  72535. begin
  72536. if thebits = 0 then
  72537. pTDefRegMap(@Self)^.clr := $00004000
  72538. else
  72539. pTDefRegMap(@Self)^.&set := $00004000;
  72540. end;
  72541. function TPORTC_TRISC.getTRISC14 : TBits_1; inline;
  72542. begin
  72543. getTRISC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72544. end;
  72545. procedure TPORTC_TRISC.setTRISC15; inline;
  72546. begin
  72547. pTDefRegMap(@Self)^.&set := $00008000;
  72548. end;
  72549. procedure TPORTC_TRISC.clearTRISC15; inline;
  72550. begin
  72551. pTDefRegMap(@Self)^.clr := $00008000;
  72552. end;
  72553. procedure TPORTC_TRISC.setTRISC15(thebits : TBits_1); inline;
  72554. begin
  72555. if thebits = 0 then
  72556. pTDefRegMap(@Self)^.clr := $00008000
  72557. else
  72558. pTDefRegMap(@Self)^.&set := $00008000;
  72559. end;
  72560. function TPORTC_TRISC.getTRISC15 : TBits_1; inline;
  72561. begin
  72562. getTRISC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72563. end;
  72564. procedure TPORTC_TRISC.setw(thebits : TBits_32); inline;
  72565. begin
  72566. pTDefRegMap(@Self)^.val := thebits;
  72567. end;
  72568. function TPORTC_TRISC.getw : TBits_32; inline;
  72569. begin
  72570. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72571. end;
  72572. procedure TPORTC_PORTC.setRC1; inline;
  72573. begin
  72574. pTDefRegMap(@Self)^.&set := $00000002;
  72575. end;
  72576. procedure TPORTC_PORTC.clearRC1; inline;
  72577. begin
  72578. pTDefRegMap(@Self)^.clr := $00000002;
  72579. end;
  72580. procedure TPORTC_PORTC.setRC1(thebits : TBits_1); inline;
  72581. begin
  72582. if thebits = 0 then
  72583. pTDefRegMap(@Self)^.clr := $00000002
  72584. else
  72585. pTDefRegMap(@Self)^.&set := $00000002;
  72586. end;
  72587. function TPORTC_PORTC.getRC1 : TBits_1; inline;
  72588. begin
  72589. getRC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72590. end;
  72591. procedure TPORTC_PORTC.setRC2; inline;
  72592. begin
  72593. pTDefRegMap(@Self)^.&set := $00000004;
  72594. end;
  72595. procedure TPORTC_PORTC.clearRC2; inline;
  72596. begin
  72597. pTDefRegMap(@Self)^.clr := $00000004;
  72598. end;
  72599. procedure TPORTC_PORTC.setRC2(thebits : TBits_1); inline;
  72600. begin
  72601. if thebits = 0 then
  72602. pTDefRegMap(@Self)^.clr := $00000004
  72603. else
  72604. pTDefRegMap(@Self)^.&set := $00000004;
  72605. end;
  72606. function TPORTC_PORTC.getRC2 : TBits_1; inline;
  72607. begin
  72608. getRC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72609. end;
  72610. procedure TPORTC_PORTC.setRC3; inline;
  72611. begin
  72612. pTDefRegMap(@Self)^.&set := $00000008;
  72613. end;
  72614. procedure TPORTC_PORTC.clearRC3; inline;
  72615. begin
  72616. pTDefRegMap(@Self)^.clr := $00000008;
  72617. end;
  72618. procedure TPORTC_PORTC.setRC3(thebits : TBits_1); inline;
  72619. begin
  72620. if thebits = 0 then
  72621. pTDefRegMap(@Self)^.clr := $00000008
  72622. else
  72623. pTDefRegMap(@Self)^.&set := $00000008;
  72624. end;
  72625. function TPORTC_PORTC.getRC3 : TBits_1; inline;
  72626. begin
  72627. getRC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72628. end;
  72629. procedure TPORTC_PORTC.setRC4; inline;
  72630. begin
  72631. pTDefRegMap(@Self)^.&set := $00000010;
  72632. end;
  72633. procedure TPORTC_PORTC.clearRC4; inline;
  72634. begin
  72635. pTDefRegMap(@Self)^.clr := $00000010;
  72636. end;
  72637. procedure TPORTC_PORTC.setRC4(thebits : TBits_1); inline;
  72638. begin
  72639. if thebits = 0 then
  72640. pTDefRegMap(@Self)^.clr := $00000010
  72641. else
  72642. pTDefRegMap(@Self)^.&set := $00000010;
  72643. end;
  72644. function TPORTC_PORTC.getRC4 : TBits_1; inline;
  72645. begin
  72646. getRC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72647. end;
  72648. procedure TPORTC_PORTC.setRC12; inline;
  72649. begin
  72650. pTDefRegMap(@Self)^.&set := $00001000;
  72651. end;
  72652. procedure TPORTC_PORTC.clearRC12; inline;
  72653. begin
  72654. pTDefRegMap(@Self)^.clr := $00001000;
  72655. end;
  72656. procedure TPORTC_PORTC.setRC12(thebits : TBits_1); inline;
  72657. begin
  72658. if thebits = 0 then
  72659. pTDefRegMap(@Self)^.clr := $00001000
  72660. else
  72661. pTDefRegMap(@Self)^.&set := $00001000;
  72662. end;
  72663. function TPORTC_PORTC.getRC12 : TBits_1; inline;
  72664. begin
  72665. getRC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72666. end;
  72667. procedure TPORTC_PORTC.setRC13; inline;
  72668. begin
  72669. pTDefRegMap(@Self)^.&set := $00002000;
  72670. end;
  72671. procedure TPORTC_PORTC.clearRC13; inline;
  72672. begin
  72673. pTDefRegMap(@Self)^.clr := $00002000;
  72674. end;
  72675. procedure TPORTC_PORTC.setRC13(thebits : TBits_1); inline;
  72676. begin
  72677. if thebits = 0 then
  72678. pTDefRegMap(@Self)^.clr := $00002000
  72679. else
  72680. pTDefRegMap(@Self)^.&set := $00002000;
  72681. end;
  72682. function TPORTC_PORTC.getRC13 : TBits_1; inline;
  72683. begin
  72684. getRC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72685. end;
  72686. procedure TPORTC_PORTC.setRC14; inline;
  72687. begin
  72688. pTDefRegMap(@Self)^.&set := $00004000;
  72689. end;
  72690. procedure TPORTC_PORTC.clearRC14; inline;
  72691. begin
  72692. pTDefRegMap(@Self)^.clr := $00004000;
  72693. end;
  72694. procedure TPORTC_PORTC.setRC14(thebits : TBits_1); inline;
  72695. begin
  72696. if thebits = 0 then
  72697. pTDefRegMap(@Self)^.clr := $00004000
  72698. else
  72699. pTDefRegMap(@Self)^.&set := $00004000;
  72700. end;
  72701. function TPORTC_PORTC.getRC14 : TBits_1; inline;
  72702. begin
  72703. getRC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72704. end;
  72705. procedure TPORTC_PORTC.setRC15; inline;
  72706. begin
  72707. pTDefRegMap(@Self)^.&set := $00008000;
  72708. end;
  72709. procedure TPORTC_PORTC.clearRC15; inline;
  72710. begin
  72711. pTDefRegMap(@Self)^.clr := $00008000;
  72712. end;
  72713. procedure TPORTC_PORTC.setRC15(thebits : TBits_1); inline;
  72714. begin
  72715. if thebits = 0 then
  72716. pTDefRegMap(@Self)^.clr := $00008000
  72717. else
  72718. pTDefRegMap(@Self)^.&set := $00008000;
  72719. end;
  72720. function TPORTC_PORTC.getRC15 : TBits_1; inline;
  72721. begin
  72722. getRC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72723. end;
  72724. procedure TPORTC_PORTC.setw(thebits : TBits_32); inline;
  72725. begin
  72726. pTDefRegMap(@Self)^.val := thebits;
  72727. end;
  72728. function TPORTC_PORTC.getw : TBits_32; inline;
  72729. begin
  72730. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72731. end;
  72732. procedure TPORTC_LATC.setLATC1; inline;
  72733. begin
  72734. pTDefRegMap(@Self)^.&set := $00000002;
  72735. end;
  72736. procedure TPORTC_LATC.clearLATC1; inline;
  72737. begin
  72738. pTDefRegMap(@Self)^.clr := $00000002;
  72739. end;
  72740. procedure TPORTC_LATC.setLATC1(thebits : TBits_1); inline;
  72741. begin
  72742. if thebits = 0 then
  72743. pTDefRegMap(@Self)^.clr := $00000002
  72744. else
  72745. pTDefRegMap(@Self)^.&set := $00000002;
  72746. end;
  72747. function TPORTC_LATC.getLATC1 : TBits_1; inline;
  72748. begin
  72749. getLATC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72750. end;
  72751. procedure TPORTC_LATC.setLATC2; inline;
  72752. begin
  72753. pTDefRegMap(@Self)^.&set := $00000004;
  72754. end;
  72755. procedure TPORTC_LATC.clearLATC2; inline;
  72756. begin
  72757. pTDefRegMap(@Self)^.clr := $00000004;
  72758. end;
  72759. procedure TPORTC_LATC.setLATC2(thebits : TBits_1); inline;
  72760. begin
  72761. if thebits = 0 then
  72762. pTDefRegMap(@Self)^.clr := $00000004
  72763. else
  72764. pTDefRegMap(@Self)^.&set := $00000004;
  72765. end;
  72766. function TPORTC_LATC.getLATC2 : TBits_1; inline;
  72767. begin
  72768. getLATC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72769. end;
  72770. procedure TPORTC_LATC.setLATC3; inline;
  72771. begin
  72772. pTDefRegMap(@Self)^.&set := $00000008;
  72773. end;
  72774. procedure TPORTC_LATC.clearLATC3; inline;
  72775. begin
  72776. pTDefRegMap(@Self)^.clr := $00000008;
  72777. end;
  72778. procedure TPORTC_LATC.setLATC3(thebits : TBits_1); inline;
  72779. begin
  72780. if thebits = 0 then
  72781. pTDefRegMap(@Self)^.clr := $00000008
  72782. else
  72783. pTDefRegMap(@Self)^.&set := $00000008;
  72784. end;
  72785. function TPORTC_LATC.getLATC3 : TBits_1; inline;
  72786. begin
  72787. getLATC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72788. end;
  72789. procedure TPORTC_LATC.setLATC4; inline;
  72790. begin
  72791. pTDefRegMap(@Self)^.&set := $00000010;
  72792. end;
  72793. procedure TPORTC_LATC.clearLATC4; inline;
  72794. begin
  72795. pTDefRegMap(@Self)^.clr := $00000010;
  72796. end;
  72797. procedure TPORTC_LATC.setLATC4(thebits : TBits_1); inline;
  72798. begin
  72799. if thebits = 0 then
  72800. pTDefRegMap(@Self)^.clr := $00000010
  72801. else
  72802. pTDefRegMap(@Self)^.&set := $00000010;
  72803. end;
  72804. function TPORTC_LATC.getLATC4 : TBits_1; inline;
  72805. begin
  72806. getLATC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72807. end;
  72808. procedure TPORTC_LATC.setLATC12; inline;
  72809. begin
  72810. pTDefRegMap(@Self)^.&set := $00001000;
  72811. end;
  72812. procedure TPORTC_LATC.clearLATC12; inline;
  72813. begin
  72814. pTDefRegMap(@Self)^.clr := $00001000;
  72815. end;
  72816. procedure TPORTC_LATC.setLATC12(thebits : TBits_1); inline;
  72817. begin
  72818. if thebits = 0 then
  72819. pTDefRegMap(@Self)^.clr := $00001000
  72820. else
  72821. pTDefRegMap(@Self)^.&set := $00001000;
  72822. end;
  72823. function TPORTC_LATC.getLATC12 : TBits_1; inline;
  72824. begin
  72825. getLATC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72826. end;
  72827. procedure TPORTC_LATC.setLATC13; inline;
  72828. begin
  72829. pTDefRegMap(@Self)^.&set := $00002000;
  72830. end;
  72831. procedure TPORTC_LATC.clearLATC13; inline;
  72832. begin
  72833. pTDefRegMap(@Self)^.clr := $00002000;
  72834. end;
  72835. procedure TPORTC_LATC.setLATC13(thebits : TBits_1); inline;
  72836. begin
  72837. if thebits = 0 then
  72838. pTDefRegMap(@Self)^.clr := $00002000
  72839. else
  72840. pTDefRegMap(@Self)^.&set := $00002000;
  72841. end;
  72842. function TPORTC_LATC.getLATC13 : TBits_1; inline;
  72843. begin
  72844. getLATC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72845. end;
  72846. procedure TPORTC_LATC.setLATC14; inline;
  72847. begin
  72848. pTDefRegMap(@Self)^.&set := $00004000;
  72849. end;
  72850. procedure TPORTC_LATC.clearLATC14; inline;
  72851. begin
  72852. pTDefRegMap(@Self)^.clr := $00004000;
  72853. end;
  72854. procedure TPORTC_LATC.setLATC14(thebits : TBits_1); inline;
  72855. begin
  72856. if thebits = 0 then
  72857. pTDefRegMap(@Self)^.clr := $00004000
  72858. else
  72859. pTDefRegMap(@Self)^.&set := $00004000;
  72860. end;
  72861. function TPORTC_LATC.getLATC14 : TBits_1; inline;
  72862. begin
  72863. getLATC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72864. end;
  72865. procedure TPORTC_LATC.setLATC15; inline;
  72866. begin
  72867. pTDefRegMap(@Self)^.&set := $00008000;
  72868. end;
  72869. procedure TPORTC_LATC.clearLATC15; inline;
  72870. begin
  72871. pTDefRegMap(@Self)^.clr := $00008000;
  72872. end;
  72873. procedure TPORTC_LATC.setLATC15(thebits : TBits_1); inline;
  72874. begin
  72875. if thebits = 0 then
  72876. pTDefRegMap(@Self)^.clr := $00008000
  72877. else
  72878. pTDefRegMap(@Self)^.&set := $00008000;
  72879. end;
  72880. function TPORTC_LATC.getLATC15 : TBits_1; inline;
  72881. begin
  72882. getLATC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72883. end;
  72884. procedure TPORTC_LATC.setw(thebits : TBits_32); inline;
  72885. begin
  72886. pTDefRegMap(@Self)^.val := thebits;
  72887. end;
  72888. function TPORTC_LATC.getw : TBits_32; inline;
  72889. begin
  72890. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72891. end;
  72892. procedure TPORTC_ODCC.setODCC1; inline;
  72893. begin
  72894. pTDefRegMap(@Self)^.&set := $00000002;
  72895. end;
  72896. procedure TPORTC_ODCC.clearODCC1; inline;
  72897. begin
  72898. pTDefRegMap(@Self)^.clr := $00000002;
  72899. end;
  72900. procedure TPORTC_ODCC.setODCC1(thebits : TBits_1); inline;
  72901. begin
  72902. if thebits = 0 then
  72903. pTDefRegMap(@Self)^.clr := $00000002
  72904. else
  72905. pTDefRegMap(@Self)^.&set := $00000002;
  72906. end;
  72907. function TPORTC_ODCC.getODCC1 : TBits_1; inline;
  72908. begin
  72909. getODCC1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72910. end;
  72911. procedure TPORTC_ODCC.setODCC2; inline;
  72912. begin
  72913. pTDefRegMap(@Self)^.&set := $00000004;
  72914. end;
  72915. procedure TPORTC_ODCC.clearODCC2; inline;
  72916. begin
  72917. pTDefRegMap(@Self)^.clr := $00000004;
  72918. end;
  72919. procedure TPORTC_ODCC.setODCC2(thebits : TBits_1); inline;
  72920. begin
  72921. if thebits = 0 then
  72922. pTDefRegMap(@Self)^.clr := $00000004
  72923. else
  72924. pTDefRegMap(@Self)^.&set := $00000004;
  72925. end;
  72926. function TPORTC_ODCC.getODCC2 : TBits_1; inline;
  72927. begin
  72928. getODCC2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72929. end;
  72930. procedure TPORTC_ODCC.setODCC3; inline;
  72931. begin
  72932. pTDefRegMap(@Self)^.&set := $00000008;
  72933. end;
  72934. procedure TPORTC_ODCC.clearODCC3; inline;
  72935. begin
  72936. pTDefRegMap(@Self)^.clr := $00000008;
  72937. end;
  72938. procedure TPORTC_ODCC.setODCC3(thebits : TBits_1); inline;
  72939. begin
  72940. if thebits = 0 then
  72941. pTDefRegMap(@Self)^.clr := $00000008
  72942. else
  72943. pTDefRegMap(@Self)^.&set := $00000008;
  72944. end;
  72945. function TPORTC_ODCC.getODCC3 : TBits_1; inline;
  72946. begin
  72947. getODCC3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72948. end;
  72949. procedure TPORTC_ODCC.setODCC4; inline;
  72950. begin
  72951. pTDefRegMap(@Self)^.&set := $00000010;
  72952. end;
  72953. procedure TPORTC_ODCC.clearODCC4; inline;
  72954. begin
  72955. pTDefRegMap(@Self)^.clr := $00000010;
  72956. end;
  72957. procedure TPORTC_ODCC.setODCC4(thebits : TBits_1); inline;
  72958. begin
  72959. if thebits = 0 then
  72960. pTDefRegMap(@Self)^.clr := $00000010
  72961. else
  72962. pTDefRegMap(@Self)^.&set := $00000010;
  72963. end;
  72964. function TPORTC_ODCC.getODCC4 : TBits_1; inline;
  72965. begin
  72966. getODCC4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72967. end;
  72968. procedure TPORTC_ODCC.setODCC12; inline;
  72969. begin
  72970. pTDefRegMap(@Self)^.&set := $00001000;
  72971. end;
  72972. procedure TPORTC_ODCC.clearODCC12; inline;
  72973. begin
  72974. pTDefRegMap(@Self)^.clr := $00001000;
  72975. end;
  72976. procedure TPORTC_ODCC.setODCC12(thebits : TBits_1); inline;
  72977. begin
  72978. if thebits = 0 then
  72979. pTDefRegMap(@Self)^.clr := $00001000
  72980. else
  72981. pTDefRegMap(@Self)^.&set := $00001000;
  72982. end;
  72983. function TPORTC_ODCC.getODCC12 : TBits_1; inline;
  72984. begin
  72985. getODCC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72986. end;
  72987. procedure TPORTC_ODCC.setODCC13; inline;
  72988. begin
  72989. pTDefRegMap(@Self)^.&set := $00002000;
  72990. end;
  72991. procedure TPORTC_ODCC.clearODCC13; inline;
  72992. begin
  72993. pTDefRegMap(@Self)^.clr := $00002000;
  72994. end;
  72995. procedure TPORTC_ODCC.setODCC13(thebits : TBits_1); inline;
  72996. begin
  72997. if thebits = 0 then
  72998. pTDefRegMap(@Self)^.clr := $00002000
  72999. else
  73000. pTDefRegMap(@Self)^.&set := $00002000;
  73001. end;
  73002. function TPORTC_ODCC.getODCC13 : TBits_1; inline;
  73003. begin
  73004. getODCC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73005. end;
  73006. procedure TPORTC_ODCC.setODCC14; inline;
  73007. begin
  73008. pTDefRegMap(@Self)^.&set := $00004000;
  73009. end;
  73010. procedure TPORTC_ODCC.clearODCC14; inline;
  73011. begin
  73012. pTDefRegMap(@Self)^.clr := $00004000;
  73013. end;
  73014. procedure TPORTC_ODCC.setODCC14(thebits : TBits_1); inline;
  73015. begin
  73016. if thebits = 0 then
  73017. pTDefRegMap(@Self)^.clr := $00004000
  73018. else
  73019. pTDefRegMap(@Self)^.&set := $00004000;
  73020. end;
  73021. function TPORTC_ODCC.getODCC14 : TBits_1; inline;
  73022. begin
  73023. getODCC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73024. end;
  73025. procedure TPORTC_ODCC.setODCC15; inline;
  73026. begin
  73027. pTDefRegMap(@Self)^.&set := $00008000;
  73028. end;
  73029. procedure TPORTC_ODCC.clearODCC15; inline;
  73030. begin
  73031. pTDefRegMap(@Self)^.clr := $00008000;
  73032. end;
  73033. procedure TPORTC_ODCC.setODCC15(thebits : TBits_1); inline;
  73034. begin
  73035. if thebits = 0 then
  73036. pTDefRegMap(@Self)^.clr := $00008000
  73037. else
  73038. pTDefRegMap(@Self)^.&set := $00008000;
  73039. end;
  73040. function TPORTC_ODCC.getODCC15 : TBits_1; inline;
  73041. begin
  73042. getODCC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  73043. end;
  73044. procedure TPORTC_ODCC.setw(thebits : TBits_32); inline;
  73045. begin
  73046. pTDefRegMap(@Self)^.val := thebits;
  73047. end;
  73048. function TPORTC_ODCC.getw : TBits_32; inline;
  73049. begin
  73050. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73051. end;
  73052. procedure TPORTD_TRISD.setTRISD0; inline;
  73053. begin
  73054. pTDefRegMap(@Self)^.&set := $00000001;
  73055. end;
  73056. procedure TPORTD_TRISD.clearTRISD0; inline;
  73057. begin
  73058. pTDefRegMap(@Self)^.clr := $00000001;
  73059. end;
  73060. procedure TPORTD_TRISD.setTRISD0(thebits : TBits_1); inline;
  73061. begin
  73062. if thebits = 0 then
  73063. pTDefRegMap(@Self)^.clr := $00000001
  73064. else
  73065. pTDefRegMap(@Self)^.&set := $00000001;
  73066. end;
  73067. function TPORTD_TRISD.getTRISD0 : TBits_1; inline;
  73068. begin
  73069. getTRISD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73070. end;
  73071. procedure TPORTD_TRISD.setTRISD1; inline;
  73072. begin
  73073. pTDefRegMap(@Self)^.&set := $00000002;
  73074. end;
  73075. procedure TPORTD_TRISD.clearTRISD1; inline;
  73076. begin
  73077. pTDefRegMap(@Self)^.clr := $00000002;
  73078. end;
  73079. procedure TPORTD_TRISD.setTRISD1(thebits : TBits_1); inline;
  73080. begin
  73081. if thebits = 0 then
  73082. pTDefRegMap(@Self)^.clr := $00000002
  73083. else
  73084. pTDefRegMap(@Self)^.&set := $00000002;
  73085. end;
  73086. function TPORTD_TRISD.getTRISD1 : TBits_1; inline;
  73087. begin
  73088. getTRISD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73089. end;
  73090. procedure TPORTD_TRISD.setTRISD2; inline;
  73091. begin
  73092. pTDefRegMap(@Self)^.&set := $00000004;
  73093. end;
  73094. procedure TPORTD_TRISD.clearTRISD2; inline;
  73095. begin
  73096. pTDefRegMap(@Self)^.clr := $00000004;
  73097. end;
  73098. procedure TPORTD_TRISD.setTRISD2(thebits : TBits_1); inline;
  73099. begin
  73100. if thebits = 0 then
  73101. pTDefRegMap(@Self)^.clr := $00000004
  73102. else
  73103. pTDefRegMap(@Self)^.&set := $00000004;
  73104. end;
  73105. function TPORTD_TRISD.getTRISD2 : TBits_1; inline;
  73106. begin
  73107. getTRISD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73108. end;
  73109. procedure TPORTD_TRISD.setTRISD3; inline;
  73110. begin
  73111. pTDefRegMap(@Self)^.&set := $00000008;
  73112. end;
  73113. procedure TPORTD_TRISD.clearTRISD3; inline;
  73114. begin
  73115. pTDefRegMap(@Self)^.clr := $00000008;
  73116. end;
  73117. procedure TPORTD_TRISD.setTRISD3(thebits : TBits_1); inline;
  73118. begin
  73119. if thebits = 0 then
  73120. pTDefRegMap(@Self)^.clr := $00000008
  73121. else
  73122. pTDefRegMap(@Self)^.&set := $00000008;
  73123. end;
  73124. function TPORTD_TRISD.getTRISD3 : TBits_1; inline;
  73125. begin
  73126. getTRISD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73127. end;
  73128. procedure TPORTD_TRISD.setTRISD4; inline;
  73129. begin
  73130. pTDefRegMap(@Self)^.&set := $00000010;
  73131. end;
  73132. procedure TPORTD_TRISD.clearTRISD4; inline;
  73133. begin
  73134. pTDefRegMap(@Self)^.clr := $00000010;
  73135. end;
  73136. procedure TPORTD_TRISD.setTRISD4(thebits : TBits_1); inline;
  73137. begin
  73138. if thebits = 0 then
  73139. pTDefRegMap(@Self)^.clr := $00000010
  73140. else
  73141. pTDefRegMap(@Self)^.&set := $00000010;
  73142. end;
  73143. function TPORTD_TRISD.getTRISD4 : TBits_1; inline;
  73144. begin
  73145. getTRISD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73146. end;
  73147. procedure TPORTD_TRISD.setTRISD5; inline;
  73148. begin
  73149. pTDefRegMap(@Self)^.&set := $00000020;
  73150. end;
  73151. procedure TPORTD_TRISD.clearTRISD5; inline;
  73152. begin
  73153. pTDefRegMap(@Self)^.clr := $00000020;
  73154. end;
  73155. procedure TPORTD_TRISD.setTRISD5(thebits : TBits_1); inline;
  73156. begin
  73157. if thebits = 0 then
  73158. pTDefRegMap(@Self)^.clr := $00000020
  73159. else
  73160. pTDefRegMap(@Self)^.&set := $00000020;
  73161. end;
  73162. function TPORTD_TRISD.getTRISD5 : TBits_1; inline;
  73163. begin
  73164. getTRISD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73165. end;
  73166. procedure TPORTD_TRISD.setTRISD6; inline;
  73167. begin
  73168. pTDefRegMap(@Self)^.&set := $00000040;
  73169. end;
  73170. procedure TPORTD_TRISD.clearTRISD6; inline;
  73171. begin
  73172. pTDefRegMap(@Self)^.clr := $00000040;
  73173. end;
  73174. procedure TPORTD_TRISD.setTRISD6(thebits : TBits_1); inline;
  73175. begin
  73176. if thebits = 0 then
  73177. pTDefRegMap(@Self)^.clr := $00000040
  73178. else
  73179. pTDefRegMap(@Self)^.&set := $00000040;
  73180. end;
  73181. function TPORTD_TRISD.getTRISD6 : TBits_1; inline;
  73182. begin
  73183. getTRISD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73184. end;
  73185. procedure TPORTD_TRISD.setTRISD7; inline;
  73186. begin
  73187. pTDefRegMap(@Self)^.&set := $00000080;
  73188. end;
  73189. procedure TPORTD_TRISD.clearTRISD7; inline;
  73190. begin
  73191. pTDefRegMap(@Self)^.clr := $00000080;
  73192. end;
  73193. procedure TPORTD_TRISD.setTRISD7(thebits : TBits_1); inline;
  73194. begin
  73195. if thebits = 0 then
  73196. pTDefRegMap(@Self)^.clr := $00000080
  73197. else
  73198. pTDefRegMap(@Self)^.&set := $00000080;
  73199. end;
  73200. function TPORTD_TRISD.getTRISD7 : TBits_1; inline;
  73201. begin
  73202. getTRISD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73203. end;
  73204. procedure TPORTD_TRISD.setTRISD8; inline;
  73205. begin
  73206. pTDefRegMap(@Self)^.&set := $00000100;
  73207. end;
  73208. procedure TPORTD_TRISD.clearTRISD8; inline;
  73209. begin
  73210. pTDefRegMap(@Self)^.clr := $00000100;
  73211. end;
  73212. procedure TPORTD_TRISD.setTRISD8(thebits : TBits_1); inline;
  73213. begin
  73214. if thebits = 0 then
  73215. pTDefRegMap(@Self)^.clr := $00000100
  73216. else
  73217. pTDefRegMap(@Self)^.&set := $00000100;
  73218. end;
  73219. function TPORTD_TRISD.getTRISD8 : TBits_1; inline;
  73220. begin
  73221. getTRISD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73222. end;
  73223. procedure TPORTD_TRISD.setTRISD9; inline;
  73224. begin
  73225. pTDefRegMap(@Self)^.&set := $00000200;
  73226. end;
  73227. procedure TPORTD_TRISD.clearTRISD9; inline;
  73228. begin
  73229. pTDefRegMap(@Self)^.clr := $00000200;
  73230. end;
  73231. procedure TPORTD_TRISD.setTRISD9(thebits : TBits_1); inline;
  73232. begin
  73233. if thebits = 0 then
  73234. pTDefRegMap(@Self)^.clr := $00000200
  73235. else
  73236. pTDefRegMap(@Self)^.&set := $00000200;
  73237. end;
  73238. function TPORTD_TRISD.getTRISD9 : TBits_1; inline;
  73239. begin
  73240. getTRISD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73241. end;
  73242. procedure TPORTD_TRISD.setTRISD10; inline;
  73243. begin
  73244. pTDefRegMap(@Self)^.&set := $00000400;
  73245. end;
  73246. procedure TPORTD_TRISD.clearTRISD10; inline;
  73247. begin
  73248. pTDefRegMap(@Self)^.clr := $00000400;
  73249. end;
  73250. procedure TPORTD_TRISD.setTRISD10(thebits : TBits_1); inline;
  73251. begin
  73252. if thebits = 0 then
  73253. pTDefRegMap(@Self)^.clr := $00000400
  73254. else
  73255. pTDefRegMap(@Self)^.&set := $00000400;
  73256. end;
  73257. function TPORTD_TRISD.getTRISD10 : TBits_1; inline;
  73258. begin
  73259. getTRISD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73260. end;
  73261. procedure TPORTD_TRISD.setTRISD11; inline;
  73262. begin
  73263. pTDefRegMap(@Self)^.&set := $00000800;
  73264. end;
  73265. procedure TPORTD_TRISD.clearTRISD11; inline;
  73266. begin
  73267. pTDefRegMap(@Self)^.clr := $00000800;
  73268. end;
  73269. procedure TPORTD_TRISD.setTRISD11(thebits : TBits_1); inline;
  73270. begin
  73271. if thebits = 0 then
  73272. pTDefRegMap(@Self)^.clr := $00000800
  73273. else
  73274. pTDefRegMap(@Self)^.&set := $00000800;
  73275. end;
  73276. function TPORTD_TRISD.getTRISD11 : TBits_1; inline;
  73277. begin
  73278. getTRISD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  73279. end;
  73280. procedure TPORTD_TRISD.setTRISD12; inline;
  73281. begin
  73282. pTDefRegMap(@Self)^.&set := $00001000;
  73283. end;
  73284. procedure TPORTD_TRISD.clearTRISD12; inline;
  73285. begin
  73286. pTDefRegMap(@Self)^.clr := $00001000;
  73287. end;
  73288. procedure TPORTD_TRISD.setTRISD12(thebits : TBits_1); inline;
  73289. begin
  73290. if thebits = 0 then
  73291. pTDefRegMap(@Self)^.clr := $00001000
  73292. else
  73293. pTDefRegMap(@Self)^.&set := $00001000;
  73294. end;
  73295. function TPORTD_TRISD.getTRISD12 : TBits_1; inline;
  73296. begin
  73297. getTRISD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73298. end;
  73299. procedure TPORTD_TRISD.setTRISD13; inline;
  73300. begin
  73301. pTDefRegMap(@Self)^.&set := $00002000;
  73302. end;
  73303. procedure TPORTD_TRISD.clearTRISD13; inline;
  73304. begin
  73305. pTDefRegMap(@Self)^.clr := $00002000;
  73306. end;
  73307. procedure TPORTD_TRISD.setTRISD13(thebits : TBits_1); inline;
  73308. begin
  73309. if thebits = 0 then
  73310. pTDefRegMap(@Self)^.clr := $00002000
  73311. else
  73312. pTDefRegMap(@Self)^.&set := $00002000;
  73313. end;
  73314. function TPORTD_TRISD.getTRISD13 : TBits_1; inline;
  73315. begin
  73316. getTRISD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73317. end;
  73318. procedure TPORTD_TRISD.setTRISD14; inline;
  73319. begin
  73320. pTDefRegMap(@Self)^.&set := $00004000;
  73321. end;
  73322. procedure TPORTD_TRISD.clearTRISD14; inline;
  73323. begin
  73324. pTDefRegMap(@Self)^.clr := $00004000;
  73325. end;
  73326. procedure TPORTD_TRISD.setTRISD14(thebits : TBits_1); inline;
  73327. begin
  73328. if thebits = 0 then
  73329. pTDefRegMap(@Self)^.clr := $00004000
  73330. else
  73331. pTDefRegMap(@Self)^.&set := $00004000;
  73332. end;
  73333. function TPORTD_TRISD.getTRISD14 : TBits_1; inline;
  73334. begin
  73335. getTRISD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73336. end;
  73337. procedure TPORTD_TRISD.setTRISD15; inline;
  73338. begin
  73339. pTDefRegMap(@Self)^.&set := $00008000;
  73340. end;
  73341. procedure TPORTD_TRISD.clearTRISD15; inline;
  73342. begin
  73343. pTDefRegMap(@Self)^.clr := $00008000;
  73344. end;
  73345. procedure TPORTD_TRISD.setTRISD15(thebits : TBits_1); inline;
  73346. begin
  73347. if thebits = 0 then
  73348. pTDefRegMap(@Self)^.clr := $00008000
  73349. else
  73350. pTDefRegMap(@Self)^.&set := $00008000;
  73351. end;
  73352. function TPORTD_TRISD.getTRISD15 : TBits_1; inline;
  73353. begin
  73354. getTRISD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  73355. end;
  73356. procedure TPORTD_TRISD.setw(thebits : TBits_32); inline;
  73357. begin
  73358. pTDefRegMap(@Self)^.val := thebits;
  73359. end;
  73360. function TPORTD_TRISD.getw : TBits_32; inline;
  73361. begin
  73362. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73363. end;
  73364. procedure TPORTD_PORTD.setRD0; inline;
  73365. begin
  73366. pTDefRegMap(@Self)^.&set := $00000001;
  73367. end;
  73368. procedure TPORTD_PORTD.clearRD0; inline;
  73369. begin
  73370. pTDefRegMap(@Self)^.clr := $00000001;
  73371. end;
  73372. procedure TPORTD_PORTD.setRD0(thebits : TBits_1); inline;
  73373. begin
  73374. if thebits = 0 then
  73375. pTDefRegMap(@Self)^.clr := $00000001
  73376. else
  73377. pTDefRegMap(@Self)^.&set := $00000001;
  73378. end;
  73379. function TPORTD_PORTD.getRD0 : TBits_1; inline;
  73380. begin
  73381. getRD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73382. end;
  73383. procedure TPORTD_PORTD.setRD1; inline;
  73384. begin
  73385. pTDefRegMap(@Self)^.&set := $00000002;
  73386. end;
  73387. procedure TPORTD_PORTD.clearRD1; inline;
  73388. begin
  73389. pTDefRegMap(@Self)^.clr := $00000002;
  73390. end;
  73391. procedure TPORTD_PORTD.setRD1(thebits : TBits_1); inline;
  73392. begin
  73393. if thebits = 0 then
  73394. pTDefRegMap(@Self)^.clr := $00000002
  73395. else
  73396. pTDefRegMap(@Self)^.&set := $00000002;
  73397. end;
  73398. function TPORTD_PORTD.getRD1 : TBits_1; inline;
  73399. begin
  73400. getRD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73401. end;
  73402. procedure TPORTD_PORTD.setRD2; inline;
  73403. begin
  73404. pTDefRegMap(@Self)^.&set := $00000004;
  73405. end;
  73406. procedure TPORTD_PORTD.clearRD2; inline;
  73407. begin
  73408. pTDefRegMap(@Self)^.clr := $00000004;
  73409. end;
  73410. procedure TPORTD_PORTD.setRD2(thebits : TBits_1); inline;
  73411. begin
  73412. if thebits = 0 then
  73413. pTDefRegMap(@Self)^.clr := $00000004
  73414. else
  73415. pTDefRegMap(@Self)^.&set := $00000004;
  73416. end;
  73417. function TPORTD_PORTD.getRD2 : TBits_1; inline;
  73418. begin
  73419. getRD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73420. end;
  73421. procedure TPORTD_PORTD.setRD3; inline;
  73422. begin
  73423. pTDefRegMap(@Self)^.&set := $00000008;
  73424. end;
  73425. procedure TPORTD_PORTD.clearRD3; inline;
  73426. begin
  73427. pTDefRegMap(@Self)^.clr := $00000008;
  73428. end;
  73429. procedure TPORTD_PORTD.setRD3(thebits : TBits_1); inline;
  73430. begin
  73431. if thebits = 0 then
  73432. pTDefRegMap(@Self)^.clr := $00000008
  73433. else
  73434. pTDefRegMap(@Self)^.&set := $00000008;
  73435. end;
  73436. function TPORTD_PORTD.getRD3 : TBits_1; inline;
  73437. begin
  73438. getRD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73439. end;
  73440. procedure TPORTD_PORTD.setRD4; inline;
  73441. begin
  73442. pTDefRegMap(@Self)^.&set := $00000010;
  73443. end;
  73444. procedure TPORTD_PORTD.clearRD4; inline;
  73445. begin
  73446. pTDefRegMap(@Self)^.clr := $00000010;
  73447. end;
  73448. procedure TPORTD_PORTD.setRD4(thebits : TBits_1); inline;
  73449. begin
  73450. if thebits = 0 then
  73451. pTDefRegMap(@Self)^.clr := $00000010
  73452. else
  73453. pTDefRegMap(@Self)^.&set := $00000010;
  73454. end;
  73455. function TPORTD_PORTD.getRD4 : TBits_1; inline;
  73456. begin
  73457. getRD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73458. end;
  73459. procedure TPORTD_PORTD.setRD5; inline;
  73460. begin
  73461. pTDefRegMap(@Self)^.&set := $00000020;
  73462. end;
  73463. procedure TPORTD_PORTD.clearRD5; inline;
  73464. begin
  73465. pTDefRegMap(@Self)^.clr := $00000020;
  73466. end;
  73467. procedure TPORTD_PORTD.setRD5(thebits : TBits_1); inline;
  73468. begin
  73469. if thebits = 0 then
  73470. pTDefRegMap(@Self)^.clr := $00000020
  73471. else
  73472. pTDefRegMap(@Self)^.&set := $00000020;
  73473. end;
  73474. function TPORTD_PORTD.getRD5 : TBits_1; inline;
  73475. begin
  73476. getRD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73477. end;
  73478. procedure TPORTD_PORTD.setRD6; inline;
  73479. begin
  73480. pTDefRegMap(@Self)^.&set := $00000040;
  73481. end;
  73482. procedure TPORTD_PORTD.clearRD6; inline;
  73483. begin
  73484. pTDefRegMap(@Self)^.clr := $00000040;
  73485. end;
  73486. procedure TPORTD_PORTD.setRD6(thebits : TBits_1); inline;
  73487. begin
  73488. if thebits = 0 then
  73489. pTDefRegMap(@Self)^.clr := $00000040
  73490. else
  73491. pTDefRegMap(@Self)^.&set := $00000040;
  73492. end;
  73493. function TPORTD_PORTD.getRD6 : TBits_1; inline;
  73494. begin
  73495. getRD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73496. end;
  73497. procedure TPORTD_PORTD.setRD7; inline;
  73498. begin
  73499. pTDefRegMap(@Self)^.&set := $00000080;
  73500. end;
  73501. procedure TPORTD_PORTD.clearRD7; inline;
  73502. begin
  73503. pTDefRegMap(@Self)^.clr := $00000080;
  73504. end;
  73505. procedure TPORTD_PORTD.setRD7(thebits : TBits_1); inline;
  73506. begin
  73507. if thebits = 0 then
  73508. pTDefRegMap(@Self)^.clr := $00000080
  73509. else
  73510. pTDefRegMap(@Self)^.&set := $00000080;
  73511. end;
  73512. function TPORTD_PORTD.getRD7 : TBits_1; inline;
  73513. begin
  73514. getRD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73515. end;
  73516. procedure TPORTD_PORTD.setRD8; inline;
  73517. begin
  73518. pTDefRegMap(@Self)^.&set := $00000100;
  73519. end;
  73520. procedure TPORTD_PORTD.clearRD8; inline;
  73521. begin
  73522. pTDefRegMap(@Self)^.clr := $00000100;
  73523. end;
  73524. procedure TPORTD_PORTD.setRD8(thebits : TBits_1); inline;
  73525. begin
  73526. if thebits = 0 then
  73527. pTDefRegMap(@Self)^.clr := $00000100
  73528. else
  73529. pTDefRegMap(@Self)^.&set := $00000100;
  73530. end;
  73531. function TPORTD_PORTD.getRD8 : TBits_1; inline;
  73532. begin
  73533. getRD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73534. end;
  73535. procedure TPORTD_PORTD.setRD9; inline;
  73536. begin
  73537. pTDefRegMap(@Self)^.&set := $00000200;
  73538. end;
  73539. procedure TPORTD_PORTD.clearRD9; inline;
  73540. begin
  73541. pTDefRegMap(@Self)^.clr := $00000200;
  73542. end;
  73543. procedure TPORTD_PORTD.setRD9(thebits : TBits_1); inline;
  73544. begin
  73545. if thebits = 0 then
  73546. pTDefRegMap(@Self)^.clr := $00000200
  73547. else
  73548. pTDefRegMap(@Self)^.&set := $00000200;
  73549. end;
  73550. function TPORTD_PORTD.getRD9 : TBits_1; inline;
  73551. begin
  73552. getRD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73553. end;
  73554. procedure TPORTD_PORTD.setRD10; inline;
  73555. begin
  73556. pTDefRegMap(@Self)^.&set := $00000400;
  73557. end;
  73558. procedure TPORTD_PORTD.clearRD10; inline;
  73559. begin
  73560. pTDefRegMap(@Self)^.clr := $00000400;
  73561. end;
  73562. procedure TPORTD_PORTD.setRD10(thebits : TBits_1); inline;
  73563. begin
  73564. if thebits = 0 then
  73565. pTDefRegMap(@Self)^.clr := $00000400
  73566. else
  73567. pTDefRegMap(@Self)^.&set := $00000400;
  73568. end;
  73569. function TPORTD_PORTD.getRD10 : TBits_1; inline;
  73570. begin
  73571. getRD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73572. end;
  73573. procedure TPORTD_PORTD.setRD11; inline;
  73574. begin
  73575. pTDefRegMap(@Self)^.&set := $00000800;
  73576. end;
  73577. procedure TPORTD_PORTD.clearRD11; inline;
  73578. begin
  73579. pTDefRegMap(@Self)^.clr := $00000800;
  73580. end;
  73581. procedure TPORTD_PORTD.setRD11(thebits : TBits_1); inline;
  73582. begin
  73583. if thebits = 0 then
  73584. pTDefRegMap(@Self)^.clr := $00000800
  73585. else
  73586. pTDefRegMap(@Self)^.&set := $00000800;
  73587. end;
  73588. function TPORTD_PORTD.getRD11 : TBits_1; inline;
  73589. begin
  73590. getRD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  73591. end;
  73592. procedure TPORTD_PORTD.setRD12; inline;
  73593. begin
  73594. pTDefRegMap(@Self)^.&set := $00001000;
  73595. end;
  73596. procedure TPORTD_PORTD.clearRD12; inline;
  73597. begin
  73598. pTDefRegMap(@Self)^.clr := $00001000;
  73599. end;
  73600. procedure TPORTD_PORTD.setRD12(thebits : TBits_1); inline;
  73601. begin
  73602. if thebits = 0 then
  73603. pTDefRegMap(@Self)^.clr := $00001000
  73604. else
  73605. pTDefRegMap(@Self)^.&set := $00001000;
  73606. end;
  73607. function TPORTD_PORTD.getRD12 : TBits_1; inline;
  73608. begin
  73609. getRD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73610. end;
  73611. procedure TPORTD_PORTD.setRD13; inline;
  73612. begin
  73613. pTDefRegMap(@Self)^.&set := $00002000;
  73614. end;
  73615. procedure TPORTD_PORTD.clearRD13; inline;
  73616. begin
  73617. pTDefRegMap(@Self)^.clr := $00002000;
  73618. end;
  73619. procedure TPORTD_PORTD.setRD13(thebits : TBits_1); inline;
  73620. begin
  73621. if thebits = 0 then
  73622. pTDefRegMap(@Self)^.clr := $00002000
  73623. else
  73624. pTDefRegMap(@Self)^.&set := $00002000;
  73625. end;
  73626. function TPORTD_PORTD.getRD13 : TBits_1; inline;
  73627. begin
  73628. getRD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73629. end;
  73630. procedure TPORTD_PORTD.setRD14; inline;
  73631. begin
  73632. pTDefRegMap(@Self)^.&set := $00004000;
  73633. end;
  73634. procedure TPORTD_PORTD.clearRD14; inline;
  73635. begin
  73636. pTDefRegMap(@Self)^.clr := $00004000;
  73637. end;
  73638. procedure TPORTD_PORTD.setRD14(thebits : TBits_1); inline;
  73639. begin
  73640. if thebits = 0 then
  73641. pTDefRegMap(@Self)^.clr := $00004000
  73642. else
  73643. pTDefRegMap(@Self)^.&set := $00004000;
  73644. end;
  73645. function TPORTD_PORTD.getRD14 : TBits_1; inline;
  73646. begin
  73647. getRD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73648. end;
  73649. procedure TPORTD_PORTD.setRD15; inline;
  73650. begin
  73651. pTDefRegMap(@Self)^.&set := $00008000;
  73652. end;
  73653. procedure TPORTD_PORTD.clearRD15; inline;
  73654. begin
  73655. pTDefRegMap(@Self)^.clr := $00008000;
  73656. end;
  73657. procedure TPORTD_PORTD.setRD15(thebits : TBits_1); inline;
  73658. begin
  73659. if thebits = 0 then
  73660. pTDefRegMap(@Self)^.clr := $00008000
  73661. else
  73662. pTDefRegMap(@Self)^.&set := $00008000;
  73663. end;
  73664. function TPORTD_PORTD.getRD15 : TBits_1; inline;
  73665. begin
  73666. getRD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  73667. end;
  73668. procedure TPORTD_PORTD.setw(thebits : TBits_32); inline;
  73669. begin
  73670. pTDefRegMap(@Self)^.val := thebits;
  73671. end;
  73672. function TPORTD_PORTD.getw : TBits_32; inline;
  73673. begin
  73674. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73675. end;
  73676. procedure TPORTD_LATD.setLATD0; inline;
  73677. begin
  73678. pTDefRegMap(@Self)^.&set := $00000001;
  73679. end;
  73680. procedure TPORTD_LATD.clearLATD0; inline;
  73681. begin
  73682. pTDefRegMap(@Self)^.clr := $00000001;
  73683. end;
  73684. procedure TPORTD_LATD.setLATD0(thebits : TBits_1); inline;
  73685. begin
  73686. if thebits = 0 then
  73687. pTDefRegMap(@Self)^.clr := $00000001
  73688. else
  73689. pTDefRegMap(@Self)^.&set := $00000001;
  73690. end;
  73691. function TPORTD_LATD.getLATD0 : TBits_1; inline;
  73692. begin
  73693. getLATD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73694. end;
  73695. procedure TPORTD_LATD.setLATD1; inline;
  73696. begin
  73697. pTDefRegMap(@Self)^.&set := $00000002;
  73698. end;
  73699. procedure TPORTD_LATD.clearLATD1; inline;
  73700. begin
  73701. pTDefRegMap(@Self)^.clr := $00000002;
  73702. end;
  73703. procedure TPORTD_LATD.setLATD1(thebits : TBits_1); inline;
  73704. begin
  73705. if thebits = 0 then
  73706. pTDefRegMap(@Self)^.clr := $00000002
  73707. else
  73708. pTDefRegMap(@Self)^.&set := $00000002;
  73709. end;
  73710. function TPORTD_LATD.getLATD1 : TBits_1; inline;
  73711. begin
  73712. getLATD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73713. end;
  73714. procedure TPORTD_LATD.setLATD2; inline;
  73715. begin
  73716. pTDefRegMap(@Self)^.&set := $00000004;
  73717. end;
  73718. procedure TPORTD_LATD.clearLATD2; inline;
  73719. begin
  73720. pTDefRegMap(@Self)^.clr := $00000004;
  73721. end;
  73722. procedure TPORTD_LATD.setLATD2(thebits : TBits_1); inline;
  73723. begin
  73724. if thebits = 0 then
  73725. pTDefRegMap(@Self)^.clr := $00000004
  73726. else
  73727. pTDefRegMap(@Self)^.&set := $00000004;
  73728. end;
  73729. function TPORTD_LATD.getLATD2 : TBits_1; inline;
  73730. begin
  73731. getLATD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73732. end;
  73733. procedure TPORTD_LATD.setLATD3; inline;
  73734. begin
  73735. pTDefRegMap(@Self)^.&set := $00000008;
  73736. end;
  73737. procedure TPORTD_LATD.clearLATD3; inline;
  73738. begin
  73739. pTDefRegMap(@Self)^.clr := $00000008;
  73740. end;
  73741. procedure TPORTD_LATD.setLATD3(thebits : TBits_1); inline;
  73742. begin
  73743. if thebits = 0 then
  73744. pTDefRegMap(@Self)^.clr := $00000008
  73745. else
  73746. pTDefRegMap(@Self)^.&set := $00000008;
  73747. end;
  73748. function TPORTD_LATD.getLATD3 : TBits_1; inline;
  73749. begin
  73750. getLATD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73751. end;
  73752. procedure TPORTD_LATD.setLATD4; inline;
  73753. begin
  73754. pTDefRegMap(@Self)^.&set := $00000010;
  73755. end;
  73756. procedure TPORTD_LATD.clearLATD4; inline;
  73757. begin
  73758. pTDefRegMap(@Self)^.clr := $00000010;
  73759. end;
  73760. procedure TPORTD_LATD.setLATD4(thebits : TBits_1); inline;
  73761. begin
  73762. if thebits = 0 then
  73763. pTDefRegMap(@Self)^.clr := $00000010
  73764. else
  73765. pTDefRegMap(@Self)^.&set := $00000010;
  73766. end;
  73767. function TPORTD_LATD.getLATD4 : TBits_1; inline;
  73768. begin
  73769. getLATD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73770. end;
  73771. procedure TPORTD_LATD.setLATD5; inline;
  73772. begin
  73773. pTDefRegMap(@Self)^.&set := $00000020;
  73774. end;
  73775. procedure TPORTD_LATD.clearLATD5; inline;
  73776. begin
  73777. pTDefRegMap(@Self)^.clr := $00000020;
  73778. end;
  73779. procedure TPORTD_LATD.setLATD5(thebits : TBits_1); inline;
  73780. begin
  73781. if thebits = 0 then
  73782. pTDefRegMap(@Self)^.clr := $00000020
  73783. else
  73784. pTDefRegMap(@Self)^.&set := $00000020;
  73785. end;
  73786. function TPORTD_LATD.getLATD5 : TBits_1; inline;
  73787. begin
  73788. getLATD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73789. end;
  73790. procedure TPORTD_LATD.setLATD6; inline;
  73791. begin
  73792. pTDefRegMap(@Self)^.&set := $00000040;
  73793. end;
  73794. procedure TPORTD_LATD.clearLATD6; inline;
  73795. begin
  73796. pTDefRegMap(@Self)^.clr := $00000040;
  73797. end;
  73798. procedure TPORTD_LATD.setLATD6(thebits : TBits_1); inline;
  73799. begin
  73800. if thebits = 0 then
  73801. pTDefRegMap(@Self)^.clr := $00000040
  73802. else
  73803. pTDefRegMap(@Self)^.&set := $00000040;
  73804. end;
  73805. function TPORTD_LATD.getLATD6 : TBits_1; inline;
  73806. begin
  73807. getLATD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73808. end;
  73809. procedure TPORTD_LATD.setLATD7; inline;
  73810. begin
  73811. pTDefRegMap(@Self)^.&set := $00000080;
  73812. end;
  73813. procedure TPORTD_LATD.clearLATD7; inline;
  73814. begin
  73815. pTDefRegMap(@Self)^.clr := $00000080;
  73816. end;
  73817. procedure TPORTD_LATD.setLATD7(thebits : TBits_1); inline;
  73818. begin
  73819. if thebits = 0 then
  73820. pTDefRegMap(@Self)^.clr := $00000080
  73821. else
  73822. pTDefRegMap(@Self)^.&set := $00000080;
  73823. end;
  73824. function TPORTD_LATD.getLATD7 : TBits_1; inline;
  73825. begin
  73826. getLATD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73827. end;
  73828. procedure TPORTD_LATD.setLATD8; inline;
  73829. begin
  73830. pTDefRegMap(@Self)^.&set := $00000100;
  73831. end;
  73832. procedure TPORTD_LATD.clearLATD8; inline;
  73833. begin
  73834. pTDefRegMap(@Self)^.clr := $00000100;
  73835. end;
  73836. procedure TPORTD_LATD.setLATD8(thebits : TBits_1); inline;
  73837. begin
  73838. if thebits = 0 then
  73839. pTDefRegMap(@Self)^.clr := $00000100
  73840. else
  73841. pTDefRegMap(@Self)^.&set := $00000100;
  73842. end;
  73843. function TPORTD_LATD.getLATD8 : TBits_1; inline;
  73844. begin
  73845. getLATD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73846. end;
  73847. procedure TPORTD_LATD.setLATD9; inline;
  73848. begin
  73849. pTDefRegMap(@Self)^.&set := $00000200;
  73850. end;
  73851. procedure TPORTD_LATD.clearLATD9; inline;
  73852. begin
  73853. pTDefRegMap(@Self)^.clr := $00000200;
  73854. end;
  73855. procedure TPORTD_LATD.setLATD9(thebits : TBits_1); inline;
  73856. begin
  73857. if thebits = 0 then
  73858. pTDefRegMap(@Self)^.clr := $00000200
  73859. else
  73860. pTDefRegMap(@Self)^.&set := $00000200;
  73861. end;
  73862. function TPORTD_LATD.getLATD9 : TBits_1; inline;
  73863. begin
  73864. getLATD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73865. end;
  73866. procedure TPORTD_LATD.setLATD10; inline;
  73867. begin
  73868. pTDefRegMap(@Self)^.&set := $00000400;
  73869. end;
  73870. procedure TPORTD_LATD.clearLATD10; inline;
  73871. begin
  73872. pTDefRegMap(@Self)^.clr := $00000400;
  73873. end;
  73874. procedure TPORTD_LATD.setLATD10(thebits : TBits_1); inline;
  73875. begin
  73876. if thebits = 0 then
  73877. pTDefRegMap(@Self)^.clr := $00000400
  73878. else
  73879. pTDefRegMap(@Self)^.&set := $00000400;
  73880. end;
  73881. function TPORTD_LATD.getLATD10 : TBits_1; inline;
  73882. begin
  73883. getLATD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73884. end;
  73885. procedure TPORTD_LATD.setLATD11; inline;
  73886. begin
  73887. pTDefRegMap(@Self)^.&set := $00000800;
  73888. end;
  73889. procedure TPORTD_LATD.clearLATD11; inline;
  73890. begin
  73891. pTDefRegMap(@Self)^.clr := $00000800;
  73892. end;
  73893. procedure TPORTD_LATD.setLATD11(thebits : TBits_1); inline;
  73894. begin
  73895. if thebits = 0 then
  73896. pTDefRegMap(@Self)^.clr := $00000800
  73897. else
  73898. pTDefRegMap(@Self)^.&set := $00000800;
  73899. end;
  73900. function TPORTD_LATD.getLATD11 : TBits_1; inline;
  73901. begin
  73902. getLATD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  73903. end;
  73904. procedure TPORTD_LATD.setLATD12; inline;
  73905. begin
  73906. pTDefRegMap(@Self)^.&set := $00001000;
  73907. end;
  73908. procedure TPORTD_LATD.clearLATD12; inline;
  73909. begin
  73910. pTDefRegMap(@Self)^.clr := $00001000;
  73911. end;
  73912. procedure TPORTD_LATD.setLATD12(thebits : TBits_1); inline;
  73913. begin
  73914. if thebits = 0 then
  73915. pTDefRegMap(@Self)^.clr := $00001000
  73916. else
  73917. pTDefRegMap(@Self)^.&set := $00001000;
  73918. end;
  73919. function TPORTD_LATD.getLATD12 : TBits_1; inline;
  73920. begin
  73921. getLATD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  73922. end;
  73923. procedure TPORTD_LATD.setLATD13; inline;
  73924. begin
  73925. pTDefRegMap(@Self)^.&set := $00002000;
  73926. end;
  73927. procedure TPORTD_LATD.clearLATD13; inline;
  73928. begin
  73929. pTDefRegMap(@Self)^.clr := $00002000;
  73930. end;
  73931. procedure TPORTD_LATD.setLATD13(thebits : TBits_1); inline;
  73932. begin
  73933. if thebits = 0 then
  73934. pTDefRegMap(@Self)^.clr := $00002000
  73935. else
  73936. pTDefRegMap(@Self)^.&set := $00002000;
  73937. end;
  73938. function TPORTD_LATD.getLATD13 : TBits_1; inline;
  73939. begin
  73940. getLATD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73941. end;
  73942. procedure TPORTD_LATD.setLATD14; inline;
  73943. begin
  73944. pTDefRegMap(@Self)^.&set := $00004000;
  73945. end;
  73946. procedure TPORTD_LATD.clearLATD14; inline;
  73947. begin
  73948. pTDefRegMap(@Self)^.clr := $00004000;
  73949. end;
  73950. procedure TPORTD_LATD.setLATD14(thebits : TBits_1); inline;
  73951. begin
  73952. if thebits = 0 then
  73953. pTDefRegMap(@Self)^.clr := $00004000
  73954. else
  73955. pTDefRegMap(@Self)^.&set := $00004000;
  73956. end;
  73957. function TPORTD_LATD.getLATD14 : TBits_1; inline;
  73958. begin
  73959. getLATD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73960. end;
  73961. procedure TPORTD_LATD.setLATD15; inline;
  73962. begin
  73963. pTDefRegMap(@Self)^.&set := $00008000;
  73964. end;
  73965. procedure TPORTD_LATD.clearLATD15; inline;
  73966. begin
  73967. pTDefRegMap(@Self)^.clr := $00008000;
  73968. end;
  73969. procedure TPORTD_LATD.setLATD15(thebits : TBits_1); inline;
  73970. begin
  73971. if thebits = 0 then
  73972. pTDefRegMap(@Self)^.clr := $00008000
  73973. else
  73974. pTDefRegMap(@Self)^.&set := $00008000;
  73975. end;
  73976. function TPORTD_LATD.getLATD15 : TBits_1; inline;
  73977. begin
  73978. getLATD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  73979. end;
  73980. procedure TPORTD_LATD.setw(thebits : TBits_32); inline;
  73981. begin
  73982. pTDefRegMap(@Self)^.val := thebits;
  73983. end;
  73984. function TPORTD_LATD.getw : TBits_32; inline;
  73985. begin
  73986. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73987. end;
  73988. procedure TPORTD_ODCD.setODCD0; inline;
  73989. begin
  73990. pTDefRegMap(@Self)^.&set := $00000001;
  73991. end;
  73992. procedure TPORTD_ODCD.clearODCD0; inline;
  73993. begin
  73994. pTDefRegMap(@Self)^.clr := $00000001;
  73995. end;
  73996. procedure TPORTD_ODCD.setODCD0(thebits : TBits_1); inline;
  73997. begin
  73998. if thebits = 0 then
  73999. pTDefRegMap(@Self)^.clr := $00000001
  74000. else
  74001. pTDefRegMap(@Self)^.&set := $00000001;
  74002. end;
  74003. function TPORTD_ODCD.getODCD0 : TBits_1; inline;
  74004. begin
  74005. getODCD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74006. end;
  74007. procedure TPORTD_ODCD.setODCD1; inline;
  74008. begin
  74009. pTDefRegMap(@Self)^.&set := $00000002;
  74010. end;
  74011. procedure TPORTD_ODCD.clearODCD1; inline;
  74012. begin
  74013. pTDefRegMap(@Self)^.clr := $00000002;
  74014. end;
  74015. procedure TPORTD_ODCD.setODCD1(thebits : TBits_1); inline;
  74016. begin
  74017. if thebits = 0 then
  74018. pTDefRegMap(@Self)^.clr := $00000002
  74019. else
  74020. pTDefRegMap(@Self)^.&set := $00000002;
  74021. end;
  74022. function TPORTD_ODCD.getODCD1 : TBits_1; inline;
  74023. begin
  74024. getODCD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74025. end;
  74026. procedure TPORTD_ODCD.setODCD2; inline;
  74027. begin
  74028. pTDefRegMap(@Self)^.&set := $00000004;
  74029. end;
  74030. procedure TPORTD_ODCD.clearODCD2; inline;
  74031. begin
  74032. pTDefRegMap(@Self)^.clr := $00000004;
  74033. end;
  74034. procedure TPORTD_ODCD.setODCD2(thebits : TBits_1); inline;
  74035. begin
  74036. if thebits = 0 then
  74037. pTDefRegMap(@Self)^.clr := $00000004
  74038. else
  74039. pTDefRegMap(@Self)^.&set := $00000004;
  74040. end;
  74041. function TPORTD_ODCD.getODCD2 : TBits_1; inline;
  74042. begin
  74043. getODCD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74044. end;
  74045. procedure TPORTD_ODCD.setODCD3; inline;
  74046. begin
  74047. pTDefRegMap(@Self)^.&set := $00000008;
  74048. end;
  74049. procedure TPORTD_ODCD.clearODCD3; inline;
  74050. begin
  74051. pTDefRegMap(@Self)^.clr := $00000008;
  74052. end;
  74053. procedure TPORTD_ODCD.setODCD3(thebits : TBits_1); inline;
  74054. begin
  74055. if thebits = 0 then
  74056. pTDefRegMap(@Self)^.clr := $00000008
  74057. else
  74058. pTDefRegMap(@Self)^.&set := $00000008;
  74059. end;
  74060. function TPORTD_ODCD.getODCD3 : TBits_1; inline;
  74061. begin
  74062. getODCD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74063. end;
  74064. procedure TPORTD_ODCD.setODCD4; inline;
  74065. begin
  74066. pTDefRegMap(@Self)^.&set := $00000010;
  74067. end;
  74068. procedure TPORTD_ODCD.clearODCD4; inline;
  74069. begin
  74070. pTDefRegMap(@Self)^.clr := $00000010;
  74071. end;
  74072. procedure TPORTD_ODCD.setODCD4(thebits : TBits_1); inline;
  74073. begin
  74074. if thebits = 0 then
  74075. pTDefRegMap(@Self)^.clr := $00000010
  74076. else
  74077. pTDefRegMap(@Self)^.&set := $00000010;
  74078. end;
  74079. function TPORTD_ODCD.getODCD4 : TBits_1; inline;
  74080. begin
  74081. getODCD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74082. end;
  74083. procedure TPORTD_ODCD.setODCD5; inline;
  74084. begin
  74085. pTDefRegMap(@Self)^.&set := $00000020;
  74086. end;
  74087. procedure TPORTD_ODCD.clearODCD5; inline;
  74088. begin
  74089. pTDefRegMap(@Self)^.clr := $00000020;
  74090. end;
  74091. procedure TPORTD_ODCD.setODCD5(thebits : TBits_1); inline;
  74092. begin
  74093. if thebits = 0 then
  74094. pTDefRegMap(@Self)^.clr := $00000020
  74095. else
  74096. pTDefRegMap(@Self)^.&set := $00000020;
  74097. end;
  74098. function TPORTD_ODCD.getODCD5 : TBits_1; inline;
  74099. begin
  74100. getODCD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74101. end;
  74102. procedure TPORTD_ODCD.setODCD6; inline;
  74103. begin
  74104. pTDefRegMap(@Self)^.&set := $00000040;
  74105. end;
  74106. procedure TPORTD_ODCD.clearODCD6; inline;
  74107. begin
  74108. pTDefRegMap(@Self)^.clr := $00000040;
  74109. end;
  74110. procedure TPORTD_ODCD.setODCD6(thebits : TBits_1); inline;
  74111. begin
  74112. if thebits = 0 then
  74113. pTDefRegMap(@Self)^.clr := $00000040
  74114. else
  74115. pTDefRegMap(@Self)^.&set := $00000040;
  74116. end;
  74117. function TPORTD_ODCD.getODCD6 : TBits_1; inline;
  74118. begin
  74119. getODCD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74120. end;
  74121. procedure TPORTD_ODCD.setODCD7; inline;
  74122. begin
  74123. pTDefRegMap(@Self)^.&set := $00000080;
  74124. end;
  74125. procedure TPORTD_ODCD.clearODCD7; inline;
  74126. begin
  74127. pTDefRegMap(@Self)^.clr := $00000080;
  74128. end;
  74129. procedure TPORTD_ODCD.setODCD7(thebits : TBits_1); inline;
  74130. begin
  74131. if thebits = 0 then
  74132. pTDefRegMap(@Self)^.clr := $00000080
  74133. else
  74134. pTDefRegMap(@Self)^.&set := $00000080;
  74135. end;
  74136. function TPORTD_ODCD.getODCD7 : TBits_1; inline;
  74137. begin
  74138. getODCD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74139. end;
  74140. procedure TPORTD_ODCD.setODCD8; inline;
  74141. begin
  74142. pTDefRegMap(@Self)^.&set := $00000100;
  74143. end;
  74144. procedure TPORTD_ODCD.clearODCD8; inline;
  74145. begin
  74146. pTDefRegMap(@Self)^.clr := $00000100;
  74147. end;
  74148. procedure TPORTD_ODCD.setODCD8(thebits : TBits_1); inline;
  74149. begin
  74150. if thebits = 0 then
  74151. pTDefRegMap(@Self)^.clr := $00000100
  74152. else
  74153. pTDefRegMap(@Self)^.&set := $00000100;
  74154. end;
  74155. function TPORTD_ODCD.getODCD8 : TBits_1; inline;
  74156. begin
  74157. getODCD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74158. end;
  74159. procedure TPORTD_ODCD.setODCD9; inline;
  74160. begin
  74161. pTDefRegMap(@Self)^.&set := $00000200;
  74162. end;
  74163. procedure TPORTD_ODCD.clearODCD9; inline;
  74164. begin
  74165. pTDefRegMap(@Self)^.clr := $00000200;
  74166. end;
  74167. procedure TPORTD_ODCD.setODCD9(thebits : TBits_1); inline;
  74168. begin
  74169. if thebits = 0 then
  74170. pTDefRegMap(@Self)^.clr := $00000200
  74171. else
  74172. pTDefRegMap(@Self)^.&set := $00000200;
  74173. end;
  74174. function TPORTD_ODCD.getODCD9 : TBits_1; inline;
  74175. begin
  74176. getODCD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74177. end;
  74178. procedure TPORTD_ODCD.setODCD10; inline;
  74179. begin
  74180. pTDefRegMap(@Self)^.&set := $00000400;
  74181. end;
  74182. procedure TPORTD_ODCD.clearODCD10; inline;
  74183. begin
  74184. pTDefRegMap(@Self)^.clr := $00000400;
  74185. end;
  74186. procedure TPORTD_ODCD.setODCD10(thebits : TBits_1); inline;
  74187. begin
  74188. if thebits = 0 then
  74189. pTDefRegMap(@Self)^.clr := $00000400
  74190. else
  74191. pTDefRegMap(@Self)^.&set := $00000400;
  74192. end;
  74193. function TPORTD_ODCD.getODCD10 : TBits_1; inline;
  74194. begin
  74195. getODCD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74196. end;
  74197. procedure TPORTD_ODCD.setODCD11; inline;
  74198. begin
  74199. pTDefRegMap(@Self)^.&set := $00000800;
  74200. end;
  74201. procedure TPORTD_ODCD.clearODCD11; inline;
  74202. begin
  74203. pTDefRegMap(@Self)^.clr := $00000800;
  74204. end;
  74205. procedure TPORTD_ODCD.setODCD11(thebits : TBits_1); inline;
  74206. begin
  74207. if thebits = 0 then
  74208. pTDefRegMap(@Self)^.clr := $00000800
  74209. else
  74210. pTDefRegMap(@Self)^.&set := $00000800;
  74211. end;
  74212. function TPORTD_ODCD.getODCD11 : TBits_1; inline;
  74213. begin
  74214. getODCD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  74215. end;
  74216. procedure TPORTD_ODCD.setODCD12; inline;
  74217. begin
  74218. pTDefRegMap(@Self)^.&set := $00001000;
  74219. end;
  74220. procedure TPORTD_ODCD.clearODCD12; inline;
  74221. begin
  74222. pTDefRegMap(@Self)^.clr := $00001000;
  74223. end;
  74224. procedure TPORTD_ODCD.setODCD12(thebits : TBits_1); inline;
  74225. begin
  74226. if thebits = 0 then
  74227. pTDefRegMap(@Self)^.clr := $00001000
  74228. else
  74229. pTDefRegMap(@Self)^.&set := $00001000;
  74230. end;
  74231. function TPORTD_ODCD.getODCD12 : TBits_1; inline;
  74232. begin
  74233. getODCD12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74234. end;
  74235. procedure TPORTD_ODCD.setODCD13; inline;
  74236. begin
  74237. pTDefRegMap(@Self)^.&set := $00002000;
  74238. end;
  74239. procedure TPORTD_ODCD.clearODCD13; inline;
  74240. begin
  74241. pTDefRegMap(@Self)^.clr := $00002000;
  74242. end;
  74243. procedure TPORTD_ODCD.setODCD13(thebits : TBits_1); inline;
  74244. begin
  74245. if thebits = 0 then
  74246. pTDefRegMap(@Self)^.clr := $00002000
  74247. else
  74248. pTDefRegMap(@Self)^.&set := $00002000;
  74249. end;
  74250. function TPORTD_ODCD.getODCD13 : TBits_1; inline;
  74251. begin
  74252. getODCD13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74253. end;
  74254. procedure TPORTD_ODCD.setODCD14; inline;
  74255. begin
  74256. pTDefRegMap(@Self)^.&set := $00004000;
  74257. end;
  74258. procedure TPORTD_ODCD.clearODCD14; inline;
  74259. begin
  74260. pTDefRegMap(@Self)^.clr := $00004000;
  74261. end;
  74262. procedure TPORTD_ODCD.setODCD14(thebits : TBits_1); inline;
  74263. begin
  74264. if thebits = 0 then
  74265. pTDefRegMap(@Self)^.clr := $00004000
  74266. else
  74267. pTDefRegMap(@Self)^.&set := $00004000;
  74268. end;
  74269. function TPORTD_ODCD.getODCD14 : TBits_1; inline;
  74270. begin
  74271. getODCD14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74272. end;
  74273. procedure TPORTD_ODCD.setODCD15; inline;
  74274. begin
  74275. pTDefRegMap(@Self)^.&set := $00008000;
  74276. end;
  74277. procedure TPORTD_ODCD.clearODCD15; inline;
  74278. begin
  74279. pTDefRegMap(@Self)^.clr := $00008000;
  74280. end;
  74281. procedure TPORTD_ODCD.setODCD15(thebits : TBits_1); inline;
  74282. begin
  74283. if thebits = 0 then
  74284. pTDefRegMap(@Self)^.clr := $00008000
  74285. else
  74286. pTDefRegMap(@Self)^.&set := $00008000;
  74287. end;
  74288. function TPORTD_ODCD.getODCD15 : TBits_1; inline;
  74289. begin
  74290. getODCD15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  74291. end;
  74292. procedure TPORTD_ODCD.setw(thebits : TBits_32); inline;
  74293. begin
  74294. pTDefRegMap(@Self)^.val := thebits;
  74295. end;
  74296. function TPORTD_ODCD.getw : TBits_32; inline;
  74297. begin
  74298. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74299. end;
  74300. procedure TPORTE_TRISE.setTRISE0; inline;
  74301. begin
  74302. pTDefRegMap(@Self)^.&set := $00000001;
  74303. end;
  74304. procedure TPORTE_TRISE.clearTRISE0; inline;
  74305. begin
  74306. pTDefRegMap(@Self)^.clr := $00000001;
  74307. end;
  74308. procedure TPORTE_TRISE.setTRISE0(thebits : TBits_1); inline;
  74309. begin
  74310. if thebits = 0 then
  74311. pTDefRegMap(@Self)^.clr := $00000001
  74312. else
  74313. pTDefRegMap(@Self)^.&set := $00000001;
  74314. end;
  74315. function TPORTE_TRISE.getTRISE0 : TBits_1; inline;
  74316. begin
  74317. getTRISE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74318. end;
  74319. procedure TPORTE_TRISE.setTRISE1; inline;
  74320. begin
  74321. pTDefRegMap(@Self)^.&set := $00000002;
  74322. end;
  74323. procedure TPORTE_TRISE.clearTRISE1; inline;
  74324. begin
  74325. pTDefRegMap(@Self)^.clr := $00000002;
  74326. end;
  74327. procedure TPORTE_TRISE.setTRISE1(thebits : TBits_1); inline;
  74328. begin
  74329. if thebits = 0 then
  74330. pTDefRegMap(@Self)^.clr := $00000002
  74331. else
  74332. pTDefRegMap(@Self)^.&set := $00000002;
  74333. end;
  74334. function TPORTE_TRISE.getTRISE1 : TBits_1; inline;
  74335. begin
  74336. getTRISE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74337. end;
  74338. procedure TPORTE_TRISE.setTRISE2; inline;
  74339. begin
  74340. pTDefRegMap(@Self)^.&set := $00000004;
  74341. end;
  74342. procedure TPORTE_TRISE.clearTRISE2; inline;
  74343. begin
  74344. pTDefRegMap(@Self)^.clr := $00000004;
  74345. end;
  74346. procedure TPORTE_TRISE.setTRISE2(thebits : TBits_1); inline;
  74347. begin
  74348. if thebits = 0 then
  74349. pTDefRegMap(@Self)^.clr := $00000004
  74350. else
  74351. pTDefRegMap(@Self)^.&set := $00000004;
  74352. end;
  74353. function TPORTE_TRISE.getTRISE2 : TBits_1; inline;
  74354. begin
  74355. getTRISE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74356. end;
  74357. procedure TPORTE_TRISE.setTRISE3; inline;
  74358. begin
  74359. pTDefRegMap(@Self)^.&set := $00000008;
  74360. end;
  74361. procedure TPORTE_TRISE.clearTRISE3; inline;
  74362. begin
  74363. pTDefRegMap(@Self)^.clr := $00000008;
  74364. end;
  74365. procedure TPORTE_TRISE.setTRISE3(thebits : TBits_1); inline;
  74366. begin
  74367. if thebits = 0 then
  74368. pTDefRegMap(@Self)^.clr := $00000008
  74369. else
  74370. pTDefRegMap(@Self)^.&set := $00000008;
  74371. end;
  74372. function TPORTE_TRISE.getTRISE3 : TBits_1; inline;
  74373. begin
  74374. getTRISE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74375. end;
  74376. procedure TPORTE_TRISE.setTRISE4; inline;
  74377. begin
  74378. pTDefRegMap(@Self)^.&set := $00000010;
  74379. end;
  74380. procedure TPORTE_TRISE.clearTRISE4; inline;
  74381. begin
  74382. pTDefRegMap(@Self)^.clr := $00000010;
  74383. end;
  74384. procedure TPORTE_TRISE.setTRISE4(thebits : TBits_1); inline;
  74385. begin
  74386. if thebits = 0 then
  74387. pTDefRegMap(@Self)^.clr := $00000010
  74388. else
  74389. pTDefRegMap(@Self)^.&set := $00000010;
  74390. end;
  74391. function TPORTE_TRISE.getTRISE4 : TBits_1; inline;
  74392. begin
  74393. getTRISE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74394. end;
  74395. procedure TPORTE_TRISE.setTRISE5; inline;
  74396. begin
  74397. pTDefRegMap(@Self)^.&set := $00000020;
  74398. end;
  74399. procedure TPORTE_TRISE.clearTRISE5; inline;
  74400. begin
  74401. pTDefRegMap(@Self)^.clr := $00000020;
  74402. end;
  74403. procedure TPORTE_TRISE.setTRISE5(thebits : TBits_1); inline;
  74404. begin
  74405. if thebits = 0 then
  74406. pTDefRegMap(@Self)^.clr := $00000020
  74407. else
  74408. pTDefRegMap(@Self)^.&set := $00000020;
  74409. end;
  74410. function TPORTE_TRISE.getTRISE5 : TBits_1; inline;
  74411. begin
  74412. getTRISE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74413. end;
  74414. procedure TPORTE_TRISE.setTRISE6; inline;
  74415. begin
  74416. pTDefRegMap(@Self)^.&set := $00000040;
  74417. end;
  74418. procedure TPORTE_TRISE.clearTRISE6; inline;
  74419. begin
  74420. pTDefRegMap(@Self)^.clr := $00000040;
  74421. end;
  74422. procedure TPORTE_TRISE.setTRISE6(thebits : TBits_1); inline;
  74423. begin
  74424. if thebits = 0 then
  74425. pTDefRegMap(@Self)^.clr := $00000040
  74426. else
  74427. pTDefRegMap(@Self)^.&set := $00000040;
  74428. end;
  74429. function TPORTE_TRISE.getTRISE6 : TBits_1; inline;
  74430. begin
  74431. getTRISE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74432. end;
  74433. procedure TPORTE_TRISE.setTRISE7; inline;
  74434. begin
  74435. pTDefRegMap(@Self)^.&set := $00000080;
  74436. end;
  74437. procedure TPORTE_TRISE.clearTRISE7; inline;
  74438. begin
  74439. pTDefRegMap(@Self)^.clr := $00000080;
  74440. end;
  74441. procedure TPORTE_TRISE.setTRISE7(thebits : TBits_1); inline;
  74442. begin
  74443. if thebits = 0 then
  74444. pTDefRegMap(@Self)^.clr := $00000080
  74445. else
  74446. pTDefRegMap(@Self)^.&set := $00000080;
  74447. end;
  74448. function TPORTE_TRISE.getTRISE7 : TBits_1; inline;
  74449. begin
  74450. getTRISE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74451. end;
  74452. procedure TPORTE_TRISE.setTRISE8; inline;
  74453. begin
  74454. pTDefRegMap(@Self)^.&set := $00000100;
  74455. end;
  74456. procedure TPORTE_TRISE.clearTRISE8; inline;
  74457. begin
  74458. pTDefRegMap(@Self)^.clr := $00000100;
  74459. end;
  74460. procedure TPORTE_TRISE.setTRISE8(thebits : TBits_1); inline;
  74461. begin
  74462. if thebits = 0 then
  74463. pTDefRegMap(@Self)^.clr := $00000100
  74464. else
  74465. pTDefRegMap(@Self)^.&set := $00000100;
  74466. end;
  74467. function TPORTE_TRISE.getTRISE8 : TBits_1; inline;
  74468. begin
  74469. getTRISE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74470. end;
  74471. procedure TPORTE_TRISE.setTRISE9; inline;
  74472. begin
  74473. pTDefRegMap(@Self)^.&set := $00000200;
  74474. end;
  74475. procedure TPORTE_TRISE.clearTRISE9; inline;
  74476. begin
  74477. pTDefRegMap(@Self)^.clr := $00000200;
  74478. end;
  74479. procedure TPORTE_TRISE.setTRISE9(thebits : TBits_1); inline;
  74480. begin
  74481. if thebits = 0 then
  74482. pTDefRegMap(@Self)^.clr := $00000200
  74483. else
  74484. pTDefRegMap(@Self)^.&set := $00000200;
  74485. end;
  74486. function TPORTE_TRISE.getTRISE9 : TBits_1; inline;
  74487. begin
  74488. getTRISE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74489. end;
  74490. procedure TPORTE_TRISE.setw(thebits : TBits_32); inline;
  74491. begin
  74492. pTDefRegMap(@Self)^.val := thebits;
  74493. end;
  74494. function TPORTE_TRISE.getw : TBits_32; inline;
  74495. begin
  74496. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74497. end;
  74498. procedure TPORTE_PORTE.setRE0; inline;
  74499. begin
  74500. pTDefRegMap(@Self)^.&set := $00000001;
  74501. end;
  74502. procedure TPORTE_PORTE.clearRE0; inline;
  74503. begin
  74504. pTDefRegMap(@Self)^.clr := $00000001;
  74505. end;
  74506. procedure TPORTE_PORTE.setRE0(thebits : TBits_1); inline;
  74507. begin
  74508. if thebits = 0 then
  74509. pTDefRegMap(@Self)^.clr := $00000001
  74510. else
  74511. pTDefRegMap(@Self)^.&set := $00000001;
  74512. end;
  74513. function TPORTE_PORTE.getRE0 : TBits_1; inline;
  74514. begin
  74515. getRE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74516. end;
  74517. procedure TPORTE_PORTE.setRE1; inline;
  74518. begin
  74519. pTDefRegMap(@Self)^.&set := $00000002;
  74520. end;
  74521. procedure TPORTE_PORTE.clearRE1; inline;
  74522. begin
  74523. pTDefRegMap(@Self)^.clr := $00000002;
  74524. end;
  74525. procedure TPORTE_PORTE.setRE1(thebits : TBits_1); inline;
  74526. begin
  74527. if thebits = 0 then
  74528. pTDefRegMap(@Self)^.clr := $00000002
  74529. else
  74530. pTDefRegMap(@Self)^.&set := $00000002;
  74531. end;
  74532. function TPORTE_PORTE.getRE1 : TBits_1; inline;
  74533. begin
  74534. getRE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74535. end;
  74536. procedure TPORTE_PORTE.setRE2; inline;
  74537. begin
  74538. pTDefRegMap(@Self)^.&set := $00000004;
  74539. end;
  74540. procedure TPORTE_PORTE.clearRE2; inline;
  74541. begin
  74542. pTDefRegMap(@Self)^.clr := $00000004;
  74543. end;
  74544. procedure TPORTE_PORTE.setRE2(thebits : TBits_1); inline;
  74545. begin
  74546. if thebits = 0 then
  74547. pTDefRegMap(@Self)^.clr := $00000004
  74548. else
  74549. pTDefRegMap(@Self)^.&set := $00000004;
  74550. end;
  74551. function TPORTE_PORTE.getRE2 : TBits_1; inline;
  74552. begin
  74553. getRE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74554. end;
  74555. procedure TPORTE_PORTE.setRE3; inline;
  74556. begin
  74557. pTDefRegMap(@Self)^.&set := $00000008;
  74558. end;
  74559. procedure TPORTE_PORTE.clearRE3; inline;
  74560. begin
  74561. pTDefRegMap(@Self)^.clr := $00000008;
  74562. end;
  74563. procedure TPORTE_PORTE.setRE3(thebits : TBits_1); inline;
  74564. begin
  74565. if thebits = 0 then
  74566. pTDefRegMap(@Self)^.clr := $00000008
  74567. else
  74568. pTDefRegMap(@Self)^.&set := $00000008;
  74569. end;
  74570. function TPORTE_PORTE.getRE3 : TBits_1; inline;
  74571. begin
  74572. getRE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74573. end;
  74574. procedure TPORTE_PORTE.setRE4; inline;
  74575. begin
  74576. pTDefRegMap(@Self)^.&set := $00000010;
  74577. end;
  74578. procedure TPORTE_PORTE.clearRE4; inline;
  74579. begin
  74580. pTDefRegMap(@Self)^.clr := $00000010;
  74581. end;
  74582. procedure TPORTE_PORTE.setRE4(thebits : TBits_1); inline;
  74583. begin
  74584. if thebits = 0 then
  74585. pTDefRegMap(@Self)^.clr := $00000010
  74586. else
  74587. pTDefRegMap(@Self)^.&set := $00000010;
  74588. end;
  74589. function TPORTE_PORTE.getRE4 : TBits_1; inline;
  74590. begin
  74591. getRE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74592. end;
  74593. procedure TPORTE_PORTE.setRE5; inline;
  74594. begin
  74595. pTDefRegMap(@Self)^.&set := $00000020;
  74596. end;
  74597. procedure TPORTE_PORTE.clearRE5; inline;
  74598. begin
  74599. pTDefRegMap(@Self)^.clr := $00000020;
  74600. end;
  74601. procedure TPORTE_PORTE.setRE5(thebits : TBits_1); inline;
  74602. begin
  74603. if thebits = 0 then
  74604. pTDefRegMap(@Self)^.clr := $00000020
  74605. else
  74606. pTDefRegMap(@Self)^.&set := $00000020;
  74607. end;
  74608. function TPORTE_PORTE.getRE5 : TBits_1; inline;
  74609. begin
  74610. getRE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74611. end;
  74612. procedure TPORTE_PORTE.setRE6; inline;
  74613. begin
  74614. pTDefRegMap(@Self)^.&set := $00000040;
  74615. end;
  74616. procedure TPORTE_PORTE.clearRE6; inline;
  74617. begin
  74618. pTDefRegMap(@Self)^.clr := $00000040;
  74619. end;
  74620. procedure TPORTE_PORTE.setRE6(thebits : TBits_1); inline;
  74621. begin
  74622. if thebits = 0 then
  74623. pTDefRegMap(@Self)^.clr := $00000040
  74624. else
  74625. pTDefRegMap(@Self)^.&set := $00000040;
  74626. end;
  74627. function TPORTE_PORTE.getRE6 : TBits_1; inline;
  74628. begin
  74629. getRE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74630. end;
  74631. procedure TPORTE_PORTE.setRE7; inline;
  74632. begin
  74633. pTDefRegMap(@Self)^.&set := $00000080;
  74634. end;
  74635. procedure TPORTE_PORTE.clearRE7; inline;
  74636. begin
  74637. pTDefRegMap(@Self)^.clr := $00000080;
  74638. end;
  74639. procedure TPORTE_PORTE.setRE7(thebits : TBits_1); inline;
  74640. begin
  74641. if thebits = 0 then
  74642. pTDefRegMap(@Self)^.clr := $00000080
  74643. else
  74644. pTDefRegMap(@Self)^.&set := $00000080;
  74645. end;
  74646. function TPORTE_PORTE.getRE7 : TBits_1; inline;
  74647. begin
  74648. getRE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74649. end;
  74650. procedure TPORTE_PORTE.setRE8; inline;
  74651. begin
  74652. pTDefRegMap(@Self)^.&set := $00000100;
  74653. end;
  74654. procedure TPORTE_PORTE.clearRE8; inline;
  74655. begin
  74656. pTDefRegMap(@Self)^.clr := $00000100;
  74657. end;
  74658. procedure TPORTE_PORTE.setRE8(thebits : TBits_1); inline;
  74659. begin
  74660. if thebits = 0 then
  74661. pTDefRegMap(@Self)^.clr := $00000100
  74662. else
  74663. pTDefRegMap(@Self)^.&set := $00000100;
  74664. end;
  74665. function TPORTE_PORTE.getRE8 : TBits_1; inline;
  74666. begin
  74667. getRE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74668. end;
  74669. procedure TPORTE_PORTE.setRE9; inline;
  74670. begin
  74671. pTDefRegMap(@Self)^.&set := $00000200;
  74672. end;
  74673. procedure TPORTE_PORTE.clearRE9; inline;
  74674. begin
  74675. pTDefRegMap(@Self)^.clr := $00000200;
  74676. end;
  74677. procedure TPORTE_PORTE.setRE9(thebits : TBits_1); inline;
  74678. begin
  74679. if thebits = 0 then
  74680. pTDefRegMap(@Self)^.clr := $00000200
  74681. else
  74682. pTDefRegMap(@Self)^.&set := $00000200;
  74683. end;
  74684. function TPORTE_PORTE.getRE9 : TBits_1; inline;
  74685. begin
  74686. getRE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74687. end;
  74688. procedure TPORTE_PORTE.setw(thebits : TBits_32); inline;
  74689. begin
  74690. pTDefRegMap(@Self)^.val := thebits;
  74691. end;
  74692. function TPORTE_PORTE.getw : TBits_32; inline;
  74693. begin
  74694. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74695. end;
  74696. procedure TPORTE_LATE.setLATE0; inline;
  74697. begin
  74698. pTDefRegMap(@Self)^.&set := $00000001;
  74699. end;
  74700. procedure TPORTE_LATE.clearLATE0; inline;
  74701. begin
  74702. pTDefRegMap(@Self)^.clr := $00000001;
  74703. end;
  74704. procedure TPORTE_LATE.setLATE0(thebits : TBits_1); inline;
  74705. begin
  74706. if thebits = 0 then
  74707. pTDefRegMap(@Self)^.clr := $00000001
  74708. else
  74709. pTDefRegMap(@Self)^.&set := $00000001;
  74710. end;
  74711. function TPORTE_LATE.getLATE0 : TBits_1; inline;
  74712. begin
  74713. getLATE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74714. end;
  74715. procedure TPORTE_LATE.setLATE1; inline;
  74716. begin
  74717. pTDefRegMap(@Self)^.&set := $00000002;
  74718. end;
  74719. procedure TPORTE_LATE.clearLATE1; inline;
  74720. begin
  74721. pTDefRegMap(@Self)^.clr := $00000002;
  74722. end;
  74723. procedure TPORTE_LATE.setLATE1(thebits : TBits_1); inline;
  74724. begin
  74725. if thebits = 0 then
  74726. pTDefRegMap(@Self)^.clr := $00000002
  74727. else
  74728. pTDefRegMap(@Self)^.&set := $00000002;
  74729. end;
  74730. function TPORTE_LATE.getLATE1 : TBits_1; inline;
  74731. begin
  74732. getLATE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74733. end;
  74734. procedure TPORTE_LATE.setLATE2; inline;
  74735. begin
  74736. pTDefRegMap(@Self)^.&set := $00000004;
  74737. end;
  74738. procedure TPORTE_LATE.clearLATE2; inline;
  74739. begin
  74740. pTDefRegMap(@Self)^.clr := $00000004;
  74741. end;
  74742. procedure TPORTE_LATE.setLATE2(thebits : TBits_1); inline;
  74743. begin
  74744. if thebits = 0 then
  74745. pTDefRegMap(@Self)^.clr := $00000004
  74746. else
  74747. pTDefRegMap(@Self)^.&set := $00000004;
  74748. end;
  74749. function TPORTE_LATE.getLATE2 : TBits_1; inline;
  74750. begin
  74751. getLATE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74752. end;
  74753. procedure TPORTE_LATE.setLATE3; inline;
  74754. begin
  74755. pTDefRegMap(@Self)^.&set := $00000008;
  74756. end;
  74757. procedure TPORTE_LATE.clearLATE3; inline;
  74758. begin
  74759. pTDefRegMap(@Self)^.clr := $00000008;
  74760. end;
  74761. procedure TPORTE_LATE.setLATE3(thebits : TBits_1); inline;
  74762. begin
  74763. if thebits = 0 then
  74764. pTDefRegMap(@Self)^.clr := $00000008
  74765. else
  74766. pTDefRegMap(@Self)^.&set := $00000008;
  74767. end;
  74768. function TPORTE_LATE.getLATE3 : TBits_1; inline;
  74769. begin
  74770. getLATE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74771. end;
  74772. procedure TPORTE_LATE.setLATE4; inline;
  74773. begin
  74774. pTDefRegMap(@Self)^.&set := $00000010;
  74775. end;
  74776. procedure TPORTE_LATE.clearLATE4; inline;
  74777. begin
  74778. pTDefRegMap(@Self)^.clr := $00000010;
  74779. end;
  74780. procedure TPORTE_LATE.setLATE4(thebits : TBits_1); inline;
  74781. begin
  74782. if thebits = 0 then
  74783. pTDefRegMap(@Self)^.clr := $00000010
  74784. else
  74785. pTDefRegMap(@Self)^.&set := $00000010;
  74786. end;
  74787. function TPORTE_LATE.getLATE4 : TBits_1; inline;
  74788. begin
  74789. getLATE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74790. end;
  74791. procedure TPORTE_LATE.setLATE5; inline;
  74792. begin
  74793. pTDefRegMap(@Self)^.&set := $00000020;
  74794. end;
  74795. procedure TPORTE_LATE.clearLATE5; inline;
  74796. begin
  74797. pTDefRegMap(@Self)^.clr := $00000020;
  74798. end;
  74799. procedure TPORTE_LATE.setLATE5(thebits : TBits_1); inline;
  74800. begin
  74801. if thebits = 0 then
  74802. pTDefRegMap(@Self)^.clr := $00000020
  74803. else
  74804. pTDefRegMap(@Self)^.&set := $00000020;
  74805. end;
  74806. function TPORTE_LATE.getLATE5 : TBits_1; inline;
  74807. begin
  74808. getLATE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74809. end;
  74810. procedure TPORTE_LATE.setLATE6; inline;
  74811. begin
  74812. pTDefRegMap(@Self)^.&set := $00000040;
  74813. end;
  74814. procedure TPORTE_LATE.clearLATE6; inline;
  74815. begin
  74816. pTDefRegMap(@Self)^.clr := $00000040;
  74817. end;
  74818. procedure TPORTE_LATE.setLATE6(thebits : TBits_1); inline;
  74819. begin
  74820. if thebits = 0 then
  74821. pTDefRegMap(@Self)^.clr := $00000040
  74822. else
  74823. pTDefRegMap(@Self)^.&set := $00000040;
  74824. end;
  74825. function TPORTE_LATE.getLATE6 : TBits_1; inline;
  74826. begin
  74827. getLATE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74828. end;
  74829. procedure TPORTE_LATE.setLATE7; inline;
  74830. begin
  74831. pTDefRegMap(@Self)^.&set := $00000080;
  74832. end;
  74833. procedure TPORTE_LATE.clearLATE7; inline;
  74834. begin
  74835. pTDefRegMap(@Self)^.clr := $00000080;
  74836. end;
  74837. procedure TPORTE_LATE.setLATE7(thebits : TBits_1); inline;
  74838. begin
  74839. if thebits = 0 then
  74840. pTDefRegMap(@Self)^.clr := $00000080
  74841. else
  74842. pTDefRegMap(@Self)^.&set := $00000080;
  74843. end;
  74844. function TPORTE_LATE.getLATE7 : TBits_1; inline;
  74845. begin
  74846. getLATE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74847. end;
  74848. procedure TPORTE_LATE.setLATE8; inline;
  74849. begin
  74850. pTDefRegMap(@Self)^.&set := $00000100;
  74851. end;
  74852. procedure TPORTE_LATE.clearLATE8; inline;
  74853. begin
  74854. pTDefRegMap(@Self)^.clr := $00000100;
  74855. end;
  74856. procedure TPORTE_LATE.setLATE8(thebits : TBits_1); inline;
  74857. begin
  74858. if thebits = 0 then
  74859. pTDefRegMap(@Self)^.clr := $00000100
  74860. else
  74861. pTDefRegMap(@Self)^.&set := $00000100;
  74862. end;
  74863. function TPORTE_LATE.getLATE8 : TBits_1; inline;
  74864. begin
  74865. getLATE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74866. end;
  74867. procedure TPORTE_LATE.setLATE9; inline;
  74868. begin
  74869. pTDefRegMap(@Self)^.&set := $00000200;
  74870. end;
  74871. procedure TPORTE_LATE.clearLATE9; inline;
  74872. begin
  74873. pTDefRegMap(@Self)^.clr := $00000200;
  74874. end;
  74875. procedure TPORTE_LATE.setLATE9(thebits : TBits_1); inline;
  74876. begin
  74877. if thebits = 0 then
  74878. pTDefRegMap(@Self)^.clr := $00000200
  74879. else
  74880. pTDefRegMap(@Self)^.&set := $00000200;
  74881. end;
  74882. function TPORTE_LATE.getLATE9 : TBits_1; inline;
  74883. begin
  74884. getLATE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74885. end;
  74886. procedure TPORTE_LATE.setw(thebits : TBits_32); inline;
  74887. begin
  74888. pTDefRegMap(@Self)^.val := thebits;
  74889. end;
  74890. function TPORTE_LATE.getw : TBits_32; inline;
  74891. begin
  74892. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74893. end;
  74894. procedure TPORTE_ODCE.setODCE0; inline;
  74895. begin
  74896. pTDefRegMap(@Self)^.&set := $00000001;
  74897. end;
  74898. procedure TPORTE_ODCE.clearODCE0; inline;
  74899. begin
  74900. pTDefRegMap(@Self)^.clr := $00000001;
  74901. end;
  74902. procedure TPORTE_ODCE.setODCE0(thebits : TBits_1); inline;
  74903. begin
  74904. if thebits = 0 then
  74905. pTDefRegMap(@Self)^.clr := $00000001
  74906. else
  74907. pTDefRegMap(@Self)^.&set := $00000001;
  74908. end;
  74909. function TPORTE_ODCE.getODCE0 : TBits_1; inline;
  74910. begin
  74911. getODCE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74912. end;
  74913. procedure TPORTE_ODCE.setODCE1; inline;
  74914. begin
  74915. pTDefRegMap(@Self)^.&set := $00000002;
  74916. end;
  74917. procedure TPORTE_ODCE.clearODCE1; inline;
  74918. begin
  74919. pTDefRegMap(@Self)^.clr := $00000002;
  74920. end;
  74921. procedure TPORTE_ODCE.setODCE1(thebits : TBits_1); inline;
  74922. begin
  74923. if thebits = 0 then
  74924. pTDefRegMap(@Self)^.clr := $00000002
  74925. else
  74926. pTDefRegMap(@Self)^.&set := $00000002;
  74927. end;
  74928. function TPORTE_ODCE.getODCE1 : TBits_1; inline;
  74929. begin
  74930. getODCE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74931. end;
  74932. procedure TPORTE_ODCE.setODCE2; inline;
  74933. begin
  74934. pTDefRegMap(@Self)^.&set := $00000004;
  74935. end;
  74936. procedure TPORTE_ODCE.clearODCE2; inline;
  74937. begin
  74938. pTDefRegMap(@Self)^.clr := $00000004;
  74939. end;
  74940. procedure TPORTE_ODCE.setODCE2(thebits : TBits_1); inline;
  74941. begin
  74942. if thebits = 0 then
  74943. pTDefRegMap(@Self)^.clr := $00000004
  74944. else
  74945. pTDefRegMap(@Self)^.&set := $00000004;
  74946. end;
  74947. function TPORTE_ODCE.getODCE2 : TBits_1; inline;
  74948. begin
  74949. getODCE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74950. end;
  74951. procedure TPORTE_ODCE.setODCE3; inline;
  74952. begin
  74953. pTDefRegMap(@Self)^.&set := $00000008;
  74954. end;
  74955. procedure TPORTE_ODCE.clearODCE3; inline;
  74956. begin
  74957. pTDefRegMap(@Self)^.clr := $00000008;
  74958. end;
  74959. procedure TPORTE_ODCE.setODCE3(thebits : TBits_1); inline;
  74960. begin
  74961. if thebits = 0 then
  74962. pTDefRegMap(@Self)^.clr := $00000008
  74963. else
  74964. pTDefRegMap(@Self)^.&set := $00000008;
  74965. end;
  74966. function TPORTE_ODCE.getODCE3 : TBits_1; inline;
  74967. begin
  74968. getODCE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74969. end;
  74970. procedure TPORTE_ODCE.setODCE4; inline;
  74971. begin
  74972. pTDefRegMap(@Self)^.&set := $00000010;
  74973. end;
  74974. procedure TPORTE_ODCE.clearODCE4; inline;
  74975. begin
  74976. pTDefRegMap(@Self)^.clr := $00000010;
  74977. end;
  74978. procedure TPORTE_ODCE.setODCE4(thebits : TBits_1); inline;
  74979. begin
  74980. if thebits = 0 then
  74981. pTDefRegMap(@Self)^.clr := $00000010
  74982. else
  74983. pTDefRegMap(@Self)^.&set := $00000010;
  74984. end;
  74985. function TPORTE_ODCE.getODCE4 : TBits_1; inline;
  74986. begin
  74987. getODCE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74988. end;
  74989. procedure TPORTE_ODCE.setODCE5; inline;
  74990. begin
  74991. pTDefRegMap(@Self)^.&set := $00000020;
  74992. end;
  74993. procedure TPORTE_ODCE.clearODCE5; inline;
  74994. begin
  74995. pTDefRegMap(@Self)^.clr := $00000020;
  74996. end;
  74997. procedure TPORTE_ODCE.setODCE5(thebits : TBits_1); inline;
  74998. begin
  74999. if thebits = 0 then
  75000. pTDefRegMap(@Self)^.clr := $00000020
  75001. else
  75002. pTDefRegMap(@Self)^.&set := $00000020;
  75003. end;
  75004. function TPORTE_ODCE.getODCE5 : TBits_1; inline;
  75005. begin
  75006. getODCE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75007. end;
  75008. procedure TPORTE_ODCE.setODCE6; inline;
  75009. begin
  75010. pTDefRegMap(@Self)^.&set := $00000040;
  75011. end;
  75012. procedure TPORTE_ODCE.clearODCE6; inline;
  75013. begin
  75014. pTDefRegMap(@Self)^.clr := $00000040;
  75015. end;
  75016. procedure TPORTE_ODCE.setODCE6(thebits : TBits_1); inline;
  75017. begin
  75018. if thebits = 0 then
  75019. pTDefRegMap(@Self)^.clr := $00000040
  75020. else
  75021. pTDefRegMap(@Self)^.&set := $00000040;
  75022. end;
  75023. function TPORTE_ODCE.getODCE6 : TBits_1; inline;
  75024. begin
  75025. getODCE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75026. end;
  75027. procedure TPORTE_ODCE.setODCE7; inline;
  75028. begin
  75029. pTDefRegMap(@Self)^.&set := $00000080;
  75030. end;
  75031. procedure TPORTE_ODCE.clearODCE7; inline;
  75032. begin
  75033. pTDefRegMap(@Self)^.clr := $00000080;
  75034. end;
  75035. procedure TPORTE_ODCE.setODCE7(thebits : TBits_1); inline;
  75036. begin
  75037. if thebits = 0 then
  75038. pTDefRegMap(@Self)^.clr := $00000080
  75039. else
  75040. pTDefRegMap(@Self)^.&set := $00000080;
  75041. end;
  75042. function TPORTE_ODCE.getODCE7 : TBits_1; inline;
  75043. begin
  75044. getODCE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75045. end;
  75046. procedure TPORTE_ODCE.setODCE8; inline;
  75047. begin
  75048. pTDefRegMap(@Self)^.&set := $00000100;
  75049. end;
  75050. procedure TPORTE_ODCE.clearODCE8; inline;
  75051. begin
  75052. pTDefRegMap(@Self)^.clr := $00000100;
  75053. end;
  75054. procedure TPORTE_ODCE.setODCE8(thebits : TBits_1); inline;
  75055. begin
  75056. if thebits = 0 then
  75057. pTDefRegMap(@Self)^.clr := $00000100
  75058. else
  75059. pTDefRegMap(@Self)^.&set := $00000100;
  75060. end;
  75061. function TPORTE_ODCE.getODCE8 : TBits_1; inline;
  75062. begin
  75063. getODCE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75064. end;
  75065. procedure TPORTE_ODCE.setODCE9; inline;
  75066. begin
  75067. pTDefRegMap(@Self)^.&set := $00000200;
  75068. end;
  75069. procedure TPORTE_ODCE.clearODCE9; inline;
  75070. begin
  75071. pTDefRegMap(@Self)^.clr := $00000200;
  75072. end;
  75073. procedure TPORTE_ODCE.setODCE9(thebits : TBits_1); inline;
  75074. begin
  75075. if thebits = 0 then
  75076. pTDefRegMap(@Self)^.clr := $00000200
  75077. else
  75078. pTDefRegMap(@Self)^.&set := $00000200;
  75079. end;
  75080. function TPORTE_ODCE.getODCE9 : TBits_1; inline;
  75081. begin
  75082. getODCE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75083. end;
  75084. procedure TPORTE_ODCE.setw(thebits : TBits_32); inline;
  75085. begin
  75086. pTDefRegMap(@Self)^.val := thebits;
  75087. end;
  75088. function TPORTE_ODCE.getw : TBits_32; inline;
  75089. begin
  75090. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75091. end;
  75092. procedure TPORTF_TRISF.setTRISF0; inline;
  75093. begin
  75094. pTDefRegMap(@Self)^.&set := $00000001;
  75095. end;
  75096. procedure TPORTF_TRISF.clearTRISF0; inline;
  75097. begin
  75098. pTDefRegMap(@Self)^.clr := $00000001;
  75099. end;
  75100. procedure TPORTF_TRISF.setTRISF0(thebits : TBits_1); inline;
  75101. begin
  75102. if thebits = 0 then
  75103. pTDefRegMap(@Self)^.clr := $00000001
  75104. else
  75105. pTDefRegMap(@Self)^.&set := $00000001;
  75106. end;
  75107. function TPORTF_TRISF.getTRISF0 : TBits_1; inline;
  75108. begin
  75109. getTRISF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75110. end;
  75111. procedure TPORTF_TRISF.setTRISF1; inline;
  75112. begin
  75113. pTDefRegMap(@Self)^.&set := $00000002;
  75114. end;
  75115. procedure TPORTF_TRISF.clearTRISF1; inline;
  75116. begin
  75117. pTDefRegMap(@Self)^.clr := $00000002;
  75118. end;
  75119. procedure TPORTF_TRISF.setTRISF1(thebits : TBits_1); inline;
  75120. begin
  75121. if thebits = 0 then
  75122. pTDefRegMap(@Self)^.clr := $00000002
  75123. else
  75124. pTDefRegMap(@Self)^.&set := $00000002;
  75125. end;
  75126. function TPORTF_TRISF.getTRISF1 : TBits_1; inline;
  75127. begin
  75128. getTRISF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75129. end;
  75130. procedure TPORTF_TRISF.setTRISF2; inline;
  75131. begin
  75132. pTDefRegMap(@Self)^.&set := $00000004;
  75133. end;
  75134. procedure TPORTF_TRISF.clearTRISF2; inline;
  75135. begin
  75136. pTDefRegMap(@Self)^.clr := $00000004;
  75137. end;
  75138. procedure TPORTF_TRISF.setTRISF2(thebits : TBits_1); inline;
  75139. begin
  75140. if thebits = 0 then
  75141. pTDefRegMap(@Self)^.clr := $00000004
  75142. else
  75143. pTDefRegMap(@Self)^.&set := $00000004;
  75144. end;
  75145. function TPORTF_TRISF.getTRISF2 : TBits_1; inline;
  75146. begin
  75147. getTRISF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75148. end;
  75149. procedure TPORTF_TRISF.setTRISF3; inline;
  75150. begin
  75151. pTDefRegMap(@Self)^.&set := $00000008;
  75152. end;
  75153. procedure TPORTF_TRISF.clearTRISF3; inline;
  75154. begin
  75155. pTDefRegMap(@Self)^.clr := $00000008;
  75156. end;
  75157. procedure TPORTF_TRISF.setTRISF3(thebits : TBits_1); inline;
  75158. begin
  75159. if thebits = 0 then
  75160. pTDefRegMap(@Self)^.clr := $00000008
  75161. else
  75162. pTDefRegMap(@Self)^.&set := $00000008;
  75163. end;
  75164. function TPORTF_TRISF.getTRISF3 : TBits_1; inline;
  75165. begin
  75166. getTRISF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75167. end;
  75168. procedure TPORTF_TRISF.setTRISF4; inline;
  75169. begin
  75170. pTDefRegMap(@Self)^.&set := $00000010;
  75171. end;
  75172. procedure TPORTF_TRISF.clearTRISF4; inline;
  75173. begin
  75174. pTDefRegMap(@Self)^.clr := $00000010;
  75175. end;
  75176. procedure TPORTF_TRISF.setTRISF4(thebits : TBits_1); inline;
  75177. begin
  75178. if thebits = 0 then
  75179. pTDefRegMap(@Self)^.clr := $00000010
  75180. else
  75181. pTDefRegMap(@Self)^.&set := $00000010;
  75182. end;
  75183. function TPORTF_TRISF.getTRISF4 : TBits_1; inline;
  75184. begin
  75185. getTRISF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75186. end;
  75187. procedure TPORTF_TRISF.setTRISF5; inline;
  75188. begin
  75189. pTDefRegMap(@Self)^.&set := $00000020;
  75190. end;
  75191. procedure TPORTF_TRISF.clearTRISF5; inline;
  75192. begin
  75193. pTDefRegMap(@Self)^.clr := $00000020;
  75194. end;
  75195. procedure TPORTF_TRISF.setTRISF5(thebits : TBits_1); inline;
  75196. begin
  75197. if thebits = 0 then
  75198. pTDefRegMap(@Self)^.clr := $00000020
  75199. else
  75200. pTDefRegMap(@Self)^.&set := $00000020;
  75201. end;
  75202. function TPORTF_TRISF.getTRISF5 : TBits_1; inline;
  75203. begin
  75204. getTRISF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75205. end;
  75206. procedure TPORTF_TRISF.setTRISF8; inline;
  75207. begin
  75208. pTDefRegMap(@Self)^.&set := $00000100;
  75209. end;
  75210. procedure TPORTF_TRISF.clearTRISF8; inline;
  75211. begin
  75212. pTDefRegMap(@Self)^.clr := $00000100;
  75213. end;
  75214. procedure TPORTF_TRISF.setTRISF8(thebits : TBits_1); inline;
  75215. begin
  75216. if thebits = 0 then
  75217. pTDefRegMap(@Self)^.clr := $00000100
  75218. else
  75219. pTDefRegMap(@Self)^.&set := $00000100;
  75220. end;
  75221. function TPORTF_TRISF.getTRISF8 : TBits_1; inline;
  75222. begin
  75223. getTRISF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75224. end;
  75225. procedure TPORTF_TRISF.setTRISF12; inline;
  75226. begin
  75227. pTDefRegMap(@Self)^.&set := $00001000;
  75228. end;
  75229. procedure TPORTF_TRISF.clearTRISF12; inline;
  75230. begin
  75231. pTDefRegMap(@Self)^.clr := $00001000;
  75232. end;
  75233. procedure TPORTF_TRISF.setTRISF12(thebits : TBits_1); inline;
  75234. begin
  75235. if thebits = 0 then
  75236. pTDefRegMap(@Self)^.clr := $00001000
  75237. else
  75238. pTDefRegMap(@Self)^.&set := $00001000;
  75239. end;
  75240. function TPORTF_TRISF.getTRISF12 : TBits_1; inline;
  75241. begin
  75242. getTRISF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75243. end;
  75244. procedure TPORTF_TRISF.setTRISF13; inline;
  75245. begin
  75246. pTDefRegMap(@Self)^.&set := $00002000;
  75247. end;
  75248. procedure TPORTF_TRISF.clearTRISF13; inline;
  75249. begin
  75250. pTDefRegMap(@Self)^.clr := $00002000;
  75251. end;
  75252. procedure TPORTF_TRISF.setTRISF13(thebits : TBits_1); inline;
  75253. begin
  75254. if thebits = 0 then
  75255. pTDefRegMap(@Self)^.clr := $00002000
  75256. else
  75257. pTDefRegMap(@Self)^.&set := $00002000;
  75258. end;
  75259. function TPORTF_TRISF.getTRISF13 : TBits_1; inline;
  75260. begin
  75261. getTRISF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75262. end;
  75263. procedure TPORTF_TRISF.setw(thebits : TBits_32); inline;
  75264. begin
  75265. pTDefRegMap(@Self)^.val := thebits;
  75266. end;
  75267. function TPORTF_TRISF.getw : TBits_32; inline;
  75268. begin
  75269. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75270. end;
  75271. procedure TPORTF_PORTF.setRF0; inline;
  75272. begin
  75273. pTDefRegMap(@Self)^.&set := $00000001;
  75274. end;
  75275. procedure TPORTF_PORTF.clearRF0; inline;
  75276. begin
  75277. pTDefRegMap(@Self)^.clr := $00000001;
  75278. end;
  75279. procedure TPORTF_PORTF.setRF0(thebits : TBits_1); inline;
  75280. begin
  75281. if thebits = 0 then
  75282. pTDefRegMap(@Self)^.clr := $00000001
  75283. else
  75284. pTDefRegMap(@Self)^.&set := $00000001;
  75285. end;
  75286. function TPORTF_PORTF.getRF0 : TBits_1; inline;
  75287. begin
  75288. getRF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75289. end;
  75290. procedure TPORTF_PORTF.setRF1; inline;
  75291. begin
  75292. pTDefRegMap(@Self)^.&set := $00000002;
  75293. end;
  75294. procedure TPORTF_PORTF.clearRF1; inline;
  75295. begin
  75296. pTDefRegMap(@Self)^.clr := $00000002;
  75297. end;
  75298. procedure TPORTF_PORTF.setRF1(thebits : TBits_1); inline;
  75299. begin
  75300. if thebits = 0 then
  75301. pTDefRegMap(@Self)^.clr := $00000002
  75302. else
  75303. pTDefRegMap(@Self)^.&set := $00000002;
  75304. end;
  75305. function TPORTF_PORTF.getRF1 : TBits_1; inline;
  75306. begin
  75307. getRF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75308. end;
  75309. procedure TPORTF_PORTF.setRF2; inline;
  75310. begin
  75311. pTDefRegMap(@Self)^.&set := $00000004;
  75312. end;
  75313. procedure TPORTF_PORTF.clearRF2; inline;
  75314. begin
  75315. pTDefRegMap(@Self)^.clr := $00000004;
  75316. end;
  75317. procedure TPORTF_PORTF.setRF2(thebits : TBits_1); inline;
  75318. begin
  75319. if thebits = 0 then
  75320. pTDefRegMap(@Self)^.clr := $00000004
  75321. else
  75322. pTDefRegMap(@Self)^.&set := $00000004;
  75323. end;
  75324. function TPORTF_PORTF.getRF2 : TBits_1; inline;
  75325. begin
  75326. getRF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75327. end;
  75328. procedure TPORTF_PORTF.setRF3; inline;
  75329. begin
  75330. pTDefRegMap(@Self)^.&set := $00000008;
  75331. end;
  75332. procedure TPORTF_PORTF.clearRF3; inline;
  75333. begin
  75334. pTDefRegMap(@Self)^.clr := $00000008;
  75335. end;
  75336. procedure TPORTF_PORTF.setRF3(thebits : TBits_1); inline;
  75337. begin
  75338. if thebits = 0 then
  75339. pTDefRegMap(@Self)^.clr := $00000008
  75340. else
  75341. pTDefRegMap(@Self)^.&set := $00000008;
  75342. end;
  75343. function TPORTF_PORTF.getRF3 : TBits_1; inline;
  75344. begin
  75345. getRF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75346. end;
  75347. procedure TPORTF_PORTF.setRF4; inline;
  75348. begin
  75349. pTDefRegMap(@Self)^.&set := $00000010;
  75350. end;
  75351. procedure TPORTF_PORTF.clearRF4; inline;
  75352. begin
  75353. pTDefRegMap(@Self)^.clr := $00000010;
  75354. end;
  75355. procedure TPORTF_PORTF.setRF4(thebits : TBits_1); inline;
  75356. begin
  75357. if thebits = 0 then
  75358. pTDefRegMap(@Self)^.clr := $00000010
  75359. else
  75360. pTDefRegMap(@Self)^.&set := $00000010;
  75361. end;
  75362. function TPORTF_PORTF.getRF4 : TBits_1; inline;
  75363. begin
  75364. getRF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75365. end;
  75366. procedure TPORTF_PORTF.setRF5; inline;
  75367. begin
  75368. pTDefRegMap(@Self)^.&set := $00000020;
  75369. end;
  75370. procedure TPORTF_PORTF.clearRF5; inline;
  75371. begin
  75372. pTDefRegMap(@Self)^.clr := $00000020;
  75373. end;
  75374. procedure TPORTF_PORTF.setRF5(thebits : TBits_1); inline;
  75375. begin
  75376. if thebits = 0 then
  75377. pTDefRegMap(@Self)^.clr := $00000020
  75378. else
  75379. pTDefRegMap(@Self)^.&set := $00000020;
  75380. end;
  75381. function TPORTF_PORTF.getRF5 : TBits_1; inline;
  75382. begin
  75383. getRF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75384. end;
  75385. procedure TPORTF_PORTF.setRF8; inline;
  75386. begin
  75387. pTDefRegMap(@Self)^.&set := $00000100;
  75388. end;
  75389. procedure TPORTF_PORTF.clearRF8; inline;
  75390. begin
  75391. pTDefRegMap(@Self)^.clr := $00000100;
  75392. end;
  75393. procedure TPORTF_PORTF.setRF8(thebits : TBits_1); inline;
  75394. begin
  75395. if thebits = 0 then
  75396. pTDefRegMap(@Self)^.clr := $00000100
  75397. else
  75398. pTDefRegMap(@Self)^.&set := $00000100;
  75399. end;
  75400. function TPORTF_PORTF.getRF8 : TBits_1; inline;
  75401. begin
  75402. getRF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75403. end;
  75404. procedure TPORTF_PORTF.setRF12; inline;
  75405. begin
  75406. pTDefRegMap(@Self)^.&set := $00001000;
  75407. end;
  75408. procedure TPORTF_PORTF.clearRF12; inline;
  75409. begin
  75410. pTDefRegMap(@Self)^.clr := $00001000;
  75411. end;
  75412. procedure TPORTF_PORTF.setRF12(thebits : TBits_1); inline;
  75413. begin
  75414. if thebits = 0 then
  75415. pTDefRegMap(@Self)^.clr := $00001000
  75416. else
  75417. pTDefRegMap(@Self)^.&set := $00001000;
  75418. end;
  75419. function TPORTF_PORTF.getRF12 : TBits_1; inline;
  75420. begin
  75421. getRF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75422. end;
  75423. procedure TPORTF_PORTF.setRF13; inline;
  75424. begin
  75425. pTDefRegMap(@Self)^.&set := $00002000;
  75426. end;
  75427. procedure TPORTF_PORTF.clearRF13; inline;
  75428. begin
  75429. pTDefRegMap(@Self)^.clr := $00002000;
  75430. end;
  75431. procedure TPORTF_PORTF.setRF13(thebits : TBits_1); inline;
  75432. begin
  75433. if thebits = 0 then
  75434. pTDefRegMap(@Self)^.clr := $00002000
  75435. else
  75436. pTDefRegMap(@Self)^.&set := $00002000;
  75437. end;
  75438. function TPORTF_PORTF.getRF13 : TBits_1; inline;
  75439. begin
  75440. getRF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75441. end;
  75442. procedure TPORTF_PORTF.setw(thebits : TBits_32); inline;
  75443. begin
  75444. pTDefRegMap(@Self)^.val := thebits;
  75445. end;
  75446. function TPORTF_PORTF.getw : TBits_32; inline;
  75447. begin
  75448. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75449. end;
  75450. procedure TPORTF_LATF.setLATF0; inline;
  75451. begin
  75452. pTDefRegMap(@Self)^.&set := $00000001;
  75453. end;
  75454. procedure TPORTF_LATF.clearLATF0; inline;
  75455. begin
  75456. pTDefRegMap(@Self)^.clr := $00000001;
  75457. end;
  75458. procedure TPORTF_LATF.setLATF0(thebits : TBits_1); inline;
  75459. begin
  75460. if thebits = 0 then
  75461. pTDefRegMap(@Self)^.clr := $00000001
  75462. else
  75463. pTDefRegMap(@Self)^.&set := $00000001;
  75464. end;
  75465. function TPORTF_LATF.getLATF0 : TBits_1; inline;
  75466. begin
  75467. getLATF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75468. end;
  75469. procedure TPORTF_LATF.setLATF1; inline;
  75470. begin
  75471. pTDefRegMap(@Self)^.&set := $00000002;
  75472. end;
  75473. procedure TPORTF_LATF.clearLATF1; inline;
  75474. begin
  75475. pTDefRegMap(@Self)^.clr := $00000002;
  75476. end;
  75477. procedure TPORTF_LATF.setLATF1(thebits : TBits_1); inline;
  75478. begin
  75479. if thebits = 0 then
  75480. pTDefRegMap(@Self)^.clr := $00000002
  75481. else
  75482. pTDefRegMap(@Self)^.&set := $00000002;
  75483. end;
  75484. function TPORTF_LATF.getLATF1 : TBits_1; inline;
  75485. begin
  75486. getLATF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75487. end;
  75488. procedure TPORTF_LATF.setLATF2; inline;
  75489. begin
  75490. pTDefRegMap(@Self)^.&set := $00000004;
  75491. end;
  75492. procedure TPORTF_LATF.clearLATF2; inline;
  75493. begin
  75494. pTDefRegMap(@Self)^.clr := $00000004;
  75495. end;
  75496. procedure TPORTF_LATF.setLATF2(thebits : TBits_1); inline;
  75497. begin
  75498. if thebits = 0 then
  75499. pTDefRegMap(@Self)^.clr := $00000004
  75500. else
  75501. pTDefRegMap(@Self)^.&set := $00000004;
  75502. end;
  75503. function TPORTF_LATF.getLATF2 : TBits_1; inline;
  75504. begin
  75505. getLATF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75506. end;
  75507. procedure TPORTF_LATF.setLATF3; inline;
  75508. begin
  75509. pTDefRegMap(@Self)^.&set := $00000008;
  75510. end;
  75511. procedure TPORTF_LATF.clearLATF3; inline;
  75512. begin
  75513. pTDefRegMap(@Self)^.clr := $00000008;
  75514. end;
  75515. procedure TPORTF_LATF.setLATF3(thebits : TBits_1); inline;
  75516. begin
  75517. if thebits = 0 then
  75518. pTDefRegMap(@Self)^.clr := $00000008
  75519. else
  75520. pTDefRegMap(@Self)^.&set := $00000008;
  75521. end;
  75522. function TPORTF_LATF.getLATF3 : TBits_1; inline;
  75523. begin
  75524. getLATF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75525. end;
  75526. procedure TPORTF_LATF.setLATF4; inline;
  75527. begin
  75528. pTDefRegMap(@Self)^.&set := $00000010;
  75529. end;
  75530. procedure TPORTF_LATF.clearLATF4; inline;
  75531. begin
  75532. pTDefRegMap(@Self)^.clr := $00000010;
  75533. end;
  75534. procedure TPORTF_LATF.setLATF4(thebits : TBits_1); inline;
  75535. begin
  75536. if thebits = 0 then
  75537. pTDefRegMap(@Self)^.clr := $00000010
  75538. else
  75539. pTDefRegMap(@Self)^.&set := $00000010;
  75540. end;
  75541. function TPORTF_LATF.getLATF4 : TBits_1; inline;
  75542. begin
  75543. getLATF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75544. end;
  75545. procedure TPORTF_LATF.setLATF5; inline;
  75546. begin
  75547. pTDefRegMap(@Self)^.&set := $00000020;
  75548. end;
  75549. procedure TPORTF_LATF.clearLATF5; inline;
  75550. begin
  75551. pTDefRegMap(@Self)^.clr := $00000020;
  75552. end;
  75553. procedure TPORTF_LATF.setLATF5(thebits : TBits_1); inline;
  75554. begin
  75555. if thebits = 0 then
  75556. pTDefRegMap(@Self)^.clr := $00000020
  75557. else
  75558. pTDefRegMap(@Self)^.&set := $00000020;
  75559. end;
  75560. function TPORTF_LATF.getLATF5 : TBits_1; inline;
  75561. begin
  75562. getLATF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75563. end;
  75564. procedure TPORTF_LATF.setLATF8; inline;
  75565. begin
  75566. pTDefRegMap(@Self)^.&set := $00000100;
  75567. end;
  75568. procedure TPORTF_LATF.clearLATF8; inline;
  75569. begin
  75570. pTDefRegMap(@Self)^.clr := $00000100;
  75571. end;
  75572. procedure TPORTF_LATF.setLATF8(thebits : TBits_1); inline;
  75573. begin
  75574. if thebits = 0 then
  75575. pTDefRegMap(@Self)^.clr := $00000100
  75576. else
  75577. pTDefRegMap(@Self)^.&set := $00000100;
  75578. end;
  75579. function TPORTF_LATF.getLATF8 : TBits_1; inline;
  75580. begin
  75581. getLATF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75582. end;
  75583. procedure TPORTF_LATF.setLATF12; inline;
  75584. begin
  75585. pTDefRegMap(@Self)^.&set := $00001000;
  75586. end;
  75587. procedure TPORTF_LATF.clearLATF12; inline;
  75588. begin
  75589. pTDefRegMap(@Self)^.clr := $00001000;
  75590. end;
  75591. procedure TPORTF_LATF.setLATF12(thebits : TBits_1); inline;
  75592. begin
  75593. if thebits = 0 then
  75594. pTDefRegMap(@Self)^.clr := $00001000
  75595. else
  75596. pTDefRegMap(@Self)^.&set := $00001000;
  75597. end;
  75598. function TPORTF_LATF.getLATF12 : TBits_1; inline;
  75599. begin
  75600. getLATF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75601. end;
  75602. procedure TPORTF_LATF.setLATF13; inline;
  75603. begin
  75604. pTDefRegMap(@Self)^.&set := $00002000;
  75605. end;
  75606. procedure TPORTF_LATF.clearLATF13; inline;
  75607. begin
  75608. pTDefRegMap(@Self)^.clr := $00002000;
  75609. end;
  75610. procedure TPORTF_LATF.setLATF13(thebits : TBits_1); inline;
  75611. begin
  75612. if thebits = 0 then
  75613. pTDefRegMap(@Self)^.clr := $00002000
  75614. else
  75615. pTDefRegMap(@Self)^.&set := $00002000;
  75616. end;
  75617. function TPORTF_LATF.getLATF13 : TBits_1; inline;
  75618. begin
  75619. getLATF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75620. end;
  75621. procedure TPORTF_LATF.setw(thebits : TBits_32); inline;
  75622. begin
  75623. pTDefRegMap(@Self)^.val := thebits;
  75624. end;
  75625. function TPORTF_LATF.getw : TBits_32; inline;
  75626. begin
  75627. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75628. end;
  75629. procedure TPORTF_ODCF.setODCF0; inline;
  75630. begin
  75631. pTDefRegMap(@Self)^.&set := $00000001;
  75632. end;
  75633. procedure TPORTF_ODCF.clearODCF0; inline;
  75634. begin
  75635. pTDefRegMap(@Self)^.clr := $00000001;
  75636. end;
  75637. procedure TPORTF_ODCF.setODCF0(thebits : TBits_1); inline;
  75638. begin
  75639. if thebits = 0 then
  75640. pTDefRegMap(@Self)^.clr := $00000001
  75641. else
  75642. pTDefRegMap(@Self)^.&set := $00000001;
  75643. end;
  75644. function TPORTF_ODCF.getODCF0 : TBits_1; inline;
  75645. begin
  75646. getODCF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75647. end;
  75648. procedure TPORTF_ODCF.setODCF1; inline;
  75649. begin
  75650. pTDefRegMap(@Self)^.&set := $00000002;
  75651. end;
  75652. procedure TPORTF_ODCF.clearODCF1; inline;
  75653. begin
  75654. pTDefRegMap(@Self)^.clr := $00000002;
  75655. end;
  75656. procedure TPORTF_ODCF.setODCF1(thebits : TBits_1); inline;
  75657. begin
  75658. if thebits = 0 then
  75659. pTDefRegMap(@Self)^.clr := $00000002
  75660. else
  75661. pTDefRegMap(@Self)^.&set := $00000002;
  75662. end;
  75663. function TPORTF_ODCF.getODCF1 : TBits_1; inline;
  75664. begin
  75665. getODCF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75666. end;
  75667. procedure TPORTF_ODCF.setODCF2; inline;
  75668. begin
  75669. pTDefRegMap(@Self)^.&set := $00000004;
  75670. end;
  75671. procedure TPORTF_ODCF.clearODCF2; inline;
  75672. begin
  75673. pTDefRegMap(@Self)^.clr := $00000004;
  75674. end;
  75675. procedure TPORTF_ODCF.setODCF2(thebits : TBits_1); inline;
  75676. begin
  75677. if thebits = 0 then
  75678. pTDefRegMap(@Self)^.clr := $00000004
  75679. else
  75680. pTDefRegMap(@Self)^.&set := $00000004;
  75681. end;
  75682. function TPORTF_ODCF.getODCF2 : TBits_1; inline;
  75683. begin
  75684. getODCF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75685. end;
  75686. procedure TPORTF_ODCF.setODCF3; inline;
  75687. begin
  75688. pTDefRegMap(@Self)^.&set := $00000008;
  75689. end;
  75690. procedure TPORTF_ODCF.clearODCF3; inline;
  75691. begin
  75692. pTDefRegMap(@Self)^.clr := $00000008;
  75693. end;
  75694. procedure TPORTF_ODCF.setODCF3(thebits : TBits_1); inline;
  75695. begin
  75696. if thebits = 0 then
  75697. pTDefRegMap(@Self)^.clr := $00000008
  75698. else
  75699. pTDefRegMap(@Self)^.&set := $00000008;
  75700. end;
  75701. function TPORTF_ODCF.getODCF3 : TBits_1; inline;
  75702. begin
  75703. getODCF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75704. end;
  75705. procedure TPORTF_ODCF.setODCF4; inline;
  75706. begin
  75707. pTDefRegMap(@Self)^.&set := $00000010;
  75708. end;
  75709. procedure TPORTF_ODCF.clearODCF4; inline;
  75710. begin
  75711. pTDefRegMap(@Self)^.clr := $00000010;
  75712. end;
  75713. procedure TPORTF_ODCF.setODCF4(thebits : TBits_1); inline;
  75714. begin
  75715. if thebits = 0 then
  75716. pTDefRegMap(@Self)^.clr := $00000010
  75717. else
  75718. pTDefRegMap(@Self)^.&set := $00000010;
  75719. end;
  75720. function TPORTF_ODCF.getODCF4 : TBits_1; inline;
  75721. begin
  75722. getODCF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  75723. end;
  75724. procedure TPORTF_ODCF.setODCF5; inline;
  75725. begin
  75726. pTDefRegMap(@Self)^.&set := $00000020;
  75727. end;
  75728. procedure TPORTF_ODCF.clearODCF5; inline;
  75729. begin
  75730. pTDefRegMap(@Self)^.clr := $00000020;
  75731. end;
  75732. procedure TPORTF_ODCF.setODCF5(thebits : TBits_1); inline;
  75733. begin
  75734. if thebits = 0 then
  75735. pTDefRegMap(@Self)^.clr := $00000020
  75736. else
  75737. pTDefRegMap(@Self)^.&set := $00000020;
  75738. end;
  75739. function TPORTF_ODCF.getODCF5 : TBits_1; inline;
  75740. begin
  75741. getODCF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  75742. end;
  75743. procedure TPORTF_ODCF.setODCF8; inline;
  75744. begin
  75745. pTDefRegMap(@Self)^.&set := $00000100;
  75746. end;
  75747. procedure TPORTF_ODCF.clearODCF8; inline;
  75748. begin
  75749. pTDefRegMap(@Self)^.clr := $00000100;
  75750. end;
  75751. procedure TPORTF_ODCF.setODCF8(thebits : TBits_1); inline;
  75752. begin
  75753. if thebits = 0 then
  75754. pTDefRegMap(@Self)^.clr := $00000100
  75755. else
  75756. pTDefRegMap(@Self)^.&set := $00000100;
  75757. end;
  75758. function TPORTF_ODCF.getODCF8 : TBits_1; inline;
  75759. begin
  75760. getODCF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75761. end;
  75762. procedure TPORTF_ODCF.setODCF12; inline;
  75763. begin
  75764. pTDefRegMap(@Self)^.&set := $00001000;
  75765. end;
  75766. procedure TPORTF_ODCF.clearODCF12; inline;
  75767. begin
  75768. pTDefRegMap(@Self)^.clr := $00001000;
  75769. end;
  75770. procedure TPORTF_ODCF.setODCF12(thebits : TBits_1); inline;
  75771. begin
  75772. if thebits = 0 then
  75773. pTDefRegMap(@Self)^.clr := $00001000
  75774. else
  75775. pTDefRegMap(@Self)^.&set := $00001000;
  75776. end;
  75777. function TPORTF_ODCF.getODCF12 : TBits_1; inline;
  75778. begin
  75779. getODCF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75780. end;
  75781. procedure TPORTF_ODCF.setODCF13; inline;
  75782. begin
  75783. pTDefRegMap(@Self)^.&set := $00002000;
  75784. end;
  75785. procedure TPORTF_ODCF.clearODCF13; inline;
  75786. begin
  75787. pTDefRegMap(@Self)^.clr := $00002000;
  75788. end;
  75789. procedure TPORTF_ODCF.setODCF13(thebits : TBits_1); inline;
  75790. begin
  75791. if thebits = 0 then
  75792. pTDefRegMap(@Self)^.clr := $00002000
  75793. else
  75794. pTDefRegMap(@Self)^.&set := $00002000;
  75795. end;
  75796. function TPORTF_ODCF.getODCF13 : TBits_1; inline;
  75797. begin
  75798. getODCF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75799. end;
  75800. procedure TPORTF_ODCF.setw(thebits : TBits_32); inline;
  75801. begin
  75802. pTDefRegMap(@Self)^.val := thebits;
  75803. end;
  75804. function TPORTF_ODCF.getw : TBits_32; inline;
  75805. begin
  75806. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75807. end;
  75808. procedure TPORTG_TRISG.setTRISG0; inline;
  75809. begin
  75810. pTDefRegMap(@Self)^.&set := $00000001;
  75811. end;
  75812. procedure TPORTG_TRISG.clearTRISG0; inline;
  75813. begin
  75814. pTDefRegMap(@Self)^.clr := $00000001;
  75815. end;
  75816. procedure TPORTG_TRISG.setTRISG0(thebits : TBits_1); inline;
  75817. begin
  75818. if thebits = 0 then
  75819. pTDefRegMap(@Self)^.clr := $00000001
  75820. else
  75821. pTDefRegMap(@Self)^.&set := $00000001;
  75822. end;
  75823. function TPORTG_TRISG.getTRISG0 : TBits_1; inline;
  75824. begin
  75825. getTRISG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75826. end;
  75827. procedure TPORTG_TRISG.setTRISG1; inline;
  75828. begin
  75829. pTDefRegMap(@Self)^.&set := $00000002;
  75830. end;
  75831. procedure TPORTG_TRISG.clearTRISG1; inline;
  75832. begin
  75833. pTDefRegMap(@Self)^.clr := $00000002;
  75834. end;
  75835. procedure TPORTG_TRISG.setTRISG1(thebits : TBits_1); inline;
  75836. begin
  75837. if thebits = 0 then
  75838. pTDefRegMap(@Self)^.clr := $00000002
  75839. else
  75840. pTDefRegMap(@Self)^.&set := $00000002;
  75841. end;
  75842. function TPORTG_TRISG.getTRISG1 : TBits_1; inline;
  75843. begin
  75844. getTRISG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75845. end;
  75846. procedure TPORTG_TRISG.setTRISG2; inline;
  75847. begin
  75848. pTDefRegMap(@Self)^.&set := $00000004;
  75849. end;
  75850. procedure TPORTG_TRISG.clearTRISG2; inline;
  75851. begin
  75852. pTDefRegMap(@Self)^.clr := $00000004;
  75853. end;
  75854. procedure TPORTG_TRISG.setTRISG2(thebits : TBits_1); inline;
  75855. begin
  75856. if thebits = 0 then
  75857. pTDefRegMap(@Self)^.clr := $00000004
  75858. else
  75859. pTDefRegMap(@Self)^.&set := $00000004;
  75860. end;
  75861. function TPORTG_TRISG.getTRISG2 : TBits_1; inline;
  75862. begin
  75863. getTRISG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75864. end;
  75865. procedure TPORTG_TRISG.setTRISG3; inline;
  75866. begin
  75867. pTDefRegMap(@Self)^.&set := $00000008;
  75868. end;
  75869. procedure TPORTG_TRISG.clearTRISG3; inline;
  75870. begin
  75871. pTDefRegMap(@Self)^.clr := $00000008;
  75872. end;
  75873. procedure TPORTG_TRISG.setTRISG3(thebits : TBits_1); inline;
  75874. begin
  75875. if thebits = 0 then
  75876. pTDefRegMap(@Self)^.clr := $00000008
  75877. else
  75878. pTDefRegMap(@Self)^.&set := $00000008;
  75879. end;
  75880. function TPORTG_TRISG.getTRISG3 : TBits_1; inline;
  75881. begin
  75882. getTRISG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75883. end;
  75884. procedure TPORTG_TRISG.setTRISG6; inline;
  75885. begin
  75886. pTDefRegMap(@Self)^.&set := $00000040;
  75887. end;
  75888. procedure TPORTG_TRISG.clearTRISG6; inline;
  75889. begin
  75890. pTDefRegMap(@Self)^.clr := $00000040;
  75891. end;
  75892. procedure TPORTG_TRISG.setTRISG6(thebits : TBits_1); inline;
  75893. begin
  75894. if thebits = 0 then
  75895. pTDefRegMap(@Self)^.clr := $00000040
  75896. else
  75897. pTDefRegMap(@Self)^.&set := $00000040;
  75898. end;
  75899. function TPORTG_TRISG.getTRISG6 : TBits_1; inline;
  75900. begin
  75901. getTRISG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  75902. end;
  75903. procedure TPORTG_TRISG.setTRISG7; inline;
  75904. begin
  75905. pTDefRegMap(@Self)^.&set := $00000080;
  75906. end;
  75907. procedure TPORTG_TRISG.clearTRISG7; inline;
  75908. begin
  75909. pTDefRegMap(@Self)^.clr := $00000080;
  75910. end;
  75911. procedure TPORTG_TRISG.setTRISG7(thebits : TBits_1); inline;
  75912. begin
  75913. if thebits = 0 then
  75914. pTDefRegMap(@Self)^.clr := $00000080
  75915. else
  75916. pTDefRegMap(@Self)^.&set := $00000080;
  75917. end;
  75918. function TPORTG_TRISG.getTRISG7 : TBits_1; inline;
  75919. begin
  75920. getTRISG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  75921. end;
  75922. procedure TPORTG_TRISG.setTRISG8; inline;
  75923. begin
  75924. pTDefRegMap(@Self)^.&set := $00000100;
  75925. end;
  75926. procedure TPORTG_TRISG.clearTRISG8; inline;
  75927. begin
  75928. pTDefRegMap(@Self)^.clr := $00000100;
  75929. end;
  75930. procedure TPORTG_TRISG.setTRISG8(thebits : TBits_1); inline;
  75931. begin
  75932. if thebits = 0 then
  75933. pTDefRegMap(@Self)^.clr := $00000100
  75934. else
  75935. pTDefRegMap(@Self)^.&set := $00000100;
  75936. end;
  75937. function TPORTG_TRISG.getTRISG8 : TBits_1; inline;
  75938. begin
  75939. getTRISG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  75940. end;
  75941. procedure TPORTG_TRISG.setTRISG9; inline;
  75942. begin
  75943. pTDefRegMap(@Self)^.&set := $00000200;
  75944. end;
  75945. procedure TPORTG_TRISG.clearTRISG9; inline;
  75946. begin
  75947. pTDefRegMap(@Self)^.clr := $00000200;
  75948. end;
  75949. procedure TPORTG_TRISG.setTRISG9(thebits : TBits_1); inline;
  75950. begin
  75951. if thebits = 0 then
  75952. pTDefRegMap(@Self)^.clr := $00000200
  75953. else
  75954. pTDefRegMap(@Self)^.&set := $00000200;
  75955. end;
  75956. function TPORTG_TRISG.getTRISG9 : TBits_1; inline;
  75957. begin
  75958. getTRISG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  75959. end;
  75960. procedure TPORTG_TRISG.setTRISG12; inline;
  75961. begin
  75962. pTDefRegMap(@Self)^.&set := $00001000;
  75963. end;
  75964. procedure TPORTG_TRISG.clearTRISG12; inline;
  75965. begin
  75966. pTDefRegMap(@Self)^.clr := $00001000;
  75967. end;
  75968. procedure TPORTG_TRISG.setTRISG12(thebits : TBits_1); inline;
  75969. begin
  75970. if thebits = 0 then
  75971. pTDefRegMap(@Self)^.clr := $00001000
  75972. else
  75973. pTDefRegMap(@Self)^.&set := $00001000;
  75974. end;
  75975. function TPORTG_TRISG.getTRISG12 : TBits_1; inline;
  75976. begin
  75977. getTRISG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75978. end;
  75979. procedure TPORTG_TRISG.setTRISG13; inline;
  75980. begin
  75981. pTDefRegMap(@Self)^.&set := $00002000;
  75982. end;
  75983. procedure TPORTG_TRISG.clearTRISG13; inline;
  75984. begin
  75985. pTDefRegMap(@Self)^.clr := $00002000;
  75986. end;
  75987. procedure TPORTG_TRISG.setTRISG13(thebits : TBits_1); inline;
  75988. begin
  75989. if thebits = 0 then
  75990. pTDefRegMap(@Self)^.clr := $00002000
  75991. else
  75992. pTDefRegMap(@Self)^.&set := $00002000;
  75993. end;
  75994. function TPORTG_TRISG.getTRISG13 : TBits_1; inline;
  75995. begin
  75996. getTRISG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75997. end;
  75998. procedure TPORTG_TRISG.setTRISG14; inline;
  75999. begin
  76000. pTDefRegMap(@Self)^.&set := $00004000;
  76001. end;
  76002. procedure TPORTG_TRISG.clearTRISG14; inline;
  76003. begin
  76004. pTDefRegMap(@Self)^.clr := $00004000;
  76005. end;
  76006. procedure TPORTG_TRISG.setTRISG14(thebits : TBits_1); inline;
  76007. begin
  76008. if thebits = 0 then
  76009. pTDefRegMap(@Self)^.clr := $00004000
  76010. else
  76011. pTDefRegMap(@Self)^.&set := $00004000;
  76012. end;
  76013. function TPORTG_TRISG.getTRISG14 : TBits_1; inline;
  76014. begin
  76015. getTRISG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76016. end;
  76017. procedure TPORTG_TRISG.setTRISG15; inline;
  76018. begin
  76019. pTDefRegMap(@Self)^.&set := $00008000;
  76020. end;
  76021. procedure TPORTG_TRISG.clearTRISG15; inline;
  76022. begin
  76023. pTDefRegMap(@Self)^.clr := $00008000;
  76024. end;
  76025. procedure TPORTG_TRISG.setTRISG15(thebits : TBits_1); inline;
  76026. begin
  76027. if thebits = 0 then
  76028. pTDefRegMap(@Self)^.clr := $00008000
  76029. else
  76030. pTDefRegMap(@Self)^.&set := $00008000;
  76031. end;
  76032. function TPORTG_TRISG.getTRISG15 : TBits_1; inline;
  76033. begin
  76034. getTRISG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76035. end;
  76036. procedure TPORTG_TRISG.setw(thebits : TBits_32); inline;
  76037. begin
  76038. pTDefRegMap(@Self)^.val := thebits;
  76039. end;
  76040. function TPORTG_TRISG.getw : TBits_32; inline;
  76041. begin
  76042. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76043. end;
  76044. procedure TPORTG_PORTG.setRG0; inline;
  76045. begin
  76046. pTDefRegMap(@Self)^.&set := $00000001;
  76047. end;
  76048. procedure TPORTG_PORTG.clearRG0; inline;
  76049. begin
  76050. pTDefRegMap(@Self)^.clr := $00000001;
  76051. end;
  76052. procedure TPORTG_PORTG.setRG0(thebits : TBits_1); inline;
  76053. begin
  76054. if thebits = 0 then
  76055. pTDefRegMap(@Self)^.clr := $00000001
  76056. else
  76057. pTDefRegMap(@Self)^.&set := $00000001;
  76058. end;
  76059. function TPORTG_PORTG.getRG0 : TBits_1; inline;
  76060. begin
  76061. getRG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76062. end;
  76063. procedure TPORTG_PORTG.setRG1; inline;
  76064. begin
  76065. pTDefRegMap(@Self)^.&set := $00000002;
  76066. end;
  76067. procedure TPORTG_PORTG.clearRG1; inline;
  76068. begin
  76069. pTDefRegMap(@Self)^.clr := $00000002;
  76070. end;
  76071. procedure TPORTG_PORTG.setRG1(thebits : TBits_1); inline;
  76072. begin
  76073. if thebits = 0 then
  76074. pTDefRegMap(@Self)^.clr := $00000002
  76075. else
  76076. pTDefRegMap(@Self)^.&set := $00000002;
  76077. end;
  76078. function TPORTG_PORTG.getRG1 : TBits_1; inline;
  76079. begin
  76080. getRG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76081. end;
  76082. procedure TPORTG_PORTG.setRG2; inline;
  76083. begin
  76084. pTDefRegMap(@Self)^.&set := $00000004;
  76085. end;
  76086. procedure TPORTG_PORTG.clearRG2; inline;
  76087. begin
  76088. pTDefRegMap(@Self)^.clr := $00000004;
  76089. end;
  76090. procedure TPORTG_PORTG.setRG2(thebits : TBits_1); inline;
  76091. begin
  76092. if thebits = 0 then
  76093. pTDefRegMap(@Self)^.clr := $00000004
  76094. else
  76095. pTDefRegMap(@Self)^.&set := $00000004;
  76096. end;
  76097. function TPORTG_PORTG.getRG2 : TBits_1; inline;
  76098. begin
  76099. getRG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76100. end;
  76101. procedure TPORTG_PORTG.setRG3; inline;
  76102. begin
  76103. pTDefRegMap(@Self)^.&set := $00000008;
  76104. end;
  76105. procedure TPORTG_PORTG.clearRG3; inline;
  76106. begin
  76107. pTDefRegMap(@Self)^.clr := $00000008;
  76108. end;
  76109. procedure TPORTG_PORTG.setRG3(thebits : TBits_1); inline;
  76110. begin
  76111. if thebits = 0 then
  76112. pTDefRegMap(@Self)^.clr := $00000008
  76113. else
  76114. pTDefRegMap(@Self)^.&set := $00000008;
  76115. end;
  76116. function TPORTG_PORTG.getRG3 : TBits_1; inline;
  76117. begin
  76118. getRG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76119. end;
  76120. procedure TPORTG_PORTG.setRG6; inline;
  76121. begin
  76122. pTDefRegMap(@Self)^.&set := $00000040;
  76123. end;
  76124. procedure TPORTG_PORTG.clearRG6; inline;
  76125. begin
  76126. pTDefRegMap(@Self)^.clr := $00000040;
  76127. end;
  76128. procedure TPORTG_PORTG.setRG6(thebits : TBits_1); inline;
  76129. begin
  76130. if thebits = 0 then
  76131. pTDefRegMap(@Self)^.clr := $00000040
  76132. else
  76133. pTDefRegMap(@Self)^.&set := $00000040;
  76134. end;
  76135. function TPORTG_PORTG.getRG6 : TBits_1; inline;
  76136. begin
  76137. getRG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76138. end;
  76139. procedure TPORTG_PORTG.setRG7; inline;
  76140. begin
  76141. pTDefRegMap(@Self)^.&set := $00000080;
  76142. end;
  76143. procedure TPORTG_PORTG.clearRG7; inline;
  76144. begin
  76145. pTDefRegMap(@Self)^.clr := $00000080;
  76146. end;
  76147. procedure TPORTG_PORTG.setRG7(thebits : TBits_1); inline;
  76148. begin
  76149. if thebits = 0 then
  76150. pTDefRegMap(@Self)^.clr := $00000080
  76151. else
  76152. pTDefRegMap(@Self)^.&set := $00000080;
  76153. end;
  76154. function TPORTG_PORTG.getRG7 : TBits_1; inline;
  76155. begin
  76156. getRG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76157. end;
  76158. procedure TPORTG_PORTG.setRG8; inline;
  76159. begin
  76160. pTDefRegMap(@Self)^.&set := $00000100;
  76161. end;
  76162. procedure TPORTG_PORTG.clearRG8; inline;
  76163. begin
  76164. pTDefRegMap(@Self)^.clr := $00000100;
  76165. end;
  76166. procedure TPORTG_PORTG.setRG8(thebits : TBits_1); inline;
  76167. begin
  76168. if thebits = 0 then
  76169. pTDefRegMap(@Self)^.clr := $00000100
  76170. else
  76171. pTDefRegMap(@Self)^.&set := $00000100;
  76172. end;
  76173. function TPORTG_PORTG.getRG8 : TBits_1; inline;
  76174. begin
  76175. getRG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76176. end;
  76177. procedure TPORTG_PORTG.setRG9; inline;
  76178. begin
  76179. pTDefRegMap(@Self)^.&set := $00000200;
  76180. end;
  76181. procedure TPORTG_PORTG.clearRG9; inline;
  76182. begin
  76183. pTDefRegMap(@Self)^.clr := $00000200;
  76184. end;
  76185. procedure TPORTG_PORTG.setRG9(thebits : TBits_1); inline;
  76186. begin
  76187. if thebits = 0 then
  76188. pTDefRegMap(@Self)^.clr := $00000200
  76189. else
  76190. pTDefRegMap(@Self)^.&set := $00000200;
  76191. end;
  76192. function TPORTG_PORTG.getRG9 : TBits_1; inline;
  76193. begin
  76194. getRG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76195. end;
  76196. procedure TPORTG_PORTG.setRG12; inline;
  76197. begin
  76198. pTDefRegMap(@Self)^.&set := $00001000;
  76199. end;
  76200. procedure TPORTG_PORTG.clearRG12; inline;
  76201. begin
  76202. pTDefRegMap(@Self)^.clr := $00001000;
  76203. end;
  76204. procedure TPORTG_PORTG.setRG12(thebits : TBits_1); inline;
  76205. begin
  76206. if thebits = 0 then
  76207. pTDefRegMap(@Self)^.clr := $00001000
  76208. else
  76209. pTDefRegMap(@Self)^.&set := $00001000;
  76210. end;
  76211. function TPORTG_PORTG.getRG12 : TBits_1; inline;
  76212. begin
  76213. getRG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76214. end;
  76215. procedure TPORTG_PORTG.setRG13; inline;
  76216. begin
  76217. pTDefRegMap(@Self)^.&set := $00002000;
  76218. end;
  76219. procedure TPORTG_PORTG.clearRG13; inline;
  76220. begin
  76221. pTDefRegMap(@Self)^.clr := $00002000;
  76222. end;
  76223. procedure TPORTG_PORTG.setRG13(thebits : TBits_1); inline;
  76224. begin
  76225. if thebits = 0 then
  76226. pTDefRegMap(@Self)^.clr := $00002000
  76227. else
  76228. pTDefRegMap(@Self)^.&set := $00002000;
  76229. end;
  76230. function TPORTG_PORTG.getRG13 : TBits_1; inline;
  76231. begin
  76232. getRG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76233. end;
  76234. procedure TPORTG_PORTG.setRG14; inline;
  76235. begin
  76236. pTDefRegMap(@Self)^.&set := $00004000;
  76237. end;
  76238. procedure TPORTG_PORTG.clearRG14; inline;
  76239. begin
  76240. pTDefRegMap(@Self)^.clr := $00004000;
  76241. end;
  76242. procedure TPORTG_PORTG.setRG14(thebits : TBits_1); inline;
  76243. begin
  76244. if thebits = 0 then
  76245. pTDefRegMap(@Self)^.clr := $00004000
  76246. else
  76247. pTDefRegMap(@Self)^.&set := $00004000;
  76248. end;
  76249. function TPORTG_PORTG.getRG14 : TBits_1; inline;
  76250. begin
  76251. getRG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76252. end;
  76253. procedure TPORTG_PORTG.setRG15; inline;
  76254. begin
  76255. pTDefRegMap(@Self)^.&set := $00008000;
  76256. end;
  76257. procedure TPORTG_PORTG.clearRG15; inline;
  76258. begin
  76259. pTDefRegMap(@Self)^.clr := $00008000;
  76260. end;
  76261. procedure TPORTG_PORTG.setRG15(thebits : TBits_1); inline;
  76262. begin
  76263. if thebits = 0 then
  76264. pTDefRegMap(@Self)^.clr := $00008000
  76265. else
  76266. pTDefRegMap(@Self)^.&set := $00008000;
  76267. end;
  76268. function TPORTG_PORTG.getRG15 : TBits_1; inline;
  76269. begin
  76270. getRG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76271. end;
  76272. procedure TPORTG_PORTG.setw(thebits : TBits_32); inline;
  76273. begin
  76274. pTDefRegMap(@Self)^.val := thebits;
  76275. end;
  76276. function TPORTG_PORTG.getw : TBits_32; inline;
  76277. begin
  76278. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76279. end;
  76280. procedure TPORTG_LATG.setLATG0; inline;
  76281. begin
  76282. pTDefRegMap(@Self)^.&set := $00000001;
  76283. end;
  76284. procedure TPORTG_LATG.clearLATG0; inline;
  76285. begin
  76286. pTDefRegMap(@Self)^.clr := $00000001;
  76287. end;
  76288. procedure TPORTG_LATG.setLATG0(thebits : TBits_1); inline;
  76289. begin
  76290. if thebits = 0 then
  76291. pTDefRegMap(@Self)^.clr := $00000001
  76292. else
  76293. pTDefRegMap(@Self)^.&set := $00000001;
  76294. end;
  76295. function TPORTG_LATG.getLATG0 : TBits_1; inline;
  76296. begin
  76297. getLATG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76298. end;
  76299. procedure TPORTG_LATG.setLATG1; inline;
  76300. begin
  76301. pTDefRegMap(@Self)^.&set := $00000002;
  76302. end;
  76303. procedure TPORTG_LATG.clearLATG1; inline;
  76304. begin
  76305. pTDefRegMap(@Self)^.clr := $00000002;
  76306. end;
  76307. procedure TPORTG_LATG.setLATG1(thebits : TBits_1); inline;
  76308. begin
  76309. if thebits = 0 then
  76310. pTDefRegMap(@Self)^.clr := $00000002
  76311. else
  76312. pTDefRegMap(@Self)^.&set := $00000002;
  76313. end;
  76314. function TPORTG_LATG.getLATG1 : TBits_1; inline;
  76315. begin
  76316. getLATG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76317. end;
  76318. procedure TPORTG_LATG.setLATG2; inline;
  76319. begin
  76320. pTDefRegMap(@Self)^.&set := $00000004;
  76321. end;
  76322. procedure TPORTG_LATG.clearLATG2; inline;
  76323. begin
  76324. pTDefRegMap(@Self)^.clr := $00000004;
  76325. end;
  76326. procedure TPORTG_LATG.setLATG2(thebits : TBits_1); inline;
  76327. begin
  76328. if thebits = 0 then
  76329. pTDefRegMap(@Self)^.clr := $00000004
  76330. else
  76331. pTDefRegMap(@Self)^.&set := $00000004;
  76332. end;
  76333. function TPORTG_LATG.getLATG2 : TBits_1; inline;
  76334. begin
  76335. getLATG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76336. end;
  76337. procedure TPORTG_LATG.setLATG3; inline;
  76338. begin
  76339. pTDefRegMap(@Self)^.&set := $00000008;
  76340. end;
  76341. procedure TPORTG_LATG.clearLATG3; inline;
  76342. begin
  76343. pTDefRegMap(@Self)^.clr := $00000008;
  76344. end;
  76345. procedure TPORTG_LATG.setLATG3(thebits : TBits_1); inline;
  76346. begin
  76347. if thebits = 0 then
  76348. pTDefRegMap(@Self)^.clr := $00000008
  76349. else
  76350. pTDefRegMap(@Self)^.&set := $00000008;
  76351. end;
  76352. function TPORTG_LATG.getLATG3 : TBits_1; inline;
  76353. begin
  76354. getLATG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76355. end;
  76356. procedure TPORTG_LATG.setLATG6; inline;
  76357. begin
  76358. pTDefRegMap(@Self)^.&set := $00000040;
  76359. end;
  76360. procedure TPORTG_LATG.clearLATG6; inline;
  76361. begin
  76362. pTDefRegMap(@Self)^.clr := $00000040;
  76363. end;
  76364. procedure TPORTG_LATG.setLATG6(thebits : TBits_1); inline;
  76365. begin
  76366. if thebits = 0 then
  76367. pTDefRegMap(@Self)^.clr := $00000040
  76368. else
  76369. pTDefRegMap(@Self)^.&set := $00000040;
  76370. end;
  76371. function TPORTG_LATG.getLATG6 : TBits_1; inline;
  76372. begin
  76373. getLATG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76374. end;
  76375. procedure TPORTG_LATG.setLATG7; inline;
  76376. begin
  76377. pTDefRegMap(@Self)^.&set := $00000080;
  76378. end;
  76379. procedure TPORTG_LATG.clearLATG7; inline;
  76380. begin
  76381. pTDefRegMap(@Self)^.clr := $00000080;
  76382. end;
  76383. procedure TPORTG_LATG.setLATG7(thebits : TBits_1); inline;
  76384. begin
  76385. if thebits = 0 then
  76386. pTDefRegMap(@Self)^.clr := $00000080
  76387. else
  76388. pTDefRegMap(@Self)^.&set := $00000080;
  76389. end;
  76390. function TPORTG_LATG.getLATG7 : TBits_1; inline;
  76391. begin
  76392. getLATG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76393. end;
  76394. procedure TPORTG_LATG.setLATG8; inline;
  76395. begin
  76396. pTDefRegMap(@Self)^.&set := $00000100;
  76397. end;
  76398. procedure TPORTG_LATG.clearLATG8; inline;
  76399. begin
  76400. pTDefRegMap(@Self)^.clr := $00000100;
  76401. end;
  76402. procedure TPORTG_LATG.setLATG8(thebits : TBits_1); inline;
  76403. begin
  76404. if thebits = 0 then
  76405. pTDefRegMap(@Self)^.clr := $00000100
  76406. else
  76407. pTDefRegMap(@Self)^.&set := $00000100;
  76408. end;
  76409. function TPORTG_LATG.getLATG8 : TBits_1; inline;
  76410. begin
  76411. getLATG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76412. end;
  76413. procedure TPORTG_LATG.setLATG9; inline;
  76414. begin
  76415. pTDefRegMap(@Self)^.&set := $00000200;
  76416. end;
  76417. procedure TPORTG_LATG.clearLATG9; inline;
  76418. begin
  76419. pTDefRegMap(@Self)^.clr := $00000200;
  76420. end;
  76421. procedure TPORTG_LATG.setLATG9(thebits : TBits_1); inline;
  76422. begin
  76423. if thebits = 0 then
  76424. pTDefRegMap(@Self)^.clr := $00000200
  76425. else
  76426. pTDefRegMap(@Self)^.&set := $00000200;
  76427. end;
  76428. function TPORTG_LATG.getLATG9 : TBits_1; inline;
  76429. begin
  76430. getLATG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76431. end;
  76432. procedure TPORTG_LATG.setLATG12; inline;
  76433. begin
  76434. pTDefRegMap(@Self)^.&set := $00001000;
  76435. end;
  76436. procedure TPORTG_LATG.clearLATG12; inline;
  76437. begin
  76438. pTDefRegMap(@Self)^.clr := $00001000;
  76439. end;
  76440. procedure TPORTG_LATG.setLATG12(thebits : TBits_1); inline;
  76441. begin
  76442. if thebits = 0 then
  76443. pTDefRegMap(@Self)^.clr := $00001000
  76444. else
  76445. pTDefRegMap(@Self)^.&set := $00001000;
  76446. end;
  76447. function TPORTG_LATG.getLATG12 : TBits_1; inline;
  76448. begin
  76449. getLATG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76450. end;
  76451. procedure TPORTG_LATG.setLATG13; inline;
  76452. begin
  76453. pTDefRegMap(@Self)^.&set := $00002000;
  76454. end;
  76455. procedure TPORTG_LATG.clearLATG13; inline;
  76456. begin
  76457. pTDefRegMap(@Self)^.clr := $00002000;
  76458. end;
  76459. procedure TPORTG_LATG.setLATG13(thebits : TBits_1); inline;
  76460. begin
  76461. if thebits = 0 then
  76462. pTDefRegMap(@Self)^.clr := $00002000
  76463. else
  76464. pTDefRegMap(@Self)^.&set := $00002000;
  76465. end;
  76466. function TPORTG_LATG.getLATG13 : TBits_1; inline;
  76467. begin
  76468. getLATG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76469. end;
  76470. procedure TPORTG_LATG.setLATG14; inline;
  76471. begin
  76472. pTDefRegMap(@Self)^.&set := $00004000;
  76473. end;
  76474. procedure TPORTG_LATG.clearLATG14; inline;
  76475. begin
  76476. pTDefRegMap(@Self)^.clr := $00004000;
  76477. end;
  76478. procedure TPORTG_LATG.setLATG14(thebits : TBits_1); inline;
  76479. begin
  76480. if thebits = 0 then
  76481. pTDefRegMap(@Self)^.clr := $00004000
  76482. else
  76483. pTDefRegMap(@Self)^.&set := $00004000;
  76484. end;
  76485. function TPORTG_LATG.getLATG14 : TBits_1; inline;
  76486. begin
  76487. getLATG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76488. end;
  76489. procedure TPORTG_LATG.setLATG15; inline;
  76490. begin
  76491. pTDefRegMap(@Self)^.&set := $00008000;
  76492. end;
  76493. procedure TPORTG_LATG.clearLATG15; inline;
  76494. begin
  76495. pTDefRegMap(@Self)^.clr := $00008000;
  76496. end;
  76497. procedure TPORTG_LATG.setLATG15(thebits : TBits_1); inline;
  76498. begin
  76499. if thebits = 0 then
  76500. pTDefRegMap(@Self)^.clr := $00008000
  76501. else
  76502. pTDefRegMap(@Self)^.&set := $00008000;
  76503. end;
  76504. function TPORTG_LATG.getLATG15 : TBits_1; inline;
  76505. begin
  76506. getLATG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76507. end;
  76508. procedure TPORTG_LATG.setw(thebits : TBits_32); inline;
  76509. begin
  76510. pTDefRegMap(@Self)^.val := thebits;
  76511. end;
  76512. function TPORTG_LATG.getw : TBits_32; inline;
  76513. begin
  76514. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76515. end;
  76516. procedure TPORTG_ODCG.setODCG0; inline;
  76517. begin
  76518. pTDefRegMap(@Self)^.&set := $00000001;
  76519. end;
  76520. procedure TPORTG_ODCG.clearODCG0; inline;
  76521. begin
  76522. pTDefRegMap(@Self)^.clr := $00000001;
  76523. end;
  76524. procedure TPORTG_ODCG.setODCG0(thebits : TBits_1); inline;
  76525. begin
  76526. if thebits = 0 then
  76527. pTDefRegMap(@Self)^.clr := $00000001
  76528. else
  76529. pTDefRegMap(@Self)^.&set := $00000001;
  76530. end;
  76531. function TPORTG_ODCG.getODCG0 : TBits_1; inline;
  76532. begin
  76533. getODCG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76534. end;
  76535. procedure TPORTG_ODCG.setODCG1; inline;
  76536. begin
  76537. pTDefRegMap(@Self)^.&set := $00000002;
  76538. end;
  76539. procedure TPORTG_ODCG.clearODCG1; inline;
  76540. begin
  76541. pTDefRegMap(@Self)^.clr := $00000002;
  76542. end;
  76543. procedure TPORTG_ODCG.setODCG1(thebits : TBits_1); inline;
  76544. begin
  76545. if thebits = 0 then
  76546. pTDefRegMap(@Self)^.clr := $00000002
  76547. else
  76548. pTDefRegMap(@Self)^.&set := $00000002;
  76549. end;
  76550. function TPORTG_ODCG.getODCG1 : TBits_1; inline;
  76551. begin
  76552. getODCG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76553. end;
  76554. procedure TPORTG_ODCG.setODCG2; inline;
  76555. begin
  76556. pTDefRegMap(@Self)^.&set := $00000004;
  76557. end;
  76558. procedure TPORTG_ODCG.clearODCG2; inline;
  76559. begin
  76560. pTDefRegMap(@Self)^.clr := $00000004;
  76561. end;
  76562. procedure TPORTG_ODCG.setODCG2(thebits : TBits_1); inline;
  76563. begin
  76564. if thebits = 0 then
  76565. pTDefRegMap(@Self)^.clr := $00000004
  76566. else
  76567. pTDefRegMap(@Self)^.&set := $00000004;
  76568. end;
  76569. function TPORTG_ODCG.getODCG2 : TBits_1; inline;
  76570. begin
  76571. getODCG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76572. end;
  76573. procedure TPORTG_ODCG.setODCG3; inline;
  76574. begin
  76575. pTDefRegMap(@Self)^.&set := $00000008;
  76576. end;
  76577. procedure TPORTG_ODCG.clearODCG3; inline;
  76578. begin
  76579. pTDefRegMap(@Self)^.clr := $00000008;
  76580. end;
  76581. procedure TPORTG_ODCG.setODCG3(thebits : TBits_1); inline;
  76582. begin
  76583. if thebits = 0 then
  76584. pTDefRegMap(@Self)^.clr := $00000008
  76585. else
  76586. pTDefRegMap(@Self)^.&set := $00000008;
  76587. end;
  76588. function TPORTG_ODCG.getODCG3 : TBits_1; inline;
  76589. begin
  76590. getODCG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76591. end;
  76592. procedure TPORTG_ODCG.setODCG6; inline;
  76593. begin
  76594. pTDefRegMap(@Self)^.&set := $00000040;
  76595. end;
  76596. procedure TPORTG_ODCG.clearODCG6; inline;
  76597. begin
  76598. pTDefRegMap(@Self)^.clr := $00000040;
  76599. end;
  76600. procedure TPORTG_ODCG.setODCG6(thebits : TBits_1); inline;
  76601. begin
  76602. if thebits = 0 then
  76603. pTDefRegMap(@Self)^.clr := $00000040
  76604. else
  76605. pTDefRegMap(@Self)^.&set := $00000040;
  76606. end;
  76607. function TPORTG_ODCG.getODCG6 : TBits_1; inline;
  76608. begin
  76609. getODCG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76610. end;
  76611. procedure TPORTG_ODCG.setODCG7; inline;
  76612. begin
  76613. pTDefRegMap(@Self)^.&set := $00000080;
  76614. end;
  76615. procedure TPORTG_ODCG.clearODCG7; inline;
  76616. begin
  76617. pTDefRegMap(@Self)^.clr := $00000080;
  76618. end;
  76619. procedure TPORTG_ODCG.setODCG7(thebits : TBits_1); inline;
  76620. begin
  76621. if thebits = 0 then
  76622. pTDefRegMap(@Self)^.clr := $00000080
  76623. else
  76624. pTDefRegMap(@Self)^.&set := $00000080;
  76625. end;
  76626. function TPORTG_ODCG.getODCG7 : TBits_1; inline;
  76627. begin
  76628. getODCG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76629. end;
  76630. procedure TPORTG_ODCG.setODCG8; inline;
  76631. begin
  76632. pTDefRegMap(@Self)^.&set := $00000100;
  76633. end;
  76634. procedure TPORTG_ODCG.clearODCG8; inline;
  76635. begin
  76636. pTDefRegMap(@Self)^.clr := $00000100;
  76637. end;
  76638. procedure TPORTG_ODCG.setODCG8(thebits : TBits_1); inline;
  76639. begin
  76640. if thebits = 0 then
  76641. pTDefRegMap(@Self)^.clr := $00000100
  76642. else
  76643. pTDefRegMap(@Self)^.&set := $00000100;
  76644. end;
  76645. function TPORTG_ODCG.getODCG8 : TBits_1; inline;
  76646. begin
  76647. getODCG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76648. end;
  76649. procedure TPORTG_ODCG.setODCG9; inline;
  76650. begin
  76651. pTDefRegMap(@Self)^.&set := $00000200;
  76652. end;
  76653. procedure TPORTG_ODCG.clearODCG9; inline;
  76654. begin
  76655. pTDefRegMap(@Self)^.clr := $00000200;
  76656. end;
  76657. procedure TPORTG_ODCG.setODCG9(thebits : TBits_1); inline;
  76658. begin
  76659. if thebits = 0 then
  76660. pTDefRegMap(@Self)^.clr := $00000200
  76661. else
  76662. pTDefRegMap(@Self)^.&set := $00000200;
  76663. end;
  76664. function TPORTG_ODCG.getODCG9 : TBits_1; inline;
  76665. begin
  76666. getODCG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76667. end;
  76668. procedure TPORTG_ODCG.setODCG12; inline;
  76669. begin
  76670. pTDefRegMap(@Self)^.&set := $00001000;
  76671. end;
  76672. procedure TPORTG_ODCG.clearODCG12; inline;
  76673. begin
  76674. pTDefRegMap(@Self)^.clr := $00001000;
  76675. end;
  76676. procedure TPORTG_ODCG.setODCG12(thebits : TBits_1); inline;
  76677. begin
  76678. if thebits = 0 then
  76679. pTDefRegMap(@Self)^.clr := $00001000
  76680. else
  76681. pTDefRegMap(@Self)^.&set := $00001000;
  76682. end;
  76683. function TPORTG_ODCG.getODCG12 : TBits_1; inline;
  76684. begin
  76685. getODCG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76686. end;
  76687. procedure TPORTG_ODCG.setODCG13; inline;
  76688. begin
  76689. pTDefRegMap(@Self)^.&set := $00002000;
  76690. end;
  76691. procedure TPORTG_ODCG.clearODCG13; inline;
  76692. begin
  76693. pTDefRegMap(@Self)^.clr := $00002000;
  76694. end;
  76695. procedure TPORTG_ODCG.setODCG13(thebits : TBits_1); inline;
  76696. begin
  76697. if thebits = 0 then
  76698. pTDefRegMap(@Self)^.clr := $00002000
  76699. else
  76700. pTDefRegMap(@Self)^.&set := $00002000;
  76701. end;
  76702. function TPORTG_ODCG.getODCG13 : TBits_1; inline;
  76703. begin
  76704. getODCG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76705. end;
  76706. procedure TPORTG_ODCG.setODCG14; inline;
  76707. begin
  76708. pTDefRegMap(@Self)^.&set := $00004000;
  76709. end;
  76710. procedure TPORTG_ODCG.clearODCG14; inline;
  76711. begin
  76712. pTDefRegMap(@Self)^.clr := $00004000;
  76713. end;
  76714. procedure TPORTG_ODCG.setODCG14(thebits : TBits_1); inline;
  76715. begin
  76716. if thebits = 0 then
  76717. pTDefRegMap(@Self)^.clr := $00004000
  76718. else
  76719. pTDefRegMap(@Self)^.&set := $00004000;
  76720. end;
  76721. function TPORTG_ODCG.getODCG14 : TBits_1; inline;
  76722. begin
  76723. getODCG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76724. end;
  76725. procedure TPORTG_ODCG.setODCG15; inline;
  76726. begin
  76727. pTDefRegMap(@Self)^.&set := $00008000;
  76728. end;
  76729. procedure TPORTG_ODCG.clearODCG15; inline;
  76730. begin
  76731. pTDefRegMap(@Self)^.clr := $00008000;
  76732. end;
  76733. procedure TPORTG_ODCG.setODCG15(thebits : TBits_1); inline;
  76734. begin
  76735. if thebits = 0 then
  76736. pTDefRegMap(@Self)^.clr := $00008000
  76737. else
  76738. pTDefRegMap(@Self)^.&set := $00008000;
  76739. end;
  76740. function TPORTG_ODCG.getODCG15 : TBits_1; inline;
  76741. begin
  76742. getODCG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76743. end;
  76744. procedure TPORTG_ODCG.setw(thebits : TBits_32); inline;
  76745. begin
  76746. pTDefRegMap(@Self)^.val := thebits;
  76747. end;
  76748. function TPORTG_ODCG.getw : TBits_32; inline;
  76749. begin
  76750. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76751. end;
  76752. procedure TPORTG_CNCON.setSIDL; inline;
  76753. begin
  76754. pTDefRegMap(@Self)^.&set := $00002000;
  76755. end;
  76756. procedure TPORTG_CNCON.clearSIDL; inline;
  76757. begin
  76758. pTDefRegMap(@Self)^.clr := $00002000;
  76759. end;
  76760. procedure TPORTG_CNCON.setSIDL(thebits : TBits_1); inline;
  76761. begin
  76762. if thebits = 0 then
  76763. pTDefRegMap(@Self)^.clr := $00002000
  76764. else
  76765. pTDefRegMap(@Self)^.&set := $00002000;
  76766. end;
  76767. function TPORTG_CNCON.getSIDL : TBits_1; inline;
  76768. begin
  76769. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76770. end;
  76771. procedure TPORTG_CNCON.setON; inline;
  76772. begin
  76773. pTDefRegMap(@Self)^.&set := $00008000;
  76774. end;
  76775. procedure TPORTG_CNCON.clearON; inline;
  76776. begin
  76777. pTDefRegMap(@Self)^.clr := $00008000;
  76778. end;
  76779. procedure TPORTG_CNCON.setON(thebits : TBits_1); inline;
  76780. begin
  76781. if thebits = 0 then
  76782. pTDefRegMap(@Self)^.clr := $00008000
  76783. else
  76784. pTDefRegMap(@Self)^.&set := $00008000;
  76785. end;
  76786. function TPORTG_CNCON.getON : TBits_1; inline;
  76787. begin
  76788. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76789. end;
  76790. procedure TPORTG_CNCON.setw(thebits : TBits_32); inline;
  76791. begin
  76792. pTDefRegMap(@Self)^.val := thebits;
  76793. end;
  76794. function TPORTG_CNCON.getw : TBits_32; inline;
  76795. begin
  76796. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76797. end;
  76798. procedure TPORTG_CNEN.setCNEN0; inline;
  76799. begin
  76800. pTDefRegMap(@Self)^.&set := $00000001;
  76801. end;
  76802. procedure TPORTG_CNEN.clearCNEN0; inline;
  76803. begin
  76804. pTDefRegMap(@Self)^.clr := $00000001;
  76805. end;
  76806. procedure TPORTG_CNEN.setCNEN0(thebits : TBits_1); inline;
  76807. begin
  76808. if thebits = 0 then
  76809. pTDefRegMap(@Self)^.clr := $00000001
  76810. else
  76811. pTDefRegMap(@Self)^.&set := $00000001;
  76812. end;
  76813. function TPORTG_CNEN.getCNEN0 : TBits_1; inline;
  76814. begin
  76815. getCNEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76816. end;
  76817. procedure TPORTG_CNEN.setCNEN1; inline;
  76818. begin
  76819. pTDefRegMap(@Self)^.&set := $00000002;
  76820. end;
  76821. procedure TPORTG_CNEN.clearCNEN1; inline;
  76822. begin
  76823. pTDefRegMap(@Self)^.clr := $00000002;
  76824. end;
  76825. procedure TPORTG_CNEN.setCNEN1(thebits : TBits_1); inline;
  76826. begin
  76827. if thebits = 0 then
  76828. pTDefRegMap(@Self)^.clr := $00000002
  76829. else
  76830. pTDefRegMap(@Self)^.&set := $00000002;
  76831. end;
  76832. function TPORTG_CNEN.getCNEN1 : TBits_1; inline;
  76833. begin
  76834. getCNEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76835. end;
  76836. procedure TPORTG_CNEN.setCNEN2; inline;
  76837. begin
  76838. pTDefRegMap(@Self)^.&set := $00000004;
  76839. end;
  76840. procedure TPORTG_CNEN.clearCNEN2; inline;
  76841. begin
  76842. pTDefRegMap(@Self)^.clr := $00000004;
  76843. end;
  76844. procedure TPORTG_CNEN.setCNEN2(thebits : TBits_1); inline;
  76845. begin
  76846. if thebits = 0 then
  76847. pTDefRegMap(@Self)^.clr := $00000004
  76848. else
  76849. pTDefRegMap(@Self)^.&set := $00000004;
  76850. end;
  76851. function TPORTG_CNEN.getCNEN2 : TBits_1; inline;
  76852. begin
  76853. getCNEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76854. end;
  76855. procedure TPORTG_CNEN.setCNEN3; inline;
  76856. begin
  76857. pTDefRegMap(@Self)^.&set := $00000008;
  76858. end;
  76859. procedure TPORTG_CNEN.clearCNEN3; inline;
  76860. begin
  76861. pTDefRegMap(@Self)^.clr := $00000008;
  76862. end;
  76863. procedure TPORTG_CNEN.setCNEN3(thebits : TBits_1); inline;
  76864. begin
  76865. if thebits = 0 then
  76866. pTDefRegMap(@Self)^.clr := $00000008
  76867. else
  76868. pTDefRegMap(@Self)^.&set := $00000008;
  76869. end;
  76870. function TPORTG_CNEN.getCNEN3 : TBits_1; inline;
  76871. begin
  76872. getCNEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76873. end;
  76874. procedure TPORTG_CNEN.setCNEN4; inline;
  76875. begin
  76876. pTDefRegMap(@Self)^.&set := $00000010;
  76877. end;
  76878. procedure TPORTG_CNEN.clearCNEN4; inline;
  76879. begin
  76880. pTDefRegMap(@Self)^.clr := $00000010;
  76881. end;
  76882. procedure TPORTG_CNEN.setCNEN4(thebits : TBits_1); inline;
  76883. begin
  76884. if thebits = 0 then
  76885. pTDefRegMap(@Self)^.clr := $00000010
  76886. else
  76887. pTDefRegMap(@Self)^.&set := $00000010;
  76888. end;
  76889. function TPORTG_CNEN.getCNEN4 : TBits_1; inline;
  76890. begin
  76891. getCNEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76892. end;
  76893. procedure TPORTG_CNEN.setCNEN5; inline;
  76894. begin
  76895. pTDefRegMap(@Self)^.&set := $00000020;
  76896. end;
  76897. procedure TPORTG_CNEN.clearCNEN5; inline;
  76898. begin
  76899. pTDefRegMap(@Self)^.clr := $00000020;
  76900. end;
  76901. procedure TPORTG_CNEN.setCNEN5(thebits : TBits_1); inline;
  76902. begin
  76903. if thebits = 0 then
  76904. pTDefRegMap(@Self)^.clr := $00000020
  76905. else
  76906. pTDefRegMap(@Self)^.&set := $00000020;
  76907. end;
  76908. function TPORTG_CNEN.getCNEN5 : TBits_1; inline;
  76909. begin
  76910. getCNEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76911. end;
  76912. procedure TPORTG_CNEN.setCNEN6; inline;
  76913. begin
  76914. pTDefRegMap(@Self)^.&set := $00000040;
  76915. end;
  76916. procedure TPORTG_CNEN.clearCNEN6; inline;
  76917. begin
  76918. pTDefRegMap(@Self)^.clr := $00000040;
  76919. end;
  76920. procedure TPORTG_CNEN.setCNEN6(thebits : TBits_1); inline;
  76921. begin
  76922. if thebits = 0 then
  76923. pTDefRegMap(@Self)^.clr := $00000040
  76924. else
  76925. pTDefRegMap(@Self)^.&set := $00000040;
  76926. end;
  76927. function TPORTG_CNEN.getCNEN6 : TBits_1; inline;
  76928. begin
  76929. getCNEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76930. end;
  76931. procedure TPORTG_CNEN.setCNEN7; inline;
  76932. begin
  76933. pTDefRegMap(@Self)^.&set := $00000080;
  76934. end;
  76935. procedure TPORTG_CNEN.clearCNEN7; inline;
  76936. begin
  76937. pTDefRegMap(@Self)^.clr := $00000080;
  76938. end;
  76939. procedure TPORTG_CNEN.setCNEN7(thebits : TBits_1); inline;
  76940. begin
  76941. if thebits = 0 then
  76942. pTDefRegMap(@Self)^.clr := $00000080
  76943. else
  76944. pTDefRegMap(@Self)^.&set := $00000080;
  76945. end;
  76946. function TPORTG_CNEN.getCNEN7 : TBits_1; inline;
  76947. begin
  76948. getCNEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76949. end;
  76950. procedure TPORTG_CNEN.setCNEN8; inline;
  76951. begin
  76952. pTDefRegMap(@Self)^.&set := $00000100;
  76953. end;
  76954. procedure TPORTG_CNEN.clearCNEN8; inline;
  76955. begin
  76956. pTDefRegMap(@Self)^.clr := $00000100;
  76957. end;
  76958. procedure TPORTG_CNEN.setCNEN8(thebits : TBits_1); inline;
  76959. begin
  76960. if thebits = 0 then
  76961. pTDefRegMap(@Self)^.clr := $00000100
  76962. else
  76963. pTDefRegMap(@Self)^.&set := $00000100;
  76964. end;
  76965. function TPORTG_CNEN.getCNEN8 : TBits_1; inline;
  76966. begin
  76967. getCNEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76968. end;
  76969. procedure TPORTG_CNEN.setCNEN9; inline;
  76970. begin
  76971. pTDefRegMap(@Self)^.&set := $00000200;
  76972. end;
  76973. procedure TPORTG_CNEN.clearCNEN9; inline;
  76974. begin
  76975. pTDefRegMap(@Self)^.clr := $00000200;
  76976. end;
  76977. procedure TPORTG_CNEN.setCNEN9(thebits : TBits_1); inline;
  76978. begin
  76979. if thebits = 0 then
  76980. pTDefRegMap(@Self)^.clr := $00000200
  76981. else
  76982. pTDefRegMap(@Self)^.&set := $00000200;
  76983. end;
  76984. function TPORTG_CNEN.getCNEN9 : TBits_1; inline;
  76985. begin
  76986. getCNEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76987. end;
  76988. procedure TPORTG_CNEN.setCNEN10; inline;
  76989. begin
  76990. pTDefRegMap(@Self)^.&set := $00000400;
  76991. end;
  76992. procedure TPORTG_CNEN.clearCNEN10; inline;
  76993. begin
  76994. pTDefRegMap(@Self)^.clr := $00000400;
  76995. end;
  76996. procedure TPORTG_CNEN.setCNEN10(thebits : TBits_1); inline;
  76997. begin
  76998. if thebits = 0 then
  76999. pTDefRegMap(@Self)^.clr := $00000400
  77000. else
  77001. pTDefRegMap(@Self)^.&set := $00000400;
  77002. end;
  77003. function TPORTG_CNEN.getCNEN10 : TBits_1; inline;
  77004. begin
  77005. getCNEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77006. end;
  77007. procedure TPORTG_CNEN.setCNEN11; inline;
  77008. begin
  77009. pTDefRegMap(@Self)^.&set := $00000800;
  77010. end;
  77011. procedure TPORTG_CNEN.clearCNEN11; inline;
  77012. begin
  77013. pTDefRegMap(@Self)^.clr := $00000800;
  77014. end;
  77015. procedure TPORTG_CNEN.setCNEN11(thebits : TBits_1); inline;
  77016. begin
  77017. if thebits = 0 then
  77018. pTDefRegMap(@Self)^.clr := $00000800
  77019. else
  77020. pTDefRegMap(@Self)^.&set := $00000800;
  77021. end;
  77022. function TPORTG_CNEN.getCNEN11 : TBits_1; inline;
  77023. begin
  77024. getCNEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  77025. end;
  77026. procedure TPORTG_CNEN.setCNEN12; inline;
  77027. begin
  77028. pTDefRegMap(@Self)^.&set := $00001000;
  77029. end;
  77030. procedure TPORTG_CNEN.clearCNEN12; inline;
  77031. begin
  77032. pTDefRegMap(@Self)^.clr := $00001000;
  77033. end;
  77034. procedure TPORTG_CNEN.setCNEN12(thebits : TBits_1); inline;
  77035. begin
  77036. if thebits = 0 then
  77037. pTDefRegMap(@Self)^.clr := $00001000
  77038. else
  77039. pTDefRegMap(@Self)^.&set := $00001000;
  77040. end;
  77041. function TPORTG_CNEN.getCNEN12 : TBits_1; inline;
  77042. begin
  77043. getCNEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77044. end;
  77045. procedure TPORTG_CNEN.setCNEN13; inline;
  77046. begin
  77047. pTDefRegMap(@Self)^.&set := $00002000;
  77048. end;
  77049. procedure TPORTG_CNEN.clearCNEN13; inline;
  77050. begin
  77051. pTDefRegMap(@Self)^.clr := $00002000;
  77052. end;
  77053. procedure TPORTG_CNEN.setCNEN13(thebits : TBits_1); inline;
  77054. begin
  77055. if thebits = 0 then
  77056. pTDefRegMap(@Self)^.clr := $00002000
  77057. else
  77058. pTDefRegMap(@Self)^.&set := $00002000;
  77059. end;
  77060. function TPORTG_CNEN.getCNEN13 : TBits_1; inline;
  77061. begin
  77062. getCNEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77063. end;
  77064. procedure TPORTG_CNEN.setCNEN14; inline;
  77065. begin
  77066. pTDefRegMap(@Self)^.&set := $00004000;
  77067. end;
  77068. procedure TPORTG_CNEN.clearCNEN14; inline;
  77069. begin
  77070. pTDefRegMap(@Self)^.clr := $00004000;
  77071. end;
  77072. procedure TPORTG_CNEN.setCNEN14(thebits : TBits_1); inline;
  77073. begin
  77074. if thebits = 0 then
  77075. pTDefRegMap(@Self)^.clr := $00004000
  77076. else
  77077. pTDefRegMap(@Self)^.&set := $00004000;
  77078. end;
  77079. function TPORTG_CNEN.getCNEN14 : TBits_1; inline;
  77080. begin
  77081. getCNEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77082. end;
  77083. procedure TPORTG_CNEN.setCNEN15; inline;
  77084. begin
  77085. pTDefRegMap(@Self)^.&set := $00008000;
  77086. end;
  77087. procedure TPORTG_CNEN.clearCNEN15; inline;
  77088. begin
  77089. pTDefRegMap(@Self)^.clr := $00008000;
  77090. end;
  77091. procedure TPORTG_CNEN.setCNEN15(thebits : TBits_1); inline;
  77092. begin
  77093. if thebits = 0 then
  77094. pTDefRegMap(@Self)^.clr := $00008000
  77095. else
  77096. pTDefRegMap(@Self)^.&set := $00008000;
  77097. end;
  77098. function TPORTG_CNEN.getCNEN15 : TBits_1; inline;
  77099. begin
  77100. getCNEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  77101. end;
  77102. procedure TPORTG_CNEN.setCNEN16; inline;
  77103. begin
  77104. pTDefRegMap(@Self)^.&set := $00010000;
  77105. end;
  77106. procedure TPORTG_CNEN.clearCNEN16; inline;
  77107. begin
  77108. pTDefRegMap(@Self)^.clr := $00010000;
  77109. end;
  77110. procedure TPORTG_CNEN.setCNEN16(thebits : TBits_1); inline;
  77111. begin
  77112. if thebits = 0 then
  77113. pTDefRegMap(@Self)^.clr := $00010000
  77114. else
  77115. pTDefRegMap(@Self)^.&set := $00010000;
  77116. end;
  77117. function TPORTG_CNEN.getCNEN16 : TBits_1; inline;
  77118. begin
  77119. getCNEN16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77120. end;
  77121. procedure TPORTG_CNEN.setCNEN17; inline;
  77122. begin
  77123. pTDefRegMap(@Self)^.&set := $00020000;
  77124. end;
  77125. procedure TPORTG_CNEN.clearCNEN17; inline;
  77126. begin
  77127. pTDefRegMap(@Self)^.clr := $00020000;
  77128. end;
  77129. procedure TPORTG_CNEN.setCNEN17(thebits : TBits_1); inline;
  77130. begin
  77131. if thebits = 0 then
  77132. pTDefRegMap(@Self)^.clr := $00020000
  77133. else
  77134. pTDefRegMap(@Self)^.&set := $00020000;
  77135. end;
  77136. function TPORTG_CNEN.getCNEN17 : TBits_1; inline;
  77137. begin
  77138. getCNEN17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77139. end;
  77140. procedure TPORTG_CNEN.setCNEN18; inline;
  77141. begin
  77142. pTDefRegMap(@Self)^.&set := $00040000;
  77143. end;
  77144. procedure TPORTG_CNEN.clearCNEN18; inline;
  77145. begin
  77146. pTDefRegMap(@Self)^.clr := $00040000;
  77147. end;
  77148. procedure TPORTG_CNEN.setCNEN18(thebits : TBits_1); inline;
  77149. begin
  77150. if thebits = 0 then
  77151. pTDefRegMap(@Self)^.clr := $00040000
  77152. else
  77153. pTDefRegMap(@Self)^.&set := $00040000;
  77154. end;
  77155. function TPORTG_CNEN.getCNEN18 : TBits_1; inline;
  77156. begin
  77157. getCNEN18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77158. end;
  77159. procedure TPORTG_CNEN.setCNEN19; inline;
  77160. begin
  77161. pTDefRegMap(@Self)^.&set := $00080000;
  77162. end;
  77163. procedure TPORTG_CNEN.clearCNEN19; inline;
  77164. begin
  77165. pTDefRegMap(@Self)^.clr := $00080000;
  77166. end;
  77167. procedure TPORTG_CNEN.setCNEN19(thebits : TBits_1); inline;
  77168. begin
  77169. if thebits = 0 then
  77170. pTDefRegMap(@Self)^.clr := $00080000
  77171. else
  77172. pTDefRegMap(@Self)^.&set := $00080000;
  77173. end;
  77174. function TPORTG_CNEN.getCNEN19 : TBits_1; inline;
  77175. begin
  77176. getCNEN19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77177. end;
  77178. procedure TPORTG_CNEN.setCNEN20; inline;
  77179. begin
  77180. pTDefRegMap(@Self)^.&set := $00100000;
  77181. end;
  77182. procedure TPORTG_CNEN.clearCNEN20; inline;
  77183. begin
  77184. pTDefRegMap(@Self)^.clr := $00100000;
  77185. end;
  77186. procedure TPORTG_CNEN.setCNEN20(thebits : TBits_1); inline;
  77187. begin
  77188. if thebits = 0 then
  77189. pTDefRegMap(@Self)^.clr := $00100000
  77190. else
  77191. pTDefRegMap(@Self)^.&set := $00100000;
  77192. end;
  77193. function TPORTG_CNEN.getCNEN20 : TBits_1; inline;
  77194. begin
  77195. getCNEN20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  77196. end;
  77197. procedure TPORTG_CNEN.setCNEN21; inline;
  77198. begin
  77199. pTDefRegMap(@Self)^.&set := $00200000;
  77200. end;
  77201. procedure TPORTG_CNEN.clearCNEN21; inline;
  77202. begin
  77203. pTDefRegMap(@Self)^.clr := $00200000;
  77204. end;
  77205. procedure TPORTG_CNEN.setCNEN21(thebits : TBits_1); inline;
  77206. begin
  77207. if thebits = 0 then
  77208. pTDefRegMap(@Self)^.clr := $00200000
  77209. else
  77210. pTDefRegMap(@Self)^.&set := $00200000;
  77211. end;
  77212. function TPORTG_CNEN.getCNEN21 : TBits_1; inline;
  77213. begin
  77214. getCNEN21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  77215. end;
  77216. procedure TPORTG_CNEN.setw(thebits : TBits_32); inline;
  77217. begin
  77218. pTDefRegMap(@Self)^.val := thebits;
  77219. end;
  77220. function TPORTG_CNEN.getw : TBits_32; inline;
  77221. begin
  77222. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77223. end;
  77224. procedure TPORTG_CNPUE.setCNPUE0; inline;
  77225. begin
  77226. pTDefRegMap(@Self)^.&set := $00000001;
  77227. end;
  77228. procedure TPORTG_CNPUE.clearCNPUE0; inline;
  77229. begin
  77230. pTDefRegMap(@Self)^.clr := $00000001;
  77231. end;
  77232. procedure TPORTG_CNPUE.setCNPUE0(thebits : TBits_1); inline;
  77233. begin
  77234. if thebits = 0 then
  77235. pTDefRegMap(@Self)^.clr := $00000001
  77236. else
  77237. pTDefRegMap(@Self)^.&set := $00000001;
  77238. end;
  77239. function TPORTG_CNPUE.getCNPUE0 : TBits_1; inline;
  77240. begin
  77241. getCNPUE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77242. end;
  77243. procedure TPORTG_CNPUE.setCNPUE1; inline;
  77244. begin
  77245. pTDefRegMap(@Self)^.&set := $00000002;
  77246. end;
  77247. procedure TPORTG_CNPUE.clearCNPUE1; inline;
  77248. begin
  77249. pTDefRegMap(@Self)^.clr := $00000002;
  77250. end;
  77251. procedure TPORTG_CNPUE.setCNPUE1(thebits : TBits_1); inline;
  77252. begin
  77253. if thebits = 0 then
  77254. pTDefRegMap(@Self)^.clr := $00000002
  77255. else
  77256. pTDefRegMap(@Self)^.&set := $00000002;
  77257. end;
  77258. function TPORTG_CNPUE.getCNPUE1 : TBits_1; inline;
  77259. begin
  77260. getCNPUE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77261. end;
  77262. procedure TPORTG_CNPUE.setCNPUE2; inline;
  77263. begin
  77264. pTDefRegMap(@Self)^.&set := $00000004;
  77265. end;
  77266. procedure TPORTG_CNPUE.clearCNPUE2; inline;
  77267. begin
  77268. pTDefRegMap(@Self)^.clr := $00000004;
  77269. end;
  77270. procedure TPORTG_CNPUE.setCNPUE2(thebits : TBits_1); inline;
  77271. begin
  77272. if thebits = 0 then
  77273. pTDefRegMap(@Self)^.clr := $00000004
  77274. else
  77275. pTDefRegMap(@Self)^.&set := $00000004;
  77276. end;
  77277. function TPORTG_CNPUE.getCNPUE2 : TBits_1; inline;
  77278. begin
  77279. getCNPUE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77280. end;
  77281. procedure TPORTG_CNPUE.setCNPUE3; inline;
  77282. begin
  77283. pTDefRegMap(@Self)^.&set := $00000008;
  77284. end;
  77285. procedure TPORTG_CNPUE.clearCNPUE3; inline;
  77286. begin
  77287. pTDefRegMap(@Self)^.clr := $00000008;
  77288. end;
  77289. procedure TPORTG_CNPUE.setCNPUE3(thebits : TBits_1); inline;
  77290. begin
  77291. if thebits = 0 then
  77292. pTDefRegMap(@Self)^.clr := $00000008
  77293. else
  77294. pTDefRegMap(@Self)^.&set := $00000008;
  77295. end;
  77296. function TPORTG_CNPUE.getCNPUE3 : TBits_1; inline;
  77297. begin
  77298. getCNPUE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77299. end;
  77300. procedure TPORTG_CNPUE.setCNPUE4; inline;
  77301. begin
  77302. pTDefRegMap(@Self)^.&set := $00000010;
  77303. end;
  77304. procedure TPORTG_CNPUE.clearCNPUE4; inline;
  77305. begin
  77306. pTDefRegMap(@Self)^.clr := $00000010;
  77307. end;
  77308. procedure TPORTG_CNPUE.setCNPUE4(thebits : TBits_1); inline;
  77309. begin
  77310. if thebits = 0 then
  77311. pTDefRegMap(@Self)^.clr := $00000010
  77312. else
  77313. pTDefRegMap(@Self)^.&set := $00000010;
  77314. end;
  77315. function TPORTG_CNPUE.getCNPUE4 : TBits_1; inline;
  77316. begin
  77317. getCNPUE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77318. end;
  77319. procedure TPORTG_CNPUE.setCNPUE5; inline;
  77320. begin
  77321. pTDefRegMap(@Self)^.&set := $00000020;
  77322. end;
  77323. procedure TPORTG_CNPUE.clearCNPUE5; inline;
  77324. begin
  77325. pTDefRegMap(@Self)^.clr := $00000020;
  77326. end;
  77327. procedure TPORTG_CNPUE.setCNPUE5(thebits : TBits_1); inline;
  77328. begin
  77329. if thebits = 0 then
  77330. pTDefRegMap(@Self)^.clr := $00000020
  77331. else
  77332. pTDefRegMap(@Self)^.&set := $00000020;
  77333. end;
  77334. function TPORTG_CNPUE.getCNPUE5 : TBits_1; inline;
  77335. begin
  77336. getCNPUE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77337. end;
  77338. procedure TPORTG_CNPUE.setCNPUE6; inline;
  77339. begin
  77340. pTDefRegMap(@Self)^.&set := $00000040;
  77341. end;
  77342. procedure TPORTG_CNPUE.clearCNPUE6; inline;
  77343. begin
  77344. pTDefRegMap(@Self)^.clr := $00000040;
  77345. end;
  77346. procedure TPORTG_CNPUE.setCNPUE6(thebits : TBits_1); inline;
  77347. begin
  77348. if thebits = 0 then
  77349. pTDefRegMap(@Self)^.clr := $00000040
  77350. else
  77351. pTDefRegMap(@Self)^.&set := $00000040;
  77352. end;
  77353. function TPORTG_CNPUE.getCNPUE6 : TBits_1; inline;
  77354. begin
  77355. getCNPUE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77356. end;
  77357. procedure TPORTG_CNPUE.setCNPUE7; inline;
  77358. begin
  77359. pTDefRegMap(@Self)^.&set := $00000080;
  77360. end;
  77361. procedure TPORTG_CNPUE.clearCNPUE7; inline;
  77362. begin
  77363. pTDefRegMap(@Self)^.clr := $00000080;
  77364. end;
  77365. procedure TPORTG_CNPUE.setCNPUE7(thebits : TBits_1); inline;
  77366. begin
  77367. if thebits = 0 then
  77368. pTDefRegMap(@Self)^.clr := $00000080
  77369. else
  77370. pTDefRegMap(@Self)^.&set := $00000080;
  77371. end;
  77372. function TPORTG_CNPUE.getCNPUE7 : TBits_1; inline;
  77373. begin
  77374. getCNPUE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77375. end;
  77376. procedure TPORTG_CNPUE.setCNPUE8; inline;
  77377. begin
  77378. pTDefRegMap(@Self)^.&set := $00000100;
  77379. end;
  77380. procedure TPORTG_CNPUE.clearCNPUE8; inline;
  77381. begin
  77382. pTDefRegMap(@Self)^.clr := $00000100;
  77383. end;
  77384. procedure TPORTG_CNPUE.setCNPUE8(thebits : TBits_1); inline;
  77385. begin
  77386. if thebits = 0 then
  77387. pTDefRegMap(@Self)^.clr := $00000100
  77388. else
  77389. pTDefRegMap(@Self)^.&set := $00000100;
  77390. end;
  77391. function TPORTG_CNPUE.getCNPUE8 : TBits_1; inline;
  77392. begin
  77393. getCNPUE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77394. end;
  77395. procedure TPORTG_CNPUE.setCNPUE9; inline;
  77396. begin
  77397. pTDefRegMap(@Self)^.&set := $00000200;
  77398. end;
  77399. procedure TPORTG_CNPUE.clearCNPUE9; inline;
  77400. begin
  77401. pTDefRegMap(@Self)^.clr := $00000200;
  77402. end;
  77403. procedure TPORTG_CNPUE.setCNPUE9(thebits : TBits_1); inline;
  77404. begin
  77405. if thebits = 0 then
  77406. pTDefRegMap(@Self)^.clr := $00000200
  77407. else
  77408. pTDefRegMap(@Self)^.&set := $00000200;
  77409. end;
  77410. function TPORTG_CNPUE.getCNPUE9 : TBits_1; inline;
  77411. begin
  77412. getCNPUE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77413. end;
  77414. procedure TPORTG_CNPUE.setCNPUE10; inline;
  77415. begin
  77416. pTDefRegMap(@Self)^.&set := $00000400;
  77417. end;
  77418. procedure TPORTG_CNPUE.clearCNPUE10; inline;
  77419. begin
  77420. pTDefRegMap(@Self)^.clr := $00000400;
  77421. end;
  77422. procedure TPORTG_CNPUE.setCNPUE10(thebits : TBits_1); inline;
  77423. begin
  77424. if thebits = 0 then
  77425. pTDefRegMap(@Self)^.clr := $00000400
  77426. else
  77427. pTDefRegMap(@Self)^.&set := $00000400;
  77428. end;
  77429. function TPORTG_CNPUE.getCNPUE10 : TBits_1; inline;
  77430. begin
  77431. getCNPUE10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77432. end;
  77433. procedure TPORTG_CNPUE.setCNPUE11; inline;
  77434. begin
  77435. pTDefRegMap(@Self)^.&set := $00000800;
  77436. end;
  77437. procedure TPORTG_CNPUE.clearCNPUE11; inline;
  77438. begin
  77439. pTDefRegMap(@Self)^.clr := $00000800;
  77440. end;
  77441. procedure TPORTG_CNPUE.setCNPUE11(thebits : TBits_1); inline;
  77442. begin
  77443. if thebits = 0 then
  77444. pTDefRegMap(@Self)^.clr := $00000800
  77445. else
  77446. pTDefRegMap(@Self)^.&set := $00000800;
  77447. end;
  77448. function TPORTG_CNPUE.getCNPUE11 : TBits_1; inline;
  77449. begin
  77450. getCNPUE11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  77451. end;
  77452. procedure TPORTG_CNPUE.setCNPUE12; inline;
  77453. begin
  77454. pTDefRegMap(@Self)^.&set := $00001000;
  77455. end;
  77456. procedure TPORTG_CNPUE.clearCNPUE12; inline;
  77457. begin
  77458. pTDefRegMap(@Self)^.clr := $00001000;
  77459. end;
  77460. procedure TPORTG_CNPUE.setCNPUE12(thebits : TBits_1); inline;
  77461. begin
  77462. if thebits = 0 then
  77463. pTDefRegMap(@Self)^.clr := $00001000
  77464. else
  77465. pTDefRegMap(@Self)^.&set := $00001000;
  77466. end;
  77467. function TPORTG_CNPUE.getCNPUE12 : TBits_1; inline;
  77468. begin
  77469. getCNPUE12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77470. end;
  77471. procedure TPORTG_CNPUE.setCNPUE13; inline;
  77472. begin
  77473. pTDefRegMap(@Self)^.&set := $00002000;
  77474. end;
  77475. procedure TPORTG_CNPUE.clearCNPUE13; inline;
  77476. begin
  77477. pTDefRegMap(@Self)^.clr := $00002000;
  77478. end;
  77479. procedure TPORTG_CNPUE.setCNPUE13(thebits : TBits_1); inline;
  77480. begin
  77481. if thebits = 0 then
  77482. pTDefRegMap(@Self)^.clr := $00002000
  77483. else
  77484. pTDefRegMap(@Self)^.&set := $00002000;
  77485. end;
  77486. function TPORTG_CNPUE.getCNPUE13 : TBits_1; inline;
  77487. begin
  77488. getCNPUE13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77489. end;
  77490. procedure TPORTG_CNPUE.setCNPUE14; inline;
  77491. begin
  77492. pTDefRegMap(@Self)^.&set := $00004000;
  77493. end;
  77494. procedure TPORTG_CNPUE.clearCNPUE14; inline;
  77495. begin
  77496. pTDefRegMap(@Self)^.clr := $00004000;
  77497. end;
  77498. procedure TPORTG_CNPUE.setCNPUE14(thebits : TBits_1); inline;
  77499. begin
  77500. if thebits = 0 then
  77501. pTDefRegMap(@Self)^.clr := $00004000
  77502. else
  77503. pTDefRegMap(@Self)^.&set := $00004000;
  77504. end;
  77505. function TPORTG_CNPUE.getCNPUE14 : TBits_1; inline;
  77506. begin
  77507. getCNPUE14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77508. end;
  77509. procedure TPORTG_CNPUE.setCNPUE15; inline;
  77510. begin
  77511. pTDefRegMap(@Self)^.&set := $00008000;
  77512. end;
  77513. procedure TPORTG_CNPUE.clearCNPUE15; inline;
  77514. begin
  77515. pTDefRegMap(@Self)^.clr := $00008000;
  77516. end;
  77517. procedure TPORTG_CNPUE.setCNPUE15(thebits : TBits_1); inline;
  77518. begin
  77519. if thebits = 0 then
  77520. pTDefRegMap(@Self)^.clr := $00008000
  77521. else
  77522. pTDefRegMap(@Self)^.&set := $00008000;
  77523. end;
  77524. function TPORTG_CNPUE.getCNPUE15 : TBits_1; inline;
  77525. begin
  77526. getCNPUE15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  77527. end;
  77528. procedure TPORTG_CNPUE.setCNPUE16; inline;
  77529. begin
  77530. pTDefRegMap(@Self)^.&set := $00010000;
  77531. end;
  77532. procedure TPORTG_CNPUE.clearCNPUE16; inline;
  77533. begin
  77534. pTDefRegMap(@Self)^.clr := $00010000;
  77535. end;
  77536. procedure TPORTG_CNPUE.setCNPUE16(thebits : TBits_1); inline;
  77537. begin
  77538. if thebits = 0 then
  77539. pTDefRegMap(@Self)^.clr := $00010000
  77540. else
  77541. pTDefRegMap(@Self)^.&set := $00010000;
  77542. end;
  77543. function TPORTG_CNPUE.getCNPUE16 : TBits_1; inline;
  77544. begin
  77545. getCNPUE16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77546. end;
  77547. procedure TPORTG_CNPUE.setCNPUE17; inline;
  77548. begin
  77549. pTDefRegMap(@Self)^.&set := $00020000;
  77550. end;
  77551. procedure TPORTG_CNPUE.clearCNPUE17; inline;
  77552. begin
  77553. pTDefRegMap(@Self)^.clr := $00020000;
  77554. end;
  77555. procedure TPORTG_CNPUE.setCNPUE17(thebits : TBits_1); inline;
  77556. begin
  77557. if thebits = 0 then
  77558. pTDefRegMap(@Self)^.clr := $00020000
  77559. else
  77560. pTDefRegMap(@Self)^.&set := $00020000;
  77561. end;
  77562. function TPORTG_CNPUE.getCNPUE17 : TBits_1; inline;
  77563. begin
  77564. getCNPUE17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77565. end;
  77566. procedure TPORTG_CNPUE.setCNPUE18; inline;
  77567. begin
  77568. pTDefRegMap(@Self)^.&set := $00040000;
  77569. end;
  77570. procedure TPORTG_CNPUE.clearCNPUE18; inline;
  77571. begin
  77572. pTDefRegMap(@Self)^.clr := $00040000;
  77573. end;
  77574. procedure TPORTG_CNPUE.setCNPUE18(thebits : TBits_1); inline;
  77575. begin
  77576. if thebits = 0 then
  77577. pTDefRegMap(@Self)^.clr := $00040000
  77578. else
  77579. pTDefRegMap(@Self)^.&set := $00040000;
  77580. end;
  77581. function TPORTG_CNPUE.getCNPUE18 : TBits_1; inline;
  77582. begin
  77583. getCNPUE18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77584. end;
  77585. procedure TPORTG_CNPUE.setCNPUE19; inline;
  77586. begin
  77587. pTDefRegMap(@Self)^.&set := $00080000;
  77588. end;
  77589. procedure TPORTG_CNPUE.clearCNPUE19; inline;
  77590. begin
  77591. pTDefRegMap(@Self)^.clr := $00080000;
  77592. end;
  77593. procedure TPORTG_CNPUE.setCNPUE19(thebits : TBits_1); inline;
  77594. begin
  77595. if thebits = 0 then
  77596. pTDefRegMap(@Self)^.clr := $00080000
  77597. else
  77598. pTDefRegMap(@Self)^.&set := $00080000;
  77599. end;
  77600. function TPORTG_CNPUE.getCNPUE19 : TBits_1; inline;
  77601. begin
  77602. getCNPUE19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77603. end;
  77604. procedure TPORTG_CNPUE.setCNPUE20; inline;
  77605. begin
  77606. pTDefRegMap(@Self)^.&set := $00100000;
  77607. end;
  77608. procedure TPORTG_CNPUE.clearCNPUE20; inline;
  77609. begin
  77610. pTDefRegMap(@Self)^.clr := $00100000;
  77611. end;
  77612. procedure TPORTG_CNPUE.setCNPUE20(thebits : TBits_1); inline;
  77613. begin
  77614. if thebits = 0 then
  77615. pTDefRegMap(@Self)^.clr := $00100000
  77616. else
  77617. pTDefRegMap(@Self)^.&set := $00100000;
  77618. end;
  77619. function TPORTG_CNPUE.getCNPUE20 : TBits_1; inline;
  77620. begin
  77621. getCNPUE20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  77622. end;
  77623. procedure TPORTG_CNPUE.setCNPUE21; inline;
  77624. begin
  77625. pTDefRegMap(@Self)^.&set := $00200000;
  77626. end;
  77627. procedure TPORTG_CNPUE.clearCNPUE21; inline;
  77628. begin
  77629. pTDefRegMap(@Self)^.clr := $00200000;
  77630. end;
  77631. procedure TPORTG_CNPUE.setCNPUE21(thebits : TBits_1); inline;
  77632. begin
  77633. if thebits = 0 then
  77634. pTDefRegMap(@Self)^.clr := $00200000
  77635. else
  77636. pTDefRegMap(@Self)^.&set := $00200000;
  77637. end;
  77638. function TPORTG_CNPUE.getCNPUE21 : TBits_1; inline;
  77639. begin
  77640. getCNPUE21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  77641. end;
  77642. procedure TPORTG_CNPUE.setw(thebits : TBits_32); inline;
  77643. begin
  77644. pTDefRegMap(@Self)^.val := thebits;
  77645. end;
  77646. function TPORTG_CNPUE.getw : TBits_32; inline;
  77647. begin
  77648. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77649. end;
  77650. procedure TETH_ETHCON1.setBUFCDEC; inline;
  77651. begin
  77652. pTDefRegMap(@Self)^.&set := $00000001;
  77653. end;
  77654. procedure TETH_ETHCON1.clearBUFCDEC; inline;
  77655. begin
  77656. pTDefRegMap(@Self)^.clr := $00000001;
  77657. end;
  77658. procedure TETH_ETHCON1.setBUFCDEC(thebits : TBits_1); inline;
  77659. begin
  77660. if thebits = 0 then
  77661. pTDefRegMap(@Self)^.clr := $00000001
  77662. else
  77663. pTDefRegMap(@Self)^.&set := $00000001;
  77664. end;
  77665. function TETH_ETHCON1.getBUFCDEC : TBits_1; inline;
  77666. begin
  77667. getBUFCDEC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77668. end;
  77669. procedure TETH_ETHCON1.setMANFC; inline;
  77670. begin
  77671. pTDefRegMap(@Self)^.&set := $00000010;
  77672. end;
  77673. procedure TETH_ETHCON1.clearMANFC; inline;
  77674. begin
  77675. pTDefRegMap(@Self)^.clr := $00000010;
  77676. end;
  77677. procedure TETH_ETHCON1.setMANFC(thebits : TBits_1); inline;
  77678. begin
  77679. if thebits = 0 then
  77680. pTDefRegMap(@Self)^.clr := $00000010
  77681. else
  77682. pTDefRegMap(@Self)^.&set := $00000010;
  77683. end;
  77684. function TETH_ETHCON1.getMANFC : TBits_1; inline;
  77685. begin
  77686. getMANFC := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77687. end;
  77688. procedure TETH_ETHCON1.setAUTOFC; inline;
  77689. begin
  77690. pTDefRegMap(@Self)^.&set := $00000080;
  77691. end;
  77692. procedure TETH_ETHCON1.clearAUTOFC; inline;
  77693. begin
  77694. pTDefRegMap(@Self)^.clr := $00000080;
  77695. end;
  77696. procedure TETH_ETHCON1.setAUTOFC(thebits : TBits_1); inline;
  77697. begin
  77698. if thebits = 0 then
  77699. pTDefRegMap(@Self)^.clr := $00000080
  77700. else
  77701. pTDefRegMap(@Self)^.&set := $00000080;
  77702. end;
  77703. function TETH_ETHCON1.getAUTOFC : TBits_1; inline;
  77704. begin
  77705. getAUTOFC := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77706. end;
  77707. procedure TETH_ETHCON1.setRXEN; inline;
  77708. begin
  77709. pTDefRegMap(@Self)^.&set := $00000100;
  77710. end;
  77711. procedure TETH_ETHCON1.clearRXEN; inline;
  77712. begin
  77713. pTDefRegMap(@Self)^.clr := $00000100;
  77714. end;
  77715. procedure TETH_ETHCON1.setRXEN(thebits : TBits_1); inline;
  77716. begin
  77717. if thebits = 0 then
  77718. pTDefRegMap(@Self)^.clr := $00000100
  77719. else
  77720. pTDefRegMap(@Self)^.&set := $00000100;
  77721. end;
  77722. function TETH_ETHCON1.getRXEN : TBits_1; inline;
  77723. begin
  77724. getRXEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77725. end;
  77726. procedure TETH_ETHCON1.setTXRTS; inline;
  77727. begin
  77728. pTDefRegMap(@Self)^.&set := $00000200;
  77729. end;
  77730. procedure TETH_ETHCON1.clearTXRTS; inline;
  77731. begin
  77732. pTDefRegMap(@Self)^.clr := $00000200;
  77733. end;
  77734. procedure TETH_ETHCON1.setTXRTS(thebits : TBits_1); inline;
  77735. begin
  77736. if thebits = 0 then
  77737. pTDefRegMap(@Self)^.clr := $00000200
  77738. else
  77739. pTDefRegMap(@Self)^.&set := $00000200;
  77740. end;
  77741. function TETH_ETHCON1.getTXRTS : TBits_1; inline;
  77742. begin
  77743. getTXRTS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77744. end;
  77745. procedure TETH_ETHCON1.setSIDL; inline;
  77746. begin
  77747. pTDefRegMap(@Self)^.&set := $00002000;
  77748. end;
  77749. procedure TETH_ETHCON1.clearSIDL; inline;
  77750. begin
  77751. pTDefRegMap(@Self)^.clr := $00002000;
  77752. end;
  77753. procedure TETH_ETHCON1.setSIDL(thebits : TBits_1); inline;
  77754. begin
  77755. if thebits = 0 then
  77756. pTDefRegMap(@Self)^.clr := $00002000
  77757. else
  77758. pTDefRegMap(@Self)^.&set := $00002000;
  77759. end;
  77760. function TETH_ETHCON1.getSIDL : TBits_1; inline;
  77761. begin
  77762. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77763. end;
  77764. procedure TETH_ETHCON1.setON; inline;
  77765. begin
  77766. pTDefRegMap(@Self)^.&set := $00008000;
  77767. end;
  77768. procedure TETH_ETHCON1.clearON; inline;
  77769. begin
  77770. pTDefRegMap(@Self)^.clr := $00008000;
  77771. end;
  77772. procedure TETH_ETHCON1.setON(thebits : TBits_1); inline;
  77773. begin
  77774. if thebits = 0 then
  77775. pTDefRegMap(@Self)^.clr := $00008000
  77776. else
  77777. pTDefRegMap(@Self)^.&set := $00008000;
  77778. end;
  77779. function TETH_ETHCON1.getON : TBits_1; inline;
  77780. begin
  77781. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  77782. end;
  77783. procedure TETH_ETHCON1.setPTV(thebits : TBits_16); inline;
  77784. begin
  77785. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  77786. end;
  77787. function TETH_ETHCON1.getPTV : TBits_16; inline;
  77788. begin
  77789. getPTV := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  77790. end;
  77791. procedure TETH_ETHCON1.setw(thebits : TBits_32); inline;
  77792. begin
  77793. pTDefRegMap(@Self)^.val := thebits;
  77794. end;
  77795. function TETH_ETHCON1.getw : TBits_32; inline;
  77796. begin
  77797. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77798. end;
  77799. procedure TETH_ETHCON2.setRXBUF_SZ(thebits : TBits_7); inline;
  77800. begin
  77801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF80F or ( thebits shl 4 );
  77802. end;
  77803. function TETH_ETHCON2.getRXBUF_SZ : TBits_7; inline;
  77804. begin
  77805. getRXBUF_SZ := (pTDefRegMap(@Self)^.val and $000007F0) shr 4;
  77806. end;
  77807. procedure TETH_ETHCON2.setw(thebits : TBits_32); inline;
  77808. begin
  77809. pTDefRegMap(@Self)^.val := thebits;
  77810. end;
  77811. function TETH_ETHCON2.getw : TBits_32; inline;
  77812. begin
  77813. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77814. end;
  77815. procedure TETH_ETHTXST.setTXSTADDR(thebits : TBits_30); inline;
  77816. begin
  77817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
  77818. end;
  77819. function TETH_ETHTXST.getTXSTADDR : TBits_30; inline;
  77820. begin
  77821. getTXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
  77822. end;
  77823. procedure TETH_ETHTXST.setw(thebits : TBits_32); inline;
  77824. begin
  77825. pTDefRegMap(@Self)^.val := thebits;
  77826. end;
  77827. function TETH_ETHTXST.getw : TBits_32; inline;
  77828. begin
  77829. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77830. end;
  77831. procedure TETH_ETHRXST.setRXSTADDR(thebits : TBits_30); inline;
  77832. begin
  77833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
  77834. end;
  77835. function TETH_ETHRXST.getRXSTADDR : TBits_30; inline;
  77836. begin
  77837. getRXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
  77838. end;
  77839. procedure TETH_ETHRXST.setw(thebits : TBits_32); inline;
  77840. begin
  77841. pTDefRegMap(@Self)^.val := thebits;
  77842. end;
  77843. function TETH_ETHRXST.getw : TBits_32; inline;
  77844. begin
  77845. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77846. end;
  77847. procedure TETH_ETHHT0.setw(thebits : TBits_32); inline;
  77848. begin
  77849. pTDefRegMap(@Self)^.val := thebits;
  77850. end;
  77851. function TETH_ETHHT0.getw : TBits_32; inline;
  77852. begin
  77853. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77854. end;
  77855. procedure TETH_ETHHT0.setHTLOWER(thebits : TBits_32); inline;
  77856. begin
  77857. pTDefRegMap(@Self)^.val := thebits;
  77858. end;
  77859. function TETH_ETHHT0.getHTLOWER : TBits_32; inline;
  77860. begin
  77861. getHTLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77862. end;
  77863. procedure TETH_ETHHT1.setw(thebits : TBits_32); inline;
  77864. begin
  77865. pTDefRegMap(@Self)^.val := thebits;
  77866. end;
  77867. function TETH_ETHHT1.getw : TBits_32; inline;
  77868. begin
  77869. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77870. end;
  77871. procedure TETH_ETHHT1.setHTUPPER(thebits : TBits_32); inline;
  77872. begin
  77873. pTDefRegMap(@Self)^.val := thebits;
  77874. end;
  77875. function TETH_ETHHT1.getHTUPPER : TBits_32; inline;
  77876. begin
  77877. getHTUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77878. end;
  77879. procedure TETH_ETHPMM0.setw(thebits : TBits_32); inline;
  77880. begin
  77881. pTDefRegMap(@Self)^.val := thebits;
  77882. end;
  77883. function TETH_ETHPMM0.getw : TBits_32; inline;
  77884. begin
  77885. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77886. end;
  77887. procedure TETH_ETHPMM0.setPMMLOWER(thebits : TBits_32); inline;
  77888. begin
  77889. pTDefRegMap(@Self)^.val := thebits;
  77890. end;
  77891. function TETH_ETHPMM0.getPMMLOWER : TBits_32; inline;
  77892. begin
  77893. getPMMLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77894. end;
  77895. procedure TETH_ETHPMM1.setw(thebits : TBits_32); inline;
  77896. begin
  77897. pTDefRegMap(@Self)^.val := thebits;
  77898. end;
  77899. function TETH_ETHPMM1.getw : TBits_32; inline;
  77900. begin
  77901. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77902. end;
  77903. procedure TETH_ETHPMM1.setPMMUPPER(thebits : TBits_32); inline;
  77904. begin
  77905. pTDefRegMap(@Self)^.val := thebits;
  77906. end;
  77907. function TETH_ETHPMM1.getPMMUPPER : TBits_32; inline;
  77908. begin
  77909. getPMMUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77910. end;
  77911. procedure TETH_ETHPMCS.setPMCS(thebits : TBits_16); inline;
  77912. begin
  77913. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  77914. end;
  77915. function TETH_ETHPMCS.getPMCS : TBits_16; inline;
  77916. begin
  77917. getPMCS := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  77918. end;
  77919. procedure TETH_ETHPMCS.setw(thebits : TBits_32); inline;
  77920. begin
  77921. pTDefRegMap(@Self)^.val := thebits;
  77922. end;
  77923. function TETH_ETHPMCS.getw : TBits_32; inline;
  77924. begin
  77925. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77926. end;
  77927. procedure TETH_ETHPMO.setPMO(thebits : TBits_16); inline;
  77928. begin
  77929. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  77930. end;
  77931. function TETH_ETHPMO.getPMO : TBits_16; inline;
  77932. begin
  77933. getPMO := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  77934. end;
  77935. procedure TETH_ETHPMO.setw(thebits : TBits_32); inline;
  77936. begin
  77937. pTDefRegMap(@Self)^.val := thebits;
  77938. end;
  77939. function TETH_ETHPMO.getw : TBits_32; inline;
  77940. begin
  77941. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77942. end;
  77943. procedure TETH_ETHRXFC.setBCEN; inline;
  77944. begin
  77945. pTDefRegMap(@Self)^.&set := $00000001;
  77946. end;
  77947. procedure TETH_ETHRXFC.clearBCEN; inline;
  77948. begin
  77949. pTDefRegMap(@Self)^.clr := $00000001;
  77950. end;
  77951. procedure TETH_ETHRXFC.setBCEN(thebits : TBits_1); inline;
  77952. begin
  77953. if thebits = 0 then
  77954. pTDefRegMap(@Self)^.clr := $00000001
  77955. else
  77956. pTDefRegMap(@Self)^.&set := $00000001;
  77957. end;
  77958. function TETH_ETHRXFC.getBCEN : TBits_1; inline;
  77959. begin
  77960. getBCEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77961. end;
  77962. procedure TETH_ETHRXFC.setMCEN; inline;
  77963. begin
  77964. pTDefRegMap(@Self)^.&set := $00000002;
  77965. end;
  77966. procedure TETH_ETHRXFC.clearMCEN; inline;
  77967. begin
  77968. pTDefRegMap(@Self)^.clr := $00000002;
  77969. end;
  77970. procedure TETH_ETHRXFC.setMCEN(thebits : TBits_1); inline;
  77971. begin
  77972. if thebits = 0 then
  77973. pTDefRegMap(@Self)^.clr := $00000002
  77974. else
  77975. pTDefRegMap(@Self)^.&set := $00000002;
  77976. end;
  77977. function TETH_ETHRXFC.getMCEN : TBits_1; inline;
  77978. begin
  77979. getMCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77980. end;
  77981. procedure TETH_ETHRXFC.setNOTMEEN; inline;
  77982. begin
  77983. pTDefRegMap(@Self)^.&set := $00000004;
  77984. end;
  77985. procedure TETH_ETHRXFC.clearNOTMEEN; inline;
  77986. begin
  77987. pTDefRegMap(@Self)^.clr := $00000004;
  77988. end;
  77989. procedure TETH_ETHRXFC.setNOTMEEN(thebits : TBits_1); inline;
  77990. begin
  77991. if thebits = 0 then
  77992. pTDefRegMap(@Self)^.clr := $00000004
  77993. else
  77994. pTDefRegMap(@Self)^.&set := $00000004;
  77995. end;
  77996. function TETH_ETHRXFC.getNOTMEEN : TBits_1; inline;
  77997. begin
  77998. getNOTMEEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77999. end;
  78000. procedure TETH_ETHRXFC.setUCEN; inline;
  78001. begin
  78002. pTDefRegMap(@Self)^.&set := $00000008;
  78003. end;
  78004. procedure TETH_ETHRXFC.clearUCEN; inline;
  78005. begin
  78006. pTDefRegMap(@Self)^.clr := $00000008;
  78007. end;
  78008. procedure TETH_ETHRXFC.setUCEN(thebits : TBits_1); inline;
  78009. begin
  78010. if thebits = 0 then
  78011. pTDefRegMap(@Self)^.clr := $00000008
  78012. else
  78013. pTDefRegMap(@Self)^.&set := $00000008;
  78014. end;
  78015. function TETH_ETHRXFC.getUCEN : TBits_1; inline;
  78016. begin
  78017. getUCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78018. end;
  78019. procedure TETH_ETHRXFC.setRUNTEN; inline;
  78020. begin
  78021. pTDefRegMap(@Self)^.&set := $00000010;
  78022. end;
  78023. procedure TETH_ETHRXFC.clearRUNTEN; inline;
  78024. begin
  78025. pTDefRegMap(@Self)^.clr := $00000010;
  78026. end;
  78027. procedure TETH_ETHRXFC.setRUNTEN(thebits : TBits_1); inline;
  78028. begin
  78029. if thebits = 0 then
  78030. pTDefRegMap(@Self)^.clr := $00000010
  78031. else
  78032. pTDefRegMap(@Self)^.&set := $00000010;
  78033. end;
  78034. function TETH_ETHRXFC.getRUNTEN : TBits_1; inline;
  78035. begin
  78036. getRUNTEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78037. end;
  78038. procedure TETH_ETHRXFC.setRUNTERREN; inline;
  78039. begin
  78040. pTDefRegMap(@Self)^.&set := $00000020;
  78041. end;
  78042. procedure TETH_ETHRXFC.clearRUNTERREN; inline;
  78043. begin
  78044. pTDefRegMap(@Self)^.clr := $00000020;
  78045. end;
  78046. procedure TETH_ETHRXFC.setRUNTERREN(thebits : TBits_1); inline;
  78047. begin
  78048. if thebits = 0 then
  78049. pTDefRegMap(@Self)^.clr := $00000020
  78050. else
  78051. pTDefRegMap(@Self)^.&set := $00000020;
  78052. end;
  78053. function TETH_ETHRXFC.getRUNTERREN : TBits_1; inline;
  78054. begin
  78055. getRUNTERREN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78056. end;
  78057. procedure TETH_ETHRXFC.setCRCOKEN; inline;
  78058. begin
  78059. pTDefRegMap(@Self)^.&set := $00000040;
  78060. end;
  78061. procedure TETH_ETHRXFC.clearCRCOKEN; inline;
  78062. begin
  78063. pTDefRegMap(@Self)^.clr := $00000040;
  78064. end;
  78065. procedure TETH_ETHRXFC.setCRCOKEN(thebits : TBits_1); inline;
  78066. begin
  78067. if thebits = 0 then
  78068. pTDefRegMap(@Self)^.clr := $00000040
  78069. else
  78070. pTDefRegMap(@Self)^.&set := $00000040;
  78071. end;
  78072. function TETH_ETHRXFC.getCRCOKEN : TBits_1; inline;
  78073. begin
  78074. getCRCOKEN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78075. end;
  78076. procedure TETH_ETHRXFC.setCRCERREN; inline;
  78077. begin
  78078. pTDefRegMap(@Self)^.&set := $00000080;
  78079. end;
  78080. procedure TETH_ETHRXFC.clearCRCERREN; inline;
  78081. begin
  78082. pTDefRegMap(@Self)^.clr := $00000080;
  78083. end;
  78084. procedure TETH_ETHRXFC.setCRCERREN(thebits : TBits_1); inline;
  78085. begin
  78086. if thebits = 0 then
  78087. pTDefRegMap(@Self)^.clr := $00000080
  78088. else
  78089. pTDefRegMap(@Self)^.&set := $00000080;
  78090. end;
  78091. function TETH_ETHRXFC.getCRCERREN : TBits_1; inline;
  78092. begin
  78093. getCRCERREN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78094. end;
  78095. procedure TETH_ETHRXFC.setPMMODE(thebits : TBits_4); inline;
  78096. begin
  78097. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  78098. end;
  78099. function TETH_ETHRXFC.getPMMODE : TBits_4; inline;
  78100. begin
  78101. getPMMODE := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  78102. end;
  78103. procedure TETH_ETHRXFC.setNOTPM; inline;
  78104. begin
  78105. pTDefRegMap(@Self)^.&set := $00001000;
  78106. end;
  78107. procedure TETH_ETHRXFC.clearNOTPM; inline;
  78108. begin
  78109. pTDefRegMap(@Self)^.clr := $00001000;
  78110. end;
  78111. procedure TETH_ETHRXFC.setNOTPM(thebits : TBits_1); inline;
  78112. begin
  78113. if thebits = 0 then
  78114. pTDefRegMap(@Self)^.clr := $00001000
  78115. else
  78116. pTDefRegMap(@Self)^.&set := $00001000;
  78117. end;
  78118. function TETH_ETHRXFC.getNOTPM : TBits_1; inline;
  78119. begin
  78120. getNOTPM := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  78121. end;
  78122. procedure TETH_ETHRXFC.setMPEN; inline;
  78123. begin
  78124. pTDefRegMap(@Self)^.&set := $00004000;
  78125. end;
  78126. procedure TETH_ETHRXFC.clearMPEN; inline;
  78127. begin
  78128. pTDefRegMap(@Self)^.clr := $00004000;
  78129. end;
  78130. procedure TETH_ETHRXFC.setMPEN(thebits : TBits_1); inline;
  78131. begin
  78132. if thebits = 0 then
  78133. pTDefRegMap(@Self)^.clr := $00004000
  78134. else
  78135. pTDefRegMap(@Self)^.&set := $00004000;
  78136. end;
  78137. function TETH_ETHRXFC.getMPEN : TBits_1; inline;
  78138. begin
  78139. getMPEN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78140. end;
  78141. procedure TETH_ETHRXFC.setHTEN; inline;
  78142. begin
  78143. pTDefRegMap(@Self)^.&set := $00008000;
  78144. end;
  78145. procedure TETH_ETHRXFC.clearHTEN; inline;
  78146. begin
  78147. pTDefRegMap(@Self)^.clr := $00008000;
  78148. end;
  78149. procedure TETH_ETHRXFC.setHTEN(thebits : TBits_1); inline;
  78150. begin
  78151. if thebits = 0 then
  78152. pTDefRegMap(@Self)^.clr := $00008000
  78153. else
  78154. pTDefRegMap(@Self)^.&set := $00008000;
  78155. end;
  78156. function TETH_ETHRXFC.getHTEN : TBits_1; inline;
  78157. begin
  78158. getHTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78159. end;
  78160. procedure TETH_ETHRXFC.setw(thebits : TBits_32); inline;
  78161. begin
  78162. pTDefRegMap(@Self)^.val := thebits;
  78163. end;
  78164. function TETH_ETHRXFC.getw : TBits_32; inline;
  78165. begin
  78166. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78167. end;
  78168. procedure TETH_ETHRXWM.setRXEWM(thebits : TBits_8); inline;
  78169. begin
  78170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  78171. end;
  78172. function TETH_ETHRXWM.getRXEWM : TBits_8; inline;
  78173. begin
  78174. getRXEWM := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  78175. end;
  78176. procedure TETH_ETHRXWM.setRXFWM(thebits : TBits_8); inline;
  78177. begin
  78178. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  78179. end;
  78180. function TETH_ETHRXWM.getRXFWM : TBits_8; inline;
  78181. begin
  78182. getRXFWM := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  78183. end;
  78184. procedure TETH_ETHRXWM.setw(thebits : TBits_32); inline;
  78185. begin
  78186. pTDefRegMap(@Self)^.val := thebits;
  78187. end;
  78188. function TETH_ETHRXWM.getw : TBits_32; inline;
  78189. begin
  78190. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78191. end;
  78192. procedure TETH_ETHIEN.setRXOVFLWIE; inline;
  78193. begin
  78194. pTDefRegMap(@Self)^.&set := $00000001;
  78195. end;
  78196. procedure TETH_ETHIEN.clearRXOVFLWIE; inline;
  78197. begin
  78198. pTDefRegMap(@Self)^.clr := $00000001;
  78199. end;
  78200. procedure TETH_ETHIEN.setRXOVFLWIE(thebits : TBits_1); inline;
  78201. begin
  78202. if thebits = 0 then
  78203. pTDefRegMap(@Self)^.clr := $00000001
  78204. else
  78205. pTDefRegMap(@Self)^.&set := $00000001;
  78206. end;
  78207. function TETH_ETHIEN.getRXOVFLWIE : TBits_1; inline;
  78208. begin
  78209. getRXOVFLWIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78210. end;
  78211. procedure TETH_ETHIEN.setRXBUFNAIE; inline;
  78212. begin
  78213. pTDefRegMap(@Self)^.&set := $00000002;
  78214. end;
  78215. procedure TETH_ETHIEN.clearRXBUFNAIE; inline;
  78216. begin
  78217. pTDefRegMap(@Self)^.clr := $00000002;
  78218. end;
  78219. procedure TETH_ETHIEN.setRXBUFNAIE(thebits : TBits_1); inline;
  78220. begin
  78221. if thebits = 0 then
  78222. pTDefRegMap(@Self)^.clr := $00000002
  78223. else
  78224. pTDefRegMap(@Self)^.&set := $00000002;
  78225. end;
  78226. function TETH_ETHIEN.getRXBUFNAIE : TBits_1; inline;
  78227. begin
  78228. getRXBUFNAIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78229. end;
  78230. procedure TETH_ETHIEN.setTXABORTIE; inline;
  78231. begin
  78232. pTDefRegMap(@Self)^.&set := $00000004;
  78233. end;
  78234. procedure TETH_ETHIEN.clearTXABORTIE; inline;
  78235. begin
  78236. pTDefRegMap(@Self)^.clr := $00000004;
  78237. end;
  78238. procedure TETH_ETHIEN.setTXABORTIE(thebits : TBits_1); inline;
  78239. begin
  78240. if thebits = 0 then
  78241. pTDefRegMap(@Self)^.clr := $00000004
  78242. else
  78243. pTDefRegMap(@Self)^.&set := $00000004;
  78244. end;
  78245. function TETH_ETHIEN.getTXABORTIE : TBits_1; inline;
  78246. begin
  78247. getTXABORTIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78248. end;
  78249. procedure TETH_ETHIEN.setTXDONEIE; inline;
  78250. begin
  78251. pTDefRegMap(@Self)^.&set := $00000008;
  78252. end;
  78253. procedure TETH_ETHIEN.clearTXDONEIE; inline;
  78254. begin
  78255. pTDefRegMap(@Self)^.clr := $00000008;
  78256. end;
  78257. procedure TETH_ETHIEN.setTXDONEIE(thebits : TBits_1); inline;
  78258. begin
  78259. if thebits = 0 then
  78260. pTDefRegMap(@Self)^.clr := $00000008
  78261. else
  78262. pTDefRegMap(@Self)^.&set := $00000008;
  78263. end;
  78264. function TETH_ETHIEN.getTXDONEIE : TBits_1; inline;
  78265. begin
  78266. getTXDONEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78267. end;
  78268. procedure TETH_ETHIEN.setRXACTIE; inline;
  78269. begin
  78270. pTDefRegMap(@Self)^.&set := $00000020;
  78271. end;
  78272. procedure TETH_ETHIEN.clearRXACTIE; inline;
  78273. begin
  78274. pTDefRegMap(@Self)^.clr := $00000020;
  78275. end;
  78276. procedure TETH_ETHIEN.setRXACTIE(thebits : TBits_1); inline;
  78277. begin
  78278. if thebits = 0 then
  78279. pTDefRegMap(@Self)^.clr := $00000020
  78280. else
  78281. pTDefRegMap(@Self)^.&set := $00000020;
  78282. end;
  78283. function TETH_ETHIEN.getRXACTIE : TBits_1; inline;
  78284. begin
  78285. getRXACTIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78286. end;
  78287. procedure TETH_ETHIEN.setPKTPENDIE; inline;
  78288. begin
  78289. pTDefRegMap(@Self)^.&set := $00000040;
  78290. end;
  78291. procedure TETH_ETHIEN.clearPKTPENDIE; inline;
  78292. begin
  78293. pTDefRegMap(@Self)^.clr := $00000040;
  78294. end;
  78295. procedure TETH_ETHIEN.setPKTPENDIE(thebits : TBits_1); inline;
  78296. begin
  78297. if thebits = 0 then
  78298. pTDefRegMap(@Self)^.clr := $00000040
  78299. else
  78300. pTDefRegMap(@Self)^.&set := $00000040;
  78301. end;
  78302. function TETH_ETHIEN.getPKTPENDIE : TBits_1; inline;
  78303. begin
  78304. getPKTPENDIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78305. end;
  78306. procedure TETH_ETHIEN.setRXDONEIE; inline;
  78307. begin
  78308. pTDefRegMap(@Self)^.&set := $00000080;
  78309. end;
  78310. procedure TETH_ETHIEN.clearRXDONEIE; inline;
  78311. begin
  78312. pTDefRegMap(@Self)^.clr := $00000080;
  78313. end;
  78314. procedure TETH_ETHIEN.setRXDONEIE(thebits : TBits_1); inline;
  78315. begin
  78316. if thebits = 0 then
  78317. pTDefRegMap(@Self)^.clr := $00000080
  78318. else
  78319. pTDefRegMap(@Self)^.&set := $00000080;
  78320. end;
  78321. function TETH_ETHIEN.getRXDONEIE : TBits_1; inline;
  78322. begin
  78323. getRXDONEIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78324. end;
  78325. procedure TETH_ETHIEN.setFWMARKIE; inline;
  78326. begin
  78327. pTDefRegMap(@Self)^.&set := $00000100;
  78328. end;
  78329. procedure TETH_ETHIEN.clearFWMARKIE; inline;
  78330. begin
  78331. pTDefRegMap(@Self)^.clr := $00000100;
  78332. end;
  78333. procedure TETH_ETHIEN.setFWMARKIE(thebits : TBits_1); inline;
  78334. begin
  78335. if thebits = 0 then
  78336. pTDefRegMap(@Self)^.clr := $00000100
  78337. else
  78338. pTDefRegMap(@Self)^.&set := $00000100;
  78339. end;
  78340. function TETH_ETHIEN.getFWMARKIE : TBits_1; inline;
  78341. begin
  78342. getFWMARKIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78343. end;
  78344. procedure TETH_ETHIEN.setEWMARKIE; inline;
  78345. begin
  78346. pTDefRegMap(@Self)^.&set := $00000200;
  78347. end;
  78348. procedure TETH_ETHIEN.clearEWMARKIE; inline;
  78349. begin
  78350. pTDefRegMap(@Self)^.clr := $00000200;
  78351. end;
  78352. procedure TETH_ETHIEN.setEWMARKIE(thebits : TBits_1); inline;
  78353. begin
  78354. if thebits = 0 then
  78355. pTDefRegMap(@Self)^.clr := $00000200
  78356. else
  78357. pTDefRegMap(@Self)^.&set := $00000200;
  78358. end;
  78359. function TETH_ETHIEN.getEWMARKIE : TBits_1; inline;
  78360. begin
  78361. getEWMARKIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78362. end;
  78363. procedure TETH_ETHIEN.setRXBUSEIE; inline;
  78364. begin
  78365. pTDefRegMap(@Self)^.&set := $00002000;
  78366. end;
  78367. procedure TETH_ETHIEN.clearRXBUSEIE; inline;
  78368. begin
  78369. pTDefRegMap(@Self)^.clr := $00002000;
  78370. end;
  78371. procedure TETH_ETHIEN.setRXBUSEIE(thebits : TBits_1); inline;
  78372. begin
  78373. if thebits = 0 then
  78374. pTDefRegMap(@Self)^.clr := $00002000
  78375. else
  78376. pTDefRegMap(@Self)^.&set := $00002000;
  78377. end;
  78378. function TETH_ETHIEN.getRXBUSEIE : TBits_1; inline;
  78379. begin
  78380. getRXBUSEIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78381. end;
  78382. procedure TETH_ETHIEN.setTXBUSEIE; inline;
  78383. begin
  78384. pTDefRegMap(@Self)^.&set := $00004000;
  78385. end;
  78386. procedure TETH_ETHIEN.clearTXBUSEIE; inline;
  78387. begin
  78388. pTDefRegMap(@Self)^.clr := $00004000;
  78389. end;
  78390. procedure TETH_ETHIEN.setTXBUSEIE(thebits : TBits_1); inline;
  78391. begin
  78392. if thebits = 0 then
  78393. pTDefRegMap(@Self)^.clr := $00004000
  78394. else
  78395. pTDefRegMap(@Self)^.&set := $00004000;
  78396. end;
  78397. function TETH_ETHIEN.getTXBUSEIE : TBits_1; inline;
  78398. begin
  78399. getTXBUSEIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78400. end;
  78401. procedure TETH_ETHIEN.setw(thebits : TBits_32); inline;
  78402. begin
  78403. pTDefRegMap(@Self)^.val := thebits;
  78404. end;
  78405. function TETH_ETHIEN.getw : TBits_32; inline;
  78406. begin
  78407. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78408. end;
  78409. procedure TETH_ETHIRQ.setRXOVFLW; inline;
  78410. begin
  78411. pTDefRegMap(@Self)^.&set := $00000001;
  78412. end;
  78413. procedure TETH_ETHIRQ.clearRXOVFLW; inline;
  78414. begin
  78415. pTDefRegMap(@Self)^.clr := $00000001;
  78416. end;
  78417. procedure TETH_ETHIRQ.setRXOVFLW(thebits : TBits_1); inline;
  78418. begin
  78419. if thebits = 0 then
  78420. pTDefRegMap(@Self)^.clr := $00000001
  78421. else
  78422. pTDefRegMap(@Self)^.&set := $00000001;
  78423. end;
  78424. function TETH_ETHIRQ.getRXOVFLW : TBits_1; inline;
  78425. begin
  78426. getRXOVFLW := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78427. end;
  78428. procedure TETH_ETHIRQ.setRXBUFNA; inline;
  78429. begin
  78430. pTDefRegMap(@Self)^.&set := $00000002;
  78431. end;
  78432. procedure TETH_ETHIRQ.clearRXBUFNA; inline;
  78433. begin
  78434. pTDefRegMap(@Self)^.clr := $00000002;
  78435. end;
  78436. procedure TETH_ETHIRQ.setRXBUFNA(thebits : TBits_1); inline;
  78437. begin
  78438. if thebits = 0 then
  78439. pTDefRegMap(@Self)^.clr := $00000002
  78440. else
  78441. pTDefRegMap(@Self)^.&set := $00000002;
  78442. end;
  78443. function TETH_ETHIRQ.getRXBUFNA : TBits_1; inline;
  78444. begin
  78445. getRXBUFNA := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78446. end;
  78447. procedure TETH_ETHIRQ.setTXABORT; inline;
  78448. begin
  78449. pTDefRegMap(@Self)^.&set := $00000004;
  78450. end;
  78451. procedure TETH_ETHIRQ.clearTXABORT; inline;
  78452. begin
  78453. pTDefRegMap(@Self)^.clr := $00000004;
  78454. end;
  78455. procedure TETH_ETHIRQ.setTXABORT(thebits : TBits_1); inline;
  78456. begin
  78457. if thebits = 0 then
  78458. pTDefRegMap(@Self)^.clr := $00000004
  78459. else
  78460. pTDefRegMap(@Self)^.&set := $00000004;
  78461. end;
  78462. function TETH_ETHIRQ.getTXABORT : TBits_1; inline;
  78463. begin
  78464. getTXABORT := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78465. end;
  78466. procedure TETH_ETHIRQ.setTXDONE; inline;
  78467. begin
  78468. pTDefRegMap(@Self)^.&set := $00000008;
  78469. end;
  78470. procedure TETH_ETHIRQ.clearTXDONE; inline;
  78471. begin
  78472. pTDefRegMap(@Self)^.clr := $00000008;
  78473. end;
  78474. procedure TETH_ETHIRQ.setTXDONE(thebits : TBits_1); inline;
  78475. begin
  78476. if thebits = 0 then
  78477. pTDefRegMap(@Self)^.clr := $00000008
  78478. else
  78479. pTDefRegMap(@Self)^.&set := $00000008;
  78480. end;
  78481. function TETH_ETHIRQ.getTXDONE : TBits_1; inline;
  78482. begin
  78483. getTXDONE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78484. end;
  78485. procedure TETH_ETHIRQ.setRXACT; inline;
  78486. begin
  78487. pTDefRegMap(@Self)^.&set := $00000020;
  78488. end;
  78489. procedure TETH_ETHIRQ.clearRXACT; inline;
  78490. begin
  78491. pTDefRegMap(@Self)^.clr := $00000020;
  78492. end;
  78493. procedure TETH_ETHIRQ.setRXACT(thebits : TBits_1); inline;
  78494. begin
  78495. if thebits = 0 then
  78496. pTDefRegMap(@Self)^.clr := $00000020
  78497. else
  78498. pTDefRegMap(@Self)^.&set := $00000020;
  78499. end;
  78500. function TETH_ETHIRQ.getRXACT : TBits_1; inline;
  78501. begin
  78502. getRXACT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78503. end;
  78504. procedure TETH_ETHIRQ.setPKTPEND; inline;
  78505. begin
  78506. pTDefRegMap(@Self)^.&set := $00000040;
  78507. end;
  78508. procedure TETH_ETHIRQ.clearPKTPEND; inline;
  78509. begin
  78510. pTDefRegMap(@Self)^.clr := $00000040;
  78511. end;
  78512. procedure TETH_ETHIRQ.setPKTPEND(thebits : TBits_1); inline;
  78513. begin
  78514. if thebits = 0 then
  78515. pTDefRegMap(@Self)^.clr := $00000040
  78516. else
  78517. pTDefRegMap(@Self)^.&set := $00000040;
  78518. end;
  78519. function TETH_ETHIRQ.getPKTPEND : TBits_1; inline;
  78520. begin
  78521. getPKTPEND := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78522. end;
  78523. procedure TETH_ETHIRQ.setRXDONE; inline;
  78524. begin
  78525. pTDefRegMap(@Self)^.&set := $00000080;
  78526. end;
  78527. procedure TETH_ETHIRQ.clearRXDONE; inline;
  78528. begin
  78529. pTDefRegMap(@Self)^.clr := $00000080;
  78530. end;
  78531. procedure TETH_ETHIRQ.setRXDONE(thebits : TBits_1); inline;
  78532. begin
  78533. if thebits = 0 then
  78534. pTDefRegMap(@Self)^.clr := $00000080
  78535. else
  78536. pTDefRegMap(@Self)^.&set := $00000080;
  78537. end;
  78538. function TETH_ETHIRQ.getRXDONE : TBits_1; inline;
  78539. begin
  78540. getRXDONE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78541. end;
  78542. procedure TETH_ETHIRQ.setFWMARK; inline;
  78543. begin
  78544. pTDefRegMap(@Self)^.&set := $00000100;
  78545. end;
  78546. procedure TETH_ETHIRQ.clearFWMARK; inline;
  78547. begin
  78548. pTDefRegMap(@Self)^.clr := $00000100;
  78549. end;
  78550. procedure TETH_ETHIRQ.setFWMARK(thebits : TBits_1); inline;
  78551. begin
  78552. if thebits = 0 then
  78553. pTDefRegMap(@Self)^.clr := $00000100
  78554. else
  78555. pTDefRegMap(@Self)^.&set := $00000100;
  78556. end;
  78557. function TETH_ETHIRQ.getFWMARK : TBits_1; inline;
  78558. begin
  78559. getFWMARK := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78560. end;
  78561. procedure TETH_ETHIRQ.setEWMARK; inline;
  78562. begin
  78563. pTDefRegMap(@Self)^.&set := $00000200;
  78564. end;
  78565. procedure TETH_ETHIRQ.clearEWMARK; inline;
  78566. begin
  78567. pTDefRegMap(@Self)^.clr := $00000200;
  78568. end;
  78569. procedure TETH_ETHIRQ.setEWMARK(thebits : TBits_1); inline;
  78570. begin
  78571. if thebits = 0 then
  78572. pTDefRegMap(@Self)^.clr := $00000200
  78573. else
  78574. pTDefRegMap(@Self)^.&set := $00000200;
  78575. end;
  78576. function TETH_ETHIRQ.getEWMARK : TBits_1; inline;
  78577. begin
  78578. getEWMARK := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78579. end;
  78580. procedure TETH_ETHIRQ.setRXBUSE; inline;
  78581. begin
  78582. pTDefRegMap(@Self)^.&set := $00002000;
  78583. end;
  78584. procedure TETH_ETHIRQ.clearRXBUSE; inline;
  78585. begin
  78586. pTDefRegMap(@Self)^.clr := $00002000;
  78587. end;
  78588. procedure TETH_ETHIRQ.setRXBUSE(thebits : TBits_1); inline;
  78589. begin
  78590. if thebits = 0 then
  78591. pTDefRegMap(@Self)^.clr := $00002000
  78592. else
  78593. pTDefRegMap(@Self)^.&set := $00002000;
  78594. end;
  78595. function TETH_ETHIRQ.getRXBUSE : TBits_1; inline;
  78596. begin
  78597. getRXBUSE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  78598. end;
  78599. procedure TETH_ETHIRQ.setTXBUSE; inline;
  78600. begin
  78601. pTDefRegMap(@Self)^.&set := $00004000;
  78602. end;
  78603. procedure TETH_ETHIRQ.clearTXBUSE; inline;
  78604. begin
  78605. pTDefRegMap(@Self)^.clr := $00004000;
  78606. end;
  78607. procedure TETH_ETHIRQ.setTXBUSE(thebits : TBits_1); inline;
  78608. begin
  78609. if thebits = 0 then
  78610. pTDefRegMap(@Self)^.clr := $00004000
  78611. else
  78612. pTDefRegMap(@Self)^.&set := $00004000;
  78613. end;
  78614. function TETH_ETHIRQ.getTXBUSE : TBits_1; inline;
  78615. begin
  78616. getTXBUSE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  78617. end;
  78618. procedure TETH_ETHIRQ.setw(thebits : TBits_32); inline;
  78619. begin
  78620. pTDefRegMap(@Self)^.val := thebits;
  78621. end;
  78622. function TETH_ETHIRQ.getw : TBits_32; inline;
  78623. begin
  78624. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78625. end;
  78626. procedure TETH_ETHSTAT.setRXBUSY; inline;
  78627. begin
  78628. pTDefRegMap(@Self)^.&set := $00000020;
  78629. end;
  78630. procedure TETH_ETHSTAT.clearRXBUSY; inline;
  78631. begin
  78632. pTDefRegMap(@Self)^.clr := $00000020;
  78633. end;
  78634. procedure TETH_ETHSTAT.setRXBUSY(thebits : TBits_1); inline;
  78635. begin
  78636. if thebits = 0 then
  78637. pTDefRegMap(@Self)^.clr := $00000020
  78638. else
  78639. pTDefRegMap(@Self)^.&set := $00000020;
  78640. end;
  78641. function TETH_ETHSTAT.getRXBUSY : TBits_1; inline;
  78642. begin
  78643. getRXBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  78644. end;
  78645. procedure TETH_ETHSTAT.setTXBUSY; inline;
  78646. begin
  78647. pTDefRegMap(@Self)^.&set := $00000040;
  78648. end;
  78649. procedure TETH_ETHSTAT.clearTXBUSY; inline;
  78650. begin
  78651. pTDefRegMap(@Self)^.clr := $00000040;
  78652. end;
  78653. procedure TETH_ETHSTAT.setTXBUSY(thebits : TBits_1); inline;
  78654. begin
  78655. if thebits = 0 then
  78656. pTDefRegMap(@Self)^.clr := $00000040
  78657. else
  78658. pTDefRegMap(@Self)^.&set := $00000040;
  78659. end;
  78660. function TETH_ETHSTAT.getTXBUSY : TBits_1; inline;
  78661. begin
  78662. getTXBUSY := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  78663. end;
  78664. procedure TETH_ETHSTAT.setBUSY; inline;
  78665. begin
  78666. pTDefRegMap(@Self)^.&set := $00000080;
  78667. end;
  78668. procedure TETH_ETHSTAT.clearBUSY; inline;
  78669. begin
  78670. pTDefRegMap(@Self)^.clr := $00000080;
  78671. end;
  78672. procedure TETH_ETHSTAT.setBUSY(thebits : TBits_1); inline;
  78673. begin
  78674. if thebits = 0 then
  78675. pTDefRegMap(@Self)^.clr := $00000080
  78676. else
  78677. pTDefRegMap(@Self)^.&set := $00000080;
  78678. end;
  78679. function TETH_ETHSTAT.getBUSY : TBits_1; inline;
  78680. begin
  78681. getBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78682. end;
  78683. procedure TETH_ETHSTAT.setBUFCNT(thebits : TBits_8); inline;
  78684. begin
  78685. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  78686. end;
  78687. function TETH_ETHSTAT.getBUFCNT : TBits_8; inline;
  78688. begin
  78689. getBUFCNT := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  78690. end;
  78691. procedure TETH_ETHSTAT.setETHBUSY; inline;
  78692. begin
  78693. pTDefRegMap(@Self)^.&set := $00000080;
  78694. end;
  78695. procedure TETH_ETHSTAT.clearETHBUSY; inline;
  78696. begin
  78697. pTDefRegMap(@Self)^.clr := $00000080;
  78698. end;
  78699. procedure TETH_ETHSTAT.setETHBUSY(thebits : TBits_1); inline;
  78700. begin
  78701. if thebits = 0 then
  78702. pTDefRegMap(@Self)^.clr := $00000080
  78703. else
  78704. pTDefRegMap(@Self)^.&set := $00000080;
  78705. end;
  78706. function TETH_ETHSTAT.getETHBUSY : TBits_1; inline;
  78707. begin
  78708. getETHBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78709. end;
  78710. procedure TETH_ETHSTAT.setw(thebits : TBits_32); inline;
  78711. begin
  78712. pTDefRegMap(@Self)^.val := thebits;
  78713. end;
  78714. function TETH_ETHSTAT.getw : TBits_32; inline;
  78715. begin
  78716. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78717. end;
  78718. procedure TETH_ETHRXOVFLOW.setRXOVFLWCNT(thebits : TBits_16); inline;
  78719. begin
  78720. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78721. end;
  78722. function TETH_ETHRXOVFLOW.getRXOVFLWCNT : TBits_16; inline;
  78723. begin
  78724. getRXOVFLWCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78725. end;
  78726. procedure TETH_ETHRXOVFLOW.setw(thebits : TBits_32); inline;
  78727. begin
  78728. pTDefRegMap(@Self)^.val := thebits;
  78729. end;
  78730. function TETH_ETHRXOVFLOW.getw : TBits_32; inline;
  78731. begin
  78732. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78733. end;
  78734. procedure TETH_ETHFRMTXOK.setFRMTXOKCNT(thebits : TBits_16); inline;
  78735. begin
  78736. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78737. end;
  78738. function TETH_ETHFRMTXOK.getFRMTXOKCNT : TBits_16; inline;
  78739. begin
  78740. getFRMTXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78741. end;
  78742. procedure TETH_ETHFRMTXOK.setw(thebits : TBits_32); inline;
  78743. begin
  78744. pTDefRegMap(@Self)^.val := thebits;
  78745. end;
  78746. function TETH_ETHFRMTXOK.getw : TBits_32; inline;
  78747. begin
  78748. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78749. end;
  78750. procedure TETH_ETHSCOLFRM.setSCOLFRMCNT(thebits : TBits_16); inline;
  78751. begin
  78752. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78753. end;
  78754. function TETH_ETHSCOLFRM.getSCOLFRMCNT : TBits_16; inline;
  78755. begin
  78756. getSCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78757. end;
  78758. procedure TETH_ETHSCOLFRM.setw(thebits : TBits_32); inline;
  78759. begin
  78760. pTDefRegMap(@Self)^.val := thebits;
  78761. end;
  78762. function TETH_ETHSCOLFRM.getw : TBits_32; inline;
  78763. begin
  78764. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78765. end;
  78766. procedure TETH_ETHMCOLFRM.setMCOLFRMCNT(thebits : TBits_16); inline;
  78767. begin
  78768. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78769. end;
  78770. function TETH_ETHMCOLFRM.getMCOLFRMCNT : TBits_16; inline;
  78771. begin
  78772. getMCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78773. end;
  78774. procedure TETH_ETHMCOLFRM.setMCOLFRM_CNT(thebits : TBits_16); inline;
  78775. begin
  78776. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78777. end;
  78778. function TETH_ETHMCOLFRM.getMCOLFRM_CNT : TBits_16; inline;
  78779. begin
  78780. getMCOLFRM_CNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78781. end;
  78782. procedure TETH_ETHMCOLFRM.setw(thebits : TBits_32); inline;
  78783. begin
  78784. pTDefRegMap(@Self)^.val := thebits;
  78785. end;
  78786. function TETH_ETHMCOLFRM.getw : TBits_32; inline;
  78787. begin
  78788. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78789. end;
  78790. procedure TETH_ETHFRMRXOK.setFRMRXOKCNT(thebits : TBits_16); inline;
  78791. begin
  78792. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78793. end;
  78794. function TETH_ETHFRMRXOK.getFRMRXOKCNT : TBits_16; inline;
  78795. begin
  78796. getFRMRXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78797. end;
  78798. procedure TETH_ETHFRMRXOK.setw(thebits : TBits_32); inline;
  78799. begin
  78800. pTDefRegMap(@Self)^.val := thebits;
  78801. end;
  78802. function TETH_ETHFRMRXOK.getw : TBits_32; inline;
  78803. begin
  78804. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78805. end;
  78806. procedure TETH_ETHFCSERR.setFCSERRCNT(thebits : TBits_16); inline;
  78807. begin
  78808. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78809. end;
  78810. function TETH_ETHFCSERR.getFCSERRCNT : TBits_16; inline;
  78811. begin
  78812. getFCSERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78813. end;
  78814. procedure TETH_ETHFCSERR.setw(thebits : TBits_32); inline;
  78815. begin
  78816. pTDefRegMap(@Self)^.val := thebits;
  78817. end;
  78818. function TETH_ETHFCSERR.getw : TBits_32; inline;
  78819. begin
  78820. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78821. end;
  78822. procedure TETH_ETHALGNERR.setALGNERRCNT(thebits : TBits_16); inline;
  78823. begin
  78824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  78825. end;
  78826. function TETH_ETHALGNERR.getALGNERRCNT : TBits_16; inline;
  78827. begin
  78828. getALGNERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  78829. end;
  78830. procedure TETH_ETHALGNERR.setw(thebits : TBits_32); inline;
  78831. begin
  78832. pTDefRegMap(@Self)^.val := thebits;
  78833. end;
  78834. function TETH_ETHALGNERR.getw : TBits_32; inline;
  78835. begin
  78836. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78837. end;
  78838. procedure TETH_EMAC1CFG1.setRXENABLE; inline;
  78839. begin
  78840. pTDefRegMap(@Self)^.&set := $00000001;
  78841. end;
  78842. procedure TETH_EMAC1CFG1.clearRXENABLE; inline;
  78843. begin
  78844. pTDefRegMap(@Self)^.clr := $00000001;
  78845. end;
  78846. procedure TETH_EMAC1CFG1.setRXENABLE(thebits : TBits_1); inline;
  78847. begin
  78848. if thebits = 0 then
  78849. pTDefRegMap(@Self)^.clr := $00000001
  78850. else
  78851. pTDefRegMap(@Self)^.&set := $00000001;
  78852. end;
  78853. function TETH_EMAC1CFG1.getRXENABLE : TBits_1; inline;
  78854. begin
  78855. getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  78856. end;
  78857. procedure TETH_EMAC1CFG1.setPASSALL; inline;
  78858. begin
  78859. pTDefRegMap(@Self)^.&set := $00000002;
  78860. end;
  78861. procedure TETH_EMAC1CFG1.clearPASSALL; inline;
  78862. begin
  78863. pTDefRegMap(@Self)^.clr := $00000002;
  78864. end;
  78865. procedure TETH_EMAC1CFG1.setPASSALL(thebits : TBits_1); inline;
  78866. begin
  78867. if thebits = 0 then
  78868. pTDefRegMap(@Self)^.clr := $00000002
  78869. else
  78870. pTDefRegMap(@Self)^.&set := $00000002;
  78871. end;
  78872. function TETH_EMAC1CFG1.getPASSALL : TBits_1; inline;
  78873. begin
  78874. getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  78875. end;
  78876. procedure TETH_EMAC1CFG1.setRXPAUSE; inline;
  78877. begin
  78878. pTDefRegMap(@Self)^.&set := $00000004;
  78879. end;
  78880. procedure TETH_EMAC1CFG1.clearRXPAUSE; inline;
  78881. begin
  78882. pTDefRegMap(@Self)^.clr := $00000004;
  78883. end;
  78884. procedure TETH_EMAC1CFG1.setRXPAUSE(thebits : TBits_1); inline;
  78885. begin
  78886. if thebits = 0 then
  78887. pTDefRegMap(@Self)^.clr := $00000004
  78888. else
  78889. pTDefRegMap(@Self)^.&set := $00000004;
  78890. end;
  78891. function TETH_EMAC1CFG1.getRXPAUSE : TBits_1; inline;
  78892. begin
  78893. getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  78894. end;
  78895. procedure TETH_EMAC1CFG1.setTXPAUSE; inline;
  78896. begin
  78897. pTDefRegMap(@Self)^.&set := $00000008;
  78898. end;
  78899. procedure TETH_EMAC1CFG1.clearTXPAUSE; inline;
  78900. begin
  78901. pTDefRegMap(@Self)^.clr := $00000008;
  78902. end;
  78903. procedure TETH_EMAC1CFG1.setTXPAUSE(thebits : TBits_1); inline;
  78904. begin
  78905. if thebits = 0 then
  78906. pTDefRegMap(@Self)^.clr := $00000008
  78907. else
  78908. pTDefRegMap(@Self)^.&set := $00000008;
  78909. end;
  78910. function TETH_EMAC1CFG1.getTXPAUSE : TBits_1; inline;
  78911. begin
  78912. getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  78913. end;
  78914. procedure TETH_EMAC1CFG1.setLOOPBACK; inline;
  78915. begin
  78916. pTDefRegMap(@Self)^.&set := $00000010;
  78917. end;
  78918. procedure TETH_EMAC1CFG1.clearLOOPBACK; inline;
  78919. begin
  78920. pTDefRegMap(@Self)^.clr := $00000010;
  78921. end;
  78922. procedure TETH_EMAC1CFG1.setLOOPBACK(thebits : TBits_1); inline;
  78923. begin
  78924. if thebits = 0 then
  78925. pTDefRegMap(@Self)^.clr := $00000010
  78926. else
  78927. pTDefRegMap(@Self)^.&set := $00000010;
  78928. end;
  78929. function TETH_EMAC1CFG1.getLOOPBACK : TBits_1; inline;
  78930. begin
  78931. getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  78932. end;
  78933. procedure TETH_EMAC1CFG1.setRESETTFUN; inline;
  78934. begin
  78935. pTDefRegMap(@Self)^.&set := $00000100;
  78936. end;
  78937. procedure TETH_EMAC1CFG1.clearRESETTFUN; inline;
  78938. begin
  78939. pTDefRegMap(@Self)^.clr := $00000100;
  78940. end;
  78941. procedure TETH_EMAC1CFG1.setRESETTFUN(thebits : TBits_1); inline;
  78942. begin
  78943. if thebits = 0 then
  78944. pTDefRegMap(@Self)^.clr := $00000100
  78945. else
  78946. pTDefRegMap(@Self)^.&set := $00000100;
  78947. end;
  78948. function TETH_EMAC1CFG1.getRESETTFUN : TBits_1; inline;
  78949. begin
  78950. getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  78951. end;
  78952. procedure TETH_EMAC1CFG1.setRESETTMCS; inline;
  78953. begin
  78954. pTDefRegMap(@Self)^.&set := $00000200;
  78955. end;
  78956. procedure TETH_EMAC1CFG1.clearRESETTMCS; inline;
  78957. begin
  78958. pTDefRegMap(@Self)^.clr := $00000200;
  78959. end;
  78960. procedure TETH_EMAC1CFG1.setRESETTMCS(thebits : TBits_1); inline;
  78961. begin
  78962. if thebits = 0 then
  78963. pTDefRegMap(@Self)^.clr := $00000200
  78964. else
  78965. pTDefRegMap(@Self)^.&set := $00000200;
  78966. end;
  78967. function TETH_EMAC1CFG1.getRESETTMCS : TBits_1; inline;
  78968. begin
  78969. getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  78970. end;
  78971. procedure TETH_EMAC1CFG1.setRESETRFUN; inline;
  78972. begin
  78973. pTDefRegMap(@Self)^.&set := $00000400;
  78974. end;
  78975. procedure TETH_EMAC1CFG1.clearRESETRFUN; inline;
  78976. begin
  78977. pTDefRegMap(@Self)^.clr := $00000400;
  78978. end;
  78979. procedure TETH_EMAC1CFG1.setRESETRFUN(thebits : TBits_1); inline;
  78980. begin
  78981. if thebits = 0 then
  78982. pTDefRegMap(@Self)^.clr := $00000400
  78983. else
  78984. pTDefRegMap(@Self)^.&set := $00000400;
  78985. end;
  78986. function TETH_EMAC1CFG1.getRESETRFUN : TBits_1; inline;
  78987. begin
  78988. getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  78989. end;
  78990. procedure TETH_EMAC1CFG1.setRESETRMCS; inline;
  78991. begin
  78992. pTDefRegMap(@Self)^.&set := $00000800;
  78993. end;
  78994. procedure TETH_EMAC1CFG1.clearRESETRMCS; inline;
  78995. begin
  78996. pTDefRegMap(@Self)^.clr := $00000800;
  78997. end;
  78998. procedure TETH_EMAC1CFG1.setRESETRMCS(thebits : TBits_1); inline;
  78999. begin
  79000. if thebits = 0 then
  79001. pTDefRegMap(@Self)^.clr := $00000800
  79002. else
  79003. pTDefRegMap(@Self)^.&set := $00000800;
  79004. end;
  79005. function TETH_EMAC1CFG1.getRESETRMCS : TBits_1; inline;
  79006. begin
  79007. getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  79008. end;
  79009. procedure TETH_EMAC1CFG1.setSIMRESET; inline;
  79010. begin
  79011. pTDefRegMap(@Self)^.&set := $00004000;
  79012. end;
  79013. procedure TETH_EMAC1CFG1.clearSIMRESET; inline;
  79014. begin
  79015. pTDefRegMap(@Self)^.clr := $00004000;
  79016. end;
  79017. procedure TETH_EMAC1CFG1.setSIMRESET(thebits : TBits_1); inline;
  79018. begin
  79019. if thebits = 0 then
  79020. pTDefRegMap(@Self)^.clr := $00004000
  79021. else
  79022. pTDefRegMap(@Self)^.&set := $00004000;
  79023. end;
  79024. function TETH_EMAC1CFG1.getSIMRESET : TBits_1; inline;
  79025. begin
  79026. getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79027. end;
  79028. procedure TETH_EMAC1CFG1.setSOFTRESET; inline;
  79029. begin
  79030. pTDefRegMap(@Self)^.&set := $00008000;
  79031. end;
  79032. procedure TETH_EMAC1CFG1.clearSOFTRESET; inline;
  79033. begin
  79034. pTDefRegMap(@Self)^.clr := $00008000;
  79035. end;
  79036. procedure TETH_EMAC1CFG1.setSOFTRESET(thebits : TBits_1); inline;
  79037. begin
  79038. if thebits = 0 then
  79039. pTDefRegMap(@Self)^.clr := $00008000
  79040. else
  79041. pTDefRegMap(@Self)^.&set := $00008000;
  79042. end;
  79043. function TETH_EMAC1CFG1.getSOFTRESET : TBits_1; inline;
  79044. begin
  79045. getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  79046. end;
  79047. procedure TETH_EMAC1CFG1.setw(thebits : TBits_32); inline;
  79048. begin
  79049. pTDefRegMap(@Self)^.val := thebits;
  79050. end;
  79051. function TETH_EMAC1CFG1.getw : TBits_32; inline;
  79052. begin
  79053. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79054. end;
  79055. procedure TETH_EMACxCFG1.setRXENABLE; inline;
  79056. begin
  79057. pTDefRegMap(@Self)^.&set := $00000001;
  79058. end;
  79059. procedure TETH_EMACxCFG1.clearRXENABLE; inline;
  79060. begin
  79061. pTDefRegMap(@Self)^.clr := $00000001;
  79062. end;
  79063. procedure TETH_EMACxCFG1.setRXENABLE(thebits : TBits_1); inline;
  79064. begin
  79065. if thebits = 0 then
  79066. pTDefRegMap(@Self)^.clr := $00000001
  79067. else
  79068. pTDefRegMap(@Self)^.&set := $00000001;
  79069. end;
  79070. function TETH_EMACxCFG1.getRXENABLE : TBits_1; inline;
  79071. begin
  79072. getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79073. end;
  79074. procedure TETH_EMACxCFG1.setPASSALL; inline;
  79075. begin
  79076. pTDefRegMap(@Self)^.&set := $00000002;
  79077. end;
  79078. procedure TETH_EMACxCFG1.clearPASSALL; inline;
  79079. begin
  79080. pTDefRegMap(@Self)^.clr := $00000002;
  79081. end;
  79082. procedure TETH_EMACxCFG1.setPASSALL(thebits : TBits_1); inline;
  79083. begin
  79084. if thebits = 0 then
  79085. pTDefRegMap(@Self)^.clr := $00000002
  79086. else
  79087. pTDefRegMap(@Self)^.&set := $00000002;
  79088. end;
  79089. function TETH_EMACxCFG1.getPASSALL : TBits_1; inline;
  79090. begin
  79091. getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79092. end;
  79093. procedure TETH_EMACxCFG1.setRXPAUSE; inline;
  79094. begin
  79095. pTDefRegMap(@Self)^.&set := $00000004;
  79096. end;
  79097. procedure TETH_EMACxCFG1.clearRXPAUSE; inline;
  79098. begin
  79099. pTDefRegMap(@Self)^.clr := $00000004;
  79100. end;
  79101. procedure TETH_EMACxCFG1.setRXPAUSE(thebits : TBits_1); inline;
  79102. begin
  79103. if thebits = 0 then
  79104. pTDefRegMap(@Self)^.clr := $00000004
  79105. else
  79106. pTDefRegMap(@Self)^.&set := $00000004;
  79107. end;
  79108. function TETH_EMACxCFG1.getRXPAUSE : TBits_1; inline;
  79109. begin
  79110. getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79111. end;
  79112. procedure TETH_EMACxCFG1.setTXPAUSE; inline;
  79113. begin
  79114. pTDefRegMap(@Self)^.&set := $00000008;
  79115. end;
  79116. procedure TETH_EMACxCFG1.clearTXPAUSE; inline;
  79117. begin
  79118. pTDefRegMap(@Self)^.clr := $00000008;
  79119. end;
  79120. procedure TETH_EMACxCFG1.setTXPAUSE(thebits : TBits_1); inline;
  79121. begin
  79122. if thebits = 0 then
  79123. pTDefRegMap(@Self)^.clr := $00000008
  79124. else
  79125. pTDefRegMap(@Self)^.&set := $00000008;
  79126. end;
  79127. function TETH_EMACxCFG1.getTXPAUSE : TBits_1; inline;
  79128. begin
  79129. getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79130. end;
  79131. procedure TETH_EMACxCFG1.setLOOPBACK; inline;
  79132. begin
  79133. pTDefRegMap(@Self)^.&set := $00000010;
  79134. end;
  79135. procedure TETH_EMACxCFG1.clearLOOPBACK; inline;
  79136. begin
  79137. pTDefRegMap(@Self)^.clr := $00000010;
  79138. end;
  79139. procedure TETH_EMACxCFG1.setLOOPBACK(thebits : TBits_1); inline;
  79140. begin
  79141. if thebits = 0 then
  79142. pTDefRegMap(@Self)^.clr := $00000010
  79143. else
  79144. pTDefRegMap(@Self)^.&set := $00000010;
  79145. end;
  79146. function TETH_EMACxCFG1.getLOOPBACK : TBits_1; inline;
  79147. begin
  79148. getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79149. end;
  79150. procedure TETH_EMACxCFG1.setRESETTFUN; inline;
  79151. begin
  79152. pTDefRegMap(@Self)^.&set := $00000100;
  79153. end;
  79154. procedure TETH_EMACxCFG1.clearRESETTFUN; inline;
  79155. begin
  79156. pTDefRegMap(@Self)^.clr := $00000100;
  79157. end;
  79158. procedure TETH_EMACxCFG1.setRESETTFUN(thebits : TBits_1); inline;
  79159. begin
  79160. if thebits = 0 then
  79161. pTDefRegMap(@Self)^.clr := $00000100
  79162. else
  79163. pTDefRegMap(@Self)^.&set := $00000100;
  79164. end;
  79165. function TETH_EMACxCFG1.getRESETTFUN : TBits_1; inline;
  79166. begin
  79167. getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79168. end;
  79169. procedure TETH_EMACxCFG1.setRESETTMCS; inline;
  79170. begin
  79171. pTDefRegMap(@Self)^.&set := $00000200;
  79172. end;
  79173. procedure TETH_EMACxCFG1.clearRESETTMCS; inline;
  79174. begin
  79175. pTDefRegMap(@Self)^.clr := $00000200;
  79176. end;
  79177. procedure TETH_EMACxCFG1.setRESETTMCS(thebits : TBits_1); inline;
  79178. begin
  79179. if thebits = 0 then
  79180. pTDefRegMap(@Self)^.clr := $00000200
  79181. else
  79182. pTDefRegMap(@Self)^.&set := $00000200;
  79183. end;
  79184. function TETH_EMACxCFG1.getRESETTMCS : TBits_1; inline;
  79185. begin
  79186. getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79187. end;
  79188. procedure TETH_EMACxCFG1.setRESETRFUN; inline;
  79189. begin
  79190. pTDefRegMap(@Self)^.&set := $00000400;
  79191. end;
  79192. procedure TETH_EMACxCFG1.clearRESETRFUN; inline;
  79193. begin
  79194. pTDefRegMap(@Self)^.clr := $00000400;
  79195. end;
  79196. procedure TETH_EMACxCFG1.setRESETRFUN(thebits : TBits_1); inline;
  79197. begin
  79198. if thebits = 0 then
  79199. pTDefRegMap(@Self)^.clr := $00000400
  79200. else
  79201. pTDefRegMap(@Self)^.&set := $00000400;
  79202. end;
  79203. function TETH_EMACxCFG1.getRESETRFUN : TBits_1; inline;
  79204. begin
  79205. getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  79206. end;
  79207. procedure TETH_EMACxCFG1.setRESETRMCS; inline;
  79208. begin
  79209. pTDefRegMap(@Self)^.&set := $00000800;
  79210. end;
  79211. procedure TETH_EMACxCFG1.clearRESETRMCS; inline;
  79212. begin
  79213. pTDefRegMap(@Self)^.clr := $00000800;
  79214. end;
  79215. procedure TETH_EMACxCFG1.setRESETRMCS(thebits : TBits_1); inline;
  79216. begin
  79217. if thebits = 0 then
  79218. pTDefRegMap(@Self)^.clr := $00000800
  79219. else
  79220. pTDefRegMap(@Self)^.&set := $00000800;
  79221. end;
  79222. function TETH_EMACxCFG1.getRESETRMCS : TBits_1; inline;
  79223. begin
  79224. getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  79225. end;
  79226. procedure TETH_EMACxCFG1.setSIMRESET; inline;
  79227. begin
  79228. pTDefRegMap(@Self)^.&set := $00004000;
  79229. end;
  79230. procedure TETH_EMACxCFG1.clearSIMRESET; inline;
  79231. begin
  79232. pTDefRegMap(@Self)^.clr := $00004000;
  79233. end;
  79234. procedure TETH_EMACxCFG1.setSIMRESET(thebits : TBits_1); inline;
  79235. begin
  79236. if thebits = 0 then
  79237. pTDefRegMap(@Self)^.clr := $00004000
  79238. else
  79239. pTDefRegMap(@Self)^.&set := $00004000;
  79240. end;
  79241. function TETH_EMACxCFG1.getSIMRESET : TBits_1; inline;
  79242. begin
  79243. getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79244. end;
  79245. procedure TETH_EMACxCFG1.setSOFTRESET; inline;
  79246. begin
  79247. pTDefRegMap(@Self)^.&set := $00008000;
  79248. end;
  79249. procedure TETH_EMACxCFG1.clearSOFTRESET; inline;
  79250. begin
  79251. pTDefRegMap(@Self)^.clr := $00008000;
  79252. end;
  79253. procedure TETH_EMACxCFG1.setSOFTRESET(thebits : TBits_1); inline;
  79254. begin
  79255. if thebits = 0 then
  79256. pTDefRegMap(@Self)^.clr := $00008000
  79257. else
  79258. pTDefRegMap(@Self)^.&set := $00008000;
  79259. end;
  79260. function TETH_EMACxCFG1.getSOFTRESET : TBits_1; inline;
  79261. begin
  79262. getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  79263. end;
  79264. procedure TETH_EMACxCFG1.setw(thebits : TBits_32); inline;
  79265. begin
  79266. pTDefRegMap(@Self)^.val := thebits;
  79267. end;
  79268. function TETH_EMACxCFG1.getw : TBits_32; inline;
  79269. begin
  79270. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79271. end;
  79272. procedure TETH_EMAC1CFG2.setFULLDPLX; inline;
  79273. begin
  79274. pTDefRegMap(@Self)^.&set := $00000001;
  79275. end;
  79276. procedure TETH_EMAC1CFG2.clearFULLDPLX; inline;
  79277. begin
  79278. pTDefRegMap(@Self)^.clr := $00000001;
  79279. end;
  79280. procedure TETH_EMAC1CFG2.setFULLDPLX(thebits : TBits_1); inline;
  79281. begin
  79282. if thebits = 0 then
  79283. pTDefRegMap(@Self)^.clr := $00000001
  79284. else
  79285. pTDefRegMap(@Self)^.&set := $00000001;
  79286. end;
  79287. function TETH_EMAC1CFG2.getFULLDPLX : TBits_1; inline;
  79288. begin
  79289. getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79290. end;
  79291. procedure TETH_EMAC1CFG2.setLENGTHCK; inline;
  79292. begin
  79293. pTDefRegMap(@Self)^.&set := $00000002;
  79294. end;
  79295. procedure TETH_EMAC1CFG2.clearLENGTHCK; inline;
  79296. begin
  79297. pTDefRegMap(@Self)^.clr := $00000002;
  79298. end;
  79299. procedure TETH_EMAC1CFG2.setLENGTHCK(thebits : TBits_1); inline;
  79300. begin
  79301. if thebits = 0 then
  79302. pTDefRegMap(@Self)^.clr := $00000002
  79303. else
  79304. pTDefRegMap(@Self)^.&set := $00000002;
  79305. end;
  79306. function TETH_EMAC1CFG2.getLENGTHCK : TBits_1; inline;
  79307. begin
  79308. getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79309. end;
  79310. procedure TETH_EMAC1CFG2.setHUGEFRM; inline;
  79311. begin
  79312. pTDefRegMap(@Self)^.&set := $00000004;
  79313. end;
  79314. procedure TETH_EMAC1CFG2.clearHUGEFRM; inline;
  79315. begin
  79316. pTDefRegMap(@Self)^.clr := $00000004;
  79317. end;
  79318. procedure TETH_EMAC1CFG2.setHUGEFRM(thebits : TBits_1); inline;
  79319. begin
  79320. if thebits = 0 then
  79321. pTDefRegMap(@Self)^.clr := $00000004
  79322. else
  79323. pTDefRegMap(@Self)^.&set := $00000004;
  79324. end;
  79325. function TETH_EMAC1CFG2.getHUGEFRM : TBits_1; inline;
  79326. begin
  79327. getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79328. end;
  79329. procedure TETH_EMAC1CFG2.setDELAYCRC; inline;
  79330. begin
  79331. pTDefRegMap(@Self)^.&set := $00000008;
  79332. end;
  79333. procedure TETH_EMAC1CFG2.clearDELAYCRC; inline;
  79334. begin
  79335. pTDefRegMap(@Self)^.clr := $00000008;
  79336. end;
  79337. procedure TETH_EMAC1CFG2.setDELAYCRC(thebits : TBits_1); inline;
  79338. begin
  79339. if thebits = 0 then
  79340. pTDefRegMap(@Self)^.clr := $00000008
  79341. else
  79342. pTDefRegMap(@Self)^.&set := $00000008;
  79343. end;
  79344. function TETH_EMAC1CFG2.getDELAYCRC : TBits_1; inline;
  79345. begin
  79346. getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79347. end;
  79348. procedure TETH_EMAC1CFG2.setCRCENABLE; inline;
  79349. begin
  79350. pTDefRegMap(@Self)^.&set := $00000010;
  79351. end;
  79352. procedure TETH_EMAC1CFG2.clearCRCENABLE; inline;
  79353. begin
  79354. pTDefRegMap(@Self)^.clr := $00000010;
  79355. end;
  79356. procedure TETH_EMAC1CFG2.setCRCENABLE(thebits : TBits_1); inline;
  79357. begin
  79358. if thebits = 0 then
  79359. pTDefRegMap(@Self)^.clr := $00000010
  79360. else
  79361. pTDefRegMap(@Self)^.&set := $00000010;
  79362. end;
  79363. function TETH_EMAC1CFG2.getCRCENABLE : TBits_1; inline;
  79364. begin
  79365. getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79366. end;
  79367. procedure TETH_EMAC1CFG2.setPADENABLE; inline;
  79368. begin
  79369. pTDefRegMap(@Self)^.&set := $00000020;
  79370. end;
  79371. procedure TETH_EMAC1CFG2.clearPADENABLE; inline;
  79372. begin
  79373. pTDefRegMap(@Self)^.clr := $00000020;
  79374. end;
  79375. procedure TETH_EMAC1CFG2.setPADENABLE(thebits : TBits_1); inline;
  79376. begin
  79377. if thebits = 0 then
  79378. pTDefRegMap(@Self)^.clr := $00000020
  79379. else
  79380. pTDefRegMap(@Self)^.&set := $00000020;
  79381. end;
  79382. function TETH_EMAC1CFG2.getPADENABLE : TBits_1; inline;
  79383. begin
  79384. getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79385. end;
  79386. procedure TETH_EMAC1CFG2.setVLANPAD; inline;
  79387. begin
  79388. pTDefRegMap(@Self)^.&set := $00000040;
  79389. end;
  79390. procedure TETH_EMAC1CFG2.clearVLANPAD; inline;
  79391. begin
  79392. pTDefRegMap(@Self)^.clr := $00000040;
  79393. end;
  79394. procedure TETH_EMAC1CFG2.setVLANPAD(thebits : TBits_1); inline;
  79395. begin
  79396. if thebits = 0 then
  79397. pTDefRegMap(@Self)^.clr := $00000040
  79398. else
  79399. pTDefRegMap(@Self)^.&set := $00000040;
  79400. end;
  79401. function TETH_EMAC1CFG2.getVLANPAD : TBits_1; inline;
  79402. begin
  79403. getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79404. end;
  79405. procedure TETH_EMAC1CFG2.setAUTOPAD; inline;
  79406. begin
  79407. pTDefRegMap(@Self)^.&set := $00000080;
  79408. end;
  79409. procedure TETH_EMAC1CFG2.clearAUTOPAD; inline;
  79410. begin
  79411. pTDefRegMap(@Self)^.clr := $00000080;
  79412. end;
  79413. procedure TETH_EMAC1CFG2.setAUTOPAD(thebits : TBits_1); inline;
  79414. begin
  79415. if thebits = 0 then
  79416. pTDefRegMap(@Self)^.clr := $00000080
  79417. else
  79418. pTDefRegMap(@Self)^.&set := $00000080;
  79419. end;
  79420. function TETH_EMAC1CFG2.getAUTOPAD : TBits_1; inline;
  79421. begin
  79422. getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79423. end;
  79424. procedure TETH_EMAC1CFG2.setPUREPRE; inline;
  79425. begin
  79426. pTDefRegMap(@Self)^.&set := $00000100;
  79427. end;
  79428. procedure TETH_EMAC1CFG2.clearPUREPRE; inline;
  79429. begin
  79430. pTDefRegMap(@Self)^.clr := $00000100;
  79431. end;
  79432. procedure TETH_EMAC1CFG2.setPUREPRE(thebits : TBits_1); inline;
  79433. begin
  79434. if thebits = 0 then
  79435. pTDefRegMap(@Self)^.clr := $00000100
  79436. else
  79437. pTDefRegMap(@Self)^.&set := $00000100;
  79438. end;
  79439. function TETH_EMAC1CFG2.getPUREPRE : TBits_1; inline;
  79440. begin
  79441. getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79442. end;
  79443. procedure TETH_EMAC1CFG2.setLONGPRE; inline;
  79444. begin
  79445. pTDefRegMap(@Self)^.&set := $00000200;
  79446. end;
  79447. procedure TETH_EMAC1CFG2.clearLONGPRE; inline;
  79448. begin
  79449. pTDefRegMap(@Self)^.clr := $00000200;
  79450. end;
  79451. procedure TETH_EMAC1CFG2.setLONGPRE(thebits : TBits_1); inline;
  79452. begin
  79453. if thebits = 0 then
  79454. pTDefRegMap(@Self)^.clr := $00000200
  79455. else
  79456. pTDefRegMap(@Self)^.&set := $00000200;
  79457. end;
  79458. function TETH_EMAC1CFG2.getLONGPRE : TBits_1; inline;
  79459. begin
  79460. getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79461. end;
  79462. procedure TETH_EMAC1CFG2.setNOBKOFF; inline;
  79463. begin
  79464. pTDefRegMap(@Self)^.&set := $00001000;
  79465. end;
  79466. procedure TETH_EMAC1CFG2.clearNOBKOFF; inline;
  79467. begin
  79468. pTDefRegMap(@Self)^.clr := $00001000;
  79469. end;
  79470. procedure TETH_EMAC1CFG2.setNOBKOFF(thebits : TBits_1); inline;
  79471. begin
  79472. if thebits = 0 then
  79473. pTDefRegMap(@Self)^.clr := $00001000
  79474. else
  79475. pTDefRegMap(@Self)^.&set := $00001000;
  79476. end;
  79477. function TETH_EMAC1CFG2.getNOBKOFF : TBits_1; inline;
  79478. begin
  79479. getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79480. end;
  79481. procedure TETH_EMAC1CFG2.setBPNOBKOFF; inline;
  79482. begin
  79483. pTDefRegMap(@Self)^.&set := $00002000;
  79484. end;
  79485. procedure TETH_EMAC1CFG2.clearBPNOBKOFF; inline;
  79486. begin
  79487. pTDefRegMap(@Self)^.clr := $00002000;
  79488. end;
  79489. procedure TETH_EMAC1CFG2.setBPNOBKOFF(thebits : TBits_1); inline;
  79490. begin
  79491. if thebits = 0 then
  79492. pTDefRegMap(@Self)^.clr := $00002000
  79493. else
  79494. pTDefRegMap(@Self)^.&set := $00002000;
  79495. end;
  79496. function TETH_EMAC1CFG2.getBPNOBKOFF : TBits_1; inline;
  79497. begin
  79498. getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79499. end;
  79500. procedure TETH_EMAC1CFG2.setEXCESSDFR; inline;
  79501. begin
  79502. pTDefRegMap(@Self)^.&set := $00004000;
  79503. end;
  79504. procedure TETH_EMAC1CFG2.clearEXCESSDFR; inline;
  79505. begin
  79506. pTDefRegMap(@Self)^.clr := $00004000;
  79507. end;
  79508. procedure TETH_EMAC1CFG2.setEXCESSDFR(thebits : TBits_1); inline;
  79509. begin
  79510. if thebits = 0 then
  79511. pTDefRegMap(@Self)^.clr := $00004000
  79512. else
  79513. pTDefRegMap(@Self)^.&set := $00004000;
  79514. end;
  79515. function TETH_EMAC1CFG2.getEXCESSDFR : TBits_1; inline;
  79516. begin
  79517. getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79518. end;
  79519. procedure TETH_EMAC1CFG2.setw(thebits : TBits_32); inline;
  79520. begin
  79521. pTDefRegMap(@Self)^.val := thebits;
  79522. end;
  79523. function TETH_EMAC1CFG2.getw : TBits_32; inline;
  79524. begin
  79525. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79526. end;
  79527. procedure TETH_EMACxCFG2.setFULLDPLX; inline;
  79528. begin
  79529. pTDefRegMap(@Self)^.&set := $00000001;
  79530. end;
  79531. procedure TETH_EMACxCFG2.clearFULLDPLX; inline;
  79532. begin
  79533. pTDefRegMap(@Self)^.clr := $00000001;
  79534. end;
  79535. procedure TETH_EMACxCFG2.setFULLDPLX(thebits : TBits_1); inline;
  79536. begin
  79537. if thebits = 0 then
  79538. pTDefRegMap(@Self)^.clr := $00000001
  79539. else
  79540. pTDefRegMap(@Self)^.&set := $00000001;
  79541. end;
  79542. function TETH_EMACxCFG2.getFULLDPLX : TBits_1; inline;
  79543. begin
  79544. getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  79545. end;
  79546. procedure TETH_EMACxCFG2.setLENGTHCK; inline;
  79547. begin
  79548. pTDefRegMap(@Self)^.&set := $00000002;
  79549. end;
  79550. procedure TETH_EMACxCFG2.clearLENGTHCK; inline;
  79551. begin
  79552. pTDefRegMap(@Self)^.clr := $00000002;
  79553. end;
  79554. procedure TETH_EMACxCFG2.setLENGTHCK(thebits : TBits_1); inline;
  79555. begin
  79556. if thebits = 0 then
  79557. pTDefRegMap(@Self)^.clr := $00000002
  79558. else
  79559. pTDefRegMap(@Self)^.&set := $00000002;
  79560. end;
  79561. function TETH_EMACxCFG2.getLENGTHCK : TBits_1; inline;
  79562. begin
  79563. getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  79564. end;
  79565. procedure TETH_EMACxCFG2.setHUGEFRM; inline;
  79566. begin
  79567. pTDefRegMap(@Self)^.&set := $00000004;
  79568. end;
  79569. procedure TETH_EMACxCFG2.clearHUGEFRM; inline;
  79570. begin
  79571. pTDefRegMap(@Self)^.clr := $00000004;
  79572. end;
  79573. procedure TETH_EMACxCFG2.setHUGEFRM(thebits : TBits_1); inline;
  79574. begin
  79575. if thebits = 0 then
  79576. pTDefRegMap(@Self)^.clr := $00000004
  79577. else
  79578. pTDefRegMap(@Self)^.&set := $00000004;
  79579. end;
  79580. function TETH_EMACxCFG2.getHUGEFRM : TBits_1; inline;
  79581. begin
  79582. getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  79583. end;
  79584. procedure TETH_EMACxCFG2.setDELAYCRC; inline;
  79585. begin
  79586. pTDefRegMap(@Self)^.&set := $00000008;
  79587. end;
  79588. procedure TETH_EMACxCFG2.clearDELAYCRC; inline;
  79589. begin
  79590. pTDefRegMap(@Self)^.clr := $00000008;
  79591. end;
  79592. procedure TETH_EMACxCFG2.setDELAYCRC(thebits : TBits_1); inline;
  79593. begin
  79594. if thebits = 0 then
  79595. pTDefRegMap(@Self)^.clr := $00000008
  79596. else
  79597. pTDefRegMap(@Self)^.&set := $00000008;
  79598. end;
  79599. function TETH_EMACxCFG2.getDELAYCRC : TBits_1; inline;
  79600. begin
  79601. getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  79602. end;
  79603. procedure TETH_EMACxCFG2.setCRCENABLE; inline;
  79604. begin
  79605. pTDefRegMap(@Self)^.&set := $00000010;
  79606. end;
  79607. procedure TETH_EMACxCFG2.clearCRCENABLE; inline;
  79608. begin
  79609. pTDefRegMap(@Self)^.clr := $00000010;
  79610. end;
  79611. procedure TETH_EMACxCFG2.setCRCENABLE(thebits : TBits_1); inline;
  79612. begin
  79613. if thebits = 0 then
  79614. pTDefRegMap(@Self)^.clr := $00000010
  79615. else
  79616. pTDefRegMap(@Self)^.&set := $00000010;
  79617. end;
  79618. function TETH_EMACxCFG2.getCRCENABLE : TBits_1; inline;
  79619. begin
  79620. getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  79621. end;
  79622. procedure TETH_EMACxCFG2.setPADENABLE; inline;
  79623. begin
  79624. pTDefRegMap(@Self)^.&set := $00000020;
  79625. end;
  79626. procedure TETH_EMACxCFG2.clearPADENABLE; inline;
  79627. begin
  79628. pTDefRegMap(@Self)^.clr := $00000020;
  79629. end;
  79630. procedure TETH_EMACxCFG2.setPADENABLE(thebits : TBits_1); inline;
  79631. begin
  79632. if thebits = 0 then
  79633. pTDefRegMap(@Self)^.clr := $00000020
  79634. else
  79635. pTDefRegMap(@Self)^.&set := $00000020;
  79636. end;
  79637. function TETH_EMACxCFG2.getPADENABLE : TBits_1; inline;
  79638. begin
  79639. getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  79640. end;
  79641. procedure TETH_EMACxCFG2.setVLANPAD; inline;
  79642. begin
  79643. pTDefRegMap(@Self)^.&set := $00000040;
  79644. end;
  79645. procedure TETH_EMACxCFG2.clearVLANPAD; inline;
  79646. begin
  79647. pTDefRegMap(@Self)^.clr := $00000040;
  79648. end;
  79649. procedure TETH_EMACxCFG2.setVLANPAD(thebits : TBits_1); inline;
  79650. begin
  79651. if thebits = 0 then
  79652. pTDefRegMap(@Self)^.clr := $00000040
  79653. else
  79654. pTDefRegMap(@Self)^.&set := $00000040;
  79655. end;
  79656. function TETH_EMACxCFG2.getVLANPAD : TBits_1; inline;
  79657. begin
  79658. getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  79659. end;
  79660. procedure TETH_EMACxCFG2.setAUTOPAD; inline;
  79661. begin
  79662. pTDefRegMap(@Self)^.&set := $00000080;
  79663. end;
  79664. procedure TETH_EMACxCFG2.clearAUTOPAD; inline;
  79665. begin
  79666. pTDefRegMap(@Self)^.clr := $00000080;
  79667. end;
  79668. procedure TETH_EMACxCFG2.setAUTOPAD(thebits : TBits_1); inline;
  79669. begin
  79670. if thebits = 0 then
  79671. pTDefRegMap(@Self)^.clr := $00000080
  79672. else
  79673. pTDefRegMap(@Self)^.&set := $00000080;
  79674. end;
  79675. function TETH_EMACxCFG2.getAUTOPAD : TBits_1; inline;
  79676. begin
  79677. getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  79678. end;
  79679. procedure TETH_EMACxCFG2.setPUREPRE; inline;
  79680. begin
  79681. pTDefRegMap(@Self)^.&set := $00000100;
  79682. end;
  79683. procedure TETH_EMACxCFG2.clearPUREPRE; inline;
  79684. begin
  79685. pTDefRegMap(@Self)^.clr := $00000100;
  79686. end;
  79687. procedure TETH_EMACxCFG2.setPUREPRE(thebits : TBits_1); inline;
  79688. begin
  79689. if thebits = 0 then
  79690. pTDefRegMap(@Self)^.clr := $00000100
  79691. else
  79692. pTDefRegMap(@Self)^.&set := $00000100;
  79693. end;
  79694. function TETH_EMACxCFG2.getPUREPRE : TBits_1; inline;
  79695. begin
  79696. getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79697. end;
  79698. procedure TETH_EMACxCFG2.setLONGPRE; inline;
  79699. begin
  79700. pTDefRegMap(@Self)^.&set := $00000200;
  79701. end;
  79702. procedure TETH_EMACxCFG2.clearLONGPRE; inline;
  79703. begin
  79704. pTDefRegMap(@Self)^.clr := $00000200;
  79705. end;
  79706. procedure TETH_EMACxCFG2.setLONGPRE(thebits : TBits_1); inline;
  79707. begin
  79708. if thebits = 0 then
  79709. pTDefRegMap(@Self)^.clr := $00000200
  79710. else
  79711. pTDefRegMap(@Self)^.&set := $00000200;
  79712. end;
  79713. function TETH_EMACxCFG2.getLONGPRE : TBits_1; inline;
  79714. begin
  79715. getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  79716. end;
  79717. procedure TETH_EMACxCFG2.setNOBKOFF; inline;
  79718. begin
  79719. pTDefRegMap(@Self)^.&set := $00001000;
  79720. end;
  79721. procedure TETH_EMACxCFG2.clearNOBKOFF; inline;
  79722. begin
  79723. pTDefRegMap(@Self)^.clr := $00001000;
  79724. end;
  79725. procedure TETH_EMACxCFG2.setNOBKOFF(thebits : TBits_1); inline;
  79726. begin
  79727. if thebits = 0 then
  79728. pTDefRegMap(@Self)^.clr := $00001000
  79729. else
  79730. pTDefRegMap(@Self)^.&set := $00001000;
  79731. end;
  79732. function TETH_EMACxCFG2.getNOBKOFF : TBits_1; inline;
  79733. begin
  79734. getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  79735. end;
  79736. procedure TETH_EMACxCFG2.setBPNOBKOFF; inline;
  79737. begin
  79738. pTDefRegMap(@Self)^.&set := $00002000;
  79739. end;
  79740. procedure TETH_EMACxCFG2.clearBPNOBKOFF; inline;
  79741. begin
  79742. pTDefRegMap(@Self)^.clr := $00002000;
  79743. end;
  79744. procedure TETH_EMACxCFG2.setBPNOBKOFF(thebits : TBits_1); inline;
  79745. begin
  79746. if thebits = 0 then
  79747. pTDefRegMap(@Self)^.clr := $00002000
  79748. else
  79749. pTDefRegMap(@Self)^.&set := $00002000;
  79750. end;
  79751. function TETH_EMACxCFG2.getBPNOBKOFF : TBits_1; inline;
  79752. begin
  79753. getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  79754. end;
  79755. procedure TETH_EMACxCFG2.setEXCESSDFR; inline;
  79756. begin
  79757. pTDefRegMap(@Self)^.&set := $00004000;
  79758. end;
  79759. procedure TETH_EMACxCFG2.clearEXCESSDFR; inline;
  79760. begin
  79761. pTDefRegMap(@Self)^.clr := $00004000;
  79762. end;
  79763. procedure TETH_EMACxCFG2.setEXCESSDFR(thebits : TBits_1); inline;
  79764. begin
  79765. if thebits = 0 then
  79766. pTDefRegMap(@Self)^.clr := $00004000
  79767. else
  79768. pTDefRegMap(@Self)^.&set := $00004000;
  79769. end;
  79770. function TETH_EMACxCFG2.getEXCESSDFR : TBits_1; inline;
  79771. begin
  79772. getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  79773. end;
  79774. procedure TETH_EMACxCFG2.setw(thebits : TBits_32); inline;
  79775. begin
  79776. pTDefRegMap(@Self)^.val := thebits;
  79777. end;
  79778. function TETH_EMACxCFG2.getw : TBits_32; inline;
  79779. begin
  79780. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79781. end;
  79782. procedure TETH_EMAC1IPGT.setB2BIPKTGP(thebits : TBits_7); inline;
  79783. begin
  79784. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  79785. end;
  79786. function TETH_EMAC1IPGT.getB2BIPKTGP : TBits_7; inline;
  79787. begin
  79788. getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  79789. end;
  79790. procedure TETH_EMAC1IPGT.setw(thebits : TBits_32); inline;
  79791. begin
  79792. pTDefRegMap(@Self)^.val := thebits;
  79793. end;
  79794. function TETH_EMAC1IPGT.getw : TBits_32; inline;
  79795. begin
  79796. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79797. end;
  79798. procedure TETH_EMACxIPGT.setB2BIPKTGP(thebits : TBits_7); inline;
  79799. begin
  79800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  79801. end;
  79802. function TETH_EMACxIPGT.getB2BIPKTGP : TBits_7; inline;
  79803. begin
  79804. getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  79805. end;
  79806. procedure TETH_EMACxIPGT.setw(thebits : TBits_32); inline;
  79807. begin
  79808. pTDefRegMap(@Self)^.val := thebits;
  79809. end;
  79810. function TETH_EMACxIPGT.getw : TBits_32; inline;
  79811. begin
  79812. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79813. end;
  79814. procedure TETH_EMAC1IPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
  79815. begin
  79816. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  79817. end;
  79818. function TETH_EMAC1IPGR.getNB2BIPKTGP2 : TBits_7; inline;
  79819. begin
  79820. getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  79821. end;
  79822. procedure TETH_EMAC1IPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
  79823. begin
  79824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
  79825. end;
  79826. function TETH_EMAC1IPGR.getNB2BIPKTGP1 : TBits_7; inline;
  79827. begin
  79828. getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
  79829. end;
  79830. procedure TETH_EMAC1IPGR.setw(thebits : TBits_32); inline;
  79831. begin
  79832. pTDefRegMap(@Self)^.val := thebits;
  79833. end;
  79834. function TETH_EMAC1IPGR.getw : TBits_32; inline;
  79835. begin
  79836. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79837. end;
  79838. procedure TETH_EMACxIPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
  79839. begin
  79840. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  79841. end;
  79842. function TETH_EMACxIPGR.getNB2BIPKTGP2 : TBits_7; inline;
  79843. begin
  79844. getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  79845. end;
  79846. procedure TETH_EMACxIPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
  79847. begin
  79848. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
  79849. end;
  79850. function TETH_EMACxIPGR.getNB2BIPKTGP1 : TBits_7; inline;
  79851. begin
  79852. getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
  79853. end;
  79854. procedure TETH_EMACxIPGR.setw(thebits : TBits_32); inline;
  79855. begin
  79856. pTDefRegMap(@Self)^.val := thebits;
  79857. end;
  79858. function TETH_EMACxIPGR.getw : TBits_32; inline;
  79859. begin
  79860. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79861. end;
  79862. procedure TETH_EMAC1CLRT.setRETX(thebits : TBits_4); inline;
  79863. begin
  79864. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  79865. end;
  79866. function TETH_EMAC1CLRT.getRETX : TBits_4; inline;
  79867. begin
  79868. getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  79869. end;
  79870. procedure TETH_EMAC1CLRT.setCWINDOW(thebits : TBits_6); inline;
  79871. begin
  79872. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
  79873. end;
  79874. function TETH_EMAC1CLRT.getCWINDOW : TBits_6; inline;
  79875. begin
  79876. getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
  79877. end;
  79878. procedure TETH_EMAC1CLRT.setw(thebits : TBits_32); inline;
  79879. begin
  79880. pTDefRegMap(@Self)^.val := thebits;
  79881. end;
  79882. function TETH_EMAC1CLRT.getw : TBits_32; inline;
  79883. begin
  79884. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79885. end;
  79886. procedure TETH_EMACxCLRT.setRETX(thebits : TBits_4); inline;
  79887. begin
  79888. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  79889. end;
  79890. function TETH_EMACxCLRT.getRETX : TBits_4; inline;
  79891. begin
  79892. getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  79893. end;
  79894. procedure TETH_EMACxCLRT.setCWINDOW(thebits : TBits_6); inline;
  79895. begin
  79896. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
  79897. end;
  79898. function TETH_EMACxCLRT.getCWINDOW : TBits_6; inline;
  79899. begin
  79900. getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
  79901. end;
  79902. procedure TETH_EMACxCLRT.setw(thebits : TBits_32); inline;
  79903. begin
  79904. pTDefRegMap(@Self)^.val := thebits;
  79905. end;
  79906. function TETH_EMACxCLRT.getw : TBits_32; inline;
  79907. begin
  79908. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79909. end;
  79910. procedure TETH_EMAC1MAXF.setMACMAXF(thebits : TBits_16); inline;
  79911. begin
  79912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  79913. end;
  79914. function TETH_EMAC1MAXF.getMACMAXF : TBits_16; inline;
  79915. begin
  79916. getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  79917. end;
  79918. procedure TETH_EMAC1MAXF.setw(thebits : TBits_32); inline;
  79919. begin
  79920. pTDefRegMap(@Self)^.val := thebits;
  79921. end;
  79922. function TETH_EMAC1MAXF.getw : TBits_32; inline;
  79923. begin
  79924. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79925. end;
  79926. procedure TETH_EMACxMAXF.setMACMAXF(thebits : TBits_16); inline;
  79927. begin
  79928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  79929. end;
  79930. function TETH_EMACxMAXF.getMACMAXF : TBits_16; inline;
  79931. begin
  79932. getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  79933. end;
  79934. procedure TETH_EMACxMAXF.setw(thebits : TBits_32); inline;
  79935. begin
  79936. pTDefRegMap(@Self)^.val := thebits;
  79937. end;
  79938. function TETH_EMACxMAXF.getw : TBits_32; inline;
  79939. begin
  79940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79941. end;
  79942. procedure TETH_EMAC1SUPP.setSPEEDRMII; inline;
  79943. begin
  79944. pTDefRegMap(@Self)^.&set := $00000100;
  79945. end;
  79946. procedure TETH_EMAC1SUPP.clearSPEEDRMII; inline;
  79947. begin
  79948. pTDefRegMap(@Self)^.clr := $00000100;
  79949. end;
  79950. procedure TETH_EMAC1SUPP.setSPEEDRMII(thebits : TBits_1); inline;
  79951. begin
  79952. if thebits = 0 then
  79953. pTDefRegMap(@Self)^.clr := $00000100
  79954. else
  79955. pTDefRegMap(@Self)^.&set := $00000100;
  79956. end;
  79957. function TETH_EMAC1SUPP.getSPEEDRMII : TBits_1; inline;
  79958. begin
  79959. getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  79960. end;
  79961. procedure TETH_EMAC1SUPP.setRESETRMII; inline;
  79962. begin
  79963. pTDefRegMap(@Self)^.&set := $00000800;
  79964. end;
  79965. procedure TETH_EMAC1SUPP.clearRESETRMII; inline;
  79966. begin
  79967. pTDefRegMap(@Self)^.clr := $00000800;
  79968. end;
  79969. procedure TETH_EMAC1SUPP.setRESETRMII(thebits : TBits_1); inline;
  79970. begin
  79971. if thebits = 0 then
  79972. pTDefRegMap(@Self)^.clr := $00000800
  79973. else
  79974. pTDefRegMap(@Self)^.&set := $00000800;
  79975. end;
  79976. function TETH_EMAC1SUPP.getRESETRMII : TBits_1; inline;
  79977. begin
  79978. getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  79979. end;
  79980. procedure TETH_EMAC1SUPP.setw(thebits : TBits_32); inline;
  79981. begin
  79982. pTDefRegMap(@Self)^.val := thebits;
  79983. end;
  79984. function TETH_EMAC1SUPP.getw : TBits_32; inline;
  79985. begin
  79986. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79987. end;
  79988. procedure TETH_EMACxSUPP.setSPEEDRMII; inline;
  79989. begin
  79990. pTDefRegMap(@Self)^.&set := $00000100;
  79991. end;
  79992. procedure TETH_EMACxSUPP.clearSPEEDRMII; inline;
  79993. begin
  79994. pTDefRegMap(@Self)^.clr := $00000100;
  79995. end;
  79996. procedure TETH_EMACxSUPP.setSPEEDRMII(thebits : TBits_1); inline;
  79997. begin
  79998. if thebits = 0 then
  79999. pTDefRegMap(@Self)^.clr := $00000100
  80000. else
  80001. pTDefRegMap(@Self)^.&set := $00000100;
  80002. end;
  80003. function TETH_EMACxSUPP.getSPEEDRMII : TBits_1; inline;
  80004. begin
  80005. getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80006. end;
  80007. procedure TETH_EMACxSUPP.setRESETRMII; inline;
  80008. begin
  80009. pTDefRegMap(@Self)^.&set := $00000800;
  80010. end;
  80011. procedure TETH_EMACxSUPP.clearRESETRMII; inline;
  80012. begin
  80013. pTDefRegMap(@Self)^.clr := $00000800;
  80014. end;
  80015. procedure TETH_EMACxSUPP.setRESETRMII(thebits : TBits_1); inline;
  80016. begin
  80017. if thebits = 0 then
  80018. pTDefRegMap(@Self)^.clr := $00000800
  80019. else
  80020. pTDefRegMap(@Self)^.&set := $00000800;
  80021. end;
  80022. function TETH_EMACxSUPP.getRESETRMII : TBits_1; inline;
  80023. begin
  80024. getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  80025. end;
  80026. procedure TETH_EMACxSUPP.setw(thebits : TBits_32); inline;
  80027. begin
  80028. pTDefRegMap(@Self)^.val := thebits;
  80029. end;
  80030. function TETH_EMACxSUPP.getw : TBits_32; inline;
  80031. begin
  80032. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80033. end;
  80034. procedure TETH_EMAC1TEST.setSHRTQNTA; inline;
  80035. begin
  80036. pTDefRegMap(@Self)^.&set := $00000001;
  80037. end;
  80038. procedure TETH_EMAC1TEST.clearSHRTQNTA; inline;
  80039. begin
  80040. pTDefRegMap(@Self)^.clr := $00000001;
  80041. end;
  80042. procedure TETH_EMAC1TEST.setSHRTQNTA(thebits : TBits_1); inline;
  80043. begin
  80044. if thebits = 0 then
  80045. pTDefRegMap(@Self)^.clr := $00000001
  80046. else
  80047. pTDefRegMap(@Self)^.&set := $00000001;
  80048. end;
  80049. function TETH_EMAC1TEST.getSHRTQNTA : TBits_1; inline;
  80050. begin
  80051. getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80052. end;
  80053. procedure TETH_EMAC1TEST.setTESTPAUSE; inline;
  80054. begin
  80055. pTDefRegMap(@Self)^.&set := $00000002;
  80056. end;
  80057. procedure TETH_EMAC1TEST.clearTESTPAUSE; inline;
  80058. begin
  80059. pTDefRegMap(@Self)^.clr := $00000002;
  80060. end;
  80061. procedure TETH_EMAC1TEST.setTESTPAUSE(thebits : TBits_1); inline;
  80062. begin
  80063. if thebits = 0 then
  80064. pTDefRegMap(@Self)^.clr := $00000002
  80065. else
  80066. pTDefRegMap(@Self)^.&set := $00000002;
  80067. end;
  80068. function TETH_EMAC1TEST.getTESTPAUSE : TBits_1; inline;
  80069. begin
  80070. getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80071. end;
  80072. procedure TETH_EMAC1TEST.setTESTBP; inline;
  80073. begin
  80074. pTDefRegMap(@Self)^.&set := $00000004;
  80075. end;
  80076. procedure TETH_EMAC1TEST.clearTESTBP; inline;
  80077. begin
  80078. pTDefRegMap(@Self)^.clr := $00000004;
  80079. end;
  80080. procedure TETH_EMAC1TEST.setTESTBP(thebits : TBits_1); inline;
  80081. begin
  80082. if thebits = 0 then
  80083. pTDefRegMap(@Self)^.clr := $00000004
  80084. else
  80085. pTDefRegMap(@Self)^.&set := $00000004;
  80086. end;
  80087. function TETH_EMAC1TEST.getTESTBP : TBits_1; inline;
  80088. begin
  80089. getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80090. end;
  80091. procedure TETH_EMAC1TEST.setw(thebits : TBits_32); inline;
  80092. begin
  80093. pTDefRegMap(@Self)^.val := thebits;
  80094. end;
  80095. function TETH_EMAC1TEST.getw : TBits_32; inline;
  80096. begin
  80097. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80098. end;
  80099. procedure TETH_EMACxTEST.setSHRTQNTA; inline;
  80100. begin
  80101. pTDefRegMap(@Self)^.&set := $00000001;
  80102. end;
  80103. procedure TETH_EMACxTEST.clearSHRTQNTA; inline;
  80104. begin
  80105. pTDefRegMap(@Self)^.clr := $00000001;
  80106. end;
  80107. procedure TETH_EMACxTEST.setSHRTQNTA(thebits : TBits_1); inline;
  80108. begin
  80109. if thebits = 0 then
  80110. pTDefRegMap(@Self)^.clr := $00000001
  80111. else
  80112. pTDefRegMap(@Self)^.&set := $00000001;
  80113. end;
  80114. function TETH_EMACxTEST.getSHRTQNTA : TBits_1; inline;
  80115. begin
  80116. getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80117. end;
  80118. procedure TETH_EMACxTEST.setTESTPAUSE; inline;
  80119. begin
  80120. pTDefRegMap(@Self)^.&set := $00000002;
  80121. end;
  80122. procedure TETH_EMACxTEST.clearTESTPAUSE; inline;
  80123. begin
  80124. pTDefRegMap(@Self)^.clr := $00000002;
  80125. end;
  80126. procedure TETH_EMACxTEST.setTESTPAUSE(thebits : TBits_1); inline;
  80127. begin
  80128. if thebits = 0 then
  80129. pTDefRegMap(@Self)^.clr := $00000002
  80130. else
  80131. pTDefRegMap(@Self)^.&set := $00000002;
  80132. end;
  80133. function TETH_EMACxTEST.getTESTPAUSE : TBits_1; inline;
  80134. begin
  80135. getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80136. end;
  80137. procedure TETH_EMACxTEST.setTESTBP; inline;
  80138. begin
  80139. pTDefRegMap(@Self)^.&set := $00000004;
  80140. end;
  80141. procedure TETH_EMACxTEST.clearTESTBP; inline;
  80142. begin
  80143. pTDefRegMap(@Self)^.clr := $00000004;
  80144. end;
  80145. procedure TETH_EMACxTEST.setTESTBP(thebits : TBits_1); inline;
  80146. begin
  80147. if thebits = 0 then
  80148. pTDefRegMap(@Self)^.clr := $00000004
  80149. else
  80150. pTDefRegMap(@Self)^.&set := $00000004;
  80151. end;
  80152. function TETH_EMACxTEST.getTESTBP : TBits_1; inline;
  80153. begin
  80154. getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80155. end;
  80156. procedure TETH_EMACxTEST.setw(thebits : TBits_32); inline;
  80157. begin
  80158. pTDefRegMap(@Self)^.val := thebits;
  80159. end;
  80160. function TETH_EMACxTEST.getw : TBits_32; inline;
  80161. begin
  80162. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80163. end;
  80164. procedure TETH_EMAC1MCFG.setSCANINC; inline;
  80165. begin
  80166. pTDefRegMap(@Self)^.&set := $00000001;
  80167. end;
  80168. procedure TETH_EMAC1MCFG.clearSCANINC; inline;
  80169. begin
  80170. pTDefRegMap(@Self)^.clr := $00000001;
  80171. end;
  80172. procedure TETH_EMAC1MCFG.setSCANINC(thebits : TBits_1); inline;
  80173. begin
  80174. if thebits = 0 then
  80175. pTDefRegMap(@Self)^.clr := $00000001
  80176. else
  80177. pTDefRegMap(@Self)^.&set := $00000001;
  80178. end;
  80179. function TETH_EMAC1MCFG.getSCANINC : TBits_1; inline;
  80180. begin
  80181. getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80182. end;
  80183. procedure TETH_EMAC1MCFG.setNOPRE; inline;
  80184. begin
  80185. pTDefRegMap(@Self)^.&set := $00000002;
  80186. end;
  80187. procedure TETH_EMAC1MCFG.clearNOPRE; inline;
  80188. begin
  80189. pTDefRegMap(@Self)^.clr := $00000002;
  80190. end;
  80191. procedure TETH_EMAC1MCFG.setNOPRE(thebits : TBits_1); inline;
  80192. begin
  80193. if thebits = 0 then
  80194. pTDefRegMap(@Self)^.clr := $00000002
  80195. else
  80196. pTDefRegMap(@Self)^.&set := $00000002;
  80197. end;
  80198. function TETH_EMAC1MCFG.getNOPRE : TBits_1; inline;
  80199. begin
  80200. getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80201. end;
  80202. procedure TETH_EMAC1MCFG.setCLKSEL(thebits : TBits_4); inline;
  80203. begin
  80204. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  80205. end;
  80206. function TETH_EMAC1MCFG.getCLKSEL : TBits_4; inline;
  80207. begin
  80208. getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  80209. end;
  80210. procedure TETH_EMAC1MCFG.setRESETMGMT; inline;
  80211. begin
  80212. pTDefRegMap(@Self)^.&set := $00008000;
  80213. end;
  80214. procedure TETH_EMAC1MCFG.clearRESETMGMT; inline;
  80215. begin
  80216. pTDefRegMap(@Self)^.clr := $00008000;
  80217. end;
  80218. procedure TETH_EMAC1MCFG.setRESETMGMT(thebits : TBits_1); inline;
  80219. begin
  80220. if thebits = 0 then
  80221. pTDefRegMap(@Self)^.clr := $00008000
  80222. else
  80223. pTDefRegMap(@Self)^.&set := $00008000;
  80224. end;
  80225. function TETH_EMAC1MCFG.getRESETMGMT : TBits_1; inline;
  80226. begin
  80227. getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  80228. end;
  80229. procedure TETH_EMAC1MCFG.setw(thebits : TBits_32); inline;
  80230. begin
  80231. pTDefRegMap(@Self)^.val := thebits;
  80232. end;
  80233. function TETH_EMAC1MCFG.getw : TBits_32; inline;
  80234. begin
  80235. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80236. end;
  80237. procedure TETH_EMACxMCFG.setSCANINC; inline;
  80238. begin
  80239. pTDefRegMap(@Self)^.&set := $00000001;
  80240. end;
  80241. procedure TETH_EMACxMCFG.clearSCANINC; inline;
  80242. begin
  80243. pTDefRegMap(@Self)^.clr := $00000001;
  80244. end;
  80245. procedure TETH_EMACxMCFG.setSCANINC(thebits : TBits_1); inline;
  80246. begin
  80247. if thebits = 0 then
  80248. pTDefRegMap(@Self)^.clr := $00000001
  80249. else
  80250. pTDefRegMap(@Self)^.&set := $00000001;
  80251. end;
  80252. function TETH_EMACxMCFG.getSCANINC : TBits_1; inline;
  80253. begin
  80254. getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80255. end;
  80256. procedure TETH_EMACxMCFG.setNOPRE; inline;
  80257. begin
  80258. pTDefRegMap(@Self)^.&set := $00000002;
  80259. end;
  80260. procedure TETH_EMACxMCFG.clearNOPRE; inline;
  80261. begin
  80262. pTDefRegMap(@Self)^.clr := $00000002;
  80263. end;
  80264. procedure TETH_EMACxMCFG.setNOPRE(thebits : TBits_1); inline;
  80265. begin
  80266. if thebits = 0 then
  80267. pTDefRegMap(@Self)^.clr := $00000002
  80268. else
  80269. pTDefRegMap(@Self)^.&set := $00000002;
  80270. end;
  80271. function TETH_EMACxMCFG.getNOPRE : TBits_1; inline;
  80272. begin
  80273. getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80274. end;
  80275. procedure TETH_EMACxMCFG.setCLKSEL(thebits : TBits_4); inline;
  80276. begin
  80277. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  80278. end;
  80279. function TETH_EMACxMCFG.getCLKSEL : TBits_4; inline;
  80280. begin
  80281. getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  80282. end;
  80283. procedure TETH_EMACxMCFG.setRESETMGMT; inline;
  80284. begin
  80285. pTDefRegMap(@Self)^.&set := $00008000;
  80286. end;
  80287. procedure TETH_EMACxMCFG.clearRESETMGMT; inline;
  80288. begin
  80289. pTDefRegMap(@Self)^.clr := $00008000;
  80290. end;
  80291. procedure TETH_EMACxMCFG.setRESETMGMT(thebits : TBits_1); inline;
  80292. begin
  80293. if thebits = 0 then
  80294. pTDefRegMap(@Self)^.clr := $00008000
  80295. else
  80296. pTDefRegMap(@Self)^.&set := $00008000;
  80297. end;
  80298. function TETH_EMACxMCFG.getRESETMGMT : TBits_1; inline;
  80299. begin
  80300. getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  80301. end;
  80302. procedure TETH_EMACxMCFG.setw(thebits : TBits_32); inline;
  80303. begin
  80304. pTDefRegMap(@Self)^.val := thebits;
  80305. end;
  80306. function TETH_EMACxMCFG.getw : TBits_32; inline;
  80307. begin
  80308. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80309. end;
  80310. procedure TETH_EMAC1MCMD.setREAD; inline;
  80311. begin
  80312. pTDefRegMap(@Self)^.&set := $00000001;
  80313. end;
  80314. procedure TETH_EMAC1MCMD.clearREAD; inline;
  80315. begin
  80316. pTDefRegMap(@Self)^.clr := $00000001;
  80317. end;
  80318. procedure TETH_EMAC1MCMD.setREAD(thebits : TBits_1); inline;
  80319. begin
  80320. if thebits = 0 then
  80321. pTDefRegMap(@Self)^.clr := $00000001
  80322. else
  80323. pTDefRegMap(@Self)^.&set := $00000001;
  80324. end;
  80325. function TETH_EMAC1MCMD.getREAD : TBits_1; inline;
  80326. begin
  80327. getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80328. end;
  80329. procedure TETH_EMAC1MCMD.setSCAN; inline;
  80330. begin
  80331. pTDefRegMap(@Self)^.&set := $00000002;
  80332. end;
  80333. procedure TETH_EMAC1MCMD.clearSCAN; inline;
  80334. begin
  80335. pTDefRegMap(@Self)^.clr := $00000002;
  80336. end;
  80337. procedure TETH_EMAC1MCMD.setSCAN(thebits : TBits_1); inline;
  80338. begin
  80339. if thebits = 0 then
  80340. pTDefRegMap(@Self)^.clr := $00000002
  80341. else
  80342. pTDefRegMap(@Self)^.&set := $00000002;
  80343. end;
  80344. function TETH_EMAC1MCMD.getSCAN : TBits_1; inline;
  80345. begin
  80346. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80347. end;
  80348. procedure TETH_EMAC1MCMD.setw(thebits : TBits_32); inline;
  80349. begin
  80350. pTDefRegMap(@Self)^.val := thebits;
  80351. end;
  80352. function TETH_EMAC1MCMD.getw : TBits_32; inline;
  80353. begin
  80354. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80355. end;
  80356. procedure TETH_EMACxMCMD.setREAD; inline;
  80357. begin
  80358. pTDefRegMap(@Self)^.&set := $00000001;
  80359. end;
  80360. procedure TETH_EMACxMCMD.clearREAD; inline;
  80361. begin
  80362. pTDefRegMap(@Self)^.clr := $00000001;
  80363. end;
  80364. procedure TETH_EMACxMCMD.setREAD(thebits : TBits_1); inline;
  80365. begin
  80366. if thebits = 0 then
  80367. pTDefRegMap(@Self)^.clr := $00000001
  80368. else
  80369. pTDefRegMap(@Self)^.&set := $00000001;
  80370. end;
  80371. function TETH_EMACxMCMD.getREAD : TBits_1; inline;
  80372. begin
  80373. getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80374. end;
  80375. procedure TETH_EMACxMCMD.setSCAN; inline;
  80376. begin
  80377. pTDefRegMap(@Self)^.&set := $00000002;
  80378. end;
  80379. procedure TETH_EMACxMCMD.clearSCAN; inline;
  80380. begin
  80381. pTDefRegMap(@Self)^.clr := $00000002;
  80382. end;
  80383. procedure TETH_EMACxMCMD.setSCAN(thebits : TBits_1); inline;
  80384. begin
  80385. if thebits = 0 then
  80386. pTDefRegMap(@Self)^.clr := $00000002
  80387. else
  80388. pTDefRegMap(@Self)^.&set := $00000002;
  80389. end;
  80390. function TETH_EMACxMCMD.getSCAN : TBits_1; inline;
  80391. begin
  80392. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80393. end;
  80394. procedure TETH_EMACxMCMD.setw(thebits : TBits_32); inline;
  80395. begin
  80396. pTDefRegMap(@Self)^.val := thebits;
  80397. end;
  80398. function TETH_EMACxMCMD.getw : TBits_32; inline;
  80399. begin
  80400. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80401. end;
  80402. procedure TETH_EMAC1MADR.setREGADDR(thebits : TBits_5); inline;
  80403. begin
  80404. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80405. end;
  80406. function TETH_EMAC1MADR.getREGADDR : TBits_5; inline;
  80407. begin
  80408. getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80409. end;
  80410. procedure TETH_EMAC1MADR.setPHYADDR(thebits : TBits_5); inline;
  80411. begin
  80412. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  80413. end;
  80414. function TETH_EMAC1MADR.getPHYADDR : TBits_5; inline;
  80415. begin
  80416. getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  80417. end;
  80418. procedure TETH_EMAC1MADR.setw(thebits : TBits_32); inline;
  80419. begin
  80420. pTDefRegMap(@Self)^.val := thebits;
  80421. end;
  80422. function TETH_EMAC1MADR.getw : TBits_32; inline;
  80423. begin
  80424. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80425. end;
  80426. procedure TETH_EMACxMADR.setREGADDR(thebits : TBits_5); inline;
  80427. begin
  80428. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80429. end;
  80430. function TETH_EMACxMADR.getREGADDR : TBits_5; inline;
  80431. begin
  80432. getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80433. end;
  80434. procedure TETH_EMACxMADR.setPHYADDR(thebits : TBits_5); inline;
  80435. begin
  80436. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  80437. end;
  80438. function TETH_EMACxMADR.getPHYADDR : TBits_5; inline;
  80439. begin
  80440. getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  80441. end;
  80442. procedure TETH_EMACxMADR.setw(thebits : TBits_32); inline;
  80443. begin
  80444. pTDefRegMap(@Self)^.val := thebits;
  80445. end;
  80446. function TETH_EMACxMADR.getw : TBits_32; inline;
  80447. begin
  80448. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80449. end;
  80450. procedure TETH_EMAC1MWTD.setMWTD(thebits : TBits_16); inline;
  80451. begin
  80452. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  80453. end;
  80454. function TETH_EMAC1MWTD.getMWTD : TBits_16; inline;
  80455. begin
  80456. getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  80457. end;
  80458. procedure TETH_EMAC1MWTD.setw(thebits : TBits_32); inline;
  80459. begin
  80460. pTDefRegMap(@Self)^.val := thebits;
  80461. end;
  80462. function TETH_EMAC1MWTD.getw : TBits_32; inline;
  80463. begin
  80464. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80465. end;
  80466. procedure TETH_EMACxMWTD.setMWTD(thebits : TBits_16); inline;
  80467. begin
  80468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  80469. end;
  80470. function TETH_EMACxMWTD.getMWTD : TBits_16; inline;
  80471. begin
  80472. getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  80473. end;
  80474. procedure TETH_EMACxMWTD.setw(thebits : TBits_32); inline;
  80475. begin
  80476. pTDefRegMap(@Self)^.val := thebits;
  80477. end;
  80478. function TETH_EMACxMWTD.getw : TBits_32; inline;
  80479. begin
  80480. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80481. end;
  80482. procedure TETH_EMAC1MRDD.setMRDD(thebits : TBits_16); inline;
  80483. begin
  80484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  80485. end;
  80486. function TETH_EMAC1MRDD.getMRDD : TBits_16; inline;
  80487. begin
  80488. getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  80489. end;
  80490. procedure TETH_EMAC1MRDD.setw(thebits : TBits_32); inline;
  80491. begin
  80492. pTDefRegMap(@Self)^.val := thebits;
  80493. end;
  80494. function TETH_EMAC1MRDD.getw : TBits_32; inline;
  80495. begin
  80496. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80497. end;
  80498. procedure TETH_EMACxMRDD.setMRDD(thebits : TBits_16); inline;
  80499. begin
  80500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  80501. end;
  80502. function TETH_EMACxMRDD.getMRDD : TBits_16; inline;
  80503. begin
  80504. getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  80505. end;
  80506. procedure TETH_EMACxMRDD.setw(thebits : TBits_32); inline;
  80507. begin
  80508. pTDefRegMap(@Self)^.val := thebits;
  80509. end;
  80510. function TETH_EMACxMRDD.getw : TBits_32; inline;
  80511. begin
  80512. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80513. end;
  80514. procedure TETH_EMAC1MIND.setMIIMBUSY; inline;
  80515. begin
  80516. pTDefRegMap(@Self)^.&set := $00000001;
  80517. end;
  80518. procedure TETH_EMAC1MIND.clearMIIMBUSY; inline;
  80519. begin
  80520. pTDefRegMap(@Self)^.clr := $00000001;
  80521. end;
  80522. procedure TETH_EMAC1MIND.setMIIMBUSY(thebits : TBits_1); inline;
  80523. begin
  80524. if thebits = 0 then
  80525. pTDefRegMap(@Self)^.clr := $00000001
  80526. else
  80527. pTDefRegMap(@Self)^.&set := $00000001;
  80528. end;
  80529. function TETH_EMAC1MIND.getMIIMBUSY : TBits_1; inline;
  80530. begin
  80531. getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80532. end;
  80533. procedure TETH_EMAC1MIND.setSCAN; inline;
  80534. begin
  80535. pTDefRegMap(@Self)^.&set := $00000002;
  80536. end;
  80537. procedure TETH_EMAC1MIND.clearSCAN; inline;
  80538. begin
  80539. pTDefRegMap(@Self)^.clr := $00000002;
  80540. end;
  80541. procedure TETH_EMAC1MIND.setSCAN(thebits : TBits_1); inline;
  80542. begin
  80543. if thebits = 0 then
  80544. pTDefRegMap(@Self)^.clr := $00000002
  80545. else
  80546. pTDefRegMap(@Self)^.&set := $00000002;
  80547. end;
  80548. function TETH_EMAC1MIND.getSCAN : TBits_1; inline;
  80549. begin
  80550. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80551. end;
  80552. procedure TETH_EMAC1MIND.setNOTVALID; inline;
  80553. begin
  80554. pTDefRegMap(@Self)^.&set := $00000004;
  80555. end;
  80556. procedure TETH_EMAC1MIND.clearNOTVALID; inline;
  80557. begin
  80558. pTDefRegMap(@Self)^.clr := $00000004;
  80559. end;
  80560. procedure TETH_EMAC1MIND.setNOTVALID(thebits : TBits_1); inline;
  80561. begin
  80562. if thebits = 0 then
  80563. pTDefRegMap(@Self)^.clr := $00000004
  80564. else
  80565. pTDefRegMap(@Self)^.&set := $00000004;
  80566. end;
  80567. function TETH_EMAC1MIND.getNOTVALID : TBits_1; inline;
  80568. begin
  80569. getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80570. end;
  80571. procedure TETH_EMAC1MIND.setLINKFAIL; inline;
  80572. begin
  80573. pTDefRegMap(@Self)^.&set := $00000008;
  80574. end;
  80575. procedure TETH_EMAC1MIND.clearLINKFAIL; inline;
  80576. begin
  80577. pTDefRegMap(@Self)^.clr := $00000008;
  80578. end;
  80579. procedure TETH_EMAC1MIND.setLINKFAIL(thebits : TBits_1); inline;
  80580. begin
  80581. if thebits = 0 then
  80582. pTDefRegMap(@Self)^.clr := $00000008
  80583. else
  80584. pTDefRegMap(@Self)^.&set := $00000008;
  80585. end;
  80586. function TETH_EMAC1MIND.getLINKFAIL : TBits_1; inline;
  80587. begin
  80588. getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80589. end;
  80590. procedure TETH_EMAC1MIND.setw(thebits : TBits_32); inline;
  80591. begin
  80592. pTDefRegMap(@Self)^.val := thebits;
  80593. end;
  80594. function TETH_EMAC1MIND.getw : TBits_32; inline;
  80595. begin
  80596. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80597. end;
  80598. procedure TETH_EMACxMIND.setMIIMBUSY; inline;
  80599. begin
  80600. pTDefRegMap(@Self)^.&set := $00000001;
  80601. end;
  80602. procedure TETH_EMACxMIND.clearMIIMBUSY; inline;
  80603. begin
  80604. pTDefRegMap(@Self)^.clr := $00000001;
  80605. end;
  80606. procedure TETH_EMACxMIND.setMIIMBUSY(thebits : TBits_1); inline;
  80607. begin
  80608. if thebits = 0 then
  80609. pTDefRegMap(@Self)^.clr := $00000001
  80610. else
  80611. pTDefRegMap(@Self)^.&set := $00000001;
  80612. end;
  80613. function TETH_EMACxMIND.getMIIMBUSY : TBits_1; inline;
  80614. begin
  80615. getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80616. end;
  80617. procedure TETH_EMACxMIND.setSCAN; inline;
  80618. begin
  80619. pTDefRegMap(@Self)^.&set := $00000002;
  80620. end;
  80621. procedure TETH_EMACxMIND.clearSCAN; inline;
  80622. begin
  80623. pTDefRegMap(@Self)^.clr := $00000002;
  80624. end;
  80625. procedure TETH_EMACxMIND.setSCAN(thebits : TBits_1); inline;
  80626. begin
  80627. if thebits = 0 then
  80628. pTDefRegMap(@Self)^.clr := $00000002
  80629. else
  80630. pTDefRegMap(@Self)^.&set := $00000002;
  80631. end;
  80632. function TETH_EMACxMIND.getSCAN : TBits_1; inline;
  80633. begin
  80634. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80635. end;
  80636. procedure TETH_EMACxMIND.setNOTVALID; inline;
  80637. begin
  80638. pTDefRegMap(@Self)^.&set := $00000004;
  80639. end;
  80640. procedure TETH_EMACxMIND.clearNOTVALID; inline;
  80641. begin
  80642. pTDefRegMap(@Self)^.clr := $00000004;
  80643. end;
  80644. procedure TETH_EMACxMIND.setNOTVALID(thebits : TBits_1); inline;
  80645. begin
  80646. if thebits = 0 then
  80647. pTDefRegMap(@Self)^.clr := $00000004
  80648. else
  80649. pTDefRegMap(@Self)^.&set := $00000004;
  80650. end;
  80651. function TETH_EMACxMIND.getNOTVALID : TBits_1; inline;
  80652. begin
  80653. getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80654. end;
  80655. procedure TETH_EMACxMIND.setLINKFAIL; inline;
  80656. begin
  80657. pTDefRegMap(@Self)^.&set := $00000008;
  80658. end;
  80659. procedure TETH_EMACxMIND.clearLINKFAIL; inline;
  80660. begin
  80661. pTDefRegMap(@Self)^.clr := $00000008;
  80662. end;
  80663. procedure TETH_EMACxMIND.setLINKFAIL(thebits : TBits_1); inline;
  80664. begin
  80665. if thebits = 0 then
  80666. pTDefRegMap(@Self)^.clr := $00000008
  80667. else
  80668. pTDefRegMap(@Self)^.&set := $00000008;
  80669. end;
  80670. function TETH_EMACxMIND.getLINKFAIL : TBits_1; inline;
  80671. begin
  80672. getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80673. end;
  80674. procedure TETH_EMACxMIND.setw(thebits : TBits_32); inline;
  80675. begin
  80676. pTDefRegMap(@Self)^.val := thebits;
  80677. end;
  80678. function TETH_EMACxMIND.getw : TBits_32; inline;
  80679. begin
  80680. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80681. end;
  80682. procedure TETH_EMAC1SA0.setSTNADDR5(thebits : TBits_8); inline;
  80683. begin
  80684. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  80685. end;
  80686. function TETH_EMAC1SA0.getSTNADDR5 : TBits_8; inline;
  80687. begin
  80688. getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  80689. end;
  80690. procedure TETH_EMAC1SA0.setSTNADDR6(thebits : TBits_8); inline;
  80691. begin
  80692. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  80693. end;
  80694. function TETH_EMAC1SA0.getSTNADDR6 : TBits_8; inline;
  80695. begin
  80696. getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  80697. end;
  80698. procedure TETH_EMAC1SA0.setw(thebits : TBits_32); inline;
  80699. begin
  80700. pTDefRegMap(@Self)^.val := thebits;
  80701. end;
  80702. function TETH_EMAC1SA0.getw : TBits_32; inline;
  80703. begin
  80704. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80705. end;
  80706. procedure TETH_EMACxSA0.setSTNADDR5(thebits : TBits_8); inline;
  80707. begin
  80708. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  80709. end;
  80710. function TETH_EMACxSA0.getSTNADDR5 : TBits_8; inline;
  80711. begin
  80712. getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  80713. end;
  80714. procedure TETH_EMACxSA0.setSTNADDR6(thebits : TBits_8); inline;
  80715. begin
  80716. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  80717. end;
  80718. function TETH_EMACxSA0.getSTNADDR6 : TBits_8; inline;
  80719. begin
  80720. getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  80721. end;
  80722. procedure TETH_EMACxSA0.setw(thebits : TBits_32); inline;
  80723. begin
  80724. pTDefRegMap(@Self)^.val := thebits;
  80725. end;
  80726. function TETH_EMACxSA0.getw : TBits_32; inline;
  80727. begin
  80728. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80729. end;
  80730. procedure TETH_EMAC1SA1.setSTNADDR3(thebits : TBits_8); inline;
  80731. begin
  80732. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  80733. end;
  80734. function TETH_EMAC1SA1.getSTNADDR3 : TBits_8; inline;
  80735. begin
  80736. getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  80737. end;
  80738. procedure TETH_EMAC1SA1.setSTNADDR4(thebits : TBits_8); inline;
  80739. begin
  80740. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  80741. end;
  80742. function TETH_EMAC1SA1.getSTNADDR4 : TBits_8; inline;
  80743. begin
  80744. getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  80745. end;
  80746. procedure TETH_EMAC1SA1.setw(thebits : TBits_32); inline;
  80747. begin
  80748. pTDefRegMap(@Self)^.val := thebits;
  80749. end;
  80750. function TETH_EMAC1SA1.getw : TBits_32; inline;
  80751. begin
  80752. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80753. end;
  80754. procedure TETH_EMACxSA1.setSTNADDR3(thebits : TBits_8); inline;
  80755. begin
  80756. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  80757. end;
  80758. function TETH_EMACxSA1.getSTNADDR3 : TBits_8; inline;
  80759. begin
  80760. getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  80761. end;
  80762. procedure TETH_EMACxSA1.setSTNADDR4(thebits : TBits_8); inline;
  80763. begin
  80764. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  80765. end;
  80766. function TETH_EMACxSA1.getSTNADDR4 : TBits_8; inline;
  80767. begin
  80768. getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  80769. end;
  80770. procedure TETH_EMACxSA1.setw(thebits : TBits_32); inline;
  80771. begin
  80772. pTDefRegMap(@Self)^.val := thebits;
  80773. end;
  80774. function TETH_EMACxSA1.getw : TBits_32; inline;
  80775. begin
  80776. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80777. end;
  80778. procedure TETH_EMAC1SA2.setSTNADDR1(thebits : TBits_8); inline;
  80779. begin
  80780. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  80781. end;
  80782. function TETH_EMAC1SA2.getSTNADDR1 : TBits_8; inline;
  80783. begin
  80784. getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  80785. end;
  80786. procedure TETH_EMAC1SA2.setSTNADDR2(thebits : TBits_8); inline;
  80787. begin
  80788. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  80789. end;
  80790. function TETH_EMAC1SA2.getSTNADDR2 : TBits_8; inline;
  80791. begin
  80792. getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  80793. end;
  80794. procedure TETH_EMAC1SA2.setw(thebits : TBits_32); inline;
  80795. begin
  80796. pTDefRegMap(@Self)^.val := thebits;
  80797. end;
  80798. function TETH_EMAC1SA2.getw : TBits_32; inline;
  80799. begin
  80800. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80801. end;
  80802. procedure TETH_EMACxSA2.setSTNADDR1(thebits : TBits_8); inline;
  80803. begin
  80804. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  80805. end;
  80806. function TETH_EMACxSA2.getSTNADDR1 : TBits_8; inline;
  80807. begin
  80808. getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  80809. end;
  80810. procedure TETH_EMACxSA2.setSTNADDR2(thebits : TBits_8); inline;
  80811. begin
  80812. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  80813. end;
  80814. function TETH_EMACxSA2.getSTNADDR2 : TBits_8; inline;
  80815. begin
  80816. getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  80817. end;
  80818. procedure TETH_EMACxSA2.setw(thebits : TBits_32); inline;
  80819. begin
  80820. pTDefRegMap(@Self)^.val := thebits;
  80821. end;
  80822. function TETH_EMACxSA2.getw : TBits_32; inline;
  80823. begin
  80824. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80825. end;
  80826. procedure TCAN1_C1CON.setDNCNT(thebits : TBits_5); inline;
  80827. begin
  80828. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80829. end;
  80830. function TCAN1_C1CON.getDNCNT : TBits_5; inline;
  80831. begin
  80832. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80833. end;
  80834. procedure TCAN1_C1CON.setCANBUSY; inline;
  80835. begin
  80836. pTDefRegMap(@Self)^.&set := $00000800;
  80837. end;
  80838. procedure TCAN1_C1CON.clearCANBUSY; inline;
  80839. begin
  80840. pTDefRegMap(@Self)^.clr := $00000800;
  80841. end;
  80842. procedure TCAN1_C1CON.setCANBUSY(thebits : TBits_1); inline;
  80843. begin
  80844. if thebits = 0 then
  80845. pTDefRegMap(@Self)^.clr := $00000800
  80846. else
  80847. pTDefRegMap(@Self)^.&set := $00000800;
  80848. end;
  80849. function TCAN1_C1CON.getCANBUSY : TBits_1; inline;
  80850. begin
  80851. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  80852. end;
  80853. procedure TCAN1_C1CON.setSIDL; inline;
  80854. begin
  80855. pTDefRegMap(@Self)^.&set := $00002000;
  80856. end;
  80857. procedure TCAN1_C1CON.clearSIDL; inline;
  80858. begin
  80859. pTDefRegMap(@Self)^.clr := $00002000;
  80860. end;
  80861. procedure TCAN1_C1CON.setSIDL(thebits : TBits_1); inline;
  80862. begin
  80863. if thebits = 0 then
  80864. pTDefRegMap(@Self)^.clr := $00002000
  80865. else
  80866. pTDefRegMap(@Self)^.&set := $00002000;
  80867. end;
  80868. function TCAN1_C1CON.getSIDL : TBits_1; inline;
  80869. begin
  80870. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80871. end;
  80872. procedure TCAN1_C1CON.setON; inline;
  80873. begin
  80874. pTDefRegMap(@Self)^.&set := $00008000;
  80875. end;
  80876. procedure TCAN1_C1CON.clearON; inline;
  80877. begin
  80878. pTDefRegMap(@Self)^.clr := $00008000;
  80879. end;
  80880. procedure TCAN1_C1CON.setON(thebits : TBits_1); inline;
  80881. begin
  80882. if thebits = 0 then
  80883. pTDefRegMap(@Self)^.clr := $00008000
  80884. else
  80885. pTDefRegMap(@Self)^.&set := $00008000;
  80886. end;
  80887. function TCAN1_C1CON.getON : TBits_1; inline;
  80888. begin
  80889. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  80890. end;
  80891. procedure TCAN1_C1CON.setCANCAP; inline;
  80892. begin
  80893. pTDefRegMap(@Self)^.&set := $00100000;
  80894. end;
  80895. procedure TCAN1_C1CON.clearCANCAP; inline;
  80896. begin
  80897. pTDefRegMap(@Self)^.clr := $00100000;
  80898. end;
  80899. procedure TCAN1_C1CON.setCANCAP(thebits : TBits_1); inline;
  80900. begin
  80901. if thebits = 0 then
  80902. pTDefRegMap(@Self)^.clr := $00100000
  80903. else
  80904. pTDefRegMap(@Self)^.&set := $00100000;
  80905. end;
  80906. function TCAN1_C1CON.getCANCAP : TBits_1; inline;
  80907. begin
  80908. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  80909. end;
  80910. procedure TCAN1_C1CON.setOPMOD(thebits : TBits_3); inline;
  80911. begin
  80912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  80913. end;
  80914. function TCAN1_C1CON.getOPMOD : TBits_3; inline;
  80915. begin
  80916. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  80917. end;
  80918. procedure TCAN1_C1CON.setREQOP(thebits : TBits_3); inline;
  80919. begin
  80920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  80921. end;
  80922. function TCAN1_C1CON.getREQOP : TBits_3; inline;
  80923. begin
  80924. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  80925. end;
  80926. procedure TCAN1_C1CON.setABAT; inline;
  80927. begin
  80928. pTDefRegMap(@Self)^.&set := $08000000;
  80929. end;
  80930. procedure TCAN1_C1CON.clearABAT; inline;
  80931. begin
  80932. pTDefRegMap(@Self)^.clr := $08000000;
  80933. end;
  80934. procedure TCAN1_C1CON.setABAT(thebits : TBits_1); inline;
  80935. begin
  80936. if thebits = 0 then
  80937. pTDefRegMap(@Self)^.clr := $08000000
  80938. else
  80939. pTDefRegMap(@Self)^.&set := $08000000;
  80940. end;
  80941. function TCAN1_C1CON.getABAT : TBits_1; inline;
  80942. begin
  80943. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  80944. end;
  80945. procedure TCAN1_C1CON.setw(thebits : TBits_32); inline;
  80946. begin
  80947. pTDefRegMap(@Self)^.val := thebits;
  80948. end;
  80949. function TCAN1_C1CON.getw : TBits_32; inline;
  80950. begin
  80951. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80952. end;
  80953. procedure TCAN1_C1CFG.setBRP(thebits : TBits_6); inline;
  80954. begin
  80955. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  80956. end;
  80957. function TCAN1_C1CFG.getBRP : TBits_6; inline;
  80958. begin
  80959. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  80960. end;
  80961. procedure TCAN1_C1CFG.setSJW(thebits : TBits_2); inline;
  80962. begin
  80963. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  80964. end;
  80965. function TCAN1_C1CFG.getSJW : TBits_2; inline;
  80966. begin
  80967. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  80968. end;
  80969. procedure TCAN1_C1CFG.setPRSEG(thebits : TBits_3); inline;
  80970. begin
  80971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  80972. end;
  80973. function TCAN1_C1CFG.getPRSEG : TBits_3; inline;
  80974. begin
  80975. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  80976. end;
  80977. procedure TCAN1_C1CFG.setSEG1PH(thebits : TBits_3); inline;
  80978. begin
  80979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  80980. end;
  80981. function TCAN1_C1CFG.getSEG1PH : TBits_3; inline;
  80982. begin
  80983. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  80984. end;
  80985. procedure TCAN1_C1CFG.setSAM; inline;
  80986. begin
  80987. pTDefRegMap(@Self)^.&set := $00004000;
  80988. end;
  80989. procedure TCAN1_C1CFG.clearSAM; inline;
  80990. begin
  80991. pTDefRegMap(@Self)^.clr := $00004000;
  80992. end;
  80993. procedure TCAN1_C1CFG.setSAM(thebits : TBits_1); inline;
  80994. begin
  80995. if thebits = 0 then
  80996. pTDefRegMap(@Self)^.clr := $00004000
  80997. else
  80998. pTDefRegMap(@Self)^.&set := $00004000;
  80999. end;
  81000. function TCAN1_C1CFG.getSAM : TBits_1; inline;
  81001. begin
  81002. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81003. end;
  81004. procedure TCAN1_C1CFG.setSEG2PHTS; inline;
  81005. begin
  81006. pTDefRegMap(@Self)^.&set := $00008000;
  81007. end;
  81008. procedure TCAN1_C1CFG.clearSEG2PHTS; inline;
  81009. begin
  81010. pTDefRegMap(@Self)^.clr := $00008000;
  81011. end;
  81012. procedure TCAN1_C1CFG.setSEG2PHTS(thebits : TBits_1); inline;
  81013. begin
  81014. if thebits = 0 then
  81015. pTDefRegMap(@Self)^.clr := $00008000
  81016. else
  81017. pTDefRegMap(@Self)^.&set := $00008000;
  81018. end;
  81019. function TCAN1_C1CFG.getSEG2PHTS : TBits_1; inline;
  81020. begin
  81021. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  81022. end;
  81023. procedure TCAN1_C1CFG.setSEG2PH(thebits : TBits_3); inline;
  81024. begin
  81025. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  81026. end;
  81027. function TCAN1_C1CFG.getSEG2PH : TBits_3; inline;
  81028. begin
  81029. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  81030. end;
  81031. procedure TCAN1_C1CFG.setWAKFIL; inline;
  81032. begin
  81033. pTDefRegMap(@Self)^.&set := $00400000;
  81034. end;
  81035. procedure TCAN1_C1CFG.clearWAKFIL; inline;
  81036. begin
  81037. pTDefRegMap(@Self)^.clr := $00400000;
  81038. end;
  81039. procedure TCAN1_C1CFG.setWAKFIL(thebits : TBits_1); inline;
  81040. begin
  81041. if thebits = 0 then
  81042. pTDefRegMap(@Self)^.clr := $00400000
  81043. else
  81044. pTDefRegMap(@Self)^.&set := $00400000;
  81045. end;
  81046. function TCAN1_C1CFG.getWAKFIL : TBits_1; inline;
  81047. begin
  81048. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  81049. end;
  81050. procedure TCAN1_C1CFG.setw(thebits : TBits_32); inline;
  81051. begin
  81052. pTDefRegMap(@Self)^.val := thebits;
  81053. end;
  81054. function TCAN1_C1CFG.getw : TBits_32; inline;
  81055. begin
  81056. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81057. end;
  81058. procedure TCAN1_C1INT.setTBIF; inline;
  81059. begin
  81060. pTDefRegMap(@Self)^.&set := $00000001;
  81061. end;
  81062. procedure TCAN1_C1INT.clearTBIF; inline;
  81063. begin
  81064. pTDefRegMap(@Self)^.clr := $00000001;
  81065. end;
  81066. procedure TCAN1_C1INT.setTBIF(thebits : TBits_1); inline;
  81067. begin
  81068. if thebits = 0 then
  81069. pTDefRegMap(@Self)^.clr := $00000001
  81070. else
  81071. pTDefRegMap(@Self)^.&set := $00000001;
  81072. end;
  81073. function TCAN1_C1INT.getTBIF : TBits_1; inline;
  81074. begin
  81075. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81076. end;
  81077. procedure TCAN1_C1INT.setRBIF; inline;
  81078. begin
  81079. pTDefRegMap(@Self)^.&set := $00000002;
  81080. end;
  81081. procedure TCAN1_C1INT.clearRBIF; inline;
  81082. begin
  81083. pTDefRegMap(@Self)^.clr := $00000002;
  81084. end;
  81085. procedure TCAN1_C1INT.setRBIF(thebits : TBits_1); inline;
  81086. begin
  81087. if thebits = 0 then
  81088. pTDefRegMap(@Self)^.clr := $00000002
  81089. else
  81090. pTDefRegMap(@Self)^.&set := $00000002;
  81091. end;
  81092. function TCAN1_C1INT.getRBIF : TBits_1; inline;
  81093. begin
  81094. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81095. end;
  81096. procedure TCAN1_C1INT.setCTMRIF; inline;
  81097. begin
  81098. pTDefRegMap(@Self)^.&set := $00000004;
  81099. end;
  81100. procedure TCAN1_C1INT.clearCTMRIF; inline;
  81101. begin
  81102. pTDefRegMap(@Self)^.clr := $00000004;
  81103. end;
  81104. procedure TCAN1_C1INT.setCTMRIF(thebits : TBits_1); inline;
  81105. begin
  81106. if thebits = 0 then
  81107. pTDefRegMap(@Self)^.clr := $00000004
  81108. else
  81109. pTDefRegMap(@Self)^.&set := $00000004;
  81110. end;
  81111. function TCAN1_C1INT.getCTMRIF : TBits_1; inline;
  81112. begin
  81113. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81114. end;
  81115. procedure TCAN1_C1INT.setMODIF; inline;
  81116. begin
  81117. pTDefRegMap(@Self)^.&set := $00000008;
  81118. end;
  81119. procedure TCAN1_C1INT.clearMODIF; inline;
  81120. begin
  81121. pTDefRegMap(@Self)^.clr := $00000008;
  81122. end;
  81123. procedure TCAN1_C1INT.setMODIF(thebits : TBits_1); inline;
  81124. begin
  81125. if thebits = 0 then
  81126. pTDefRegMap(@Self)^.clr := $00000008
  81127. else
  81128. pTDefRegMap(@Self)^.&set := $00000008;
  81129. end;
  81130. function TCAN1_C1INT.getMODIF : TBits_1; inline;
  81131. begin
  81132. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81133. end;
  81134. procedure TCAN1_C1INT.setRBOVIF; inline;
  81135. begin
  81136. pTDefRegMap(@Self)^.&set := $00000800;
  81137. end;
  81138. procedure TCAN1_C1INT.clearRBOVIF; inline;
  81139. begin
  81140. pTDefRegMap(@Self)^.clr := $00000800;
  81141. end;
  81142. procedure TCAN1_C1INT.setRBOVIF(thebits : TBits_1); inline;
  81143. begin
  81144. if thebits = 0 then
  81145. pTDefRegMap(@Self)^.clr := $00000800
  81146. else
  81147. pTDefRegMap(@Self)^.&set := $00000800;
  81148. end;
  81149. function TCAN1_C1INT.getRBOVIF : TBits_1; inline;
  81150. begin
  81151. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  81152. end;
  81153. procedure TCAN1_C1INT.setSERRIF; inline;
  81154. begin
  81155. pTDefRegMap(@Self)^.&set := $00001000;
  81156. end;
  81157. procedure TCAN1_C1INT.clearSERRIF; inline;
  81158. begin
  81159. pTDefRegMap(@Self)^.clr := $00001000;
  81160. end;
  81161. procedure TCAN1_C1INT.setSERRIF(thebits : TBits_1); inline;
  81162. begin
  81163. if thebits = 0 then
  81164. pTDefRegMap(@Self)^.clr := $00001000
  81165. else
  81166. pTDefRegMap(@Self)^.&set := $00001000;
  81167. end;
  81168. function TCAN1_C1INT.getSERRIF : TBits_1; inline;
  81169. begin
  81170. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81171. end;
  81172. procedure TCAN1_C1INT.setCERRIF; inline;
  81173. begin
  81174. pTDefRegMap(@Self)^.&set := $00002000;
  81175. end;
  81176. procedure TCAN1_C1INT.clearCERRIF; inline;
  81177. begin
  81178. pTDefRegMap(@Self)^.clr := $00002000;
  81179. end;
  81180. procedure TCAN1_C1INT.setCERRIF(thebits : TBits_1); inline;
  81181. begin
  81182. if thebits = 0 then
  81183. pTDefRegMap(@Self)^.clr := $00002000
  81184. else
  81185. pTDefRegMap(@Self)^.&set := $00002000;
  81186. end;
  81187. function TCAN1_C1INT.getCERRIF : TBits_1; inline;
  81188. begin
  81189. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81190. end;
  81191. procedure TCAN1_C1INT.setWAKIF; inline;
  81192. begin
  81193. pTDefRegMap(@Self)^.&set := $00004000;
  81194. end;
  81195. procedure TCAN1_C1INT.clearWAKIF; inline;
  81196. begin
  81197. pTDefRegMap(@Self)^.clr := $00004000;
  81198. end;
  81199. procedure TCAN1_C1INT.setWAKIF(thebits : TBits_1); inline;
  81200. begin
  81201. if thebits = 0 then
  81202. pTDefRegMap(@Self)^.clr := $00004000
  81203. else
  81204. pTDefRegMap(@Self)^.&set := $00004000;
  81205. end;
  81206. function TCAN1_C1INT.getWAKIF : TBits_1; inline;
  81207. begin
  81208. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81209. end;
  81210. procedure TCAN1_C1INT.setIVRIF; inline;
  81211. begin
  81212. pTDefRegMap(@Self)^.&set := $00008000;
  81213. end;
  81214. procedure TCAN1_C1INT.clearIVRIF; inline;
  81215. begin
  81216. pTDefRegMap(@Self)^.clr := $00008000;
  81217. end;
  81218. procedure TCAN1_C1INT.setIVRIF(thebits : TBits_1); inline;
  81219. begin
  81220. if thebits = 0 then
  81221. pTDefRegMap(@Self)^.clr := $00008000
  81222. else
  81223. pTDefRegMap(@Self)^.&set := $00008000;
  81224. end;
  81225. function TCAN1_C1INT.getIVRIF : TBits_1; inline;
  81226. begin
  81227. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  81228. end;
  81229. procedure TCAN1_C1INT.setTBIE; inline;
  81230. begin
  81231. pTDefRegMap(@Self)^.&set := $00010000;
  81232. end;
  81233. procedure TCAN1_C1INT.clearTBIE; inline;
  81234. begin
  81235. pTDefRegMap(@Self)^.clr := $00010000;
  81236. end;
  81237. procedure TCAN1_C1INT.setTBIE(thebits : TBits_1); inline;
  81238. begin
  81239. if thebits = 0 then
  81240. pTDefRegMap(@Self)^.clr := $00010000
  81241. else
  81242. pTDefRegMap(@Self)^.&set := $00010000;
  81243. end;
  81244. function TCAN1_C1INT.getTBIE : TBits_1; inline;
  81245. begin
  81246. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81247. end;
  81248. procedure TCAN1_C1INT.setRBIE; inline;
  81249. begin
  81250. pTDefRegMap(@Self)^.&set := $00020000;
  81251. end;
  81252. procedure TCAN1_C1INT.clearRBIE; inline;
  81253. begin
  81254. pTDefRegMap(@Self)^.clr := $00020000;
  81255. end;
  81256. procedure TCAN1_C1INT.setRBIE(thebits : TBits_1); inline;
  81257. begin
  81258. if thebits = 0 then
  81259. pTDefRegMap(@Self)^.clr := $00020000
  81260. else
  81261. pTDefRegMap(@Self)^.&set := $00020000;
  81262. end;
  81263. function TCAN1_C1INT.getRBIE : TBits_1; inline;
  81264. begin
  81265. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81266. end;
  81267. procedure TCAN1_C1INT.setCTMRIE; inline;
  81268. begin
  81269. pTDefRegMap(@Self)^.&set := $00040000;
  81270. end;
  81271. procedure TCAN1_C1INT.clearCTMRIE; inline;
  81272. begin
  81273. pTDefRegMap(@Self)^.clr := $00040000;
  81274. end;
  81275. procedure TCAN1_C1INT.setCTMRIE(thebits : TBits_1); inline;
  81276. begin
  81277. if thebits = 0 then
  81278. pTDefRegMap(@Self)^.clr := $00040000
  81279. else
  81280. pTDefRegMap(@Self)^.&set := $00040000;
  81281. end;
  81282. function TCAN1_C1INT.getCTMRIE : TBits_1; inline;
  81283. begin
  81284. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81285. end;
  81286. procedure TCAN1_C1INT.setMODIE; inline;
  81287. begin
  81288. pTDefRegMap(@Self)^.&set := $00080000;
  81289. end;
  81290. procedure TCAN1_C1INT.clearMODIE; inline;
  81291. begin
  81292. pTDefRegMap(@Self)^.clr := $00080000;
  81293. end;
  81294. procedure TCAN1_C1INT.setMODIE(thebits : TBits_1); inline;
  81295. begin
  81296. if thebits = 0 then
  81297. pTDefRegMap(@Self)^.clr := $00080000
  81298. else
  81299. pTDefRegMap(@Self)^.&set := $00080000;
  81300. end;
  81301. function TCAN1_C1INT.getMODIE : TBits_1; inline;
  81302. begin
  81303. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81304. end;
  81305. procedure TCAN1_C1INT.setRBOVIE; inline;
  81306. begin
  81307. pTDefRegMap(@Self)^.&set := $08000000;
  81308. end;
  81309. procedure TCAN1_C1INT.clearRBOVIE; inline;
  81310. begin
  81311. pTDefRegMap(@Self)^.clr := $08000000;
  81312. end;
  81313. procedure TCAN1_C1INT.setRBOVIE(thebits : TBits_1); inline;
  81314. begin
  81315. if thebits = 0 then
  81316. pTDefRegMap(@Self)^.clr := $08000000
  81317. else
  81318. pTDefRegMap(@Self)^.&set := $08000000;
  81319. end;
  81320. function TCAN1_C1INT.getRBOVIE : TBits_1; inline;
  81321. begin
  81322. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  81323. end;
  81324. procedure TCAN1_C1INT.setSERRIE; inline;
  81325. begin
  81326. pTDefRegMap(@Self)^.&set := $10000000;
  81327. end;
  81328. procedure TCAN1_C1INT.clearSERRIE; inline;
  81329. begin
  81330. pTDefRegMap(@Self)^.clr := $10000000;
  81331. end;
  81332. procedure TCAN1_C1INT.setSERRIE(thebits : TBits_1); inline;
  81333. begin
  81334. if thebits = 0 then
  81335. pTDefRegMap(@Self)^.clr := $10000000
  81336. else
  81337. pTDefRegMap(@Self)^.&set := $10000000;
  81338. end;
  81339. function TCAN1_C1INT.getSERRIE : TBits_1; inline;
  81340. begin
  81341. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  81342. end;
  81343. procedure TCAN1_C1INT.setCERRIE; inline;
  81344. begin
  81345. pTDefRegMap(@Self)^.&set := $20000000;
  81346. end;
  81347. procedure TCAN1_C1INT.clearCERRIE; inline;
  81348. begin
  81349. pTDefRegMap(@Self)^.clr := $20000000;
  81350. end;
  81351. procedure TCAN1_C1INT.setCERRIE(thebits : TBits_1); inline;
  81352. begin
  81353. if thebits = 0 then
  81354. pTDefRegMap(@Self)^.clr := $20000000
  81355. else
  81356. pTDefRegMap(@Self)^.&set := $20000000;
  81357. end;
  81358. function TCAN1_C1INT.getCERRIE : TBits_1; inline;
  81359. begin
  81360. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  81361. end;
  81362. procedure TCAN1_C1INT.setWAKIE; inline;
  81363. begin
  81364. pTDefRegMap(@Self)^.&set := $40000000;
  81365. end;
  81366. procedure TCAN1_C1INT.clearWAKIE; inline;
  81367. begin
  81368. pTDefRegMap(@Self)^.clr := $40000000;
  81369. end;
  81370. procedure TCAN1_C1INT.setWAKIE(thebits : TBits_1); inline;
  81371. begin
  81372. if thebits = 0 then
  81373. pTDefRegMap(@Self)^.clr := $40000000
  81374. else
  81375. pTDefRegMap(@Self)^.&set := $40000000;
  81376. end;
  81377. function TCAN1_C1INT.getWAKIE : TBits_1; inline;
  81378. begin
  81379. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  81380. end;
  81381. procedure TCAN1_C1INT.setIVRIE; inline;
  81382. begin
  81383. pTDefRegMap(@Self)^.&set := $80000000;
  81384. end;
  81385. procedure TCAN1_C1INT.clearIVRIE; inline;
  81386. begin
  81387. pTDefRegMap(@Self)^.clr := $80000000;
  81388. end;
  81389. procedure TCAN1_C1INT.setIVRIE(thebits : TBits_1); inline;
  81390. begin
  81391. if thebits = 0 then
  81392. pTDefRegMap(@Self)^.clr := $80000000
  81393. else
  81394. pTDefRegMap(@Self)^.&set := $80000000;
  81395. end;
  81396. function TCAN1_C1INT.getIVRIE : TBits_1; inline;
  81397. begin
  81398. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  81399. end;
  81400. procedure TCAN1_C1INT.setw(thebits : TBits_32); inline;
  81401. begin
  81402. pTDefRegMap(@Self)^.val := thebits;
  81403. end;
  81404. function TCAN1_C1INT.getw : TBits_32; inline;
  81405. begin
  81406. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81407. end;
  81408. procedure TCAN1_C1VEC.setICODE(thebits : TBits_7); inline;
  81409. begin
  81410. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  81411. end;
  81412. function TCAN1_C1VEC.getICODE : TBits_7; inline;
  81413. begin
  81414. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  81415. end;
  81416. procedure TCAN1_C1VEC.setFILHIT(thebits : TBits_5); inline;
  81417. begin
  81418. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  81419. end;
  81420. function TCAN1_C1VEC.getFILHIT : TBits_5; inline;
  81421. begin
  81422. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  81423. end;
  81424. procedure TCAN1_C1VEC.setw(thebits : TBits_32); inline;
  81425. begin
  81426. pTDefRegMap(@Self)^.val := thebits;
  81427. end;
  81428. function TCAN1_C1VEC.getw : TBits_32; inline;
  81429. begin
  81430. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81431. end;
  81432. procedure TCAN1_C1TREC.setRERRCNT(thebits : TBits_8); inline;
  81433. begin
  81434. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  81435. end;
  81436. function TCAN1_C1TREC.getRERRCNT : TBits_8; inline;
  81437. begin
  81438. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  81439. end;
  81440. procedure TCAN1_C1TREC.setTERRCNT(thebits : TBits_8); inline;
  81441. begin
  81442. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  81443. end;
  81444. function TCAN1_C1TREC.getTERRCNT : TBits_8; inline;
  81445. begin
  81446. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  81447. end;
  81448. procedure TCAN1_C1TREC.setEWARN; inline;
  81449. begin
  81450. pTDefRegMap(@Self)^.&set := $00010000;
  81451. end;
  81452. procedure TCAN1_C1TREC.clearEWARN; inline;
  81453. begin
  81454. pTDefRegMap(@Self)^.clr := $00010000;
  81455. end;
  81456. procedure TCAN1_C1TREC.setEWARN(thebits : TBits_1); inline;
  81457. begin
  81458. if thebits = 0 then
  81459. pTDefRegMap(@Self)^.clr := $00010000
  81460. else
  81461. pTDefRegMap(@Self)^.&set := $00010000;
  81462. end;
  81463. function TCAN1_C1TREC.getEWARN : TBits_1; inline;
  81464. begin
  81465. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81466. end;
  81467. procedure TCAN1_C1TREC.setRXWARN; inline;
  81468. begin
  81469. pTDefRegMap(@Self)^.&set := $00020000;
  81470. end;
  81471. procedure TCAN1_C1TREC.clearRXWARN; inline;
  81472. begin
  81473. pTDefRegMap(@Self)^.clr := $00020000;
  81474. end;
  81475. procedure TCAN1_C1TREC.setRXWARN(thebits : TBits_1); inline;
  81476. begin
  81477. if thebits = 0 then
  81478. pTDefRegMap(@Self)^.clr := $00020000
  81479. else
  81480. pTDefRegMap(@Self)^.&set := $00020000;
  81481. end;
  81482. function TCAN1_C1TREC.getRXWARN : TBits_1; inline;
  81483. begin
  81484. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81485. end;
  81486. procedure TCAN1_C1TREC.setTXWARN; inline;
  81487. begin
  81488. pTDefRegMap(@Self)^.&set := $00040000;
  81489. end;
  81490. procedure TCAN1_C1TREC.clearTXWARN; inline;
  81491. begin
  81492. pTDefRegMap(@Self)^.clr := $00040000;
  81493. end;
  81494. procedure TCAN1_C1TREC.setTXWARN(thebits : TBits_1); inline;
  81495. begin
  81496. if thebits = 0 then
  81497. pTDefRegMap(@Self)^.clr := $00040000
  81498. else
  81499. pTDefRegMap(@Self)^.&set := $00040000;
  81500. end;
  81501. function TCAN1_C1TREC.getTXWARN : TBits_1; inline;
  81502. begin
  81503. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81504. end;
  81505. procedure TCAN1_C1TREC.setRXBP; inline;
  81506. begin
  81507. pTDefRegMap(@Self)^.&set := $00080000;
  81508. end;
  81509. procedure TCAN1_C1TREC.clearRXBP; inline;
  81510. begin
  81511. pTDefRegMap(@Self)^.clr := $00080000;
  81512. end;
  81513. procedure TCAN1_C1TREC.setRXBP(thebits : TBits_1); inline;
  81514. begin
  81515. if thebits = 0 then
  81516. pTDefRegMap(@Self)^.clr := $00080000
  81517. else
  81518. pTDefRegMap(@Self)^.&set := $00080000;
  81519. end;
  81520. function TCAN1_C1TREC.getRXBP : TBits_1; inline;
  81521. begin
  81522. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81523. end;
  81524. procedure TCAN1_C1TREC.setTXBP; inline;
  81525. begin
  81526. pTDefRegMap(@Self)^.&set := $00100000;
  81527. end;
  81528. procedure TCAN1_C1TREC.clearTXBP; inline;
  81529. begin
  81530. pTDefRegMap(@Self)^.clr := $00100000;
  81531. end;
  81532. procedure TCAN1_C1TREC.setTXBP(thebits : TBits_1); inline;
  81533. begin
  81534. if thebits = 0 then
  81535. pTDefRegMap(@Self)^.clr := $00100000
  81536. else
  81537. pTDefRegMap(@Self)^.&set := $00100000;
  81538. end;
  81539. function TCAN1_C1TREC.getTXBP : TBits_1; inline;
  81540. begin
  81541. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  81542. end;
  81543. procedure TCAN1_C1TREC.setTXBO; inline;
  81544. begin
  81545. pTDefRegMap(@Self)^.&set := $00200000;
  81546. end;
  81547. procedure TCAN1_C1TREC.clearTXBO; inline;
  81548. begin
  81549. pTDefRegMap(@Self)^.clr := $00200000;
  81550. end;
  81551. procedure TCAN1_C1TREC.setTXBO(thebits : TBits_1); inline;
  81552. begin
  81553. if thebits = 0 then
  81554. pTDefRegMap(@Self)^.clr := $00200000
  81555. else
  81556. pTDefRegMap(@Self)^.&set := $00200000;
  81557. end;
  81558. function TCAN1_C1TREC.getTXBO : TBits_1; inline;
  81559. begin
  81560. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  81561. end;
  81562. procedure TCAN1_C1TREC.setw(thebits : TBits_32); inline;
  81563. begin
  81564. pTDefRegMap(@Self)^.val := thebits;
  81565. end;
  81566. function TCAN1_C1TREC.getw : TBits_32; inline;
  81567. begin
  81568. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81569. end;
  81570. procedure TCAN1_C1FSTAT.setFIFOIP(thebits : TBits_32); inline;
  81571. begin
  81572. pTDefRegMap(@Self)^.val := thebits;
  81573. end;
  81574. function TCAN1_C1FSTAT.getFIFOIP : TBits_32; inline;
  81575. begin
  81576. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81577. end;
  81578. procedure TCAN1_C1FSTAT.setFIFOIP0; inline;
  81579. begin
  81580. pTDefRegMap(@Self)^.&set := $00000001;
  81581. end;
  81582. procedure TCAN1_C1FSTAT.clearFIFOIP0; inline;
  81583. begin
  81584. pTDefRegMap(@Self)^.clr := $00000001;
  81585. end;
  81586. procedure TCAN1_C1FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  81587. begin
  81588. if thebits = 0 then
  81589. pTDefRegMap(@Self)^.clr := $00000001
  81590. else
  81591. pTDefRegMap(@Self)^.&set := $00000001;
  81592. end;
  81593. function TCAN1_C1FSTAT.getFIFOIP0 : TBits_1; inline;
  81594. begin
  81595. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81596. end;
  81597. procedure TCAN1_C1FSTAT.setFIFOIP1; inline;
  81598. begin
  81599. pTDefRegMap(@Self)^.&set := $00000002;
  81600. end;
  81601. procedure TCAN1_C1FSTAT.clearFIFOIP1; inline;
  81602. begin
  81603. pTDefRegMap(@Self)^.clr := $00000002;
  81604. end;
  81605. procedure TCAN1_C1FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  81606. begin
  81607. if thebits = 0 then
  81608. pTDefRegMap(@Self)^.clr := $00000002
  81609. else
  81610. pTDefRegMap(@Self)^.&set := $00000002;
  81611. end;
  81612. function TCAN1_C1FSTAT.getFIFOIP1 : TBits_1; inline;
  81613. begin
  81614. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81615. end;
  81616. procedure TCAN1_C1FSTAT.setFIFOIP2; inline;
  81617. begin
  81618. pTDefRegMap(@Self)^.&set := $00000004;
  81619. end;
  81620. procedure TCAN1_C1FSTAT.clearFIFOIP2; inline;
  81621. begin
  81622. pTDefRegMap(@Self)^.clr := $00000004;
  81623. end;
  81624. procedure TCAN1_C1FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  81625. begin
  81626. if thebits = 0 then
  81627. pTDefRegMap(@Self)^.clr := $00000004
  81628. else
  81629. pTDefRegMap(@Self)^.&set := $00000004;
  81630. end;
  81631. function TCAN1_C1FSTAT.getFIFOIP2 : TBits_1; inline;
  81632. begin
  81633. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81634. end;
  81635. procedure TCAN1_C1FSTAT.setFIFOIP3; inline;
  81636. begin
  81637. pTDefRegMap(@Self)^.&set := $00000008;
  81638. end;
  81639. procedure TCAN1_C1FSTAT.clearFIFOIP3; inline;
  81640. begin
  81641. pTDefRegMap(@Self)^.clr := $00000008;
  81642. end;
  81643. procedure TCAN1_C1FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  81644. begin
  81645. if thebits = 0 then
  81646. pTDefRegMap(@Self)^.clr := $00000008
  81647. else
  81648. pTDefRegMap(@Self)^.&set := $00000008;
  81649. end;
  81650. function TCAN1_C1FSTAT.getFIFOIP3 : TBits_1; inline;
  81651. begin
  81652. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81653. end;
  81654. procedure TCAN1_C1FSTAT.setFIFOIP4; inline;
  81655. begin
  81656. pTDefRegMap(@Self)^.&set := $00000010;
  81657. end;
  81658. procedure TCAN1_C1FSTAT.clearFIFOIP4; inline;
  81659. begin
  81660. pTDefRegMap(@Self)^.clr := $00000010;
  81661. end;
  81662. procedure TCAN1_C1FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  81663. begin
  81664. if thebits = 0 then
  81665. pTDefRegMap(@Self)^.clr := $00000010
  81666. else
  81667. pTDefRegMap(@Self)^.&set := $00000010;
  81668. end;
  81669. function TCAN1_C1FSTAT.getFIFOIP4 : TBits_1; inline;
  81670. begin
  81671. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81672. end;
  81673. procedure TCAN1_C1FSTAT.setFIFOIP5; inline;
  81674. begin
  81675. pTDefRegMap(@Self)^.&set := $00000020;
  81676. end;
  81677. procedure TCAN1_C1FSTAT.clearFIFOIP5; inline;
  81678. begin
  81679. pTDefRegMap(@Self)^.clr := $00000020;
  81680. end;
  81681. procedure TCAN1_C1FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  81682. begin
  81683. if thebits = 0 then
  81684. pTDefRegMap(@Self)^.clr := $00000020
  81685. else
  81686. pTDefRegMap(@Self)^.&set := $00000020;
  81687. end;
  81688. function TCAN1_C1FSTAT.getFIFOIP5 : TBits_1; inline;
  81689. begin
  81690. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81691. end;
  81692. procedure TCAN1_C1FSTAT.setFIFOIP6; inline;
  81693. begin
  81694. pTDefRegMap(@Self)^.&set := $00000040;
  81695. end;
  81696. procedure TCAN1_C1FSTAT.clearFIFOIP6; inline;
  81697. begin
  81698. pTDefRegMap(@Self)^.clr := $00000040;
  81699. end;
  81700. procedure TCAN1_C1FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  81701. begin
  81702. if thebits = 0 then
  81703. pTDefRegMap(@Self)^.clr := $00000040
  81704. else
  81705. pTDefRegMap(@Self)^.&set := $00000040;
  81706. end;
  81707. function TCAN1_C1FSTAT.getFIFOIP6 : TBits_1; inline;
  81708. begin
  81709. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81710. end;
  81711. procedure TCAN1_C1FSTAT.setFIFOIP7; inline;
  81712. begin
  81713. pTDefRegMap(@Self)^.&set := $00000080;
  81714. end;
  81715. procedure TCAN1_C1FSTAT.clearFIFOIP7; inline;
  81716. begin
  81717. pTDefRegMap(@Self)^.clr := $00000080;
  81718. end;
  81719. procedure TCAN1_C1FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  81720. begin
  81721. if thebits = 0 then
  81722. pTDefRegMap(@Self)^.clr := $00000080
  81723. else
  81724. pTDefRegMap(@Self)^.&set := $00000080;
  81725. end;
  81726. function TCAN1_C1FSTAT.getFIFOIP7 : TBits_1; inline;
  81727. begin
  81728. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81729. end;
  81730. procedure TCAN1_C1FSTAT.setFIFOIP8; inline;
  81731. begin
  81732. pTDefRegMap(@Self)^.&set := $00000100;
  81733. end;
  81734. procedure TCAN1_C1FSTAT.clearFIFOIP8; inline;
  81735. begin
  81736. pTDefRegMap(@Self)^.clr := $00000100;
  81737. end;
  81738. procedure TCAN1_C1FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  81739. begin
  81740. if thebits = 0 then
  81741. pTDefRegMap(@Self)^.clr := $00000100
  81742. else
  81743. pTDefRegMap(@Self)^.&set := $00000100;
  81744. end;
  81745. function TCAN1_C1FSTAT.getFIFOIP8 : TBits_1; inline;
  81746. begin
  81747. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81748. end;
  81749. procedure TCAN1_C1FSTAT.setFIFOIP9; inline;
  81750. begin
  81751. pTDefRegMap(@Self)^.&set := $00000200;
  81752. end;
  81753. procedure TCAN1_C1FSTAT.clearFIFOIP9; inline;
  81754. begin
  81755. pTDefRegMap(@Self)^.clr := $00000200;
  81756. end;
  81757. procedure TCAN1_C1FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  81758. begin
  81759. if thebits = 0 then
  81760. pTDefRegMap(@Self)^.clr := $00000200
  81761. else
  81762. pTDefRegMap(@Self)^.&set := $00000200;
  81763. end;
  81764. function TCAN1_C1FSTAT.getFIFOIP9 : TBits_1; inline;
  81765. begin
  81766. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81767. end;
  81768. procedure TCAN1_C1FSTAT.setFIFOIP10; inline;
  81769. begin
  81770. pTDefRegMap(@Self)^.&set := $00000400;
  81771. end;
  81772. procedure TCAN1_C1FSTAT.clearFIFOIP10; inline;
  81773. begin
  81774. pTDefRegMap(@Self)^.clr := $00000400;
  81775. end;
  81776. procedure TCAN1_C1FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  81777. begin
  81778. if thebits = 0 then
  81779. pTDefRegMap(@Self)^.clr := $00000400
  81780. else
  81781. pTDefRegMap(@Self)^.&set := $00000400;
  81782. end;
  81783. function TCAN1_C1FSTAT.getFIFOIP10 : TBits_1; inline;
  81784. begin
  81785. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81786. end;
  81787. procedure TCAN1_C1FSTAT.setFIFOIP11; inline;
  81788. begin
  81789. pTDefRegMap(@Self)^.&set := $00000800;
  81790. end;
  81791. procedure TCAN1_C1FSTAT.clearFIFOIP11; inline;
  81792. begin
  81793. pTDefRegMap(@Self)^.clr := $00000800;
  81794. end;
  81795. procedure TCAN1_C1FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  81796. begin
  81797. if thebits = 0 then
  81798. pTDefRegMap(@Self)^.clr := $00000800
  81799. else
  81800. pTDefRegMap(@Self)^.&set := $00000800;
  81801. end;
  81802. function TCAN1_C1FSTAT.getFIFOIP11 : TBits_1; inline;
  81803. begin
  81804. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  81805. end;
  81806. procedure TCAN1_C1FSTAT.setFIFOIP12; inline;
  81807. begin
  81808. pTDefRegMap(@Self)^.&set := $00001000;
  81809. end;
  81810. procedure TCAN1_C1FSTAT.clearFIFOIP12; inline;
  81811. begin
  81812. pTDefRegMap(@Self)^.clr := $00001000;
  81813. end;
  81814. procedure TCAN1_C1FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  81815. begin
  81816. if thebits = 0 then
  81817. pTDefRegMap(@Self)^.clr := $00001000
  81818. else
  81819. pTDefRegMap(@Self)^.&set := $00001000;
  81820. end;
  81821. function TCAN1_C1FSTAT.getFIFOIP12 : TBits_1; inline;
  81822. begin
  81823. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81824. end;
  81825. procedure TCAN1_C1FSTAT.setFIFOIP13; inline;
  81826. begin
  81827. pTDefRegMap(@Self)^.&set := $00002000;
  81828. end;
  81829. procedure TCAN1_C1FSTAT.clearFIFOIP13; inline;
  81830. begin
  81831. pTDefRegMap(@Self)^.clr := $00002000;
  81832. end;
  81833. procedure TCAN1_C1FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  81834. begin
  81835. if thebits = 0 then
  81836. pTDefRegMap(@Self)^.clr := $00002000
  81837. else
  81838. pTDefRegMap(@Self)^.&set := $00002000;
  81839. end;
  81840. function TCAN1_C1FSTAT.getFIFOIP13 : TBits_1; inline;
  81841. begin
  81842. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81843. end;
  81844. procedure TCAN1_C1FSTAT.setFIFOIP14; inline;
  81845. begin
  81846. pTDefRegMap(@Self)^.&set := $00004000;
  81847. end;
  81848. procedure TCAN1_C1FSTAT.clearFIFOIP14; inline;
  81849. begin
  81850. pTDefRegMap(@Self)^.clr := $00004000;
  81851. end;
  81852. procedure TCAN1_C1FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  81853. begin
  81854. if thebits = 0 then
  81855. pTDefRegMap(@Self)^.clr := $00004000
  81856. else
  81857. pTDefRegMap(@Self)^.&set := $00004000;
  81858. end;
  81859. function TCAN1_C1FSTAT.getFIFOIP14 : TBits_1; inline;
  81860. begin
  81861. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81862. end;
  81863. procedure TCAN1_C1FSTAT.setFIFOIP15; inline;
  81864. begin
  81865. pTDefRegMap(@Self)^.&set := $00008000;
  81866. end;
  81867. procedure TCAN1_C1FSTAT.clearFIFOIP15; inline;
  81868. begin
  81869. pTDefRegMap(@Self)^.clr := $00008000;
  81870. end;
  81871. procedure TCAN1_C1FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  81872. begin
  81873. if thebits = 0 then
  81874. pTDefRegMap(@Self)^.clr := $00008000
  81875. else
  81876. pTDefRegMap(@Self)^.&set := $00008000;
  81877. end;
  81878. function TCAN1_C1FSTAT.getFIFOIP15 : TBits_1; inline;
  81879. begin
  81880. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  81881. end;
  81882. procedure TCAN1_C1FSTAT.setFIFOIP16; inline;
  81883. begin
  81884. pTDefRegMap(@Self)^.&set := $00010000;
  81885. end;
  81886. procedure TCAN1_C1FSTAT.clearFIFOIP16; inline;
  81887. begin
  81888. pTDefRegMap(@Self)^.clr := $00010000;
  81889. end;
  81890. procedure TCAN1_C1FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  81891. begin
  81892. if thebits = 0 then
  81893. pTDefRegMap(@Self)^.clr := $00010000
  81894. else
  81895. pTDefRegMap(@Self)^.&set := $00010000;
  81896. end;
  81897. function TCAN1_C1FSTAT.getFIFOIP16 : TBits_1; inline;
  81898. begin
  81899. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81900. end;
  81901. procedure TCAN1_C1FSTAT.setFIFOIP17; inline;
  81902. begin
  81903. pTDefRegMap(@Self)^.&set := $00020000;
  81904. end;
  81905. procedure TCAN1_C1FSTAT.clearFIFOIP17; inline;
  81906. begin
  81907. pTDefRegMap(@Self)^.clr := $00020000;
  81908. end;
  81909. procedure TCAN1_C1FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  81910. begin
  81911. if thebits = 0 then
  81912. pTDefRegMap(@Self)^.clr := $00020000
  81913. else
  81914. pTDefRegMap(@Self)^.&set := $00020000;
  81915. end;
  81916. function TCAN1_C1FSTAT.getFIFOIP17 : TBits_1; inline;
  81917. begin
  81918. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81919. end;
  81920. procedure TCAN1_C1FSTAT.setFIFOIP18; inline;
  81921. begin
  81922. pTDefRegMap(@Self)^.&set := $00040000;
  81923. end;
  81924. procedure TCAN1_C1FSTAT.clearFIFOIP18; inline;
  81925. begin
  81926. pTDefRegMap(@Self)^.clr := $00040000;
  81927. end;
  81928. procedure TCAN1_C1FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  81929. begin
  81930. if thebits = 0 then
  81931. pTDefRegMap(@Self)^.clr := $00040000
  81932. else
  81933. pTDefRegMap(@Self)^.&set := $00040000;
  81934. end;
  81935. function TCAN1_C1FSTAT.getFIFOIP18 : TBits_1; inline;
  81936. begin
  81937. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81938. end;
  81939. procedure TCAN1_C1FSTAT.setFIFOIP19; inline;
  81940. begin
  81941. pTDefRegMap(@Self)^.&set := $00080000;
  81942. end;
  81943. procedure TCAN1_C1FSTAT.clearFIFOIP19; inline;
  81944. begin
  81945. pTDefRegMap(@Self)^.clr := $00080000;
  81946. end;
  81947. procedure TCAN1_C1FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  81948. begin
  81949. if thebits = 0 then
  81950. pTDefRegMap(@Self)^.clr := $00080000
  81951. else
  81952. pTDefRegMap(@Self)^.&set := $00080000;
  81953. end;
  81954. function TCAN1_C1FSTAT.getFIFOIP19 : TBits_1; inline;
  81955. begin
  81956. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81957. end;
  81958. procedure TCAN1_C1FSTAT.setFIFOIP20; inline;
  81959. begin
  81960. pTDefRegMap(@Self)^.&set := $00100000;
  81961. end;
  81962. procedure TCAN1_C1FSTAT.clearFIFOIP20; inline;
  81963. begin
  81964. pTDefRegMap(@Self)^.clr := $00100000;
  81965. end;
  81966. procedure TCAN1_C1FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  81967. begin
  81968. if thebits = 0 then
  81969. pTDefRegMap(@Self)^.clr := $00100000
  81970. else
  81971. pTDefRegMap(@Self)^.&set := $00100000;
  81972. end;
  81973. function TCAN1_C1FSTAT.getFIFOIP20 : TBits_1; inline;
  81974. begin
  81975. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  81976. end;
  81977. procedure TCAN1_C1FSTAT.setFIFOIP21; inline;
  81978. begin
  81979. pTDefRegMap(@Self)^.&set := $00200000;
  81980. end;
  81981. procedure TCAN1_C1FSTAT.clearFIFOIP21; inline;
  81982. begin
  81983. pTDefRegMap(@Self)^.clr := $00200000;
  81984. end;
  81985. procedure TCAN1_C1FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  81986. begin
  81987. if thebits = 0 then
  81988. pTDefRegMap(@Self)^.clr := $00200000
  81989. else
  81990. pTDefRegMap(@Self)^.&set := $00200000;
  81991. end;
  81992. function TCAN1_C1FSTAT.getFIFOIP21 : TBits_1; inline;
  81993. begin
  81994. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  81995. end;
  81996. procedure TCAN1_C1FSTAT.setFIFOIP22; inline;
  81997. begin
  81998. pTDefRegMap(@Self)^.&set := $00400000;
  81999. end;
  82000. procedure TCAN1_C1FSTAT.clearFIFOIP22; inline;
  82001. begin
  82002. pTDefRegMap(@Self)^.clr := $00400000;
  82003. end;
  82004. procedure TCAN1_C1FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  82005. begin
  82006. if thebits = 0 then
  82007. pTDefRegMap(@Self)^.clr := $00400000
  82008. else
  82009. pTDefRegMap(@Self)^.&set := $00400000;
  82010. end;
  82011. function TCAN1_C1FSTAT.getFIFOIP22 : TBits_1; inline;
  82012. begin
  82013. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  82014. end;
  82015. procedure TCAN1_C1FSTAT.setFIFOIP23; inline;
  82016. begin
  82017. pTDefRegMap(@Self)^.&set := $00800000;
  82018. end;
  82019. procedure TCAN1_C1FSTAT.clearFIFOIP23; inline;
  82020. begin
  82021. pTDefRegMap(@Self)^.clr := $00800000;
  82022. end;
  82023. procedure TCAN1_C1FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  82024. begin
  82025. if thebits = 0 then
  82026. pTDefRegMap(@Self)^.clr := $00800000
  82027. else
  82028. pTDefRegMap(@Self)^.&set := $00800000;
  82029. end;
  82030. function TCAN1_C1FSTAT.getFIFOIP23 : TBits_1; inline;
  82031. begin
  82032. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  82033. end;
  82034. procedure TCAN1_C1FSTAT.setFIFOIP24; inline;
  82035. begin
  82036. pTDefRegMap(@Self)^.&set := $01000000;
  82037. end;
  82038. procedure TCAN1_C1FSTAT.clearFIFOIP24; inline;
  82039. begin
  82040. pTDefRegMap(@Self)^.clr := $01000000;
  82041. end;
  82042. procedure TCAN1_C1FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  82043. begin
  82044. if thebits = 0 then
  82045. pTDefRegMap(@Self)^.clr := $01000000
  82046. else
  82047. pTDefRegMap(@Self)^.&set := $01000000;
  82048. end;
  82049. function TCAN1_C1FSTAT.getFIFOIP24 : TBits_1; inline;
  82050. begin
  82051. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82052. end;
  82053. procedure TCAN1_C1FSTAT.setFIFOIP25; inline;
  82054. begin
  82055. pTDefRegMap(@Self)^.&set := $02000000;
  82056. end;
  82057. procedure TCAN1_C1FSTAT.clearFIFOIP25; inline;
  82058. begin
  82059. pTDefRegMap(@Self)^.clr := $02000000;
  82060. end;
  82061. procedure TCAN1_C1FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  82062. begin
  82063. if thebits = 0 then
  82064. pTDefRegMap(@Self)^.clr := $02000000
  82065. else
  82066. pTDefRegMap(@Self)^.&set := $02000000;
  82067. end;
  82068. function TCAN1_C1FSTAT.getFIFOIP25 : TBits_1; inline;
  82069. begin
  82070. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82071. end;
  82072. procedure TCAN1_C1FSTAT.setFIFOIP26; inline;
  82073. begin
  82074. pTDefRegMap(@Self)^.&set := $04000000;
  82075. end;
  82076. procedure TCAN1_C1FSTAT.clearFIFOIP26; inline;
  82077. begin
  82078. pTDefRegMap(@Self)^.clr := $04000000;
  82079. end;
  82080. procedure TCAN1_C1FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  82081. begin
  82082. if thebits = 0 then
  82083. pTDefRegMap(@Self)^.clr := $04000000
  82084. else
  82085. pTDefRegMap(@Self)^.&set := $04000000;
  82086. end;
  82087. function TCAN1_C1FSTAT.getFIFOIP26 : TBits_1; inline;
  82088. begin
  82089. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82090. end;
  82091. procedure TCAN1_C1FSTAT.setFIFOIP27; inline;
  82092. begin
  82093. pTDefRegMap(@Self)^.&set := $08000000;
  82094. end;
  82095. procedure TCAN1_C1FSTAT.clearFIFOIP27; inline;
  82096. begin
  82097. pTDefRegMap(@Self)^.clr := $08000000;
  82098. end;
  82099. procedure TCAN1_C1FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  82100. begin
  82101. if thebits = 0 then
  82102. pTDefRegMap(@Self)^.clr := $08000000
  82103. else
  82104. pTDefRegMap(@Self)^.&set := $08000000;
  82105. end;
  82106. function TCAN1_C1FSTAT.getFIFOIP27 : TBits_1; inline;
  82107. begin
  82108. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  82109. end;
  82110. procedure TCAN1_C1FSTAT.setFIFOIP28; inline;
  82111. begin
  82112. pTDefRegMap(@Self)^.&set := $10000000;
  82113. end;
  82114. procedure TCAN1_C1FSTAT.clearFIFOIP28; inline;
  82115. begin
  82116. pTDefRegMap(@Self)^.clr := $10000000;
  82117. end;
  82118. procedure TCAN1_C1FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  82119. begin
  82120. if thebits = 0 then
  82121. pTDefRegMap(@Self)^.clr := $10000000
  82122. else
  82123. pTDefRegMap(@Self)^.&set := $10000000;
  82124. end;
  82125. function TCAN1_C1FSTAT.getFIFOIP28 : TBits_1; inline;
  82126. begin
  82127. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  82128. end;
  82129. procedure TCAN1_C1FSTAT.setFIFOIP29; inline;
  82130. begin
  82131. pTDefRegMap(@Self)^.&set := $20000000;
  82132. end;
  82133. procedure TCAN1_C1FSTAT.clearFIFOIP29; inline;
  82134. begin
  82135. pTDefRegMap(@Self)^.clr := $20000000;
  82136. end;
  82137. procedure TCAN1_C1FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  82138. begin
  82139. if thebits = 0 then
  82140. pTDefRegMap(@Self)^.clr := $20000000
  82141. else
  82142. pTDefRegMap(@Self)^.&set := $20000000;
  82143. end;
  82144. function TCAN1_C1FSTAT.getFIFOIP29 : TBits_1; inline;
  82145. begin
  82146. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  82147. end;
  82148. procedure TCAN1_C1FSTAT.setFIFOIP30; inline;
  82149. begin
  82150. pTDefRegMap(@Self)^.&set := $40000000;
  82151. end;
  82152. procedure TCAN1_C1FSTAT.clearFIFOIP30; inline;
  82153. begin
  82154. pTDefRegMap(@Self)^.clr := $40000000;
  82155. end;
  82156. procedure TCAN1_C1FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  82157. begin
  82158. if thebits = 0 then
  82159. pTDefRegMap(@Self)^.clr := $40000000
  82160. else
  82161. pTDefRegMap(@Self)^.&set := $40000000;
  82162. end;
  82163. function TCAN1_C1FSTAT.getFIFOIP30 : TBits_1; inline;
  82164. begin
  82165. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  82166. end;
  82167. procedure TCAN1_C1FSTAT.setFIFOIP31; inline;
  82168. begin
  82169. pTDefRegMap(@Self)^.&set := $80000000;
  82170. end;
  82171. procedure TCAN1_C1FSTAT.clearFIFOIP31; inline;
  82172. begin
  82173. pTDefRegMap(@Self)^.clr := $80000000;
  82174. end;
  82175. procedure TCAN1_C1FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  82176. begin
  82177. if thebits = 0 then
  82178. pTDefRegMap(@Self)^.clr := $80000000
  82179. else
  82180. pTDefRegMap(@Self)^.&set := $80000000;
  82181. end;
  82182. function TCAN1_C1FSTAT.getFIFOIP31 : TBits_1; inline;
  82183. begin
  82184. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  82185. end;
  82186. procedure TCAN1_C1FSTAT.setw(thebits : TBits_32); inline;
  82187. begin
  82188. pTDefRegMap(@Self)^.val := thebits;
  82189. end;
  82190. function TCAN1_C1FSTAT.getw : TBits_32; inline;
  82191. begin
  82192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82193. end;
  82194. procedure TCAN1_C1RXOVF.setRXOVF(thebits : TBits_32); inline;
  82195. begin
  82196. pTDefRegMap(@Self)^.val := thebits;
  82197. end;
  82198. function TCAN1_C1RXOVF.getRXOVF : TBits_32; inline;
  82199. begin
  82200. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82201. end;
  82202. procedure TCAN1_C1RXOVF.setRXOVF0; inline;
  82203. begin
  82204. pTDefRegMap(@Self)^.&set := $00000001;
  82205. end;
  82206. procedure TCAN1_C1RXOVF.clearRXOVF0; inline;
  82207. begin
  82208. pTDefRegMap(@Self)^.clr := $00000001;
  82209. end;
  82210. procedure TCAN1_C1RXOVF.setRXOVF0(thebits : TBits_1); inline;
  82211. begin
  82212. if thebits = 0 then
  82213. pTDefRegMap(@Self)^.clr := $00000001
  82214. else
  82215. pTDefRegMap(@Self)^.&set := $00000001;
  82216. end;
  82217. function TCAN1_C1RXOVF.getRXOVF0 : TBits_1; inline;
  82218. begin
  82219. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82220. end;
  82221. procedure TCAN1_C1RXOVF.setRXOVF1; inline;
  82222. begin
  82223. pTDefRegMap(@Self)^.&set := $00000002;
  82224. end;
  82225. procedure TCAN1_C1RXOVF.clearRXOVF1; inline;
  82226. begin
  82227. pTDefRegMap(@Self)^.clr := $00000002;
  82228. end;
  82229. procedure TCAN1_C1RXOVF.setRXOVF1(thebits : TBits_1); inline;
  82230. begin
  82231. if thebits = 0 then
  82232. pTDefRegMap(@Self)^.clr := $00000002
  82233. else
  82234. pTDefRegMap(@Self)^.&set := $00000002;
  82235. end;
  82236. function TCAN1_C1RXOVF.getRXOVF1 : TBits_1; inline;
  82237. begin
  82238. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82239. end;
  82240. procedure TCAN1_C1RXOVF.setRXOVF2; inline;
  82241. begin
  82242. pTDefRegMap(@Self)^.&set := $00000004;
  82243. end;
  82244. procedure TCAN1_C1RXOVF.clearRXOVF2; inline;
  82245. begin
  82246. pTDefRegMap(@Self)^.clr := $00000004;
  82247. end;
  82248. procedure TCAN1_C1RXOVF.setRXOVF2(thebits : TBits_1); inline;
  82249. begin
  82250. if thebits = 0 then
  82251. pTDefRegMap(@Self)^.clr := $00000004
  82252. else
  82253. pTDefRegMap(@Self)^.&set := $00000004;
  82254. end;
  82255. function TCAN1_C1RXOVF.getRXOVF2 : TBits_1; inline;
  82256. begin
  82257. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82258. end;
  82259. procedure TCAN1_C1RXOVF.setRXOVF3; inline;
  82260. begin
  82261. pTDefRegMap(@Self)^.&set := $00000008;
  82262. end;
  82263. procedure TCAN1_C1RXOVF.clearRXOVF3; inline;
  82264. begin
  82265. pTDefRegMap(@Self)^.clr := $00000008;
  82266. end;
  82267. procedure TCAN1_C1RXOVF.setRXOVF3(thebits : TBits_1); inline;
  82268. begin
  82269. if thebits = 0 then
  82270. pTDefRegMap(@Self)^.clr := $00000008
  82271. else
  82272. pTDefRegMap(@Self)^.&set := $00000008;
  82273. end;
  82274. function TCAN1_C1RXOVF.getRXOVF3 : TBits_1; inline;
  82275. begin
  82276. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82277. end;
  82278. procedure TCAN1_C1RXOVF.setRXOVF4; inline;
  82279. begin
  82280. pTDefRegMap(@Self)^.&set := $00000010;
  82281. end;
  82282. procedure TCAN1_C1RXOVF.clearRXOVF4; inline;
  82283. begin
  82284. pTDefRegMap(@Self)^.clr := $00000010;
  82285. end;
  82286. procedure TCAN1_C1RXOVF.setRXOVF4(thebits : TBits_1); inline;
  82287. begin
  82288. if thebits = 0 then
  82289. pTDefRegMap(@Self)^.clr := $00000010
  82290. else
  82291. pTDefRegMap(@Self)^.&set := $00000010;
  82292. end;
  82293. function TCAN1_C1RXOVF.getRXOVF4 : TBits_1; inline;
  82294. begin
  82295. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82296. end;
  82297. procedure TCAN1_C1RXOVF.setRXOVF5; inline;
  82298. begin
  82299. pTDefRegMap(@Self)^.&set := $00000020;
  82300. end;
  82301. procedure TCAN1_C1RXOVF.clearRXOVF5; inline;
  82302. begin
  82303. pTDefRegMap(@Self)^.clr := $00000020;
  82304. end;
  82305. procedure TCAN1_C1RXOVF.setRXOVF5(thebits : TBits_1); inline;
  82306. begin
  82307. if thebits = 0 then
  82308. pTDefRegMap(@Self)^.clr := $00000020
  82309. else
  82310. pTDefRegMap(@Self)^.&set := $00000020;
  82311. end;
  82312. function TCAN1_C1RXOVF.getRXOVF5 : TBits_1; inline;
  82313. begin
  82314. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82315. end;
  82316. procedure TCAN1_C1RXOVF.setRXOVF6; inline;
  82317. begin
  82318. pTDefRegMap(@Self)^.&set := $00000040;
  82319. end;
  82320. procedure TCAN1_C1RXOVF.clearRXOVF6; inline;
  82321. begin
  82322. pTDefRegMap(@Self)^.clr := $00000040;
  82323. end;
  82324. procedure TCAN1_C1RXOVF.setRXOVF6(thebits : TBits_1); inline;
  82325. begin
  82326. if thebits = 0 then
  82327. pTDefRegMap(@Self)^.clr := $00000040
  82328. else
  82329. pTDefRegMap(@Self)^.&set := $00000040;
  82330. end;
  82331. function TCAN1_C1RXOVF.getRXOVF6 : TBits_1; inline;
  82332. begin
  82333. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82334. end;
  82335. procedure TCAN1_C1RXOVF.setRXOVF7; inline;
  82336. begin
  82337. pTDefRegMap(@Self)^.&set := $00000080;
  82338. end;
  82339. procedure TCAN1_C1RXOVF.clearRXOVF7; inline;
  82340. begin
  82341. pTDefRegMap(@Self)^.clr := $00000080;
  82342. end;
  82343. procedure TCAN1_C1RXOVF.setRXOVF7(thebits : TBits_1); inline;
  82344. begin
  82345. if thebits = 0 then
  82346. pTDefRegMap(@Self)^.clr := $00000080
  82347. else
  82348. pTDefRegMap(@Self)^.&set := $00000080;
  82349. end;
  82350. function TCAN1_C1RXOVF.getRXOVF7 : TBits_1; inline;
  82351. begin
  82352. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82353. end;
  82354. procedure TCAN1_C1RXOVF.setRXOVF8; inline;
  82355. begin
  82356. pTDefRegMap(@Self)^.&set := $00000100;
  82357. end;
  82358. procedure TCAN1_C1RXOVF.clearRXOVF8; inline;
  82359. begin
  82360. pTDefRegMap(@Self)^.clr := $00000100;
  82361. end;
  82362. procedure TCAN1_C1RXOVF.setRXOVF8(thebits : TBits_1); inline;
  82363. begin
  82364. if thebits = 0 then
  82365. pTDefRegMap(@Self)^.clr := $00000100
  82366. else
  82367. pTDefRegMap(@Self)^.&set := $00000100;
  82368. end;
  82369. function TCAN1_C1RXOVF.getRXOVF8 : TBits_1; inline;
  82370. begin
  82371. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82372. end;
  82373. procedure TCAN1_C1RXOVF.setRXOVF9; inline;
  82374. begin
  82375. pTDefRegMap(@Self)^.&set := $00000200;
  82376. end;
  82377. procedure TCAN1_C1RXOVF.clearRXOVF9; inline;
  82378. begin
  82379. pTDefRegMap(@Self)^.clr := $00000200;
  82380. end;
  82381. procedure TCAN1_C1RXOVF.setRXOVF9(thebits : TBits_1); inline;
  82382. begin
  82383. if thebits = 0 then
  82384. pTDefRegMap(@Self)^.clr := $00000200
  82385. else
  82386. pTDefRegMap(@Self)^.&set := $00000200;
  82387. end;
  82388. function TCAN1_C1RXOVF.getRXOVF9 : TBits_1; inline;
  82389. begin
  82390. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82391. end;
  82392. procedure TCAN1_C1RXOVF.setRXOVF10; inline;
  82393. begin
  82394. pTDefRegMap(@Self)^.&set := $00000400;
  82395. end;
  82396. procedure TCAN1_C1RXOVF.clearRXOVF10; inline;
  82397. begin
  82398. pTDefRegMap(@Self)^.clr := $00000400;
  82399. end;
  82400. procedure TCAN1_C1RXOVF.setRXOVF10(thebits : TBits_1); inline;
  82401. begin
  82402. if thebits = 0 then
  82403. pTDefRegMap(@Self)^.clr := $00000400
  82404. else
  82405. pTDefRegMap(@Self)^.&set := $00000400;
  82406. end;
  82407. function TCAN1_C1RXOVF.getRXOVF10 : TBits_1; inline;
  82408. begin
  82409. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82410. end;
  82411. procedure TCAN1_C1RXOVF.setRXOVF11; inline;
  82412. begin
  82413. pTDefRegMap(@Self)^.&set := $00000800;
  82414. end;
  82415. procedure TCAN1_C1RXOVF.clearRXOVF11; inline;
  82416. begin
  82417. pTDefRegMap(@Self)^.clr := $00000800;
  82418. end;
  82419. procedure TCAN1_C1RXOVF.setRXOVF11(thebits : TBits_1); inline;
  82420. begin
  82421. if thebits = 0 then
  82422. pTDefRegMap(@Self)^.clr := $00000800
  82423. else
  82424. pTDefRegMap(@Self)^.&set := $00000800;
  82425. end;
  82426. function TCAN1_C1RXOVF.getRXOVF11 : TBits_1; inline;
  82427. begin
  82428. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  82429. end;
  82430. procedure TCAN1_C1RXOVF.setRXOVF12; inline;
  82431. begin
  82432. pTDefRegMap(@Self)^.&set := $00001000;
  82433. end;
  82434. procedure TCAN1_C1RXOVF.clearRXOVF12; inline;
  82435. begin
  82436. pTDefRegMap(@Self)^.clr := $00001000;
  82437. end;
  82438. procedure TCAN1_C1RXOVF.setRXOVF12(thebits : TBits_1); inline;
  82439. begin
  82440. if thebits = 0 then
  82441. pTDefRegMap(@Self)^.clr := $00001000
  82442. else
  82443. pTDefRegMap(@Self)^.&set := $00001000;
  82444. end;
  82445. function TCAN1_C1RXOVF.getRXOVF12 : TBits_1; inline;
  82446. begin
  82447. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82448. end;
  82449. procedure TCAN1_C1RXOVF.setRXOVF13; inline;
  82450. begin
  82451. pTDefRegMap(@Self)^.&set := $00002000;
  82452. end;
  82453. procedure TCAN1_C1RXOVF.clearRXOVF13; inline;
  82454. begin
  82455. pTDefRegMap(@Self)^.clr := $00002000;
  82456. end;
  82457. procedure TCAN1_C1RXOVF.setRXOVF13(thebits : TBits_1); inline;
  82458. begin
  82459. if thebits = 0 then
  82460. pTDefRegMap(@Self)^.clr := $00002000
  82461. else
  82462. pTDefRegMap(@Self)^.&set := $00002000;
  82463. end;
  82464. function TCAN1_C1RXOVF.getRXOVF13 : TBits_1; inline;
  82465. begin
  82466. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82467. end;
  82468. procedure TCAN1_C1RXOVF.setRXOVF14; inline;
  82469. begin
  82470. pTDefRegMap(@Self)^.&set := $00004000;
  82471. end;
  82472. procedure TCAN1_C1RXOVF.clearRXOVF14; inline;
  82473. begin
  82474. pTDefRegMap(@Self)^.clr := $00004000;
  82475. end;
  82476. procedure TCAN1_C1RXOVF.setRXOVF14(thebits : TBits_1); inline;
  82477. begin
  82478. if thebits = 0 then
  82479. pTDefRegMap(@Self)^.clr := $00004000
  82480. else
  82481. pTDefRegMap(@Self)^.&set := $00004000;
  82482. end;
  82483. function TCAN1_C1RXOVF.getRXOVF14 : TBits_1; inline;
  82484. begin
  82485. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82486. end;
  82487. procedure TCAN1_C1RXOVF.setRXOVF15; inline;
  82488. begin
  82489. pTDefRegMap(@Self)^.&set := $00008000;
  82490. end;
  82491. procedure TCAN1_C1RXOVF.clearRXOVF15; inline;
  82492. begin
  82493. pTDefRegMap(@Self)^.clr := $00008000;
  82494. end;
  82495. procedure TCAN1_C1RXOVF.setRXOVF15(thebits : TBits_1); inline;
  82496. begin
  82497. if thebits = 0 then
  82498. pTDefRegMap(@Self)^.clr := $00008000
  82499. else
  82500. pTDefRegMap(@Self)^.&set := $00008000;
  82501. end;
  82502. function TCAN1_C1RXOVF.getRXOVF15 : TBits_1; inline;
  82503. begin
  82504. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  82505. end;
  82506. procedure TCAN1_C1RXOVF.setRXOVF16; inline;
  82507. begin
  82508. pTDefRegMap(@Self)^.&set := $00010000;
  82509. end;
  82510. procedure TCAN1_C1RXOVF.clearRXOVF16; inline;
  82511. begin
  82512. pTDefRegMap(@Self)^.clr := $00010000;
  82513. end;
  82514. procedure TCAN1_C1RXOVF.setRXOVF16(thebits : TBits_1); inline;
  82515. begin
  82516. if thebits = 0 then
  82517. pTDefRegMap(@Self)^.clr := $00010000
  82518. else
  82519. pTDefRegMap(@Self)^.&set := $00010000;
  82520. end;
  82521. function TCAN1_C1RXOVF.getRXOVF16 : TBits_1; inline;
  82522. begin
  82523. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82524. end;
  82525. procedure TCAN1_C1RXOVF.setRXOVF17; inline;
  82526. begin
  82527. pTDefRegMap(@Self)^.&set := $00020000;
  82528. end;
  82529. procedure TCAN1_C1RXOVF.clearRXOVF17; inline;
  82530. begin
  82531. pTDefRegMap(@Self)^.clr := $00020000;
  82532. end;
  82533. procedure TCAN1_C1RXOVF.setRXOVF17(thebits : TBits_1); inline;
  82534. begin
  82535. if thebits = 0 then
  82536. pTDefRegMap(@Self)^.clr := $00020000
  82537. else
  82538. pTDefRegMap(@Self)^.&set := $00020000;
  82539. end;
  82540. function TCAN1_C1RXOVF.getRXOVF17 : TBits_1; inline;
  82541. begin
  82542. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82543. end;
  82544. procedure TCAN1_C1RXOVF.setRXOVF18; inline;
  82545. begin
  82546. pTDefRegMap(@Self)^.&set := $00040000;
  82547. end;
  82548. procedure TCAN1_C1RXOVF.clearRXOVF18; inline;
  82549. begin
  82550. pTDefRegMap(@Self)^.clr := $00040000;
  82551. end;
  82552. procedure TCAN1_C1RXOVF.setRXOVF18(thebits : TBits_1); inline;
  82553. begin
  82554. if thebits = 0 then
  82555. pTDefRegMap(@Self)^.clr := $00040000
  82556. else
  82557. pTDefRegMap(@Self)^.&set := $00040000;
  82558. end;
  82559. function TCAN1_C1RXOVF.getRXOVF18 : TBits_1; inline;
  82560. begin
  82561. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82562. end;
  82563. procedure TCAN1_C1RXOVF.setRXOVF19; inline;
  82564. begin
  82565. pTDefRegMap(@Self)^.&set := $00080000;
  82566. end;
  82567. procedure TCAN1_C1RXOVF.clearRXOVF19; inline;
  82568. begin
  82569. pTDefRegMap(@Self)^.clr := $00080000;
  82570. end;
  82571. procedure TCAN1_C1RXOVF.setRXOVF19(thebits : TBits_1); inline;
  82572. begin
  82573. if thebits = 0 then
  82574. pTDefRegMap(@Self)^.clr := $00080000
  82575. else
  82576. pTDefRegMap(@Self)^.&set := $00080000;
  82577. end;
  82578. function TCAN1_C1RXOVF.getRXOVF19 : TBits_1; inline;
  82579. begin
  82580. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82581. end;
  82582. procedure TCAN1_C1RXOVF.setRXOVF20; inline;
  82583. begin
  82584. pTDefRegMap(@Self)^.&set := $00100000;
  82585. end;
  82586. procedure TCAN1_C1RXOVF.clearRXOVF20; inline;
  82587. begin
  82588. pTDefRegMap(@Self)^.clr := $00100000;
  82589. end;
  82590. procedure TCAN1_C1RXOVF.setRXOVF20(thebits : TBits_1); inline;
  82591. begin
  82592. if thebits = 0 then
  82593. pTDefRegMap(@Self)^.clr := $00100000
  82594. else
  82595. pTDefRegMap(@Self)^.&set := $00100000;
  82596. end;
  82597. function TCAN1_C1RXOVF.getRXOVF20 : TBits_1; inline;
  82598. begin
  82599. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  82600. end;
  82601. procedure TCAN1_C1RXOVF.setRXOVF21; inline;
  82602. begin
  82603. pTDefRegMap(@Self)^.&set := $00200000;
  82604. end;
  82605. procedure TCAN1_C1RXOVF.clearRXOVF21; inline;
  82606. begin
  82607. pTDefRegMap(@Self)^.clr := $00200000;
  82608. end;
  82609. procedure TCAN1_C1RXOVF.setRXOVF21(thebits : TBits_1); inline;
  82610. begin
  82611. if thebits = 0 then
  82612. pTDefRegMap(@Self)^.clr := $00200000
  82613. else
  82614. pTDefRegMap(@Self)^.&set := $00200000;
  82615. end;
  82616. function TCAN1_C1RXOVF.getRXOVF21 : TBits_1; inline;
  82617. begin
  82618. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  82619. end;
  82620. procedure TCAN1_C1RXOVF.setRXOVF22; inline;
  82621. begin
  82622. pTDefRegMap(@Self)^.&set := $00400000;
  82623. end;
  82624. procedure TCAN1_C1RXOVF.clearRXOVF22; inline;
  82625. begin
  82626. pTDefRegMap(@Self)^.clr := $00400000;
  82627. end;
  82628. procedure TCAN1_C1RXOVF.setRXOVF22(thebits : TBits_1); inline;
  82629. begin
  82630. if thebits = 0 then
  82631. pTDefRegMap(@Self)^.clr := $00400000
  82632. else
  82633. pTDefRegMap(@Self)^.&set := $00400000;
  82634. end;
  82635. function TCAN1_C1RXOVF.getRXOVF22 : TBits_1; inline;
  82636. begin
  82637. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  82638. end;
  82639. procedure TCAN1_C1RXOVF.setRXOVF23; inline;
  82640. begin
  82641. pTDefRegMap(@Self)^.&set := $00800000;
  82642. end;
  82643. procedure TCAN1_C1RXOVF.clearRXOVF23; inline;
  82644. begin
  82645. pTDefRegMap(@Self)^.clr := $00800000;
  82646. end;
  82647. procedure TCAN1_C1RXOVF.setRXOVF23(thebits : TBits_1); inline;
  82648. begin
  82649. if thebits = 0 then
  82650. pTDefRegMap(@Self)^.clr := $00800000
  82651. else
  82652. pTDefRegMap(@Self)^.&set := $00800000;
  82653. end;
  82654. function TCAN1_C1RXOVF.getRXOVF23 : TBits_1; inline;
  82655. begin
  82656. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  82657. end;
  82658. procedure TCAN1_C1RXOVF.setRXOVF24; inline;
  82659. begin
  82660. pTDefRegMap(@Self)^.&set := $01000000;
  82661. end;
  82662. procedure TCAN1_C1RXOVF.clearRXOVF24; inline;
  82663. begin
  82664. pTDefRegMap(@Self)^.clr := $01000000;
  82665. end;
  82666. procedure TCAN1_C1RXOVF.setRXOVF24(thebits : TBits_1); inline;
  82667. begin
  82668. if thebits = 0 then
  82669. pTDefRegMap(@Self)^.clr := $01000000
  82670. else
  82671. pTDefRegMap(@Self)^.&set := $01000000;
  82672. end;
  82673. function TCAN1_C1RXOVF.getRXOVF24 : TBits_1; inline;
  82674. begin
  82675. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82676. end;
  82677. procedure TCAN1_C1RXOVF.setRXOVF25; inline;
  82678. begin
  82679. pTDefRegMap(@Self)^.&set := $02000000;
  82680. end;
  82681. procedure TCAN1_C1RXOVF.clearRXOVF25; inline;
  82682. begin
  82683. pTDefRegMap(@Self)^.clr := $02000000;
  82684. end;
  82685. procedure TCAN1_C1RXOVF.setRXOVF25(thebits : TBits_1); inline;
  82686. begin
  82687. if thebits = 0 then
  82688. pTDefRegMap(@Self)^.clr := $02000000
  82689. else
  82690. pTDefRegMap(@Self)^.&set := $02000000;
  82691. end;
  82692. function TCAN1_C1RXOVF.getRXOVF25 : TBits_1; inline;
  82693. begin
  82694. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82695. end;
  82696. procedure TCAN1_C1RXOVF.setRXOVF26; inline;
  82697. begin
  82698. pTDefRegMap(@Self)^.&set := $04000000;
  82699. end;
  82700. procedure TCAN1_C1RXOVF.clearRXOVF26; inline;
  82701. begin
  82702. pTDefRegMap(@Self)^.clr := $04000000;
  82703. end;
  82704. procedure TCAN1_C1RXOVF.setRXOVF26(thebits : TBits_1); inline;
  82705. begin
  82706. if thebits = 0 then
  82707. pTDefRegMap(@Self)^.clr := $04000000
  82708. else
  82709. pTDefRegMap(@Self)^.&set := $04000000;
  82710. end;
  82711. function TCAN1_C1RXOVF.getRXOVF26 : TBits_1; inline;
  82712. begin
  82713. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82714. end;
  82715. procedure TCAN1_C1RXOVF.setRXOVF27; inline;
  82716. begin
  82717. pTDefRegMap(@Self)^.&set := $08000000;
  82718. end;
  82719. procedure TCAN1_C1RXOVF.clearRXOVF27; inline;
  82720. begin
  82721. pTDefRegMap(@Self)^.clr := $08000000;
  82722. end;
  82723. procedure TCAN1_C1RXOVF.setRXOVF27(thebits : TBits_1); inline;
  82724. begin
  82725. if thebits = 0 then
  82726. pTDefRegMap(@Self)^.clr := $08000000
  82727. else
  82728. pTDefRegMap(@Self)^.&set := $08000000;
  82729. end;
  82730. function TCAN1_C1RXOVF.getRXOVF27 : TBits_1; inline;
  82731. begin
  82732. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  82733. end;
  82734. procedure TCAN1_C1RXOVF.setRXOVF28; inline;
  82735. begin
  82736. pTDefRegMap(@Self)^.&set := $10000000;
  82737. end;
  82738. procedure TCAN1_C1RXOVF.clearRXOVF28; inline;
  82739. begin
  82740. pTDefRegMap(@Self)^.clr := $10000000;
  82741. end;
  82742. procedure TCAN1_C1RXOVF.setRXOVF28(thebits : TBits_1); inline;
  82743. begin
  82744. if thebits = 0 then
  82745. pTDefRegMap(@Self)^.clr := $10000000
  82746. else
  82747. pTDefRegMap(@Self)^.&set := $10000000;
  82748. end;
  82749. function TCAN1_C1RXOVF.getRXOVF28 : TBits_1; inline;
  82750. begin
  82751. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  82752. end;
  82753. procedure TCAN1_C1RXOVF.setRXOVF29; inline;
  82754. begin
  82755. pTDefRegMap(@Self)^.&set := $20000000;
  82756. end;
  82757. procedure TCAN1_C1RXOVF.clearRXOVF29; inline;
  82758. begin
  82759. pTDefRegMap(@Self)^.clr := $20000000;
  82760. end;
  82761. procedure TCAN1_C1RXOVF.setRXOVF29(thebits : TBits_1); inline;
  82762. begin
  82763. if thebits = 0 then
  82764. pTDefRegMap(@Self)^.clr := $20000000
  82765. else
  82766. pTDefRegMap(@Self)^.&set := $20000000;
  82767. end;
  82768. function TCAN1_C1RXOVF.getRXOVF29 : TBits_1; inline;
  82769. begin
  82770. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  82771. end;
  82772. procedure TCAN1_C1RXOVF.setRXOVF30; inline;
  82773. begin
  82774. pTDefRegMap(@Self)^.&set := $40000000;
  82775. end;
  82776. procedure TCAN1_C1RXOVF.clearRXOVF30; inline;
  82777. begin
  82778. pTDefRegMap(@Self)^.clr := $40000000;
  82779. end;
  82780. procedure TCAN1_C1RXOVF.setRXOVF30(thebits : TBits_1); inline;
  82781. begin
  82782. if thebits = 0 then
  82783. pTDefRegMap(@Self)^.clr := $40000000
  82784. else
  82785. pTDefRegMap(@Self)^.&set := $40000000;
  82786. end;
  82787. function TCAN1_C1RXOVF.getRXOVF30 : TBits_1; inline;
  82788. begin
  82789. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  82790. end;
  82791. procedure TCAN1_C1RXOVF.setRXOVF31; inline;
  82792. begin
  82793. pTDefRegMap(@Self)^.&set := $80000000;
  82794. end;
  82795. procedure TCAN1_C1RXOVF.clearRXOVF31; inline;
  82796. begin
  82797. pTDefRegMap(@Self)^.clr := $80000000;
  82798. end;
  82799. procedure TCAN1_C1RXOVF.setRXOVF31(thebits : TBits_1); inline;
  82800. begin
  82801. if thebits = 0 then
  82802. pTDefRegMap(@Self)^.clr := $80000000
  82803. else
  82804. pTDefRegMap(@Self)^.&set := $80000000;
  82805. end;
  82806. function TCAN1_C1RXOVF.getRXOVF31 : TBits_1; inline;
  82807. begin
  82808. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  82809. end;
  82810. procedure TCAN1_C1RXOVF.setw(thebits : TBits_32); inline;
  82811. begin
  82812. pTDefRegMap(@Self)^.val := thebits;
  82813. end;
  82814. function TCAN1_C1RXOVF.getw : TBits_32; inline;
  82815. begin
  82816. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82817. end;
  82818. procedure TCAN1_C1TMR.setCANTSPRE(thebits : TBits_16); inline;
  82819. begin
  82820. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  82821. end;
  82822. function TCAN1_C1TMR.getCANTSPRE : TBits_16; inline;
  82823. begin
  82824. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  82825. end;
  82826. procedure TCAN1_C1TMR.setCANTS(thebits : TBits_16); inline;
  82827. begin
  82828. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  82829. end;
  82830. function TCAN1_C1TMR.getCANTS : TBits_16; inline;
  82831. begin
  82832. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  82833. end;
  82834. procedure TCAN1_C1TMR.setw(thebits : TBits_32); inline;
  82835. begin
  82836. pTDefRegMap(@Self)^.val := thebits;
  82837. end;
  82838. function TCAN1_C1TMR.getw : TBits_32; inline;
  82839. begin
  82840. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82841. end;
  82842. procedure TCAN1_C1RXM0.setEID(thebits : TBits_18); inline;
  82843. begin
  82844. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  82845. end;
  82846. function TCAN1_C1RXM0.getEID : TBits_18; inline;
  82847. begin
  82848. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  82849. end;
  82850. procedure TCAN1_C1RXM0.setMIDE; inline;
  82851. begin
  82852. pTDefRegMap(@Self)^.&set := $00080000;
  82853. end;
  82854. procedure TCAN1_C1RXM0.clearMIDE; inline;
  82855. begin
  82856. pTDefRegMap(@Self)^.clr := $00080000;
  82857. end;
  82858. procedure TCAN1_C1RXM0.setMIDE(thebits : TBits_1); inline;
  82859. begin
  82860. if thebits = 0 then
  82861. pTDefRegMap(@Self)^.clr := $00080000
  82862. else
  82863. pTDefRegMap(@Self)^.&set := $00080000;
  82864. end;
  82865. function TCAN1_C1RXM0.getMIDE : TBits_1; inline;
  82866. begin
  82867. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82868. end;
  82869. procedure TCAN1_C1RXM0.setSID(thebits : TBits_11); inline;
  82870. begin
  82871. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  82872. end;
  82873. function TCAN1_C1RXM0.getSID : TBits_11; inline;
  82874. begin
  82875. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  82876. end;
  82877. procedure TCAN1_C1RXM0.setw(thebits : TBits_32); inline;
  82878. begin
  82879. pTDefRegMap(@Self)^.val := thebits;
  82880. end;
  82881. function TCAN1_C1RXM0.getw : TBits_32; inline;
  82882. begin
  82883. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82884. end;
  82885. procedure TCAN1_C1RXM1.setEID(thebits : TBits_18); inline;
  82886. begin
  82887. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  82888. end;
  82889. function TCAN1_C1RXM1.getEID : TBits_18; inline;
  82890. begin
  82891. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  82892. end;
  82893. procedure TCAN1_C1RXM1.setMIDE; inline;
  82894. begin
  82895. pTDefRegMap(@Self)^.&set := $00080000;
  82896. end;
  82897. procedure TCAN1_C1RXM1.clearMIDE; inline;
  82898. begin
  82899. pTDefRegMap(@Self)^.clr := $00080000;
  82900. end;
  82901. procedure TCAN1_C1RXM1.setMIDE(thebits : TBits_1); inline;
  82902. begin
  82903. if thebits = 0 then
  82904. pTDefRegMap(@Self)^.clr := $00080000
  82905. else
  82906. pTDefRegMap(@Self)^.&set := $00080000;
  82907. end;
  82908. function TCAN1_C1RXM1.getMIDE : TBits_1; inline;
  82909. begin
  82910. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82911. end;
  82912. procedure TCAN1_C1RXM1.setSID(thebits : TBits_11); inline;
  82913. begin
  82914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  82915. end;
  82916. function TCAN1_C1RXM1.getSID : TBits_11; inline;
  82917. begin
  82918. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  82919. end;
  82920. procedure TCAN1_C1RXM1.setw(thebits : TBits_32); inline;
  82921. begin
  82922. pTDefRegMap(@Self)^.val := thebits;
  82923. end;
  82924. function TCAN1_C1RXM1.getw : TBits_32; inline;
  82925. begin
  82926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82927. end;
  82928. procedure TCAN1_C1RXM2.setEID(thebits : TBits_18); inline;
  82929. begin
  82930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  82931. end;
  82932. function TCAN1_C1RXM2.getEID : TBits_18; inline;
  82933. begin
  82934. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  82935. end;
  82936. procedure TCAN1_C1RXM2.setMIDE; inline;
  82937. begin
  82938. pTDefRegMap(@Self)^.&set := $00080000;
  82939. end;
  82940. procedure TCAN1_C1RXM2.clearMIDE; inline;
  82941. begin
  82942. pTDefRegMap(@Self)^.clr := $00080000;
  82943. end;
  82944. procedure TCAN1_C1RXM2.setMIDE(thebits : TBits_1); inline;
  82945. begin
  82946. if thebits = 0 then
  82947. pTDefRegMap(@Self)^.clr := $00080000
  82948. else
  82949. pTDefRegMap(@Self)^.&set := $00080000;
  82950. end;
  82951. function TCAN1_C1RXM2.getMIDE : TBits_1; inline;
  82952. begin
  82953. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82954. end;
  82955. procedure TCAN1_C1RXM2.setSID(thebits : TBits_11); inline;
  82956. begin
  82957. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  82958. end;
  82959. function TCAN1_C1RXM2.getSID : TBits_11; inline;
  82960. begin
  82961. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  82962. end;
  82963. procedure TCAN1_C1RXM2.setw(thebits : TBits_32); inline;
  82964. begin
  82965. pTDefRegMap(@Self)^.val := thebits;
  82966. end;
  82967. function TCAN1_C1RXM2.getw : TBits_32; inline;
  82968. begin
  82969. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82970. end;
  82971. procedure TCAN1_C1RXM3.setEID(thebits : TBits_18); inline;
  82972. begin
  82973. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  82974. end;
  82975. function TCAN1_C1RXM3.getEID : TBits_18; inline;
  82976. begin
  82977. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  82978. end;
  82979. procedure TCAN1_C1RXM3.setMIDE; inline;
  82980. begin
  82981. pTDefRegMap(@Self)^.&set := $00080000;
  82982. end;
  82983. procedure TCAN1_C1RXM3.clearMIDE; inline;
  82984. begin
  82985. pTDefRegMap(@Self)^.clr := $00080000;
  82986. end;
  82987. procedure TCAN1_C1RXM3.setMIDE(thebits : TBits_1); inline;
  82988. begin
  82989. if thebits = 0 then
  82990. pTDefRegMap(@Self)^.clr := $00080000
  82991. else
  82992. pTDefRegMap(@Self)^.&set := $00080000;
  82993. end;
  82994. function TCAN1_C1RXM3.getMIDE : TBits_1; inline;
  82995. begin
  82996. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82997. end;
  82998. procedure TCAN1_C1RXM3.setSID(thebits : TBits_11); inline;
  82999. begin
  83000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  83001. end;
  83002. function TCAN1_C1RXM3.getSID : TBits_11; inline;
  83003. begin
  83004. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  83005. end;
  83006. procedure TCAN1_C1RXM3.setw(thebits : TBits_32); inline;
  83007. begin
  83008. pTDefRegMap(@Self)^.val := thebits;
  83009. end;
  83010. function TCAN1_C1RXM3.getw : TBits_32; inline;
  83011. begin
  83012. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83013. end;
  83014. procedure TCAN1_C1FLTCON0.setFSEL0(thebits : TBits_5); inline;
  83015. begin
  83016. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83017. end;
  83018. function TCAN1_C1FLTCON0.getFSEL0 : TBits_5; inline;
  83019. begin
  83020. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83021. end;
  83022. procedure TCAN1_C1FLTCON0.setMSEL0(thebits : TBits_2); inline;
  83023. begin
  83024. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83025. end;
  83026. function TCAN1_C1FLTCON0.getMSEL0 : TBits_2; inline;
  83027. begin
  83028. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83029. end;
  83030. procedure TCAN1_C1FLTCON0.setFLTEN0; inline;
  83031. begin
  83032. pTDefRegMap(@Self)^.&set := $00000080;
  83033. end;
  83034. procedure TCAN1_C1FLTCON0.clearFLTEN0; inline;
  83035. begin
  83036. pTDefRegMap(@Self)^.clr := $00000080;
  83037. end;
  83038. procedure TCAN1_C1FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  83039. begin
  83040. if thebits = 0 then
  83041. pTDefRegMap(@Self)^.clr := $00000080
  83042. else
  83043. pTDefRegMap(@Self)^.&set := $00000080;
  83044. end;
  83045. function TCAN1_C1FLTCON0.getFLTEN0 : TBits_1; inline;
  83046. begin
  83047. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83048. end;
  83049. procedure TCAN1_C1FLTCON0.setFSEL1(thebits : TBits_5); inline;
  83050. begin
  83051. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83052. end;
  83053. function TCAN1_C1FLTCON0.getFSEL1 : TBits_5; inline;
  83054. begin
  83055. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83056. end;
  83057. procedure TCAN1_C1FLTCON0.setMSEL1(thebits : TBits_2); inline;
  83058. begin
  83059. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83060. end;
  83061. function TCAN1_C1FLTCON0.getMSEL1 : TBits_2; inline;
  83062. begin
  83063. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83064. end;
  83065. procedure TCAN1_C1FLTCON0.setFLTEN1; inline;
  83066. begin
  83067. pTDefRegMap(@Self)^.&set := $00008000;
  83068. end;
  83069. procedure TCAN1_C1FLTCON0.clearFLTEN1; inline;
  83070. begin
  83071. pTDefRegMap(@Self)^.clr := $00008000;
  83072. end;
  83073. procedure TCAN1_C1FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  83074. begin
  83075. if thebits = 0 then
  83076. pTDefRegMap(@Self)^.clr := $00008000
  83077. else
  83078. pTDefRegMap(@Self)^.&set := $00008000;
  83079. end;
  83080. function TCAN1_C1FLTCON0.getFLTEN1 : TBits_1; inline;
  83081. begin
  83082. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83083. end;
  83084. procedure TCAN1_C1FLTCON0.setFSEL2(thebits : TBits_5); inline;
  83085. begin
  83086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83087. end;
  83088. function TCAN1_C1FLTCON0.getFSEL2 : TBits_5; inline;
  83089. begin
  83090. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83091. end;
  83092. procedure TCAN1_C1FLTCON0.setMSEL2(thebits : TBits_2); inline;
  83093. begin
  83094. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83095. end;
  83096. function TCAN1_C1FLTCON0.getMSEL2 : TBits_2; inline;
  83097. begin
  83098. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83099. end;
  83100. procedure TCAN1_C1FLTCON0.setFLTEN2; inline;
  83101. begin
  83102. pTDefRegMap(@Self)^.&set := $00800000;
  83103. end;
  83104. procedure TCAN1_C1FLTCON0.clearFLTEN2; inline;
  83105. begin
  83106. pTDefRegMap(@Self)^.clr := $00800000;
  83107. end;
  83108. procedure TCAN1_C1FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  83109. begin
  83110. if thebits = 0 then
  83111. pTDefRegMap(@Self)^.clr := $00800000
  83112. else
  83113. pTDefRegMap(@Self)^.&set := $00800000;
  83114. end;
  83115. function TCAN1_C1FLTCON0.getFLTEN2 : TBits_1; inline;
  83116. begin
  83117. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  83118. end;
  83119. procedure TCAN1_C1FLTCON0.setFSEL3(thebits : TBits_5); inline;
  83120. begin
  83121. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  83122. end;
  83123. function TCAN1_C1FLTCON0.getFSEL3 : TBits_5; inline;
  83124. begin
  83125. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  83126. end;
  83127. procedure TCAN1_C1FLTCON0.setMSEL3(thebits : TBits_2); inline;
  83128. begin
  83129. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  83130. end;
  83131. function TCAN1_C1FLTCON0.getMSEL3 : TBits_2; inline;
  83132. begin
  83133. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  83134. end;
  83135. procedure TCAN1_C1FLTCON0.setFLTEN3; inline;
  83136. begin
  83137. pTDefRegMap(@Self)^.&set := $80000000;
  83138. end;
  83139. procedure TCAN1_C1FLTCON0.clearFLTEN3; inline;
  83140. begin
  83141. pTDefRegMap(@Self)^.clr := $80000000;
  83142. end;
  83143. procedure TCAN1_C1FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  83144. begin
  83145. if thebits = 0 then
  83146. pTDefRegMap(@Self)^.clr := $80000000
  83147. else
  83148. pTDefRegMap(@Self)^.&set := $80000000;
  83149. end;
  83150. function TCAN1_C1FLTCON0.getFLTEN3 : TBits_1; inline;
  83151. begin
  83152. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  83153. end;
  83154. procedure TCAN1_C1FLTCON0.setw(thebits : TBits_32); inline;
  83155. begin
  83156. pTDefRegMap(@Self)^.val := thebits;
  83157. end;
  83158. function TCAN1_C1FLTCON0.getw : TBits_32; inline;
  83159. begin
  83160. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83161. end;
  83162. procedure TCAN1_C1FLTCON1.setFSEL4(thebits : TBits_5); inline;
  83163. begin
  83164. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83165. end;
  83166. function TCAN1_C1FLTCON1.getFSEL4 : TBits_5; inline;
  83167. begin
  83168. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83169. end;
  83170. procedure TCAN1_C1FLTCON1.setMSEL4(thebits : TBits_2); inline;
  83171. begin
  83172. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83173. end;
  83174. function TCAN1_C1FLTCON1.getMSEL4 : TBits_2; inline;
  83175. begin
  83176. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83177. end;
  83178. procedure TCAN1_C1FLTCON1.setFLTEN4; inline;
  83179. begin
  83180. pTDefRegMap(@Self)^.&set := $00000080;
  83181. end;
  83182. procedure TCAN1_C1FLTCON1.clearFLTEN4; inline;
  83183. begin
  83184. pTDefRegMap(@Self)^.clr := $00000080;
  83185. end;
  83186. procedure TCAN1_C1FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  83187. begin
  83188. if thebits = 0 then
  83189. pTDefRegMap(@Self)^.clr := $00000080
  83190. else
  83191. pTDefRegMap(@Self)^.&set := $00000080;
  83192. end;
  83193. function TCAN1_C1FLTCON1.getFLTEN4 : TBits_1; inline;
  83194. begin
  83195. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83196. end;
  83197. procedure TCAN1_C1FLTCON1.setFSEL5(thebits : TBits_5); inline;
  83198. begin
  83199. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83200. end;
  83201. function TCAN1_C1FLTCON1.getFSEL5 : TBits_5; inline;
  83202. begin
  83203. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83204. end;
  83205. procedure TCAN1_C1FLTCON1.setMSEL5(thebits : TBits_2); inline;
  83206. begin
  83207. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83208. end;
  83209. function TCAN1_C1FLTCON1.getMSEL5 : TBits_2; inline;
  83210. begin
  83211. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83212. end;
  83213. procedure TCAN1_C1FLTCON1.setFLTEN5; inline;
  83214. begin
  83215. pTDefRegMap(@Self)^.&set := $00008000;
  83216. end;
  83217. procedure TCAN1_C1FLTCON1.clearFLTEN5; inline;
  83218. begin
  83219. pTDefRegMap(@Self)^.clr := $00008000;
  83220. end;
  83221. procedure TCAN1_C1FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  83222. begin
  83223. if thebits = 0 then
  83224. pTDefRegMap(@Self)^.clr := $00008000
  83225. else
  83226. pTDefRegMap(@Self)^.&set := $00008000;
  83227. end;
  83228. function TCAN1_C1FLTCON1.getFLTEN5 : TBits_1; inline;
  83229. begin
  83230. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83231. end;
  83232. procedure TCAN1_C1FLTCON1.setFSEL6(thebits : TBits_5); inline;
  83233. begin
  83234. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83235. end;
  83236. function TCAN1_C1FLTCON1.getFSEL6 : TBits_5; inline;
  83237. begin
  83238. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83239. end;
  83240. procedure TCAN1_C1FLTCON1.setMSEL6(thebits : TBits_2); inline;
  83241. begin
  83242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83243. end;
  83244. function TCAN1_C1FLTCON1.getMSEL6 : TBits_2; inline;
  83245. begin
  83246. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83247. end;
  83248. procedure TCAN1_C1FLTCON1.setFLTEN6; inline;
  83249. begin
  83250. pTDefRegMap(@Self)^.&set := $00800000;
  83251. end;
  83252. procedure TCAN1_C1FLTCON1.clearFLTEN6; inline;
  83253. begin
  83254. pTDefRegMap(@Self)^.clr := $00800000;
  83255. end;
  83256. procedure TCAN1_C1FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  83257. begin
  83258. if thebits = 0 then
  83259. pTDefRegMap(@Self)^.clr := $00800000
  83260. else
  83261. pTDefRegMap(@Self)^.&set := $00800000;
  83262. end;
  83263. function TCAN1_C1FLTCON1.getFLTEN6 : TBits_1; inline;
  83264. begin
  83265. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  83266. end;
  83267. procedure TCAN1_C1FLTCON1.setFSEL7(thebits : TBits_5); inline;
  83268. begin
  83269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  83270. end;
  83271. function TCAN1_C1FLTCON1.getFSEL7 : TBits_5; inline;
  83272. begin
  83273. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  83274. end;
  83275. procedure TCAN1_C1FLTCON1.setMSEL7(thebits : TBits_2); inline;
  83276. begin
  83277. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  83278. end;
  83279. function TCAN1_C1FLTCON1.getMSEL7 : TBits_2; inline;
  83280. begin
  83281. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  83282. end;
  83283. procedure TCAN1_C1FLTCON1.setFLTEN7; inline;
  83284. begin
  83285. pTDefRegMap(@Self)^.&set := $80000000;
  83286. end;
  83287. procedure TCAN1_C1FLTCON1.clearFLTEN7; inline;
  83288. begin
  83289. pTDefRegMap(@Self)^.clr := $80000000;
  83290. end;
  83291. procedure TCAN1_C1FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  83292. begin
  83293. if thebits = 0 then
  83294. pTDefRegMap(@Self)^.clr := $80000000
  83295. else
  83296. pTDefRegMap(@Self)^.&set := $80000000;
  83297. end;
  83298. function TCAN1_C1FLTCON1.getFLTEN7 : TBits_1; inline;
  83299. begin
  83300. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  83301. end;
  83302. procedure TCAN1_C1FLTCON1.setw(thebits : TBits_32); inline;
  83303. begin
  83304. pTDefRegMap(@Self)^.val := thebits;
  83305. end;
  83306. function TCAN1_C1FLTCON1.getw : TBits_32; inline;
  83307. begin
  83308. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83309. end;
  83310. procedure TCAN1_C1FLTCON2.setFSEL8(thebits : TBits_5); inline;
  83311. begin
  83312. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83313. end;
  83314. function TCAN1_C1FLTCON2.getFSEL8 : TBits_5; inline;
  83315. begin
  83316. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83317. end;
  83318. procedure TCAN1_C1FLTCON2.setMSEL8(thebits : TBits_2); inline;
  83319. begin
  83320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83321. end;
  83322. function TCAN1_C1FLTCON2.getMSEL8 : TBits_2; inline;
  83323. begin
  83324. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83325. end;
  83326. procedure TCAN1_C1FLTCON2.setFLTEN8; inline;
  83327. begin
  83328. pTDefRegMap(@Self)^.&set := $00000080;
  83329. end;
  83330. procedure TCAN1_C1FLTCON2.clearFLTEN8; inline;
  83331. begin
  83332. pTDefRegMap(@Self)^.clr := $00000080;
  83333. end;
  83334. procedure TCAN1_C1FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  83335. begin
  83336. if thebits = 0 then
  83337. pTDefRegMap(@Self)^.clr := $00000080
  83338. else
  83339. pTDefRegMap(@Self)^.&set := $00000080;
  83340. end;
  83341. function TCAN1_C1FLTCON2.getFLTEN8 : TBits_1; inline;
  83342. begin
  83343. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83344. end;
  83345. procedure TCAN1_C1FLTCON2.setFSEL9(thebits : TBits_5); inline;
  83346. begin
  83347. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83348. end;
  83349. function TCAN1_C1FLTCON2.getFSEL9 : TBits_5; inline;
  83350. begin
  83351. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83352. end;
  83353. procedure TCAN1_C1FLTCON2.setMSEL9(thebits : TBits_2); inline;
  83354. begin
  83355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83356. end;
  83357. function TCAN1_C1FLTCON2.getMSEL9 : TBits_2; inline;
  83358. begin
  83359. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83360. end;
  83361. procedure TCAN1_C1FLTCON2.setFLTEN9; inline;
  83362. begin
  83363. pTDefRegMap(@Self)^.&set := $00008000;
  83364. end;
  83365. procedure TCAN1_C1FLTCON2.clearFLTEN9; inline;
  83366. begin
  83367. pTDefRegMap(@Self)^.clr := $00008000;
  83368. end;
  83369. procedure TCAN1_C1FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  83370. begin
  83371. if thebits = 0 then
  83372. pTDefRegMap(@Self)^.clr := $00008000
  83373. else
  83374. pTDefRegMap(@Self)^.&set := $00008000;
  83375. end;
  83376. function TCAN1_C1FLTCON2.getFLTEN9 : TBits_1; inline;
  83377. begin
  83378. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83379. end;
  83380. procedure TCAN1_C1FLTCON2.setFSEL10(thebits : TBits_5); inline;
  83381. begin
  83382. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83383. end;
  83384. function TCAN1_C1FLTCON2.getFSEL10 : TBits_5; inline;
  83385. begin
  83386. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83387. end;
  83388. procedure TCAN1_C1FLTCON2.setMSEL10(thebits : TBits_2); inline;
  83389. begin
  83390. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83391. end;
  83392. function TCAN1_C1FLTCON2.getMSEL10 : TBits_2; inline;
  83393. begin
  83394. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83395. end;
  83396. procedure TCAN1_C1FLTCON2.setFLTEN10; inline;
  83397. begin
  83398. pTDefRegMap(@Self)^.&set := $00800000;
  83399. end;
  83400. procedure TCAN1_C1FLTCON2.clearFLTEN10; inline;
  83401. begin
  83402. pTDefRegMap(@Self)^.clr := $00800000;
  83403. end;
  83404. procedure TCAN1_C1FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  83405. begin
  83406. if thebits = 0 then
  83407. pTDefRegMap(@Self)^.clr := $00800000
  83408. else
  83409. pTDefRegMap(@Self)^.&set := $00800000;
  83410. end;
  83411. function TCAN1_C1FLTCON2.getFLTEN10 : TBits_1; inline;
  83412. begin
  83413. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  83414. end;
  83415. procedure TCAN1_C1FLTCON2.setFSEL11(thebits : TBits_5); inline;
  83416. begin
  83417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  83418. end;
  83419. function TCAN1_C1FLTCON2.getFSEL11 : TBits_5; inline;
  83420. begin
  83421. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  83422. end;
  83423. procedure TCAN1_C1FLTCON2.setMSEL11(thebits : TBits_2); inline;
  83424. begin
  83425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  83426. end;
  83427. function TCAN1_C1FLTCON2.getMSEL11 : TBits_2; inline;
  83428. begin
  83429. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  83430. end;
  83431. procedure TCAN1_C1FLTCON2.setFLTEN11; inline;
  83432. begin
  83433. pTDefRegMap(@Self)^.&set := $80000000;
  83434. end;
  83435. procedure TCAN1_C1FLTCON2.clearFLTEN11; inline;
  83436. begin
  83437. pTDefRegMap(@Self)^.clr := $80000000;
  83438. end;
  83439. procedure TCAN1_C1FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  83440. begin
  83441. if thebits = 0 then
  83442. pTDefRegMap(@Self)^.clr := $80000000
  83443. else
  83444. pTDefRegMap(@Self)^.&set := $80000000;
  83445. end;
  83446. function TCAN1_C1FLTCON2.getFLTEN11 : TBits_1; inline;
  83447. begin
  83448. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  83449. end;
  83450. procedure TCAN1_C1FLTCON2.setw(thebits : TBits_32); inline;
  83451. begin
  83452. pTDefRegMap(@Self)^.val := thebits;
  83453. end;
  83454. function TCAN1_C1FLTCON2.getw : TBits_32; inline;
  83455. begin
  83456. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83457. end;
  83458. procedure TCAN1_C1FLTCON3.setFSEL12(thebits : TBits_5); inline;
  83459. begin
  83460. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83461. end;
  83462. function TCAN1_C1FLTCON3.getFSEL12 : TBits_5; inline;
  83463. begin
  83464. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83465. end;
  83466. procedure TCAN1_C1FLTCON3.setMSEL12(thebits : TBits_2); inline;
  83467. begin
  83468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83469. end;
  83470. function TCAN1_C1FLTCON3.getMSEL12 : TBits_2; inline;
  83471. begin
  83472. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83473. end;
  83474. procedure TCAN1_C1FLTCON3.setFLTEN12; inline;
  83475. begin
  83476. pTDefRegMap(@Self)^.&set := $00000080;
  83477. end;
  83478. procedure TCAN1_C1FLTCON3.clearFLTEN12; inline;
  83479. begin
  83480. pTDefRegMap(@Self)^.clr := $00000080;
  83481. end;
  83482. procedure TCAN1_C1FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  83483. begin
  83484. if thebits = 0 then
  83485. pTDefRegMap(@Self)^.clr := $00000080
  83486. else
  83487. pTDefRegMap(@Self)^.&set := $00000080;
  83488. end;
  83489. function TCAN1_C1FLTCON3.getFLTEN12 : TBits_1; inline;
  83490. begin
  83491. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83492. end;
  83493. procedure TCAN1_C1FLTCON3.setFSEL13(thebits : TBits_5); inline;
  83494. begin
  83495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83496. end;
  83497. function TCAN1_C1FLTCON3.getFSEL13 : TBits_5; inline;
  83498. begin
  83499. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83500. end;
  83501. procedure TCAN1_C1FLTCON3.setMSEL13(thebits : TBits_2); inline;
  83502. begin
  83503. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83504. end;
  83505. function TCAN1_C1FLTCON3.getMSEL13 : TBits_2; inline;
  83506. begin
  83507. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83508. end;
  83509. procedure TCAN1_C1FLTCON3.setFLTEN13; inline;
  83510. begin
  83511. pTDefRegMap(@Self)^.&set := $00008000;
  83512. end;
  83513. procedure TCAN1_C1FLTCON3.clearFLTEN13; inline;
  83514. begin
  83515. pTDefRegMap(@Self)^.clr := $00008000;
  83516. end;
  83517. procedure TCAN1_C1FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  83518. begin
  83519. if thebits = 0 then
  83520. pTDefRegMap(@Self)^.clr := $00008000
  83521. else
  83522. pTDefRegMap(@Self)^.&set := $00008000;
  83523. end;
  83524. function TCAN1_C1FLTCON3.getFLTEN13 : TBits_1; inline;
  83525. begin
  83526. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83527. end;
  83528. procedure TCAN1_C1FLTCON3.setFSEL14(thebits : TBits_5); inline;
  83529. begin
  83530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83531. end;
  83532. function TCAN1_C1FLTCON3.getFSEL14 : TBits_5; inline;
  83533. begin
  83534. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83535. end;
  83536. procedure TCAN1_C1FLTCON3.setMSEL14(thebits : TBits_2); inline;
  83537. begin
  83538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83539. end;
  83540. function TCAN1_C1FLTCON3.getMSEL14 : TBits_2; inline;
  83541. begin
  83542. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83543. end;
  83544. procedure TCAN1_C1FLTCON3.setFLTEN14; inline;
  83545. begin
  83546. pTDefRegMap(@Self)^.&set := $00800000;
  83547. end;
  83548. procedure TCAN1_C1FLTCON3.clearFLTEN14; inline;
  83549. begin
  83550. pTDefRegMap(@Self)^.clr := $00800000;
  83551. end;
  83552. procedure TCAN1_C1FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  83553. begin
  83554. if thebits = 0 then
  83555. pTDefRegMap(@Self)^.clr := $00800000
  83556. else
  83557. pTDefRegMap(@Self)^.&set := $00800000;
  83558. end;
  83559. function TCAN1_C1FLTCON3.getFLTEN14 : TBits_1; inline;
  83560. begin
  83561. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  83562. end;
  83563. procedure TCAN1_C1FLTCON3.setFSEL15(thebits : TBits_5); inline;
  83564. begin
  83565. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  83566. end;
  83567. function TCAN1_C1FLTCON3.getFSEL15 : TBits_5; inline;
  83568. begin
  83569. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  83570. end;
  83571. procedure TCAN1_C1FLTCON3.setMSEL15(thebits : TBits_2); inline;
  83572. begin
  83573. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  83574. end;
  83575. function TCAN1_C1FLTCON3.getMSEL15 : TBits_2; inline;
  83576. begin
  83577. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  83578. end;
  83579. procedure TCAN1_C1FLTCON3.setFLTEN15; inline;
  83580. begin
  83581. pTDefRegMap(@Self)^.&set := $80000000;
  83582. end;
  83583. procedure TCAN1_C1FLTCON3.clearFLTEN15; inline;
  83584. begin
  83585. pTDefRegMap(@Self)^.clr := $80000000;
  83586. end;
  83587. procedure TCAN1_C1FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  83588. begin
  83589. if thebits = 0 then
  83590. pTDefRegMap(@Self)^.clr := $80000000
  83591. else
  83592. pTDefRegMap(@Self)^.&set := $80000000;
  83593. end;
  83594. function TCAN1_C1FLTCON3.getFLTEN15 : TBits_1; inline;
  83595. begin
  83596. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  83597. end;
  83598. procedure TCAN1_C1FLTCON3.setw(thebits : TBits_32); inline;
  83599. begin
  83600. pTDefRegMap(@Self)^.val := thebits;
  83601. end;
  83602. function TCAN1_C1FLTCON3.getw : TBits_32; inline;
  83603. begin
  83604. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83605. end;
  83606. procedure TCAN1_C1FLTCON4.setFSEL16(thebits : TBits_5); inline;
  83607. begin
  83608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83609. end;
  83610. function TCAN1_C1FLTCON4.getFSEL16 : TBits_5; inline;
  83611. begin
  83612. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83613. end;
  83614. procedure TCAN1_C1FLTCON4.setMSEL16(thebits : TBits_2); inline;
  83615. begin
  83616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83617. end;
  83618. function TCAN1_C1FLTCON4.getMSEL16 : TBits_2; inline;
  83619. begin
  83620. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83621. end;
  83622. procedure TCAN1_C1FLTCON4.setFLTEN16; inline;
  83623. begin
  83624. pTDefRegMap(@Self)^.&set := $00000080;
  83625. end;
  83626. procedure TCAN1_C1FLTCON4.clearFLTEN16; inline;
  83627. begin
  83628. pTDefRegMap(@Self)^.clr := $00000080;
  83629. end;
  83630. procedure TCAN1_C1FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  83631. begin
  83632. if thebits = 0 then
  83633. pTDefRegMap(@Self)^.clr := $00000080
  83634. else
  83635. pTDefRegMap(@Self)^.&set := $00000080;
  83636. end;
  83637. function TCAN1_C1FLTCON4.getFLTEN16 : TBits_1; inline;
  83638. begin
  83639. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83640. end;
  83641. procedure TCAN1_C1FLTCON4.setFSEL17(thebits : TBits_5); inline;
  83642. begin
  83643. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83644. end;
  83645. function TCAN1_C1FLTCON4.getFSEL17 : TBits_5; inline;
  83646. begin
  83647. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83648. end;
  83649. procedure TCAN1_C1FLTCON4.setMSEL17(thebits : TBits_2); inline;
  83650. begin
  83651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83652. end;
  83653. function TCAN1_C1FLTCON4.getMSEL17 : TBits_2; inline;
  83654. begin
  83655. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83656. end;
  83657. procedure TCAN1_C1FLTCON4.setFLTEN17; inline;
  83658. begin
  83659. pTDefRegMap(@Self)^.&set := $00008000;
  83660. end;
  83661. procedure TCAN1_C1FLTCON4.clearFLTEN17; inline;
  83662. begin
  83663. pTDefRegMap(@Self)^.clr := $00008000;
  83664. end;
  83665. procedure TCAN1_C1FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  83666. begin
  83667. if thebits = 0 then
  83668. pTDefRegMap(@Self)^.clr := $00008000
  83669. else
  83670. pTDefRegMap(@Self)^.&set := $00008000;
  83671. end;
  83672. function TCAN1_C1FLTCON4.getFLTEN17 : TBits_1; inline;
  83673. begin
  83674. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83675. end;
  83676. procedure TCAN1_C1FLTCON4.setFSEL18(thebits : TBits_5); inline;
  83677. begin
  83678. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83679. end;
  83680. function TCAN1_C1FLTCON4.getFSEL18 : TBits_5; inline;
  83681. begin
  83682. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83683. end;
  83684. procedure TCAN1_C1FLTCON4.setMSEL18(thebits : TBits_2); inline;
  83685. begin
  83686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83687. end;
  83688. function TCAN1_C1FLTCON4.getMSEL18 : TBits_2; inline;
  83689. begin
  83690. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83691. end;
  83692. procedure TCAN1_C1FLTCON4.setFLTEN18; inline;
  83693. begin
  83694. pTDefRegMap(@Self)^.&set := $00800000;
  83695. end;
  83696. procedure TCAN1_C1FLTCON4.clearFLTEN18; inline;
  83697. begin
  83698. pTDefRegMap(@Self)^.clr := $00800000;
  83699. end;
  83700. procedure TCAN1_C1FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  83701. begin
  83702. if thebits = 0 then
  83703. pTDefRegMap(@Self)^.clr := $00800000
  83704. else
  83705. pTDefRegMap(@Self)^.&set := $00800000;
  83706. end;
  83707. function TCAN1_C1FLTCON4.getFLTEN18 : TBits_1; inline;
  83708. begin
  83709. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  83710. end;
  83711. procedure TCAN1_C1FLTCON4.setFSEL19(thebits : TBits_5); inline;
  83712. begin
  83713. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  83714. end;
  83715. function TCAN1_C1FLTCON4.getFSEL19 : TBits_5; inline;
  83716. begin
  83717. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  83718. end;
  83719. procedure TCAN1_C1FLTCON4.setMSEL19(thebits : TBits_2); inline;
  83720. begin
  83721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  83722. end;
  83723. function TCAN1_C1FLTCON4.getMSEL19 : TBits_2; inline;
  83724. begin
  83725. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  83726. end;
  83727. procedure TCAN1_C1FLTCON4.setFLTEN19; inline;
  83728. begin
  83729. pTDefRegMap(@Self)^.&set := $80000000;
  83730. end;
  83731. procedure TCAN1_C1FLTCON4.clearFLTEN19; inline;
  83732. begin
  83733. pTDefRegMap(@Self)^.clr := $80000000;
  83734. end;
  83735. procedure TCAN1_C1FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  83736. begin
  83737. if thebits = 0 then
  83738. pTDefRegMap(@Self)^.clr := $80000000
  83739. else
  83740. pTDefRegMap(@Self)^.&set := $80000000;
  83741. end;
  83742. function TCAN1_C1FLTCON4.getFLTEN19 : TBits_1; inline;
  83743. begin
  83744. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  83745. end;
  83746. procedure TCAN1_C1FLTCON4.setw(thebits : TBits_32); inline;
  83747. begin
  83748. pTDefRegMap(@Self)^.val := thebits;
  83749. end;
  83750. function TCAN1_C1FLTCON4.getw : TBits_32; inline;
  83751. begin
  83752. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83753. end;
  83754. procedure TCAN1_C1FLTCON5.setFSEL20(thebits : TBits_5); inline;
  83755. begin
  83756. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83757. end;
  83758. function TCAN1_C1FLTCON5.getFSEL20 : TBits_5; inline;
  83759. begin
  83760. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83761. end;
  83762. procedure TCAN1_C1FLTCON5.setMSEL20(thebits : TBits_2); inline;
  83763. begin
  83764. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83765. end;
  83766. function TCAN1_C1FLTCON5.getMSEL20 : TBits_2; inline;
  83767. begin
  83768. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83769. end;
  83770. procedure TCAN1_C1FLTCON5.setFLTEN20; inline;
  83771. begin
  83772. pTDefRegMap(@Self)^.&set := $00000080;
  83773. end;
  83774. procedure TCAN1_C1FLTCON5.clearFLTEN20; inline;
  83775. begin
  83776. pTDefRegMap(@Self)^.clr := $00000080;
  83777. end;
  83778. procedure TCAN1_C1FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  83779. begin
  83780. if thebits = 0 then
  83781. pTDefRegMap(@Self)^.clr := $00000080
  83782. else
  83783. pTDefRegMap(@Self)^.&set := $00000080;
  83784. end;
  83785. function TCAN1_C1FLTCON5.getFLTEN20 : TBits_1; inline;
  83786. begin
  83787. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83788. end;
  83789. procedure TCAN1_C1FLTCON5.setFSEL21(thebits : TBits_5); inline;
  83790. begin
  83791. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83792. end;
  83793. function TCAN1_C1FLTCON5.getFSEL21 : TBits_5; inline;
  83794. begin
  83795. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83796. end;
  83797. procedure TCAN1_C1FLTCON5.setMSEL21(thebits : TBits_2); inline;
  83798. begin
  83799. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83800. end;
  83801. function TCAN1_C1FLTCON5.getMSEL21 : TBits_2; inline;
  83802. begin
  83803. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83804. end;
  83805. procedure TCAN1_C1FLTCON5.setFLTEN21; inline;
  83806. begin
  83807. pTDefRegMap(@Self)^.&set := $00008000;
  83808. end;
  83809. procedure TCAN1_C1FLTCON5.clearFLTEN21; inline;
  83810. begin
  83811. pTDefRegMap(@Self)^.clr := $00008000;
  83812. end;
  83813. procedure TCAN1_C1FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  83814. begin
  83815. if thebits = 0 then
  83816. pTDefRegMap(@Self)^.clr := $00008000
  83817. else
  83818. pTDefRegMap(@Self)^.&set := $00008000;
  83819. end;
  83820. function TCAN1_C1FLTCON5.getFLTEN21 : TBits_1; inline;
  83821. begin
  83822. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83823. end;
  83824. procedure TCAN1_C1FLTCON5.setFSEL22(thebits : TBits_5); inline;
  83825. begin
  83826. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83827. end;
  83828. function TCAN1_C1FLTCON5.getFSEL22 : TBits_5; inline;
  83829. begin
  83830. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83831. end;
  83832. procedure TCAN1_C1FLTCON5.setMSEL22(thebits : TBits_2); inline;
  83833. begin
  83834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83835. end;
  83836. function TCAN1_C1FLTCON5.getMSEL22 : TBits_2; inline;
  83837. begin
  83838. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83839. end;
  83840. procedure TCAN1_C1FLTCON5.setFLTEN22; inline;
  83841. begin
  83842. pTDefRegMap(@Self)^.&set := $00800000;
  83843. end;
  83844. procedure TCAN1_C1FLTCON5.clearFLTEN22; inline;
  83845. begin
  83846. pTDefRegMap(@Self)^.clr := $00800000;
  83847. end;
  83848. procedure TCAN1_C1FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  83849. begin
  83850. if thebits = 0 then
  83851. pTDefRegMap(@Self)^.clr := $00800000
  83852. else
  83853. pTDefRegMap(@Self)^.&set := $00800000;
  83854. end;
  83855. function TCAN1_C1FLTCON5.getFLTEN22 : TBits_1; inline;
  83856. begin
  83857. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  83858. end;
  83859. procedure TCAN1_C1FLTCON5.setFSEL23(thebits : TBits_5); inline;
  83860. begin
  83861. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  83862. end;
  83863. function TCAN1_C1FLTCON5.getFSEL23 : TBits_5; inline;
  83864. begin
  83865. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  83866. end;
  83867. procedure TCAN1_C1FLTCON5.setMSEL23(thebits : TBits_2); inline;
  83868. begin
  83869. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  83870. end;
  83871. function TCAN1_C1FLTCON5.getMSEL23 : TBits_2; inline;
  83872. begin
  83873. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  83874. end;
  83875. procedure TCAN1_C1FLTCON5.setFLTEN23; inline;
  83876. begin
  83877. pTDefRegMap(@Self)^.&set := $80000000;
  83878. end;
  83879. procedure TCAN1_C1FLTCON5.clearFLTEN23; inline;
  83880. begin
  83881. pTDefRegMap(@Self)^.clr := $80000000;
  83882. end;
  83883. procedure TCAN1_C1FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  83884. begin
  83885. if thebits = 0 then
  83886. pTDefRegMap(@Self)^.clr := $80000000
  83887. else
  83888. pTDefRegMap(@Self)^.&set := $80000000;
  83889. end;
  83890. function TCAN1_C1FLTCON5.getFLTEN23 : TBits_1; inline;
  83891. begin
  83892. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  83893. end;
  83894. procedure TCAN1_C1FLTCON5.setw(thebits : TBits_32); inline;
  83895. begin
  83896. pTDefRegMap(@Self)^.val := thebits;
  83897. end;
  83898. function TCAN1_C1FLTCON5.getw : TBits_32; inline;
  83899. begin
  83900. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83901. end;
  83902. procedure TCAN1_C1FLTCON6.setFSEL24(thebits : TBits_5); inline;
  83903. begin
  83904. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83905. end;
  83906. function TCAN1_C1FLTCON6.getFSEL24 : TBits_5; inline;
  83907. begin
  83908. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83909. end;
  83910. procedure TCAN1_C1FLTCON6.setMSEL24(thebits : TBits_2); inline;
  83911. begin
  83912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  83913. end;
  83914. function TCAN1_C1FLTCON6.getMSEL24 : TBits_2; inline;
  83915. begin
  83916. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  83917. end;
  83918. procedure TCAN1_C1FLTCON6.setFLTEN24; inline;
  83919. begin
  83920. pTDefRegMap(@Self)^.&set := $00000080;
  83921. end;
  83922. procedure TCAN1_C1FLTCON6.clearFLTEN24; inline;
  83923. begin
  83924. pTDefRegMap(@Self)^.clr := $00000080;
  83925. end;
  83926. procedure TCAN1_C1FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  83927. begin
  83928. if thebits = 0 then
  83929. pTDefRegMap(@Self)^.clr := $00000080
  83930. else
  83931. pTDefRegMap(@Self)^.&set := $00000080;
  83932. end;
  83933. function TCAN1_C1FLTCON6.getFLTEN24 : TBits_1; inline;
  83934. begin
  83935. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83936. end;
  83937. procedure TCAN1_C1FLTCON6.setFSEL25(thebits : TBits_5); inline;
  83938. begin
  83939. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  83940. end;
  83941. function TCAN1_C1FLTCON6.getFSEL25 : TBits_5; inline;
  83942. begin
  83943. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  83944. end;
  83945. procedure TCAN1_C1FLTCON6.setMSEL25(thebits : TBits_2); inline;
  83946. begin
  83947. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  83948. end;
  83949. function TCAN1_C1FLTCON6.getMSEL25 : TBits_2; inline;
  83950. begin
  83951. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  83952. end;
  83953. procedure TCAN1_C1FLTCON6.setFLTEN25; inline;
  83954. begin
  83955. pTDefRegMap(@Self)^.&set := $00008000;
  83956. end;
  83957. procedure TCAN1_C1FLTCON6.clearFLTEN25; inline;
  83958. begin
  83959. pTDefRegMap(@Self)^.clr := $00008000;
  83960. end;
  83961. procedure TCAN1_C1FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  83962. begin
  83963. if thebits = 0 then
  83964. pTDefRegMap(@Self)^.clr := $00008000
  83965. else
  83966. pTDefRegMap(@Self)^.&set := $00008000;
  83967. end;
  83968. function TCAN1_C1FLTCON6.getFLTEN25 : TBits_1; inline;
  83969. begin
  83970. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  83971. end;
  83972. procedure TCAN1_C1FLTCON6.setFSEL26(thebits : TBits_5); inline;
  83973. begin
  83974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83975. end;
  83976. function TCAN1_C1FLTCON6.getFSEL26 : TBits_5; inline;
  83977. begin
  83978. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83979. end;
  83980. procedure TCAN1_C1FLTCON6.setMSEL26(thebits : TBits_2); inline;
  83981. begin
  83982. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  83983. end;
  83984. function TCAN1_C1FLTCON6.getMSEL26 : TBits_2; inline;
  83985. begin
  83986. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  83987. end;
  83988. procedure TCAN1_C1FLTCON6.setFLTEN26; inline;
  83989. begin
  83990. pTDefRegMap(@Self)^.&set := $00800000;
  83991. end;
  83992. procedure TCAN1_C1FLTCON6.clearFLTEN26; inline;
  83993. begin
  83994. pTDefRegMap(@Self)^.clr := $00800000;
  83995. end;
  83996. procedure TCAN1_C1FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  83997. begin
  83998. if thebits = 0 then
  83999. pTDefRegMap(@Self)^.clr := $00800000
  84000. else
  84001. pTDefRegMap(@Self)^.&set := $00800000;
  84002. end;
  84003. function TCAN1_C1FLTCON6.getFLTEN26 : TBits_1; inline;
  84004. begin
  84005. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  84006. end;
  84007. procedure TCAN1_C1FLTCON6.setFSEL27(thebits : TBits_5); inline;
  84008. begin
  84009. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  84010. end;
  84011. function TCAN1_C1FLTCON6.getFSEL27 : TBits_5; inline;
  84012. begin
  84013. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  84014. end;
  84015. procedure TCAN1_C1FLTCON6.setMSEL27(thebits : TBits_2); inline;
  84016. begin
  84017. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  84018. end;
  84019. function TCAN1_C1FLTCON6.getMSEL27 : TBits_2; inline;
  84020. begin
  84021. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  84022. end;
  84023. procedure TCAN1_C1FLTCON6.setFLTEN27; inline;
  84024. begin
  84025. pTDefRegMap(@Self)^.&set := $80000000;
  84026. end;
  84027. procedure TCAN1_C1FLTCON6.clearFLTEN27; inline;
  84028. begin
  84029. pTDefRegMap(@Self)^.clr := $80000000;
  84030. end;
  84031. procedure TCAN1_C1FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  84032. begin
  84033. if thebits = 0 then
  84034. pTDefRegMap(@Self)^.clr := $80000000
  84035. else
  84036. pTDefRegMap(@Self)^.&set := $80000000;
  84037. end;
  84038. function TCAN1_C1FLTCON6.getFLTEN27 : TBits_1; inline;
  84039. begin
  84040. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  84041. end;
  84042. procedure TCAN1_C1FLTCON6.setw(thebits : TBits_32); inline;
  84043. begin
  84044. pTDefRegMap(@Self)^.val := thebits;
  84045. end;
  84046. function TCAN1_C1FLTCON6.getw : TBits_32; inline;
  84047. begin
  84048. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84049. end;
  84050. procedure TCAN1_C1FLTCON7.setFSEL28(thebits : TBits_5); inline;
  84051. begin
  84052. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  84053. end;
  84054. function TCAN1_C1FLTCON7.getFSEL28 : TBits_5; inline;
  84055. begin
  84056. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  84057. end;
  84058. procedure TCAN1_C1FLTCON7.setMSEL28(thebits : TBits_2); inline;
  84059. begin
  84060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  84061. end;
  84062. function TCAN1_C1FLTCON7.getMSEL28 : TBits_2; inline;
  84063. begin
  84064. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  84065. end;
  84066. procedure TCAN1_C1FLTCON7.setFLTEN28; inline;
  84067. begin
  84068. pTDefRegMap(@Self)^.&set := $00000080;
  84069. end;
  84070. procedure TCAN1_C1FLTCON7.clearFLTEN28; inline;
  84071. begin
  84072. pTDefRegMap(@Self)^.clr := $00000080;
  84073. end;
  84074. procedure TCAN1_C1FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  84075. begin
  84076. if thebits = 0 then
  84077. pTDefRegMap(@Self)^.clr := $00000080
  84078. else
  84079. pTDefRegMap(@Self)^.&set := $00000080;
  84080. end;
  84081. function TCAN1_C1FLTCON7.getFLTEN28 : TBits_1; inline;
  84082. begin
  84083. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  84084. end;
  84085. procedure TCAN1_C1FLTCON7.setFSEL29(thebits : TBits_5); inline;
  84086. begin
  84087. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  84088. end;
  84089. function TCAN1_C1FLTCON7.getFSEL29 : TBits_5; inline;
  84090. begin
  84091. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  84092. end;
  84093. procedure TCAN1_C1FLTCON7.setMSEL29(thebits : TBits_2); inline;
  84094. begin
  84095. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  84096. end;
  84097. function TCAN1_C1FLTCON7.getMSEL29 : TBits_2; inline;
  84098. begin
  84099. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  84100. end;
  84101. procedure TCAN1_C1FLTCON7.setFLTEN29; inline;
  84102. begin
  84103. pTDefRegMap(@Self)^.&set := $00008000;
  84104. end;
  84105. procedure TCAN1_C1FLTCON7.clearFLTEN29; inline;
  84106. begin
  84107. pTDefRegMap(@Self)^.clr := $00008000;
  84108. end;
  84109. procedure TCAN1_C1FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  84110. begin
  84111. if thebits = 0 then
  84112. pTDefRegMap(@Self)^.clr := $00008000
  84113. else
  84114. pTDefRegMap(@Self)^.&set := $00008000;
  84115. end;
  84116. function TCAN1_C1FLTCON7.getFLTEN29 : TBits_1; inline;
  84117. begin
  84118. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  84119. end;
  84120. procedure TCAN1_C1FLTCON7.setFSEL30(thebits : TBits_5); inline;
  84121. begin
  84122. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  84123. end;
  84124. function TCAN1_C1FLTCON7.getFSEL30 : TBits_5; inline;
  84125. begin
  84126. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  84127. end;
  84128. procedure TCAN1_C1FLTCON7.setMSEL30(thebits : TBits_2); inline;
  84129. begin
  84130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  84131. end;
  84132. function TCAN1_C1FLTCON7.getMSEL30 : TBits_2; inline;
  84133. begin
  84134. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  84135. end;
  84136. procedure TCAN1_C1FLTCON7.setFLTEN30; inline;
  84137. begin
  84138. pTDefRegMap(@Self)^.&set := $00800000;
  84139. end;
  84140. procedure TCAN1_C1FLTCON7.clearFLTEN30; inline;
  84141. begin
  84142. pTDefRegMap(@Self)^.clr := $00800000;
  84143. end;
  84144. procedure TCAN1_C1FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  84145. begin
  84146. if thebits = 0 then
  84147. pTDefRegMap(@Self)^.clr := $00800000
  84148. else
  84149. pTDefRegMap(@Self)^.&set := $00800000;
  84150. end;
  84151. function TCAN1_C1FLTCON7.getFLTEN30 : TBits_1; inline;
  84152. begin
  84153. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  84154. end;
  84155. procedure TCAN1_C1FLTCON7.setFSEL31(thebits : TBits_5); inline;
  84156. begin
  84157. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  84158. end;
  84159. function TCAN1_C1FLTCON7.getFSEL31 : TBits_5; inline;
  84160. begin
  84161. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  84162. end;
  84163. procedure TCAN1_C1FLTCON7.setMSEL31(thebits : TBits_2); inline;
  84164. begin
  84165. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  84166. end;
  84167. function TCAN1_C1FLTCON7.getMSEL31 : TBits_2; inline;
  84168. begin
  84169. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  84170. end;
  84171. procedure TCAN1_C1FLTCON7.setFLTEN31; inline;
  84172. begin
  84173. pTDefRegMap(@Self)^.&set := $80000000;
  84174. end;
  84175. procedure TCAN1_C1FLTCON7.clearFLTEN31; inline;
  84176. begin
  84177. pTDefRegMap(@Self)^.clr := $80000000;
  84178. end;
  84179. procedure TCAN1_C1FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  84180. begin
  84181. if thebits = 0 then
  84182. pTDefRegMap(@Self)^.clr := $80000000
  84183. else
  84184. pTDefRegMap(@Self)^.&set := $80000000;
  84185. end;
  84186. function TCAN1_C1FLTCON7.getFLTEN31 : TBits_1; inline;
  84187. begin
  84188. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  84189. end;
  84190. procedure TCAN1_C1FLTCON7.setw(thebits : TBits_32); inline;
  84191. begin
  84192. pTDefRegMap(@Self)^.val := thebits;
  84193. end;
  84194. function TCAN1_C1FLTCON7.getw : TBits_32; inline;
  84195. begin
  84196. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84197. end;
  84198. procedure TCAN1_C1RXF0.setEID(thebits : TBits_18); inline;
  84199. begin
  84200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84201. end;
  84202. function TCAN1_C1RXF0.getEID : TBits_18; inline;
  84203. begin
  84204. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84205. end;
  84206. procedure TCAN1_C1RXF0.setEXID; inline;
  84207. begin
  84208. pTDefRegMap(@Self)^.&set := $00080000;
  84209. end;
  84210. procedure TCAN1_C1RXF0.clearEXID; inline;
  84211. begin
  84212. pTDefRegMap(@Self)^.clr := $00080000;
  84213. end;
  84214. procedure TCAN1_C1RXF0.setEXID(thebits : TBits_1); inline;
  84215. begin
  84216. if thebits = 0 then
  84217. pTDefRegMap(@Self)^.clr := $00080000
  84218. else
  84219. pTDefRegMap(@Self)^.&set := $00080000;
  84220. end;
  84221. function TCAN1_C1RXF0.getEXID : TBits_1; inline;
  84222. begin
  84223. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84224. end;
  84225. procedure TCAN1_C1RXF0.setSID(thebits : TBits_11); inline;
  84226. begin
  84227. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84228. end;
  84229. function TCAN1_C1RXF0.getSID : TBits_11; inline;
  84230. begin
  84231. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84232. end;
  84233. procedure TCAN1_C1RXF0.setw(thebits : TBits_32); inline;
  84234. begin
  84235. pTDefRegMap(@Self)^.val := thebits;
  84236. end;
  84237. function TCAN1_C1RXF0.getw : TBits_32; inline;
  84238. begin
  84239. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84240. end;
  84241. procedure TCAN1_C1RXF1.setEID(thebits : TBits_18); inline;
  84242. begin
  84243. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84244. end;
  84245. function TCAN1_C1RXF1.getEID : TBits_18; inline;
  84246. begin
  84247. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84248. end;
  84249. procedure TCAN1_C1RXF1.setEXID; inline;
  84250. begin
  84251. pTDefRegMap(@Self)^.&set := $00080000;
  84252. end;
  84253. procedure TCAN1_C1RXF1.clearEXID; inline;
  84254. begin
  84255. pTDefRegMap(@Self)^.clr := $00080000;
  84256. end;
  84257. procedure TCAN1_C1RXF1.setEXID(thebits : TBits_1); inline;
  84258. begin
  84259. if thebits = 0 then
  84260. pTDefRegMap(@Self)^.clr := $00080000
  84261. else
  84262. pTDefRegMap(@Self)^.&set := $00080000;
  84263. end;
  84264. function TCAN1_C1RXF1.getEXID : TBits_1; inline;
  84265. begin
  84266. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84267. end;
  84268. procedure TCAN1_C1RXF1.setSID(thebits : TBits_11); inline;
  84269. begin
  84270. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84271. end;
  84272. function TCAN1_C1RXF1.getSID : TBits_11; inline;
  84273. begin
  84274. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84275. end;
  84276. procedure TCAN1_C1RXF1.setw(thebits : TBits_32); inline;
  84277. begin
  84278. pTDefRegMap(@Self)^.val := thebits;
  84279. end;
  84280. function TCAN1_C1RXF1.getw : TBits_32; inline;
  84281. begin
  84282. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84283. end;
  84284. procedure TCAN1_C1RXF2.setEID(thebits : TBits_18); inline;
  84285. begin
  84286. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84287. end;
  84288. function TCAN1_C1RXF2.getEID : TBits_18; inline;
  84289. begin
  84290. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84291. end;
  84292. procedure TCAN1_C1RXF2.setEXID; inline;
  84293. begin
  84294. pTDefRegMap(@Self)^.&set := $00080000;
  84295. end;
  84296. procedure TCAN1_C1RXF2.clearEXID; inline;
  84297. begin
  84298. pTDefRegMap(@Self)^.clr := $00080000;
  84299. end;
  84300. procedure TCAN1_C1RXF2.setEXID(thebits : TBits_1); inline;
  84301. begin
  84302. if thebits = 0 then
  84303. pTDefRegMap(@Self)^.clr := $00080000
  84304. else
  84305. pTDefRegMap(@Self)^.&set := $00080000;
  84306. end;
  84307. function TCAN1_C1RXF2.getEXID : TBits_1; inline;
  84308. begin
  84309. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84310. end;
  84311. procedure TCAN1_C1RXF2.setSID(thebits : TBits_11); inline;
  84312. begin
  84313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84314. end;
  84315. function TCAN1_C1RXF2.getSID : TBits_11; inline;
  84316. begin
  84317. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84318. end;
  84319. procedure TCAN1_C1RXF2.setw(thebits : TBits_32); inline;
  84320. begin
  84321. pTDefRegMap(@Self)^.val := thebits;
  84322. end;
  84323. function TCAN1_C1RXF2.getw : TBits_32; inline;
  84324. begin
  84325. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84326. end;
  84327. procedure TCAN1_C1RXF3.setEID(thebits : TBits_18); inline;
  84328. begin
  84329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84330. end;
  84331. function TCAN1_C1RXF3.getEID : TBits_18; inline;
  84332. begin
  84333. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84334. end;
  84335. procedure TCAN1_C1RXF3.setEXID; inline;
  84336. begin
  84337. pTDefRegMap(@Self)^.&set := $00080000;
  84338. end;
  84339. procedure TCAN1_C1RXF3.clearEXID; inline;
  84340. begin
  84341. pTDefRegMap(@Self)^.clr := $00080000;
  84342. end;
  84343. procedure TCAN1_C1RXF3.setEXID(thebits : TBits_1); inline;
  84344. begin
  84345. if thebits = 0 then
  84346. pTDefRegMap(@Self)^.clr := $00080000
  84347. else
  84348. pTDefRegMap(@Self)^.&set := $00080000;
  84349. end;
  84350. function TCAN1_C1RXF3.getEXID : TBits_1; inline;
  84351. begin
  84352. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84353. end;
  84354. procedure TCAN1_C1RXF3.setSID(thebits : TBits_11); inline;
  84355. begin
  84356. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84357. end;
  84358. function TCAN1_C1RXF3.getSID : TBits_11; inline;
  84359. begin
  84360. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84361. end;
  84362. procedure TCAN1_C1RXF3.setw(thebits : TBits_32); inline;
  84363. begin
  84364. pTDefRegMap(@Self)^.val := thebits;
  84365. end;
  84366. function TCAN1_C1RXF3.getw : TBits_32; inline;
  84367. begin
  84368. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84369. end;
  84370. procedure TCAN1_C1RXF4.setEID(thebits : TBits_18); inline;
  84371. begin
  84372. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84373. end;
  84374. function TCAN1_C1RXF4.getEID : TBits_18; inline;
  84375. begin
  84376. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84377. end;
  84378. procedure TCAN1_C1RXF4.setEXID; inline;
  84379. begin
  84380. pTDefRegMap(@Self)^.&set := $00080000;
  84381. end;
  84382. procedure TCAN1_C1RXF4.clearEXID; inline;
  84383. begin
  84384. pTDefRegMap(@Self)^.clr := $00080000;
  84385. end;
  84386. procedure TCAN1_C1RXF4.setEXID(thebits : TBits_1); inline;
  84387. begin
  84388. if thebits = 0 then
  84389. pTDefRegMap(@Self)^.clr := $00080000
  84390. else
  84391. pTDefRegMap(@Self)^.&set := $00080000;
  84392. end;
  84393. function TCAN1_C1RXF4.getEXID : TBits_1; inline;
  84394. begin
  84395. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84396. end;
  84397. procedure TCAN1_C1RXF4.setSID(thebits : TBits_11); inline;
  84398. begin
  84399. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84400. end;
  84401. function TCAN1_C1RXF4.getSID : TBits_11; inline;
  84402. begin
  84403. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84404. end;
  84405. procedure TCAN1_C1RXF4.setw(thebits : TBits_32); inline;
  84406. begin
  84407. pTDefRegMap(@Self)^.val := thebits;
  84408. end;
  84409. function TCAN1_C1RXF4.getw : TBits_32; inline;
  84410. begin
  84411. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84412. end;
  84413. procedure TCAN1_C1RXF5.setEID(thebits : TBits_18); inline;
  84414. begin
  84415. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84416. end;
  84417. function TCAN1_C1RXF5.getEID : TBits_18; inline;
  84418. begin
  84419. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84420. end;
  84421. procedure TCAN1_C1RXF5.setEXID; inline;
  84422. begin
  84423. pTDefRegMap(@Self)^.&set := $00080000;
  84424. end;
  84425. procedure TCAN1_C1RXF5.clearEXID; inline;
  84426. begin
  84427. pTDefRegMap(@Self)^.clr := $00080000;
  84428. end;
  84429. procedure TCAN1_C1RXF5.setEXID(thebits : TBits_1); inline;
  84430. begin
  84431. if thebits = 0 then
  84432. pTDefRegMap(@Self)^.clr := $00080000
  84433. else
  84434. pTDefRegMap(@Self)^.&set := $00080000;
  84435. end;
  84436. function TCAN1_C1RXF5.getEXID : TBits_1; inline;
  84437. begin
  84438. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84439. end;
  84440. procedure TCAN1_C1RXF5.setSID(thebits : TBits_11); inline;
  84441. begin
  84442. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84443. end;
  84444. function TCAN1_C1RXF5.getSID : TBits_11; inline;
  84445. begin
  84446. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84447. end;
  84448. procedure TCAN1_C1RXF5.setw(thebits : TBits_32); inline;
  84449. begin
  84450. pTDefRegMap(@Self)^.val := thebits;
  84451. end;
  84452. function TCAN1_C1RXF5.getw : TBits_32; inline;
  84453. begin
  84454. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84455. end;
  84456. procedure TCAN1_C1RXF6.setEID(thebits : TBits_18); inline;
  84457. begin
  84458. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84459. end;
  84460. function TCAN1_C1RXF6.getEID : TBits_18; inline;
  84461. begin
  84462. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84463. end;
  84464. procedure TCAN1_C1RXF6.setEXID; inline;
  84465. begin
  84466. pTDefRegMap(@Self)^.&set := $00080000;
  84467. end;
  84468. procedure TCAN1_C1RXF6.clearEXID; inline;
  84469. begin
  84470. pTDefRegMap(@Self)^.clr := $00080000;
  84471. end;
  84472. procedure TCAN1_C1RXF6.setEXID(thebits : TBits_1); inline;
  84473. begin
  84474. if thebits = 0 then
  84475. pTDefRegMap(@Self)^.clr := $00080000
  84476. else
  84477. pTDefRegMap(@Self)^.&set := $00080000;
  84478. end;
  84479. function TCAN1_C1RXF6.getEXID : TBits_1; inline;
  84480. begin
  84481. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84482. end;
  84483. procedure TCAN1_C1RXF6.setSID(thebits : TBits_11); inline;
  84484. begin
  84485. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84486. end;
  84487. function TCAN1_C1RXF6.getSID : TBits_11; inline;
  84488. begin
  84489. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84490. end;
  84491. procedure TCAN1_C1RXF6.setw(thebits : TBits_32); inline;
  84492. begin
  84493. pTDefRegMap(@Self)^.val := thebits;
  84494. end;
  84495. function TCAN1_C1RXF6.getw : TBits_32; inline;
  84496. begin
  84497. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84498. end;
  84499. procedure TCAN1_C1RXF7.setEID(thebits : TBits_18); inline;
  84500. begin
  84501. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84502. end;
  84503. function TCAN1_C1RXF7.getEID : TBits_18; inline;
  84504. begin
  84505. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84506. end;
  84507. procedure TCAN1_C1RXF7.setEXID; inline;
  84508. begin
  84509. pTDefRegMap(@Self)^.&set := $00080000;
  84510. end;
  84511. procedure TCAN1_C1RXF7.clearEXID; inline;
  84512. begin
  84513. pTDefRegMap(@Self)^.clr := $00080000;
  84514. end;
  84515. procedure TCAN1_C1RXF7.setEXID(thebits : TBits_1); inline;
  84516. begin
  84517. if thebits = 0 then
  84518. pTDefRegMap(@Self)^.clr := $00080000
  84519. else
  84520. pTDefRegMap(@Self)^.&set := $00080000;
  84521. end;
  84522. function TCAN1_C1RXF7.getEXID : TBits_1; inline;
  84523. begin
  84524. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84525. end;
  84526. procedure TCAN1_C1RXF7.setSID(thebits : TBits_11); inline;
  84527. begin
  84528. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84529. end;
  84530. function TCAN1_C1RXF7.getSID : TBits_11; inline;
  84531. begin
  84532. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84533. end;
  84534. procedure TCAN1_C1RXF7.setw(thebits : TBits_32); inline;
  84535. begin
  84536. pTDefRegMap(@Self)^.val := thebits;
  84537. end;
  84538. function TCAN1_C1RXF7.getw : TBits_32; inline;
  84539. begin
  84540. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84541. end;
  84542. procedure TCAN1_C1RXF8.setEID(thebits : TBits_18); inline;
  84543. begin
  84544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84545. end;
  84546. function TCAN1_C1RXF8.getEID : TBits_18; inline;
  84547. begin
  84548. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84549. end;
  84550. procedure TCAN1_C1RXF8.setEXID; inline;
  84551. begin
  84552. pTDefRegMap(@Self)^.&set := $00080000;
  84553. end;
  84554. procedure TCAN1_C1RXF8.clearEXID; inline;
  84555. begin
  84556. pTDefRegMap(@Self)^.clr := $00080000;
  84557. end;
  84558. procedure TCAN1_C1RXF8.setEXID(thebits : TBits_1); inline;
  84559. begin
  84560. if thebits = 0 then
  84561. pTDefRegMap(@Self)^.clr := $00080000
  84562. else
  84563. pTDefRegMap(@Self)^.&set := $00080000;
  84564. end;
  84565. function TCAN1_C1RXF8.getEXID : TBits_1; inline;
  84566. begin
  84567. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84568. end;
  84569. procedure TCAN1_C1RXF8.setSID(thebits : TBits_11); inline;
  84570. begin
  84571. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84572. end;
  84573. function TCAN1_C1RXF8.getSID : TBits_11; inline;
  84574. begin
  84575. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84576. end;
  84577. procedure TCAN1_C1RXF8.setw(thebits : TBits_32); inline;
  84578. begin
  84579. pTDefRegMap(@Self)^.val := thebits;
  84580. end;
  84581. function TCAN1_C1RXF8.getw : TBits_32; inline;
  84582. begin
  84583. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84584. end;
  84585. procedure TCAN1_C1RXF9.setEID(thebits : TBits_18); inline;
  84586. begin
  84587. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84588. end;
  84589. function TCAN1_C1RXF9.getEID : TBits_18; inline;
  84590. begin
  84591. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84592. end;
  84593. procedure TCAN1_C1RXF9.setEXID; inline;
  84594. begin
  84595. pTDefRegMap(@Self)^.&set := $00080000;
  84596. end;
  84597. procedure TCAN1_C1RXF9.clearEXID; inline;
  84598. begin
  84599. pTDefRegMap(@Self)^.clr := $00080000;
  84600. end;
  84601. procedure TCAN1_C1RXF9.setEXID(thebits : TBits_1); inline;
  84602. begin
  84603. if thebits = 0 then
  84604. pTDefRegMap(@Self)^.clr := $00080000
  84605. else
  84606. pTDefRegMap(@Self)^.&set := $00080000;
  84607. end;
  84608. function TCAN1_C1RXF9.getEXID : TBits_1; inline;
  84609. begin
  84610. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84611. end;
  84612. procedure TCAN1_C1RXF9.setSID(thebits : TBits_11); inline;
  84613. begin
  84614. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84615. end;
  84616. function TCAN1_C1RXF9.getSID : TBits_11; inline;
  84617. begin
  84618. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84619. end;
  84620. procedure TCAN1_C1RXF9.setw(thebits : TBits_32); inline;
  84621. begin
  84622. pTDefRegMap(@Self)^.val := thebits;
  84623. end;
  84624. function TCAN1_C1RXF9.getw : TBits_32; inline;
  84625. begin
  84626. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84627. end;
  84628. procedure TCAN1_C1RXF10.setEID(thebits : TBits_18); inline;
  84629. begin
  84630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84631. end;
  84632. function TCAN1_C1RXF10.getEID : TBits_18; inline;
  84633. begin
  84634. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84635. end;
  84636. procedure TCAN1_C1RXF10.setEXID; inline;
  84637. begin
  84638. pTDefRegMap(@Self)^.&set := $00080000;
  84639. end;
  84640. procedure TCAN1_C1RXF10.clearEXID; inline;
  84641. begin
  84642. pTDefRegMap(@Self)^.clr := $00080000;
  84643. end;
  84644. procedure TCAN1_C1RXF10.setEXID(thebits : TBits_1); inline;
  84645. begin
  84646. if thebits = 0 then
  84647. pTDefRegMap(@Self)^.clr := $00080000
  84648. else
  84649. pTDefRegMap(@Self)^.&set := $00080000;
  84650. end;
  84651. function TCAN1_C1RXF10.getEXID : TBits_1; inline;
  84652. begin
  84653. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84654. end;
  84655. procedure TCAN1_C1RXF10.setSID(thebits : TBits_11); inline;
  84656. begin
  84657. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84658. end;
  84659. function TCAN1_C1RXF10.getSID : TBits_11; inline;
  84660. begin
  84661. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84662. end;
  84663. procedure TCAN1_C1RXF10.setw(thebits : TBits_32); inline;
  84664. begin
  84665. pTDefRegMap(@Self)^.val := thebits;
  84666. end;
  84667. function TCAN1_C1RXF10.getw : TBits_32; inline;
  84668. begin
  84669. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84670. end;
  84671. procedure TCAN1_C1RXF11.setEID(thebits : TBits_18); inline;
  84672. begin
  84673. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84674. end;
  84675. function TCAN1_C1RXF11.getEID : TBits_18; inline;
  84676. begin
  84677. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84678. end;
  84679. procedure TCAN1_C1RXF11.setEXID; inline;
  84680. begin
  84681. pTDefRegMap(@Self)^.&set := $00080000;
  84682. end;
  84683. procedure TCAN1_C1RXF11.clearEXID; inline;
  84684. begin
  84685. pTDefRegMap(@Self)^.clr := $00080000;
  84686. end;
  84687. procedure TCAN1_C1RXF11.setEXID(thebits : TBits_1); inline;
  84688. begin
  84689. if thebits = 0 then
  84690. pTDefRegMap(@Self)^.clr := $00080000
  84691. else
  84692. pTDefRegMap(@Self)^.&set := $00080000;
  84693. end;
  84694. function TCAN1_C1RXF11.getEXID : TBits_1; inline;
  84695. begin
  84696. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84697. end;
  84698. procedure TCAN1_C1RXF11.setSID(thebits : TBits_11); inline;
  84699. begin
  84700. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84701. end;
  84702. function TCAN1_C1RXF11.getSID : TBits_11; inline;
  84703. begin
  84704. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84705. end;
  84706. procedure TCAN1_C1RXF11.setw(thebits : TBits_32); inline;
  84707. begin
  84708. pTDefRegMap(@Self)^.val := thebits;
  84709. end;
  84710. function TCAN1_C1RXF11.getw : TBits_32; inline;
  84711. begin
  84712. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84713. end;
  84714. procedure TCAN1_C1RXF12.setEID(thebits : TBits_18); inline;
  84715. begin
  84716. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84717. end;
  84718. function TCAN1_C1RXF12.getEID : TBits_18; inline;
  84719. begin
  84720. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84721. end;
  84722. procedure TCAN1_C1RXF12.setEXID; inline;
  84723. begin
  84724. pTDefRegMap(@Self)^.&set := $00080000;
  84725. end;
  84726. procedure TCAN1_C1RXF12.clearEXID; inline;
  84727. begin
  84728. pTDefRegMap(@Self)^.clr := $00080000;
  84729. end;
  84730. procedure TCAN1_C1RXF12.setEXID(thebits : TBits_1); inline;
  84731. begin
  84732. if thebits = 0 then
  84733. pTDefRegMap(@Self)^.clr := $00080000
  84734. else
  84735. pTDefRegMap(@Self)^.&set := $00080000;
  84736. end;
  84737. function TCAN1_C1RXF12.getEXID : TBits_1; inline;
  84738. begin
  84739. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84740. end;
  84741. procedure TCAN1_C1RXF12.setSID(thebits : TBits_11); inline;
  84742. begin
  84743. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84744. end;
  84745. function TCAN1_C1RXF12.getSID : TBits_11; inline;
  84746. begin
  84747. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84748. end;
  84749. procedure TCAN1_C1RXF12.setw(thebits : TBits_32); inline;
  84750. begin
  84751. pTDefRegMap(@Self)^.val := thebits;
  84752. end;
  84753. function TCAN1_C1RXF12.getw : TBits_32; inline;
  84754. begin
  84755. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84756. end;
  84757. procedure TCAN1_C1RXF13.setEID(thebits : TBits_18); inline;
  84758. begin
  84759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84760. end;
  84761. function TCAN1_C1RXF13.getEID : TBits_18; inline;
  84762. begin
  84763. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84764. end;
  84765. procedure TCAN1_C1RXF13.setEXID; inline;
  84766. begin
  84767. pTDefRegMap(@Self)^.&set := $00080000;
  84768. end;
  84769. procedure TCAN1_C1RXF13.clearEXID; inline;
  84770. begin
  84771. pTDefRegMap(@Self)^.clr := $00080000;
  84772. end;
  84773. procedure TCAN1_C1RXF13.setEXID(thebits : TBits_1); inline;
  84774. begin
  84775. if thebits = 0 then
  84776. pTDefRegMap(@Self)^.clr := $00080000
  84777. else
  84778. pTDefRegMap(@Self)^.&set := $00080000;
  84779. end;
  84780. function TCAN1_C1RXF13.getEXID : TBits_1; inline;
  84781. begin
  84782. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84783. end;
  84784. procedure TCAN1_C1RXF13.setSID(thebits : TBits_11); inline;
  84785. begin
  84786. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84787. end;
  84788. function TCAN1_C1RXF13.getSID : TBits_11; inline;
  84789. begin
  84790. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84791. end;
  84792. procedure TCAN1_C1RXF13.setw(thebits : TBits_32); inline;
  84793. begin
  84794. pTDefRegMap(@Self)^.val := thebits;
  84795. end;
  84796. function TCAN1_C1RXF13.getw : TBits_32; inline;
  84797. begin
  84798. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84799. end;
  84800. procedure TCAN1_C1RXF14.setEID(thebits : TBits_18); inline;
  84801. begin
  84802. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84803. end;
  84804. function TCAN1_C1RXF14.getEID : TBits_18; inline;
  84805. begin
  84806. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84807. end;
  84808. procedure TCAN1_C1RXF14.setEXID; inline;
  84809. begin
  84810. pTDefRegMap(@Self)^.&set := $00080000;
  84811. end;
  84812. procedure TCAN1_C1RXF14.clearEXID; inline;
  84813. begin
  84814. pTDefRegMap(@Self)^.clr := $00080000;
  84815. end;
  84816. procedure TCAN1_C1RXF14.setEXID(thebits : TBits_1); inline;
  84817. begin
  84818. if thebits = 0 then
  84819. pTDefRegMap(@Self)^.clr := $00080000
  84820. else
  84821. pTDefRegMap(@Self)^.&set := $00080000;
  84822. end;
  84823. function TCAN1_C1RXF14.getEXID : TBits_1; inline;
  84824. begin
  84825. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84826. end;
  84827. procedure TCAN1_C1RXF14.setSID(thebits : TBits_11); inline;
  84828. begin
  84829. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84830. end;
  84831. function TCAN1_C1RXF14.getSID : TBits_11; inline;
  84832. begin
  84833. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84834. end;
  84835. procedure TCAN1_C1RXF14.setw(thebits : TBits_32); inline;
  84836. begin
  84837. pTDefRegMap(@Self)^.val := thebits;
  84838. end;
  84839. function TCAN1_C1RXF14.getw : TBits_32; inline;
  84840. begin
  84841. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84842. end;
  84843. procedure TCAN1_C1RXF15.setEID(thebits : TBits_18); inline;
  84844. begin
  84845. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84846. end;
  84847. function TCAN1_C1RXF15.getEID : TBits_18; inline;
  84848. begin
  84849. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84850. end;
  84851. procedure TCAN1_C1RXF15.setEXID; inline;
  84852. begin
  84853. pTDefRegMap(@Self)^.&set := $00080000;
  84854. end;
  84855. procedure TCAN1_C1RXF15.clearEXID; inline;
  84856. begin
  84857. pTDefRegMap(@Self)^.clr := $00080000;
  84858. end;
  84859. procedure TCAN1_C1RXF15.setEXID(thebits : TBits_1); inline;
  84860. begin
  84861. if thebits = 0 then
  84862. pTDefRegMap(@Self)^.clr := $00080000
  84863. else
  84864. pTDefRegMap(@Self)^.&set := $00080000;
  84865. end;
  84866. function TCAN1_C1RXF15.getEXID : TBits_1; inline;
  84867. begin
  84868. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84869. end;
  84870. procedure TCAN1_C1RXF15.setSID(thebits : TBits_11); inline;
  84871. begin
  84872. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84873. end;
  84874. function TCAN1_C1RXF15.getSID : TBits_11; inline;
  84875. begin
  84876. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84877. end;
  84878. procedure TCAN1_C1RXF15.setw(thebits : TBits_32); inline;
  84879. begin
  84880. pTDefRegMap(@Self)^.val := thebits;
  84881. end;
  84882. function TCAN1_C1RXF15.getw : TBits_32; inline;
  84883. begin
  84884. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84885. end;
  84886. procedure TCAN1_C1RXF16.setEID(thebits : TBits_18); inline;
  84887. begin
  84888. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84889. end;
  84890. function TCAN1_C1RXF16.getEID : TBits_18; inline;
  84891. begin
  84892. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84893. end;
  84894. procedure TCAN1_C1RXF16.setEXID; inline;
  84895. begin
  84896. pTDefRegMap(@Self)^.&set := $00080000;
  84897. end;
  84898. procedure TCAN1_C1RXF16.clearEXID; inline;
  84899. begin
  84900. pTDefRegMap(@Self)^.clr := $00080000;
  84901. end;
  84902. procedure TCAN1_C1RXF16.setEXID(thebits : TBits_1); inline;
  84903. begin
  84904. if thebits = 0 then
  84905. pTDefRegMap(@Self)^.clr := $00080000
  84906. else
  84907. pTDefRegMap(@Self)^.&set := $00080000;
  84908. end;
  84909. function TCAN1_C1RXF16.getEXID : TBits_1; inline;
  84910. begin
  84911. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84912. end;
  84913. procedure TCAN1_C1RXF16.setSID(thebits : TBits_11); inline;
  84914. begin
  84915. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84916. end;
  84917. function TCAN1_C1RXF16.getSID : TBits_11; inline;
  84918. begin
  84919. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84920. end;
  84921. procedure TCAN1_C1RXF16.setw(thebits : TBits_32); inline;
  84922. begin
  84923. pTDefRegMap(@Self)^.val := thebits;
  84924. end;
  84925. function TCAN1_C1RXF16.getw : TBits_32; inline;
  84926. begin
  84927. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84928. end;
  84929. procedure TCAN1_C1RXF17.setEID(thebits : TBits_18); inline;
  84930. begin
  84931. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84932. end;
  84933. function TCAN1_C1RXF17.getEID : TBits_18; inline;
  84934. begin
  84935. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84936. end;
  84937. procedure TCAN1_C1RXF17.setEXID; inline;
  84938. begin
  84939. pTDefRegMap(@Self)^.&set := $00080000;
  84940. end;
  84941. procedure TCAN1_C1RXF17.clearEXID; inline;
  84942. begin
  84943. pTDefRegMap(@Self)^.clr := $00080000;
  84944. end;
  84945. procedure TCAN1_C1RXF17.setEXID(thebits : TBits_1); inline;
  84946. begin
  84947. if thebits = 0 then
  84948. pTDefRegMap(@Self)^.clr := $00080000
  84949. else
  84950. pTDefRegMap(@Self)^.&set := $00080000;
  84951. end;
  84952. function TCAN1_C1RXF17.getEXID : TBits_1; inline;
  84953. begin
  84954. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84955. end;
  84956. procedure TCAN1_C1RXF17.setSID(thebits : TBits_11); inline;
  84957. begin
  84958. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  84959. end;
  84960. function TCAN1_C1RXF17.getSID : TBits_11; inline;
  84961. begin
  84962. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  84963. end;
  84964. procedure TCAN1_C1RXF17.setw(thebits : TBits_32); inline;
  84965. begin
  84966. pTDefRegMap(@Self)^.val := thebits;
  84967. end;
  84968. function TCAN1_C1RXF17.getw : TBits_32; inline;
  84969. begin
  84970. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84971. end;
  84972. procedure TCAN1_C1RXF18.setEID(thebits : TBits_18); inline;
  84973. begin
  84974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  84975. end;
  84976. function TCAN1_C1RXF18.getEID : TBits_18; inline;
  84977. begin
  84978. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  84979. end;
  84980. procedure TCAN1_C1RXF18.setEXID; inline;
  84981. begin
  84982. pTDefRegMap(@Self)^.&set := $00080000;
  84983. end;
  84984. procedure TCAN1_C1RXF18.clearEXID; inline;
  84985. begin
  84986. pTDefRegMap(@Self)^.clr := $00080000;
  84987. end;
  84988. procedure TCAN1_C1RXF18.setEXID(thebits : TBits_1); inline;
  84989. begin
  84990. if thebits = 0 then
  84991. pTDefRegMap(@Self)^.clr := $00080000
  84992. else
  84993. pTDefRegMap(@Self)^.&set := $00080000;
  84994. end;
  84995. function TCAN1_C1RXF18.getEXID : TBits_1; inline;
  84996. begin
  84997. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84998. end;
  84999. procedure TCAN1_C1RXF18.setSID(thebits : TBits_11); inline;
  85000. begin
  85001. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85002. end;
  85003. function TCAN1_C1RXF18.getSID : TBits_11; inline;
  85004. begin
  85005. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85006. end;
  85007. procedure TCAN1_C1RXF18.setw(thebits : TBits_32); inline;
  85008. begin
  85009. pTDefRegMap(@Self)^.val := thebits;
  85010. end;
  85011. function TCAN1_C1RXF18.getw : TBits_32; inline;
  85012. begin
  85013. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85014. end;
  85015. procedure TCAN1_C1RXF19.setEID(thebits : TBits_18); inline;
  85016. begin
  85017. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85018. end;
  85019. function TCAN1_C1RXF19.getEID : TBits_18; inline;
  85020. begin
  85021. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85022. end;
  85023. procedure TCAN1_C1RXF19.setEXID; inline;
  85024. begin
  85025. pTDefRegMap(@Self)^.&set := $00080000;
  85026. end;
  85027. procedure TCAN1_C1RXF19.clearEXID; inline;
  85028. begin
  85029. pTDefRegMap(@Self)^.clr := $00080000;
  85030. end;
  85031. procedure TCAN1_C1RXF19.setEXID(thebits : TBits_1); inline;
  85032. begin
  85033. if thebits = 0 then
  85034. pTDefRegMap(@Self)^.clr := $00080000
  85035. else
  85036. pTDefRegMap(@Self)^.&set := $00080000;
  85037. end;
  85038. function TCAN1_C1RXF19.getEXID : TBits_1; inline;
  85039. begin
  85040. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85041. end;
  85042. procedure TCAN1_C1RXF19.setSID(thebits : TBits_11); inline;
  85043. begin
  85044. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85045. end;
  85046. function TCAN1_C1RXF19.getSID : TBits_11; inline;
  85047. begin
  85048. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85049. end;
  85050. procedure TCAN1_C1RXF19.setw(thebits : TBits_32); inline;
  85051. begin
  85052. pTDefRegMap(@Self)^.val := thebits;
  85053. end;
  85054. function TCAN1_C1RXF19.getw : TBits_32; inline;
  85055. begin
  85056. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85057. end;
  85058. procedure TCAN1_C1RXF20.setEID(thebits : TBits_18); inline;
  85059. begin
  85060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85061. end;
  85062. function TCAN1_C1RXF20.getEID : TBits_18; inline;
  85063. begin
  85064. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85065. end;
  85066. procedure TCAN1_C1RXF20.setEXID; inline;
  85067. begin
  85068. pTDefRegMap(@Self)^.&set := $00080000;
  85069. end;
  85070. procedure TCAN1_C1RXF20.clearEXID; inline;
  85071. begin
  85072. pTDefRegMap(@Self)^.clr := $00080000;
  85073. end;
  85074. procedure TCAN1_C1RXF20.setEXID(thebits : TBits_1); inline;
  85075. begin
  85076. if thebits = 0 then
  85077. pTDefRegMap(@Self)^.clr := $00080000
  85078. else
  85079. pTDefRegMap(@Self)^.&set := $00080000;
  85080. end;
  85081. function TCAN1_C1RXF20.getEXID : TBits_1; inline;
  85082. begin
  85083. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85084. end;
  85085. procedure TCAN1_C1RXF20.setSID(thebits : TBits_11); inline;
  85086. begin
  85087. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85088. end;
  85089. function TCAN1_C1RXF20.getSID : TBits_11; inline;
  85090. begin
  85091. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85092. end;
  85093. procedure TCAN1_C1RXF20.setw(thebits : TBits_32); inline;
  85094. begin
  85095. pTDefRegMap(@Self)^.val := thebits;
  85096. end;
  85097. function TCAN1_C1RXF20.getw : TBits_32; inline;
  85098. begin
  85099. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85100. end;
  85101. procedure TCAN1_C1RXF21.setEID(thebits : TBits_18); inline;
  85102. begin
  85103. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85104. end;
  85105. function TCAN1_C1RXF21.getEID : TBits_18; inline;
  85106. begin
  85107. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85108. end;
  85109. procedure TCAN1_C1RXF21.setEXID; inline;
  85110. begin
  85111. pTDefRegMap(@Self)^.&set := $00080000;
  85112. end;
  85113. procedure TCAN1_C1RXF21.clearEXID; inline;
  85114. begin
  85115. pTDefRegMap(@Self)^.clr := $00080000;
  85116. end;
  85117. procedure TCAN1_C1RXF21.setEXID(thebits : TBits_1); inline;
  85118. begin
  85119. if thebits = 0 then
  85120. pTDefRegMap(@Self)^.clr := $00080000
  85121. else
  85122. pTDefRegMap(@Self)^.&set := $00080000;
  85123. end;
  85124. function TCAN1_C1RXF21.getEXID : TBits_1; inline;
  85125. begin
  85126. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85127. end;
  85128. procedure TCAN1_C1RXF21.setSID(thebits : TBits_11); inline;
  85129. begin
  85130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85131. end;
  85132. function TCAN1_C1RXF21.getSID : TBits_11; inline;
  85133. begin
  85134. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85135. end;
  85136. procedure TCAN1_C1RXF21.setw(thebits : TBits_32); inline;
  85137. begin
  85138. pTDefRegMap(@Self)^.val := thebits;
  85139. end;
  85140. function TCAN1_C1RXF21.getw : TBits_32; inline;
  85141. begin
  85142. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85143. end;
  85144. procedure TCAN1_C1RXF22.setEID(thebits : TBits_18); inline;
  85145. begin
  85146. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85147. end;
  85148. function TCAN1_C1RXF22.getEID : TBits_18; inline;
  85149. begin
  85150. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85151. end;
  85152. procedure TCAN1_C1RXF22.setEXID; inline;
  85153. begin
  85154. pTDefRegMap(@Self)^.&set := $00080000;
  85155. end;
  85156. procedure TCAN1_C1RXF22.clearEXID; inline;
  85157. begin
  85158. pTDefRegMap(@Self)^.clr := $00080000;
  85159. end;
  85160. procedure TCAN1_C1RXF22.setEXID(thebits : TBits_1); inline;
  85161. begin
  85162. if thebits = 0 then
  85163. pTDefRegMap(@Self)^.clr := $00080000
  85164. else
  85165. pTDefRegMap(@Self)^.&set := $00080000;
  85166. end;
  85167. function TCAN1_C1RXF22.getEXID : TBits_1; inline;
  85168. begin
  85169. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85170. end;
  85171. procedure TCAN1_C1RXF22.setSID(thebits : TBits_11); inline;
  85172. begin
  85173. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85174. end;
  85175. function TCAN1_C1RXF22.getSID : TBits_11; inline;
  85176. begin
  85177. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85178. end;
  85179. procedure TCAN1_C1RXF22.setw(thebits : TBits_32); inline;
  85180. begin
  85181. pTDefRegMap(@Self)^.val := thebits;
  85182. end;
  85183. function TCAN1_C1RXF22.getw : TBits_32; inline;
  85184. begin
  85185. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85186. end;
  85187. procedure TCAN1_C1RXF23.setEID(thebits : TBits_18); inline;
  85188. begin
  85189. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85190. end;
  85191. function TCAN1_C1RXF23.getEID : TBits_18; inline;
  85192. begin
  85193. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85194. end;
  85195. procedure TCAN1_C1RXF23.setEXID; inline;
  85196. begin
  85197. pTDefRegMap(@Self)^.&set := $00080000;
  85198. end;
  85199. procedure TCAN1_C1RXF23.clearEXID; inline;
  85200. begin
  85201. pTDefRegMap(@Self)^.clr := $00080000;
  85202. end;
  85203. procedure TCAN1_C1RXF23.setEXID(thebits : TBits_1); inline;
  85204. begin
  85205. if thebits = 0 then
  85206. pTDefRegMap(@Self)^.clr := $00080000
  85207. else
  85208. pTDefRegMap(@Self)^.&set := $00080000;
  85209. end;
  85210. function TCAN1_C1RXF23.getEXID : TBits_1; inline;
  85211. begin
  85212. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85213. end;
  85214. procedure TCAN1_C1RXF23.setSID(thebits : TBits_11); inline;
  85215. begin
  85216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85217. end;
  85218. function TCAN1_C1RXF23.getSID : TBits_11; inline;
  85219. begin
  85220. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85221. end;
  85222. procedure TCAN1_C1RXF23.setw(thebits : TBits_32); inline;
  85223. begin
  85224. pTDefRegMap(@Self)^.val := thebits;
  85225. end;
  85226. function TCAN1_C1RXF23.getw : TBits_32; inline;
  85227. begin
  85228. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85229. end;
  85230. procedure TCAN1_C1RXF24.setEID(thebits : TBits_18); inline;
  85231. begin
  85232. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85233. end;
  85234. function TCAN1_C1RXF24.getEID : TBits_18; inline;
  85235. begin
  85236. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85237. end;
  85238. procedure TCAN1_C1RXF24.setEXID; inline;
  85239. begin
  85240. pTDefRegMap(@Self)^.&set := $00080000;
  85241. end;
  85242. procedure TCAN1_C1RXF24.clearEXID; inline;
  85243. begin
  85244. pTDefRegMap(@Self)^.clr := $00080000;
  85245. end;
  85246. procedure TCAN1_C1RXF24.setEXID(thebits : TBits_1); inline;
  85247. begin
  85248. if thebits = 0 then
  85249. pTDefRegMap(@Self)^.clr := $00080000
  85250. else
  85251. pTDefRegMap(@Self)^.&set := $00080000;
  85252. end;
  85253. function TCAN1_C1RXF24.getEXID : TBits_1; inline;
  85254. begin
  85255. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85256. end;
  85257. procedure TCAN1_C1RXF24.setSID(thebits : TBits_11); inline;
  85258. begin
  85259. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85260. end;
  85261. function TCAN1_C1RXF24.getSID : TBits_11; inline;
  85262. begin
  85263. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85264. end;
  85265. procedure TCAN1_C1RXF24.setw(thebits : TBits_32); inline;
  85266. begin
  85267. pTDefRegMap(@Self)^.val := thebits;
  85268. end;
  85269. function TCAN1_C1RXF24.getw : TBits_32; inline;
  85270. begin
  85271. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85272. end;
  85273. procedure TCAN1_C1RXF25.setEID(thebits : TBits_18); inline;
  85274. begin
  85275. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85276. end;
  85277. function TCAN1_C1RXF25.getEID : TBits_18; inline;
  85278. begin
  85279. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85280. end;
  85281. procedure TCAN1_C1RXF25.setEXID; inline;
  85282. begin
  85283. pTDefRegMap(@Self)^.&set := $00080000;
  85284. end;
  85285. procedure TCAN1_C1RXF25.clearEXID; inline;
  85286. begin
  85287. pTDefRegMap(@Self)^.clr := $00080000;
  85288. end;
  85289. procedure TCAN1_C1RXF25.setEXID(thebits : TBits_1); inline;
  85290. begin
  85291. if thebits = 0 then
  85292. pTDefRegMap(@Self)^.clr := $00080000
  85293. else
  85294. pTDefRegMap(@Self)^.&set := $00080000;
  85295. end;
  85296. function TCAN1_C1RXF25.getEXID : TBits_1; inline;
  85297. begin
  85298. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85299. end;
  85300. procedure TCAN1_C1RXF25.setSID(thebits : TBits_11); inline;
  85301. begin
  85302. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85303. end;
  85304. function TCAN1_C1RXF25.getSID : TBits_11; inline;
  85305. begin
  85306. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85307. end;
  85308. procedure TCAN1_C1RXF25.setw(thebits : TBits_32); inline;
  85309. begin
  85310. pTDefRegMap(@Self)^.val := thebits;
  85311. end;
  85312. function TCAN1_C1RXF25.getw : TBits_32; inline;
  85313. begin
  85314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85315. end;
  85316. procedure TCAN1_C1RXF26.setEID(thebits : TBits_18); inline;
  85317. begin
  85318. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85319. end;
  85320. function TCAN1_C1RXF26.getEID : TBits_18; inline;
  85321. begin
  85322. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85323. end;
  85324. procedure TCAN1_C1RXF26.setEXID; inline;
  85325. begin
  85326. pTDefRegMap(@Self)^.&set := $00080000;
  85327. end;
  85328. procedure TCAN1_C1RXF26.clearEXID; inline;
  85329. begin
  85330. pTDefRegMap(@Self)^.clr := $00080000;
  85331. end;
  85332. procedure TCAN1_C1RXF26.setEXID(thebits : TBits_1); inline;
  85333. begin
  85334. if thebits = 0 then
  85335. pTDefRegMap(@Self)^.clr := $00080000
  85336. else
  85337. pTDefRegMap(@Self)^.&set := $00080000;
  85338. end;
  85339. function TCAN1_C1RXF26.getEXID : TBits_1; inline;
  85340. begin
  85341. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85342. end;
  85343. procedure TCAN1_C1RXF26.setSID(thebits : TBits_11); inline;
  85344. begin
  85345. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85346. end;
  85347. function TCAN1_C1RXF26.getSID : TBits_11; inline;
  85348. begin
  85349. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85350. end;
  85351. procedure TCAN1_C1RXF26.setw(thebits : TBits_32); inline;
  85352. begin
  85353. pTDefRegMap(@Self)^.val := thebits;
  85354. end;
  85355. function TCAN1_C1RXF26.getw : TBits_32; inline;
  85356. begin
  85357. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85358. end;
  85359. procedure TCAN1_C1RXF27.setEID(thebits : TBits_18); inline;
  85360. begin
  85361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85362. end;
  85363. function TCAN1_C1RXF27.getEID : TBits_18; inline;
  85364. begin
  85365. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85366. end;
  85367. procedure TCAN1_C1RXF27.setEXID; inline;
  85368. begin
  85369. pTDefRegMap(@Self)^.&set := $00080000;
  85370. end;
  85371. procedure TCAN1_C1RXF27.clearEXID; inline;
  85372. begin
  85373. pTDefRegMap(@Self)^.clr := $00080000;
  85374. end;
  85375. procedure TCAN1_C1RXF27.setEXID(thebits : TBits_1); inline;
  85376. begin
  85377. if thebits = 0 then
  85378. pTDefRegMap(@Self)^.clr := $00080000
  85379. else
  85380. pTDefRegMap(@Self)^.&set := $00080000;
  85381. end;
  85382. function TCAN1_C1RXF27.getEXID : TBits_1; inline;
  85383. begin
  85384. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85385. end;
  85386. procedure TCAN1_C1RXF27.setSID(thebits : TBits_11); inline;
  85387. begin
  85388. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85389. end;
  85390. function TCAN1_C1RXF27.getSID : TBits_11; inline;
  85391. begin
  85392. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85393. end;
  85394. procedure TCAN1_C1RXF27.setw(thebits : TBits_32); inline;
  85395. begin
  85396. pTDefRegMap(@Self)^.val := thebits;
  85397. end;
  85398. function TCAN1_C1RXF27.getw : TBits_32; inline;
  85399. begin
  85400. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85401. end;
  85402. procedure TCAN1_C1RXF28.setEID(thebits : TBits_18); inline;
  85403. begin
  85404. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85405. end;
  85406. function TCAN1_C1RXF28.getEID : TBits_18; inline;
  85407. begin
  85408. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85409. end;
  85410. procedure TCAN1_C1RXF28.setEXID; inline;
  85411. begin
  85412. pTDefRegMap(@Self)^.&set := $00080000;
  85413. end;
  85414. procedure TCAN1_C1RXF28.clearEXID; inline;
  85415. begin
  85416. pTDefRegMap(@Self)^.clr := $00080000;
  85417. end;
  85418. procedure TCAN1_C1RXF28.setEXID(thebits : TBits_1); inline;
  85419. begin
  85420. if thebits = 0 then
  85421. pTDefRegMap(@Self)^.clr := $00080000
  85422. else
  85423. pTDefRegMap(@Self)^.&set := $00080000;
  85424. end;
  85425. function TCAN1_C1RXF28.getEXID : TBits_1; inline;
  85426. begin
  85427. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85428. end;
  85429. procedure TCAN1_C1RXF28.setSID(thebits : TBits_11); inline;
  85430. begin
  85431. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85432. end;
  85433. function TCAN1_C1RXF28.getSID : TBits_11; inline;
  85434. begin
  85435. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85436. end;
  85437. procedure TCAN1_C1RXF28.setw(thebits : TBits_32); inline;
  85438. begin
  85439. pTDefRegMap(@Self)^.val := thebits;
  85440. end;
  85441. function TCAN1_C1RXF28.getw : TBits_32; inline;
  85442. begin
  85443. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85444. end;
  85445. procedure TCAN1_C1RXF29.setEID(thebits : TBits_18); inline;
  85446. begin
  85447. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85448. end;
  85449. function TCAN1_C1RXF29.getEID : TBits_18; inline;
  85450. begin
  85451. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85452. end;
  85453. procedure TCAN1_C1RXF29.setEXID; inline;
  85454. begin
  85455. pTDefRegMap(@Self)^.&set := $00080000;
  85456. end;
  85457. procedure TCAN1_C1RXF29.clearEXID; inline;
  85458. begin
  85459. pTDefRegMap(@Self)^.clr := $00080000;
  85460. end;
  85461. procedure TCAN1_C1RXF29.setEXID(thebits : TBits_1); inline;
  85462. begin
  85463. if thebits = 0 then
  85464. pTDefRegMap(@Self)^.clr := $00080000
  85465. else
  85466. pTDefRegMap(@Self)^.&set := $00080000;
  85467. end;
  85468. function TCAN1_C1RXF29.getEXID : TBits_1; inline;
  85469. begin
  85470. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85471. end;
  85472. procedure TCAN1_C1RXF29.setSID(thebits : TBits_11); inline;
  85473. begin
  85474. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85475. end;
  85476. function TCAN1_C1RXF29.getSID : TBits_11; inline;
  85477. begin
  85478. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85479. end;
  85480. procedure TCAN1_C1RXF29.setw(thebits : TBits_32); inline;
  85481. begin
  85482. pTDefRegMap(@Self)^.val := thebits;
  85483. end;
  85484. function TCAN1_C1RXF29.getw : TBits_32; inline;
  85485. begin
  85486. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85487. end;
  85488. procedure TCAN1_C1RXF30.setEID(thebits : TBits_18); inline;
  85489. begin
  85490. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85491. end;
  85492. function TCAN1_C1RXF30.getEID : TBits_18; inline;
  85493. begin
  85494. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85495. end;
  85496. procedure TCAN1_C1RXF30.setEXID; inline;
  85497. begin
  85498. pTDefRegMap(@Self)^.&set := $00080000;
  85499. end;
  85500. procedure TCAN1_C1RXF30.clearEXID; inline;
  85501. begin
  85502. pTDefRegMap(@Self)^.clr := $00080000;
  85503. end;
  85504. procedure TCAN1_C1RXF30.setEXID(thebits : TBits_1); inline;
  85505. begin
  85506. if thebits = 0 then
  85507. pTDefRegMap(@Self)^.clr := $00080000
  85508. else
  85509. pTDefRegMap(@Self)^.&set := $00080000;
  85510. end;
  85511. function TCAN1_C1RXF30.getEXID : TBits_1; inline;
  85512. begin
  85513. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85514. end;
  85515. procedure TCAN1_C1RXF30.setSID(thebits : TBits_11); inline;
  85516. begin
  85517. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85518. end;
  85519. function TCAN1_C1RXF30.getSID : TBits_11; inline;
  85520. begin
  85521. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85522. end;
  85523. procedure TCAN1_C1RXF30.setw(thebits : TBits_32); inline;
  85524. begin
  85525. pTDefRegMap(@Self)^.val := thebits;
  85526. end;
  85527. function TCAN1_C1RXF30.getw : TBits_32; inline;
  85528. begin
  85529. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85530. end;
  85531. procedure TCAN1_C1RXF31.setEID(thebits : TBits_18); inline;
  85532. begin
  85533. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  85534. end;
  85535. function TCAN1_C1RXF31.getEID : TBits_18; inline;
  85536. begin
  85537. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  85538. end;
  85539. procedure TCAN1_C1RXF31.setEXID; inline;
  85540. begin
  85541. pTDefRegMap(@Self)^.&set := $00080000;
  85542. end;
  85543. procedure TCAN1_C1RXF31.clearEXID; inline;
  85544. begin
  85545. pTDefRegMap(@Self)^.clr := $00080000;
  85546. end;
  85547. procedure TCAN1_C1RXF31.setEXID(thebits : TBits_1); inline;
  85548. begin
  85549. if thebits = 0 then
  85550. pTDefRegMap(@Self)^.clr := $00080000
  85551. else
  85552. pTDefRegMap(@Self)^.&set := $00080000;
  85553. end;
  85554. function TCAN1_C1RXF31.getEXID : TBits_1; inline;
  85555. begin
  85556. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85557. end;
  85558. procedure TCAN1_C1RXF31.setSID(thebits : TBits_11); inline;
  85559. begin
  85560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  85561. end;
  85562. function TCAN1_C1RXF31.getSID : TBits_11; inline;
  85563. begin
  85564. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  85565. end;
  85566. procedure TCAN1_C1RXF31.setw(thebits : TBits_32); inline;
  85567. begin
  85568. pTDefRegMap(@Self)^.val := thebits;
  85569. end;
  85570. function TCAN1_C1RXF31.getw : TBits_32; inline;
  85571. begin
  85572. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85573. end;
  85574. procedure TCAN1_C1FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  85575. begin
  85576. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  85577. end;
  85578. function TCAN1_C1FIFOCON0.getTXPRI : TBits_2; inline;
  85579. begin
  85580. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  85581. end;
  85582. procedure TCAN1_C1FIFOCON0.setRTREN; inline;
  85583. begin
  85584. pTDefRegMap(@Self)^.&set := $00000004;
  85585. end;
  85586. procedure TCAN1_C1FIFOCON0.clearRTREN; inline;
  85587. begin
  85588. pTDefRegMap(@Self)^.clr := $00000004;
  85589. end;
  85590. procedure TCAN1_C1FIFOCON0.setRTREN(thebits : TBits_1); inline;
  85591. begin
  85592. if thebits = 0 then
  85593. pTDefRegMap(@Self)^.clr := $00000004
  85594. else
  85595. pTDefRegMap(@Self)^.&set := $00000004;
  85596. end;
  85597. function TCAN1_C1FIFOCON0.getRTREN : TBits_1; inline;
  85598. begin
  85599. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85600. end;
  85601. procedure TCAN1_C1FIFOCON0.setTXREQ; inline;
  85602. begin
  85603. pTDefRegMap(@Self)^.&set := $00000008;
  85604. end;
  85605. procedure TCAN1_C1FIFOCON0.clearTXREQ; inline;
  85606. begin
  85607. pTDefRegMap(@Self)^.clr := $00000008;
  85608. end;
  85609. procedure TCAN1_C1FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  85610. begin
  85611. if thebits = 0 then
  85612. pTDefRegMap(@Self)^.clr := $00000008
  85613. else
  85614. pTDefRegMap(@Self)^.&set := $00000008;
  85615. end;
  85616. function TCAN1_C1FIFOCON0.getTXREQ : TBits_1; inline;
  85617. begin
  85618. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85619. end;
  85620. procedure TCAN1_C1FIFOCON0.setTXERR; inline;
  85621. begin
  85622. pTDefRegMap(@Self)^.&set := $00000010;
  85623. end;
  85624. procedure TCAN1_C1FIFOCON0.clearTXERR; inline;
  85625. begin
  85626. pTDefRegMap(@Self)^.clr := $00000010;
  85627. end;
  85628. procedure TCAN1_C1FIFOCON0.setTXERR(thebits : TBits_1); inline;
  85629. begin
  85630. if thebits = 0 then
  85631. pTDefRegMap(@Self)^.clr := $00000010
  85632. else
  85633. pTDefRegMap(@Self)^.&set := $00000010;
  85634. end;
  85635. function TCAN1_C1FIFOCON0.getTXERR : TBits_1; inline;
  85636. begin
  85637. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  85638. end;
  85639. procedure TCAN1_C1FIFOCON0.setTXLARB; inline;
  85640. begin
  85641. pTDefRegMap(@Self)^.&set := $00000020;
  85642. end;
  85643. procedure TCAN1_C1FIFOCON0.clearTXLARB; inline;
  85644. begin
  85645. pTDefRegMap(@Self)^.clr := $00000020;
  85646. end;
  85647. procedure TCAN1_C1FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  85648. begin
  85649. if thebits = 0 then
  85650. pTDefRegMap(@Self)^.clr := $00000020
  85651. else
  85652. pTDefRegMap(@Self)^.&set := $00000020;
  85653. end;
  85654. function TCAN1_C1FIFOCON0.getTXLARB : TBits_1; inline;
  85655. begin
  85656. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  85657. end;
  85658. procedure TCAN1_C1FIFOCON0.setTXABAT; inline;
  85659. begin
  85660. pTDefRegMap(@Self)^.&set := $00000040;
  85661. end;
  85662. procedure TCAN1_C1FIFOCON0.clearTXABAT; inline;
  85663. begin
  85664. pTDefRegMap(@Self)^.clr := $00000040;
  85665. end;
  85666. procedure TCAN1_C1FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  85667. begin
  85668. if thebits = 0 then
  85669. pTDefRegMap(@Self)^.clr := $00000040
  85670. else
  85671. pTDefRegMap(@Self)^.&set := $00000040;
  85672. end;
  85673. function TCAN1_C1FIFOCON0.getTXABAT : TBits_1; inline;
  85674. begin
  85675. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  85676. end;
  85677. procedure TCAN1_C1FIFOCON0.setTXEN; inline;
  85678. begin
  85679. pTDefRegMap(@Self)^.&set := $00000080;
  85680. end;
  85681. procedure TCAN1_C1FIFOCON0.clearTXEN; inline;
  85682. begin
  85683. pTDefRegMap(@Self)^.clr := $00000080;
  85684. end;
  85685. procedure TCAN1_C1FIFOCON0.setTXEN(thebits : TBits_1); inline;
  85686. begin
  85687. if thebits = 0 then
  85688. pTDefRegMap(@Self)^.clr := $00000080
  85689. else
  85690. pTDefRegMap(@Self)^.&set := $00000080;
  85691. end;
  85692. function TCAN1_C1FIFOCON0.getTXEN : TBits_1; inline;
  85693. begin
  85694. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  85695. end;
  85696. procedure TCAN1_C1FIFOCON0.setDONLY; inline;
  85697. begin
  85698. pTDefRegMap(@Self)^.&set := $00001000;
  85699. end;
  85700. procedure TCAN1_C1FIFOCON0.clearDONLY; inline;
  85701. begin
  85702. pTDefRegMap(@Self)^.clr := $00001000;
  85703. end;
  85704. procedure TCAN1_C1FIFOCON0.setDONLY(thebits : TBits_1); inline;
  85705. begin
  85706. if thebits = 0 then
  85707. pTDefRegMap(@Self)^.clr := $00001000
  85708. else
  85709. pTDefRegMap(@Self)^.&set := $00001000;
  85710. end;
  85711. function TCAN1_C1FIFOCON0.getDONLY : TBits_1; inline;
  85712. begin
  85713. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  85714. end;
  85715. procedure TCAN1_C1FIFOCON0.setUINC; inline;
  85716. begin
  85717. pTDefRegMap(@Self)^.&set := $00002000;
  85718. end;
  85719. procedure TCAN1_C1FIFOCON0.clearUINC; inline;
  85720. begin
  85721. pTDefRegMap(@Self)^.clr := $00002000;
  85722. end;
  85723. procedure TCAN1_C1FIFOCON0.setUINC(thebits : TBits_1); inline;
  85724. begin
  85725. if thebits = 0 then
  85726. pTDefRegMap(@Self)^.clr := $00002000
  85727. else
  85728. pTDefRegMap(@Self)^.&set := $00002000;
  85729. end;
  85730. function TCAN1_C1FIFOCON0.getUINC : TBits_1; inline;
  85731. begin
  85732. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  85733. end;
  85734. procedure TCAN1_C1FIFOCON0.setFRESET; inline;
  85735. begin
  85736. pTDefRegMap(@Self)^.&set := $00004000;
  85737. end;
  85738. procedure TCAN1_C1FIFOCON0.clearFRESET; inline;
  85739. begin
  85740. pTDefRegMap(@Self)^.clr := $00004000;
  85741. end;
  85742. procedure TCAN1_C1FIFOCON0.setFRESET(thebits : TBits_1); inline;
  85743. begin
  85744. if thebits = 0 then
  85745. pTDefRegMap(@Self)^.clr := $00004000
  85746. else
  85747. pTDefRegMap(@Self)^.&set := $00004000;
  85748. end;
  85749. function TCAN1_C1FIFOCON0.getFRESET : TBits_1; inline;
  85750. begin
  85751. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  85752. end;
  85753. procedure TCAN1_C1FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  85754. begin
  85755. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  85756. end;
  85757. function TCAN1_C1FIFOCON0.getFSIZE : TBits_5; inline;
  85758. begin
  85759. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  85760. end;
  85761. procedure TCAN1_C1FIFOCON0.setw(thebits : TBits_32); inline;
  85762. begin
  85763. pTDefRegMap(@Self)^.val := thebits;
  85764. end;
  85765. function TCAN1_C1FIFOCON0.getw : TBits_32; inline;
  85766. begin
  85767. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85768. end;
  85769. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF; inline;
  85770. begin
  85771. pTDefRegMap(@Self)^.&set := $00000001;
  85772. end;
  85773. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIF; inline;
  85774. begin
  85775. pTDefRegMap(@Self)^.clr := $00000001;
  85776. end;
  85777. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  85778. begin
  85779. if thebits = 0 then
  85780. pTDefRegMap(@Self)^.clr := $00000001
  85781. else
  85782. pTDefRegMap(@Self)^.&set := $00000001;
  85783. end;
  85784. function TCAN1_C1FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  85785. begin
  85786. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  85787. end;
  85788. procedure TCAN1_C1FIFOINT0.setRXHALFIF; inline;
  85789. begin
  85790. pTDefRegMap(@Self)^.&set := $00000002;
  85791. end;
  85792. procedure TCAN1_C1FIFOINT0.clearRXHALFIF; inline;
  85793. begin
  85794. pTDefRegMap(@Self)^.clr := $00000002;
  85795. end;
  85796. procedure TCAN1_C1FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  85797. begin
  85798. if thebits = 0 then
  85799. pTDefRegMap(@Self)^.clr := $00000002
  85800. else
  85801. pTDefRegMap(@Self)^.&set := $00000002;
  85802. end;
  85803. function TCAN1_C1FIFOINT0.getRXHALFIF : TBits_1; inline;
  85804. begin
  85805. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  85806. end;
  85807. procedure TCAN1_C1FIFOINT0.setRXFULLIF; inline;
  85808. begin
  85809. pTDefRegMap(@Self)^.&set := $00000004;
  85810. end;
  85811. procedure TCAN1_C1FIFOINT0.clearRXFULLIF; inline;
  85812. begin
  85813. pTDefRegMap(@Self)^.clr := $00000004;
  85814. end;
  85815. procedure TCAN1_C1FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  85816. begin
  85817. if thebits = 0 then
  85818. pTDefRegMap(@Self)^.clr := $00000004
  85819. else
  85820. pTDefRegMap(@Self)^.&set := $00000004;
  85821. end;
  85822. function TCAN1_C1FIFOINT0.getRXFULLIF : TBits_1; inline;
  85823. begin
  85824. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85825. end;
  85826. procedure TCAN1_C1FIFOINT0.setRXOVFLIF; inline;
  85827. begin
  85828. pTDefRegMap(@Self)^.&set := $00000008;
  85829. end;
  85830. procedure TCAN1_C1FIFOINT0.clearRXOVFLIF; inline;
  85831. begin
  85832. pTDefRegMap(@Self)^.clr := $00000008;
  85833. end;
  85834. procedure TCAN1_C1FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  85835. begin
  85836. if thebits = 0 then
  85837. pTDefRegMap(@Self)^.clr := $00000008
  85838. else
  85839. pTDefRegMap(@Self)^.&set := $00000008;
  85840. end;
  85841. function TCAN1_C1FIFOINT0.getRXOVFLIF : TBits_1; inline;
  85842. begin
  85843. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85844. end;
  85845. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF; inline;
  85846. begin
  85847. pTDefRegMap(@Self)^.&set := $00000100;
  85848. end;
  85849. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIF; inline;
  85850. begin
  85851. pTDefRegMap(@Self)^.clr := $00000100;
  85852. end;
  85853. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  85854. begin
  85855. if thebits = 0 then
  85856. pTDefRegMap(@Self)^.clr := $00000100
  85857. else
  85858. pTDefRegMap(@Self)^.&set := $00000100;
  85859. end;
  85860. function TCAN1_C1FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  85861. begin
  85862. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  85863. end;
  85864. procedure TCAN1_C1FIFOINT0.setTXHALFIF; inline;
  85865. begin
  85866. pTDefRegMap(@Self)^.&set := $00000200;
  85867. end;
  85868. procedure TCAN1_C1FIFOINT0.clearTXHALFIF; inline;
  85869. begin
  85870. pTDefRegMap(@Self)^.clr := $00000200;
  85871. end;
  85872. procedure TCAN1_C1FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  85873. begin
  85874. if thebits = 0 then
  85875. pTDefRegMap(@Self)^.clr := $00000200
  85876. else
  85877. pTDefRegMap(@Self)^.&set := $00000200;
  85878. end;
  85879. function TCAN1_C1FIFOINT0.getTXHALFIF : TBits_1; inline;
  85880. begin
  85881. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  85882. end;
  85883. procedure TCAN1_C1FIFOINT0.setTXNFULLIF; inline;
  85884. begin
  85885. pTDefRegMap(@Self)^.&set := $00000400;
  85886. end;
  85887. procedure TCAN1_C1FIFOINT0.clearTXNFULLIF; inline;
  85888. begin
  85889. pTDefRegMap(@Self)^.clr := $00000400;
  85890. end;
  85891. procedure TCAN1_C1FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  85892. begin
  85893. if thebits = 0 then
  85894. pTDefRegMap(@Self)^.clr := $00000400
  85895. else
  85896. pTDefRegMap(@Self)^.&set := $00000400;
  85897. end;
  85898. function TCAN1_C1FIFOINT0.getTXNFULLIF : TBits_1; inline;
  85899. begin
  85900. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  85901. end;
  85902. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE; inline;
  85903. begin
  85904. pTDefRegMap(@Self)^.&set := $00010000;
  85905. end;
  85906. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIE; inline;
  85907. begin
  85908. pTDefRegMap(@Self)^.clr := $00010000;
  85909. end;
  85910. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  85911. begin
  85912. if thebits = 0 then
  85913. pTDefRegMap(@Self)^.clr := $00010000
  85914. else
  85915. pTDefRegMap(@Self)^.&set := $00010000;
  85916. end;
  85917. function TCAN1_C1FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  85918. begin
  85919. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  85920. end;
  85921. procedure TCAN1_C1FIFOINT0.setRXHALFIE; inline;
  85922. begin
  85923. pTDefRegMap(@Self)^.&set := $00020000;
  85924. end;
  85925. procedure TCAN1_C1FIFOINT0.clearRXHALFIE; inline;
  85926. begin
  85927. pTDefRegMap(@Self)^.clr := $00020000;
  85928. end;
  85929. procedure TCAN1_C1FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  85930. begin
  85931. if thebits = 0 then
  85932. pTDefRegMap(@Self)^.clr := $00020000
  85933. else
  85934. pTDefRegMap(@Self)^.&set := $00020000;
  85935. end;
  85936. function TCAN1_C1FIFOINT0.getRXHALFIE : TBits_1; inline;
  85937. begin
  85938. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  85939. end;
  85940. procedure TCAN1_C1FIFOINT0.setRXFULLIE; inline;
  85941. begin
  85942. pTDefRegMap(@Self)^.&set := $00040000;
  85943. end;
  85944. procedure TCAN1_C1FIFOINT0.clearRXFULLIE; inline;
  85945. begin
  85946. pTDefRegMap(@Self)^.clr := $00040000;
  85947. end;
  85948. procedure TCAN1_C1FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  85949. begin
  85950. if thebits = 0 then
  85951. pTDefRegMap(@Self)^.clr := $00040000
  85952. else
  85953. pTDefRegMap(@Self)^.&set := $00040000;
  85954. end;
  85955. function TCAN1_C1FIFOINT0.getRXFULLIE : TBits_1; inline;
  85956. begin
  85957. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  85958. end;
  85959. procedure TCAN1_C1FIFOINT0.setRXOVFLIE; inline;
  85960. begin
  85961. pTDefRegMap(@Self)^.&set := $00080000;
  85962. end;
  85963. procedure TCAN1_C1FIFOINT0.clearRXOVFLIE; inline;
  85964. begin
  85965. pTDefRegMap(@Self)^.clr := $00080000;
  85966. end;
  85967. procedure TCAN1_C1FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  85968. begin
  85969. if thebits = 0 then
  85970. pTDefRegMap(@Self)^.clr := $00080000
  85971. else
  85972. pTDefRegMap(@Self)^.&set := $00080000;
  85973. end;
  85974. function TCAN1_C1FIFOINT0.getRXOVFLIE : TBits_1; inline;
  85975. begin
  85976. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85977. end;
  85978. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE; inline;
  85979. begin
  85980. pTDefRegMap(@Self)^.&set := $01000000;
  85981. end;
  85982. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIE; inline;
  85983. begin
  85984. pTDefRegMap(@Self)^.clr := $01000000;
  85985. end;
  85986. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  85987. begin
  85988. if thebits = 0 then
  85989. pTDefRegMap(@Self)^.clr := $01000000
  85990. else
  85991. pTDefRegMap(@Self)^.&set := $01000000;
  85992. end;
  85993. function TCAN1_C1FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  85994. begin
  85995. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  85996. end;
  85997. procedure TCAN1_C1FIFOINT0.setTXHALFIE; inline;
  85998. begin
  85999. pTDefRegMap(@Self)^.&set := $02000000;
  86000. end;
  86001. procedure TCAN1_C1FIFOINT0.clearTXHALFIE; inline;
  86002. begin
  86003. pTDefRegMap(@Self)^.clr := $02000000;
  86004. end;
  86005. procedure TCAN1_C1FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  86006. begin
  86007. if thebits = 0 then
  86008. pTDefRegMap(@Self)^.clr := $02000000
  86009. else
  86010. pTDefRegMap(@Self)^.&set := $02000000;
  86011. end;
  86012. function TCAN1_C1FIFOINT0.getTXHALFIE : TBits_1; inline;
  86013. begin
  86014. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  86015. end;
  86016. procedure TCAN1_C1FIFOINT0.setTXNFULLIE; inline;
  86017. begin
  86018. pTDefRegMap(@Self)^.&set := $04000000;
  86019. end;
  86020. procedure TCAN1_C1FIFOINT0.clearTXNFULLIE; inline;
  86021. begin
  86022. pTDefRegMap(@Self)^.clr := $04000000;
  86023. end;
  86024. procedure TCAN1_C1FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  86025. begin
  86026. if thebits = 0 then
  86027. pTDefRegMap(@Self)^.clr := $04000000
  86028. else
  86029. pTDefRegMap(@Self)^.&set := $04000000;
  86030. end;
  86031. function TCAN1_C1FIFOINT0.getTXNFULLIE : TBits_1; inline;
  86032. begin
  86033. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  86034. end;
  86035. procedure TCAN1_C1FIFOINT0.setw(thebits : TBits_32); inline;
  86036. begin
  86037. pTDefRegMap(@Self)^.val := thebits;
  86038. end;
  86039. function TCAN1_C1FIFOINT0.getw : TBits_32; inline;
  86040. begin
  86041. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86042. end;
  86043. procedure TCAN1_C1FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  86044. begin
  86045. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  86046. end;
  86047. function TCAN1_C1FIFOCI0.getCFIFOCI : TBits_5; inline;
  86048. begin
  86049. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  86050. end;
  86051. procedure TCAN1_C1FIFOCI0.setw(thebits : TBits_32); inline;
  86052. begin
  86053. pTDefRegMap(@Self)^.val := thebits;
  86054. end;
  86055. function TCAN1_C1FIFOCI0.getw : TBits_32; inline;
  86056. begin
  86057. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86058. end;
  86059. procedure TCAN1_C1FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  86060. begin
  86061. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  86062. end;
  86063. function TCAN1_C1FIFOCON1.getTXPRI : TBits_2; inline;
  86064. begin
  86065. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  86066. end;
  86067. procedure TCAN1_C1FIFOCON1.setRTREN; inline;
  86068. begin
  86069. pTDefRegMap(@Self)^.&set := $00000004;
  86070. end;
  86071. procedure TCAN1_C1FIFOCON1.clearRTREN; inline;
  86072. begin
  86073. pTDefRegMap(@Self)^.clr := $00000004;
  86074. end;
  86075. procedure TCAN1_C1FIFOCON1.setRTREN(thebits : TBits_1); inline;
  86076. begin
  86077. if thebits = 0 then
  86078. pTDefRegMap(@Self)^.clr := $00000004
  86079. else
  86080. pTDefRegMap(@Self)^.&set := $00000004;
  86081. end;
  86082. function TCAN1_C1FIFOCON1.getRTREN : TBits_1; inline;
  86083. begin
  86084. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86085. end;
  86086. procedure TCAN1_C1FIFOCON1.setTXREQ; inline;
  86087. begin
  86088. pTDefRegMap(@Self)^.&set := $00000008;
  86089. end;
  86090. procedure TCAN1_C1FIFOCON1.clearTXREQ; inline;
  86091. begin
  86092. pTDefRegMap(@Self)^.clr := $00000008;
  86093. end;
  86094. procedure TCAN1_C1FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  86095. begin
  86096. if thebits = 0 then
  86097. pTDefRegMap(@Self)^.clr := $00000008
  86098. else
  86099. pTDefRegMap(@Self)^.&set := $00000008;
  86100. end;
  86101. function TCAN1_C1FIFOCON1.getTXREQ : TBits_1; inline;
  86102. begin
  86103. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86104. end;
  86105. procedure TCAN1_C1FIFOCON1.setTXERR; inline;
  86106. begin
  86107. pTDefRegMap(@Self)^.&set := $00000010;
  86108. end;
  86109. procedure TCAN1_C1FIFOCON1.clearTXERR; inline;
  86110. begin
  86111. pTDefRegMap(@Self)^.clr := $00000010;
  86112. end;
  86113. procedure TCAN1_C1FIFOCON1.setTXERR(thebits : TBits_1); inline;
  86114. begin
  86115. if thebits = 0 then
  86116. pTDefRegMap(@Self)^.clr := $00000010
  86117. else
  86118. pTDefRegMap(@Self)^.&set := $00000010;
  86119. end;
  86120. function TCAN1_C1FIFOCON1.getTXERR : TBits_1; inline;
  86121. begin
  86122. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  86123. end;
  86124. procedure TCAN1_C1FIFOCON1.setTXLARB; inline;
  86125. begin
  86126. pTDefRegMap(@Self)^.&set := $00000020;
  86127. end;
  86128. procedure TCAN1_C1FIFOCON1.clearTXLARB; inline;
  86129. begin
  86130. pTDefRegMap(@Self)^.clr := $00000020;
  86131. end;
  86132. procedure TCAN1_C1FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  86133. begin
  86134. if thebits = 0 then
  86135. pTDefRegMap(@Self)^.clr := $00000020
  86136. else
  86137. pTDefRegMap(@Self)^.&set := $00000020;
  86138. end;
  86139. function TCAN1_C1FIFOCON1.getTXLARB : TBits_1; inline;
  86140. begin
  86141. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  86142. end;
  86143. procedure TCAN1_C1FIFOCON1.setTXABAT; inline;
  86144. begin
  86145. pTDefRegMap(@Self)^.&set := $00000040;
  86146. end;
  86147. procedure TCAN1_C1FIFOCON1.clearTXABAT; inline;
  86148. begin
  86149. pTDefRegMap(@Self)^.clr := $00000040;
  86150. end;
  86151. procedure TCAN1_C1FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  86152. begin
  86153. if thebits = 0 then
  86154. pTDefRegMap(@Self)^.clr := $00000040
  86155. else
  86156. pTDefRegMap(@Self)^.&set := $00000040;
  86157. end;
  86158. function TCAN1_C1FIFOCON1.getTXABAT : TBits_1; inline;
  86159. begin
  86160. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  86161. end;
  86162. procedure TCAN1_C1FIFOCON1.setTXEN; inline;
  86163. begin
  86164. pTDefRegMap(@Self)^.&set := $00000080;
  86165. end;
  86166. procedure TCAN1_C1FIFOCON1.clearTXEN; inline;
  86167. begin
  86168. pTDefRegMap(@Self)^.clr := $00000080;
  86169. end;
  86170. procedure TCAN1_C1FIFOCON1.setTXEN(thebits : TBits_1); inline;
  86171. begin
  86172. if thebits = 0 then
  86173. pTDefRegMap(@Self)^.clr := $00000080
  86174. else
  86175. pTDefRegMap(@Self)^.&set := $00000080;
  86176. end;
  86177. function TCAN1_C1FIFOCON1.getTXEN : TBits_1; inline;
  86178. begin
  86179. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  86180. end;
  86181. procedure TCAN1_C1FIFOCON1.setDONLY; inline;
  86182. begin
  86183. pTDefRegMap(@Self)^.&set := $00001000;
  86184. end;
  86185. procedure TCAN1_C1FIFOCON1.clearDONLY; inline;
  86186. begin
  86187. pTDefRegMap(@Self)^.clr := $00001000;
  86188. end;
  86189. procedure TCAN1_C1FIFOCON1.setDONLY(thebits : TBits_1); inline;
  86190. begin
  86191. if thebits = 0 then
  86192. pTDefRegMap(@Self)^.clr := $00001000
  86193. else
  86194. pTDefRegMap(@Self)^.&set := $00001000;
  86195. end;
  86196. function TCAN1_C1FIFOCON1.getDONLY : TBits_1; inline;
  86197. begin
  86198. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  86199. end;
  86200. procedure TCAN1_C1FIFOCON1.setUINC; inline;
  86201. begin
  86202. pTDefRegMap(@Self)^.&set := $00002000;
  86203. end;
  86204. procedure TCAN1_C1FIFOCON1.clearUINC; inline;
  86205. begin
  86206. pTDefRegMap(@Self)^.clr := $00002000;
  86207. end;
  86208. procedure TCAN1_C1FIFOCON1.setUINC(thebits : TBits_1); inline;
  86209. begin
  86210. if thebits = 0 then
  86211. pTDefRegMap(@Self)^.clr := $00002000
  86212. else
  86213. pTDefRegMap(@Self)^.&set := $00002000;
  86214. end;
  86215. function TCAN1_C1FIFOCON1.getUINC : TBits_1; inline;
  86216. begin
  86217. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  86218. end;
  86219. procedure TCAN1_C1FIFOCON1.setFRESET; inline;
  86220. begin
  86221. pTDefRegMap(@Self)^.&set := $00004000;
  86222. end;
  86223. procedure TCAN1_C1FIFOCON1.clearFRESET; inline;
  86224. begin
  86225. pTDefRegMap(@Self)^.clr := $00004000;
  86226. end;
  86227. procedure TCAN1_C1FIFOCON1.setFRESET(thebits : TBits_1); inline;
  86228. begin
  86229. if thebits = 0 then
  86230. pTDefRegMap(@Self)^.clr := $00004000
  86231. else
  86232. pTDefRegMap(@Self)^.&set := $00004000;
  86233. end;
  86234. function TCAN1_C1FIFOCON1.getFRESET : TBits_1; inline;
  86235. begin
  86236. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  86237. end;
  86238. procedure TCAN1_C1FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  86239. begin
  86240. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  86241. end;
  86242. function TCAN1_C1FIFOCON1.getFSIZE : TBits_5; inline;
  86243. begin
  86244. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  86245. end;
  86246. procedure TCAN1_C1FIFOCON1.setw(thebits : TBits_32); inline;
  86247. begin
  86248. pTDefRegMap(@Self)^.val := thebits;
  86249. end;
  86250. function TCAN1_C1FIFOCON1.getw : TBits_32; inline;
  86251. begin
  86252. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86253. end;
  86254. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF; inline;
  86255. begin
  86256. pTDefRegMap(@Self)^.&set := $00000001;
  86257. end;
  86258. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIF; inline;
  86259. begin
  86260. pTDefRegMap(@Self)^.clr := $00000001;
  86261. end;
  86262. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  86263. begin
  86264. if thebits = 0 then
  86265. pTDefRegMap(@Self)^.clr := $00000001
  86266. else
  86267. pTDefRegMap(@Self)^.&set := $00000001;
  86268. end;
  86269. function TCAN1_C1FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  86270. begin
  86271. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  86272. end;
  86273. procedure TCAN1_C1FIFOINT1.setRXHALFIF; inline;
  86274. begin
  86275. pTDefRegMap(@Self)^.&set := $00000002;
  86276. end;
  86277. procedure TCAN1_C1FIFOINT1.clearRXHALFIF; inline;
  86278. begin
  86279. pTDefRegMap(@Self)^.clr := $00000002;
  86280. end;
  86281. procedure TCAN1_C1FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  86282. begin
  86283. if thebits = 0 then
  86284. pTDefRegMap(@Self)^.clr := $00000002
  86285. else
  86286. pTDefRegMap(@Self)^.&set := $00000002;
  86287. end;
  86288. function TCAN1_C1FIFOINT1.getRXHALFIF : TBits_1; inline;
  86289. begin
  86290. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  86291. end;
  86292. procedure TCAN1_C1FIFOINT1.setRXFULLIF; inline;
  86293. begin
  86294. pTDefRegMap(@Self)^.&set := $00000004;
  86295. end;
  86296. procedure TCAN1_C1FIFOINT1.clearRXFULLIF; inline;
  86297. begin
  86298. pTDefRegMap(@Self)^.clr := $00000004;
  86299. end;
  86300. procedure TCAN1_C1FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  86301. begin
  86302. if thebits = 0 then
  86303. pTDefRegMap(@Self)^.clr := $00000004
  86304. else
  86305. pTDefRegMap(@Self)^.&set := $00000004;
  86306. end;
  86307. function TCAN1_C1FIFOINT1.getRXFULLIF : TBits_1; inline;
  86308. begin
  86309. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86310. end;
  86311. procedure TCAN1_C1FIFOINT1.setRXOVFLIF; inline;
  86312. begin
  86313. pTDefRegMap(@Self)^.&set := $00000008;
  86314. end;
  86315. procedure TCAN1_C1FIFOINT1.clearRXOVFLIF; inline;
  86316. begin
  86317. pTDefRegMap(@Self)^.clr := $00000008;
  86318. end;
  86319. procedure TCAN1_C1FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  86320. begin
  86321. if thebits = 0 then
  86322. pTDefRegMap(@Self)^.clr := $00000008
  86323. else
  86324. pTDefRegMap(@Self)^.&set := $00000008;
  86325. end;
  86326. function TCAN1_C1FIFOINT1.getRXOVFLIF : TBits_1; inline;
  86327. begin
  86328. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86329. end;
  86330. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF; inline;
  86331. begin
  86332. pTDefRegMap(@Self)^.&set := $00000100;
  86333. end;
  86334. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIF; inline;
  86335. begin
  86336. pTDefRegMap(@Self)^.clr := $00000100;
  86337. end;
  86338. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  86339. begin
  86340. if thebits = 0 then
  86341. pTDefRegMap(@Self)^.clr := $00000100
  86342. else
  86343. pTDefRegMap(@Self)^.&set := $00000100;
  86344. end;
  86345. function TCAN1_C1FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  86346. begin
  86347. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  86348. end;
  86349. procedure TCAN1_C1FIFOINT1.setTXHALFIF; inline;
  86350. begin
  86351. pTDefRegMap(@Self)^.&set := $00000200;
  86352. end;
  86353. procedure TCAN1_C1FIFOINT1.clearTXHALFIF; inline;
  86354. begin
  86355. pTDefRegMap(@Self)^.clr := $00000200;
  86356. end;
  86357. procedure TCAN1_C1FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  86358. begin
  86359. if thebits = 0 then
  86360. pTDefRegMap(@Self)^.clr := $00000200
  86361. else
  86362. pTDefRegMap(@Self)^.&set := $00000200;
  86363. end;
  86364. function TCAN1_C1FIFOINT1.getTXHALFIF : TBits_1; inline;
  86365. begin
  86366. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  86367. end;
  86368. procedure TCAN1_C1FIFOINT1.setTXNFULLIF; inline;
  86369. begin
  86370. pTDefRegMap(@Self)^.&set := $00000400;
  86371. end;
  86372. procedure TCAN1_C1FIFOINT1.clearTXNFULLIF; inline;
  86373. begin
  86374. pTDefRegMap(@Self)^.clr := $00000400;
  86375. end;
  86376. procedure TCAN1_C1FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  86377. begin
  86378. if thebits = 0 then
  86379. pTDefRegMap(@Self)^.clr := $00000400
  86380. else
  86381. pTDefRegMap(@Self)^.&set := $00000400;
  86382. end;
  86383. function TCAN1_C1FIFOINT1.getTXNFULLIF : TBits_1; inline;
  86384. begin
  86385. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  86386. end;
  86387. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE; inline;
  86388. begin
  86389. pTDefRegMap(@Self)^.&set := $00010000;
  86390. end;
  86391. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIE; inline;
  86392. begin
  86393. pTDefRegMap(@Self)^.clr := $00010000;
  86394. end;
  86395. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  86396. begin
  86397. if thebits = 0 then
  86398. pTDefRegMap(@Self)^.clr := $00010000
  86399. else
  86400. pTDefRegMap(@Self)^.&set := $00010000;
  86401. end;
  86402. function TCAN1_C1FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  86403. begin
  86404. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  86405. end;
  86406. procedure TCAN1_C1FIFOINT1.setRXHALFIE; inline;
  86407. begin
  86408. pTDefRegMap(@Self)^.&set := $00020000;
  86409. end;
  86410. procedure TCAN1_C1FIFOINT1.clearRXHALFIE; inline;
  86411. begin
  86412. pTDefRegMap(@Self)^.clr := $00020000;
  86413. end;
  86414. procedure TCAN1_C1FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  86415. begin
  86416. if thebits = 0 then
  86417. pTDefRegMap(@Self)^.clr := $00020000
  86418. else
  86419. pTDefRegMap(@Self)^.&set := $00020000;
  86420. end;
  86421. function TCAN1_C1FIFOINT1.getRXHALFIE : TBits_1; inline;
  86422. begin
  86423. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  86424. end;
  86425. procedure TCAN1_C1FIFOINT1.setRXFULLIE; inline;
  86426. begin
  86427. pTDefRegMap(@Self)^.&set := $00040000;
  86428. end;
  86429. procedure TCAN1_C1FIFOINT1.clearRXFULLIE; inline;
  86430. begin
  86431. pTDefRegMap(@Self)^.clr := $00040000;
  86432. end;
  86433. procedure TCAN1_C1FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  86434. begin
  86435. if thebits = 0 then
  86436. pTDefRegMap(@Self)^.clr := $00040000
  86437. else
  86438. pTDefRegMap(@Self)^.&set := $00040000;
  86439. end;
  86440. function TCAN1_C1FIFOINT1.getRXFULLIE : TBits_1; inline;
  86441. begin
  86442. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  86443. end;
  86444. procedure TCAN1_C1FIFOINT1.setRXOVFLIE; inline;
  86445. begin
  86446. pTDefRegMap(@Self)^.&set := $00080000;
  86447. end;
  86448. procedure TCAN1_C1FIFOINT1.clearRXOVFLIE; inline;
  86449. begin
  86450. pTDefRegMap(@Self)^.clr := $00080000;
  86451. end;
  86452. procedure TCAN1_C1FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  86453. begin
  86454. if thebits = 0 then
  86455. pTDefRegMap(@Self)^.clr := $00080000
  86456. else
  86457. pTDefRegMap(@Self)^.&set := $00080000;
  86458. end;
  86459. function TCAN1_C1FIFOINT1.getRXOVFLIE : TBits_1; inline;
  86460. begin
  86461. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  86462. end;
  86463. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE; inline;
  86464. begin
  86465. pTDefRegMap(@Self)^.&set := $01000000;
  86466. end;
  86467. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIE; inline;
  86468. begin
  86469. pTDefRegMap(@Self)^.clr := $01000000;
  86470. end;
  86471. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  86472. begin
  86473. if thebits = 0 then
  86474. pTDefRegMap(@Self)^.clr := $01000000
  86475. else
  86476. pTDefRegMap(@Self)^.&set := $01000000;
  86477. end;
  86478. function TCAN1_C1FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  86479. begin
  86480. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  86481. end;
  86482. procedure TCAN1_C1FIFOINT1.setTXHALFIE; inline;
  86483. begin
  86484. pTDefRegMap(@Self)^.&set := $02000000;
  86485. end;
  86486. procedure TCAN1_C1FIFOINT1.clearTXHALFIE; inline;
  86487. begin
  86488. pTDefRegMap(@Self)^.clr := $02000000;
  86489. end;
  86490. procedure TCAN1_C1FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  86491. begin
  86492. if thebits = 0 then
  86493. pTDefRegMap(@Self)^.clr := $02000000
  86494. else
  86495. pTDefRegMap(@Self)^.&set := $02000000;
  86496. end;
  86497. function TCAN1_C1FIFOINT1.getTXHALFIE : TBits_1; inline;
  86498. begin
  86499. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  86500. end;
  86501. procedure TCAN1_C1FIFOINT1.setTXNFULLIE; inline;
  86502. begin
  86503. pTDefRegMap(@Self)^.&set := $04000000;
  86504. end;
  86505. procedure TCAN1_C1FIFOINT1.clearTXNFULLIE; inline;
  86506. begin
  86507. pTDefRegMap(@Self)^.clr := $04000000;
  86508. end;
  86509. procedure TCAN1_C1FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  86510. begin
  86511. if thebits = 0 then
  86512. pTDefRegMap(@Self)^.clr := $04000000
  86513. else
  86514. pTDefRegMap(@Self)^.&set := $04000000;
  86515. end;
  86516. function TCAN1_C1FIFOINT1.getTXNFULLIE : TBits_1; inline;
  86517. begin
  86518. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  86519. end;
  86520. procedure TCAN1_C1FIFOINT1.setw(thebits : TBits_32); inline;
  86521. begin
  86522. pTDefRegMap(@Self)^.val := thebits;
  86523. end;
  86524. function TCAN1_C1FIFOINT1.getw : TBits_32; inline;
  86525. begin
  86526. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86527. end;
  86528. procedure TCAN1_C1FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  86529. begin
  86530. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  86531. end;
  86532. function TCAN1_C1FIFOCI1.getCFIFOCI : TBits_5; inline;
  86533. begin
  86534. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  86535. end;
  86536. procedure TCAN1_C1FIFOCI1.setw(thebits : TBits_32); inline;
  86537. begin
  86538. pTDefRegMap(@Self)^.val := thebits;
  86539. end;
  86540. function TCAN1_C1FIFOCI1.getw : TBits_32; inline;
  86541. begin
  86542. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86543. end;
  86544. procedure TCAN1_C1FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  86545. begin
  86546. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  86547. end;
  86548. function TCAN1_C1FIFOCON2.getTXPRI : TBits_2; inline;
  86549. begin
  86550. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  86551. end;
  86552. procedure TCAN1_C1FIFOCON2.setRTREN; inline;
  86553. begin
  86554. pTDefRegMap(@Self)^.&set := $00000004;
  86555. end;
  86556. procedure TCAN1_C1FIFOCON2.clearRTREN; inline;
  86557. begin
  86558. pTDefRegMap(@Self)^.clr := $00000004;
  86559. end;
  86560. procedure TCAN1_C1FIFOCON2.setRTREN(thebits : TBits_1); inline;
  86561. begin
  86562. if thebits = 0 then
  86563. pTDefRegMap(@Self)^.clr := $00000004
  86564. else
  86565. pTDefRegMap(@Self)^.&set := $00000004;
  86566. end;
  86567. function TCAN1_C1FIFOCON2.getRTREN : TBits_1; inline;
  86568. begin
  86569. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86570. end;
  86571. procedure TCAN1_C1FIFOCON2.setTXREQ; inline;
  86572. begin
  86573. pTDefRegMap(@Self)^.&set := $00000008;
  86574. end;
  86575. procedure TCAN1_C1FIFOCON2.clearTXREQ; inline;
  86576. begin
  86577. pTDefRegMap(@Self)^.clr := $00000008;
  86578. end;
  86579. procedure TCAN1_C1FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  86580. begin
  86581. if thebits = 0 then
  86582. pTDefRegMap(@Self)^.clr := $00000008
  86583. else
  86584. pTDefRegMap(@Self)^.&set := $00000008;
  86585. end;
  86586. function TCAN1_C1FIFOCON2.getTXREQ : TBits_1; inline;
  86587. begin
  86588. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86589. end;
  86590. procedure TCAN1_C1FIFOCON2.setTXERR; inline;
  86591. begin
  86592. pTDefRegMap(@Self)^.&set := $00000010;
  86593. end;
  86594. procedure TCAN1_C1FIFOCON2.clearTXERR; inline;
  86595. begin
  86596. pTDefRegMap(@Self)^.clr := $00000010;
  86597. end;
  86598. procedure TCAN1_C1FIFOCON2.setTXERR(thebits : TBits_1); inline;
  86599. begin
  86600. if thebits = 0 then
  86601. pTDefRegMap(@Self)^.clr := $00000010
  86602. else
  86603. pTDefRegMap(@Self)^.&set := $00000010;
  86604. end;
  86605. function TCAN1_C1FIFOCON2.getTXERR : TBits_1; inline;
  86606. begin
  86607. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  86608. end;
  86609. procedure TCAN1_C1FIFOCON2.setTXLARB; inline;
  86610. begin
  86611. pTDefRegMap(@Self)^.&set := $00000020;
  86612. end;
  86613. procedure TCAN1_C1FIFOCON2.clearTXLARB; inline;
  86614. begin
  86615. pTDefRegMap(@Self)^.clr := $00000020;
  86616. end;
  86617. procedure TCAN1_C1FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  86618. begin
  86619. if thebits = 0 then
  86620. pTDefRegMap(@Self)^.clr := $00000020
  86621. else
  86622. pTDefRegMap(@Self)^.&set := $00000020;
  86623. end;
  86624. function TCAN1_C1FIFOCON2.getTXLARB : TBits_1; inline;
  86625. begin
  86626. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  86627. end;
  86628. procedure TCAN1_C1FIFOCON2.setTXABAT; inline;
  86629. begin
  86630. pTDefRegMap(@Self)^.&set := $00000040;
  86631. end;
  86632. procedure TCAN1_C1FIFOCON2.clearTXABAT; inline;
  86633. begin
  86634. pTDefRegMap(@Self)^.clr := $00000040;
  86635. end;
  86636. procedure TCAN1_C1FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  86637. begin
  86638. if thebits = 0 then
  86639. pTDefRegMap(@Self)^.clr := $00000040
  86640. else
  86641. pTDefRegMap(@Self)^.&set := $00000040;
  86642. end;
  86643. function TCAN1_C1FIFOCON2.getTXABAT : TBits_1; inline;
  86644. begin
  86645. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  86646. end;
  86647. procedure TCAN1_C1FIFOCON2.setTXEN; inline;
  86648. begin
  86649. pTDefRegMap(@Self)^.&set := $00000080;
  86650. end;
  86651. procedure TCAN1_C1FIFOCON2.clearTXEN; inline;
  86652. begin
  86653. pTDefRegMap(@Self)^.clr := $00000080;
  86654. end;
  86655. procedure TCAN1_C1FIFOCON2.setTXEN(thebits : TBits_1); inline;
  86656. begin
  86657. if thebits = 0 then
  86658. pTDefRegMap(@Self)^.clr := $00000080
  86659. else
  86660. pTDefRegMap(@Self)^.&set := $00000080;
  86661. end;
  86662. function TCAN1_C1FIFOCON2.getTXEN : TBits_1; inline;
  86663. begin
  86664. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  86665. end;
  86666. procedure TCAN1_C1FIFOCON2.setDONLY; inline;
  86667. begin
  86668. pTDefRegMap(@Self)^.&set := $00001000;
  86669. end;
  86670. procedure TCAN1_C1FIFOCON2.clearDONLY; inline;
  86671. begin
  86672. pTDefRegMap(@Self)^.clr := $00001000;
  86673. end;
  86674. procedure TCAN1_C1FIFOCON2.setDONLY(thebits : TBits_1); inline;
  86675. begin
  86676. if thebits = 0 then
  86677. pTDefRegMap(@Self)^.clr := $00001000
  86678. else
  86679. pTDefRegMap(@Self)^.&set := $00001000;
  86680. end;
  86681. function TCAN1_C1FIFOCON2.getDONLY : TBits_1; inline;
  86682. begin
  86683. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  86684. end;
  86685. procedure TCAN1_C1FIFOCON2.setUINC; inline;
  86686. begin
  86687. pTDefRegMap(@Self)^.&set := $00002000;
  86688. end;
  86689. procedure TCAN1_C1FIFOCON2.clearUINC; inline;
  86690. begin
  86691. pTDefRegMap(@Self)^.clr := $00002000;
  86692. end;
  86693. procedure TCAN1_C1FIFOCON2.setUINC(thebits : TBits_1); inline;
  86694. begin
  86695. if thebits = 0 then
  86696. pTDefRegMap(@Self)^.clr := $00002000
  86697. else
  86698. pTDefRegMap(@Self)^.&set := $00002000;
  86699. end;
  86700. function TCAN1_C1FIFOCON2.getUINC : TBits_1; inline;
  86701. begin
  86702. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  86703. end;
  86704. procedure TCAN1_C1FIFOCON2.setFRESET; inline;
  86705. begin
  86706. pTDefRegMap(@Self)^.&set := $00004000;
  86707. end;
  86708. procedure TCAN1_C1FIFOCON2.clearFRESET; inline;
  86709. begin
  86710. pTDefRegMap(@Self)^.clr := $00004000;
  86711. end;
  86712. procedure TCAN1_C1FIFOCON2.setFRESET(thebits : TBits_1); inline;
  86713. begin
  86714. if thebits = 0 then
  86715. pTDefRegMap(@Self)^.clr := $00004000
  86716. else
  86717. pTDefRegMap(@Self)^.&set := $00004000;
  86718. end;
  86719. function TCAN1_C1FIFOCON2.getFRESET : TBits_1; inline;
  86720. begin
  86721. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  86722. end;
  86723. procedure TCAN1_C1FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  86724. begin
  86725. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  86726. end;
  86727. function TCAN1_C1FIFOCON2.getFSIZE : TBits_5; inline;
  86728. begin
  86729. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  86730. end;
  86731. procedure TCAN1_C1FIFOCON2.setw(thebits : TBits_32); inline;
  86732. begin
  86733. pTDefRegMap(@Self)^.val := thebits;
  86734. end;
  86735. function TCAN1_C1FIFOCON2.getw : TBits_32; inline;
  86736. begin
  86737. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86738. end;
  86739. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF; inline;
  86740. begin
  86741. pTDefRegMap(@Self)^.&set := $00000001;
  86742. end;
  86743. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIF; inline;
  86744. begin
  86745. pTDefRegMap(@Self)^.clr := $00000001;
  86746. end;
  86747. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  86748. begin
  86749. if thebits = 0 then
  86750. pTDefRegMap(@Self)^.clr := $00000001
  86751. else
  86752. pTDefRegMap(@Self)^.&set := $00000001;
  86753. end;
  86754. function TCAN1_C1FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  86755. begin
  86756. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  86757. end;
  86758. procedure TCAN1_C1FIFOINT2.setRXHALFIF; inline;
  86759. begin
  86760. pTDefRegMap(@Self)^.&set := $00000002;
  86761. end;
  86762. procedure TCAN1_C1FIFOINT2.clearRXHALFIF; inline;
  86763. begin
  86764. pTDefRegMap(@Self)^.clr := $00000002;
  86765. end;
  86766. procedure TCAN1_C1FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  86767. begin
  86768. if thebits = 0 then
  86769. pTDefRegMap(@Self)^.clr := $00000002
  86770. else
  86771. pTDefRegMap(@Self)^.&set := $00000002;
  86772. end;
  86773. function TCAN1_C1FIFOINT2.getRXHALFIF : TBits_1; inline;
  86774. begin
  86775. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  86776. end;
  86777. procedure TCAN1_C1FIFOINT2.setRXFULLIF; inline;
  86778. begin
  86779. pTDefRegMap(@Self)^.&set := $00000004;
  86780. end;
  86781. procedure TCAN1_C1FIFOINT2.clearRXFULLIF; inline;
  86782. begin
  86783. pTDefRegMap(@Self)^.clr := $00000004;
  86784. end;
  86785. procedure TCAN1_C1FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  86786. begin
  86787. if thebits = 0 then
  86788. pTDefRegMap(@Self)^.clr := $00000004
  86789. else
  86790. pTDefRegMap(@Self)^.&set := $00000004;
  86791. end;
  86792. function TCAN1_C1FIFOINT2.getRXFULLIF : TBits_1; inline;
  86793. begin
  86794. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86795. end;
  86796. procedure TCAN1_C1FIFOINT2.setRXOVFLIF; inline;
  86797. begin
  86798. pTDefRegMap(@Self)^.&set := $00000008;
  86799. end;
  86800. procedure TCAN1_C1FIFOINT2.clearRXOVFLIF; inline;
  86801. begin
  86802. pTDefRegMap(@Self)^.clr := $00000008;
  86803. end;
  86804. procedure TCAN1_C1FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  86805. begin
  86806. if thebits = 0 then
  86807. pTDefRegMap(@Self)^.clr := $00000008
  86808. else
  86809. pTDefRegMap(@Self)^.&set := $00000008;
  86810. end;
  86811. function TCAN1_C1FIFOINT2.getRXOVFLIF : TBits_1; inline;
  86812. begin
  86813. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86814. end;
  86815. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF; inline;
  86816. begin
  86817. pTDefRegMap(@Self)^.&set := $00000100;
  86818. end;
  86819. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIF; inline;
  86820. begin
  86821. pTDefRegMap(@Self)^.clr := $00000100;
  86822. end;
  86823. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  86824. begin
  86825. if thebits = 0 then
  86826. pTDefRegMap(@Self)^.clr := $00000100
  86827. else
  86828. pTDefRegMap(@Self)^.&set := $00000100;
  86829. end;
  86830. function TCAN1_C1FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  86831. begin
  86832. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  86833. end;
  86834. procedure TCAN1_C1FIFOINT2.setTXHALFIF; inline;
  86835. begin
  86836. pTDefRegMap(@Self)^.&set := $00000200;
  86837. end;
  86838. procedure TCAN1_C1FIFOINT2.clearTXHALFIF; inline;
  86839. begin
  86840. pTDefRegMap(@Self)^.clr := $00000200;
  86841. end;
  86842. procedure TCAN1_C1FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  86843. begin
  86844. if thebits = 0 then
  86845. pTDefRegMap(@Self)^.clr := $00000200
  86846. else
  86847. pTDefRegMap(@Self)^.&set := $00000200;
  86848. end;
  86849. function TCAN1_C1FIFOINT2.getTXHALFIF : TBits_1; inline;
  86850. begin
  86851. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  86852. end;
  86853. procedure TCAN1_C1FIFOINT2.setTXNFULLIF; inline;
  86854. begin
  86855. pTDefRegMap(@Self)^.&set := $00000400;
  86856. end;
  86857. procedure TCAN1_C1FIFOINT2.clearTXNFULLIF; inline;
  86858. begin
  86859. pTDefRegMap(@Self)^.clr := $00000400;
  86860. end;
  86861. procedure TCAN1_C1FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  86862. begin
  86863. if thebits = 0 then
  86864. pTDefRegMap(@Self)^.clr := $00000400
  86865. else
  86866. pTDefRegMap(@Self)^.&set := $00000400;
  86867. end;
  86868. function TCAN1_C1FIFOINT2.getTXNFULLIF : TBits_1; inline;
  86869. begin
  86870. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  86871. end;
  86872. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE; inline;
  86873. begin
  86874. pTDefRegMap(@Self)^.&set := $00010000;
  86875. end;
  86876. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIE; inline;
  86877. begin
  86878. pTDefRegMap(@Self)^.clr := $00010000;
  86879. end;
  86880. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  86881. begin
  86882. if thebits = 0 then
  86883. pTDefRegMap(@Self)^.clr := $00010000
  86884. else
  86885. pTDefRegMap(@Self)^.&set := $00010000;
  86886. end;
  86887. function TCAN1_C1FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  86888. begin
  86889. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  86890. end;
  86891. procedure TCAN1_C1FIFOINT2.setRXHALFIE; inline;
  86892. begin
  86893. pTDefRegMap(@Self)^.&set := $00020000;
  86894. end;
  86895. procedure TCAN1_C1FIFOINT2.clearRXHALFIE; inline;
  86896. begin
  86897. pTDefRegMap(@Self)^.clr := $00020000;
  86898. end;
  86899. procedure TCAN1_C1FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  86900. begin
  86901. if thebits = 0 then
  86902. pTDefRegMap(@Self)^.clr := $00020000
  86903. else
  86904. pTDefRegMap(@Self)^.&set := $00020000;
  86905. end;
  86906. function TCAN1_C1FIFOINT2.getRXHALFIE : TBits_1; inline;
  86907. begin
  86908. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  86909. end;
  86910. procedure TCAN1_C1FIFOINT2.setRXFULLIE; inline;
  86911. begin
  86912. pTDefRegMap(@Self)^.&set := $00040000;
  86913. end;
  86914. procedure TCAN1_C1FIFOINT2.clearRXFULLIE; inline;
  86915. begin
  86916. pTDefRegMap(@Self)^.clr := $00040000;
  86917. end;
  86918. procedure TCAN1_C1FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  86919. begin
  86920. if thebits = 0 then
  86921. pTDefRegMap(@Self)^.clr := $00040000
  86922. else
  86923. pTDefRegMap(@Self)^.&set := $00040000;
  86924. end;
  86925. function TCAN1_C1FIFOINT2.getRXFULLIE : TBits_1; inline;
  86926. begin
  86927. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  86928. end;
  86929. procedure TCAN1_C1FIFOINT2.setRXOVFLIE; inline;
  86930. begin
  86931. pTDefRegMap(@Self)^.&set := $00080000;
  86932. end;
  86933. procedure TCAN1_C1FIFOINT2.clearRXOVFLIE; inline;
  86934. begin
  86935. pTDefRegMap(@Self)^.clr := $00080000;
  86936. end;
  86937. procedure TCAN1_C1FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  86938. begin
  86939. if thebits = 0 then
  86940. pTDefRegMap(@Self)^.clr := $00080000
  86941. else
  86942. pTDefRegMap(@Self)^.&set := $00080000;
  86943. end;
  86944. function TCAN1_C1FIFOINT2.getRXOVFLIE : TBits_1; inline;
  86945. begin
  86946. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  86947. end;
  86948. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE; inline;
  86949. begin
  86950. pTDefRegMap(@Self)^.&set := $01000000;
  86951. end;
  86952. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIE; inline;
  86953. begin
  86954. pTDefRegMap(@Self)^.clr := $01000000;
  86955. end;
  86956. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  86957. begin
  86958. if thebits = 0 then
  86959. pTDefRegMap(@Self)^.clr := $01000000
  86960. else
  86961. pTDefRegMap(@Self)^.&set := $01000000;
  86962. end;
  86963. function TCAN1_C1FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  86964. begin
  86965. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  86966. end;
  86967. procedure TCAN1_C1FIFOINT2.setTXHALFIE; inline;
  86968. begin
  86969. pTDefRegMap(@Self)^.&set := $02000000;
  86970. end;
  86971. procedure TCAN1_C1FIFOINT2.clearTXHALFIE; inline;
  86972. begin
  86973. pTDefRegMap(@Self)^.clr := $02000000;
  86974. end;
  86975. procedure TCAN1_C1FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  86976. begin
  86977. if thebits = 0 then
  86978. pTDefRegMap(@Self)^.clr := $02000000
  86979. else
  86980. pTDefRegMap(@Self)^.&set := $02000000;
  86981. end;
  86982. function TCAN1_C1FIFOINT2.getTXHALFIE : TBits_1; inline;
  86983. begin
  86984. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  86985. end;
  86986. procedure TCAN1_C1FIFOINT2.setTXNFULLIE; inline;
  86987. begin
  86988. pTDefRegMap(@Self)^.&set := $04000000;
  86989. end;
  86990. procedure TCAN1_C1FIFOINT2.clearTXNFULLIE; inline;
  86991. begin
  86992. pTDefRegMap(@Self)^.clr := $04000000;
  86993. end;
  86994. procedure TCAN1_C1FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  86995. begin
  86996. if thebits = 0 then
  86997. pTDefRegMap(@Self)^.clr := $04000000
  86998. else
  86999. pTDefRegMap(@Self)^.&set := $04000000;
  87000. end;
  87001. function TCAN1_C1FIFOINT2.getTXNFULLIE : TBits_1; inline;
  87002. begin
  87003. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  87004. end;
  87005. procedure TCAN1_C1FIFOINT2.setw(thebits : TBits_32); inline;
  87006. begin
  87007. pTDefRegMap(@Self)^.val := thebits;
  87008. end;
  87009. function TCAN1_C1FIFOINT2.getw : TBits_32; inline;
  87010. begin
  87011. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87012. end;
  87013. procedure TCAN1_C1FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  87014. begin
  87015. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  87016. end;
  87017. function TCAN1_C1FIFOCI2.getCFIFOCI : TBits_5; inline;
  87018. begin
  87019. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  87020. end;
  87021. procedure TCAN1_C1FIFOCI2.setw(thebits : TBits_32); inline;
  87022. begin
  87023. pTDefRegMap(@Self)^.val := thebits;
  87024. end;
  87025. function TCAN1_C1FIFOCI2.getw : TBits_32; inline;
  87026. begin
  87027. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87028. end;
  87029. procedure TCAN1_C1FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  87030. begin
  87031. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  87032. end;
  87033. function TCAN1_C1FIFOCON3.getTXPRI : TBits_2; inline;
  87034. begin
  87035. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  87036. end;
  87037. procedure TCAN1_C1FIFOCON3.setRTREN; inline;
  87038. begin
  87039. pTDefRegMap(@Self)^.&set := $00000004;
  87040. end;
  87041. procedure TCAN1_C1FIFOCON3.clearRTREN; inline;
  87042. begin
  87043. pTDefRegMap(@Self)^.clr := $00000004;
  87044. end;
  87045. procedure TCAN1_C1FIFOCON3.setRTREN(thebits : TBits_1); inline;
  87046. begin
  87047. if thebits = 0 then
  87048. pTDefRegMap(@Self)^.clr := $00000004
  87049. else
  87050. pTDefRegMap(@Self)^.&set := $00000004;
  87051. end;
  87052. function TCAN1_C1FIFOCON3.getRTREN : TBits_1; inline;
  87053. begin
  87054. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87055. end;
  87056. procedure TCAN1_C1FIFOCON3.setTXREQ; inline;
  87057. begin
  87058. pTDefRegMap(@Self)^.&set := $00000008;
  87059. end;
  87060. procedure TCAN1_C1FIFOCON3.clearTXREQ; inline;
  87061. begin
  87062. pTDefRegMap(@Self)^.clr := $00000008;
  87063. end;
  87064. procedure TCAN1_C1FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  87065. begin
  87066. if thebits = 0 then
  87067. pTDefRegMap(@Self)^.clr := $00000008
  87068. else
  87069. pTDefRegMap(@Self)^.&set := $00000008;
  87070. end;
  87071. function TCAN1_C1FIFOCON3.getTXREQ : TBits_1; inline;
  87072. begin
  87073. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87074. end;
  87075. procedure TCAN1_C1FIFOCON3.setTXERR; inline;
  87076. begin
  87077. pTDefRegMap(@Self)^.&set := $00000010;
  87078. end;
  87079. procedure TCAN1_C1FIFOCON3.clearTXERR; inline;
  87080. begin
  87081. pTDefRegMap(@Self)^.clr := $00000010;
  87082. end;
  87083. procedure TCAN1_C1FIFOCON3.setTXERR(thebits : TBits_1); inline;
  87084. begin
  87085. if thebits = 0 then
  87086. pTDefRegMap(@Self)^.clr := $00000010
  87087. else
  87088. pTDefRegMap(@Self)^.&set := $00000010;
  87089. end;
  87090. function TCAN1_C1FIFOCON3.getTXERR : TBits_1; inline;
  87091. begin
  87092. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  87093. end;
  87094. procedure TCAN1_C1FIFOCON3.setTXLARB; inline;
  87095. begin
  87096. pTDefRegMap(@Self)^.&set := $00000020;
  87097. end;
  87098. procedure TCAN1_C1FIFOCON3.clearTXLARB; inline;
  87099. begin
  87100. pTDefRegMap(@Self)^.clr := $00000020;
  87101. end;
  87102. procedure TCAN1_C1FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  87103. begin
  87104. if thebits = 0 then
  87105. pTDefRegMap(@Self)^.clr := $00000020
  87106. else
  87107. pTDefRegMap(@Self)^.&set := $00000020;
  87108. end;
  87109. function TCAN1_C1FIFOCON3.getTXLARB : TBits_1; inline;
  87110. begin
  87111. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  87112. end;
  87113. procedure TCAN1_C1FIFOCON3.setTXABAT; inline;
  87114. begin
  87115. pTDefRegMap(@Self)^.&set := $00000040;
  87116. end;
  87117. procedure TCAN1_C1FIFOCON3.clearTXABAT; inline;
  87118. begin
  87119. pTDefRegMap(@Self)^.clr := $00000040;
  87120. end;
  87121. procedure TCAN1_C1FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  87122. begin
  87123. if thebits = 0 then
  87124. pTDefRegMap(@Self)^.clr := $00000040
  87125. else
  87126. pTDefRegMap(@Self)^.&set := $00000040;
  87127. end;
  87128. function TCAN1_C1FIFOCON3.getTXABAT : TBits_1; inline;
  87129. begin
  87130. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  87131. end;
  87132. procedure TCAN1_C1FIFOCON3.setTXEN; inline;
  87133. begin
  87134. pTDefRegMap(@Self)^.&set := $00000080;
  87135. end;
  87136. procedure TCAN1_C1FIFOCON3.clearTXEN; inline;
  87137. begin
  87138. pTDefRegMap(@Self)^.clr := $00000080;
  87139. end;
  87140. procedure TCAN1_C1FIFOCON3.setTXEN(thebits : TBits_1); inline;
  87141. begin
  87142. if thebits = 0 then
  87143. pTDefRegMap(@Self)^.clr := $00000080
  87144. else
  87145. pTDefRegMap(@Self)^.&set := $00000080;
  87146. end;
  87147. function TCAN1_C1FIFOCON3.getTXEN : TBits_1; inline;
  87148. begin
  87149. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  87150. end;
  87151. procedure TCAN1_C1FIFOCON3.setDONLY; inline;
  87152. begin
  87153. pTDefRegMap(@Self)^.&set := $00001000;
  87154. end;
  87155. procedure TCAN1_C1FIFOCON3.clearDONLY; inline;
  87156. begin
  87157. pTDefRegMap(@Self)^.clr := $00001000;
  87158. end;
  87159. procedure TCAN1_C1FIFOCON3.setDONLY(thebits : TBits_1); inline;
  87160. begin
  87161. if thebits = 0 then
  87162. pTDefRegMap(@Self)^.clr := $00001000
  87163. else
  87164. pTDefRegMap(@Self)^.&set := $00001000;
  87165. end;
  87166. function TCAN1_C1FIFOCON3.getDONLY : TBits_1; inline;
  87167. begin
  87168. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  87169. end;
  87170. procedure TCAN1_C1FIFOCON3.setUINC; inline;
  87171. begin
  87172. pTDefRegMap(@Self)^.&set := $00002000;
  87173. end;
  87174. procedure TCAN1_C1FIFOCON3.clearUINC; inline;
  87175. begin
  87176. pTDefRegMap(@Self)^.clr := $00002000;
  87177. end;
  87178. procedure TCAN1_C1FIFOCON3.setUINC(thebits : TBits_1); inline;
  87179. begin
  87180. if thebits = 0 then
  87181. pTDefRegMap(@Self)^.clr := $00002000
  87182. else
  87183. pTDefRegMap(@Self)^.&set := $00002000;
  87184. end;
  87185. function TCAN1_C1FIFOCON3.getUINC : TBits_1; inline;
  87186. begin
  87187. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  87188. end;
  87189. procedure TCAN1_C1FIFOCON3.setFRESET; inline;
  87190. begin
  87191. pTDefRegMap(@Self)^.&set := $00004000;
  87192. end;
  87193. procedure TCAN1_C1FIFOCON3.clearFRESET; inline;
  87194. begin
  87195. pTDefRegMap(@Self)^.clr := $00004000;
  87196. end;
  87197. procedure TCAN1_C1FIFOCON3.setFRESET(thebits : TBits_1); inline;
  87198. begin
  87199. if thebits = 0 then
  87200. pTDefRegMap(@Self)^.clr := $00004000
  87201. else
  87202. pTDefRegMap(@Self)^.&set := $00004000;
  87203. end;
  87204. function TCAN1_C1FIFOCON3.getFRESET : TBits_1; inline;
  87205. begin
  87206. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  87207. end;
  87208. procedure TCAN1_C1FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  87209. begin
  87210. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  87211. end;
  87212. function TCAN1_C1FIFOCON3.getFSIZE : TBits_5; inline;
  87213. begin
  87214. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  87215. end;
  87216. procedure TCAN1_C1FIFOCON3.setw(thebits : TBits_32); inline;
  87217. begin
  87218. pTDefRegMap(@Self)^.val := thebits;
  87219. end;
  87220. function TCAN1_C1FIFOCON3.getw : TBits_32; inline;
  87221. begin
  87222. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87223. end;
  87224. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF; inline;
  87225. begin
  87226. pTDefRegMap(@Self)^.&set := $00000001;
  87227. end;
  87228. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIF; inline;
  87229. begin
  87230. pTDefRegMap(@Self)^.clr := $00000001;
  87231. end;
  87232. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  87233. begin
  87234. if thebits = 0 then
  87235. pTDefRegMap(@Self)^.clr := $00000001
  87236. else
  87237. pTDefRegMap(@Self)^.&set := $00000001;
  87238. end;
  87239. function TCAN1_C1FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  87240. begin
  87241. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  87242. end;
  87243. procedure TCAN1_C1FIFOINT3.setRXHALFIF; inline;
  87244. begin
  87245. pTDefRegMap(@Self)^.&set := $00000002;
  87246. end;
  87247. procedure TCAN1_C1FIFOINT3.clearRXHALFIF; inline;
  87248. begin
  87249. pTDefRegMap(@Self)^.clr := $00000002;
  87250. end;
  87251. procedure TCAN1_C1FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  87252. begin
  87253. if thebits = 0 then
  87254. pTDefRegMap(@Self)^.clr := $00000002
  87255. else
  87256. pTDefRegMap(@Self)^.&set := $00000002;
  87257. end;
  87258. function TCAN1_C1FIFOINT3.getRXHALFIF : TBits_1; inline;
  87259. begin
  87260. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  87261. end;
  87262. procedure TCAN1_C1FIFOINT3.setRXFULLIF; inline;
  87263. begin
  87264. pTDefRegMap(@Self)^.&set := $00000004;
  87265. end;
  87266. procedure TCAN1_C1FIFOINT3.clearRXFULLIF; inline;
  87267. begin
  87268. pTDefRegMap(@Self)^.clr := $00000004;
  87269. end;
  87270. procedure TCAN1_C1FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  87271. begin
  87272. if thebits = 0 then
  87273. pTDefRegMap(@Self)^.clr := $00000004
  87274. else
  87275. pTDefRegMap(@Self)^.&set := $00000004;
  87276. end;
  87277. function TCAN1_C1FIFOINT3.getRXFULLIF : TBits_1; inline;
  87278. begin
  87279. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87280. end;
  87281. procedure TCAN1_C1FIFOINT3.setRXOVFLIF; inline;
  87282. begin
  87283. pTDefRegMap(@Self)^.&set := $00000008;
  87284. end;
  87285. procedure TCAN1_C1FIFOINT3.clearRXOVFLIF; inline;
  87286. begin
  87287. pTDefRegMap(@Self)^.clr := $00000008;
  87288. end;
  87289. procedure TCAN1_C1FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  87290. begin
  87291. if thebits = 0 then
  87292. pTDefRegMap(@Self)^.clr := $00000008
  87293. else
  87294. pTDefRegMap(@Self)^.&set := $00000008;
  87295. end;
  87296. function TCAN1_C1FIFOINT3.getRXOVFLIF : TBits_1; inline;
  87297. begin
  87298. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87299. end;
  87300. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF; inline;
  87301. begin
  87302. pTDefRegMap(@Self)^.&set := $00000100;
  87303. end;
  87304. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIF; inline;
  87305. begin
  87306. pTDefRegMap(@Self)^.clr := $00000100;
  87307. end;
  87308. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  87309. begin
  87310. if thebits = 0 then
  87311. pTDefRegMap(@Self)^.clr := $00000100
  87312. else
  87313. pTDefRegMap(@Self)^.&set := $00000100;
  87314. end;
  87315. function TCAN1_C1FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  87316. begin
  87317. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  87318. end;
  87319. procedure TCAN1_C1FIFOINT3.setTXHALFIF; inline;
  87320. begin
  87321. pTDefRegMap(@Self)^.&set := $00000200;
  87322. end;
  87323. procedure TCAN1_C1FIFOINT3.clearTXHALFIF; inline;
  87324. begin
  87325. pTDefRegMap(@Self)^.clr := $00000200;
  87326. end;
  87327. procedure TCAN1_C1FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  87328. begin
  87329. if thebits = 0 then
  87330. pTDefRegMap(@Self)^.clr := $00000200
  87331. else
  87332. pTDefRegMap(@Self)^.&set := $00000200;
  87333. end;
  87334. function TCAN1_C1FIFOINT3.getTXHALFIF : TBits_1; inline;
  87335. begin
  87336. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  87337. end;
  87338. procedure TCAN1_C1FIFOINT3.setTXNFULLIF; inline;
  87339. begin
  87340. pTDefRegMap(@Self)^.&set := $00000400;
  87341. end;
  87342. procedure TCAN1_C1FIFOINT3.clearTXNFULLIF; inline;
  87343. begin
  87344. pTDefRegMap(@Self)^.clr := $00000400;
  87345. end;
  87346. procedure TCAN1_C1FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  87347. begin
  87348. if thebits = 0 then
  87349. pTDefRegMap(@Self)^.clr := $00000400
  87350. else
  87351. pTDefRegMap(@Self)^.&set := $00000400;
  87352. end;
  87353. function TCAN1_C1FIFOINT3.getTXNFULLIF : TBits_1; inline;
  87354. begin
  87355. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  87356. end;
  87357. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE; inline;
  87358. begin
  87359. pTDefRegMap(@Self)^.&set := $00010000;
  87360. end;
  87361. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIE; inline;
  87362. begin
  87363. pTDefRegMap(@Self)^.clr := $00010000;
  87364. end;
  87365. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  87366. begin
  87367. if thebits = 0 then
  87368. pTDefRegMap(@Self)^.clr := $00010000
  87369. else
  87370. pTDefRegMap(@Self)^.&set := $00010000;
  87371. end;
  87372. function TCAN1_C1FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  87373. begin
  87374. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  87375. end;
  87376. procedure TCAN1_C1FIFOINT3.setRXHALFIE; inline;
  87377. begin
  87378. pTDefRegMap(@Self)^.&set := $00020000;
  87379. end;
  87380. procedure TCAN1_C1FIFOINT3.clearRXHALFIE; inline;
  87381. begin
  87382. pTDefRegMap(@Self)^.clr := $00020000;
  87383. end;
  87384. procedure TCAN1_C1FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  87385. begin
  87386. if thebits = 0 then
  87387. pTDefRegMap(@Self)^.clr := $00020000
  87388. else
  87389. pTDefRegMap(@Self)^.&set := $00020000;
  87390. end;
  87391. function TCAN1_C1FIFOINT3.getRXHALFIE : TBits_1; inline;
  87392. begin
  87393. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  87394. end;
  87395. procedure TCAN1_C1FIFOINT3.setRXFULLIE; inline;
  87396. begin
  87397. pTDefRegMap(@Self)^.&set := $00040000;
  87398. end;
  87399. procedure TCAN1_C1FIFOINT3.clearRXFULLIE; inline;
  87400. begin
  87401. pTDefRegMap(@Self)^.clr := $00040000;
  87402. end;
  87403. procedure TCAN1_C1FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  87404. begin
  87405. if thebits = 0 then
  87406. pTDefRegMap(@Self)^.clr := $00040000
  87407. else
  87408. pTDefRegMap(@Self)^.&set := $00040000;
  87409. end;
  87410. function TCAN1_C1FIFOINT3.getRXFULLIE : TBits_1; inline;
  87411. begin
  87412. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  87413. end;
  87414. procedure TCAN1_C1FIFOINT3.setRXOVFLIE; inline;
  87415. begin
  87416. pTDefRegMap(@Self)^.&set := $00080000;
  87417. end;
  87418. procedure TCAN1_C1FIFOINT3.clearRXOVFLIE; inline;
  87419. begin
  87420. pTDefRegMap(@Self)^.clr := $00080000;
  87421. end;
  87422. procedure TCAN1_C1FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  87423. begin
  87424. if thebits = 0 then
  87425. pTDefRegMap(@Self)^.clr := $00080000
  87426. else
  87427. pTDefRegMap(@Self)^.&set := $00080000;
  87428. end;
  87429. function TCAN1_C1FIFOINT3.getRXOVFLIE : TBits_1; inline;
  87430. begin
  87431. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  87432. end;
  87433. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE; inline;
  87434. begin
  87435. pTDefRegMap(@Self)^.&set := $01000000;
  87436. end;
  87437. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIE; inline;
  87438. begin
  87439. pTDefRegMap(@Self)^.clr := $01000000;
  87440. end;
  87441. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  87442. begin
  87443. if thebits = 0 then
  87444. pTDefRegMap(@Self)^.clr := $01000000
  87445. else
  87446. pTDefRegMap(@Self)^.&set := $01000000;
  87447. end;
  87448. function TCAN1_C1FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  87449. begin
  87450. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  87451. end;
  87452. procedure TCAN1_C1FIFOINT3.setTXHALFIE; inline;
  87453. begin
  87454. pTDefRegMap(@Self)^.&set := $02000000;
  87455. end;
  87456. procedure TCAN1_C1FIFOINT3.clearTXHALFIE; inline;
  87457. begin
  87458. pTDefRegMap(@Self)^.clr := $02000000;
  87459. end;
  87460. procedure TCAN1_C1FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  87461. begin
  87462. if thebits = 0 then
  87463. pTDefRegMap(@Self)^.clr := $02000000
  87464. else
  87465. pTDefRegMap(@Self)^.&set := $02000000;
  87466. end;
  87467. function TCAN1_C1FIFOINT3.getTXHALFIE : TBits_1; inline;
  87468. begin
  87469. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  87470. end;
  87471. procedure TCAN1_C1FIFOINT3.setTXNFULLIE; inline;
  87472. begin
  87473. pTDefRegMap(@Self)^.&set := $04000000;
  87474. end;
  87475. procedure TCAN1_C1FIFOINT3.clearTXNFULLIE; inline;
  87476. begin
  87477. pTDefRegMap(@Self)^.clr := $04000000;
  87478. end;
  87479. procedure TCAN1_C1FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  87480. begin
  87481. if thebits = 0 then
  87482. pTDefRegMap(@Self)^.clr := $04000000
  87483. else
  87484. pTDefRegMap(@Self)^.&set := $04000000;
  87485. end;
  87486. function TCAN1_C1FIFOINT3.getTXNFULLIE : TBits_1; inline;
  87487. begin
  87488. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  87489. end;
  87490. procedure TCAN1_C1FIFOINT3.setw(thebits : TBits_32); inline;
  87491. begin
  87492. pTDefRegMap(@Self)^.val := thebits;
  87493. end;
  87494. function TCAN1_C1FIFOINT3.getw : TBits_32; inline;
  87495. begin
  87496. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87497. end;
  87498. procedure TCAN1_C1FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  87499. begin
  87500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  87501. end;
  87502. function TCAN1_C1FIFOCI3.getCFIFOCI : TBits_5; inline;
  87503. begin
  87504. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  87505. end;
  87506. procedure TCAN1_C1FIFOCI3.setw(thebits : TBits_32); inline;
  87507. begin
  87508. pTDefRegMap(@Self)^.val := thebits;
  87509. end;
  87510. function TCAN1_C1FIFOCI3.getw : TBits_32; inline;
  87511. begin
  87512. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87513. end;
  87514. procedure TCAN1_C1FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  87515. begin
  87516. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  87517. end;
  87518. function TCAN1_C1FIFOCON4.getTXPRI : TBits_2; inline;
  87519. begin
  87520. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  87521. end;
  87522. procedure TCAN1_C1FIFOCON4.setRTREN; inline;
  87523. begin
  87524. pTDefRegMap(@Self)^.&set := $00000004;
  87525. end;
  87526. procedure TCAN1_C1FIFOCON4.clearRTREN; inline;
  87527. begin
  87528. pTDefRegMap(@Self)^.clr := $00000004;
  87529. end;
  87530. procedure TCAN1_C1FIFOCON4.setRTREN(thebits : TBits_1); inline;
  87531. begin
  87532. if thebits = 0 then
  87533. pTDefRegMap(@Self)^.clr := $00000004
  87534. else
  87535. pTDefRegMap(@Self)^.&set := $00000004;
  87536. end;
  87537. function TCAN1_C1FIFOCON4.getRTREN : TBits_1; inline;
  87538. begin
  87539. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87540. end;
  87541. procedure TCAN1_C1FIFOCON4.setTXREQ; inline;
  87542. begin
  87543. pTDefRegMap(@Self)^.&set := $00000008;
  87544. end;
  87545. procedure TCAN1_C1FIFOCON4.clearTXREQ; inline;
  87546. begin
  87547. pTDefRegMap(@Self)^.clr := $00000008;
  87548. end;
  87549. procedure TCAN1_C1FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  87550. begin
  87551. if thebits = 0 then
  87552. pTDefRegMap(@Self)^.clr := $00000008
  87553. else
  87554. pTDefRegMap(@Self)^.&set := $00000008;
  87555. end;
  87556. function TCAN1_C1FIFOCON4.getTXREQ : TBits_1; inline;
  87557. begin
  87558. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87559. end;
  87560. procedure TCAN1_C1FIFOCON4.setTXERR; inline;
  87561. begin
  87562. pTDefRegMap(@Self)^.&set := $00000010;
  87563. end;
  87564. procedure TCAN1_C1FIFOCON4.clearTXERR; inline;
  87565. begin
  87566. pTDefRegMap(@Self)^.clr := $00000010;
  87567. end;
  87568. procedure TCAN1_C1FIFOCON4.setTXERR(thebits : TBits_1); inline;
  87569. begin
  87570. if thebits = 0 then
  87571. pTDefRegMap(@Self)^.clr := $00000010
  87572. else
  87573. pTDefRegMap(@Self)^.&set := $00000010;
  87574. end;
  87575. function TCAN1_C1FIFOCON4.getTXERR : TBits_1; inline;
  87576. begin
  87577. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  87578. end;
  87579. procedure TCAN1_C1FIFOCON4.setTXLARB; inline;
  87580. begin
  87581. pTDefRegMap(@Self)^.&set := $00000020;
  87582. end;
  87583. procedure TCAN1_C1FIFOCON4.clearTXLARB; inline;
  87584. begin
  87585. pTDefRegMap(@Self)^.clr := $00000020;
  87586. end;
  87587. procedure TCAN1_C1FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  87588. begin
  87589. if thebits = 0 then
  87590. pTDefRegMap(@Self)^.clr := $00000020
  87591. else
  87592. pTDefRegMap(@Self)^.&set := $00000020;
  87593. end;
  87594. function TCAN1_C1FIFOCON4.getTXLARB : TBits_1; inline;
  87595. begin
  87596. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  87597. end;
  87598. procedure TCAN1_C1FIFOCON4.setTXABAT; inline;
  87599. begin
  87600. pTDefRegMap(@Self)^.&set := $00000040;
  87601. end;
  87602. procedure TCAN1_C1FIFOCON4.clearTXABAT; inline;
  87603. begin
  87604. pTDefRegMap(@Self)^.clr := $00000040;
  87605. end;
  87606. procedure TCAN1_C1FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  87607. begin
  87608. if thebits = 0 then
  87609. pTDefRegMap(@Self)^.clr := $00000040
  87610. else
  87611. pTDefRegMap(@Self)^.&set := $00000040;
  87612. end;
  87613. function TCAN1_C1FIFOCON4.getTXABAT : TBits_1; inline;
  87614. begin
  87615. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  87616. end;
  87617. procedure TCAN1_C1FIFOCON4.setTXEN; inline;
  87618. begin
  87619. pTDefRegMap(@Self)^.&set := $00000080;
  87620. end;
  87621. procedure TCAN1_C1FIFOCON4.clearTXEN; inline;
  87622. begin
  87623. pTDefRegMap(@Self)^.clr := $00000080;
  87624. end;
  87625. procedure TCAN1_C1FIFOCON4.setTXEN(thebits : TBits_1); inline;
  87626. begin
  87627. if thebits = 0 then
  87628. pTDefRegMap(@Self)^.clr := $00000080
  87629. else
  87630. pTDefRegMap(@Self)^.&set := $00000080;
  87631. end;
  87632. function TCAN1_C1FIFOCON4.getTXEN : TBits_1; inline;
  87633. begin
  87634. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  87635. end;
  87636. procedure TCAN1_C1FIFOCON4.setDONLY; inline;
  87637. begin
  87638. pTDefRegMap(@Self)^.&set := $00001000;
  87639. end;
  87640. procedure TCAN1_C1FIFOCON4.clearDONLY; inline;
  87641. begin
  87642. pTDefRegMap(@Self)^.clr := $00001000;
  87643. end;
  87644. procedure TCAN1_C1FIFOCON4.setDONLY(thebits : TBits_1); inline;
  87645. begin
  87646. if thebits = 0 then
  87647. pTDefRegMap(@Self)^.clr := $00001000
  87648. else
  87649. pTDefRegMap(@Self)^.&set := $00001000;
  87650. end;
  87651. function TCAN1_C1FIFOCON4.getDONLY : TBits_1; inline;
  87652. begin
  87653. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  87654. end;
  87655. procedure TCAN1_C1FIFOCON4.setUINC; inline;
  87656. begin
  87657. pTDefRegMap(@Self)^.&set := $00002000;
  87658. end;
  87659. procedure TCAN1_C1FIFOCON4.clearUINC; inline;
  87660. begin
  87661. pTDefRegMap(@Self)^.clr := $00002000;
  87662. end;
  87663. procedure TCAN1_C1FIFOCON4.setUINC(thebits : TBits_1); inline;
  87664. begin
  87665. if thebits = 0 then
  87666. pTDefRegMap(@Self)^.clr := $00002000
  87667. else
  87668. pTDefRegMap(@Self)^.&set := $00002000;
  87669. end;
  87670. function TCAN1_C1FIFOCON4.getUINC : TBits_1; inline;
  87671. begin
  87672. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  87673. end;
  87674. procedure TCAN1_C1FIFOCON4.setFRESET; inline;
  87675. begin
  87676. pTDefRegMap(@Self)^.&set := $00004000;
  87677. end;
  87678. procedure TCAN1_C1FIFOCON4.clearFRESET; inline;
  87679. begin
  87680. pTDefRegMap(@Self)^.clr := $00004000;
  87681. end;
  87682. procedure TCAN1_C1FIFOCON4.setFRESET(thebits : TBits_1); inline;
  87683. begin
  87684. if thebits = 0 then
  87685. pTDefRegMap(@Self)^.clr := $00004000
  87686. else
  87687. pTDefRegMap(@Self)^.&set := $00004000;
  87688. end;
  87689. function TCAN1_C1FIFOCON4.getFRESET : TBits_1; inline;
  87690. begin
  87691. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  87692. end;
  87693. procedure TCAN1_C1FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  87694. begin
  87695. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  87696. end;
  87697. function TCAN1_C1FIFOCON4.getFSIZE : TBits_5; inline;
  87698. begin
  87699. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  87700. end;
  87701. procedure TCAN1_C1FIFOCON4.setw(thebits : TBits_32); inline;
  87702. begin
  87703. pTDefRegMap(@Self)^.val := thebits;
  87704. end;
  87705. function TCAN1_C1FIFOCON4.getw : TBits_32; inline;
  87706. begin
  87707. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87708. end;
  87709. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF; inline;
  87710. begin
  87711. pTDefRegMap(@Self)^.&set := $00000001;
  87712. end;
  87713. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIF; inline;
  87714. begin
  87715. pTDefRegMap(@Self)^.clr := $00000001;
  87716. end;
  87717. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  87718. begin
  87719. if thebits = 0 then
  87720. pTDefRegMap(@Self)^.clr := $00000001
  87721. else
  87722. pTDefRegMap(@Self)^.&set := $00000001;
  87723. end;
  87724. function TCAN1_C1FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  87725. begin
  87726. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  87727. end;
  87728. procedure TCAN1_C1FIFOINT4.setRXHALFIF; inline;
  87729. begin
  87730. pTDefRegMap(@Self)^.&set := $00000002;
  87731. end;
  87732. procedure TCAN1_C1FIFOINT4.clearRXHALFIF; inline;
  87733. begin
  87734. pTDefRegMap(@Self)^.clr := $00000002;
  87735. end;
  87736. procedure TCAN1_C1FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  87737. begin
  87738. if thebits = 0 then
  87739. pTDefRegMap(@Self)^.clr := $00000002
  87740. else
  87741. pTDefRegMap(@Self)^.&set := $00000002;
  87742. end;
  87743. function TCAN1_C1FIFOINT4.getRXHALFIF : TBits_1; inline;
  87744. begin
  87745. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  87746. end;
  87747. procedure TCAN1_C1FIFOINT4.setRXFULLIF; inline;
  87748. begin
  87749. pTDefRegMap(@Self)^.&set := $00000004;
  87750. end;
  87751. procedure TCAN1_C1FIFOINT4.clearRXFULLIF; inline;
  87752. begin
  87753. pTDefRegMap(@Self)^.clr := $00000004;
  87754. end;
  87755. procedure TCAN1_C1FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  87756. begin
  87757. if thebits = 0 then
  87758. pTDefRegMap(@Self)^.clr := $00000004
  87759. else
  87760. pTDefRegMap(@Self)^.&set := $00000004;
  87761. end;
  87762. function TCAN1_C1FIFOINT4.getRXFULLIF : TBits_1; inline;
  87763. begin
  87764. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87765. end;
  87766. procedure TCAN1_C1FIFOINT4.setRXOVFLIF; inline;
  87767. begin
  87768. pTDefRegMap(@Self)^.&set := $00000008;
  87769. end;
  87770. procedure TCAN1_C1FIFOINT4.clearRXOVFLIF; inline;
  87771. begin
  87772. pTDefRegMap(@Self)^.clr := $00000008;
  87773. end;
  87774. procedure TCAN1_C1FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  87775. begin
  87776. if thebits = 0 then
  87777. pTDefRegMap(@Self)^.clr := $00000008
  87778. else
  87779. pTDefRegMap(@Self)^.&set := $00000008;
  87780. end;
  87781. function TCAN1_C1FIFOINT4.getRXOVFLIF : TBits_1; inline;
  87782. begin
  87783. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87784. end;
  87785. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF; inline;
  87786. begin
  87787. pTDefRegMap(@Self)^.&set := $00000100;
  87788. end;
  87789. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIF; inline;
  87790. begin
  87791. pTDefRegMap(@Self)^.clr := $00000100;
  87792. end;
  87793. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  87794. begin
  87795. if thebits = 0 then
  87796. pTDefRegMap(@Self)^.clr := $00000100
  87797. else
  87798. pTDefRegMap(@Self)^.&set := $00000100;
  87799. end;
  87800. function TCAN1_C1FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  87801. begin
  87802. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  87803. end;
  87804. procedure TCAN1_C1FIFOINT4.setTXHALFIF; inline;
  87805. begin
  87806. pTDefRegMap(@Self)^.&set := $00000200;
  87807. end;
  87808. procedure TCAN1_C1FIFOINT4.clearTXHALFIF; inline;
  87809. begin
  87810. pTDefRegMap(@Self)^.clr := $00000200;
  87811. end;
  87812. procedure TCAN1_C1FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  87813. begin
  87814. if thebits = 0 then
  87815. pTDefRegMap(@Self)^.clr := $00000200
  87816. else
  87817. pTDefRegMap(@Self)^.&set := $00000200;
  87818. end;
  87819. function TCAN1_C1FIFOINT4.getTXHALFIF : TBits_1; inline;
  87820. begin
  87821. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  87822. end;
  87823. procedure TCAN1_C1FIFOINT4.setTXNFULLIF; inline;
  87824. begin
  87825. pTDefRegMap(@Self)^.&set := $00000400;
  87826. end;
  87827. procedure TCAN1_C1FIFOINT4.clearTXNFULLIF; inline;
  87828. begin
  87829. pTDefRegMap(@Self)^.clr := $00000400;
  87830. end;
  87831. procedure TCAN1_C1FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  87832. begin
  87833. if thebits = 0 then
  87834. pTDefRegMap(@Self)^.clr := $00000400
  87835. else
  87836. pTDefRegMap(@Self)^.&set := $00000400;
  87837. end;
  87838. function TCAN1_C1FIFOINT4.getTXNFULLIF : TBits_1; inline;
  87839. begin
  87840. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  87841. end;
  87842. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE; inline;
  87843. begin
  87844. pTDefRegMap(@Self)^.&set := $00010000;
  87845. end;
  87846. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIE; inline;
  87847. begin
  87848. pTDefRegMap(@Self)^.clr := $00010000;
  87849. end;
  87850. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  87851. begin
  87852. if thebits = 0 then
  87853. pTDefRegMap(@Self)^.clr := $00010000
  87854. else
  87855. pTDefRegMap(@Self)^.&set := $00010000;
  87856. end;
  87857. function TCAN1_C1FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  87858. begin
  87859. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  87860. end;
  87861. procedure TCAN1_C1FIFOINT4.setRXHALFIE; inline;
  87862. begin
  87863. pTDefRegMap(@Self)^.&set := $00020000;
  87864. end;
  87865. procedure TCAN1_C1FIFOINT4.clearRXHALFIE; inline;
  87866. begin
  87867. pTDefRegMap(@Self)^.clr := $00020000;
  87868. end;
  87869. procedure TCAN1_C1FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  87870. begin
  87871. if thebits = 0 then
  87872. pTDefRegMap(@Self)^.clr := $00020000
  87873. else
  87874. pTDefRegMap(@Self)^.&set := $00020000;
  87875. end;
  87876. function TCAN1_C1FIFOINT4.getRXHALFIE : TBits_1; inline;
  87877. begin
  87878. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  87879. end;
  87880. procedure TCAN1_C1FIFOINT4.setRXFULLIE; inline;
  87881. begin
  87882. pTDefRegMap(@Self)^.&set := $00040000;
  87883. end;
  87884. procedure TCAN1_C1FIFOINT4.clearRXFULLIE; inline;
  87885. begin
  87886. pTDefRegMap(@Self)^.clr := $00040000;
  87887. end;
  87888. procedure TCAN1_C1FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  87889. begin
  87890. if thebits = 0 then
  87891. pTDefRegMap(@Self)^.clr := $00040000
  87892. else
  87893. pTDefRegMap(@Self)^.&set := $00040000;
  87894. end;
  87895. function TCAN1_C1FIFOINT4.getRXFULLIE : TBits_1; inline;
  87896. begin
  87897. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  87898. end;
  87899. procedure TCAN1_C1FIFOINT4.setRXOVFLIE; inline;
  87900. begin
  87901. pTDefRegMap(@Self)^.&set := $00080000;
  87902. end;
  87903. procedure TCAN1_C1FIFOINT4.clearRXOVFLIE; inline;
  87904. begin
  87905. pTDefRegMap(@Self)^.clr := $00080000;
  87906. end;
  87907. procedure TCAN1_C1FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  87908. begin
  87909. if thebits = 0 then
  87910. pTDefRegMap(@Self)^.clr := $00080000
  87911. else
  87912. pTDefRegMap(@Self)^.&set := $00080000;
  87913. end;
  87914. function TCAN1_C1FIFOINT4.getRXOVFLIE : TBits_1; inline;
  87915. begin
  87916. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  87917. end;
  87918. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE; inline;
  87919. begin
  87920. pTDefRegMap(@Self)^.&set := $01000000;
  87921. end;
  87922. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIE; inline;
  87923. begin
  87924. pTDefRegMap(@Self)^.clr := $01000000;
  87925. end;
  87926. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  87927. begin
  87928. if thebits = 0 then
  87929. pTDefRegMap(@Self)^.clr := $01000000
  87930. else
  87931. pTDefRegMap(@Self)^.&set := $01000000;
  87932. end;
  87933. function TCAN1_C1FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  87934. begin
  87935. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  87936. end;
  87937. procedure TCAN1_C1FIFOINT4.setTXHALFIE; inline;
  87938. begin
  87939. pTDefRegMap(@Self)^.&set := $02000000;
  87940. end;
  87941. procedure TCAN1_C1FIFOINT4.clearTXHALFIE; inline;
  87942. begin
  87943. pTDefRegMap(@Self)^.clr := $02000000;
  87944. end;
  87945. procedure TCAN1_C1FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  87946. begin
  87947. if thebits = 0 then
  87948. pTDefRegMap(@Self)^.clr := $02000000
  87949. else
  87950. pTDefRegMap(@Self)^.&set := $02000000;
  87951. end;
  87952. function TCAN1_C1FIFOINT4.getTXHALFIE : TBits_1; inline;
  87953. begin
  87954. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  87955. end;
  87956. procedure TCAN1_C1FIFOINT4.setTXNFULLIE; inline;
  87957. begin
  87958. pTDefRegMap(@Self)^.&set := $04000000;
  87959. end;
  87960. procedure TCAN1_C1FIFOINT4.clearTXNFULLIE; inline;
  87961. begin
  87962. pTDefRegMap(@Self)^.clr := $04000000;
  87963. end;
  87964. procedure TCAN1_C1FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  87965. begin
  87966. if thebits = 0 then
  87967. pTDefRegMap(@Self)^.clr := $04000000
  87968. else
  87969. pTDefRegMap(@Self)^.&set := $04000000;
  87970. end;
  87971. function TCAN1_C1FIFOINT4.getTXNFULLIE : TBits_1; inline;
  87972. begin
  87973. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  87974. end;
  87975. procedure TCAN1_C1FIFOINT4.setw(thebits : TBits_32); inline;
  87976. begin
  87977. pTDefRegMap(@Self)^.val := thebits;
  87978. end;
  87979. function TCAN1_C1FIFOINT4.getw : TBits_32; inline;
  87980. begin
  87981. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87982. end;
  87983. procedure TCAN1_C1FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  87984. begin
  87985. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  87986. end;
  87987. function TCAN1_C1FIFOCI4.getCFIFOCI : TBits_5; inline;
  87988. begin
  87989. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  87990. end;
  87991. procedure TCAN1_C1FIFOCI4.setw(thebits : TBits_32); inline;
  87992. begin
  87993. pTDefRegMap(@Self)^.val := thebits;
  87994. end;
  87995. function TCAN1_C1FIFOCI4.getw : TBits_32; inline;
  87996. begin
  87997. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87998. end;
  87999. procedure TCAN1_C1FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  88000. begin
  88001. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  88002. end;
  88003. function TCAN1_C1FIFOCON5.getTXPRI : TBits_2; inline;
  88004. begin
  88005. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  88006. end;
  88007. procedure TCAN1_C1FIFOCON5.setRTREN; inline;
  88008. begin
  88009. pTDefRegMap(@Self)^.&set := $00000004;
  88010. end;
  88011. procedure TCAN1_C1FIFOCON5.clearRTREN; inline;
  88012. begin
  88013. pTDefRegMap(@Self)^.clr := $00000004;
  88014. end;
  88015. procedure TCAN1_C1FIFOCON5.setRTREN(thebits : TBits_1); inline;
  88016. begin
  88017. if thebits = 0 then
  88018. pTDefRegMap(@Self)^.clr := $00000004
  88019. else
  88020. pTDefRegMap(@Self)^.&set := $00000004;
  88021. end;
  88022. function TCAN1_C1FIFOCON5.getRTREN : TBits_1; inline;
  88023. begin
  88024. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88025. end;
  88026. procedure TCAN1_C1FIFOCON5.setTXREQ; inline;
  88027. begin
  88028. pTDefRegMap(@Self)^.&set := $00000008;
  88029. end;
  88030. procedure TCAN1_C1FIFOCON5.clearTXREQ; inline;
  88031. begin
  88032. pTDefRegMap(@Self)^.clr := $00000008;
  88033. end;
  88034. procedure TCAN1_C1FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  88035. begin
  88036. if thebits = 0 then
  88037. pTDefRegMap(@Self)^.clr := $00000008
  88038. else
  88039. pTDefRegMap(@Self)^.&set := $00000008;
  88040. end;
  88041. function TCAN1_C1FIFOCON5.getTXREQ : TBits_1; inline;
  88042. begin
  88043. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88044. end;
  88045. procedure TCAN1_C1FIFOCON5.setTXERR; inline;
  88046. begin
  88047. pTDefRegMap(@Self)^.&set := $00000010;
  88048. end;
  88049. procedure TCAN1_C1FIFOCON5.clearTXERR; inline;
  88050. begin
  88051. pTDefRegMap(@Self)^.clr := $00000010;
  88052. end;
  88053. procedure TCAN1_C1FIFOCON5.setTXERR(thebits : TBits_1); inline;
  88054. begin
  88055. if thebits = 0 then
  88056. pTDefRegMap(@Self)^.clr := $00000010
  88057. else
  88058. pTDefRegMap(@Self)^.&set := $00000010;
  88059. end;
  88060. function TCAN1_C1FIFOCON5.getTXERR : TBits_1; inline;
  88061. begin
  88062. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  88063. end;
  88064. procedure TCAN1_C1FIFOCON5.setTXLARB; inline;
  88065. begin
  88066. pTDefRegMap(@Self)^.&set := $00000020;
  88067. end;
  88068. procedure TCAN1_C1FIFOCON5.clearTXLARB; inline;
  88069. begin
  88070. pTDefRegMap(@Self)^.clr := $00000020;
  88071. end;
  88072. procedure TCAN1_C1FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  88073. begin
  88074. if thebits = 0 then
  88075. pTDefRegMap(@Self)^.clr := $00000020
  88076. else
  88077. pTDefRegMap(@Self)^.&set := $00000020;
  88078. end;
  88079. function TCAN1_C1FIFOCON5.getTXLARB : TBits_1; inline;
  88080. begin
  88081. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  88082. end;
  88083. procedure TCAN1_C1FIFOCON5.setTXABAT; inline;
  88084. begin
  88085. pTDefRegMap(@Self)^.&set := $00000040;
  88086. end;
  88087. procedure TCAN1_C1FIFOCON5.clearTXABAT; inline;
  88088. begin
  88089. pTDefRegMap(@Self)^.clr := $00000040;
  88090. end;
  88091. procedure TCAN1_C1FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  88092. begin
  88093. if thebits = 0 then
  88094. pTDefRegMap(@Self)^.clr := $00000040
  88095. else
  88096. pTDefRegMap(@Self)^.&set := $00000040;
  88097. end;
  88098. function TCAN1_C1FIFOCON5.getTXABAT : TBits_1; inline;
  88099. begin
  88100. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  88101. end;
  88102. procedure TCAN1_C1FIFOCON5.setTXEN; inline;
  88103. begin
  88104. pTDefRegMap(@Self)^.&set := $00000080;
  88105. end;
  88106. procedure TCAN1_C1FIFOCON5.clearTXEN; inline;
  88107. begin
  88108. pTDefRegMap(@Self)^.clr := $00000080;
  88109. end;
  88110. procedure TCAN1_C1FIFOCON5.setTXEN(thebits : TBits_1); inline;
  88111. begin
  88112. if thebits = 0 then
  88113. pTDefRegMap(@Self)^.clr := $00000080
  88114. else
  88115. pTDefRegMap(@Self)^.&set := $00000080;
  88116. end;
  88117. function TCAN1_C1FIFOCON5.getTXEN : TBits_1; inline;
  88118. begin
  88119. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  88120. end;
  88121. procedure TCAN1_C1FIFOCON5.setDONLY; inline;
  88122. begin
  88123. pTDefRegMap(@Self)^.&set := $00001000;
  88124. end;
  88125. procedure TCAN1_C1FIFOCON5.clearDONLY; inline;
  88126. begin
  88127. pTDefRegMap(@Self)^.clr := $00001000;
  88128. end;
  88129. procedure TCAN1_C1FIFOCON5.setDONLY(thebits : TBits_1); inline;
  88130. begin
  88131. if thebits = 0 then
  88132. pTDefRegMap(@Self)^.clr := $00001000
  88133. else
  88134. pTDefRegMap(@Self)^.&set := $00001000;
  88135. end;
  88136. function TCAN1_C1FIFOCON5.getDONLY : TBits_1; inline;
  88137. begin
  88138. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  88139. end;
  88140. procedure TCAN1_C1FIFOCON5.setUINC; inline;
  88141. begin
  88142. pTDefRegMap(@Self)^.&set := $00002000;
  88143. end;
  88144. procedure TCAN1_C1FIFOCON5.clearUINC; inline;
  88145. begin
  88146. pTDefRegMap(@Self)^.clr := $00002000;
  88147. end;
  88148. procedure TCAN1_C1FIFOCON5.setUINC(thebits : TBits_1); inline;
  88149. begin
  88150. if thebits = 0 then
  88151. pTDefRegMap(@Self)^.clr := $00002000
  88152. else
  88153. pTDefRegMap(@Self)^.&set := $00002000;
  88154. end;
  88155. function TCAN1_C1FIFOCON5.getUINC : TBits_1; inline;
  88156. begin
  88157. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  88158. end;
  88159. procedure TCAN1_C1FIFOCON5.setFRESET; inline;
  88160. begin
  88161. pTDefRegMap(@Self)^.&set := $00004000;
  88162. end;
  88163. procedure TCAN1_C1FIFOCON5.clearFRESET; inline;
  88164. begin
  88165. pTDefRegMap(@Self)^.clr := $00004000;
  88166. end;
  88167. procedure TCAN1_C1FIFOCON5.setFRESET(thebits : TBits_1); inline;
  88168. begin
  88169. if thebits = 0 then
  88170. pTDefRegMap(@Self)^.clr := $00004000
  88171. else
  88172. pTDefRegMap(@Self)^.&set := $00004000;
  88173. end;
  88174. function TCAN1_C1FIFOCON5.getFRESET : TBits_1; inline;
  88175. begin
  88176. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  88177. end;
  88178. procedure TCAN1_C1FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  88179. begin
  88180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  88181. end;
  88182. function TCAN1_C1FIFOCON5.getFSIZE : TBits_5; inline;
  88183. begin
  88184. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  88185. end;
  88186. procedure TCAN1_C1FIFOCON5.setw(thebits : TBits_32); inline;
  88187. begin
  88188. pTDefRegMap(@Self)^.val := thebits;
  88189. end;
  88190. function TCAN1_C1FIFOCON5.getw : TBits_32; inline;
  88191. begin
  88192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88193. end;
  88194. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF; inline;
  88195. begin
  88196. pTDefRegMap(@Self)^.&set := $00000001;
  88197. end;
  88198. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIF; inline;
  88199. begin
  88200. pTDefRegMap(@Self)^.clr := $00000001;
  88201. end;
  88202. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  88203. begin
  88204. if thebits = 0 then
  88205. pTDefRegMap(@Self)^.clr := $00000001
  88206. else
  88207. pTDefRegMap(@Self)^.&set := $00000001;
  88208. end;
  88209. function TCAN1_C1FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  88210. begin
  88211. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  88212. end;
  88213. procedure TCAN1_C1FIFOINT5.setRXHALFIF; inline;
  88214. begin
  88215. pTDefRegMap(@Self)^.&set := $00000002;
  88216. end;
  88217. procedure TCAN1_C1FIFOINT5.clearRXHALFIF; inline;
  88218. begin
  88219. pTDefRegMap(@Self)^.clr := $00000002;
  88220. end;
  88221. procedure TCAN1_C1FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  88222. begin
  88223. if thebits = 0 then
  88224. pTDefRegMap(@Self)^.clr := $00000002
  88225. else
  88226. pTDefRegMap(@Self)^.&set := $00000002;
  88227. end;
  88228. function TCAN1_C1FIFOINT5.getRXHALFIF : TBits_1; inline;
  88229. begin
  88230. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  88231. end;
  88232. procedure TCAN1_C1FIFOINT5.setRXFULLIF; inline;
  88233. begin
  88234. pTDefRegMap(@Self)^.&set := $00000004;
  88235. end;
  88236. procedure TCAN1_C1FIFOINT5.clearRXFULLIF; inline;
  88237. begin
  88238. pTDefRegMap(@Self)^.clr := $00000004;
  88239. end;
  88240. procedure TCAN1_C1FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  88241. begin
  88242. if thebits = 0 then
  88243. pTDefRegMap(@Self)^.clr := $00000004
  88244. else
  88245. pTDefRegMap(@Self)^.&set := $00000004;
  88246. end;
  88247. function TCAN1_C1FIFOINT5.getRXFULLIF : TBits_1; inline;
  88248. begin
  88249. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88250. end;
  88251. procedure TCAN1_C1FIFOINT5.setRXOVFLIF; inline;
  88252. begin
  88253. pTDefRegMap(@Self)^.&set := $00000008;
  88254. end;
  88255. procedure TCAN1_C1FIFOINT5.clearRXOVFLIF; inline;
  88256. begin
  88257. pTDefRegMap(@Self)^.clr := $00000008;
  88258. end;
  88259. procedure TCAN1_C1FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  88260. begin
  88261. if thebits = 0 then
  88262. pTDefRegMap(@Self)^.clr := $00000008
  88263. else
  88264. pTDefRegMap(@Self)^.&set := $00000008;
  88265. end;
  88266. function TCAN1_C1FIFOINT5.getRXOVFLIF : TBits_1; inline;
  88267. begin
  88268. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88269. end;
  88270. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF; inline;
  88271. begin
  88272. pTDefRegMap(@Self)^.&set := $00000100;
  88273. end;
  88274. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIF; inline;
  88275. begin
  88276. pTDefRegMap(@Self)^.clr := $00000100;
  88277. end;
  88278. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  88279. begin
  88280. if thebits = 0 then
  88281. pTDefRegMap(@Self)^.clr := $00000100
  88282. else
  88283. pTDefRegMap(@Self)^.&set := $00000100;
  88284. end;
  88285. function TCAN1_C1FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  88286. begin
  88287. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  88288. end;
  88289. procedure TCAN1_C1FIFOINT5.setTXHALFIF; inline;
  88290. begin
  88291. pTDefRegMap(@Self)^.&set := $00000200;
  88292. end;
  88293. procedure TCAN1_C1FIFOINT5.clearTXHALFIF; inline;
  88294. begin
  88295. pTDefRegMap(@Self)^.clr := $00000200;
  88296. end;
  88297. procedure TCAN1_C1FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  88298. begin
  88299. if thebits = 0 then
  88300. pTDefRegMap(@Self)^.clr := $00000200
  88301. else
  88302. pTDefRegMap(@Self)^.&set := $00000200;
  88303. end;
  88304. function TCAN1_C1FIFOINT5.getTXHALFIF : TBits_1; inline;
  88305. begin
  88306. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  88307. end;
  88308. procedure TCAN1_C1FIFOINT5.setTXNFULLIF; inline;
  88309. begin
  88310. pTDefRegMap(@Self)^.&set := $00000400;
  88311. end;
  88312. procedure TCAN1_C1FIFOINT5.clearTXNFULLIF; inline;
  88313. begin
  88314. pTDefRegMap(@Self)^.clr := $00000400;
  88315. end;
  88316. procedure TCAN1_C1FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  88317. begin
  88318. if thebits = 0 then
  88319. pTDefRegMap(@Self)^.clr := $00000400
  88320. else
  88321. pTDefRegMap(@Self)^.&set := $00000400;
  88322. end;
  88323. function TCAN1_C1FIFOINT5.getTXNFULLIF : TBits_1; inline;
  88324. begin
  88325. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  88326. end;
  88327. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE; inline;
  88328. begin
  88329. pTDefRegMap(@Self)^.&set := $00010000;
  88330. end;
  88331. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIE; inline;
  88332. begin
  88333. pTDefRegMap(@Self)^.clr := $00010000;
  88334. end;
  88335. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  88336. begin
  88337. if thebits = 0 then
  88338. pTDefRegMap(@Self)^.clr := $00010000
  88339. else
  88340. pTDefRegMap(@Self)^.&set := $00010000;
  88341. end;
  88342. function TCAN1_C1FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  88343. begin
  88344. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  88345. end;
  88346. procedure TCAN1_C1FIFOINT5.setRXHALFIE; inline;
  88347. begin
  88348. pTDefRegMap(@Self)^.&set := $00020000;
  88349. end;
  88350. procedure TCAN1_C1FIFOINT5.clearRXHALFIE; inline;
  88351. begin
  88352. pTDefRegMap(@Self)^.clr := $00020000;
  88353. end;
  88354. procedure TCAN1_C1FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  88355. begin
  88356. if thebits = 0 then
  88357. pTDefRegMap(@Self)^.clr := $00020000
  88358. else
  88359. pTDefRegMap(@Self)^.&set := $00020000;
  88360. end;
  88361. function TCAN1_C1FIFOINT5.getRXHALFIE : TBits_1; inline;
  88362. begin
  88363. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  88364. end;
  88365. procedure TCAN1_C1FIFOINT5.setRXFULLIE; inline;
  88366. begin
  88367. pTDefRegMap(@Self)^.&set := $00040000;
  88368. end;
  88369. procedure TCAN1_C1FIFOINT5.clearRXFULLIE; inline;
  88370. begin
  88371. pTDefRegMap(@Self)^.clr := $00040000;
  88372. end;
  88373. procedure TCAN1_C1FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  88374. begin
  88375. if thebits = 0 then
  88376. pTDefRegMap(@Self)^.clr := $00040000
  88377. else
  88378. pTDefRegMap(@Self)^.&set := $00040000;
  88379. end;
  88380. function TCAN1_C1FIFOINT5.getRXFULLIE : TBits_1; inline;
  88381. begin
  88382. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  88383. end;
  88384. procedure TCAN1_C1FIFOINT5.setRXOVFLIE; inline;
  88385. begin
  88386. pTDefRegMap(@Self)^.&set := $00080000;
  88387. end;
  88388. procedure TCAN1_C1FIFOINT5.clearRXOVFLIE; inline;
  88389. begin
  88390. pTDefRegMap(@Self)^.clr := $00080000;
  88391. end;
  88392. procedure TCAN1_C1FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  88393. begin
  88394. if thebits = 0 then
  88395. pTDefRegMap(@Self)^.clr := $00080000
  88396. else
  88397. pTDefRegMap(@Self)^.&set := $00080000;
  88398. end;
  88399. function TCAN1_C1FIFOINT5.getRXOVFLIE : TBits_1; inline;
  88400. begin
  88401. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  88402. end;
  88403. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE; inline;
  88404. begin
  88405. pTDefRegMap(@Self)^.&set := $01000000;
  88406. end;
  88407. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIE; inline;
  88408. begin
  88409. pTDefRegMap(@Self)^.clr := $01000000;
  88410. end;
  88411. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  88412. begin
  88413. if thebits = 0 then
  88414. pTDefRegMap(@Self)^.clr := $01000000
  88415. else
  88416. pTDefRegMap(@Self)^.&set := $01000000;
  88417. end;
  88418. function TCAN1_C1FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  88419. begin
  88420. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  88421. end;
  88422. procedure TCAN1_C1FIFOINT5.setTXHALFIE; inline;
  88423. begin
  88424. pTDefRegMap(@Self)^.&set := $02000000;
  88425. end;
  88426. procedure TCAN1_C1FIFOINT5.clearTXHALFIE; inline;
  88427. begin
  88428. pTDefRegMap(@Self)^.clr := $02000000;
  88429. end;
  88430. procedure TCAN1_C1FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  88431. begin
  88432. if thebits = 0 then
  88433. pTDefRegMap(@Self)^.clr := $02000000
  88434. else
  88435. pTDefRegMap(@Self)^.&set := $02000000;
  88436. end;
  88437. function TCAN1_C1FIFOINT5.getTXHALFIE : TBits_1; inline;
  88438. begin
  88439. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  88440. end;
  88441. procedure TCAN1_C1FIFOINT5.setTXNFULLIE; inline;
  88442. begin
  88443. pTDefRegMap(@Self)^.&set := $04000000;
  88444. end;
  88445. procedure TCAN1_C1FIFOINT5.clearTXNFULLIE; inline;
  88446. begin
  88447. pTDefRegMap(@Self)^.clr := $04000000;
  88448. end;
  88449. procedure TCAN1_C1FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  88450. begin
  88451. if thebits = 0 then
  88452. pTDefRegMap(@Self)^.clr := $04000000
  88453. else
  88454. pTDefRegMap(@Self)^.&set := $04000000;
  88455. end;
  88456. function TCAN1_C1FIFOINT5.getTXNFULLIE : TBits_1; inline;
  88457. begin
  88458. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  88459. end;
  88460. procedure TCAN1_C1FIFOINT5.setw(thebits : TBits_32); inline;
  88461. begin
  88462. pTDefRegMap(@Self)^.val := thebits;
  88463. end;
  88464. function TCAN1_C1FIFOINT5.getw : TBits_32; inline;
  88465. begin
  88466. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88467. end;
  88468. procedure TCAN1_C1FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  88469. begin
  88470. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  88471. end;
  88472. function TCAN1_C1FIFOCI5.getCFIFOCI : TBits_5; inline;
  88473. begin
  88474. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  88475. end;
  88476. procedure TCAN1_C1FIFOCI5.setw(thebits : TBits_32); inline;
  88477. begin
  88478. pTDefRegMap(@Self)^.val := thebits;
  88479. end;
  88480. function TCAN1_C1FIFOCI5.getw : TBits_32; inline;
  88481. begin
  88482. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88483. end;
  88484. procedure TCAN1_C1FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  88485. begin
  88486. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  88487. end;
  88488. function TCAN1_C1FIFOCON6.getTXPRI : TBits_2; inline;
  88489. begin
  88490. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  88491. end;
  88492. procedure TCAN1_C1FIFOCON6.setRTREN; inline;
  88493. begin
  88494. pTDefRegMap(@Self)^.&set := $00000004;
  88495. end;
  88496. procedure TCAN1_C1FIFOCON6.clearRTREN; inline;
  88497. begin
  88498. pTDefRegMap(@Self)^.clr := $00000004;
  88499. end;
  88500. procedure TCAN1_C1FIFOCON6.setRTREN(thebits : TBits_1); inline;
  88501. begin
  88502. if thebits = 0 then
  88503. pTDefRegMap(@Self)^.clr := $00000004
  88504. else
  88505. pTDefRegMap(@Self)^.&set := $00000004;
  88506. end;
  88507. function TCAN1_C1FIFOCON6.getRTREN : TBits_1; inline;
  88508. begin
  88509. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88510. end;
  88511. procedure TCAN1_C1FIFOCON6.setTXREQ; inline;
  88512. begin
  88513. pTDefRegMap(@Self)^.&set := $00000008;
  88514. end;
  88515. procedure TCAN1_C1FIFOCON6.clearTXREQ; inline;
  88516. begin
  88517. pTDefRegMap(@Self)^.clr := $00000008;
  88518. end;
  88519. procedure TCAN1_C1FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  88520. begin
  88521. if thebits = 0 then
  88522. pTDefRegMap(@Self)^.clr := $00000008
  88523. else
  88524. pTDefRegMap(@Self)^.&set := $00000008;
  88525. end;
  88526. function TCAN1_C1FIFOCON6.getTXREQ : TBits_1; inline;
  88527. begin
  88528. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88529. end;
  88530. procedure TCAN1_C1FIFOCON6.setTXERR; inline;
  88531. begin
  88532. pTDefRegMap(@Self)^.&set := $00000010;
  88533. end;
  88534. procedure TCAN1_C1FIFOCON6.clearTXERR; inline;
  88535. begin
  88536. pTDefRegMap(@Self)^.clr := $00000010;
  88537. end;
  88538. procedure TCAN1_C1FIFOCON6.setTXERR(thebits : TBits_1); inline;
  88539. begin
  88540. if thebits = 0 then
  88541. pTDefRegMap(@Self)^.clr := $00000010
  88542. else
  88543. pTDefRegMap(@Self)^.&set := $00000010;
  88544. end;
  88545. function TCAN1_C1FIFOCON6.getTXERR : TBits_1; inline;
  88546. begin
  88547. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  88548. end;
  88549. procedure TCAN1_C1FIFOCON6.setTXLARB; inline;
  88550. begin
  88551. pTDefRegMap(@Self)^.&set := $00000020;
  88552. end;
  88553. procedure TCAN1_C1FIFOCON6.clearTXLARB; inline;
  88554. begin
  88555. pTDefRegMap(@Self)^.clr := $00000020;
  88556. end;
  88557. procedure TCAN1_C1FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  88558. begin
  88559. if thebits = 0 then
  88560. pTDefRegMap(@Self)^.clr := $00000020
  88561. else
  88562. pTDefRegMap(@Self)^.&set := $00000020;
  88563. end;
  88564. function TCAN1_C1FIFOCON6.getTXLARB : TBits_1; inline;
  88565. begin
  88566. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  88567. end;
  88568. procedure TCAN1_C1FIFOCON6.setTXABAT; inline;
  88569. begin
  88570. pTDefRegMap(@Self)^.&set := $00000040;
  88571. end;
  88572. procedure TCAN1_C1FIFOCON6.clearTXABAT; inline;
  88573. begin
  88574. pTDefRegMap(@Self)^.clr := $00000040;
  88575. end;
  88576. procedure TCAN1_C1FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  88577. begin
  88578. if thebits = 0 then
  88579. pTDefRegMap(@Self)^.clr := $00000040
  88580. else
  88581. pTDefRegMap(@Self)^.&set := $00000040;
  88582. end;
  88583. function TCAN1_C1FIFOCON6.getTXABAT : TBits_1; inline;
  88584. begin
  88585. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  88586. end;
  88587. procedure TCAN1_C1FIFOCON6.setTXEN; inline;
  88588. begin
  88589. pTDefRegMap(@Self)^.&set := $00000080;
  88590. end;
  88591. procedure TCAN1_C1FIFOCON6.clearTXEN; inline;
  88592. begin
  88593. pTDefRegMap(@Self)^.clr := $00000080;
  88594. end;
  88595. procedure TCAN1_C1FIFOCON6.setTXEN(thebits : TBits_1); inline;
  88596. begin
  88597. if thebits = 0 then
  88598. pTDefRegMap(@Self)^.clr := $00000080
  88599. else
  88600. pTDefRegMap(@Self)^.&set := $00000080;
  88601. end;
  88602. function TCAN1_C1FIFOCON6.getTXEN : TBits_1; inline;
  88603. begin
  88604. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  88605. end;
  88606. procedure TCAN1_C1FIFOCON6.setDONLY; inline;
  88607. begin
  88608. pTDefRegMap(@Self)^.&set := $00001000;
  88609. end;
  88610. procedure TCAN1_C1FIFOCON6.clearDONLY; inline;
  88611. begin
  88612. pTDefRegMap(@Self)^.clr := $00001000;
  88613. end;
  88614. procedure TCAN1_C1FIFOCON6.setDONLY(thebits : TBits_1); inline;
  88615. begin
  88616. if thebits = 0 then
  88617. pTDefRegMap(@Self)^.clr := $00001000
  88618. else
  88619. pTDefRegMap(@Self)^.&set := $00001000;
  88620. end;
  88621. function TCAN1_C1FIFOCON6.getDONLY : TBits_1; inline;
  88622. begin
  88623. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  88624. end;
  88625. procedure TCAN1_C1FIFOCON6.setUINC; inline;
  88626. begin
  88627. pTDefRegMap(@Self)^.&set := $00002000;
  88628. end;
  88629. procedure TCAN1_C1FIFOCON6.clearUINC; inline;
  88630. begin
  88631. pTDefRegMap(@Self)^.clr := $00002000;
  88632. end;
  88633. procedure TCAN1_C1FIFOCON6.setUINC(thebits : TBits_1); inline;
  88634. begin
  88635. if thebits = 0 then
  88636. pTDefRegMap(@Self)^.clr := $00002000
  88637. else
  88638. pTDefRegMap(@Self)^.&set := $00002000;
  88639. end;
  88640. function TCAN1_C1FIFOCON6.getUINC : TBits_1; inline;
  88641. begin
  88642. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  88643. end;
  88644. procedure TCAN1_C1FIFOCON6.setFRESET; inline;
  88645. begin
  88646. pTDefRegMap(@Self)^.&set := $00004000;
  88647. end;
  88648. procedure TCAN1_C1FIFOCON6.clearFRESET; inline;
  88649. begin
  88650. pTDefRegMap(@Self)^.clr := $00004000;
  88651. end;
  88652. procedure TCAN1_C1FIFOCON6.setFRESET(thebits : TBits_1); inline;
  88653. begin
  88654. if thebits = 0 then
  88655. pTDefRegMap(@Self)^.clr := $00004000
  88656. else
  88657. pTDefRegMap(@Self)^.&set := $00004000;
  88658. end;
  88659. function TCAN1_C1FIFOCON6.getFRESET : TBits_1; inline;
  88660. begin
  88661. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  88662. end;
  88663. procedure TCAN1_C1FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  88664. begin
  88665. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  88666. end;
  88667. function TCAN1_C1FIFOCON6.getFSIZE : TBits_5; inline;
  88668. begin
  88669. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  88670. end;
  88671. procedure TCAN1_C1FIFOCON6.setw(thebits : TBits_32); inline;
  88672. begin
  88673. pTDefRegMap(@Self)^.val := thebits;
  88674. end;
  88675. function TCAN1_C1FIFOCON6.getw : TBits_32; inline;
  88676. begin
  88677. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88678. end;
  88679. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF; inline;
  88680. begin
  88681. pTDefRegMap(@Self)^.&set := $00000001;
  88682. end;
  88683. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIF; inline;
  88684. begin
  88685. pTDefRegMap(@Self)^.clr := $00000001;
  88686. end;
  88687. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  88688. begin
  88689. if thebits = 0 then
  88690. pTDefRegMap(@Self)^.clr := $00000001
  88691. else
  88692. pTDefRegMap(@Self)^.&set := $00000001;
  88693. end;
  88694. function TCAN1_C1FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  88695. begin
  88696. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  88697. end;
  88698. procedure TCAN1_C1FIFOINT6.setRXHALFIF; inline;
  88699. begin
  88700. pTDefRegMap(@Self)^.&set := $00000002;
  88701. end;
  88702. procedure TCAN1_C1FIFOINT6.clearRXHALFIF; inline;
  88703. begin
  88704. pTDefRegMap(@Self)^.clr := $00000002;
  88705. end;
  88706. procedure TCAN1_C1FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  88707. begin
  88708. if thebits = 0 then
  88709. pTDefRegMap(@Self)^.clr := $00000002
  88710. else
  88711. pTDefRegMap(@Self)^.&set := $00000002;
  88712. end;
  88713. function TCAN1_C1FIFOINT6.getRXHALFIF : TBits_1; inline;
  88714. begin
  88715. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  88716. end;
  88717. procedure TCAN1_C1FIFOINT6.setRXFULLIF; inline;
  88718. begin
  88719. pTDefRegMap(@Self)^.&set := $00000004;
  88720. end;
  88721. procedure TCAN1_C1FIFOINT6.clearRXFULLIF; inline;
  88722. begin
  88723. pTDefRegMap(@Self)^.clr := $00000004;
  88724. end;
  88725. procedure TCAN1_C1FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  88726. begin
  88727. if thebits = 0 then
  88728. pTDefRegMap(@Self)^.clr := $00000004
  88729. else
  88730. pTDefRegMap(@Self)^.&set := $00000004;
  88731. end;
  88732. function TCAN1_C1FIFOINT6.getRXFULLIF : TBits_1; inline;
  88733. begin
  88734. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88735. end;
  88736. procedure TCAN1_C1FIFOINT6.setRXOVFLIF; inline;
  88737. begin
  88738. pTDefRegMap(@Self)^.&set := $00000008;
  88739. end;
  88740. procedure TCAN1_C1FIFOINT6.clearRXOVFLIF; inline;
  88741. begin
  88742. pTDefRegMap(@Self)^.clr := $00000008;
  88743. end;
  88744. procedure TCAN1_C1FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  88745. begin
  88746. if thebits = 0 then
  88747. pTDefRegMap(@Self)^.clr := $00000008
  88748. else
  88749. pTDefRegMap(@Self)^.&set := $00000008;
  88750. end;
  88751. function TCAN1_C1FIFOINT6.getRXOVFLIF : TBits_1; inline;
  88752. begin
  88753. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88754. end;
  88755. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF; inline;
  88756. begin
  88757. pTDefRegMap(@Self)^.&set := $00000100;
  88758. end;
  88759. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIF; inline;
  88760. begin
  88761. pTDefRegMap(@Self)^.clr := $00000100;
  88762. end;
  88763. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  88764. begin
  88765. if thebits = 0 then
  88766. pTDefRegMap(@Self)^.clr := $00000100
  88767. else
  88768. pTDefRegMap(@Self)^.&set := $00000100;
  88769. end;
  88770. function TCAN1_C1FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  88771. begin
  88772. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  88773. end;
  88774. procedure TCAN1_C1FIFOINT6.setTXHALFIF; inline;
  88775. begin
  88776. pTDefRegMap(@Self)^.&set := $00000200;
  88777. end;
  88778. procedure TCAN1_C1FIFOINT6.clearTXHALFIF; inline;
  88779. begin
  88780. pTDefRegMap(@Self)^.clr := $00000200;
  88781. end;
  88782. procedure TCAN1_C1FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  88783. begin
  88784. if thebits = 0 then
  88785. pTDefRegMap(@Self)^.clr := $00000200
  88786. else
  88787. pTDefRegMap(@Self)^.&set := $00000200;
  88788. end;
  88789. function TCAN1_C1FIFOINT6.getTXHALFIF : TBits_1; inline;
  88790. begin
  88791. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  88792. end;
  88793. procedure TCAN1_C1FIFOINT6.setTXNFULLIF; inline;
  88794. begin
  88795. pTDefRegMap(@Self)^.&set := $00000400;
  88796. end;
  88797. procedure TCAN1_C1FIFOINT6.clearTXNFULLIF; inline;
  88798. begin
  88799. pTDefRegMap(@Self)^.clr := $00000400;
  88800. end;
  88801. procedure TCAN1_C1FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  88802. begin
  88803. if thebits = 0 then
  88804. pTDefRegMap(@Self)^.clr := $00000400
  88805. else
  88806. pTDefRegMap(@Self)^.&set := $00000400;
  88807. end;
  88808. function TCAN1_C1FIFOINT6.getTXNFULLIF : TBits_1; inline;
  88809. begin
  88810. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  88811. end;
  88812. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE; inline;
  88813. begin
  88814. pTDefRegMap(@Self)^.&set := $00010000;
  88815. end;
  88816. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIE; inline;
  88817. begin
  88818. pTDefRegMap(@Self)^.clr := $00010000;
  88819. end;
  88820. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  88821. begin
  88822. if thebits = 0 then
  88823. pTDefRegMap(@Self)^.clr := $00010000
  88824. else
  88825. pTDefRegMap(@Self)^.&set := $00010000;
  88826. end;
  88827. function TCAN1_C1FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  88828. begin
  88829. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  88830. end;
  88831. procedure TCAN1_C1FIFOINT6.setRXHALFIE; inline;
  88832. begin
  88833. pTDefRegMap(@Self)^.&set := $00020000;
  88834. end;
  88835. procedure TCAN1_C1FIFOINT6.clearRXHALFIE; inline;
  88836. begin
  88837. pTDefRegMap(@Self)^.clr := $00020000;
  88838. end;
  88839. procedure TCAN1_C1FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  88840. begin
  88841. if thebits = 0 then
  88842. pTDefRegMap(@Self)^.clr := $00020000
  88843. else
  88844. pTDefRegMap(@Self)^.&set := $00020000;
  88845. end;
  88846. function TCAN1_C1FIFOINT6.getRXHALFIE : TBits_1; inline;
  88847. begin
  88848. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  88849. end;
  88850. procedure TCAN1_C1FIFOINT6.setRXFULLIE; inline;
  88851. begin
  88852. pTDefRegMap(@Self)^.&set := $00040000;
  88853. end;
  88854. procedure TCAN1_C1FIFOINT6.clearRXFULLIE; inline;
  88855. begin
  88856. pTDefRegMap(@Self)^.clr := $00040000;
  88857. end;
  88858. procedure TCAN1_C1FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  88859. begin
  88860. if thebits = 0 then
  88861. pTDefRegMap(@Self)^.clr := $00040000
  88862. else
  88863. pTDefRegMap(@Self)^.&set := $00040000;
  88864. end;
  88865. function TCAN1_C1FIFOINT6.getRXFULLIE : TBits_1; inline;
  88866. begin
  88867. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  88868. end;
  88869. procedure TCAN1_C1FIFOINT6.setRXOVFLIE; inline;
  88870. begin
  88871. pTDefRegMap(@Self)^.&set := $00080000;
  88872. end;
  88873. procedure TCAN1_C1FIFOINT6.clearRXOVFLIE; inline;
  88874. begin
  88875. pTDefRegMap(@Self)^.clr := $00080000;
  88876. end;
  88877. procedure TCAN1_C1FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  88878. begin
  88879. if thebits = 0 then
  88880. pTDefRegMap(@Self)^.clr := $00080000
  88881. else
  88882. pTDefRegMap(@Self)^.&set := $00080000;
  88883. end;
  88884. function TCAN1_C1FIFOINT6.getRXOVFLIE : TBits_1; inline;
  88885. begin
  88886. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  88887. end;
  88888. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE; inline;
  88889. begin
  88890. pTDefRegMap(@Self)^.&set := $01000000;
  88891. end;
  88892. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIE; inline;
  88893. begin
  88894. pTDefRegMap(@Self)^.clr := $01000000;
  88895. end;
  88896. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  88897. begin
  88898. if thebits = 0 then
  88899. pTDefRegMap(@Self)^.clr := $01000000
  88900. else
  88901. pTDefRegMap(@Self)^.&set := $01000000;
  88902. end;
  88903. function TCAN1_C1FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  88904. begin
  88905. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  88906. end;
  88907. procedure TCAN1_C1FIFOINT6.setTXHALFIE; inline;
  88908. begin
  88909. pTDefRegMap(@Self)^.&set := $02000000;
  88910. end;
  88911. procedure TCAN1_C1FIFOINT6.clearTXHALFIE; inline;
  88912. begin
  88913. pTDefRegMap(@Self)^.clr := $02000000;
  88914. end;
  88915. procedure TCAN1_C1FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  88916. begin
  88917. if thebits = 0 then
  88918. pTDefRegMap(@Self)^.clr := $02000000
  88919. else
  88920. pTDefRegMap(@Self)^.&set := $02000000;
  88921. end;
  88922. function TCAN1_C1FIFOINT6.getTXHALFIE : TBits_1; inline;
  88923. begin
  88924. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  88925. end;
  88926. procedure TCAN1_C1FIFOINT6.setTXNFULLIE; inline;
  88927. begin
  88928. pTDefRegMap(@Self)^.&set := $04000000;
  88929. end;
  88930. procedure TCAN1_C1FIFOINT6.clearTXNFULLIE; inline;
  88931. begin
  88932. pTDefRegMap(@Self)^.clr := $04000000;
  88933. end;
  88934. procedure TCAN1_C1FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  88935. begin
  88936. if thebits = 0 then
  88937. pTDefRegMap(@Self)^.clr := $04000000
  88938. else
  88939. pTDefRegMap(@Self)^.&set := $04000000;
  88940. end;
  88941. function TCAN1_C1FIFOINT6.getTXNFULLIE : TBits_1; inline;
  88942. begin
  88943. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  88944. end;
  88945. procedure TCAN1_C1FIFOINT6.setw(thebits : TBits_32); inline;
  88946. begin
  88947. pTDefRegMap(@Self)^.val := thebits;
  88948. end;
  88949. function TCAN1_C1FIFOINT6.getw : TBits_32; inline;
  88950. begin
  88951. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88952. end;
  88953. procedure TCAN1_C1FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  88954. begin
  88955. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  88956. end;
  88957. function TCAN1_C1FIFOCI6.getCFIFOCI : TBits_5; inline;
  88958. begin
  88959. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  88960. end;
  88961. procedure TCAN1_C1FIFOCI6.setw(thebits : TBits_32); inline;
  88962. begin
  88963. pTDefRegMap(@Self)^.val := thebits;
  88964. end;
  88965. function TCAN1_C1FIFOCI6.getw : TBits_32; inline;
  88966. begin
  88967. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88968. end;
  88969. procedure TCAN1_C1FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  88970. begin
  88971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  88972. end;
  88973. function TCAN1_C1FIFOCON7.getTXPRI : TBits_2; inline;
  88974. begin
  88975. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  88976. end;
  88977. procedure TCAN1_C1FIFOCON7.setRTREN; inline;
  88978. begin
  88979. pTDefRegMap(@Self)^.&set := $00000004;
  88980. end;
  88981. procedure TCAN1_C1FIFOCON7.clearRTREN; inline;
  88982. begin
  88983. pTDefRegMap(@Self)^.clr := $00000004;
  88984. end;
  88985. procedure TCAN1_C1FIFOCON7.setRTREN(thebits : TBits_1); inline;
  88986. begin
  88987. if thebits = 0 then
  88988. pTDefRegMap(@Self)^.clr := $00000004
  88989. else
  88990. pTDefRegMap(@Self)^.&set := $00000004;
  88991. end;
  88992. function TCAN1_C1FIFOCON7.getRTREN : TBits_1; inline;
  88993. begin
  88994. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88995. end;
  88996. procedure TCAN1_C1FIFOCON7.setTXREQ; inline;
  88997. begin
  88998. pTDefRegMap(@Self)^.&set := $00000008;
  88999. end;
  89000. procedure TCAN1_C1FIFOCON7.clearTXREQ; inline;
  89001. begin
  89002. pTDefRegMap(@Self)^.clr := $00000008;
  89003. end;
  89004. procedure TCAN1_C1FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  89005. begin
  89006. if thebits = 0 then
  89007. pTDefRegMap(@Self)^.clr := $00000008
  89008. else
  89009. pTDefRegMap(@Self)^.&set := $00000008;
  89010. end;
  89011. function TCAN1_C1FIFOCON7.getTXREQ : TBits_1; inline;
  89012. begin
  89013. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89014. end;
  89015. procedure TCAN1_C1FIFOCON7.setTXERR; inline;
  89016. begin
  89017. pTDefRegMap(@Self)^.&set := $00000010;
  89018. end;
  89019. procedure TCAN1_C1FIFOCON7.clearTXERR; inline;
  89020. begin
  89021. pTDefRegMap(@Self)^.clr := $00000010;
  89022. end;
  89023. procedure TCAN1_C1FIFOCON7.setTXERR(thebits : TBits_1); inline;
  89024. begin
  89025. if thebits = 0 then
  89026. pTDefRegMap(@Self)^.clr := $00000010
  89027. else
  89028. pTDefRegMap(@Self)^.&set := $00000010;
  89029. end;
  89030. function TCAN1_C1FIFOCON7.getTXERR : TBits_1; inline;
  89031. begin
  89032. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  89033. end;
  89034. procedure TCAN1_C1FIFOCON7.setTXLARB; inline;
  89035. begin
  89036. pTDefRegMap(@Self)^.&set := $00000020;
  89037. end;
  89038. procedure TCAN1_C1FIFOCON7.clearTXLARB; inline;
  89039. begin
  89040. pTDefRegMap(@Self)^.clr := $00000020;
  89041. end;
  89042. procedure TCAN1_C1FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  89043. begin
  89044. if thebits = 0 then
  89045. pTDefRegMap(@Self)^.clr := $00000020
  89046. else
  89047. pTDefRegMap(@Self)^.&set := $00000020;
  89048. end;
  89049. function TCAN1_C1FIFOCON7.getTXLARB : TBits_1; inline;
  89050. begin
  89051. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  89052. end;
  89053. procedure TCAN1_C1FIFOCON7.setTXABAT; inline;
  89054. begin
  89055. pTDefRegMap(@Self)^.&set := $00000040;
  89056. end;
  89057. procedure TCAN1_C1FIFOCON7.clearTXABAT; inline;
  89058. begin
  89059. pTDefRegMap(@Self)^.clr := $00000040;
  89060. end;
  89061. procedure TCAN1_C1FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  89062. begin
  89063. if thebits = 0 then
  89064. pTDefRegMap(@Self)^.clr := $00000040
  89065. else
  89066. pTDefRegMap(@Self)^.&set := $00000040;
  89067. end;
  89068. function TCAN1_C1FIFOCON7.getTXABAT : TBits_1; inline;
  89069. begin
  89070. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  89071. end;
  89072. procedure TCAN1_C1FIFOCON7.setTXEN; inline;
  89073. begin
  89074. pTDefRegMap(@Self)^.&set := $00000080;
  89075. end;
  89076. procedure TCAN1_C1FIFOCON7.clearTXEN; inline;
  89077. begin
  89078. pTDefRegMap(@Self)^.clr := $00000080;
  89079. end;
  89080. procedure TCAN1_C1FIFOCON7.setTXEN(thebits : TBits_1); inline;
  89081. begin
  89082. if thebits = 0 then
  89083. pTDefRegMap(@Self)^.clr := $00000080
  89084. else
  89085. pTDefRegMap(@Self)^.&set := $00000080;
  89086. end;
  89087. function TCAN1_C1FIFOCON7.getTXEN : TBits_1; inline;
  89088. begin
  89089. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  89090. end;
  89091. procedure TCAN1_C1FIFOCON7.setDONLY; inline;
  89092. begin
  89093. pTDefRegMap(@Self)^.&set := $00001000;
  89094. end;
  89095. procedure TCAN1_C1FIFOCON7.clearDONLY; inline;
  89096. begin
  89097. pTDefRegMap(@Self)^.clr := $00001000;
  89098. end;
  89099. procedure TCAN1_C1FIFOCON7.setDONLY(thebits : TBits_1); inline;
  89100. begin
  89101. if thebits = 0 then
  89102. pTDefRegMap(@Self)^.clr := $00001000
  89103. else
  89104. pTDefRegMap(@Self)^.&set := $00001000;
  89105. end;
  89106. function TCAN1_C1FIFOCON7.getDONLY : TBits_1; inline;
  89107. begin
  89108. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  89109. end;
  89110. procedure TCAN1_C1FIFOCON7.setUINC; inline;
  89111. begin
  89112. pTDefRegMap(@Self)^.&set := $00002000;
  89113. end;
  89114. procedure TCAN1_C1FIFOCON7.clearUINC; inline;
  89115. begin
  89116. pTDefRegMap(@Self)^.clr := $00002000;
  89117. end;
  89118. procedure TCAN1_C1FIFOCON7.setUINC(thebits : TBits_1); inline;
  89119. begin
  89120. if thebits = 0 then
  89121. pTDefRegMap(@Self)^.clr := $00002000
  89122. else
  89123. pTDefRegMap(@Self)^.&set := $00002000;
  89124. end;
  89125. function TCAN1_C1FIFOCON7.getUINC : TBits_1; inline;
  89126. begin
  89127. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  89128. end;
  89129. procedure TCAN1_C1FIFOCON7.setFRESET; inline;
  89130. begin
  89131. pTDefRegMap(@Self)^.&set := $00004000;
  89132. end;
  89133. procedure TCAN1_C1FIFOCON7.clearFRESET; inline;
  89134. begin
  89135. pTDefRegMap(@Self)^.clr := $00004000;
  89136. end;
  89137. procedure TCAN1_C1FIFOCON7.setFRESET(thebits : TBits_1); inline;
  89138. begin
  89139. if thebits = 0 then
  89140. pTDefRegMap(@Self)^.clr := $00004000
  89141. else
  89142. pTDefRegMap(@Self)^.&set := $00004000;
  89143. end;
  89144. function TCAN1_C1FIFOCON7.getFRESET : TBits_1; inline;
  89145. begin
  89146. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  89147. end;
  89148. procedure TCAN1_C1FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  89149. begin
  89150. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  89151. end;
  89152. function TCAN1_C1FIFOCON7.getFSIZE : TBits_5; inline;
  89153. begin
  89154. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  89155. end;
  89156. procedure TCAN1_C1FIFOCON7.setw(thebits : TBits_32); inline;
  89157. begin
  89158. pTDefRegMap(@Self)^.val := thebits;
  89159. end;
  89160. function TCAN1_C1FIFOCON7.getw : TBits_32; inline;
  89161. begin
  89162. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89163. end;
  89164. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF; inline;
  89165. begin
  89166. pTDefRegMap(@Self)^.&set := $00000001;
  89167. end;
  89168. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIF; inline;
  89169. begin
  89170. pTDefRegMap(@Self)^.clr := $00000001;
  89171. end;
  89172. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  89173. begin
  89174. if thebits = 0 then
  89175. pTDefRegMap(@Self)^.clr := $00000001
  89176. else
  89177. pTDefRegMap(@Self)^.&set := $00000001;
  89178. end;
  89179. function TCAN1_C1FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  89180. begin
  89181. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  89182. end;
  89183. procedure TCAN1_C1FIFOINT7.setRXHALFIF; inline;
  89184. begin
  89185. pTDefRegMap(@Self)^.&set := $00000002;
  89186. end;
  89187. procedure TCAN1_C1FIFOINT7.clearRXHALFIF; inline;
  89188. begin
  89189. pTDefRegMap(@Self)^.clr := $00000002;
  89190. end;
  89191. procedure TCAN1_C1FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  89192. begin
  89193. if thebits = 0 then
  89194. pTDefRegMap(@Self)^.clr := $00000002
  89195. else
  89196. pTDefRegMap(@Self)^.&set := $00000002;
  89197. end;
  89198. function TCAN1_C1FIFOINT7.getRXHALFIF : TBits_1; inline;
  89199. begin
  89200. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  89201. end;
  89202. procedure TCAN1_C1FIFOINT7.setRXFULLIF; inline;
  89203. begin
  89204. pTDefRegMap(@Self)^.&set := $00000004;
  89205. end;
  89206. procedure TCAN1_C1FIFOINT7.clearRXFULLIF; inline;
  89207. begin
  89208. pTDefRegMap(@Self)^.clr := $00000004;
  89209. end;
  89210. procedure TCAN1_C1FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  89211. begin
  89212. if thebits = 0 then
  89213. pTDefRegMap(@Self)^.clr := $00000004
  89214. else
  89215. pTDefRegMap(@Self)^.&set := $00000004;
  89216. end;
  89217. function TCAN1_C1FIFOINT7.getRXFULLIF : TBits_1; inline;
  89218. begin
  89219. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89220. end;
  89221. procedure TCAN1_C1FIFOINT7.setRXOVFLIF; inline;
  89222. begin
  89223. pTDefRegMap(@Self)^.&set := $00000008;
  89224. end;
  89225. procedure TCAN1_C1FIFOINT7.clearRXOVFLIF; inline;
  89226. begin
  89227. pTDefRegMap(@Self)^.clr := $00000008;
  89228. end;
  89229. procedure TCAN1_C1FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  89230. begin
  89231. if thebits = 0 then
  89232. pTDefRegMap(@Self)^.clr := $00000008
  89233. else
  89234. pTDefRegMap(@Self)^.&set := $00000008;
  89235. end;
  89236. function TCAN1_C1FIFOINT7.getRXOVFLIF : TBits_1; inline;
  89237. begin
  89238. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89239. end;
  89240. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF; inline;
  89241. begin
  89242. pTDefRegMap(@Self)^.&set := $00000100;
  89243. end;
  89244. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIF; inline;
  89245. begin
  89246. pTDefRegMap(@Self)^.clr := $00000100;
  89247. end;
  89248. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  89249. begin
  89250. if thebits = 0 then
  89251. pTDefRegMap(@Self)^.clr := $00000100
  89252. else
  89253. pTDefRegMap(@Self)^.&set := $00000100;
  89254. end;
  89255. function TCAN1_C1FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  89256. begin
  89257. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  89258. end;
  89259. procedure TCAN1_C1FIFOINT7.setTXHALFIF; inline;
  89260. begin
  89261. pTDefRegMap(@Self)^.&set := $00000200;
  89262. end;
  89263. procedure TCAN1_C1FIFOINT7.clearTXHALFIF; inline;
  89264. begin
  89265. pTDefRegMap(@Self)^.clr := $00000200;
  89266. end;
  89267. procedure TCAN1_C1FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  89268. begin
  89269. if thebits = 0 then
  89270. pTDefRegMap(@Self)^.clr := $00000200
  89271. else
  89272. pTDefRegMap(@Self)^.&set := $00000200;
  89273. end;
  89274. function TCAN1_C1FIFOINT7.getTXHALFIF : TBits_1; inline;
  89275. begin
  89276. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  89277. end;
  89278. procedure TCAN1_C1FIFOINT7.setTXNFULLIF; inline;
  89279. begin
  89280. pTDefRegMap(@Self)^.&set := $00000400;
  89281. end;
  89282. procedure TCAN1_C1FIFOINT7.clearTXNFULLIF; inline;
  89283. begin
  89284. pTDefRegMap(@Self)^.clr := $00000400;
  89285. end;
  89286. procedure TCAN1_C1FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  89287. begin
  89288. if thebits = 0 then
  89289. pTDefRegMap(@Self)^.clr := $00000400
  89290. else
  89291. pTDefRegMap(@Self)^.&set := $00000400;
  89292. end;
  89293. function TCAN1_C1FIFOINT7.getTXNFULLIF : TBits_1; inline;
  89294. begin
  89295. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  89296. end;
  89297. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE; inline;
  89298. begin
  89299. pTDefRegMap(@Self)^.&set := $00010000;
  89300. end;
  89301. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIE; inline;
  89302. begin
  89303. pTDefRegMap(@Self)^.clr := $00010000;
  89304. end;
  89305. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  89306. begin
  89307. if thebits = 0 then
  89308. pTDefRegMap(@Self)^.clr := $00010000
  89309. else
  89310. pTDefRegMap(@Self)^.&set := $00010000;
  89311. end;
  89312. function TCAN1_C1FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  89313. begin
  89314. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  89315. end;
  89316. procedure TCAN1_C1FIFOINT7.setRXHALFIE; inline;
  89317. begin
  89318. pTDefRegMap(@Self)^.&set := $00020000;
  89319. end;
  89320. procedure TCAN1_C1FIFOINT7.clearRXHALFIE; inline;
  89321. begin
  89322. pTDefRegMap(@Self)^.clr := $00020000;
  89323. end;
  89324. procedure TCAN1_C1FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  89325. begin
  89326. if thebits = 0 then
  89327. pTDefRegMap(@Self)^.clr := $00020000
  89328. else
  89329. pTDefRegMap(@Self)^.&set := $00020000;
  89330. end;
  89331. function TCAN1_C1FIFOINT7.getRXHALFIE : TBits_1; inline;
  89332. begin
  89333. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  89334. end;
  89335. procedure TCAN1_C1FIFOINT7.setRXFULLIE; inline;
  89336. begin
  89337. pTDefRegMap(@Self)^.&set := $00040000;
  89338. end;
  89339. procedure TCAN1_C1FIFOINT7.clearRXFULLIE; inline;
  89340. begin
  89341. pTDefRegMap(@Self)^.clr := $00040000;
  89342. end;
  89343. procedure TCAN1_C1FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  89344. begin
  89345. if thebits = 0 then
  89346. pTDefRegMap(@Self)^.clr := $00040000
  89347. else
  89348. pTDefRegMap(@Self)^.&set := $00040000;
  89349. end;
  89350. function TCAN1_C1FIFOINT7.getRXFULLIE : TBits_1; inline;
  89351. begin
  89352. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  89353. end;
  89354. procedure TCAN1_C1FIFOINT7.setRXOVFLIE; inline;
  89355. begin
  89356. pTDefRegMap(@Self)^.&set := $00080000;
  89357. end;
  89358. procedure TCAN1_C1FIFOINT7.clearRXOVFLIE; inline;
  89359. begin
  89360. pTDefRegMap(@Self)^.clr := $00080000;
  89361. end;
  89362. procedure TCAN1_C1FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  89363. begin
  89364. if thebits = 0 then
  89365. pTDefRegMap(@Self)^.clr := $00080000
  89366. else
  89367. pTDefRegMap(@Self)^.&set := $00080000;
  89368. end;
  89369. function TCAN1_C1FIFOINT7.getRXOVFLIE : TBits_1; inline;
  89370. begin
  89371. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  89372. end;
  89373. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE; inline;
  89374. begin
  89375. pTDefRegMap(@Self)^.&set := $01000000;
  89376. end;
  89377. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIE; inline;
  89378. begin
  89379. pTDefRegMap(@Self)^.clr := $01000000;
  89380. end;
  89381. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  89382. begin
  89383. if thebits = 0 then
  89384. pTDefRegMap(@Self)^.clr := $01000000
  89385. else
  89386. pTDefRegMap(@Self)^.&set := $01000000;
  89387. end;
  89388. function TCAN1_C1FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  89389. begin
  89390. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  89391. end;
  89392. procedure TCAN1_C1FIFOINT7.setTXHALFIE; inline;
  89393. begin
  89394. pTDefRegMap(@Self)^.&set := $02000000;
  89395. end;
  89396. procedure TCAN1_C1FIFOINT7.clearTXHALFIE; inline;
  89397. begin
  89398. pTDefRegMap(@Self)^.clr := $02000000;
  89399. end;
  89400. procedure TCAN1_C1FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  89401. begin
  89402. if thebits = 0 then
  89403. pTDefRegMap(@Self)^.clr := $02000000
  89404. else
  89405. pTDefRegMap(@Self)^.&set := $02000000;
  89406. end;
  89407. function TCAN1_C1FIFOINT7.getTXHALFIE : TBits_1; inline;
  89408. begin
  89409. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  89410. end;
  89411. procedure TCAN1_C1FIFOINT7.setTXNFULLIE; inline;
  89412. begin
  89413. pTDefRegMap(@Self)^.&set := $04000000;
  89414. end;
  89415. procedure TCAN1_C1FIFOINT7.clearTXNFULLIE; inline;
  89416. begin
  89417. pTDefRegMap(@Self)^.clr := $04000000;
  89418. end;
  89419. procedure TCAN1_C1FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  89420. begin
  89421. if thebits = 0 then
  89422. pTDefRegMap(@Self)^.clr := $04000000
  89423. else
  89424. pTDefRegMap(@Self)^.&set := $04000000;
  89425. end;
  89426. function TCAN1_C1FIFOINT7.getTXNFULLIE : TBits_1; inline;
  89427. begin
  89428. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  89429. end;
  89430. procedure TCAN1_C1FIFOINT7.setw(thebits : TBits_32); inline;
  89431. begin
  89432. pTDefRegMap(@Self)^.val := thebits;
  89433. end;
  89434. function TCAN1_C1FIFOINT7.getw : TBits_32; inline;
  89435. begin
  89436. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89437. end;
  89438. procedure TCAN1_C1FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  89439. begin
  89440. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  89441. end;
  89442. function TCAN1_C1FIFOCI7.getCFIFOCI : TBits_5; inline;
  89443. begin
  89444. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  89445. end;
  89446. procedure TCAN1_C1FIFOCI7.setw(thebits : TBits_32); inline;
  89447. begin
  89448. pTDefRegMap(@Self)^.val := thebits;
  89449. end;
  89450. function TCAN1_C1FIFOCI7.getw : TBits_32; inline;
  89451. begin
  89452. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89453. end;
  89454. procedure TCAN1_C1FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  89455. begin
  89456. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  89457. end;
  89458. function TCAN1_C1FIFOCON8.getTXPRI : TBits_2; inline;
  89459. begin
  89460. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  89461. end;
  89462. procedure TCAN1_C1FIFOCON8.setRTREN; inline;
  89463. begin
  89464. pTDefRegMap(@Self)^.&set := $00000004;
  89465. end;
  89466. procedure TCAN1_C1FIFOCON8.clearRTREN; inline;
  89467. begin
  89468. pTDefRegMap(@Self)^.clr := $00000004;
  89469. end;
  89470. procedure TCAN1_C1FIFOCON8.setRTREN(thebits : TBits_1); inline;
  89471. begin
  89472. if thebits = 0 then
  89473. pTDefRegMap(@Self)^.clr := $00000004
  89474. else
  89475. pTDefRegMap(@Self)^.&set := $00000004;
  89476. end;
  89477. function TCAN1_C1FIFOCON8.getRTREN : TBits_1; inline;
  89478. begin
  89479. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89480. end;
  89481. procedure TCAN1_C1FIFOCON8.setTXREQ; inline;
  89482. begin
  89483. pTDefRegMap(@Self)^.&set := $00000008;
  89484. end;
  89485. procedure TCAN1_C1FIFOCON8.clearTXREQ; inline;
  89486. begin
  89487. pTDefRegMap(@Self)^.clr := $00000008;
  89488. end;
  89489. procedure TCAN1_C1FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  89490. begin
  89491. if thebits = 0 then
  89492. pTDefRegMap(@Self)^.clr := $00000008
  89493. else
  89494. pTDefRegMap(@Self)^.&set := $00000008;
  89495. end;
  89496. function TCAN1_C1FIFOCON8.getTXREQ : TBits_1; inline;
  89497. begin
  89498. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89499. end;
  89500. procedure TCAN1_C1FIFOCON8.setTXERR; inline;
  89501. begin
  89502. pTDefRegMap(@Self)^.&set := $00000010;
  89503. end;
  89504. procedure TCAN1_C1FIFOCON8.clearTXERR; inline;
  89505. begin
  89506. pTDefRegMap(@Self)^.clr := $00000010;
  89507. end;
  89508. procedure TCAN1_C1FIFOCON8.setTXERR(thebits : TBits_1); inline;
  89509. begin
  89510. if thebits = 0 then
  89511. pTDefRegMap(@Self)^.clr := $00000010
  89512. else
  89513. pTDefRegMap(@Self)^.&set := $00000010;
  89514. end;
  89515. function TCAN1_C1FIFOCON8.getTXERR : TBits_1; inline;
  89516. begin
  89517. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  89518. end;
  89519. procedure TCAN1_C1FIFOCON8.setTXLARB; inline;
  89520. begin
  89521. pTDefRegMap(@Self)^.&set := $00000020;
  89522. end;
  89523. procedure TCAN1_C1FIFOCON8.clearTXLARB; inline;
  89524. begin
  89525. pTDefRegMap(@Self)^.clr := $00000020;
  89526. end;
  89527. procedure TCAN1_C1FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  89528. begin
  89529. if thebits = 0 then
  89530. pTDefRegMap(@Self)^.clr := $00000020
  89531. else
  89532. pTDefRegMap(@Self)^.&set := $00000020;
  89533. end;
  89534. function TCAN1_C1FIFOCON8.getTXLARB : TBits_1; inline;
  89535. begin
  89536. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  89537. end;
  89538. procedure TCAN1_C1FIFOCON8.setTXABAT; inline;
  89539. begin
  89540. pTDefRegMap(@Self)^.&set := $00000040;
  89541. end;
  89542. procedure TCAN1_C1FIFOCON8.clearTXABAT; inline;
  89543. begin
  89544. pTDefRegMap(@Self)^.clr := $00000040;
  89545. end;
  89546. procedure TCAN1_C1FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  89547. begin
  89548. if thebits = 0 then
  89549. pTDefRegMap(@Self)^.clr := $00000040
  89550. else
  89551. pTDefRegMap(@Self)^.&set := $00000040;
  89552. end;
  89553. function TCAN1_C1FIFOCON8.getTXABAT : TBits_1; inline;
  89554. begin
  89555. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  89556. end;
  89557. procedure TCAN1_C1FIFOCON8.setTXEN; inline;
  89558. begin
  89559. pTDefRegMap(@Self)^.&set := $00000080;
  89560. end;
  89561. procedure TCAN1_C1FIFOCON8.clearTXEN; inline;
  89562. begin
  89563. pTDefRegMap(@Self)^.clr := $00000080;
  89564. end;
  89565. procedure TCAN1_C1FIFOCON8.setTXEN(thebits : TBits_1); inline;
  89566. begin
  89567. if thebits = 0 then
  89568. pTDefRegMap(@Self)^.clr := $00000080
  89569. else
  89570. pTDefRegMap(@Self)^.&set := $00000080;
  89571. end;
  89572. function TCAN1_C1FIFOCON8.getTXEN : TBits_1; inline;
  89573. begin
  89574. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  89575. end;
  89576. procedure TCAN1_C1FIFOCON8.setDONLY; inline;
  89577. begin
  89578. pTDefRegMap(@Self)^.&set := $00001000;
  89579. end;
  89580. procedure TCAN1_C1FIFOCON8.clearDONLY; inline;
  89581. begin
  89582. pTDefRegMap(@Self)^.clr := $00001000;
  89583. end;
  89584. procedure TCAN1_C1FIFOCON8.setDONLY(thebits : TBits_1); inline;
  89585. begin
  89586. if thebits = 0 then
  89587. pTDefRegMap(@Self)^.clr := $00001000
  89588. else
  89589. pTDefRegMap(@Self)^.&set := $00001000;
  89590. end;
  89591. function TCAN1_C1FIFOCON8.getDONLY : TBits_1; inline;
  89592. begin
  89593. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  89594. end;
  89595. procedure TCAN1_C1FIFOCON8.setUINC; inline;
  89596. begin
  89597. pTDefRegMap(@Self)^.&set := $00002000;
  89598. end;
  89599. procedure TCAN1_C1FIFOCON8.clearUINC; inline;
  89600. begin
  89601. pTDefRegMap(@Self)^.clr := $00002000;
  89602. end;
  89603. procedure TCAN1_C1FIFOCON8.setUINC(thebits : TBits_1); inline;
  89604. begin
  89605. if thebits = 0 then
  89606. pTDefRegMap(@Self)^.clr := $00002000
  89607. else
  89608. pTDefRegMap(@Self)^.&set := $00002000;
  89609. end;
  89610. function TCAN1_C1FIFOCON8.getUINC : TBits_1; inline;
  89611. begin
  89612. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  89613. end;
  89614. procedure TCAN1_C1FIFOCON8.setFRESET; inline;
  89615. begin
  89616. pTDefRegMap(@Self)^.&set := $00004000;
  89617. end;
  89618. procedure TCAN1_C1FIFOCON8.clearFRESET; inline;
  89619. begin
  89620. pTDefRegMap(@Self)^.clr := $00004000;
  89621. end;
  89622. procedure TCAN1_C1FIFOCON8.setFRESET(thebits : TBits_1); inline;
  89623. begin
  89624. if thebits = 0 then
  89625. pTDefRegMap(@Self)^.clr := $00004000
  89626. else
  89627. pTDefRegMap(@Self)^.&set := $00004000;
  89628. end;
  89629. function TCAN1_C1FIFOCON8.getFRESET : TBits_1; inline;
  89630. begin
  89631. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  89632. end;
  89633. procedure TCAN1_C1FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  89634. begin
  89635. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  89636. end;
  89637. function TCAN1_C1FIFOCON8.getFSIZE : TBits_5; inline;
  89638. begin
  89639. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  89640. end;
  89641. procedure TCAN1_C1FIFOCON8.setw(thebits : TBits_32); inline;
  89642. begin
  89643. pTDefRegMap(@Self)^.val := thebits;
  89644. end;
  89645. function TCAN1_C1FIFOCON8.getw : TBits_32; inline;
  89646. begin
  89647. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89648. end;
  89649. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF; inline;
  89650. begin
  89651. pTDefRegMap(@Self)^.&set := $00000001;
  89652. end;
  89653. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIF; inline;
  89654. begin
  89655. pTDefRegMap(@Self)^.clr := $00000001;
  89656. end;
  89657. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  89658. begin
  89659. if thebits = 0 then
  89660. pTDefRegMap(@Self)^.clr := $00000001
  89661. else
  89662. pTDefRegMap(@Self)^.&set := $00000001;
  89663. end;
  89664. function TCAN1_C1FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  89665. begin
  89666. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  89667. end;
  89668. procedure TCAN1_C1FIFOINT8.setRXHALFIF; inline;
  89669. begin
  89670. pTDefRegMap(@Self)^.&set := $00000002;
  89671. end;
  89672. procedure TCAN1_C1FIFOINT8.clearRXHALFIF; inline;
  89673. begin
  89674. pTDefRegMap(@Self)^.clr := $00000002;
  89675. end;
  89676. procedure TCAN1_C1FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  89677. begin
  89678. if thebits = 0 then
  89679. pTDefRegMap(@Self)^.clr := $00000002
  89680. else
  89681. pTDefRegMap(@Self)^.&set := $00000002;
  89682. end;
  89683. function TCAN1_C1FIFOINT8.getRXHALFIF : TBits_1; inline;
  89684. begin
  89685. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  89686. end;
  89687. procedure TCAN1_C1FIFOINT8.setRXFULLIF; inline;
  89688. begin
  89689. pTDefRegMap(@Self)^.&set := $00000004;
  89690. end;
  89691. procedure TCAN1_C1FIFOINT8.clearRXFULLIF; inline;
  89692. begin
  89693. pTDefRegMap(@Self)^.clr := $00000004;
  89694. end;
  89695. procedure TCAN1_C1FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  89696. begin
  89697. if thebits = 0 then
  89698. pTDefRegMap(@Self)^.clr := $00000004
  89699. else
  89700. pTDefRegMap(@Self)^.&set := $00000004;
  89701. end;
  89702. function TCAN1_C1FIFOINT8.getRXFULLIF : TBits_1; inline;
  89703. begin
  89704. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89705. end;
  89706. procedure TCAN1_C1FIFOINT8.setRXOVFLIF; inline;
  89707. begin
  89708. pTDefRegMap(@Self)^.&set := $00000008;
  89709. end;
  89710. procedure TCAN1_C1FIFOINT8.clearRXOVFLIF; inline;
  89711. begin
  89712. pTDefRegMap(@Self)^.clr := $00000008;
  89713. end;
  89714. procedure TCAN1_C1FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  89715. begin
  89716. if thebits = 0 then
  89717. pTDefRegMap(@Self)^.clr := $00000008
  89718. else
  89719. pTDefRegMap(@Self)^.&set := $00000008;
  89720. end;
  89721. function TCAN1_C1FIFOINT8.getRXOVFLIF : TBits_1; inline;
  89722. begin
  89723. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89724. end;
  89725. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF; inline;
  89726. begin
  89727. pTDefRegMap(@Self)^.&set := $00000100;
  89728. end;
  89729. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIF; inline;
  89730. begin
  89731. pTDefRegMap(@Self)^.clr := $00000100;
  89732. end;
  89733. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  89734. begin
  89735. if thebits = 0 then
  89736. pTDefRegMap(@Self)^.clr := $00000100
  89737. else
  89738. pTDefRegMap(@Self)^.&set := $00000100;
  89739. end;
  89740. function TCAN1_C1FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  89741. begin
  89742. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  89743. end;
  89744. procedure TCAN1_C1FIFOINT8.setTXHALFIF; inline;
  89745. begin
  89746. pTDefRegMap(@Self)^.&set := $00000200;
  89747. end;
  89748. procedure TCAN1_C1FIFOINT8.clearTXHALFIF; inline;
  89749. begin
  89750. pTDefRegMap(@Self)^.clr := $00000200;
  89751. end;
  89752. procedure TCAN1_C1FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  89753. begin
  89754. if thebits = 0 then
  89755. pTDefRegMap(@Self)^.clr := $00000200
  89756. else
  89757. pTDefRegMap(@Self)^.&set := $00000200;
  89758. end;
  89759. function TCAN1_C1FIFOINT8.getTXHALFIF : TBits_1; inline;
  89760. begin
  89761. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  89762. end;
  89763. procedure TCAN1_C1FIFOINT8.setTXNFULLIF; inline;
  89764. begin
  89765. pTDefRegMap(@Self)^.&set := $00000400;
  89766. end;
  89767. procedure TCAN1_C1FIFOINT8.clearTXNFULLIF; inline;
  89768. begin
  89769. pTDefRegMap(@Self)^.clr := $00000400;
  89770. end;
  89771. procedure TCAN1_C1FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  89772. begin
  89773. if thebits = 0 then
  89774. pTDefRegMap(@Self)^.clr := $00000400
  89775. else
  89776. pTDefRegMap(@Self)^.&set := $00000400;
  89777. end;
  89778. function TCAN1_C1FIFOINT8.getTXNFULLIF : TBits_1; inline;
  89779. begin
  89780. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  89781. end;
  89782. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE; inline;
  89783. begin
  89784. pTDefRegMap(@Self)^.&set := $00010000;
  89785. end;
  89786. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIE; inline;
  89787. begin
  89788. pTDefRegMap(@Self)^.clr := $00010000;
  89789. end;
  89790. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  89791. begin
  89792. if thebits = 0 then
  89793. pTDefRegMap(@Self)^.clr := $00010000
  89794. else
  89795. pTDefRegMap(@Self)^.&set := $00010000;
  89796. end;
  89797. function TCAN1_C1FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  89798. begin
  89799. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  89800. end;
  89801. procedure TCAN1_C1FIFOINT8.setRXHALFIE; inline;
  89802. begin
  89803. pTDefRegMap(@Self)^.&set := $00020000;
  89804. end;
  89805. procedure TCAN1_C1FIFOINT8.clearRXHALFIE; inline;
  89806. begin
  89807. pTDefRegMap(@Self)^.clr := $00020000;
  89808. end;
  89809. procedure TCAN1_C1FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  89810. begin
  89811. if thebits = 0 then
  89812. pTDefRegMap(@Self)^.clr := $00020000
  89813. else
  89814. pTDefRegMap(@Self)^.&set := $00020000;
  89815. end;
  89816. function TCAN1_C1FIFOINT8.getRXHALFIE : TBits_1; inline;
  89817. begin
  89818. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  89819. end;
  89820. procedure TCAN1_C1FIFOINT8.setRXFULLIE; inline;
  89821. begin
  89822. pTDefRegMap(@Self)^.&set := $00040000;
  89823. end;
  89824. procedure TCAN1_C1FIFOINT8.clearRXFULLIE; inline;
  89825. begin
  89826. pTDefRegMap(@Self)^.clr := $00040000;
  89827. end;
  89828. procedure TCAN1_C1FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  89829. begin
  89830. if thebits = 0 then
  89831. pTDefRegMap(@Self)^.clr := $00040000
  89832. else
  89833. pTDefRegMap(@Self)^.&set := $00040000;
  89834. end;
  89835. function TCAN1_C1FIFOINT8.getRXFULLIE : TBits_1; inline;
  89836. begin
  89837. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  89838. end;
  89839. procedure TCAN1_C1FIFOINT8.setRXOVFLIE; inline;
  89840. begin
  89841. pTDefRegMap(@Self)^.&set := $00080000;
  89842. end;
  89843. procedure TCAN1_C1FIFOINT8.clearRXOVFLIE; inline;
  89844. begin
  89845. pTDefRegMap(@Self)^.clr := $00080000;
  89846. end;
  89847. procedure TCAN1_C1FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  89848. begin
  89849. if thebits = 0 then
  89850. pTDefRegMap(@Self)^.clr := $00080000
  89851. else
  89852. pTDefRegMap(@Self)^.&set := $00080000;
  89853. end;
  89854. function TCAN1_C1FIFOINT8.getRXOVFLIE : TBits_1; inline;
  89855. begin
  89856. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  89857. end;
  89858. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE; inline;
  89859. begin
  89860. pTDefRegMap(@Self)^.&set := $01000000;
  89861. end;
  89862. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIE; inline;
  89863. begin
  89864. pTDefRegMap(@Self)^.clr := $01000000;
  89865. end;
  89866. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  89867. begin
  89868. if thebits = 0 then
  89869. pTDefRegMap(@Self)^.clr := $01000000
  89870. else
  89871. pTDefRegMap(@Self)^.&set := $01000000;
  89872. end;
  89873. function TCAN1_C1FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  89874. begin
  89875. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  89876. end;
  89877. procedure TCAN1_C1FIFOINT8.setTXHALFIE; inline;
  89878. begin
  89879. pTDefRegMap(@Self)^.&set := $02000000;
  89880. end;
  89881. procedure TCAN1_C1FIFOINT8.clearTXHALFIE; inline;
  89882. begin
  89883. pTDefRegMap(@Self)^.clr := $02000000;
  89884. end;
  89885. procedure TCAN1_C1FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  89886. begin
  89887. if thebits = 0 then
  89888. pTDefRegMap(@Self)^.clr := $02000000
  89889. else
  89890. pTDefRegMap(@Self)^.&set := $02000000;
  89891. end;
  89892. function TCAN1_C1FIFOINT8.getTXHALFIE : TBits_1; inline;
  89893. begin
  89894. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  89895. end;
  89896. procedure TCAN1_C1FIFOINT8.setTXNFULLIE; inline;
  89897. begin
  89898. pTDefRegMap(@Self)^.&set := $04000000;
  89899. end;
  89900. procedure TCAN1_C1FIFOINT8.clearTXNFULLIE; inline;
  89901. begin
  89902. pTDefRegMap(@Self)^.clr := $04000000;
  89903. end;
  89904. procedure TCAN1_C1FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  89905. begin
  89906. if thebits = 0 then
  89907. pTDefRegMap(@Self)^.clr := $04000000
  89908. else
  89909. pTDefRegMap(@Self)^.&set := $04000000;
  89910. end;
  89911. function TCAN1_C1FIFOINT8.getTXNFULLIE : TBits_1; inline;
  89912. begin
  89913. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  89914. end;
  89915. procedure TCAN1_C1FIFOINT8.setw(thebits : TBits_32); inline;
  89916. begin
  89917. pTDefRegMap(@Self)^.val := thebits;
  89918. end;
  89919. function TCAN1_C1FIFOINT8.getw : TBits_32; inline;
  89920. begin
  89921. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89922. end;
  89923. procedure TCAN1_C1FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  89924. begin
  89925. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  89926. end;
  89927. function TCAN1_C1FIFOCI8.getCFIFOCI : TBits_5; inline;
  89928. begin
  89929. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  89930. end;
  89931. procedure TCAN1_C1FIFOCI8.setw(thebits : TBits_32); inline;
  89932. begin
  89933. pTDefRegMap(@Self)^.val := thebits;
  89934. end;
  89935. function TCAN1_C1FIFOCI8.getw : TBits_32; inline;
  89936. begin
  89937. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89938. end;
  89939. procedure TCAN1_C1FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  89940. begin
  89941. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  89942. end;
  89943. function TCAN1_C1FIFOCON9.getTXPRI : TBits_2; inline;
  89944. begin
  89945. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  89946. end;
  89947. procedure TCAN1_C1FIFOCON9.setRTREN; inline;
  89948. begin
  89949. pTDefRegMap(@Self)^.&set := $00000004;
  89950. end;
  89951. procedure TCAN1_C1FIFOCON9.clearRTREN; inline;
  89952. begin
  89953. pTDefRegMap(@Self)^.clr := $00000004;
  89954. end;
  89955. procedure TCAN1_C1FIFOCON9.setRTREN(thebits : TBits_1); inline;
  89956. begin
  89957. if thebits = 0 then
  89958. pTDefRegMap(@Self)^.clr := $00000004
  89959. else
  89960. pTDefRegMap(@Self)^.&set := $00000004;
  89961. end;
  89962. function TCAN1_C1FIFOCON9.getRTREN : TBits_1; inline;
  89963. begin
  89964. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89965. end;
  89966. procedure TCAN1_C1FIFOCON9.setTXREQ; inline;
  89967. begin
  89968. pTDefRegMap(@Self)^.&set := $00000008;
  89969. end;
  89970. procedure TCAN1_C1FIFOCON9.clearTXREQ; inline;
  89971. begin
  89972. pTDefRegMap(@Self)^.clr := $00000008;
  89973. end;
  89974. procedure TCAN1_C1FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  89975. begin
  89976. if thebits = 0 then
  89977. pTDefRegMap(@Self)^.clr := $00000008
  89978. else
  89979. pTDefRegMap(@Self)^.&set := $00000008;
  89980. end;
  89981. function TCAN1_C1FIFOCON9.getTXREQ : TBits_1; inline;
  89982. begin
  89983. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89984. end;
  89985. procedure TCAN1_C1FIFOCON9.setTXERR; inline;
  89986. begin
  89987. pTDefRegMap(@Self)^.&set := $00000010;
  89988. end;
  89989. procedure TCAN1_C1FIFOCON9.clearTXERR; inline;
  89990. begin
  89991. pTDefRegMap(@Self)^.clr := $00000010;
  89992. end;
  89993. procedure TCAN1_C1FIFOCON9.setTXERR(thebits : TBits_1); inline;
  89994. begin
  89995. if thebits = 0 then
  89996. pTDefRegMap(@Self)^.clr := $00000010
  89997. else
  89998. pTDefRegMap(@Self)^.&set := $00000010;
  89999. end;
  90000. function TCAN1_C1FIFOCON9.getTXERR : TBits_1; inline;
  90001. begin
  90002. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  90003. end;
  90004. procedure TCAN1_C1FIFOCON9.setTXLARB; inline;
  90005. begin
  90006. pTDefRegMap(@Self)^.&set := $00000020;
  90007. end;
  90008. procedure TCAN1_C1FIFOCON9.clearTXLARB; inline;
  90009. begin
  90010. pTDefRegMap(@Self)^.clr := $00000020;
  90011. end;
  90012. procedure TCAN1_C1FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  90013. begin
  90014. if thebits = 0 then
  90015. pTDefRegMap(@Self)^.clr := $00000020
  90016. else
  90017. pTDefRegMap(@Self)^.&set := $00000020;
  90018. end;
  90019. function TCAN1_C1FIFOCON9.getTXLARB : TBits_1; inline;
  90020. begin
  90021. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  90022. end;
  90023. procedure TCAN1_C1FIFOCON9.setTXABAT; inline;
  90024. begin
  90025. pTDefRegMap(@Self)^.&set := $00000040;
  90026. end;
  90027. procedure TCAN1_C1FIFOCON9.clearTXABAT; inline;
  90028. begin
  90029. pTDefRegMap(@Self)^.clr := $00000040;
  90030. end;
  90031. procedure TCAN1_C1FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  90032. begin
  90033. if thebits = 0 then
  90034. pTDefRegMap(@Self)^.clr := $00000040
  90035. else
  90036. pTDefRegMap(@Self)^.&set := $00000040;
  90037. end;
  90038. function TCAN1_C1FIFOCON9.getTXABAT : TBits_1; inline;
  90039. begin
  90040. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  90041. end;
  90042. procedure TCAN1_C1FIFOCON9.setTXEN; inline;
  90043. begin
  90044. pTDefRegMap(@Self)^.&set := $00000080;
  90045. end;
  90046. procedure TCAN1_C1FIFOCON9.clearTXEN; inline;
  90047. begin
  90048. pTDefRegMap(@Self)^.clr := $00000080;
  90049. end;
  90050. procedure TCAN1_C1FIFOCON9.setTXEN(thebits : TBits_1); inline;
  90051. begin
  90052. if thebits = 0 then
  90053. pTDefRegMap(@Self)^.clr := $00000080
  90054. else
  90055. pTDefRegMap(@Self)^.&set := $00000080;
  90056. end;
  90057. function TCAN1_C1FIFOCON9.getTXEN : TBits_1; inline;
  90058. begin
  90059. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  90060. end;
  90061. procedure TCAN1_C1FIFOCON9.setDONLY; inline;
  90062. begin
  90063. pTDefRegMap(@Self)^.&set := $00001000;
  90064. end;
  90065. procedure TCAN1_C1FIFOCON9.clearDONLY; inline;
  90066. begin
  90067. pTDefRegMap(@Self)^.clr := $00001000;
  90068. end;
  90069. procedure TCAN1_C1FIFOCON9.setDONLY(thebits : TBits_1); inline;
  90070. begin
  90071. if thebits = 0 then
  90072. pTDefRegMap(@Self)^.clr := $00001000
  90073. else
  90074. pTDefRegMap(@Self)^.&set := $00001000;
  90075. end;
  90076. function TCAN1_C1FIFOCON9.getDONLY : TBits_1; inline;
  90077. begin
  90078. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  90079. end;
  90080. procedure TCAN1_C1FIFOCON9.setUINC; inline;
  90081. begin
  90082. pTDefRegMap(@Self)^.&set := $00002000;
  90083. end;
  90084. procedure TCAN1_C1FIFOCON9.clearUINC; inline;
  90085. begin
  90086. pTDefRegMap(@Self)^.clr := $00002000;
  90087. end;
  90088. procedure TCAN1_C1FIFOCON9.setUINC(thebits : TBits_1); inline;
  90089. begin
  90090. if thebits = 0 then
  90091. pTDefRegMap(@Self)^.clr := $00002000
  90092. else
  90093. pTDefRegMap(@Self)^.&set := $00002000;
  90094. end;
  90095. function TCAN1_C1FIFOCON9.getUINC : TBits_1; inline;
  90096. begin
  90097. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  90098. end;
  90099. procedure TCAN1_C1FIFOCON9.setFRESET; inline;
  90100. begin
  90101. pTDefRegMap(@Self)^.&set := $00004000;
  90102. end;
  90103. procedure TCAN1_C1FIFOCON9.clearFRESET; inline;
  90104. begin
  90105. pTDefRegMap(@Self)^.clr := $00004000;
  90106. end;
  90107. procedure TCAN1_C1FIFOCON9.setFRESET(thebits : TBits_1); inline;
  90108. begin
  90109. if thebits = 0 then
  90110. pTDefRegMap(@Self)^.clr := $00004000
  90111. else
  90112. pTDefRegMap(@Self)^.&set := $00004000;
  90113. end;
  90114. function TCAN1_C1FIFOCON9.getFRESET : TBits_1; inline;
  90115. begin
  90116. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  90117. end;
  90118. procedure TCAN1_C1FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  90119. begin
  90120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  90121. end;
  90122. function TCAN1_C1FIFOCON9.getFSIZE : TBits_5; inline;
  90123. begin
  90124. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  90125. end;
  90126. procedure TCAN1_C1FIFOCON9.setw(thebits : TBits_32); inline;
  90127. begin
  90128. pTDefRegMap(@Self)^.val := thebits;
  90129. end;
  90130. function TCAN1_C1FIFOCON9.getw : TBits_32; inline;
  90131. begin
  90132. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90133. end;
  90134. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF; inline;
  90135. begin
  90136. pTDefRegMap(@Self)^.&set := $00000001;
  90137. end;
  90138. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIF; inline;
  90139. begin
  90140. pTDefRegMap(@Self)^.clr := $00000001;
  90141. end;
  90142. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  90143. begin
  90144. if thebits = 0 then
  90145. pTDefRegMap(@Self)^.clr := $00000001
  90146. else
  90147. pTDefRegMap(@Self)^.&set := $00000001;
  90148. end;
  90149. function TCAN1_C1FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  90150. begin
  90151. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  90152. end;
  90153. procedure TCAN1_C1FIFOINT9.setRXHALFIF; inline;
  90154. begin
  90155. pTDefRegMap(@Self)^.&set := $00000002;
  90156. end;
  90157. procedure TCAN1_C1FIFOINT9.clearRXHALFIF; inline;
  90158. begin
  90159. pTDefRegMap(@Self)^.clr := $00000002;
  90160. end;
  90161. procedure TCAN1_C1FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  90162. begin
  90163. if thebits = 0 then
  90164. pTDefRegMap(@Self)^.clr := $00000002
  90165. else
  90166. pTDefRegMap(@Self)^.&set := $00000002;
  90167. end;
  90168. function TCAN1_C1FIFOINT9.getRXHALFIF : TBits_1; inline;
  90169. begin
  90170. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  90171. end;
  90172. procedure TCAN1_C1FIFOINT9.setRXFULLIF; inline;
  90173. begin
  90174. pTDefRegMap(@Self)^.&set := $00000004;
  90175. end;
  90176. procedure TCAN1_C1FIFOINT9.clearRXFULLIF; inline;
  90177. begin
  90178. pTDefRegMap(@Self)^.clr := $00000004;
  90179. end;
  90180. procedure TCAN1_C1FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  90181. begin
  90182. if thebits = 0 then
  90183. pTDefRegMap(@Self)^.clr := $00000004
  90184. else
  90185. pTDefRegMap(@Self)^.&set := $00000004;
  90186. end;
  90187. function TCAN1_C1FIFOINT9.getRXFULLIF : TBits_1; inline;
  90188. begin
  90189. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90190. end;
  90191. procedure TCAN1_C1FIFOINT9.setRXOVFLIF; inline;
  90192. begin
  90193. pTDefRegMap(@Self)^.&set := $00000008;
  90194. end;
  90195. procedure TCAN1_C1FIFOINT9.clearRXOVFLIF; inline;
  90196. begin
  90197. pTDefRegMap(@Self)^.clr := $00000008;
  90198. end;
  90199. procedure TCAN1_C1FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  90200. begin
  90201. if thebits = 0 then
  90202. pTDefRegMap(@Self)^.clr := $00000008
  90203. else
  90204. pTDefRegMap(@Self)^.&set := $00000008;
  90205. end;
  90206. function TCAN1_C1FIFOINT9.getRXOVFLIF : TBits_1; inline;
  90207. begin
  90208. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90209. end;
  90210. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF; inline;
  90211. begin
  90212. pTDefRegMap(@Self)^.&set := $00000100;
  90213. end;
  90214. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIF; inline;
  90215. begin
  90216. pTDefRegMap(@Self)^.clr := $00000100;
  90217. end;
  90218. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  90219. begin
  90220. if thebits = 0 then
  90221. pTDefRegMap(@Self)^.clr := $00000100
  90222. else
  90223. pTDefRegMap(@Self)^.&set := $00000100;
  90224. end;
  90225. function TCAN1_C1FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  90226. begin
  90227. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  90228. end;
  90229. procedure TCAN1_C1FIFOINT9.setTXHALFIF; inline;
  90230. begin
  90231. pTDefRegMap(@Self)^.&set := $00000200;
  90232. end;
  90233. procedure TCAN1_C1FIFOINT9.clearTXHALFIF; inline;
  90234. begin
  90235. pTDefRegMap(@Self)^.clr := $00000200;
  90236. end;
  90237. procedure TCAN1_C1FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  90238. begin
  90239. if thebits = 0 then
  90240. pTDefRegMap(@Self)^.clr := $00000200
  90241. else
  90242. pTDefRegMap(@Self)^.&set := $00000200;
  90243. end;
  90244. function TCAN1_C1FIFOINT9.getTXHALFIF : TBits_1; inline;
  90245. begin
  90246. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  90247. end;
  90248. procedure TCAN1_C1FIFOINT9.setTXNFULLIF; inline;
  90249. begin
  90250. pTDefRegMap(@Self)^.&set := $00000400;
  90251. end;
  90252. procedure TCAN1_C1FIFOINT9.clearTXNFULLIF; inline;
  90253. begin
  90254. pTDefRegMap(@Self)^.clr := $00000400;
  90255. end;
  90256. procedure TCAN1_C1FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  90257. begin
  90258. if thebits = 0 then
  90259. pTDefRegMap(@Self)^.clr := $00000400
  90260. else
  90261. pTDefRegMap(@Self)^.&set := $00000400;
  90262. end;
  90263. function TCAN1_C1FIFOINT9.getTXNFULLIF : TBits_1; inline;
  90264. begin
  90265. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  90266. end;
  90267. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE; inline;
  90268. begin
  90269. pTDefRegMap(@Self)^.&set := $00010000;
  90270. end;
  90271. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIE; inline;
  90272. begin
  90273. pTDefRegMap(@Self)^.clr := $00010000;
  90274. end;
  90275. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  90276. begin
  90277. if thebits = 0 then
  90278. pTDefRegMap(@Self)^.clr := $00010000
  90279. else
  90280. pTDefRegMap(@Self)^.&set := $00010000;
  90281. end;
  90282. function TCAN1_C1FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  90283. begin
  90284. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  90285. end;
  90286. procedure TCAN1_C1FIFOINT9.setRXHALFIE; inline;
  90287. begin
  90288. pTDefRegMap(@Self)^.&set := $00020000;
  90289. end;
  90290. procedure TCAN1_C1FIFOINT9.clearRXHALFIE; inline;
  90291. begin
  90292. pTDefRegMap(@Self)^.clr := $00020000;
  90293. end;
  90294. procedure TCAN1_C1FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  90295. begin
  90296. if thebits = 0 then
  90297. pTDefRegMap(@Self)^.clr := $00020000
  90298. else
  90299. pTDefRegMap(@Self)^.&set := $00020000;
  90300. end;
  90301. function TCAN1_C1FIFOINT9.getRXHALFIE : TBits_1; inline;
  90302. begin
  90303. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  90304. end;
  90305. procedure TCAN1_C1FIFOINT9.setRXFULLIE; inline;
  90306. begin
  90307. pTDefRegMap(@Self)^.&set := $00040000;
  90308. end;
  90309. procedure TCAN1_C1FIFOINT9.clearRXFULLIE; inline;
  90310. begin
  90311. pTDefRegMap(@Self)^.clr := $00040000;
  90312. end;
  90313. procedure TCAN1_C1FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  90314. begin
  90315. if thebits = 0 then
  90316. pTDefRegMap(@Self)^.clr := $00040000
  90317. else
  90318. pTDefRegMap(@Self)^.&set := $00040000;
  90319. end;
  90320. function TCAN1_C1FIFOINT9.getRXFULLIE : TBits_1; inline;
  90321. begin
  90322. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  90323. end;
  90324. procedure TCAN1_C1FIFOINT9.setRXOVFLIE; inline;
  90325. begin
  90326. pTDefRegMap(@Self)^.&set := $00080000;
  90327. end;
  90328. procedure TCAN1_C1FIFOINT9.clearRXOVFLIE; inline;
  90329. begin
  90330. pTDefRegMap(@Self)^.clr := $00080000;
  90331. end;
  90332. procedure TCAN1_C1FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  90333. begin
  90334. if thebits = 0 then
  90335. pTDefRegMap(@Self)^.clr := $00080000
  90336. else
  90337. pTDefRegMap(@Self)^.&set := $00080000;
  90338. end;
  90339. function TCAN1_C1FIFOINT9.getRXOVFLIE : TBits_1; inline;
  90340. begin
  90341. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  90342. end;
  90343. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE; inline;
  90344. begin
  90345. pTDefRegMap(@Self)^.&set := $01000000;
  90346. end;
  90347. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIE; inline;
  90348. begin
  90349. pTDefRegMap(@Self)^.clr := $01000000;
  90350. end;
  90351. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  90352. begin
  90353. if thebits = 0 then
  90354. pTDefRegMap(@Self)^.clr := $01000000
  90355. else
  90356. pTDefRegMap(@Self)^.&set := $01000000;
  90357. end;
  90358. function TCAN1_C1FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  90359. begin
  90360. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  90361. end;
  90362. procedure TCAN1_C1FIFOINT9.setTXHALFIE; inline;
  90363. begin
  90364. pTDefRegMap(@Self)^.&set := $02000000;
  90365. end;
  90366. procedure TCAN1_C1FIFOINT9.clearTXHALFIE; inline;
  90367. begin
  90368. pTDefRegMap(@Self)^.clr := $02000000;
  90369. end;
  90370. procedure TCAN1_C1FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  90371. begin
  90372. if thebits = 0 then
  90373. pTDefRegMap(@Self)^.clr := $02000000
  90374. else
  90375. pTDefRegMap(@Self)^.&set := $02000000;
  90376. end;
  90377. function TCAN1_C1FIFOINT9.getTXHALFIE : TBits_1; inline;
  90378. begin
  90379. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  90380. end;
  90381. procedure TCAN1_C1FIFOINT9.setTXNFULLIE; inline;
  90382. begin
  90383. pTDefRegMap(@Self)^.&set := $04000000;
  90384. end;
  90385. procedure TCAN1_C1FIFOINT9.clearTXNFULLIE; inline;
  90386. begin
  90387. pTDefRegMap(@Self)^.clr := $04000000;
  90388. end;
  90389. procedure TCAN1_C1FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  90390. begin
  90391. if thebits = 0 then
  90392. pTDefRegMap(@Self)^.clr := $04000000
  90393. else
  90394. pTDefRegMap(@Self)^.&set := $04000000;
  90395. end;
  90396. function TCAN1_C1FIFOINT9.getTXNFULLIE : TBits_1; inline;
  90397. begin
  90398. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  90399. end;
  90400. procedure TCAN1_C1FIFOINT9.setw(thebits : TBits_32); inline;
  90401. begin
  90402. pTDefRegMap(@Self)^.val := thebits;
  90403. end;
  90404. function TCAN1_C1FIFOINT9.getw : TBits_32; inline;
  90405. begin
  90406. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90407. end;
  90408. procedure TCAN1_C1FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  90409. begin
  90410. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  90411. end;
  90412. function TCAN1_C1FIFOCI9.getCFIFOCI : TBits_5; inline;
  90413. begin
  90414. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  90415. end;
  90416. procedure TCAN1_C1FIFOCI9.setw(thebits : TBits_32); inline;
  90417. begin
  90418. pTDefRegMap(@Self)^.val := thebits;
  90419. end;
  90420. function TCAN1_C1FIFOCI9.getw : TBits_32; inline;
  90421. begin
  90422. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90423. end;
  90424. procedure TCAN1_C1FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  90425. begin
  90426. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  90427. end;
  90428. function TCAN1_C1FIFOCON10.getTXPRI : TBits_2; inline;
  90429. begin
  90430. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  90431. end;
  90432. procedure TCAN1_C1FIFOCON10.setRTREN; inline;
  90433. begin
  90434. pTDefRegMap(@Self)^.&set := $00000004;
  90435. end;
  90436. procedure TCAN1_C1FIFOCON10.clearRTREN; inline;
  90437. begin
  90438. pTDefRegMap(@Self)^.clr := $00000004;
  90439. end;
  90440. procedure TCAN1_C1FIFOCON10.setRTREN(thebits : TBits_1); inline;
  90441. begin
  90442. if thebits = 0 then
  90443. pTDefRegMap(@Self)^.clr := $00000004
  90444. else
  90445. pTDefRegMap(@Self)^.&set := $00000004;
  90446. end;
  90447. function TCAN1_C1FIFOCON10.getRTREN : TBits_1; inline;
  90448. begin
  90449. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90450. end;
  90451. procedure TCAN1_C1FIFOCON10.setTXREQ; inline;
  90452. begin
  90453. pTDefRegMap(@Self)^.&set := $00000008;
  90454. end;
  90455. procedure TCAN1_C1FIFOCON10.clearTXREQ; inline;
  90456. begin
  90457. pTDefRegMap(@Self)^.clr := $00000008;
  90458. end;
  90459. procedure TCAN1_C1FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  90460. begin
  90461. if thebits = 0 then
  90462. pTDefRegMap(@Self)^.clr := $00000008
  90463. else
  90464. pTDefRegMap(@Self)^.&set := $00000008;
  90465. end;
  90466. function TCAN1_C1FIFOCON10.getTXREQ : TBits_1; inline;
  90467. begin
  90468. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90469. end;
  90470. procedure TCAN1_C1FIFOCON10.setTXERR; inline;
  90471. begin
  90472. pTDefRegMap(@Self)^.&set := $00000010;
  90473. end;
  90474. procedure TCAN1_C1FIFOCON10.clearTXERR; inline;
  90475. begin
  90476. pTDefRegMap(@Self)^.clr := $00000010;
  90477. end;
  90478. procedure TCAN1_C1FIFOCON10.setTXERR(thebits : TBits_1); inline;
  90479. begin
  90480. if thebits = 0 then
  90481. pTDefRegMap(@Self)^.clr := $00000010
  90482. else
  90483. pTDefRegMap(@Self)^.&set := $00000010;
  90484. end;
  90485. function TCAN1_C1FIFOCON10.getTXERR : TBits_1; inline;
  90486. begin
  90487. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  90488. end;
  90489. procedure TCAN1_C1FIFOCON10.setTXLARB; inline;
  90490. begin
  90491. pTDefRegMap(@Self)^.&set := $00000020;
  90492. end;
  90493. procedure TCAN1_C1FIFOCON10.clearTXLARB; inline;
  90494. begin
  90495. pTDefRegMap(@Self)^.clr := $00000020;
  90496. end;
  90497. procedure TCAN1_C1FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  90498. begin
  90499. if thebits = 0 then
  90500. pTDefRegMap(@Self)^.clr := $00000020
  90501. else
  90502. pTDefRegMap(@Self)^.&set := $00000020;
  90503. end;
  90504. function TCAN1_C1FIFOCON10.getTXLARB : TBits_1; inline;
  90505. begin
  90506. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  90507. end;
  90508. procedure TCAN1_C1FIFOCON10.setTXABAT; inline;
  90509. begin
  90510. pTDefRegMap(@Self)^.&set := $00000040;
  90511. end;
  90512. procedure TCAN1_C1FIFOCON10.clearTXABAT; inline;
  90513. begin
  90514. pTDefRegMap(@Self)^.clr := $00000040;
  90515. end;
  90516. procedure TCAN1_C1FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  90517. begin
  90518. if thebits = 0 then
  90519. pTDefRegMap(@Self)^.clr := $00000040
  90520. else
  90521. pTDefRegMap(@Self)^.&set := $00000040;
  90522. end;
  90523. function TCAN1_C1FIFOCON10.getTXABAT : TBits_1; inline;
  90524. begin
  90525. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  90526. end;
  90527. procedure TCAN1_C1FIFOCON10.setTXEN; inline;
  90528. begin
  90529. pTDefRegMap(@Self)^.&set := $00000080;
  90530. end;
  90531. procedure TCAN1_C1FIFOCON10.clearTXEN; inline;
  90532. begin
  90533. pTDefRegMap(@Self)^.clr := $00000080;
  90534. end;
  90535. procedure TCAN1_C1FIFOCON10.setTXEN(thebits : TBits_1); inline;
  90536. begin
  90537. if thebits = 0 then
  90538. pTDefRegMap(@Self)^.clr := $00000080
  90539. else
  90540. pTDefRegMap(@Self)^.&set := $00000080;
  90541. end;
  90542. function TCAN1_C1FIFOCON10.getTXEN : TBits_1; inline;
  90543. begin
  90544. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  90545. end;
  90546. procedure TCAN1_C1FIFOCON10.setDONLY; inline;
  90547. begin
  90548. pTDefRegMap(@Self)^.&set := $00001000;
  90549. end;
  90550. procedure TCAN1_C1FIFOCON10.clearDONLY; inline;
  90551. begin
  90552. pTDefRegMap(@Self)^.clr := $00001000;
  90553. end;
  90554. procedure TCAN1_C1FIFOCON10.setDONLY(thebits : TBits_1); inline;
  90555. begin
  90556. if thebits = 0 then
  90557. pTDefRegMap(@Self)^.clr := $00001000
  90558. else
  90559. pTDefRegMap(@Self)^.&set := $00001000;
  90560. end;
  90561. function TCAN1_C1FIFOCON10.getDONLY : TBits_1; inline;
  90562. begin
  90563. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  90564. end;
  90565. procedure TCAN1_C1FIFOCON10.setUINC; inline;
  90566. begin
  90567. pTDefRegMap(@Self)^.&set := $00002000;
  90568. end;
  90569. procedure TCAN1_C1FIFOCON10.clearUINC; inline;
  90570. begin
  90571. pTDefRegMap(@Self)^.clr := $00002000;
  90572. end;
  90573. procedure TCAN1_C1FIFOCON10.setUINC(thebits : TBits_1); inline;
  90574. begin
  90575. if thebits = 0 then
  90576. pTDefRegMap(@Self)^.clr := $00002000
  90577. else
  90578. pTDefRegMap(@Self)^.&set := $00002000;
  90579. end;
  90580. function TCAN1_C1FIFOCON10.getUINC : TBits_1; inline;
  90581. begin
  90582. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  90583. end;
  90584. procedure TCAN1_C1FIFOCON10.setFRESET; inline;
  90585. begin
  90586. pTDefRegMap(@Self)^.&set := $00004000;
  90587. end;
  90588. procedure TCAN1_C1FIFOCON10.clearFRESET; inline;
  90589. begin
  90590. pTDefRegMap(@Self)^.clr := $00004000;
  90591. end;
  90592. procedure TCAN1_C1FIFOCON10.setFRESET(thebits : TBits_1); inline;
  90593. begin
  90594. if thebits = 0 then
  90595. pTDefRegMap(@Self)^.clr := $00004000
  90596. else
  90597. pTDefRegMap(@Self)^.&set := $00004000;
  90598. end;
  90599. function TCAN1_C1FIFOCON10.getFRESET : TBits_1; inline;
  90600. begin
  90601. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  90602. end;
  90603. procedure TCAN1_C1FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  90604. begin
  90605. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  90606. end;
  90607. function TCAN1_C1FIFOCON10.getFSIZE : TBits_5; inline;
  90608. begin
  90609. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  90610. end;
  90611. procedure TCAN1_C1FIFOCON10.setw(thebits : TBits_32); inline;
  90612. begin
  90613. pTDefRegMap(@Self)^.val := thebits;
  90614. end;
  90615. function TCAN1_C1FIFOCON10.getw : TBits_32; inline;
  90616. begin
  90617. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90618. end;
  90619. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF; inline;
  90620. begin
  90621. pTDefRegMap(@Self)^.&set := $00000001;
  90622. end;
  90623. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIF; inline;
  90624. begin
  90625. pTDefRegMap(@Self)^.clr := $00000001;
  90626. end;
  90627. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  90628. begin
  90629. if thebits = 0 then
  90630. pTDefRegMap(@Self)^.clr := $00000001
  90631. else
  90632. pTDefRegMap(@Self)^.&set := $00000001;
  90633. end;
  90634. function TCAN1_C1FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  90635. begin
  90636. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  90637. end;
  90638. procedure TCAN1_C1FIFOINT10.setRXHALFIF; inline;
  90639. begin
  90640. pTDefRegMap(@Self)^.&set := $00000002;
  90641. end;
  90642. procedure TCAN1_C1FIFOINT10.clearRXHALFIF; inline;
  90643. begin
  90644. pTDefRegMap(@Self)^.clr := $00000002;
  90645. end;
  90646. procedure TCAN1_C1FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  90647. begin
  90648. if thebits = 0 then
  90649. pTDefRegMap(@Self)^.clr := $00000002
  90650. else
  90651. pTDefRegMap(@Self)^.&set := $00000002;
  90652. end;
  90653. function TCAN1_C1FIFOINT10.getRXHALFIF : TBits_1; inline;
  90654. begin
  90655. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  90656. end;
  90657. procedure TCAN1_C1FIFOINT10.setRXFULLIF; inline;
  90658. begin
  90659. pTDefRegMap(@Self)^.&set := $00000004;
  90660. end;
  90661. procedure TCAN1_C1FIFOINT10.clearRXFULLIF; inline;
  90662. begin
  90663. pTDefRegMap(@Self)^.clr := $00000004;
  90664. end;
  90665. procedure TCAN1_C1FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  90666. begin
  90667. if thebits = 0 then
  90668. pTDefRegMap(@Self)^.clr := $00000004
  90669. else
  90670. pTDefRegMap(@Self)^.&set := $00000004;
  90671. end;
  90672. function TCAN1_C1FIFOINT10.getRXFULLIF : TBits_1; inline;
  90673. begin
  90674. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90675. end;
  90676. procedure TCAN1_C1FIFOINT10.setRXOVFLIF; inline;
  90677. begin
  90678. pTDefRegMap(@Self)^.&set := $00000008;
  90679. end;
  90680. procedure TCAN1_C1FIFOINT10.clearRXOVFLIF; inline;
  90681. begin
  90682. pTDefRegMap(@Self)^.clr := $00000008;
  90683. end;
  90684. procedure TCAN1_C1FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  90685. begin
  90686. if thebits = 0 then
  90687. pTDefRegMap(@Self)^.clr := $00000008
  90688. else
  90689. pTDefRegMap(@Self)^.&set := $00000008;
  90690. end;
  90691. function TCAN1_C1FIFOINT10.getRXOVFLIF : TBits_1; inline;
  90692. begin
  90693. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90694. end;
  90695. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF; inline;
  90696. begin
  90697. pTDefRegMap(@Self)^.&set := $00000100;
  90698. end;
  90699. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIF; inline;
  90700. begin
  90701. pTDefRegMap(@Self)^.clr := $00000100;
  90702. end;
  90703. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  90704. begin
  90705. if thebits = 0 then
  90706. pTDefRegMap(@Self)^.clr := $00000100
  90707. else
  90708. pTDefRegMap(@Self)^.&set := $00000100;
  90709. end;
  90710. function TCAN1_C1FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  90711. begin
  90712. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  90713. end;
  90714. procedure TCAN1_C1FIFOINT10.setTXHALFIF; inline;
  90715. begin
  90716. pTDefRegMap(@Self)^.&set := $00000200;
  90717. end;
  90718. procedure TCAN1_C1FIFOINT10.clearTXHALFIF; inline;
  90719. begin
  90720. pTDefRegMap(@Self)^.clr := $00000200;
  90721. end;
  90722. procedure TCAN1_C1FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  90723. begin
  90724. if thebits = 0 then
  90725. pTDefRegMap(@Self)^.clr := $00000200
  90726. else
  90727. pTDefRegMap(@Self)^.&set := $00000200;
  90728. end;
  90729. function TCAN1_C1FIFOINT10.getTXHALFIF : TBits_1; inline;
  90730. begin
  90731. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  90732. end;
  90733. procedure TCAN1_C1FIFOINT10.setTXNFULLIF; inline;
  90734. begin
  90735. pTDefRegMap(@Self)^.&set := $00000400;
  90736. end;
  90737. procedure TCAN1_C1FIFOINT10.clearTXNFULLIF; inline;
  90738. begin
  90739. pTDefRegMap(@Self)^.clr := $00000400;
  90740. end;
  90741. procedure TCAN1_C1FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  90742. begin
  90743. if thebits = 0 then
  90744. pTDefRegMap(@Self)^.clr := $00000400
  90745. else
  90746. pTDefRegMap(@Self)^.&set := $00000400;
  90747. end;
  90748. function TCAN1_C1FIFOINT10.getTXNFULLIF : TBits_1; inline;
  90749. begin
  90750. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  90751. end;
  90752. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE; inline;
  90753. begin
  90754. pTDefRegMap(@Self)^.&set := $00010000;
  90755. end;
  90756. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIE; inline;
  90757. begin
  90758. pTDefRegMap(@Self)^.clr := $00010000;
  90759. end;
  90760. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  90761. begin
  90762. if thebits = 0 then
  90763. pTDefRegMap(@Self)^.clr := $00010000
  90764. else
  90765. pTDefRegMap(@Self)^.&set := $00010000;
  90766. end;
  90767. function TCAN1_C1FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  90768. begin
  90769. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  90770. end;
  90771. procedure TCAN1_C1FIFOINT10.setRXHALFIE; inline;
  90772. begin
  90773. pTDefRegMap(@Self)^.&set := $00020000;
  90774. end;
  90775. procedure TCAN1_C1FIFOINT10.clearRXHALFIE; inline;
  90776. begin
  90777. pTDefRegMap(@Self)^.clr := $00020000;
  90778. end;
  90779. procedure TCAN1_C1FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  90780. begin
  90781. if thebits = 0 then
  90782. pTDefRegMap(@Self)^.clr := $00020000
  90783. else
  90784. pTDefRegMap(@Self)^.&set := $00020000;
  90785. end;
  90786. function TCAN1_C1FIFOINT10.getRXHALFIE : TBits_1; inline;
  90787. begin
  90788. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  90789. end;
  90790. procedure TCAN1_C1FIFOINT10.setRXFULLIE; inline;
  90791. begin
  90792. pTDefRegMap(@Self)^.&set := $00040000;
  90793. end;
  90794. procedure TCAN1_C1FIFOINT10.clearRXFULLIE; inline;
  90795. begin
  90796. pTDefRegMap(@Self)^.clr := $00040000;
  90797. end;
  90798. procedure TCAN1_C1FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  90799. begin
  90800. if thebits = 0 then
  90801. pTDefRegMap(@Self)^.clr := $00040000
  90802. else
  90803. pTDefRegMap(@Self)^.&set := $00040000;
  90804. end;
  90805. function TCAN1_C1FIFOINT10.getRXFULLIE : TBits_1; inline;
  90806. begin
  90807. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  90808. end;
  90809. procedure TCAN1_C1FIFOINT10.setRXOVFLIE; inline;
  90810. begin
  90811. pTDefRegMap(@Self)^.&set := $00080000;
  90812. end;
  90813. procedure TCAN1_C1FIFOINT10.clearRXOVFLIE; inline;
  90814. begin
  90815. pTDefRegMap(@Self)^.clr := $00080000;
  90816. end;
  90817. procedure TCAN1_C1FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  90818. begin
  90819. if thebits = 0 then
  90820. pTDefRegMap(@Self)^.clr := $00080000
  90821. else
  90822. pTDefRegMap(@Self)^.&set := $00080000;
  90823. end;
  90824. function TCAN1_C1FIFOINT10.getRXOVFLIE : TBits_1; inline;
  90825. begin
  90826. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  90827. end;
  90828. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE; inline;
  90829. begin
  90830. pTDefRegMap(@Self)^.&set := $01000000;
  90831. end;
  90832. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIE; inline;
  90833. begin
  90834. pTDefRegMap(@Self)^.clr := $01000000;
  90835. end;
  90836. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  90837. begin
  90838. if thebits = 0 then
  90839. pTDefRegMap(@Self)^.clr := $01000000
  90840. else
  90841. pTDefRegMap(@Self)^.&set := $01000000;
  90842. end;
  90843. function TCAN1_C1FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  90844. begin
  90845. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  90846. end;
  90847. procedure TCAN1_C1FIFOINT10.setTXHALFIE; inline;
  90848. begin
  90849. pTDefRegMap(@Self)^.&set := $02000000;
  90850. end;
  90851. procedure TCAN1_C1FIFOINT10.clearTXHALFIE; inline;
  90852. begin
  90853. pTDefRegMap(@Self)^.clr := $02000000;
  90854. end;
  90855. procedure TCAN1_C1FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  90856. begin
  90857. if thebits = 0 then
  90858. pTDefRegMap(@Self)^.clr := $02000000
  90859. else
  90860. pTDefRegMap(@Self)^.&set := $02000000;
  90861. end;
  90862. function TCAN1_C1FIFOINT10.getTXHALFIE : TBits_1; inline;
  90863. begin
  90864. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  90865. end;
  90866. procedure TCAN1_C1FIFOINT10.setTXNFULLIE; inline;
  90867. begin
  90868. pTDefRegMap(@Self)^.&set := $04000000;
  90869. end;
  90870. procedure TCAN1_C1FIFOINT10.clearTXNFULLIE; inline;
  90871. begin
  90872. pTDefRegMap(@Self)^.clr := $04000000;
  90873. end;
  90874. procedure TCAN1_C1FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  90875. begin
  90876. if thebits = 0 then
  90877. pTDefRegMap(@Self)^.clr := $04000000
  90878. else
  90879. pTDefRegMap(@Self)^.&set := $04000000;
  90880. end;
  90881. function TCAN1_C1FIFOINT10.getTXNFULLIE : TBits_1; inline;
  90882. begin
  90883. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  90884. end;
  90885. procedure TCAN1_C1FIFOINT10.setw(thebits : TBits_32); inline;
  90886. begin
  90887. pTDefRegMap(@Self)^.val := thebits;
  90888. end;
  90889. function TCAN1_C1FIFOINT10.getw : TBits_32; inline;
  90890. begin
  90891. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90892. end;
  90893. procedure TCAN1_C1FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  90894. begin
  90895. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  90896. end;
  90897. function TCAN1_C1FIFOCI10.getCFIFOCI : TBits_5; inline;
  90898. begin
  90899. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  90900. end;
  90901. procedure TCAN1_C1FIFOCI10.setw(thebits : TBits_32); inline;
  90902. begin
  90903. pTDefRegMap(@Self)^.val := thebits;
  90904. end;
  90905. function TCAN1_C1FIFOCI10.getw : TBits_32; inline;
  90906. begin
  90907. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90908. end;
  90909. procedure TCAN1_C1FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  90910. begin
  90911. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  90912. end;
  90913. function TCAN1_C1FIFOCON11.getTXPRI : TBits_2; inline;
  90914. begin
  90915. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  90916. end;
  90917. procedure TCAN1_C1FIFOCON11.setRTREN; inline;
  90918. begin
  90919. pTDefRegMap(@Self)^.&set := $00000004;
  90920. end;
  90921. procedure TCAN1_C1FIFOCON11.clearRTREN; inline;
  90922. begin
  90923. pTDefRegMap(@Self)^.clr := $00000004;
  90924. end;
  90925. procedure TCAN1_C1FIFOCON11.setRTREN(thebits : TBits_1); inline;
  90926. begin
  90927. if thebits = 0 then
  90928. pTDefRegMap(@Self)^.clr := $00000004
  90929. else
  90930. pTDefRegMap(@Self)^.&set := $00000004;
  90931. end;
  90932. function TCAN1_C1FIFOCON11.getRTREN : TBits_1; inline;
  90933. begin
  90934. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90935. end;
  90936. procedure TCAN1_C1FIFOCON11.setTXREQ; inline;
  90937. begin
  90938. pTDefRegMap(@Self)^.&set := $00000008;
  90939. end;
  90940. procedure TCAN1_C1FIFOCON11.clearTXREQ; inline;
  90941. begin
  90942. pTDefRegMap(@Self)^.clr := $00000008;
  90943. end;
  90944. procedure TCAN1_C1FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  90945. begin
  90946. if thebits = 0 then
  90947. pTDefRegMap(@Self)^.clr := $00000008
  90948. else
  90949. pTDefRegMap(@Self)^.&set := $00000008;
  90950. end;
  90951. function TCAN1_C1FIFOCON11.getTXREQ : TBits_1; inline;
  90952. begin
  90953. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90954. end;
  90955. procedure TCAN1_C1FIFOCON11.setTXERR; inline;
  90956. begin
  90957. pTDefRegMap(@Self)^.&set := $00000010;
  90958. end;
  90959. procedure TCAN1_C1FIFOCON11.clearTXERR; inline;
  90960. begin
  90961. pTDefRegMap(@Self)^.clr := $00000010;
  90962. end;
  90963. procedure TCAN1_C1FIFOCON11.setTXERR(thebits : TBits_1); inline;
  90964. begin
  90965. if thebits = 0 then
  90966. pTDefRegMap(@Self)^.clr := $00000010
  90967. else
  90968. pTDefRegMap(@Self)^.&set := $00000010;
  90969. end;
  90970. function TCAN1_C1FIFOCON11.getTXERR : TBits_1; inline;
  90971. begin
  90972. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  90973. end;
  90974. procedure TCAN1_C1FIFOCON11.setTXLARB; inline;
  90975. begin
  90976. pTDefRegMap(@Self)^.&set := $00000020;
  90977. end;
  90978. procedure TCAN1_C1FIFOCON11.clearTXLARB; inline;
  90979. begin
  90980. pTDefRegMap(@Self)^.clr := $00000020;
  90981. end;
  90982. procedure TCAN1_C1FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  90983. begin
  90984. if thebits = 0 then
  90985. pTDefRegMap(@Self)^.clr := $00000020
  90986. else
  90987. pTDefRegMap(@Self)^.&set := $00000020;
  90988. end;
  90989. function TCAN1_C1FIFOCON11.getTXLARB : TBits_1; inline;
  90990. begin
  90991. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  90992. end;
  90993. procedure TCAN1_C1FIFOCON11.setTXABAT; inline;
  90994. begin
  90995. pTDefRegMap(@Self)^.&set := $00000040;
  90996. end;
  90997. procedure TCAN1_C1FIFOCON11.clearTXABAT; inline;
  90998. begin
  90999. pTDefRegMap(@Self)^.clr := $00000040;
  91000. end;
  91001. procedure TCAN1_C1FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  91002. begin
  91003. if thebits = 0 then
  91004. pTDefRegMap(@Self)^.clr := $00000040
  91005. else
  91006. pTDefRegMap(@Self)^.&set := $00000040;
  91007. end;
  91008. function TCAN1_C1FIFOCON11.getTXABAT : TBits_1; inline;
  91009. begin
  91010. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  91011. end;
  91012. procedure TCAN1_C1FIFOCON11.setTXEN; inline;
  91013. begin
  91014. pTDefRegMap(@Self)^.&set := $00000080;
  91015. end;
  91016. procedure TCAN1_C1FIFOCON11.clearTXEN; inline;
  91017. begin
  91018. pTDefRegMap(@Self)^.clr := $00000080;
  91019. end;
  91020. procedure TCAN1_C1FIFOCON11.setTXEN(thebits : TBits_1); inline;
  91021. begin
  91022. if thebits = 0 then
  91023. pTDefRegMap(@Self)^.clr := $00000080
  91024. else
  91025. pTDefRegMap(@Self)^.&set := $00000080;
  91026. end;
  91027. function TCAN1_C1FIFOCON11.getTXEN : TBits_1; inline;
  91028. begin
  91029. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  91030. end;
  91031. procedure TCAN1_C1FIFOCON11.setDONLY; inline;
  91032. begin
  91033. pTDefRegMap(@Self)^.&set := $00001000;
  91034. end;
  91035. procedure TCAN1_C1FIFOCON11.clearDONLY; inline;
  91036. begin
  91037. pTDefRegMap(@Self)^.clr := $00001000;
  91038. end;
  91039. procedure TCAN1_C1FIFOCON11.setDONLY(thebits : TBits_1); inline;
  91040. begin
  91041. if thebits = 0 then
  91042. pTDefRegMap(@Self)^.clr := $00001000
  91043. else
  91044. pTDefRegMap(@Self)^.&set := $00001000;
  91045. end;
  91046. function TCAN1_C1FIFOCON11.getDONLY : TBits_1; inline;
  91047. begin
  91048. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  91049. end;
  91050. procedure TCAN1_C1FIFOCON11.setUINC; inline;
  91051. begin
  91052. pTDefRegMap(@Self)^.&set := $00002000;
  91053. end;
  91054. procedure TCAN1_C1FIFOCON11.clearUINC; inline;
  91055. begin
  91056. pTDefRegMap(@Self)^.clr := $00002000;
  91057. end;
  91058. procedure TCAN1_C1FIFOCON11.setUINC(thebits : TBits_1); inline;
  91059. begin
  91060. if thebits = 0 then
  91061. pTDefRegMap(@Self)^.clr := $00002000
  91062. else
  91063. pTDefRegMap(@Self)^.&set := $00002000;
  91064. end;
  91065. function TCAN1_C1FIFOCON11.getUINC : TBits_1; inline;
  91066. begin
  91067. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  91068. end;
  91069. procedure TCAN1_C1FIFOCON11.setFRESET; inline;
  91070. begin
  91071. pTDefRegMap(@Self)^.&set := $00004000;
  91072. end;
  91073. procedure TCAN1_C1FIFOCON11.clearFRESET; inline;
  91074. begin
  91075. pTDefRegMap(@Self)^.clr := $00004000;
  91076. end;
  91077. procedure TCAN1_C1FIFOCON11.setFRESET(thebits : TBits_1); inline;
  91078. begin
  91079. if thebits = 0 then
  91080. pTDefRegMap(@Self)^.clr := $00004000
  91081. else
  91082. pTDefRegMap(@Self)^.&set := $00004000;
  91083. end;
  91084. function TCAN1_C1FIFOCON11.getFRESET : TBits_1; inline;
  91085. begin
  91086. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  91087. end;
  91088. procedure TCAN1_C1FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  91089. begin
  91090. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  91091. end;
  91092. function TCAN1_C1FIFOCON11.getFSIZE : TBits_5; inline;
  91093. begin
  91094. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  91095. end;
  91096. procedure TCAN1_C1FIFOCON11.setw(thebits : TBits_32); inline;
  91097. begin
  91098. pTDefRegMap(@Self)^.val := thebits;
  91099. end;
  91100. function TCAN1_C1FIFOCON11.getw : TBits_32; inline;
  91101. begin
  91102. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91103. end;
  91104. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF; inline;
  91105. begin
  91106. pTDefRegMap(@Self)^.&set := $00000001;
  91107. end;
  91108. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIF; inline;
  91109. begin
  91110. pTDefRegMap(@Self)^.clr := $00000001;
  91111. end;
  91112. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  91113. begin
  91114. if thebits = 0 then
  91115. pTDefRegMap(@Self)^.clr := $00000001
  91116. else
  91117. pTDefRegMap(@Self)^.&set := $00000001;
  91118. end;
  91119. function TCAN1_C1FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  91120. begin
  91121. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  91122. end;
  91123. procedure TCAN1_C1FIFOINT11.setRXHALFIF; inline;
  91124. begin
  91125. pTDefRegMap(@Self)^.&set := $00000002;
  91126. end;
  91127. procedure TCAN1_C1FIFOINT11.clearRXHALFIF; inline;
  91128. begin
  91129. pTDefRegMap(@Self)^.clr := $00000002;
  91130. end;
  91131. procedure TCAN1_C1FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  91132. begin
  91133. if thebits = 0 then
  91134. pTDefRegMap(@Self)^.clr := $00000002
  91135. else
  91136. pTDefRegMap(@Self)^.&set := $00000002;
  91137. end;
  91138. function TCAN1_C1FIFOINT11.getRXHALFIF : TBits_1; inline;
  91139. begin
  91140. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  91141. end;
  91142. procedure TCAN1_C1FIFOINT11.setRXFULLIF; inline;
  91143. begin
  91144. pTDefRegMap(@Self)^.&set := $00000004;
  91145. end;
  91146. procedure TCAN1_C1FIFOINT11.clearRXFULLIF; inline;
  91147. begin
  91148. pTDefRegMap(@Self)^.clr := $00000004;
  91149. end;
  91150. procedure TCAN1_C1FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  91151. begin
  91152. if thebits = 0 then
  91153. pTDefRegMap(@Self)^.clr := $00000004
  91154. else
  91155. pTDefRegMap(@Self)^.&set := $00000004;
  91156. end;
  91157. function TCAN1_C1FIFOINT11.getRXFULLIF : TBits_1; inline;
  91158. begin
  91159. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91160. end;
  91161. procedure TCAN1_C1FIFOINT11.setRXOVFLIF; inline;
  91162. begin
  91163. pTDefRegMap(@Self)^.&set := $00000008;
  91164. end;
  91165. procedure TCAN1_C1FIFOINT11.clearRXOVFLIF; inline;
  91166. begin
  91167. pTDefRegMap(@Self)^.clr := $00000008;
  91168. end;
  91169. procedure TCAN1_C1FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  91170. begin
  91171. if thebits = 0 then
  91172. pTDefRegMap(@Self)^.clr := $00000008
  91173. else
  91174. pTDefRegMap(@Self)^.&set := $00000008;
  91175. end;
  91176. function TCAN1_C1FIFOINT11.getRXOVFLIF : TBits_1; inline;
  91177. begin
  91178. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91179. end;
  91180. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF; inline;
  91181. begin
  91182. pTDefRegMap(@Self)^.&set := $00000100;
  91183. end;
  91184. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIF; inline;
  91185. begin
  91186. pTDefRegMap(@Self)^.clr := $00000100;
  91187. end;
  91188. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  91189. begin
  91190. if thebits = 0 then
  91191. pTDefRegMap(@Self)^.clr := $00000100
  91192. else
  91193. pTDefRegMap(@Self)^.&set := $00000100;
  91194. end;
  91195. function TCAN1_C1FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  91196. begin
  91197. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  91198. end;
  91199. procedure TCAN1_C1FIFOINT11.setTXHALFIF; inline;
  91200. begin
  91201. pTDefRegMap(@Self)^.&set := $00000200;
  91202. end;
  91203. procedure TCAN1_C1FIFOINT11.clearTXHALFIF; inline;
  91204. begin
  91205. pTDefRegMap(@Self)^.clr := $00000200;
  91206. end;
  91207. procedure TCAN1_C1FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  91208. begin
  91209. if thebits = 0 then
  91210. pTDefRegMap(@Self)^.clr := $00000200
  91211. else
  91212. pTDefRegMap(@Self)^.&set := $00000200;
  91213. end;
  91214. function TCAN1_C1FIFOINT11.getTXHALFIF : TBits_1; inline;
  91215. begin
  91216. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  91217. end;
  91218. procedure TCAN1_C1FIFOINT11.setTXNFULLIF; inline;
  91219. begin
  91220. pTDefRegMap(@Self)^.&set := $00000400;
  91221. end;
  91222. procedure TCAN1_C1FIFOINT11.clearTXNFULLIF; inline;
  91223. begin
  91224. pTDefRegMap(@Self)^.clr := $00000400;
  91225. end;
  91226. procedure TCAN1_C1FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  91227. begin
  91228. if thebits = 0 then
  91229. pTDefRegMap(@Self)^.clr := $00000400
  91230. else
  91231. pTDefRegMap(@Self)^.&set := $00000400;
  91232. end;
  91233. function TCAN1_C1FIFOINT11.getTXNFULLIF : TBits_1; inline;
  91234. begin
  91235. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  91236. end;
  91237. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE; inline;
  91238. begin
  91239. pTDefRegMap(@Self)^.&set := $00010000;
  91240. end;
  91241. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIE; inline;
  91242. begin
  91243. pTDefRegMap(@Self)^.clr := $00010000;
  91244. end;
  91245. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  91246. begin
  91247. if thebits = 0 then
  91248. pTDefRegMap(@Self)^.clr := $00010000
  91249. else
  91250. pTDefRegMap(@Self)^.&set := $00010000;
  91251. end;
  91252. function TCAN1_C1FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  91253. begin
  91254. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  91255. end;
  91256. procedure TCAN1_C1FIFOINT11.setRXHALFIE; inline;
  91257. begin
  91258. pTDefRegMap(@Self)^.&set := $00020000;
  91259. end;
  91260. procedure TCAN1_C1FIFOINT11.clearRXHALFIE; inline;
  91261. begin
  91262. pTDefRegMap(@Self)^.clr := $00020000;
  91263. end;
  91264. procedure TCAN1_C1FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  91265. begin
  91266. if thebits = 0 then
  91267. pTDefRegMap(@Self)^.clr := $00020000
  91268. else
  91269. pTDefRegMap(@Self)^.&set := $00020000;
  91270. end;
  91271. function TCAN1_C1FIFOINT11.getRXHALFIE : TBits_1; inline;
  91272. begin
  91273. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  91274. end;
  91275. procedure TCAN1_C1FIFOINT11.setRXFULLIE; inline;
  91276. begin
  91277. pTDefRegMap(@Self)^.&set := $00040000;
  91278. end;
  91279. procedure TCAN1_C1FIFOINT11.clearRXFULLIE; inline;
  91280. begin
  91281. pTDefRegMap(@Self)^.clr := $00040000;
  91282. end;
  91283. procedure TCAN1_C1FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  91284. begin
  91285. if thebits = 0 then
  91286. pTDefRegMap(@Self)^.clr := $00040000
  91287. else
  91288. pTDefRegMap(@Self)^.&set := $00040000;
  91289. end;
  91290. function TCAN1_C1FIFOINT11.getRXFULLIE : TBits_1; inline;
  91291. begin
  91292. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  91293. end;
  91294. procedure TCAN1_C1FIFOINT11.setRXOVFLIE; inline;
  91295. begin
  91296. pTDefRegMap(@Self)^.&set := $00080000;
  91297. end;
  91298. procedure TCAN1_C1FIFOINT11.clearRXOVFLIE; inline;
  91299. begin
  91300. pTDefRegMap(@Self)^.clr := $00080000;
  91301. end;
  91302. procedure TCAN1_C1FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  91303. begin
  91304. if thebits = 0 then
  91305. pTDefRegMap(@Self)^.clr := $00080000
  91306. else
  91307. pTDefRegMap(@Self)^.&set := $00080000;
  91308. end;
  91309. function TCAN1_C1FIFOINT11.getRXOVFLIE : TBits_1; inline;
  91310. begin
  91311. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  91312. end;
  91313. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE; inline;
  91314. begin
  91315. pTDefRegMap(@Self)^.&set := $01000000;
  91316. end;
  91317. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIE; inline;
  91318. begin
  91319. pTDefRegMap(@Self)^.clr := $01000000;
  91320. end;
  91321. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  91322. begin
  91323. if thebits = 0 then
  91324. pTDefRegMap(@Self)^.clr := $01000000
  91325. else
  91326. pTDefRegMap(@Self)^.&set := $01000000;
  91327. end;
  91328. function TCAN1_C1FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  91329. begin
  91330. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  91331. end;
  91332. procedure TCAN1_C1FIFOINT11.setTXHALFIE; inline;
  91333. begin
  91334. pTDefRegMap(@Self)^.&set := $02000000;
  91335. end;
  91336. procedure TCAN1_C1FIFOINT11.clearTXHALFIE; inline;
  91337. begin
  91338. pTDefRegMap(@Self)^.clr := $02000000;
  91339. end;
  91340. procedure TCAN1_C1FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  91341. begin
  91342. if thebits = 0 then
  91343. pTDefRegMap(@Self)^.clr := $02000000
  91344. else
  91345. pTDefRegMap(@Self)^.&set := $02000000;
  91346. end;
  91347. function TCAN1_C1FIFOINT11.getTXHALFIE : TBits_1; inline;
  91348. begin
  91349. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  91350. end;
  91351. procedure TCAN1_C1FIFOINT11.setTXNFULLIE; inline;
  91352. begin
  91353. pTDefRegMap(@Self)^.&set := $04000000;
  91354. end;
  91355. procedure TCAN1_C1FIFOINT11.clearTXNFULLIE; inline;
  91356. begin
  91357. pTDefRegMap(@Self)^.clr := $04000000;
  91358. end;
  91359. procedure TCAN1_C1FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  91360. begin
  91361. if thebits = 0 then
  91362. pTDefRegMap(@Self)^.clr := $04000000
  91363. else
  91364. pTDefRegMap(@Self)^.&set := $04000000;
  91365. end;
  91366. function TCAN1_C1FIFOINT11.getTXNFULLIE : TBits_1; inline;
  91367. begin
  91368. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  91369. end;
  91370. procedure TCAN1_C1FIFOINT11.setw(thebits : TBits_32); inline;
  91371. begin
  91372. pTDefRegMap(@Self)^.val := thebits;
  91373. end;
  91374. function TCAN1_C1FIFOINT11.getw : TBits_32; inline;
  91375. begin
  91376. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91377. end;
  91378. procedure TCAN1_C1FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  91379. begin
  91380. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  91381. end;
  91382. function TCAN1_C1FIFOCI11.getCFIFOCI : TBits_5; inline;
  91383. begin
  91384. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  91385. end;
  91386. procedure TCAN1_C1FIFOCI11.setw(thebits : TBits_32); inline;
  91387. begin
  91388. pTDefRegMap(@Self)^.val := thebits;
  91389. end;
  91390. function TCAN1_C1FIFOCI11.getw : TBits_32; inline;
  91391. begin
  91392. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91393. end;
  91394. procedure TCAN1_C1FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  91395. begin
  91396. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  91397. end;
  91398. function TCAN1_C1FIFOCON12.getTXPRI : TBits_2; inline;
  91399. begin
  91400. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  91401. end;
  91402. procedure TCAN1_C1FIFOCON12.setRTREN; inline;
  91403. begin
  91404. pTDefRegMap(@Self)^.&set := $00000004;
  91405. end;
  91406. procedure TCAN1_C1FIFOCON12.clearRTREN; inline;
  91407. begin
  91408. pTDefRegMap(@Self)^.clr := $00000004;
  91409. end;
  91410. procedure TCAN1_C1FIFOCON12.setRTREN(thebits : TBits_1); inline;
  91411. begin
  91412. if thebits = 0 then
  91413. pTDefRegMap(@Self)^.clr := $00000004
  91414. else
  91415. pTDefRegMap(@Self)^.&set := $00000004;
  91416. end;
  91417. function TCAN1_C1FIFOCON12.getRTREN : TBits_1; inline;
  91418. begin
  91419. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91420. end;
  91421. procedure TCAN1_C1FIFOCON12.setTXREQ; inline;
  91422. begin
  91423. pTDefRegMap(@Self)^.&set := $00000008;
  91424. end;
  91425. procedure TCAN1_C1FIFOCON12.clearTXREQ; inline;
  91426. begin
  91427. pTDefRegMap(@Self)^.clr := $00000008;
  91428. end;
  91429. procedure TCAN1_C1FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  91430. begin
  91431. if thebits = 0 then
  91432. pTDefRegMap(@Self)^.clr := $00000008
  91433. else
  91434. pTDefRegMap(@Self)^.&set := $00000008;
  91435. end;
  91436. function TCAN1_C1FIFOCON12.getTXREQ : TBits_1; inline;
  91437. begin
  91438. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91439. end;
  91440. procedure TCAN1_C1FIFOCON12.setTXERR; inline;
  91441. begin
  91442. pTDefRegMap(@Self)^.&set := $00000010;
  91443. end;
  91444. procedure TCAN1_C1FIFOCON12.clearTXERR; inline;
  91445. begin
  91446. pTDefRegMap(@Self)^.clr := $00000010;
  91447. end;
  91448. procedure TCAN1_C1FIFOCON12.setTXERR(thebits : TBits_1); inline;
  91449. begin
  91450. if thebits = 0 then
  91451. pTDefRegMap(@Self)^.clr := $00000010
  91452. else
  91453. pTDefRegMap(@Self)^.&set := $00000010;
  91454. end;
  91455. function TCAN1_C1FIFOCON12.getTXERR : TBits_1; inline;
  91456. begin
  91457. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  91458. end;
  91459. procedure TCAN1_C1FIFOCON12.setTXLARB; inline;
  91460. begin
  91461. pTDefRegMap(@Self)^.&set := $00000020;
  91462. end;
  91463. procedure TCAN1_C1FIFOCON12.clearTXLARB; inline;
  91464. begin
  91465. pTDefRegMap(@Self)^.clr := $00000020;
  91466. end;
  91467. procedure TCAN1_C1FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  91468. begin
  91469. if thebits = 0 then
  91470. pTDefRegMap(@Self)^.clr := $00000020
  91471. else
  91472. pTDefRegMap(@Self)^.&set := $00000020;
  91473. end;
  91474. function TCAN1_C1FIFOCON12.getTXLARB : TBits_1; inline;
  91475. begin
  91476. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  91477. end;
  91478. procedure TCAN1_C1FIFOCON12.setTXABAT; inline;
  91479. begin
  91480. pTDefRegMap(@Self)^.&set := $00000040;
  91481. end;
  91482. procedure TCAN1_C1FIFOCON12.clearTXABAT; inline;
  91483. begin
  91484. pTDefRegMap(@Self)^.clr := $00000040;
  91485. end;
  91486. procedure TCAN1_C1FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  91487. begin
  91488. if thebits = 0 then
  91489. pTDefRegMap(@Self)^.clr := $00000040
  91490. else
  91491. pTDefRegMap(@Self)^.&set := $00000040;
  91492. end;
  91493. function TCAN1_C1FIFOCON12.getTXABAT : TBits_1; inline;
  91494. begin
  91495. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  91496. end;
  91497. procedure TCAN1_C1FIFOCON12.setTXEN; inline;
  91498. begin
  91499. pTDefRegMap(@Self)^.&set := $00000080;
  91500. end;
  91501. procedure TCAN1_C1FIFOCON12.clearTXEN; inline;
  91502. begin
  91503. pTDefRegMap(@Self)^.clr := $00000080;
  91504. end;
  91505. procedure TCAN1_C1FIFOCON12.setTXEN(thebits : TBits_1); inline;
  91506. begin
  91507. if thebits = 0 then
  91508. pTDefRegMap(@Self)^.clr := $00000080
  91509. else
  91510. pTDefRegMap(@Self)^.&set := $00000080;
  91511. end;
  91512. function TCAN1_C1FIFOCON12.getTXEN : TBits_1; inline;
  91513. begin
  91514. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  91515. end;
  91516. procedure TCAN1_C1FIFOCON12.setDONLY; inline;
  91517. begin
  91518. pTDefRegMap(@Self)^.&set := $00001000;
  91519. end;
  91520. procedure TCAN1_C1FIFOCON12.clearDONLY; inline;
  91521. begin
  91522. pTDefRegMap(@Self)^.clr := $00001000;
  91523. end;
  91524. procedure TCAN1_C1FIFOCON12.setDONLY(thebits : TBits_1); inline;
  91525. begin
  91526. if thebits = 0 then
  91527. pTDefRegMap(@Self)^.clr := $00001000
  91528. else
  91529. pTDefRegMap(@Self)^.&set := $00001000;
  91530. end;
  91531. function TCAN1_C1FIFOCON12.getDONLY : TBits_1; inline;
  91532. begin
  91533. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  91534. end;
  91535. procedure TCAN1_C1FIFOCON12.setUINC; inline;
  91536. begin
  91537. pTDefRegMap(@Self)^.&set := $00002000;
  91538. end;
  91539. procedure TCAN1_C1FIFOCON12.clearUINC; inline;
  91540. begin
  91541. pTDefRegMap(@Self)^.clr := $00002000;
  91542. end;
  91543. procedure TCAN1_C1FIFOCON12.setUINC(thebits : TBits_1); inline;
  91544. begin
  91545. if thebits = 0 then
  91546. pTDefRegMap(@Self)^.clr := $00002000
  91547. else
  91548. pTDefRegMap(@Self)^.&set := $00002000;
  91549. end;
  91550. function TCAN1_C1FIFOCON12.getUINC : TBits_1; inline;
  91551. begin
  91552. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  91553. end;
  91554. procedure TCAN1_C1FIFOCON12.setFRESET; inline;
  91555. begin
  91556. pTDefRegMap(@Self)^.&set := $00004000;
  91557. end;
  91558. procedure TCAN1_C1FIFOCON12.clearFRESET; inline;
  91559. begin
  91560. pTDefRegMap(@Self)^.clr := $00004000;
  91561. end;
  91562. procedure TCAN1_C1FIFOCON12.setFRESET(thebits : TBits_1); inline;
  91563. begin
  91564. if thebits = 0 then
  91565. pTDefRegMap(@Self)^.clr := $00004000
  91566. else
  91567. pTDefRegMap(@Self)^.&set := $00004000;
  91568. end;
  91569. function TCAN1_C1FIFOCON12.getFRESET : TBits_1; inline;
  91570. begin
  91571. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  91572. end;
  91573. procedure TCAN1_C1FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  91574. begin
  91575. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  91576. end;
  91577. function TCAN1_C1FIFOCON12.getFSIZE : TBits_5; inline;
  91578. begin
  91579. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  91580. end;
  91581. procedure TCAN1_C1FIFOCON12.setw(thebits : TBits_32); inline;
  91582. begin
  91583. pTDefRegMap(@Self)^.val := thebits;
  91584. end;
  91585. function TCAN1_C1FIFOCON12.getw : TBits_32; inline;
  91586. begin
  91587. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91588. end;
  91589. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF; inline;
  91590. begin
  91591. pTDefRegMap(@Self)^.&set := $00000001;
  91592. end;
  91593. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIF; inline;
  91594. begin
  91595. pTDefRegMap(@Self)^.clr := $00000001;
  91596. end;
  91597. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  91598. begin
  91599. if thebits = 0 then
  91600. pTDefRegMap(@Self)^.clr := $00000001
  91601. else
  91602. pTDefRegMap(@Self)^.&set := $00000001;
  91603. end;
  91604. function TCAN1_C1FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  91605. begin
  91606. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  91607. end;
  91608. procedure TCAN1_C1FIFOINT12.setRXHALFIF; inline;
  91609. begin
  91610. pTDefRegMap(@Self)^.&set := $00000002;
  91611. end;
  91612. procedure TCAN1_C1FIFOINT12.clearRXHALFIF; inline;
  91613. begin
  91614. pTDefRegMap(@Self)^.clr := $00000002;
  91615. end;
  91616. procedure TCAN1_C1FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  91617. begin
  91618. if thebits = 0 then
  91619. pTDefRegMap(@Self)^.clr := $00000002
  91620. else
  91621. pTDefRegMap(@Self)^.&set := $00000002;
  91622. end;
  91623. function TCAN1_C1FIFOINT12.getRXHALFIF : TBits_1; inline;
  91624. begin
  91625. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  91626. end;
  91627. procedure TCAN1_C1FIFOINT12.setRXFULLIF; inline;
  91628. begin
  91629. pTDefRegMap(@Self)^.&set := $00000004;
  91630. end;
  91631. procedure TCAN1_C1FIFOINT12.clearRXFULLIF; inline;
  91632. begin
  91633. pTDefRegMap(@Self)^.clr := $00000004;
  91634. end;
  91635. procedure TCAN1_C1FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  91636. begin
  91637. if thebits = 0 then
  91638. pTDefRegMap(@Self)^.clr := $00000004
  91639. else
  91640. pTDefRegMap(@Self)^.&set := $00000004;
  91641. end;
  91642. function TCAN1_C1FIFOINT12.getRXFULLIF : TBits_1; inline;
  91643. begin
  91644. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91645. end;
  91646. procedure TCAN1_C1FIFOINT12.setRXOVFLIF; inline;
  91647. begin
  91648. pTDefRegMap(@Self)^.&set := $00000008;
  91649. end;
  91650. procedure TCAN1_C1FIFOINT12.clearRXOVFLIF; inline;
  91651. begin
  91652. pTDefRegMap(@Self)^.clr := $00000008;
  91653. end;
  91654. procedure TCAN1_C1FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  91655. begin
  91656. if thebits = 0 then
  91657. pTDefRegMap(@Self)^.clr := $00000008
  91658. else
  91659. pTDefRegMap(@Self)^.&set := $00000008;
  91660. end;
  91661. function TCAN1_C1FIFOINT12.getRXOVFLIF : TBits_1; inline;
  91662. begin
  91663. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91664. end;
  91665. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF; inline;
  91666. begin
  91667. pTDefRegMap(@Self)^.&set := $00000100;
  91668. end;
  91669. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIF; inline;
  91670. begin
  91671. pTDefRegMap(@Self)^.clr := $00000100;
  91672. end;
  91673. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  91674. begin
  91675. if thebits = 0 then
  91676. pTDefRegMap(@Self)^.clr := $00000100
  91677. else
  91678. pTDefRegMap(@Self)^.&set := $00000100;
  91679. end;
  91680. function TCAN1_C1FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  91681. begin
  91682. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  91683. end;
  91684. procedure TCAN1_C1FIFOINT12.setTXHALFIF; inline;
  91685. begin
  91686. pTDefRegMap(@Self)^.&set := $00000200;
  91687. end;
  91688. procedure TCAN1_C1FIFOINT12.clearTXHALFIF; inline;
  91689. begin
  91690. pTDefRegMap(@Self)^.clr := $00000200;
  91691. end;
  91692. procedure TCAN1_C1FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  91693. begin
  91694. if thebits = 0 then
  91695. pTDefRegMap(@Self)^.clr := $00000200
  91696. else
  91697. pTDefRegMap(@Self)^.&set := $00000200;
  91698. end;
  91699. function TCAN1_C1FIFOINT12.getTXHALFIF : TBits_1; inline;
  91700. begin
  91701. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  91702. end;
  91703. procedure TCAN1_C1FIFOINT12.setTXNFULLIF; inline;
  91704. begin
  91705. pTDefRegMap(@Self)^.&set := $00000400;
  91706. end;
  91707. procedure TCAN1_C1FIFOINT12.clearTXNFULLIF; inline;
  91708. begin
  91709. pTDefRegMap(@Self)^.clr := $00000400;
  91710. end;
  91711. procedure TCAN1_C1FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  91712. begin
  91713. if thebits = 0 then
  91714. pTDefRegMap(@Self)^.clr := $00000400
  91715. else
  91716. pTDefRegMap(@Self)^.&set := $00000400;
  91717. end;
  91718. function TCAN1_C1FIFOINT12.getTXNFULLIF : TBits_1; inline;
  91719. begin
  91720. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  91721. end;
  91722. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE; inline;
  91723. begin
  91724. pTDefRegMap(@Self)^.&set := $00010000;
  91725. end;
  91726. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIE; inline;
  91727. begin
  91728. pTDefRegMap(@Self)^.clr := $00010000;
  91729. end;
  91730. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  91731. begin
  91732. if thebits = 0 then
  91733. pTDefRegMap(@Self)^.clr := $00010000
  91734. else
  91735. pTDefRegMap(@Self)^.&set := $00010000;
  91736. end;
  91737. function TCAN1_C1FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  91738. begin
  91739. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  91740. end;
  91741. procedure TCAN1_C1FIFOINT12.setRXHALFIE; inline;
  91742. begin
  91743. pTDefRegMap(@Self)^.&set := $00020000;
  91744. end;
  91745. procedure TCAN1_C1FIFOINT12.clearRXHALFIE; inline;
  91746. begin
  91747. pTDefRegMap(@Self)^.clr := $00020000;
  91748. end;
  91749. procedure TCAN1_C1FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  91750. begin
  91751. if thebits = 0 then
  91752. pTDefRegMap(@Self)^.clr := $00020000
  91753. else
  91754. pTDefRegMap(@Self)^.&set := $00020000;
  91755. end;
  91756. function TCAN1_C1FIFOINT12.getRXHALFIE : TBits_1; inline;
  91757. begin
  91758. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  91759. end;
  91760. procedure TCAN1_C1FIFOINT12.setRXFULLIE; inline;
  91761. begin
  91762. pTDefRegMap(@Self)^.&set := $00040000;
  91763. end;
  91764. procedure TCAN1_C1FIFOINT12.clearRXFULLIE; inline;
  91765. begin
  91766. pTDefRegMap(@Self)^.clr := $00040000;
  91767. end;
  91768. procedure TCAN1_C1FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  91769. begin
  91770. if thebits = 0 then
  91771. pTDefRegMap(@Self)^.clr := $00040000
  91772. else
  91773. pTDefRegMap(@Self)^.&set := $00040000;
  91774. end;
  91775. function TCAN1_C1FIFOINT12.getRXFULLIE : TBits_1; inline;
  91776. begin
  91777. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  91778. end;
  91779. procedure TCAN1_C1FIFOINT12.setRXOVFLIE; inline;
  91780. begin
  91781. pTDefRegMap(@Self)^.&set := $00080000;
  91782. end;
  91783. procedure TCAN1_C1FIFOINT12.clearRXOVFLIE; inline;
  91784. begin
  91785. pTDefRegMap(@Self)^.clr := $00080000;
  91786. end;
  91787. procedure TCAN1_C1FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  91788. begin
  91789. if thebits = 0 then
  91790. pTDefRegMap(@Self)^.clr := $00080000
  91791. else
  91792. pTDefRegMap(@Self)^.&set := $00080000;
  91793. end;
  91794. function TCAN1_C1FIFOINT12.getRXOVFLIE : TBits_1; inline;
  91795. begin
  91796. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  91797. end;
  91798. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE; inline;
  91799. begin
  91800. pTDefRegMap(@Self)^.&set := $01000000;
  91801. end;
  91802. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIE; inline;
  91803. begin
  91804. pTDefRegMap(@Self)^.clr := $01000000;
  91805. end;
  91806. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  91807. begin
  91808. if thebits = 0 then
  91809. pTDefRegMap(@Self)^.clr := $01000000
  91810. else
  91811. pTDefRegMap(@Self)^.&set := $01000000;
  91812. end;
  91813. function TCAN1_C1FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  91814. begin
  91815. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  91816. end;
  91817. procedure TCAN1_C1FIFOINT12.setTXHALFIE; inline;
  91818. begin
  91819. pTDefRegMap(@Self)^.&set := $02000000;
  91820. end;
  91821. procedure TCAN1_C1FIFOINT12.clearTXHALFIE; inline;
  91822. begin
  91823. pTDefRegMap(@Self)^.clr := $02000000;
  91824. end;
  91825. procedure TCAN1_C1FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  91826. begin
  91827. if thebits = 0 then
  91828. pTDefRegMap(@Self)^.clr := $02000000
  91829. else
  91830. pTDefRegMap(@Self)^.&set := $02000000;
  91831. end;
  91832. function TCAN1_C1FIFOINT12.getTXHALFIE : TBits_1; inline;
  91833. begin
  91834. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  91835. end;
  91836. procedure TCAN1_C1FIFOINT12.setTXNFULLIE; inline;
  91837. begin
  91838. pTDefRegMap(@Self)^.&set := $04000000;
  91839. end;
  91840. procedure TCAN1_C1FIFOINT12.clearTXNFULLIE; inline;
  91841. begin
  91842. pTDefRegMap(@Self)^.clr := $04000000;
  91843. end;
  91844. procedure TCAN1_C1FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  91845. begin
  91846. if thebits = 0 then
  91847. pTDefRegMap(@Self)^.clr := $04000000
  91848. else
  91849. pTDefRegMap(@Self)^.&set := $04000000;
  91850. end;
  91851. function TCAN1_C1FIFOINT12.getTXNFULLIE : TBits_1; inline;
  91852. begin
  91853. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  91854. end;
  91855. procedure TCAN1_C1FIFOINT12.setw(thebits : TBits_32); inline;
  91856. begin
  91857. pTDefRegMap(@Self)^.val := thebits;
  91858. end;
  91859. function TCAN1_C1FIFOINT12.getw : TBits_32; inline;
  91860. begin
  91861. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91862. end;
  91863. procedure TCAN1_C1FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  91864. begin
  91865. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  91866. end;
  91867. function TCAN1_C1FIFOCI12.getCFIFOCI : TBits_5; inline;
  91868. begin
  91869. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  91870. end;
  91871. procedure TCAN1_C1FIFOCI12.setw(thebits : TBits_32); inline;
  91872. begin
  91873. pTDefRegMap(@Self)^.val := thebits;
  91874. end;
  91875. function TCAN1_C1FIFOCI12.getw : TBits_32; inline;
  91876. begin
  91877. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91878. end;
  91879. procedure TCAN1_C1FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  91880. begin
  91881. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  91882. end;
  91883. function TCAN1_C1FIFOCON13.getTXPRI : TBits_2; inline;
  91884. begin
  91885. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  91886. end;
  91887. procedure TCAN1_C1FIFOCON13.setRTREN; inline;
  91888. begin
  91889. pTDefRegMap(@Self)^.&set := $00000004;
  91890. end;
  91891. procedure TCAN1_C1FIFOCON13.clearRTREN; inline;
  91892. begin
  91893. pTDefRegMap(@Self)^.clr := $00000004;
  91894. end;
  91895. procedure TCAN1_C1FIFOCON13.setRTREN(thebits : TBits_1); inline;
  91896. begin
  91897. if thebits = 0 then
  91898. pTDefRegMap(@Self)^.clr := $00000004
  91899. else
  91900. pTDefRegMap(@Self)^.&set := $00000004;
  91901. end;
  91902. function TCAN1_C1FIFOCON13.getRTREN : TBits_1; inline;
  91903. begin
  91904. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91905. end;
  91906. procedure TCAN1_C1FIFOCON13.setTXREQ; inline;
  91907. begin
  91908. pTDefRegMap(@Self)^.&set := $00000008;
  91909. end;
  91910. procedure TCAN1_C1FIFOCON13.clearTXREQ; inline;
  91911. begin
  91912. pTDefRegMap(@Self)^.clr := $00000008;
  91913. end;
  91914. procedure TCAN1_C1FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  91915. begin
  91916. if thebits = 0 then
  91917. pTDefRegMap(@Self)^.clr := $00000008
  91918. else
  91919. pTDefRegMap(@Self)^.&set := $00000008;
  91920. end;
  91921. function TCAN1_C1FIFOCON13.getTXREQ : TBits_1; inline;
  91922. begin
  91923. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91924. end;
  91925. procedure TCAN1_C1FIFOCON13.setTXERR; inline;
  91926. begin
  91927. pTDefRegMap(@Self)^.&set := $00000010;
  91928. end;
  91929. procedure TCAN1_C1FIFOCON13.clearTXERR; inline;
  91930. begin
  91931. pTDefRegMap(@Self)^.clr := $00000010;
  91932. end;
  91933. procedure TCAN1_C1FIFOCON13.setTXERR(thebits : TBits_1); inline;
  91934. begin
  91935. if thebits = 0 then
  91936. pTDefRegMap(@Self)^.clr := $00000010
  91937. else
  91938. pTDefRegMap(@Self)^.&set := $00000010;
  91939. end;
  91940. function TCAN1_C1FIFOCON13.getTXERR : TBits_1; inline;
  91941. begin
  91942. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  91943. end;
  91944. procedure TCAN1_C1FIFOCON13.setTXLARB; inline;
  91945. begin
  91946. pTDefRegMap(@Self)^.&set := $00000020;
  91947. end;
  91948. procedure TCAN1_C1FIFOCON13.clearTXLARB; inline;
  91949. begin
  91950. pTDefRegMap(@Self)^.clr := $00000020;
  91951. end;
  91952. procedure TCAN1_C1FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  91953. begin
  91954. if thebits = 0 then
  91955. pTDefRegMap(@Self)^.clr := $00000020
  91956. else
  91957. pTDefRegMap(@Self)^.&set := $00000020;
  91958. end;
  91959. function TCAN1_C1FIFOCON13.getTXLARB : TBits_1; inline;
  91960. begin
  91961. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  91962. end;
  91963. procedure TCAN1_C1FIFOCON13.setTXABAT; inline;
  91964. begin
  91965. pTDefRegMap(@Self)^.&set := $00000040;
  91966. end;
  91967. procedure TCAN1_C1FIFOCON13.clearTXABAT; inline;
  91968. begin
  91969. pTDefRegMap(@Self)^.clr := $00000040;
  91970. end;
  91971. procedure TCAN1_C1FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  91972. begin
  91973. if thebits = 0 then
  91974. pTDefRegMap(@Self)^.clr := $00000040
  91975. else
  91976. pTDefRegMap(@Self)^.&set := $00000040;
  91977. end;
  91978. function TCAN1_C1FIFOCON13.getTXABAT : TBits_1; inline;
  91979. begin
  91980. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  91981. end;
  91982. procedure TCAN1_C1FIFOCON13.setTXEN; inline;
  91983. begin
  91984. pTDefRegMap(@Self)^.&set := $00000080;
  91985. end;
  91986. procedure TCAN1_C1FIFOCON13.clearTXEN; inline;
  91987. begin
  91988. pTDefRegMap(@Self)^.clr := $00000080;
  91989. end;
  91990. procedure TCAN1_C1FIFOCON13.setTXEN(thebits : TBits_1); inline;
  91991. begin
  91992. if thebits = 0 then
  91993. pTDefRegMap(@Self)^.clr := $00000080
  91994. else
  91995. pTDefRegMap(@Self)^.&set := $00000080;
  91996. end;
  91997. function TCAN1_C1FIFOCON13.getTXEN : TBits_1; inline;
  91998. begin
  91999. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  92000. end;
  92001. procedure TCAN1_C1FIFOCON13.setDONLY; inline;
  92002. begin
  92003. pTDefRegMap(@Self)^.&set := $00001000;
  92004. end;
  92005. procedure TCAN1_C1FIFOCON13.clearDONLY; inline;
  92006. begin
  92007. pTDefRegMap(@Self)^.clr := $00001000;
  92008. end;
  92009. procedure TCAN1_C1FIFOCON13.setDONLY(thebits : TBits_1); inline;
  92010. begin
  92011. if thebits = 0 then
  92012. pTDefRegMap(@Self)^.clr := $00001000
  92013. else
  92014. pTDefRegMap(@Self)^.&set := $00001000;
  92015. end;
  92016. function TCAN1_C1FIFOCON13.getDONLY : TBits_1; inline;
  92017. begin
  92018. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  92019. end;
  92020. procedure TCAN1_C1FIFOCON13.setUINC; inline;
  92021. begin
  92022. pTDefRegMap(@Self)^.&set := $00002000;
  92023. end;
  92024. procedure TCAN1_C1FIFOCON13.clearUINC; inline;
  92025. begin
  92026. pTDefRegMap(@Self)^.clr := $00002000;
  92027. end;
  92028. procedure TCAN1_C1FIFOCON13.setUINC(thebits : TBits_1); inline;
  92029. begin
  92030. if thebits = 0 then
  92031. pTDefRegMap(@Self)^.clr := $00002000
  92032. else
  92033. pTDefRegMap(@Self)^.&set := $00002000;
  92034. end;
  92035. function TCAN1_C1FIFOCON13.getUINC : TBits_1; inline;
  92036. begin
  92037. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  92038. end;
  92039. procedure TCAN1_C1FIFOCON13.setFRESET; inline;
  92040. begin
  92041. pTDefRegMap(@Self)^.&set := $00004000;
  92042. end;
  92043. procedure TCAN1_C1FIFOCON13.clearFRESET; inline;
  92044. begin
  92045. pTDefRegMap(@Self)^.clr := $00004000;
  92046. end;
  92047. procedure TCAN1_C1FIFOCON13.setFRESET(thebits : TBits_1); inline;
  92048. begin
  92049. if thebits = 0 then
  92050. pTDefRegMap(@Self)^.clr := $00004000
  92051. else
  92052. pTDefRegMap(@Self)^.&set := $00004000;
  92053. end;
  92054. function TCAN1_C1FIFOCON13.getFRESET : TBits_1; inline;
  92055. begin
  92056. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  92057. end;
  92058. procedure TCAN1_C1FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  92059. begin
  92060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  92061. end;
  92062. function TCAN1_C1FIFOCON13.getFSIZE : TBits_5; inline;
  92063. begin
  92064. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  92065. end;
  92066. procedure TCAN1_C1FIFOCON13.setw(thebits : TBits_32); inline;
  92067. begin
  92068. pTDefRegMap(@Self)^.val := thebits;
  92069. end;
  92070. function TCAN1_C1FIFOCON13.getw : TBits_32; inline;
  92071. begin
  92072. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92073. end;
  92074. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF; inline;
  92075. begin
  92076. pTDefRegMap(@Self)^.&set := $00000001;
  92077. end;
  92078. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIF; inline;
  92079. begin
  92080. pTDefRegMap(@Self)^.clr := $00000001;
  92081. end;
  92082. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  92083. begin
  92084. if thebits = 0 then
  92085. pTDefRegMap(@Self)^.clr := $00000001
  92086. else
  92087. pTDefRegMap(@Self)^.&set := $00000001;
  92088. end;
  92089. function TCAN1_C1FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  92090. begin
  92091. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  92092. end;
  92093. procedure TCAN1_C1FIFOINT13.setRXHALFIF; inline;
  92094. begin
  92095. pTDefRegMap(@Self)^.&set := $00000002;
  92096. end;
  92097. procedure TCAN1_C1FIFOINT13.clearRXHALFIF; inline;
  92098. begin
  92099. pTDefRegMap(@Self)^.clr := $00000002;
  92100. end;
  92101. procedure TCAN1_C1FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  92102. begin
  92103. if thebits = 0 then
  92104. pTDefRegMap(@Self)^.clr := $00000002
  92105. else
  92106. pTDefRegMap(@Self)^.&set := $00000002;
  92107. end;
  92108. function TCAN1_C1FIFOINT13.getRXHALFIF : TBits_1; inline;
  92109. begin
  92110. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  92111. end;
  92112. procedure TCAN1_C1FIFOINT13.setRXFULLIF; inline;
  92113. begin
  92114. pTDefRegMap(@Self)^.&set := $00000004;
  92115. end;
  92116. procedure TCAN1_C1FIFOINT13.clearRXFULLIF; inline;
  92117. begin
  92118. pTDefRegMap(@Self)^.clr := $00000004;
  92119. end;
  92120. procedure TCAN1_C1FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  92121. begin
  92122. if thebits = 0 then
  92123. pTDefRegMap(@Self)^.clr := $00000004
  92124. else
  92125. pTDefRegMap(@Self)^.&set := $00000004;
  92126. end;
  92127. function TCAN1_C1FIFOINT13.getRXFULLIF : TBits_1; inline;
  92128. begin
  92129. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92130. end;
  92131. procedure TCAN1_C1FIFOINT13.setRXOVFLIF; inline;
  92132. begin
  92133. pTDefRegMap(@Self)^.&set := $00000008;
  92134. end;
  92135. procedure TCAN1_C1FIFOINT13.clearRXOVFLIF; inline;
  92136. begin
  92137. pTDefRegMap(@Self)^.clr := $00000008;
  92138. end;
  92139. procedure TCAN1_C1FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  92140. begin
  92141. if thebits = 0 then
  92142. pTDefRegMap(@Self)^.clr := $00000008
  92143. else
  92144. pTDefRegMap(@Self)^.&set := $00000008;
  92145. end;
  92146. function TCAN1_C1FIFOINT13.getRXOVFLIF : TBits_1; inline;
  92147. begin
  92148. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92149. end;
  92150. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF; inline;
  92151. begin
  92152. pTDefRegMap(@Self)^.&set := $00000100;
  92153. end;
  92154. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIF; inline;
  92155. begin
  92156. pTDefRegMap(@Self)^.clr := $00000100;
  92157. end;
  92158. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  92159. begin
  92160. if thebits = 0 then
  92161. pTDefRegMap(@Self)^.clr := $00000100
  92162. else
  92163. pTDefRegMap(@Self)^.&set := $00000100;
  92164. end;
  92165. function TCAN1_C1FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  92166. begin
  92167. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  92168. end;
  92169. procedure TCAN1_C1FIFOINT13.setTXHALFIF; inline;
  92170. begin
  92171. pTDefRegMap(@Self)^.&set := $00000200;
  92172. end;
  92173. procedure TCAN1_C1FIFOINT13.clearTXHALFIF; inline;
  92174. begin
  92175. pTDefRegMap(@Self)^.clr := $00000200;
  92176. end;
  92177. procedure TCAN1_C1FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  92178. begin
  92179. if thebits = 0 then
  92180. pTDefRegMap(@Self)^.clr := $00000200
  92181. else
  92182. pTDefRegMap(@Self)^.&set := $00000200;
  92183. end;
  92184. function TCAN1_C1FIFOINT13.getTXHALFIF : TBits_1; inline;
  92185. begin
  92186. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  92187. end;
  92188. procedure TCAN1_C1FIFOINT13.setTXNFULLIF; inline;
  92189. begin
  92190. pTDefRegMap(@Self)^.&set := $00000400;
  92191. end;
  92192. procedure TCAN1_C1FIFOINT13.clearTXNFULLIF; inline;
  92193. begin
  92194. pTDefRegMap(@Self)^.clr := $00000400;
  92195. end;
  92196. procedure TCAN1_C1FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  92197. begin
  92198. if thebits = 0 then
  92199. pTDefRegMap(@Self)^.clr := $00000400
  92200. else
  92201. pTDefRegMap(@Self)^.&set := $00000400;
  92202. end;
  92203. function TCAN1_C1FIFOINT13.getTXNFULLIF : TBits_1; inline;
  92204. begin
  92205. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  92206. end;
  92207. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE; inline;
  92208. begin
  92209. pTDefRegMap(@Self)^.&set := $00010000;
  92210. end;
  92211. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIE; inline;
  92212. begin
  92213. pTDefRegMap(@Self)^.clr := $00010000;
  92214. end;
  92215. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  92216. begin
  92217. if thebits = 0 then
  92218. pTDefRegMap(@Self)^.clr := $00010000
  92219. else
  92220. pTDefRegMap(@Self)^.&set := $00010000;
  92221. end;
  92222. function TCAN1_C1FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  92223. begin
  92224. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  92225. end;
  92226. procedure TCAN1_C1FIFOINT13.setRXHALFIE; inline;
  92227. begin
  92228. pTDefRegMap(@Self)^.&set := $00020000;
  92229. end;
  92230. procedure TCAN1_C1FIFOINT13.clearRXHALFIE; inline;
  92231. begin
  92232. pTDefRegMap(@Self)^.clr := $00020000;
  92233. end;
  92234. procedure TCAN1_C1FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  92235. begin
  92236. if thebits = 0 then
  92237. pTDefRegMap(@Self)^.clr := $00020000
  92238. else
  92239. pTDefRegMap(@Self)^.&set := $00020000;
  92240. end;
  92241. function TCAN1_C1FIFOINT13.getRXHALFIE : TBits_1; inline;
  92242. begin
  92243. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  92244. end;
  92245. procedure TCAN1_C1FIFOINT13.setRXFULLIE; inline;
  92246. begin
  92247. pTDefRegMap(@Self)^.&set := $00040000;
  92248. end;
  92249. procedure TCAN1_C1FIFOINT13.clearRXFULLIE; inline;
  92250. begin
  92251. pTDefRegMap(@Self)^.clr := $00040000;
  92252. end;
  92253. procedure TCAN1_C1FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  92254. begin
  92255. if thebits = 0 then
  92256. pTDefRegMap(@Self)^.clr := $00040000
  92257. else
  92258. pTDefRegMap(@Self)^.&set := $00040000;
  92259. end;
  92260. function TCAN1_C1FIFOINT13.getRXFULLIE : TBits_1; inline;
  92261. begin
  92262. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  92263. end;
  92264. procedure TCAN1_C1FIFOINT13.setRXOVFLIE; inline;
  92265. begin
  92266. pTDefRegMap(@Self)^.&set := $00080000;
  92267. end;
  92268. procedure TCAN1_C1FIFOINT13.clearRXOVFLIE; inline;
  92269. begin
  92270. pTDefRegMap(@Self)^.clr := $00080000;
  92271. end;
  92272. procedure TCAN1_C1FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  92273. begin
  92274. if thebits = 0 then
  92275. pTDefRegMap(@Self)^.clr := $00080000
  92276. else
  92277. pTDefRegMap(@Self)^.&set := $00080000;
  92278. end;
  92279. function TCAN1_C1FIFOINT13.getRXOVFLIE : TBits_1; inline;
  92280. begin
  92281. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  92282. end;
  92283. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE; inline;
  92284. begin
  92285. pTDefRegMap(@Self)^.&set := $01000000;
  92286. end;
  92287. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIE; inline;
  92288. begin
  92289. pTDefRegMap(@Self)^.clr := $01000000;
  92290. end;
  92291. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  92292. begin
  92293. if thebits = 0 then
  92294. pTDefRegMap(@Self)^.clr := $01000000
  92295. else
  92296. pTDefRegMap(@Self)^.&set := $01000000;
  92297. end;
  92298. function TCAN1_C1FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  92299. begin
  92300. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  92301. end;
  92302. procedure TCAN1_C1FIFOINT13.setTXHALFIE; inline;
  92303. begin
  92304. pTDefRegMap(@Self)^.&set := $02000000;
  92305. end;
  92306. procedure TCAN1_C1FIFOINT13.clearTXHALFIE; inline;
  92307. begin
  92308. pTDefRegMap(@Self)^.clr := $02000000;
  92309. end;
  92310. procedure TCAN1_C1FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  92311. begin
  92312. if thebits = 0 then
  92313. pTDefRegMap(@Self)^.clr := $02000000
  92314. else
  92315. pTDefRegMap(@Self)^.&set := $02000000;
  92316. end;
  92317. function TCAN1_C1FIFOINT13.getTXHALFIE : TBits_1; inline;
  92318. begin
  92319. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  92320. end;
  92321. procedure TCAN1_C1FIFOINT13.setTXNFULLIE; inline;
  92322. begin
  92323. pTDefRegMap(@Self)^.&set := $04000000;
  92324. end;
  92325. procedure TCAN1_C1FIFOINT13.clearTXNFULLIE; inline;
  92326. begin
  92327. pTDefRegMap(@Self)^.clr := $04000000;
  92328. end;
  92329. procedure TCAN1_C1FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  92330. begin
  92331. if thebits = 0 then
  92332. pTDefRegMap(@Self)^.clr := $04000000
  92333. else
  92334. pTDefRegMap(@Self)^.&set := $04000000;
  92335. end;
  92336. function TCAN1_C1FIFOINT13.getTXNFULLIE : TBits_1; inline;
  92337. begin
  92338. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  92339. end;
  92340. procedure TCAN1_C1FIFOINT13.setw(thebits : TBits_32); inline;
  92341. begin
  92342. pTDefRegMap(@Self)^.val := thebits;
  92343. end;
  92344. function TCAN1_C1FIFOINT13.getw : TBits_32; inline;
  92345. begin
  92346. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92347. end;
  92348. procedure TCAN1_C1FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  92349. begin
  92350. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  92351. end;
  92352. function TCAN1_C1FIFOCI13.getCFIFOCI : TBits_5; inline;
  92353. begin
  92354. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  92355. end;
  92356. procedure TCAN1_C1FIFOCI13.setw(thebits : TBits_32); inline;
  92357. begin
  92358. pTDefRegMap(@Self)^.val := thebits;
  92359. end;
  92360. function TCAN1_C1FIFOCI13.getw : TBits_32; inline;
  92361. begin
  92362. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92363. end;
  92364. procedure TCAN1_C1FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  92365. begin
  92366. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  92367. end;
  92368. function TCAN1_C1FIFOCON14.getTXPRI : TBits_2; inline;
  92369. begin
  92370. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  92371. end;
  92372. procedure TCAN1_C1FIFOCON14.setRTREN; inline;
  92373. begin
  92374. pTDefRegMap(@Self)^.&set := $00000004;
  92375. end;
  92376. procedure TCAN1_C1FIFOCON14.clearRTREN; inline;
  92377. begin
  92378. pTDefRegMap(@Self)^.clr := $00000004;
  92379. end;
  92380. procedure TCAN1_C1FIFOCON14.setRTREN(thebits : TBits_1); inline;
  92381. begin
  92382. if thebits = 0 then
  92383. pTDefRegMap(@Self)^.clr := $00000004
  92384. else
  92385. pTDefRegMap(@Self)^.&set := $00000004;
  92386. end;
  92387. function TCAN1_C1FIFOCON14.getRTREN : TBits_1; inline;
  92388. begin
  92389. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92390. end;
  92391. procedure TCAN1_C1FIFOCON14.setTXREQ; inline;
  92392. begin
  92393. pTDefRegMap(@Self)^.&set := $00000008;
  92394. end;
  92395. procedure TCAN1_C1FIFOCON14.clearTXREQ; inline;
  92396. begin
  92397. pTDefRegMap(@Self)^.clr := $00000008;
  92398. end;
  92399. procedure TCAN1_C1FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  92400. begin
  92401. if thebits = 0 then
  92402. pTDefRegMap(@Self)^.clr := $00000008
  92403. else
  92404. pTDefRegMap(@Self)^.&set := $00000008;
  92405. end;
  92406. function TCAN1_C1FIFOCON14.getTXREQ : TBits_1; inline;
  92407. begin
  92408. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92409. end;
  92410. procedure TCAN1_C1FIFOCON14.setTXERR; inline;
  92411. begin
  92412. pTDefRegMap(@Self)^.&set := $00000010;
  92413. end;
  92414. procedure TCAN1_C1FIFOCON14.clearTXERR; inline;
  92415. begin
  92416. pTDefRegMap(@Self)^.clr := $00000010;
  92417. end;
  92418. procedure TCAN1_C1FIFOCON14.setTXERR(thebits : TBits_1); inline;
  92419. begin
  92420. if thebits = 0 then
  92421. pTDefRegMap(@Self)^.clr := $00000010
  92422. else
  92423. pTDefRegMap(@Self)^.&set := $00000010;
  92424. end;
  92425. function TCAN1_C1FIFOCON14.getTXERR : TBits_1; inline;
  92426. begin
  92427. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  92428. end;
  92429. procedure TCAN1_C1FIFOCON14.setTXLARB; inline;
  92430. begin
  92431. pTDefRegMap(@Self)^.&set := $00000020;
  92432. end;
  92433. procedure TCAN1_C1FIFOCON14.clearTXLARB; inline;
  92434. begin
  92435. pTDefRegMap(@Self)^.clr := $00000020;
  92436. end;
  92437. procedure TCAN1_C1FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  92438. begin
  92439. if thebits = 0 then
  92440. pTDefRegMap(@Self)^.clr := $00000020
  92441. else
  92442. pTDefRegMap(@Self)^.&set := $00000020;
  92443. end;
  92444. function TCAN1_C1FIFOCON14.getTXLARB : TBits_1; inline;
  92445. begin
  92446. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  92447. end;
  92448. procedure TCAN1_C1FIFOCON14.setTXABAT; inline;
  92449. begin
  92450. pTDefRegMap(@Self)^.&set := $00000040;
  92451. end;
  92452. procedure TCAN1_C1FIFOCON14.clearTXABAT; inline;
  92453. begin
  92454. pTDefRegMap(@Self)^.clr := $00000040;
  92455. end;
  92456. procedure TCAN1_C1FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  92457. begin
  92458. if thebits = 0 then
  92459. pTDefRegMap(@Self)^.clr := $00000040
  92460. else
  92461. pTDefRegMap(@Self)^.&set := $00000040;
  92462. end;
  92463. function TCAN1_C1FIFOCON14.getTXABAT : TBits_1; inline;
  92464. begin
  92465. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  92466. end;
  92467. procedure TCAN1_C1FIFOCON14.setTXEN; inline;
  92468. begin
  92469. pTDefRegMap(@Self)^.&set := $00000080;
  92470. end;
  92471. procedure TCAN1_C1FIFOCON14.clearTXEN; inline;
  92472. begin
  92473. pTDefRegMap(@Self)^.clr := $00000080;
  92474. end;
  92475. procedure TCAN1_C1FIFOCON14.setTXEN(thebits : TBits_1); inline;
  92476. begin
  92477. if thebits = 0 then
  92478. pTDefRegMap(@Self)^.clr := $00000080
  92479. else
  92480. pTDefRegMap(@Self)^.&set := $00000080;
  92481. end;
  92482. function TCAN1_C1FIFOCON14.getTXEN : TBits_1; inline;
  92483. begin
  92484. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  92485. end;
  92486. procedure TCAN1_C1FIFOCON14.setDONLY; inline;
  92487. begin
  92488. pTDefRegMap(@Self)^.&set := $00001000;
  92489. end;
  92490. procedure TCAN1_C1FIFOCON14.clearDONLY; inline;
  92491. begin
  92492. pTDefRegMap(@Self)^.clr := $00001000;
  92493. end;
  92494. procedure TCAN1_C1FIFOCON14.setDONLY(thebits : TBits_1); inline;
  92495. begin
  92496. if thebits = 0 then
  92497. pTDefRegMap(@Self)^.clr := $00001000
  92498. else
  92499. pTDefRegMap(@Self)^.&set := $00001000;
  92500. end;
  92501. function TCAN1_C1FIFOCON14.getDONLY : TBits_1; inline;
  92502. begin
  92503. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  92504. end;
  92505. procedure TCAN1_C1FIFOCON14.setUINC; inline;
  92506. begin
  92507. pTDefRegMap(@Self)^.&set := $00002000;
  92508. end;
  92509. procedure TCAN1_C1FIFOCON14.clearUINC; inline;
  92510. begin
  92511. pTDefRegMap(@Self)^.clr := $00002000;
  92512. end;
  92513. procedure TCAN1_C1FIFOCON14.setUINC(thebits : TBits_1); inline;
  92514. begin
  92515. if thebits = 0 then
  92516. pTDefRegMap(@Self)^.clr := $00002000
  92517. else
  92518. pTDefRegMap(@Self)^.&set := $00002000;
  92519. end;
  92520. function TCAN1_C1FIFOCON14.getUINC : TBits_1; inline;
  92521. begin
  92522. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  92523. end;
  92524. procedure TCAN1_C1FIFOCON14.setFRESET; inline;
  92525. begin
  92526. pTDefRegMap(@Self)^.&set := $00004000;
  92527. end;
  92528. procedure TCAN1_C1FIFOCON14.clearFRESET; inline;
  92529. begin
  92530. pTDefRegMap(@Self)^.clr := $00004000;
  92531. end;
  92532. procedure TCAN1_C1FIFOCON14.setFRESET(thebits : TBits_1); inline;
  92533. begin
  92534. if thebits = 0 then
  92535. pTDefRegMap(@Self)^.clr := $00004000
  92536. else
  92537. pTDefRegMap(@Self)^.&set := $00004000;
  92538. end;
  92539. function TCAN1_C1FIFOCON14.getFRESET : TBits_1; inline;
  92540. begin
  92541. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  92542. end;
  92543. procedure TCAN1_C1FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  92544. begin
  92545. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  92546. end;
  92547. function TCAN1_C1FIFOCON14.getFSIZE : TBits_5; inline;
  92548. begin
  92549. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  92550. end;
  92551. procedure TCAN1_C1FIFOCON14.setw(thebits : TBits_32); inline;
  92552. begin
  92553. pTDefRegMap(@Self)^.val := thebits;
  92554. end;
  92555. function TCAN1_C1FIFOCON14.getw : TBits_32; inline;
  92556. begin
  92557. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92558. end;
  92559. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF; inline;
  92560. begin
  92561. pTDefRegMap(@Self)^.&set := $00000001;
  92562. end;
  92563. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIF; inline;
  92564. begin
  92565. pTDefRegMap(@Self)^.clr := $00000001;
  92566. end;
  92567. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  92568. begin
  92569. if thebits = 0 then
  92570. pTDefRegMap(@Self)^.clr := $00000001
  92571. else
  92572. pTDefRegMap(@Self)^.&set := $00000001;
  92573. end;
  92574. function TCAN1_C1FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  92575. begin
  92576. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  92577. end;
  92578. procedure TCAN1_C1FIFOINT14.setRXHALFIF; inline;
  92579. begin
  92580. pTDefRegMap(@Self)^.&set := $00000002;
  92581. end;
  92582. procedure TCAN1_C1FIFOINT14.clearRXHALFIF; inline;
  92583. begin
  92584. pTDefRegMap(@Self)^.clr := $00000002;
  92585. end;
  92586. procedure TCAN1_C1FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  92587. begin
  92588. if thebits = 0 then
  92589. pTDefRegMap(@Self)^.clr := $00000002
  92590. else
  92591. pTDefRegMap(@Self)^.&set := $00000002;
  92592. end;
  92593. function TCAN1_C1FIFOINT14.getRXHALFIF : TBits_1; inline;
  92594. begin
  92595. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  92596. end;
  92597. procedure TCAN1_C1FIFOINT14.setRXFULLIF; inline;
  92598. begin
  92599. pTDefRegMap(@Self)^.&set := $00000004;
  92600. end;
  92601. procedure TCAN1_C1FIFOINT14.clearRXFULLIF; inline;
  92602. begin
  92603. pTDefRegMap(@Self)^.clr := $00000004;
  92604. end;
  92605. procedure TCAN1_C1FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  92606. begin
  92607. if thebits = 0 then
  92608. pTDefRegMap(@Self)^.clr := $00000004
  92609. else
  92610. pTDefRegMap(@Self)^.&set := $00000004;
  92611. end;
  92612. function TCAN1_C1FIFOINT14.getRXFULLIF : TBits_1; inline;
  92613. begin
  92614. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92615. end;
  92616. procedure TCAN1_C1FIFOINT14.setRXOVFLIF; inline;
  92617. begin
  92618. pTDefRegMap(@Self)^.&set := $00000008;
  92619. end;
  92620. procedure TCAN1_C1FIFOINT14.clearRXOVFLIF; inline;
  92621. begin
  92622. pTDefRegMap(@Self)^.clr := $00000008;
  92623. end;
  92624. procedure TCAN1_C1FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  92625. begin
  92626. if thebits = 0 then
  92627. pTDefRegMap(@Self)^.clr := $00000008
  92628. else
  92629. pTDefRegMap(@Self)^.&set := $00000008;
  92630. end;
  92631. function TCAN1_C1FIFOINT14.getRXOVFLIF : TBits_1; inline;
  92632. begin
  92633. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92634. end;
  92635. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF; inline;
  92636. begin
  92637. pTDefRegMap(@Self)^.&set := $00000100;
  92638. end;
  92639. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIF; inline;
  92640. begin
  92641. pTDefRegMap(@Self)^.clr := $00000100;
  92642. end;
  92643. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  92644. begin
  92645. if thebits = 0 then
  92646. pTDefRegMap(@Self)^.clr := $00000100
  92647. else
  92648. pTDefRegMap(@Self)^.&set := $00000100;
  92649. end;
  92650. function TCAN1_C1FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  92651. begin
  92652. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  92653. end;
  92654. procedure TCAN1_C1FIFOINT14.setTXHALFIF; inline;
  92655. begin
  92656. pTDefRegMap(@Self)^.&set := $00000200;
  92657. end;
  92658. procedure TCAN1_C1FIFOINT14.clearTXHALFIF; inline;
  92659. begin
  92660. pTDefRegMap(@Self)^.clr := $00000200;
  92661. end;
  92662. procedure TCAN1_C1FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  92663. begin
  92664. if thebits = 0 then
  92665. pTDefRegMap(@Self)^.clr := $00000200
  92666. else
  92667. pTDefRegMap(@Self)^.&set := $00000200;
  92668. end;
  92669. function TCAN1_C1FIFOINT14.getTXHALFIF : TBits_1; inline;
  92670. begin
  92671. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  92672. end;
  92673. procedure TCAN1_C1FIFOINT14.setTXNFULLIF; inline;
  92674. begin
  92675. pTDefRegMap(@Self)^.&set := $00000400;
  92676. end;
  92677. procedure TCAN1_C1FIFOINT14.clearTXNFULLIF; inline;
  92678. begin
  92679. pTDefRegMap(@Self)^.clr := $00000400;
  92680. end;
  92681. procedure TCAN1_C1FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  92682. begin
  92683. if thebits = 0 then
  92684. pTDefRegMap(@Self)^.clr := $00000400
  92685. else
  92686. pTDefRegMap(@Self)^.&set := $00000400;
  92687. end;
  92688. function TCAN1_C1FIFOINT14.getTXNFULLIF : TBits_1; inline;
  92689. begin
  92690. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  92691. end;
  92692. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE; inline;
  92693. begin
  92694. pTDefRegMap(@Self)^.&set := $00010000;
  92695. end;
  92696. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIE; inline;
  92697. begin
  92698. pTDefRegMap(@Self)^.clr := $00010000;
  92699. end;
  92700. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  92701. begin
  92702. if thebits = 0 then
  92703. pTDefRegMap(@Self)^.clr := $00010000
  92704. else
  92705. pTDefRegMap(@Self)^.&set := $00010000;
  92706. end;
  92707. function TCAN1_C1FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  92708. begin
  92709. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  92710. end;
  92711. procedure TCAN1_C1FIFOINT14.setRXHALFIE; inline;
  92712. begin
  92713. pTDefRegMap(@Self)^.&set := $00020000;
  92714. end;
  92715. procedure TCAN1_C1FIFOINT14.clearRXHALFIE; inline;
  92716. begin
  92717. pTDefRegMap(@Self)^.clr := $00020000;
  92718. end;
  92719. procedure TCAN1_C1FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  92720. begin
  92721. if thebits = 0 then
  92722. pTDefRegMap(@Self)^.clr := $00020000
  92723. else
  92724. pTDefRegMap(@Self)^.&set := $00020000;
  92725. end;
  92726. function TCAN1_C1FIFOINT14.getRXHALFIE : TBits_1; inline;
  92727. begin
  92728. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  92729. end;
  92730. procedure TCAN1_C1FIFOINT14.setRXFULLIE; inline;
  92731. begin
  92732. pTDefRegMap(@Self)^.&set := $00040000;
  92733. end;
  92734. procedure TCAN1_C1FIFOINT14.clearRXFULLIE; inline;
  92735. begin
  92736. pTDefRegMap(@Self)^.clr := $00040000;
  92737. end;
  92738. procedure TCAN1_C1FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  92739. begin
  92740. if thebits = 0 then
  92741. pTDefRegMap(@Self)^.clr := $00040000
  92742. else
  92743. pTDefRegMap(@Self)^.&set := $00040000;
  92744. end;
  92745. function TCAN1_C1FIFOINT14.getRXFULLIE : TBits_1; inline;
  92746. begin
  92747. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  92748. end;
  92749. procedure TCAN1_C1FIFOINT14.setRXOVFLIE; inline;
  92750. begin
  92751. pTDefRegMap(@Self)^.&set := $00080000;
  92752. end;
  92753. procedure TCAN1_C1FIFOINT14.clearRXOVFLIE; inline;
  92754. begin
  92755. pTDefRegMap(@Self)^.clr := $00080000;
  92756. end;
  92757. procedure TCAN1_C1FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  92758. begin
  92759. if thebits = 0 then
  92760. pTDefRegMap(@Self)^.clr := $00080000
  92761. else
  92762. pTDefRegMap(@Self)^.&set := $00080000;
  92763. end;
  92764. function TCAN1_C1FIFOINT14.getRXOVFLIE : TBits_1; inline;
  92765. begin
  92766. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  92767. end;
  92768. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE; inline;
  92769. begin
  92770. pTDefRegMap(@Self)^.&set := $01000000;
  92771. end;
  92772. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIE; inline;
  92773. begin
  92774. pTDefRegMap(@Self)^.clr := $01000000;
  92775. end;
  92776. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  92777. begin
  92778. if thebits = 0 then
  92779. pTDefRegMap(@Self)^.clr := $01000000
  92780. else
  92781. pTDefRegMap(@Self)^.&set := $01000000;
  92782. end;
  92783. function TCAN1_C1FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  92784. begin
  92785. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  92786. end;
  92787. procedure TCAN1_C1FIFOINT14.setTXHALFIE; inline;
  92788. begin
  92789. pTDefRegMap(@Self)^.&set := $02000000;
  92790. end;
  92791. procedure TCAN1_C1FIFOINT14.clearTXHALFIE; inline;
  92792. begin
  92793. pTDefRegMap(@Self)^.clr := $02000000;
  92794. end;
  92795. procedure TCAN1_C1FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  92796. begin
  92797. if thebits = 0 then
  92798. pTDefRegMap(@Self)^.clr := $02000000
  92799. else
  92800. pTDefRegMap(@Self)^.&set := $02000000;
  92801. end;
  92802. function TCAN1_C1FIFOINT14.getTXHALFIE : TBits_1; inline;
  92803. begin
  92804. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  92805. end;
  92806. procedure TCAN1_C1FIFOINT14.setTXNFULLIE; inline;
  92807. begin
  92808. pTDefRegMap(@Self)^.&set := $04000000;
  92809. end;
  92810. procedure TCAN1_C1FIFOINT14.clearTXNFULLIE; inline;
  92811. begin
  92812. pTDefRegMap(@Self)^.clr := $04000000;
  92813. end;
  92814. procedure TCAN1_C1FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  92815. begin
  92816. if thebits = 0 then
  92817. pTDefRegMap(@Self)^.clr := $04000000
  92818. else
  92819. pTDefRegMap(@Self)^.&set := $04000000;
  92820. end;
  92821. function TCAN1_C1FIFOINT14.getTXNFULLIE : TBits_1; inline;
  92822. begin
  92823. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  92824. end;
  92825. procedure TCAN1_C1FIFOINT14.setw(thebits : TBits_32); inline;
  92826. begin
  92827. pTDefRegMap(@Self)^.val := thebits;
  92828. end;
  92829. function TCAN1_C1FIFOINT14.getw : TBits_32; inline;
  92830. begin
  92831. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92832. end;
  92833. procedure TCAN1_C1FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  92834. begin
  92835. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  92836. end;
  92837. function TCAN1_C1FIFOCI14.getCFIFOCI : TBits_5; inline;
  92838. begin
  92839. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  92840. end;
  92841. procedure TCAN1_C1FIFOCI14.setw(thebits : TBits_32); inline;
  92842. begin
  92843. pTDefRegMap(@Self)^.val := thebits;
  92844. end;
  92845. function TCAN1_C1FIFOCI14.getw : TBits_32; inline;
  92846. begin
  92847. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92848. end;
  92849. procedure TCAN1_C1FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  92850. begin
  92851. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  92852. end;
  92853. function TCAN1_C1FIFOCON15.getTXPRI : TBits_2; inline;
  92854. begin
  92855. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  92856. end;
  92857. procedure TCAN1_C1FIFOCON15.setRTREN; inline;
  92858. begin
  92859. pTDefRegMap(@Self)^.&set := $00000004;
  92860. end;
  92861. procedure TCAN1_C1FIFOCON15.clearRTREN; inline;
  92862. begin
  92863. pTDefRegMap(@Self)^.clr := $00000004;
  92864. end;
  92865. procedure TCAN1_C1FIFOCON15.setRTREN(thebits : TBits_1); inline;
  92866. begin
  92867. if thebits = 0 then
  92868. pTDefRegMap(@Self)^.clr := $00000004
  92869. else
  92870. pTDefRegMap(@Self)^.&set := $00000004;
  92871. end;
  92872. function TCAN1_C1FIFOCON15.getRTREN : TBits_1; inline;
  92873. begin
  92874. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92875. end;
  92876. procedure TCAN1_C1FIFOCON15.setTXREQ; inline;
  92877. begin
  92878. pTDefRegMap(@Self)^.&set := $00000008;
  92879. end;
  92880. procedure TCAN1_C1FIFOCON15.clearTXREQ; inline;
  92881. begin
  92882. pTDefRegMap(@Self)^.clr := $00000008;
  92883. end;
  92884. procedure TCAN1_C1FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  92885. begin
  92886. if thebits = 0 then
  92887. pTDefRegMap(@Self)^.clr := $00000008
  92888. else
  92889. pTDefRegMap(@Self)^.&set := $00000008;
  92890. end;
  92891. function TCAN1_C1FIFOCON15.getTXREQ : TBits_1; inline;
  92892. begin
  92893. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92894. end;
  92895. procedure TCAN1_C1FIFOCON15.setTXERR; inline;
  92896. begin
  92897. pTDefRegMap(@Self)^.&set := $00000010;
  92898. end;
  92899. procedure TCAN1_C1FIFOCON15.clearTXERR; inline;
  92900. begin
  92901. pTDefRegMap(@Self)^.clr := $00000010;
  92902. end;
  92903. procedure TCAN1_C1FIFOCON15.setTXERR(thebits : TBits_1); inline;
  92904. begin
  92905. if thebits = 0 then
  92906. pTDefRegMap(@Self)^.clr := $00000010
  92907. else
  92908. pTDefRegMap(@Self)^.&set := $00000010;
  92909. end;
  92910. function TCAN1_C1FIFOCON15.getTXERR : TBits_1; inline;
  92911. begin
  92912. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  92913. end;
  92914. procedure TCAN1_C1FIFOCON15.setTXLARB; inline;
  92915. begin
  92916. pTDefRegMap(@Self)^.&set := $00000020;
  92917. end;
  92918. procedure TCAN1_C1FIFOCON15.clearTXLARB; inline;
  92919. begin
  92920. pTDefRegMap(@Self)^.clr := $00000020;
  92921. end;
  92922. procedure TCAN1_C1FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  92923. begin
  92924. if thebits = 0 then
  92925. pTDefRegMap(@Self)^.clr := $00000020
  92926. else
  92927. pTDefRegMap(@Self)^.&set := $00000020;
  92928. end;
  92929. function TCAN1_C1FIFOCON15.getTXLARB : TBits_1; inline;
  92930. begin
  92931. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  92932. end;
  92933. procedure TCAN1_C1FIFOCON15.setTXABAT; inline;
  92934. begin
  92935. pTDefRegMap(@Self)^.&set := $00000040;
  92936. end;
  92937. procedure TCAN1_C1FIFOCON15.clearTXABAT; inline;
  92938. begin
  92939. pTDefRegMap(@Self)^.clr := $00000040;
  92940. end;
  92941. procedure TCAN1_C1FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  92942. begin
  92943. if thebits = 0 then
  92944. pTDefRegMap(@Self)^.clr := $00000040
  92945. else
  92946. pTDefRegMap(@Self)^.&set := $00000040;
  92947. end;
  92948. function TCAN1_C1FIFOCON15.getTXABAT : TBits_1; inline;
  92949. begin
  92950. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  92951. end;
  92952. procedure TCAN1_C1FIFOCON15.setTXEN; inline;
  92953. begin
  92954. pTDefRegMap(@Self)^.&set := $00000080;
  92955. end;
  92956. procedure TCAN1_C1FIFOCON15.clearTXEN; inline;
  92957. begin
  92958. pTDefRegMap(@Self)^.clr := $00000080;
  92959. end;
  92960. procedure TCAN1_C1FIFOCON15.setTXEN(thebits : TBits_1); inline;
  92961. begin
  92962. if thebits = 0 then
  92963. pTDefRegMap(@Self)^.clr := $00000080
  92964. else
  92965. pTDefRegMap(@Self)^.&set := $00000080;
  92966. end;
  92967. function TCAN1_C1FIFOCON15.getTXEN : TBits_1; inline;
  92968. begin
  92969. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  92970. end;
  92971. procedure TCAN1_C1FIFOCON15.setDONLY; inline;
  92972. begin
  92973. pTDefRegMap(@Self)^.&set := $00001000;
  92974. end;
  92975. procedure TCAN1_C1FIFOCON15.clearDONLY; inline;
  92976. begin
  92977. pTDefRegMap(@Self)^.clr := $00001000;
  92978. end;
  92979. procedure TCAN1_C1FIFOCON15.setDONLY(thebits : TBits_1); inline;
  92980. begin
  92981. if thebits = 0 then
  92982. pTDefRegMap(@Self)^.clr := $00001000
  92983. else
  92984. pTDefRegMap(@Self)^.&set := $00001000;
  92985. end;
  92986. function TCAN1_C1FIFOCON15.getDONLY : TBits_1; inline;
  92987. begin
  92988. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  92989. end;
  92990. procedure TCAN1_C1FIFOCON15.setUINC; inline;
  92991. begin
  92992. pTDefRegMap(@Self)^.&set := $00002000;
  92993. end;
  92994. procedure TCAN1_C1FIFOCON15.clearUINC; inline;
  92995. begin
  92996. pTDefRegMap(@Self)^.clr := $00002000;
  92997. end;
  92998. procedure TCAN1_C1FIFOCON15.setUINC(thebits : TBits_1); inline;
  92999. begin
  93000. if thebits = 0 then
  93001. pTDefRegMap(@Self)^.clr := $00002000
  93002. else
  93003. pTDefRegMap(@Self)^.&set := $00002000;
  93004. end;
  93005. function TCAN1_C1FIFOCON15.getUINC : TBits_1; inline;
  93006. begin
  93007. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  93008. end;
  93009. procedure TCAN1_C1FIFOCON15.setFRESET; inline;
  93010. begin
  93011. pTDefRegMap(@Self)^.&set := $00004000;
  93012. end;
  93013. procedure TCAN1_C1FIFOCON15.clearFRESET; inline;
  93014. begin
  93015. pTDefRegMap(@Self)^.clr := $00004000;
  93016. end;
  93017. procedure TCAN1_C1FIFOCON15.setFRESET(thebits : TBits_1); inline;
  93018. begin
  93019. if thebits = 0 then
  93020. pTDefRegMap(@Self)^.clr := $00004000
  93021. else
  93022. pTDefRegMap(@Self)^.&set := $00004000;
  93023. end;
  93024. function TCAN1_C1FIFOCON15.getFRESET : TBits_1; inline;
  93025. begin
  93026. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  93027. end;
  93028. procedure TCAN1_C1FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  93029. begin
  93030. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  93031. end;
  93032. function TCAN1_C1FIFOCON15.getFSIZE : TBits_5; inline;
  93033. begin
  93034. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  93035. end;
  93036. procedure TCAN1_C1FIFOCON15.setw(thebits : TBits_32); inline;
  93037. begin
  93038. pTDefRegMap(@Self)^.val := thebits;
  93039. end;
  93040. function TCAN1_C1FIFOCON15.getw : TBits_32; inline;
  93041. begin
  93042. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93043. end;
  93044. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF; inline;
  93045. begin
  93046. pTDefRegMap(@Self)^.&set := $00000001;
  93047. end;
  93048. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIF; inline;
  93049. begin
  93050. pTDefRegMap(@Self)^.clr := $00000001;
  93051. end;
  93052. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  93053. begin
  93054. if thebits = 0 then
  93055. pTDefRegMap(@Self)^.clr := $00000001
  93056. else
  93057. pTDefRegMap(@Self)^.&set := $00000001;
  93058. end;
  93059. function TCAN1_C1FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  93060. begin
  93061. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  93062. end;
  93063. procedure TCAN1_C1FIFOINT15.setRXHALFIF; inline;
  93064. begin
  93065. pTDefRegMap(@Self)^.&set := $00000002;
  93066. end;
  93067. procedure TCAN1_C1FIFOINT15.clearRXHALFIF; inline;
  93068. begin
  93069. pTDefRegMap(@Self)^.clr := $00000002;
  93070. end;
  93071. procedure TCAN1_C1FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  93072. begin
  93073. if thebits = 0 then
  93074. pTDefRegMap(@Self)^.clr := $00000002
  93075. else
  93076. pTDefRegMap(@Self)^.&set := $00000002;
  93077. end;
  93078. function TCAN1_C1FIFOINT15.getRXHALFIF : TBits_1; inline;
  93079. begin
  93080. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  93081. end;
  93082. procedure TCAN1_C1FIFOINT15.setRXFULLIF; inline;
  93083. begin
  93084. pTDefRegMap(@Self)^.&set := $00000004;
  93085. end;
  93086. procedure TCAN1_C1FIFOINT15.clearRXFULLIF; inline;
  93087. begin
  93088. pTDefRegMap(@Self)^.clr := $00000004;
  93089. end;
  93090. procedure TCAN1_C1FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  93091. begin
  93092. if thebits = 0 then
  93093. pTDefRegMap(@Self)^.clr := $00000004
  93094. else
  93095. pTDefRegMap(@Self)^.&set := $00000004;
  93096. end;
  93097. function TCAN1_C1FIFOINT15.getRXFULLIF : TBits_1; inline;
  93098. begin
  93099. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93100. end;
  93101. procedure TCAN1_C1FIFOINT15.setRXOVFLIF; inline;
  93102. begin
  93103. pTDefRegMap(@Self)^.&set := $00000008;
  93104. end;
  93105. procedure TCAN1_C1FIFOINT15.clearRXOVFLIF; inline;
  93106. begin
  93107. pTDefRegMap(@Self)^.clr := $00000008;
  93108. end;
  93109. procedure TCAN1_C1FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  93110. begin
  93111. if thebits = 0 then
  93112. pTDefRegMap(@Self)^.clr := $00000008
  93113. else
  93114. pTDefRegMap(@Self)^.&set := $00000008;
  93115. end;
  93116. function TCAN1_C1FIFOINT15.getRXOVFLIF : TBits_1; inline;
  93117. begin
  93118. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93119. end;
  93120. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF; inline;
  93121. begin
  93122. pTDefRegMap(@Self)^.&set := $00000100;
  93123. end;
  93124. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIF; inline;
  93125. begin
  93126. pTDefRegMap(@Self)^.clr := $00000100;
  93127. end;
  93128. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  93129. begin
  93130. if thebits = 0 then
  93131. pTDefRegMap(@Self)^.clr := $00000100
  93132. else
  93133. pTDefRegMap(@Self)^.&set := $00000100;
  93134. end;
  93135. function TCAN1_C1FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  93136. begin
  93137. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  93138. end;
  93139. procedure TCAN1_C1FIFOINT15.setTXHALFIF; inline;
  93140. begin
  93141. pTDefRegMap(@Self)^.&set := $00000200;
  93142. end;
  93143. procedure TCAN1_C1FIFOINT15.clearTXHALFIF; inline;
  93144. begin
  93145. pTDefRegMap(@Self)^.clr := $00000200;
  93146. end;
  93147. procedure TCAN1_C1FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  93148. begin
  93149. if thebits = 0 then
  93150. pTDefRegMap(@Self)^.clr := $00000200
  93151. else
  93152. pTDefRegMap(@Self)^.&set := $00000200;
  93153. end;
  93154. function TCAN1_C1FIFOINT15.getTXHALFIF : TBits_1; inline;
  93155. begin
  93156. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  93157. end;
  93158. procedure TCAN1_C1FIFOINT15.setTXNFULLIF; inline;
  93159. begin
  93160. pTDefRegMap(@Self)^.&set := $00000400;
  93161. end;
  93162. procedure TCAN1_C1FIFOINT15.clearTXNFULLIF; inline;
  93163. begin
  93164. pTDefRegMap(@Self)^.clr := $00000400;
  93165. end;
  93166. procedure TCAN1_C1FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  93167. begin
  93168. if thebits = 0 then
  93169. pTDefRegMap(@Self)^.clr := $00000400
  93170. else
  93171. pTDefRegMap(@Self)^.&set := $00000400;
  93172. end;
  93173. function TCAN1_C1FIFOINT15.getTXNFULLIF : TBits_1; inline;
  93174. begin
  93175. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  93176. end;
  93177. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE; inline;
  93178. begin
  93179. pTDefRegMap(@Self)^.&set := $00010000;
  93180. end;
  93181. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIE; inline;
  93182. begin
  93183. pTDefRegMap(@Self)^.clr := $00010000;
  93184. end;
  93185. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  93186. begin
  93187. if thebits = 0 then
  93188. pTDefRegMap(@Self)^.clr := $00010000
  93189. else
  93190. pTDefRegMap(@Self)^.&set := $00010000;
  93191. end;
  93192. function TCAN1_C1FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  93193. begin
  93194. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  93195. end;
  93196. procedure TCAN1_C1FIFOINT15.setRXHALFIE; inline;
  93197. begin
  93198. pTDefRegMap(@Self)^.&set := $00020000;
  93199. end;
  93200. procedure TCAN1_C1FIFOINT15.clearRXHALFIE; inline;
  93201. begin
  93202. pTDefRegMap(@Self)^.clr := $00020000;
  93203. end;
  93204. procedure TCAN1_C1FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  93205. begin
  93206. if thebits = 0 then
  93207. pTDefRegMap(@Self)^.clr := $00020000
  93208. else
  93209. pTDefRegMap(@Self)^.&set := $00020000;
  93210. end;
  93211. function TCAN1_C1FIFOINT15.getRXHALFIE : TBits_1; inline;
  93212. begin
  93213. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  93214. end;
  93215. procedure TCAN1_C1FIFOINT15.setRXFULLIE; inline;
  93216. begin
  93217. pTDefRegMap(@Self)^.&set := $00040000;
  93218. end;
  93219. procedure TCAN1_C1FIFOINT15.clearRXFULLIE; inline;
  93220. begin
  93221. pTDefRegMap(@Self)^.clr := $00040000;
  93222. end;
  93223. procedure TCAN1_C1FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  93224. begin
  93225. if thebits = 0 then
  93226. pTDefRegMap(@Self)^.clr := $00040000
  93227. else
  93228. pTDefRegMap(@Self)^.&set := $00040000;
  93229. end;
  93230. function TCAN1_C1FIFOINT15.getRXFULLIE : TBits_1; inline;
  93231. begin
  93232. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  93233. end;
  93234. procedure TCAN1_C1FIFOINT15.setRXOVFLIE; inline;
  93235. begin
  93236. pTDefRegMap(@Self)^.&set := $00080000;
  93237. end;
  93238. procedure TCAN1_C1FIFOINT15.clearRXOVFLIE; inline;
  93239. begin
  93240. pTDefRegMap(@Self)^.clr := $00080000;
  93241. end;
  93242. procedure TCAN1_C1FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  93243. begin
  93244. if thebits = 0 then
  93245. pTDefRegMap(@Self)^.clr := $00080000
  93246. else
  93247. pTDefRegMap(@Self)^.&set := $00080000;
  93248. end;
  93249. function TCAN1_C1FIFOINT15.getRXOVFLIE : TBits_1; inline;
  93250. begin
  93251. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  93252. end;
  93253. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE; inline;
  93254. begin
  93255. pTDefRegMap(@Self)^.&set := $01000000;
  93256. end;
  93257. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIE; inline;
  93258. begin
  93259. pTDefRegMap(@Self)^.clr := $01000000;
  93260. end;
  93261. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  93262. begin
  93263. if thebits = 0 then
  93264. pTDefRegMap(@Self)^.clr := $01000000
  93265. else
  93266. pTDefRegMap(@Self)^.&set := $01000000;
  93267. end;
  93268. function TCAN1_C1FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  93269. begin
  93270. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  93271. end;
  93272. procedure TCAN1_C1FIFOINT15.setTXHALFIE; inline;
  93273. begin
  93274. pTDefRegMap(@Self)^.&set := $02000000;
  93275. end;
  93276. procedure TCAN1_C1FIFOINT15.clearTXHALFIE; inline;
  93277. begin
  93278. pTDefRegMap(@Self)^.clr := $02000000;
  93279. end;
  93280. procedure TCAN1_C1FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  93281. begin
  93282. if thebits = 0 then
  93283. pTDefRegMap(@Self)^.clr := $02000000
  93284. else
  93285. pTDefRegMap(@Self)^.&set := $02000000;
  93286. end;
  93287. function TCAN1_C1FIFOINT15.getTXHALFIE : TBits_1; inline;
  93288. begin
  93289. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  93290. end;
  93291. procedure TCAN1_C1FIFOINT15.setTXNFULLIE; inline;
  93292. begin
  93293. pTDefRegMap(@Self)^.&set := $04000000;
  93294. end;
  93295. procedure TCAN1_C1FIFOINT15.clearTXNFULLIE; inline;
  93296. begin
  93297. pTDefRegMap(@Self)^.clr := $04000000;
  93298. end;
  93299. procedure TCAN1_C1FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  93300. begin
  93301. if thebits = 0 then
  93302. pTDefRegMap(@Self)^.clr := $04000000
  93303. else
  93304. pTDefRegMap(@Self)^.&set := $04000000;
  93305. end;
  93306. function TCAN1_C1FIFOINT15.getTXNFULLIE : TBits_1; inline;
  93307. begin
  93308. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  93309. end;
  93310. procedure TCAN1_C1FIFOINT15.setw(thebits : TBits_32); inline;
  93311. begin
  93312. pTDefRegMap(@Self)^.val := thebits;
  93313. end;
  93314. function TCAN1_C1FIFOINT15.getw : TBits_32; inline;
  93315. begin
  93316. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93317. end;
  93318. procedure TCAN1_C1FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  93319. begin
  93320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  93321. end;
  93322. function TCAN1_C1FIFOCI15.getCFIFOCI : TBits_5; inline;
  93323. begin
  93324. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  93325. end;
  93326. procedure TCAN1_C1FIFOCI15.setw(thebits : TBits_32); inline;
  93327. begin
  93328. pTDefRegMap(@Self)^.val := thebits;
  93329. end;
  93330. function TCAN1_C1FIFOCI15.getw : TBits_32; inline;
  93331. begin
  93332. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93333. end;
  93334. procedure TCAN1_C1FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  93335. begin
  93336. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  93337. end;
  93338. function TCAN1_C1FIFOCON16.getTXPRI : TBits_2; inline;
  93339. begin
  93340. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  93341. end;
  93342. procedure TCAN1_C1FIFOCON16.setRTREN; inline;
  93343. begin
  93344. pTDefRegMap(@Self)^.&set := $00000004;
  93345. end;
  93346. procedure TCAN1_C1FIFOCON16.clearRTREN; inline;
  93347. begin
  93348. pTDefRegMap(@Self)^.clr := $00000004;
  93349. end;
  93350. procedure TCAN1_C1FIFOCON16.setRTREN(thebits : TBits_1); inline;
  93351. begin
  93352. if thebits = 0 then
  93353. pTDefRegMap(@Self)^.clr := $00000004
  93354. else
  93355. pTDefRegMap(@Self)^.&set := $00000004;
  93356. end;
  93357. function TCAN1_C1FIFOCON16.getRTREN : TBits_1; inline;
  93358. begin
  93359. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93360. end;
  93361. procedure TCAN1_C1FIFOCON16.setTXREQ; inline;
  93362. begin
  93363. pTDefRegMap(@Self)^.&set := $00000008;
  93364. end;
  93365. procedure TCAN1_C1FIFOCON16.clearTXREQ; inline;
  93366. begin
  93367. pTDefRegMap(@Self)^.clr := $00000008;
  93368. end;
  93369. procedure TCAN1_C1FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  93370. begin
  93371. if thebits = 0 then
  93372. pTDefRegMap(@Self)^.clr := $00000008
  93373. else
  93374. pTDefRegMap(@Self)^.&set := $00000008;
  93375. end;
  93376. function TCAN1_C1FIFOCON16.getTXREQ : TBits_1; inline;
  93377. begin
  93378. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93379. end;
  93380. procedure TCAN1_C1FIFOCON16.setTXERR; inline;
  93381. begin
  93382. pTDefRegMap(@Self)^.&set := $00000010;
  93383. end;
  93384. procedure TCAN1_C1FIFOCON16.clearTXERR; inline;
  93385. begin
  93386. pTDefRegMap(@Self)^.clr := $00000010;
  93387. end;
  93388. procedure TCAN1_C1FIFOCON16.setTXERR(thebits : TBits_1); inline;
  93389. begin
  93390. if thebits = 0 then
  93391. pTDefRegMap(@Self)^.clr := $00000010
  93392. else
  93393. pTDefRegMap(@Self)^.&set := $00000010;
  93394. end;
  93395. function TCAN1_C1FIFOCON16.getTXERR : TBits_1; inline;
  93396. begin
  93397. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  93398. end;
  93399. procedure TCAN1_C1FIFOCON16.setTXLARB; inline;
  93400. begin
  93401. pTDefRegMap(@Self)^.&set := $00000020;
  93402. end;
  93403. procedure TCAN1_C1FIFOCON16.clearTXLARB; inline;
  93404. begin
  93405. pTDefRegMap(@Self)^.clr := $00000020;
  93406. end;
  93407. procedure TCAN1_C1FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  93408. begin
  93409. if thebits = 0 then
  93410. pTDefRegMap(@Self)^.clr := $00000020
  93411. else
  93412. pTDefRegMap(@Self)^.&set := $00000020;
  93413. end;
  93414. function TCAN1_C1FIFOCON16.getTXLARB : TBits_1; inline;
  93415. begin
  93416. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  93417. end;
  93418. procedure TCAN1_C1FIFOCON16.setTXABAT; inline;
  93419. begin
  93420. pTDefRegMap(@Self)^.&set := $00000040;
  93421. end;
  93422. procedure TCAN1_C1FIFOCON16.clearTXABAT; inline;
  93423. begin
  93424. pTDefRegMap(@Self)^.clr := $00000040;
  93425. end;
  93426. procedure TCAN1_C1FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  93427. begin
  93428. if thebits = 0 then
  93429. pTDefRegMap(@Self)^.clr := $00000040
  93430. else
  93431. pTDefRegMap(@Self)^.&set := $00000040;
  93432. end;
  93433. function TCAN1_C1FIFOCON16.getTXABAT : TBits_1; inline;
  93434. begin
  93435. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  93436. end;
  93437. procedure TCAN1_C1FIFOCON16.setTXEN; inline;
  93438. begin
  93439. pTDefRegMap(@Self)^.&set := $00000080;
  93440. end;
  93441. procedure TCAN1_C1FIFOCON16.clearTXEN; inline;
  93442. begin
  93443. pTDefRegMap(@Self)^.clr := $00000080;
  93444. end;
  93445. procedure TCAN1_C1FIFOCON16.setTXEN(thebits : TBits_1); inline;
  93446. begin
  93447. if thebits = 0 then
  93448. pTDefRegMap(@Self)^.clr := $00000080
  93449. else
  93450. pTDefRegMap(@Self)^.&set := $00000080;
  93451. end;
  93452. function TCAN1_C1FIFOCON16.getTXEN : TBits_1; inline;
  93453. begin
  93454. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  93455. end;
  93456. procedure TCAN1_C1FIFOCON16.setDONLY; inline;
  93457. begin
  93458. pTDefRegMap(@Self)^.&set := $00001000;
  93459. end;
  93460. procedure TCAN1_C1FIFOCON16.clearDONLY; inline;
  93461. begin
  93462. pTDefRegMap(@Self)^.clr := $00001000;
  93463. end;
  93464. procedure TCAN1_C1FIFOCON16.setDONLY(thebits : TBits_1); inline;
  93465. begin
  93466. if thebits = 0 then
  93467. pTDefRegMap(@Self)^.clr := $00001000
  93468. else
  93469. pTDefRegMap(@Self)^.&set := $00001000;
  93470. end;
  93471. function TCAN1_C1FIFOCON16.getDONLY : TBits_1; inline;
  93472. begin
  93473. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  93474. end;
  93475. procedure TCAN1_C1FIFOCON16.setUINC; inline;
  93476. begin
  93477. pTDefRegMap(@Self)^.&set := $00002000;
  93478. end;
  93479. procedure TCAN1_C1FIFOCON16.clearUINC; inline;
  93480. begin
  93481. pTDefRegMap(@Self)^.clr := $00002000;
  93482. end;
  93483. procedure TCAN1_C1FIFOCON16.setUINC(thebits : TBits_1); inline;
  93484. begin
  93485. if thebits = 0 then
  93486. pTDefRegMap(@Self)^.clr := $00002000
  93487. else
  93488. pTDefRegMap(@Self)^.&set := $00002000;
  93489. end;
  93490. function TCAN1_C1FIFOCON16.getUINC : TBits_1; inline;
  93491. begin
  93492. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  93493. end;
  93494. procedure TCAN1_C1FIFOCON16.setFRESET; inline;
  93495. begin
  93496. pTDefRegMap(@Self)^.&set := $00004000;
  93497. end;
  93498. procedure TCAN1_C1FIFOCON16.clearFRESET; inline;
  93499. begin
  93500. pTDefRegMap(@Self)^.clr := $00004000;
  93501. end;
  93502. procedure TCAN1_C1FIFOCON16.setFRESET(thebits : TBits_1); inline;
  93503. begin
  93504. if thebits = 0 then
  93505. pTDefRegMap(@Self)^.clr := $00004000
  93506. else
  93507. pTDefRegMap(@Self)^.&set := $00004000;
  93508. end;
  93509. function TCAN1_C1FIFOCON16.getFRESET : TBits_1; inline;
  93510. begin
  93511. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  93512. end;
  93513. procedure TCAN1_C1FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  93514. begin
  93515. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  93516. end;
  93517. function TCAN1_C1FIFOCON16.getFSIZE : TBits_5; inline;
  93518. begin
  93519. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  93520. end;
  93521. procedure TCAN1_C1FIFOCON16.setw(thebits : TBits_32); inline;
  93522. begin
  93523. pTDefRegMap(@Self)^.val := thebits;
  93524. end;
  93525. function TCAN1_C1FIFOCON16.getw : TBits_32; inline;
  93526. begin
  93527. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93528. end;
  93529. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF; inline;
  93530. begin
  93531. pTDefRegMap(@Self)^.&set := $00000001;
  93532. end;
  93533. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIF; inline;
  93534. begin
  93535. pTDefRegMap(@Self)^.clr := $00000001;
  93536. end;
  93537. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  93538. begin
  93539. if thebits = 0 then
  93540. pTDefRegMap(@Self)^.clr := $00000001
  93541. else
  93542. pTDefRegMap(@Self)^.&set := $00000001;
  93543. end;
  93544. function TCAN1_C1FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  93545. begin
  93546. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  93547. end;
  93548. procedure TCAN1_C1FIFOINT16.setRXHALFIF; inline;
  93549. begin
  93550. pTDefRegMap(@Self)^.&set := $00000002;
  93551. end;
  93552. procedure TCAN1_C1FIFOINT16.clearRXHALFIF; inline;
  93553. begin
  93554. pTDefRegMap(@Self)^.clr := $00000002;
  93555. end;
  93556. procedure TCAN1_C1FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  93557. begin
  93558. if thebits = 0 then
  93559. pTDefRegMap(@Self)^.clr := $00000002
  93560. else
  93561. pTDefRegMap(@Self)^.&set := $00000002;
  93562. end;
  93563. function TCAN1_C1FIFOINT16.getRXHALFIF : TBits_1; inline;
  93564. begin
  93565. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  93566. end;
  93567. procedure TCAN1_C1FIFOINT16.setRXFULLIF; inline;
  93568. begin
  93569. pTDefRegMap(@Self)^.&set := $00000004;
  93570. end;
  93571. procedure TCAN1_C1FIFOINT16.clearRXFULLIF; inline;
  93572. begin
  93573. pTDefRegMap(@Self)^.clr := $00000004;
  93574. end;
  93575. procedure TCAN1_C1FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  93576. begin
  93577. if thebits = 0 then
  93578. pTDefRegMap(@Self)^.clr := $00000004
  93579. else
  93580. pTDefRegMap(@Self)^.&set := $00000004;
  93581. end;
  93582. function TCAN1_C1FIFOINT16.getRXFULLIF : TBits_1; inline;
  93583. begin
  93584. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93585. end;
  93586. procedure TCAN1_C1FIFOINT16.setRXOVFLIF; inline;
  93587. begin
  93588. pTDefRegMap(@Self)^.&set := $00000008;
  93589. end;
  93590. procedure TCAN1_C1FIFOINT16.clearRXOVFLIF; inline;
  93591. begin
  93592. pTDefRegMap(@Self)^.clr := $00000008;
  93593. end;
  93594. procedure TCAN1_C1FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  93595. begin
  93596. if thebits = 0 then
  93597. pTDefRegMap(@Self)^.clr := $00000008
  93598. else
  93599. pTDefRegMap(@Self)^.&set := $00000008;
  93600. end;
  93601. function TCAN1_C1FIFOINT16.getRXOVFLIF : TBits_1; inline;
  93602. begin
  93603. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93604. end;
  93605. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF; inline;
  93606. begin
  93607. pTDefRegMap(@Self)^.&set := $00000100;
  93608. end;
  93609. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIF; inline;
  93610. begin
  93611. pTDefRegMap(@Self)^.clr := $00000100;
  93612. end;
  93613. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  93614. begin
  93615. if thebits = 0 then
  93616. pTDefRegMap(@Self)^.clr := $00000100
  93617. else
  93618. pTDefRegMap(@Self)^.&set := $00000100;
  93619. end;
  93620. function TCAN1_C1FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  93621. begin
  93622. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  93623. end;
  93624. procedure TCAN1_C1FIFOINT16.setTXHALFIF; inline;
  93625. begin
  93626. pTDefRegMap(@Self)^.&set := $00000200;
  93627. end;
  93628. procedure TCAN1_C1FIFOINT16.clearTXHALFIF; inline;
  93629. begin
  93630. pTDefRegMap(@Self)^.clr := $00000200;
  93631. end;
  93632. procedure TCAN1_C1FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  93633. begin
  93634. if thebits = 0 then
  93635. pTDefRegMap(@Self)^.clr := $00000200
  93636. else
  93637. pTDefRegMap(@Self)^.&set := $00000200;
  93638. end;
  93639. function TCAN1_C1FIFOINT16.getTXHALFIF : TBits_1; inline;
  93640. begin
  93641. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  93642. end;
  93643. procedure TCAN1_C1FIFOINT16.setTXNFULLIF; inline;
  93644. begin
  93645. pTDefRegMap(@Self)^.&set := $00000400;
  93646. end;
  93647. procedure TCAN1_C1FIFOINT16.clearTXNFULLIF; inline;
  93648. begin
  93649. pTDefRegMap(@Self)^.clr := $00000400;
  93650. end;
  93651. procedure TCAN1_C1FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  93652. begin
  93653. if thebits = 0 then
  93654. pTDefRegMap(@Self)^.clr := $00000400
  93655. else
  93656. pTDefRegMap(@Self)^.&set := $00000400;
  93657. end;
  93658. function TCAN1_C1FIFOINT16.getTXNFULLIF : TBits_1; inline;
  93659. begin
  93660. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  93661. end;
  93662. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE; inline;
  93663. begin
  93664. pTDefRegMap(@Self)^.&set := $00010000;
  93665. end;
  93666. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIE; inline;
  93667. begin
  93668. pTDefRegMap(@Self)^.clr := $00010000;
  93669. end;
  93670. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  93671. begin
  93672. if thebits = 0 then
  93673. pTDefRegMap(@Self)^.clr := $00010000
  93674. else
  93675. pTDefRegMap(@Self)^.&set := $00010000;
  93676. end;
  93677. function TCAN1_C1FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  93678. begin
  93679. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  93680. end;
  93681. procedure TCAN1_C1FIFOINT16.setRXHALFIE; inline;
  93682. begin
  93683. pTDefRegMap(@Self)^.&set := $00020000;
  93684. end;
  93685. procedure TCAN1_C1FIFOINT16.clearRXHALFIE; inline;
  93686. begin
  93687. pTDefRegMap(@Self)^.clr := $00020000;
  93688. end;
  93689. procedure TCAN1_C1FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  93690. begin
  93691. if thebits = 0 then
  93692. pTDefRegMap(@Self)^.clr := $00020000
  93693. else
  93694. pTDefRegMap(@Self)^.&set := $00020000;
  93695. end;
  93696. function TCAN1_C1FIFOINT16.getRXHALFIE : TBits_1; inline;
  93697. begin
  93698. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  93699. end;
  93700. procedure TCAN1_C1FIFOINT16.setRXFULLIE; inline;
  93701. begin
  93702. pTDefRegMap(@Self)^.&set := $00040000;
  93703. end;
  93704. procedure TCAN1_C1FIFOINT16.clearRXFULLIE; inline;
  93705. begin
  93706. pTDefRegMap(@Self)^.clr := $00040000;
  93707. end;
  93708. procedure TCAN1_C1FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  93709. begin
  93710. if thebits = 0 then
  93711. pTDefRegMap(@Self)^.clr := $00040000
  93712. else
  93713. pTDefRegMap(@Self)^.&set := $00040000;
  93714. end;
  93715. function TCAN1_C1FIFOINT16.getRXFULLIE : TBits_1; inline;
  93716. begin
  93717. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  93718. end;
  93719. procedure TCAN1_C1FIFOINT16.setRXOVFLIE; inline;
  93720. begin
  93721. pTDefRegMap(@Self)^.&set := $00080000;
  93722. end;
  93723. procedure TCAN1_C1FIFOINT16.clearRXOVFLIE; inline;
  93724. begin
  93725. pTDefRegMap(@Self)^.clr := $00080000;
  93726. end;
  93727. procedure TCAN1_C1FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  93728. begin
  93729. if thebits = 0 then
  93730. pTDefRegMap(@Self)^.clr := $00080000
  93731. else
  93732. pTDefRegMap(@Self)^.&set := $00080000;
  93733. end;
  93734. function TCAN1_C1FIFOINT16.getRXOVFLIE : TBits_1; inline;
  93735. begin
  93736. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  93737. end;
  93738. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE; inline;
  93739. begin
  93740. pTDefRegMap(@Self)^.&set := $01000000;
  93741. end;
  93742. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIE; inline;
  93743. begin
  93744. pTDefRegMap(@Self)^.clr := $01000000;
  93745. end;
  93746. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  93747. begin
  93748. if thebits = 0 then
  93749. pTDefRegMap(@Self)^.clr := $01000000
  93750. else
  93751. pTDefRegMap(@Self)^.&set := $01000000;
  93752. end;
  93753. function TCAN1_C1FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  93754. begin
  93755. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  93756. end;
  93757. procedure TCAN1_C1FIFOINT16.setTXHALFIE; inline;
  93758. begin
  93759. pTDefRegMap(@Self)^.&set := $02000000;
  93760. end;
  93761. procedure TCAN1_C1FIFOINT16.clearTXHALFIE; inline;
  93762. begin
  93763. pTDefRegMap(@Self)^.clr := $02000000;
  93764. end;
  93765. procedure TCAN1_C1FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  93766. begin
  93767. if thebits = 0 then
  93768. pTDefRegMap(@Self)^.clr := $02000000
  93769. else
  93770. pTDefRegMap(@Self)^.&set := $02000000;
  93771. end;
  93772. function TCAN1_C1FIFOINT16.getTXHALFIE : TBits_1; inline;
  93773. begin
  93774. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  93775. end;
  93776. procedure TCAN1_C1FIFOINT16.setTXNFULLIE; inline;
  93777. begin
  93778. pTDefRegMap(@Self)^.&set := $04000000;
  93779. end;
  93780. procedure TCAN1_C1FIFOINT16.clearTXNFULLIE; inline;
  93781. begin
  93782. pTDefRegMap(@Self)^.clr := $04000000;
  93783. end;
  93784. procedure TCAN1_C1FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  93785. begin
  93786. if thebits = 0 then
  93787. pTDefRegMap(@Self)^.clr := $04000000
  93788. else
  93789. pTDefRegMap(@Self)^.&set := $04000000;
  93790. end;
  93791. function TCAN1_C1FIFOINT16.getTXNFULLIE : TBits_1; inline;
  93792. begin
  93793. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  93794. end;
  93795. procedure TCAN1_C1FIFOINT16.setw(thebits : TBits_32); inline;
  93796. begin
  93797. pTDefRegMap(@Self)^.val := thebits;
  93798. end;
  93799. function TCAN1_C1FIFOINT16.getw : TBits_32; inline;
  93800. begin
  93801. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93802. end;
  93803. procedure TCAN1_C1FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  93804. begin
  93805. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  93806. end;
  93807. function TCAN1_C1FIFOCI16.getCFIFOCI : TBits_5; inline;
  93808. begin
  93809. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  93810. end;
  93811. procedure TCAN1_C1FIFOCI16.setw(thebits : TBits_32); inline;
  93812. begin
  93813. pTDefRegMap(@Self)^.val := thebits;
  93814. end;
  93815. function TCAN1_C1FIFOCI16.getw : TBits_32; inline;
  93816. begin
  93817. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93818. end;
  93819. procedure TCAN1_C1FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  93820. begin
  93821. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  93822. end;
  93823. function TCAN1_C1FIFOCON17.getTXPRI : TBits_2; inline;
  93824. begin
  93825. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  93826. end;
  93827. procedure TCAN1_C1FIFOCON17.setRTREN; inline;
  93828. begin
  93829. pTDefRegMap(@Self)^.&set := $00000004;
  93830. end;
  93831. procedure TCAN1_C1FIFOCON17.clearRTREN; inline;
  93832. begin
  93833. pTDefRegMap(@Self)^.clr := $00000004;
  93834. end;
  93835. procedure TCAN1_C1FIFOCON17.setRTREN(thebits : TBits_1); inline;
  93836. begin
  93837. if thebits = 0 then
  93838. pTDefRegMap(@Self)^.clr := $00000004
  93839. else
  93840. pTDefRegMap(@Self)^.&set := $00000004;
  93841. end;
  93842. function TCAN1_C1FIFOCON17.getRTREN : TBits_1; inline;
  93843. begin
  93844. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93845. end;
  93846. procedure TCAN1_C1FIFOCON17.setTXREQ; inline;
  93847. begin
  93848. pTDefRegMap(@Self)^.&set := $00000008;
  93849. end;
  93850. procedure TCAN1_C1FIFOCON17.clearTXREQ; inline;
  93851. begin
  93852. pTDefRegMap(@Self)^.clr := $00000008;
  93853. end;
  93854. procedure TCAN1_C1FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  93855. begin
  93856. if thebits = 0 then
  93857. pTDefRegMap(@Self)^.clr := $00000008
  93858. else
  93859. pTDefRegMap(@Self)^.&set := $00000008;
  93860. end;
  93861. function TCAN1_C1FIFOCON17.getTXREQ : TBits_1; inline;
  93862. begin
  93863. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93864. end;
  93865. procedure TCAN1_C1FIFOCON17.setTXERR; inline;
  93866. begin
  93867. pTDefRegMap(@Self)^.&set := $00000010;
  93868. end;
  93869. procedure TCAN1_C1FIFOCON17.clearTXERR; inline;
  93870. begin
  93871. pTDefRegMap(@Self)^.clr := $00000010;
  93872. end;
  93873. procedure TCAN1_C1FIFOCON17.setTXERR(thebits : TBits_1); inline;
  93874. begin
  93875. if thebits = 0 then
  93876. pTDefRegMap(@Self)^.clr := $00000010
  93877. else
  93878. pTDefRegMap(@Self)^.&set := $00000010;
  93879. end;
  93880. function TCAN1_C1FIFOCON17.getTXERR : TBits_1; inline;
  93881. begin
  93882. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  93883. end;
  93884. procedure TCAN1_C1FIFOCON17.setTXLARB; inline;
  93885. begin
  93886. pTDefRegMap(@Self)^.&set := $00000020;
  93887. end;
  93888. procedure TCAN1_C1FIFOCON17.clearTXLARB; inline;
  93889. begin
  93890. pTDefRegMap(@Self)^.clr := $00000020;
  93891. end;
  93892. procedure TCAN1_C1FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  93893. begin
  93894. if thebits = 0 then
  93895. pTDefRegMap(@Self)^.clr := $00000020
  93896. else
  93897. pTDefRegMap(@Self)^.&set := $00000020;
  93898. end;
  93899. function TCAN1_C1FIFOCON17.getTXLARB : TBits_1; inline;
  93900. begin
  93901. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  93902. end;
  93903. procedure TCAN1_C1FIFOCON17.setTXABAT; inline;
  93904. begin
  93905. pTDefRegMap(@Self)^.&set := $00000040;
  93906. end;
  93907. procedure TCAN1_C1FIFOCON17.clearTXABAT; inline;
  93908. begin
  93909. pTDefRegMap(@Self)^.clr := $00000040;
  93910. end;
  93911. procedure TCAN1_C1FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  93912. begin
  93913. if thebits = 0 then
  93914. pTDefRegMap(@Self)^.clr := $00000040
  93915. else
  93916. pTDefRegMap(@Self)^.&set := $00000040;
  93917. end;
  93918. function TCAN1_C1FIFOCON17.getTXABAT : TBits_1; inline;
  93919. begin
  93920. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  93921. end;
  93922. procedure TCAN1_C1FIFOCON17.setTXEN; inline;
  93923. begin
  93924. pTDefRegMap(@Self)^.&set := $00000080;
  93925. end;
  93926. procedure TCAN1_C1FIFOCON17.clearTXEN; inline;
  93927. begin
  93928. pTDefRegMap(@Self)^.clr := $00000080;
  93929. end;
  93930. procedure TCAN1_C1FIFOCON17.setTXEN(thebits : TBits_1); inline;
  93931. begin
  93932. if thebits = 0 then
  93933. pTDefRegMap(@Self)^.clr := $00000080
  93934. else
  93935. pTDefRegMap(@Self)^.&set := $00000080;
  93936. end;
  93937. function TCAN1_C1FIFOCON17.getTXEN : TBits_1; inline;
  93938. begin
  93939. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  93940. end;
  93941. procedure TCAN1_C1FIFOCON17.setDONLY; inline;
  93942. begin
  93943. pTDefRegMap(@Self)^.&set := $00001000;
  93944. end;
  93945. procedure TCAN1_C1FIFOCON17.clearDONLY; inline;
  93946. begin
  93947. pTDefRegMap(@Self)^.clr := $00001000;
  93948. end;
  93949. procedure TCAN1_C1FIFOCON17.setDONLY(thebits : TBits_1); inline;
  93950. begin
  93951. if thebits = 0 then
  93952. pTDefRegMap(@Self)^.clr := $00001000
  93953. else
  93954. pTDefRegMap(@Self)^.&set := $00001000;
  93955. end;
  93956. function TCAN1_C1FIFOCON17.getDONLY : TBits_1; inline;
  93957. begin
  93958. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  93959. end;
  93960. procedure TCAN1_C1FIFOCON17.setUINC; inline;
  93961. begin
  93962. pTDefRegMap(@Self)^.&set := $00002000;
  93963. end;
  93964. procedure TCAN1_C1FIFOCON17.clearUINC; inline;
  93965. begin
  93966. pTDefRegMap(@Self)^.clr := $00002000;
  93967. end;
  93968. procedure TCAN1_C1FIFOCON17.setUINC(thebits : TBits_1); inline;
  93969. begin
  93970. if thebits = 0 then
  93971. pTDefRegMap(@Self)^.clr := $00002000
  93972. else
  93973. pTDefRegMap(@Self)^.&set := $00002000;
  93974. end;
  93975. function TCAN1_C1FIFOCON17.getUINC : TBits_1; inline;
  93976. begin
  93977. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  93978. end;
  93979. procedure TCAN1_C1FIFOCON17.setFRESET; inline;
  93980. begin
  93981. pTDefRegMap(@Self)^.&set := $00004000;
  93982. end;
  93983. procedure TCAN1_C1FIFOCON17.clearFRESET; inline;
  93984. begin
  93985. pTDefRegMap(@Self)^.clr := $00004000;
  93986. end;
  93987. procedure TCAN1_C1FIFOCON17.setFRESET(thebits : TBits_1); inline;
  93988. begin
  93989. if thebits = 0 then
  93990. pTDefRegMap(@Self)^.clr := $00004000
  93991. else
  93992. pTDefRegMap(@Self)^.&set := $00004000;
  93993. end;
  93994. function TCAN1_C1FIFOCON17.getFRESET : TBits_1; inline;
  93995. begin
  93996. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  93997. end;
  93998. procedure TCAN1_C1FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  93999. begin
  94000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  94001. end;
  94002. function TCAN1_C1FIFOCON17.getFSIZE : TBits_5; inline;
  94003. begin
  94004. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  94005. end;
  94006. procedure TCAN1_C1FIFOCON17.setw(thebits : TBits_32); inline;
  94007. begin
  94008. pTDefRegMap(@Self)^.val := thebits;
  94009. end;
  94010. function TCAN1_C1FIFOCON17.getw : TBits_32; inline;
  94011. begin
  94012. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94013. end;
  94014. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF; inline;
  94015. begin
  94016. pTDefRegMap(@Self)^.&set := $00000001;
  94017. end;
  94018. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIF; inline;
  94019. begin
  94020. pTDefRegMap(@Self)^.clr := $00000001;
  94021. end;
  94022. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  94023. begin
  94024. if thebits = 0 then
  94025. pTDefRegMap(@Self)^.clr := $00000001
  94026. else
  94027. pTDefRegMap(@Self)^.&set := $00000001;
  94028. end;
  94029. function TCAN1_C1FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  94030. begin
  94031. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  94032. end;
  94033. procedure TCAN1_C1FIFOINT17.setRXHALFIF; inline;
  94034. begin
  94035. pTDefRegMap(@Self)^.&set := $00000002;
  94036. end;
  94037. procedure TCAN1_C1FIFOINT17.clearRXHALFIF; inline;
  94038. begin
  94039. pTDefRegMap(@Self)^.clr := $00000002;
  94040. end;
  94041. procedure TCAN1_C1FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  94042. begin
  94043. if thebits = 0 then
  94044. pTDefRegMap(@Self)^.clr := $00000002
  94045. else
  94046. pTDefRegMap(@Self)^.&set := $00000002;
  94047. end;
  94048. function TCAN1_C1FIFOINT17.getRXHALFIF : TBits_1; inline;
  94049. begin
  94050. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  94051. end;
  94052. procedure TCAN1_C1FIFOINT17.setRXFULLIF; inline;
  94053. begin
  94054. pTDefRegMap(@Self)^.&set := $00000004;
  94055. end;
  94056. procedure TCAN1_C1FIFOINT17.clearRXFULLIF; inline;
  94057. begin
  94058. pTDefRegMap(@Self)^.clr := $00000004;
  94059. end;
  94060. procedure TCAN1_C1FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  94061. begin
  94062. if thebits = 0 then
  94063. pTDefRegMap(@Self)^.clr := $00000004
  94064. else
  94065. pTDefRegMap(@Self)^.&set := $00000004;
  94066. end;
  94067. function TCAN1_C1FIFOINT17.getRXFULLIF : TBits_1; inline;
  94068. begin
  94069. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94070. end;
  94071. procedure TCAN1_C1FIFOINT17.setRXOVFLIF; inline;
  94072. begin
  94073. pTDefRegMap(@Self)^.&set := $00000008;
  94074. end;
  94075. procedure TCAN1_C1FIFOINT17.clearRXOVFLIF; inline;
  94076. begin
  94077. pTDefRegMap(@Self)^.clr := $00000008;
  94078. end;
  94079. procedure TCAN1_C1FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  94080. begin
  94081. if thebits = 0 then
  94082. pTDefRegMap(@Self)^.clr := $00000008
  94083. else
  94084. pTDefRegMap(@Self)^.&set := $00000008;
  94085. end;
  94086. function TCAN1_C1FIFOINT17.getRXOVFLIF : TBits_1; inline;
  94087. begin
  94088. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94089. end;
  94090. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF; inline;
  94091. begin
  94092. pTDefRegMap(@Self)^.&set := $00000100;
  94093. end;
  94094. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIF; inline;
  94095. begin
  94096. pTDefRegMap(@Self)^.clr := $00000100;
  94097. end;
  94098. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  94099. begin
  94100. if thebits = 0 then
  94101. pTDefRegMap(@Self)^.clr := $00000100
  94102. else
  94103. pTDefRegMap(@Self)^.&set := $00000100;
  94104. end;
  94105. function TCAN1_C1FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  94106. begin
  94107. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  94108. end;
  94109. procedure TCAN1_C1FIFOINT17.setTXHALFIF; inline;
  94110. begin
  94111. pTDefRegMap(@Self)^.&set := $00000200;
  94112. end;
  94113. procedure TCAN1_C1FIFOINT17.clearTXHALFIF; inline;
  94114. begin
  94115. pTDefRegMap(@Self)^.clr := $00000200;
  94116. end;
  94117. procedure TCAN1_C1FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  94118. begin
  94119. if thebits = 0 then
  94120. pTDefRegMap(@Self)^.clr := $00000200
  94121. else
  94122. pTDefRegMap(@Self)^.&set := $00000200;
  94123. end;
  94124. function TCAN1_C1FIFOINT17.getTXHALFIF : TBits_1; inline;
  94125. begin
  94126. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  94127. end;
  94128. procedure TCAN1_C1FIFOINT17.setTXNFULLIF; inline;
  94129. begin
  94130. pTDefRegMap(@Self)^.&set := $00000400;
  94131. end;
  94132. procedure TCAN1_C1FIFOINT17.clearTXNFULLIF; inline;
  94133. begin
  94134. pTDefRegMap(@Self)^.clr := $00000400;
  94135. end;
  94136. procedure TCAN1_C1FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  94137. begin
  94138. if thebits = 0 then
  94139. pTDefRegMap(@Self)^.clr := $00000400
  94140. else
  94141. pTDefRegMap(@Self)^.&set := $00000400;
  94142. end;
  94143. function TCAN1_C1FIFOINT17.getTXNFULLIF : TBits_1; inline;
  94144. begin
  94145. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  94146. end;
  94147. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE; inline;
  94148. begin
  94149. pTDefRegMap(@Self)^.&set := $00010000;
  94150. end;
  94151. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIE; inline;
  94152. begin
  94153. pTDefRegMap(@Self)^.clr := $00010000;
  94154. end;
  94155. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  94156. begin
  94157. if thebits = 0 then
  94158. pTDefRegMap(@Self)^.clr := $00010000
  94159. else
  94160. pTDefRegMap(@Self)^.&set := $00010000;
  94161. end;
  94162. function TCAN1_C1FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  94163. begin
  94164. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  94165. end;
  94166. procedure TCAN1_C1FIFOINT17.setRXHALFIE; inline;
  94167. begin
  94168. pTDefRegMap(@Self)^.&set := $00020000;
  94169. end;
  94170. procedure TCAN1_C1FIFOINT17.clearRXHALFIE; inline;
  94171. begin
  94172. pTDefRegMap(@Self)^.clr := $00020000;
  94173. end;
  94174. procedure TCAN1_C1FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  94175. begin
  94176. if thebits = 0 then
  94177. pTDefRegMap(@Self)^.clr := $00020000
  94178. else
  94179. pTDefRegMap(@Self)^.&set := $00020000;
  94180. end;
  94181. function TCAN1_C1FIFOINT17.getRXHALFIE : TBits_1; inline;
  94182. begin
  94183. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  94184. end;
  94185. procedure TCAN1_C1FIFOINT17.setRXFULLIE; inline;
  94186. begin
  94187. pTDefRegMap(@Self)^.&set := $00040000;
  94188. end;
  94189. procedure TCAN1_C1FIFOINT17.clearRXFULLIE; inline;
  94190. begin
  94191. pTDefRegMap(@Self)^.clr := $00040000;
  94192. end;
  94193. procedure TCAN1_C1FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  94194. begin
  94195. if thebits = 0 then
  94196. pTDefRegMap(@Self)^.clr := $00040000
  94197. else
  94198. pTDefRegMap(@Self)^.&set := $00040000;
  94199. end;
  94200. function TCAN1_C1FIFOINT17.getRXFULLIE : TBits_1; inline;
  94201. begin
  94202. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  94203. end;
  94204. procedure TCAN1_C1FIFOINT17.setRXOVFLIE; inline;
  94205. begin
  94206. pTDefRegMap(@Self)^.&set := $00080000;
  94207. end;
  94208. procedure TCAN1_C1FIFOINT17.clearRXOVFLIE; inline;
  94209. begin
  94210. pTDefRegMap(@Self)^.clr := $00080000;
  94211. end;
  94212. procedure TCAN1_C1FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  94213. begin
  94214. if thebits = 0 then
  94215. pTDefRegMap(@Self)^.clr := $00080000
  94216. else
  94217. pTDefRegMap(@Self)^.&set := $00080000;
  94218. end;
  94219. function TCAN1_C1FIFOINT17.getRXOVFLIE : TBits_1; inline;
  94220. begin
  94221. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  94222. end;
  94223. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE; inline;
  94224. begin
  94225. pTDefRegMap(@Self)^.&set := $01000000;
  94226. end;
  94227. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIE; inline;
  94228. begin
  94229. pTDefRegMap(@Self)^.clr := $01000000;
  94230. end;
  94231. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  94232. begin
  94233. if thebits = 0 then
  94234. pTDefRegMap(@Self)^.clr := $01000000
  94235. else
  94236. pTDefRegMap(@Self)^.&set := $01000000;
  94237. end;
  94238. function TCAN1_C1FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  94239. begin
  94240. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  94241. end;
  94242. procedure TCAN1_C1FIFOINT17.setTXHALFIE; inline;
  94243. begin
  94244. pTDefRegMap(@Self)^.&set := $02000000;
  94245. end;
  94246. procedure TCAN1_C1FIFOINT17.clearTXHALFIE; inline;
  94247. begin
  94248. pTDefRegMap(@Self)^.clr := $02000000;
  94249. end;
  94250. procedure TCAN1_C1FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  94251. begin
  94252. if thebits = 0 then
  94253. pTDefRegMap(@Self)^.clr := $02000000
  94254. else
  94255. pTDefRegMap(@Self)^.&set := $02000000;
  94256. end;
  94257. function TCAN1_C1FIFOINT17.getTXHALFIE : TBits_1; inline;
  94258. begin
  94259. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  94260. end;
  94261. procedure TCAN1_C1FIFOINT17.setTXNFULLIE; inline;
  94262. begin
  94263. pTDefRegMap(@Self)^.&set := $04000000;
  94264. end;
  94265. procedure TCAN1_C1FIFOINT17.clearTXNFULLIE; inline;
  94266. begin
  94267. pTDefRegMap(@Self)^.clr := $04000000;
  94268. end;
  94269. procedure TCAN1_C1FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  94270. begin
  94271. if thebits = 0 then
  94272. pTDefRegMap(@Self)^.clr := $04000000
  94273. else
  94274. pTDefRegMap(@Self)^.&set := $04000000;
  94275. end;
  94276. function TCAN1_C1FIFOINT17.getTXNFULLIE : TBits_1; inline;
  94277. begin
  94278. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  94279. end;
  94280. procedure TCAN1_C1FIFOINT17.setw(thebits : TBits_32); inline;
  94281. begin
  94282. pTDefRegMap(@Self)^.val := thebits;
  94283. end;
  94284. function TCAN1_C1FIFOINT17.getw : TBits_32; inline;
  94285. begin
  94286. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94287. end;
  94288. procedure TCAN1_C1FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  94289. begin
  94290. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  94291. end;
  94292. function TCAN1_C1FIFOCI17.getCFIFOCI : TBits_5; inline;
  94293. begin
  94294. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  94295. end;
  94296. procedure TCAN1_C1FIFOCI17.setw(thebits : TBits_32); inline;
  94297. begin
  94298. pTDefRegMap(@Self)^.val := thebits;
  94299. end;
  94300. function TCAN1_C1FIFOCI17.getw : TBits_32; inline;
  94301. begin
  94302. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94303. end;
  94304. procedure TCAN1_C1FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  94305. begin
  94306. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  94307. end;
  94308. function TCAN1_C1FIFOCON18.getTXPRI : TBits_2; inline;
  94309. begin
  94310. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  94311. end;
  94312. procedure TCAN1_C1FIFOCON18.setRTREN; inline;
  94313. begin
  94314. pTDefRegMap(@Self)^.&set := $00000004;
  94315. end;
  94316. procedure TCAN1_C1FIFOCON18.clearRTREN; inline;
  94317. begin
  94318. pTDefRegMap(@Self)^.clr := $00000004;
  94319. end;
  94320. procedure TCAN1_C1FIFOCON18.setRTREN(thebits : TBits_1); inline;
  94321. begin
  94322. if thebits = 0 then
  94323. pTDefRegMap(@Self)^.clr := $00000004
  94324. else
  94325. pTDefRegMap(@Self)^.&set := $00000004;
  94326. end;
  94327. function TCAN1_C1FIFOCON18.getRTREN : TBits_1; inline;
  94328. begin
  94329. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94330. end;
  94331. procedure TCAN1_C1FIFOCON18.setTXREQ; inline;
  94332. begin
  94333. pTDefRegMap(@Self)^.&set := $00000008;
  94334. end;
  94335. procedure TCAN1_C1FIFOCON18.clearTXREQ; inline;
  94336. begin
  94337. pTDefRegMap(@Self)^.clr := $00000008;
  94338. end;
  94339. procedure TCAN1_C1FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  94340. begin
  94341. if thebits = 0 then
  94342. pTDefRegMap(@Self)^.clr := $00000008
  94343. else
  94344. pTDefRegMap(@Self)^.&set := $00000008;
  94345. end;
  94346. function TCAN1_C1FIFOCON18.getTXREQ : TBits_1; inline;
  94347. begin
  94348. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94349. end;
  94350. procedure TCAN1_C1FIFOCON18.setTXERR; inline;
  94351. begin
  94352. pTDefRegMap(@Self)^.&set := $00000010;
  94353. end;
  94354. procedure TCAN1_C1FIFOCON18.clearTXERR; inline;
  94355. begin
  94356. pTDefRegMap(@Self)^.clr := $00000010;
  94357. end;
  94358. procedure TCAN1_C1FIFOCON18.setTXERR(thebits : TBits_1); inline;
  94359. begin
  94360. if thebits = 0 then
  94361. pTDefRegMap(@Self)^.clr := $00000010
  94362. else
  94363. pTDefRegMap(@Self)^.&set := $00000010;
  94364. end;
  94365. function TCAN1_C1FIFOCON18.getTXERR : TBits_1; inline;
  94366. begin
  94367. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  94368. end;
  94369. procedure TCAN1_C1FIFOCON18.setTXLARB; inline;
  94370. begin
  94371. pTDefRegMap(@Self)^.&set := $00000020;
  94372. end;
  94373. procedure TCAN1_C1FIFOCON18.clearTXLARB; inline;
  94374. begin
  94375. pTDefRegMap(@Self)^.clr := $00000020;
  94376. end;
  94377. procedure TCAN1_C1FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  94378. begin
  94379. if thebits = 0 then
  94380. pTDefRegMap(@Self)^.clr := $00000020
  94381. else
  94382. pTDefRegMap(@Self)^.&set := $00000020;
  94383. end;
  94384. function TCAN1_C1FIFOCON18.getTXLARB : TBits_1; inline;
  94385. begin
  94386. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  94387. end;
  94388. procedure TCAN1_C1FIFOCON18.setTXABAT; inline;
  94389. begin
  94390. pTDefRegMap(@Self)^.&set := $00000040;
  94391. end;
  94392. procedure TCAN1_C1FIFOCON18.clearTXABAT; inline;
  94393. begin
  94394. pTDefRegMap(@Self)^.clr := $00000040;
  94395. end;
  94396. procedure TCAN1_C1FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  94397. begin
  94398. if thebits = 0 then
  94399. pTDefRegMap(@Self)^.clr := $00000040
  94400. else
  94401. pTDefRegMap(@Self)^.&set := $00000040;
  94402. end;
  94403. function TCAN1_C1FIFOCON18.getTXABAT : TBits_1; inline;
  94404. begin
  94405. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  94406. end;
  94407. procedure TCAN1_C1FIFOCON18.setTXEN; inline;
  94408. begin
  94409. pTDefRegMap(@Self)^.&set := $00000080;
  94410. end;
  94411. procedure TCAN1_C1FIFOCON18.clearTXEN; inline;
  94412. begin
  94413. pTDefRegMap(@Self)^.clr := $00000080;
  94414. end;
  94415. procedure TCAN1_C1FIFOCON18.setTXEN(thebits : TBits_1); inline;
  94416. begin
  94417. if thebits = 0 then
  94418. pTDefRegMap(@Self)^.clr := $00000080
  94419. else
  94420. pTDefRegMap(@Self)^.&set := $00000080;
  94421. end;
  94422. function TCAN1_C1FIFOCON18.getTXEN : TBits_1; inline;
  94423. begin
  94424. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  94425. end;
  94426. procedure TCAN1_C1FIFOCON18.setDONLY; inline;
  94427. begin
  94428. pTDefRegMap(@Self)^.&set := $00001000;
  94429. end;
  94430. procedure TCAN1_C1FIFOCON18.clearDONLY; inline;
  94431. begin
  94432. pTDefRegMap(@Self)^.clr := $00001000;
  94433. end;
  94434. procedure TCAN1_C1FIFOCON18.setDONLY(thebits : TBits_1); inline;
  94435. begin
  94436. if thebits = 0 then
  94437. pTDefRegMap(@Self)^.clr := $00001000
  94438. else
  94439. pTDefRegMap(@Self)^.&set := $00001000;
  94440. end;
  94441. function TCAN1_C1FIFOCON18.getDONLY : TBits_1; inline;
  94442. begin
  94443. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  94444. end;
  94445. procedure TCAN1_C1FIFOCON18.setUINC; inline;
  94446. begin
  94447. pTDefRegMap(@Self)^.&set := $00002000;
  94448. end;
  94449. procedure TCAN1_C1FIFOCON18.clearUINC; inline;
  94450. begin
  94451. pTDefRegMap(@Self)^.clr := $00002000;
  94452. end;
  94453. procedure TCAN1_C1FIFOCON18.setUINC(thebits : TBits_1); inline;
  94454. begin
  94455. if thebits = 0 then
  94456. pTDefRegMap(@Self)^.clr := $00002000
  94457. else
  94458. pTDefRegMap(@Self)^.&set := $00002000;
  94459. end;
  94460. function TCAN1_C1FIFOCON18.getUINC : TBits_1; inline;
  94461. begin
  94462. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  94463. end;
  94464. procedure TCAN1_C1FIFOCON18.setFRESET; inline;
  94465. begin
  94466. pTDefRegMap(@Self)^.&set := $00004000;
  94467. end;
  94468. procedure TCAN1_C1FIFOCON18.clearFRESET; inline;
  94469. begin
  94470. pTDefRegMap(@Self)^.clr := $00004000;
  94471. end;
  94472. procedure TCAN1_C1FIFOCON18.setFRESET(thebits : TBits_1); inline;
  94473. begin
  94474. if thebits = 0 then
  94475. pTDefRegMap(@Self)^.clr := $00004000
  94476. else
  94477. pTDefRegMap(@Self)^.&set := $00004000;
  94478. end;
  94479. function TCAN1_C1FIFOCON18.getFRESET : TBits_1; inline;
  94480. begin
  94481. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  94482. end;
  94483. procedure TCAN1_C1FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  94484. begin
  94485. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  94486. end;
  94487. function TCAN1_C1FIFOCON18.getFSIZE : TBits_5; inline;
  94488. begin
  94489. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  94490. end;
  94491. procedure TCAN1_C1FIFOCON18.setw(thebits : TBits_32); inline;
  94492. begin
  94493. pTDefRegMap(@Self)^.val := thebits;
  94494. end;
  94495. function TCAN1_C1FIFOCON18.getw : TBits_32; inline;
  94496. begin
  94497. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94498. end;
  94499. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF; inline;
  94500. begin
  94501. pTDefRegMap(@Self)^.&set := $00000001;
  94502. end;
  94503. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIF; inline;
  94504. begin
  94505. pTDefRegMap(@Self)^.clr := $00000001;
  94506. end;
  94507. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  94508. begin
  94509. if thebits = 0 then
  94510. pTDefRegMap(@Self)^.clr := $00000001
  94511. else
  94512. pTDefRegMap(@Self)^.&set := $00000001;
  94513. end;
  94514. function TCAN1_C1FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  94515. begin
  94516. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  94517. end;
  94518. procedure TCAN1_C1FIFOINT18.setRXHALFIF; inline;
  94519. begin
  94520. pTDefRegMap(@Self)^.&set := $00000002;
  94521. end;
  94522. procedure TCAN1_C1FIFOINT18.clearRXHALFIF; inline;
  94523. begin
  94524. pTDefRegMap(@Self)^.clr := $00000002;
  94525. end;
  94526. procedure TCAN1_C1FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  94527. begin
  94528. if thebits = 0 then
  94529. pTDefRegMap(@Self)^.clr := $00000002
  94530. else
  94531. pTDefRegMap(@Self)^.&set := $00000002;
  94532. end;
  94533. function TCAN1_C1FIFOINT18.getRXHALFIF : TBits_1; inline;
  94534. begin
  94535. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  94536. end;
  94537. procedure TCAN1_C1FIFOINT18.setRXFULLIF; inline;
  94538. begin
  94539. pTDefRegMap(@Self)^.&set := $00000004;
  94540. end;
  94541. procedure TCAN1_C1FIFOINT18.clearRXFULLIF; inline;
  94542. begin
  94543. pTDefRegMap(@Self)^.clr := $00000004;
  94544. end;
  94545. procedure TCAN1_C1FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  94546. begin
  94547. if thebits = 0 then
  94548. pTDefRegMap(@Self)^.clr := $00000004
  94549. else
  94550. pTDefRegMap(@Self)^.&set := $00000004;
  94551. end;
  94552. function TCAN1_C1FIFOINT18.getRXFULLIF : TBits_1; inline;
  94553. begin
  94554. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94555. end;
  94556. procedure TCAN1_C1FIFOINT18.setRXOVFLIF; inline;
  94557. begin
  94558. pTDefRegMap(@Self)^.&set := $00000008;
  94559. end;
  94560. procedure TCAN1_C1FIFOINT18.clearRXOVFLIF; inline;
  94561. begin
  94562. pTDefRegMap(@Self)^.clr := $00000008;
  94563. end;
  94564. procedure TCAN1_C1FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  94565. begin
  94566. if thebits = 0 then
  94567. pTDefRegMap(@Self)^.clr := $00000008
  94568. else
  94569. pTDefRegMap(@Self)^.&set := $00000008;
  94570. end;
  94571. function TCAN1_C1FIFOINT18.getRXOVFLIF : TBits_1; inline;
  94572. begin
  94573. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94574. end;
  94575. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF; inline;
  94576. begin
  94577. pTDefRegMap(@Self)^.&set := $00000100;
  94578. end;
  94579. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIF; inline;
  94580. begin
  94581. pTDefRegMap(@Self)^.clr := $00000100;
  94582. end;
  94583. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  94584. begin
  94585. if thebits = 0 then
  94586. pTDefRegMap(@Self)^.clr := $00000100
  94587. else
  94588. pTDefRegMap(@Self)^.&set := $00000100;
  94589. end;
  94590. function TCAN1_C1FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  94591. begin
  94592. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  94593. end;
  94594. procedure TCAN1_C1FIFOINT18.setTXHALFIF; inline;
  94595. begin
  94596. pTDefRegMap(@Self)^.&set := $00000200;
  94597. end;
  94598. procedure TCAN1_C1FIFOINT18.clearTXHALFIF; inline;
  94599. begin
  94600. pTDefRegMap(@Self)^.clr := $00000200;
  94601. end;
  94602. procedure TCAN1_C1FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  94603. begin
  94604. if thebits = 0 then
  94605. pTDefRegMap(@Self)^.clr := $00000200
  94606. else
  94607. pTDefRegMap(@Self)^.&set := $00000200;
  94608. end;
  94609. function TCAN1_C1FIFOINT18.getTXHALFIF : TBits_1; inline;
  94610. begin
  94611. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  94612. end;
  94613. procedure TCAN1_C1FIFOINT18.setTXNFULLIF; inline;
  94614. begin
  94615. pTDefRegMap(@Self)^.&set := $00000400;
  94616. end;
  94617. procedure TCAN1_C1FIFOINT18.clearTXNFULLIF; inline;
  94618. begin
  94619. pTDefRegMap(@Self)^.clr := $00000400;
  94620. end;
  94621. procedure TCAN1_C1FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  94622. begin
  94623. if thebits = 0 then
  94624. pTDefRegMap(@Self)^.clr := $00000400
  94625. else
  94626. pTDefRegMap(@Self)^.&set := $00000400;
  94627. end;
  94628. function TCAN1_C1FIFOINT18.getTXNFULLIF : TBits_1; inline;
  94629. begin
  94630. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  94631. end;
  94632. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE; inline;
  94633. begin
  94634. pTDefRegMap(@Self)^.&set := $00010000;
  94635. end;
  94636. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIE; inline;
  94637. begin
  94638. pTDefRegMap(@Self)^.clr := $00010000;
  94639. end;
  94640. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  94641. begin
  94642. if thebits = 0 then
  94643. pTDefRegMap(@Self)^.clr := $00010000
  94644. else
  94645. pTDefRegMap(@Self)^.&set := $00010000;
  94646. end;
  94647. function TCAN1_C1FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  94648. begin
  94649. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  94650. end;
  94651. procedure TCAN1_C1FIFOINT18.setRXHALFIE; inline;
  94652. begin
  94653. pTDefRegMap(@Self)^.&set := $00020000;
  94654. end;
  94655. procedure TCAN1_C1FIFOINT18.clearRXHALFIE; inline;
  94656. begin
  94657. pTDefRegMap(@Self)^.clr := $00020000;
  94658. end;
  94659. procedure TCAN1_C1FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  94660. begin
  94661. if thebits = 0 then
  94662. pTDefRegMap(@Self)^.clr := $00020000
  94663. else
  94664. pTDefRegMap(@Self)^.&set := $00020000;
  94665. end;
  94666. function TCAN1_C1FIFOINT18.getRXHALFIE : TBits_1; inline;
  94667. begin
  94668. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  94669. end;
  94670. procedure TCAN1_C1FIFOINT18.setRXFULLIE; inline;
  94671. begin
  94672. pTDefRegMap(@Self)^.&set := $00040000;
  94673. end;
  94674. procedure TCAN1_C1FIFOINT18.clearRXFULLIE; inline;
  94675. begin
  94676. pTDefRegMap(@Self)^.clr := $00040000;
  94677. end;
  94678. procedure TCAN1_C1FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  94679. begin
  94680. if thebits = 0 then
  94681. pTDefRegMap(@Self)^.clr := $00040000
  94682. else
  94683. pTDefRegMap(@Self)^.&set := $00040000;
  94684. end;
  94685. function TCAN1_C1FIFOINT18.getRXFULLIE : TBits_1; inline;
  94686. begin
  94687. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  94688. end;
  94689. procedure TCAN1_C1FIFOINT18.setRXOVFLIE; inline;
  94690. begin
  94691. pTDefRegMap(@Self)^.&set := $00080000;
  94692. end;
  94693. procedure TCAN1_C1FIFOINT18.clearRXOVFLIE; inline;
  94694. begin
  94695. pTDefRegMap(@Self)^.clr := $00080000;
  94696. end;
  94697. procedure TCAN1_C1FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  94698. begin
  94699. if thebits = 0 then
  94700. pTDefRegMap(@Self)^.clr := $00080000
  94701. else
  94702. pTDefRegMap(@Self)^.&set := $00080000;
  94703. end;
  94704. function TCAN1_C1FIFOINT18.getRXOVFLIE : TBits_1; inline;
  94705. begin
  94706. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  94707. end;
  94708. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE; inline;
  94709. begin
  94710. pTDefRegMap(@Self)^.&set := $01000000;
  94711. end;
  94712. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIE; inline;
  94713. begin
  94714. pTDefRegMap(@Self)^.clr := $01000000;
  94715. end;
  94716. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  94717. begin
  94718. if thebits = 0 then
  94719. pTDefRegMap(@Self)^.clr := $01000000
  94720. else
  94721. pTDefRegMap(@Self)^.&set := $01000000;
  94722. end;
  94723. function TCAN1_C1FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  94724. begin
  94725. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  94726. end;
  94727. procedure TCAN1_C1FIFOINT18.setTXHALFIE; inline;
  94728. begin
  94729. pTDefRegMap(@Self)^.&set := $02000000;
  94730. end;
  94731. procedure TCAN1_C1FIFOINT18.clearTXHALFIE; inline;
  94732. begin
  94733. pTDefRegMap(@Self)^.clr := $02000000;
  94734. end;
  94735. procedure TCAN1_C1FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  94736. begin
  94737. if thebits = 0 then
  94738. pTDefRegMap(@Self)^.clr := $02000000
  94739. else
  94740. pTDefRegMap(@Self)^.&set := $02000000;
  94741. end;
  94742. function TCAN1_C1FIFOINT18.getTXHALFIE : TBits_1; inline;
  94743. begin
  94744. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  94745. end;
  94746. procedure TCAN1_C1FIFOINT18.setTXNFULLIE; inline;
  94747. begin
  94748. pTDefRegMap(@Self)^.&set := $04000000;
  94749. end;
  94750. procedure TCAN1_C1FIFOINT18.clearTXNFULLIE; inline;
  94751. begin
  94752. pTDefRegMap(@Self)^.clr := $04000000;
  94753. end;
  94754. procedure TCAN1_C1FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  94755. begin
  94756. if thebits = 0 then
  94757. pTDefRegMap(@Self)^.clr := $04000000
  94758. else
  94759. pTDefRegMap(@Self)^.&set := $04000000;
  94760. end;
  94761. function TCAN1_C1FIFOINT18.getTXNFULLIE : TBits_1; inline;
  94762. begin
  94763. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  94764. end;
  94765. procedure TCAN1_C1FIFOINT18.setw(thebits : TBits_32); inline;
  94766. begin
  94767. pTDefRegMap(@Self)^.val := thebits;
  94768. end;
  94769. function TCAN1_C1FIFOINT18.getw : TBits_32; inline;
  94770. begin
  94771. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94772. end;
  94773. procedure TCAN1_C1FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  94774. begin
  94775. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  94776. end;
  94777. function TCAN1_C1FIFOCI18.getCFIFOCI : TBits_5; inline;
  94778. begin
  94779. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  94780. end;
  94781. procedure TCAN1_C1FIFOCI18.setw(thebits : TBits_32); inline;
  94782. begin
  94783. pTDefRegMap(@Self)^.val := thebits;
  94784. end;
  94785. function TCAN1_C1FIFOCI18.getw : TBits_32; inline;
  94786. begin
  94787. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94788. end;
  94789. procedure TCAN1_C1FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  94790. begin
  94791. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  94792. end;
  94793. function TCAN1_C1FIFOCON19.getTXPRI : TBits_2; inline;
  94794. begin
  94795. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  94796. end;
  94797. procedure TCAN1_C1FIFOCON19.setRTREN; inline;
  94798. begin
  94799. pTDefRegMap(@Self)^.&set := $00000004;
  94800. end;
  94801. procedure TCAN1_C1FIFOCON19.clearRTREN; inline;
  94802. begin
  94803. pTDefRegMap(@Self)^.clr := $00000004;
  94804. end;
  94805. procedure TCAN1_C1FIFOCON19.setRTREN(thebits : TBits_1); inline;
  94806. begin
  94807. if thebits = 0 then
  94808. pTDefRegMap(@Self)^.clr := $00000004
  94809. else
  94810. pTDefRegMap(@Self)^.&set := $00000004;
  94811. end;
  94812. function TCAN1_C1FIFOCON19.getRTREN : TBits_1; inline;
  94813. begin
  94814. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94815. end;
  94816. procedure TCAN1_C1FIFOCON19.setTXREQ; inline;
  94817. begin
  94818. pTDefRegMap(@Self)^.&set := $00000008;
  94819. end;
  94820. procedure TCAN1_C1FIFOCON19.clearTXREQ; inline;
  94821. begin
  94822. pTDefRegMap(@Self)^.clr := $00000008;
  94823. end;
  94824. procedure TCAN1_C1FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  94825. begin
  94826. if thebits = 0 then
  94827. pTDefRegMap(@Self)^.clr := $00000008
  94828. else
  94829. pTDefRegMap(@Self)^.&set := $00000008;
  94830. end;
  94831. function TCAN1_C1FIFOCON19.getTXREQ : TBits_1; inline;
  94832. begin
  94833. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94834. end;
  94835. procedure TCAN1_C1FIFOCON19.setTXERR; inline;
  94836. begin
  94837. pTDefRegMap(@Self)^.&set := $00000010;
  94838. end;
  94839. procedure TCAN1_C1FIFOCON19.clearTXERR; inline;
  94840. begin
  94841. pTDefRegMap(@Self)^.clr := $00000010;
  94842. end;
  94843. procedure TCAN1_C1FIFOCON19.setTXERR(thebits : TBits_1); inline;
  94844. begin
  94845. if thebits = 0 then
  94846. pTDefRegMap(@Self)^.clr := $00000010
  94847. else
  94848. pTDefRegMap(@Self)^.&set := $00000010;
  94849. end;
  94850. function TCAN1_C1FIFOCON19.getTXERR : TBits_1; inline;
  94851. begin
  94852. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  94853. end;
  94854. procedure TCAN1_C1FIFOCON19.setTXLARB; inline;
  94855. begin
  94856. pTDefRegMap(@Self)^.&set := $00000020;
  94857. end;
  94858. procedure TCAN1_C1FIFOCON19.clearTXLARB; inline;
  94859. begin
  94860. pTDefRegMap(@Self)^.clr := $00000020;
  94861. end;
  94862. procedure TCAN1_C1FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  94863. begin
  94864. if thebits = 0 then
  94865. pTDefRegMap(@Self)^.clr := $00000020
  94866. else
  94867. pTDefRegMap(@Self)^.&set := $00000020;
  94868. end;
  94869. function TCAN1_C1FIFOCON19.getTXLARB : TBits_1; inline;
  94870. begin
  94871. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  94872. end;
  94873. procedure TCAN1_C1FIFOCON19.setTXABAT; inline;
  94874. begin
  94875. pTDefRegMap(@Self)^.&set := $00000040;
  94876. end;
  94877. procedure TCAN1_C1FIFOCON19.clearTXABAT; inline;
  94878. begin
  94879. pTDefRegMap(@Self)^.clr := $00000040;
  94880. end;
  94881. procedure TCAN1_C1FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  94882. begin
  94883. if thebits = 0 then
  94884. pTDefRegMap(@Self)^.clr := $00000040
  94885. else
  94886. pTDefRegMap(@Self)^.&set := $00000040;
  94887. end;
  94888. function TCAN1_C1FIFOCON19.getTXABAT : TBits_1; inline;
  94889. begin
  94890. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  94891. end;
  94892. procedure TCAN1_C1FIFOCON19.setTXEN; inline;
  94893. begin
  94894. pTDefRegMap(@Self)^.&set := $00000080;
  94895. end;
  94896. procedure TCAN1_C1FIFOCON19.clearTXEN; inline;
  94897. begin
  94898. pTDefRegMap(@Self)^.clr := $00000080;
  94899. end;
  94900. procedure TCAN1_C1FIFOCON19.setTXEN(thebits : TBits_1); inline;
  94901. begin
  94902. if thebits = 0 then
  94903. pTDefRegMap(@Self)^.clr := $00000080
  94904. else
  94905. pTDefRegMap(@Self)^.&set := $00000080;
  94906. end;
  94907. function TCAN1_C1FIFOCON19.getTXEN : TBits_1; inline;
  94908. begin
  94909. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  94910. end;
  94911. procedure TCAN1_C1FIFOCON19.setDONLY; inline;
  94912. begin
  94913. pTDefRegMap(@Self)^.&set := $00001000;
  94914. end;
  94915. procedure TCAN1_C1FIFOCON19.clearDONLY; inline;
  94916. begin
  94917. pTDefRegMap(@Self)^.clr := $00001000;
  94918. end;
  94919. procedure TCAN1_C1FIFOCON19.setDONLY(thebits : TBits_1); inline;
  94920. begin
  94921. if thebits = 0 then
  94922. pTDefRegMap(@Self)^.clr := $00001000
  94923. else
  94924. pTDefRegMap(@Self)^.&set := $00001000;
  94925. end;
  94926. function TCAN1_C1FIFOCON19.getDONLY : TBits_1; inline;
  94927. begin
  94928. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  94929. end;
  94930. procedure TCAN1_C1FIFOCON19.setUINC; inline;
  94931. begin
  94932. pTDefRegMap(@Self)^.&set := $00002000;
  94933. end;
  94934. procedure TCAN1_C1FIFOCON19.clearUINC; inline;
  94935. begin
  94936. pTDefRegMap(@Self)^.clr := $00002000;
  94937. end;
  94938. procedure TCAN1_C1FIFOCON19.setUINC(thebits : TBits_1); inline;
  94939. begin
  94940. if thebits = 0 then
  94941. pTDefRegMap(@Self)^.clr := $00002000
  94942. else
  94943. pTDefRegMap(@Self)^.&set := $00002000;
  94944. end;
  94945. function TCAN1_C1FIFOCON19.getUINC : TBits_1; inline;
  94946. begin
  94947. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  94948. end;
  94949. procedure TCAN1_C1FIFOCON19.setFRESET; inline;
  94950. begin
  94951. pTDefRegMap(@Self)^.&set := $00004000;
  94952. end;
  94953. procedure TCAN1_C1FIFOCON19.clearFRESET; inline;
  94954. begin
  94955. pTDefRegMap(@Self)^.clr := $00004000;
  94956. end;
  94957. procedure TCAN1_C1FIFOCON19.setFRESET(thebits : TBits_1); inline;
  94958. begin
  94959. if thebits = 0 then
  94960. pTDefRegMap(@Self)^.clr := $00004000
  94961. else
  94962. pTDefRegMap(@Self)^.&set := $00004000;
  94963. end;
  94964. function TCAN1_C1FIFOCON19.getFRESET : TBits_1; inline;
  94965. begin
  94966. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  94967. end;
  94968. procedure TCAN1_C1FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  94969. begin
  94970. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  94971. end;
  94972. function TCAN1_C1FIFOCON19.getFSIZE : TBits_5; inline;
  94973. begin
  94974. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  94975. end;
  94976. procedure TCAN1_C1FIFOCON19.setw(thebits : TBits_32); inline;
  94977. begin
  94978. pTDefRegMap(@Self)^.val := thebits;
  94979. end;
  94980. function TCAN1_C1FIFOCON19.getw : TBits_32; inline;
  94981. begin
  94982. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94983. end;
  94984. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF; inline;
  94985. begin
  94986. pTDefRegMap(@Self)^.&set := $00000001;
  94987. end;
  94988. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIF; inline;
  94989. begin
  94990. pTDefRegMap(@Self)^.clr := $00000001;
  94991. end;
  94992. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  94993. begin
  94994. if thebits = 0 then
  94995. pTDefRegMap(@Self)^.clr := $00000001
  94996. else
  94997. pTDefRegMap(@Self)^.&set := $00000001;
  94998. end;
  94999. function TCAN1_C1FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  95000. begin
  95001. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  95002. end;
  95003. procedure TCAN1_C1FIFOINT19.setRXHALFIF; inline;
  95004. begin
  95005. pTDefRegMap(@Self)^.&set := $00000002;
  95006. end;
  95007. procedure TCAN1_C1FIFOINT19.clearRXHALFIF; inline;
  95008. begin
  95009. pTDefRegMap(@Self)^.clr := $00000002;
  95010. end;
  95011. procedure TCAN1_C1FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  95012. begin
  95013. if thebits = 0 then
  95014. pTDefRegMap(@Self)^.clr := $00000002
  95015. else
  95016. pTDefRegMap(@Self)^.&set := $00000002;
  95017. end;
  95018. function TCAN1_C1FIFOINT19.getRXHALFIF : TBits_1; inline;
  95019. begin
  95020. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  95021. end;
  95022. procedure TCAN1_C1FIFOINT19.setRXFULLIF; inline;
  95023. begin
  95024. pTDefRegMap(@Self)^.&set := $00000004;
  95025. end;
  95026. procedure TCAN1_C1FIFOINT19.clearRXFULLIF; inline;
  95027. begin
  95028. pTDefRegMap(@Self)^.clr := $00000004;
  95029. end;
  95030. procedure TCAN1_C1FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  95031. begin
  95032. if thebits = 0 then
  95033. pTDefRegMap(@Self)^.clr := $00000004
  95034. else
  95035. pTDefRegMap(@Self)^.&set := $00000004;
  95036. end;
  95037. function TCAN1_C1FIFOINT19.getRXFULLIF : TBits_1; inline;
  95038. begin
  95039. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95040. end;
  95041. procedure TCAN1_C1FIFOINT19.setRXOVFLIF; inline;
  95042. begin
  95043. pTDefRegMap(@Self)^.&set := $00000008;
  95044. end;
  95045. procedure TCAN1_C1FIFOINT19.clearRXOVFLIF; inline;
  95046. begin
  95047. pTDefRegMap(@Self)^.clr := $00000008;
  95048. end;
  95049. procedure TCAN1_C1FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  95050. begin
  95051. if thebits = 0 then
  95052. pTDefRegMap(@Self)^.clr := $00000008
  95053. else
  95054. pTDefRegMap(@Self)^.&set := $00000008;
  95055. end;
  95056. function TCAN1_C1FIFOINT19.getRXOVFLIF : TBits_1; inline;
  95057. begin
  95058. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95059. end;
  95060. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF; inline;
  95061. begin
  95062. pTDefRegMap(@Self)^.&set := $00000100;
  95063. end;
  95064. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIF; inline;
  95065. begin
  95066. pTDefRegMap(@Self)^.clr := $00000100;
  95067. end;
  95068. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  95069. begin
  95070. if thebits = 0 then
  95071. pTDefRegMap(@Self)^.clr := $00000100
  95072. else
  95073. pTDefRegMap(@Self)^.&set := $00000100;
  95074. end;
  95075. function TCAN1_C1FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  95076. begin
  95077. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  95078. end;
  95079. procedure TCAN1_C1FIFOINT19.setTXHALFIF; inline;
  95080. begin
  95081. pTDefRegMap(@Self)^.&set := $00000200;
  95082. end;
  95083. procedure TCAN1_C1FIFOINT19.clearTXHALFIF; inline;
  95084. begin
  95085. pTDefRegMap(@Self)^.clr := $00000200;
  95086. end;
  95087. procedure TCAN1_C1FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  95088. begin
  95089. if thebits = 0 then
  95090. pTDefRegMap(@Self)^.clr := $00000200
  95091. else
  95092. pTDefRegMap(@Self)^.&set := $00000200;
  95093. end;
  95094. function TCAN1_C1FIFOINT19.getTXHALFIF : TBits_1; inline;
  95095. begin
  95096. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  95097. end;
  95098. procedure TCAN1_C1FIFOINT19.setTXNFULLIF; inline;
  95099. begin
  95100. pTDefRegMap(@Self)^.&set := $00000400;
  95101. end;
  95102. procedure TCAN1_C1FIFOINT19.clearTXNFULLIF; inline;
  95103. begin
  95104. pTDefRegMap(@Self)^.clr := $00000400;
  95105. end;
  95106. procedure TCAN1_C1FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  95107. begin
  95108. if thebits = 0 then
  95109. pTDefRegMap(@Self)^.clr := $00000400
  95110. else
  95111. pTDefRegMap(@Self)^.&set := $00000400;
  95112. end;
  95113. function TCAN1_C1FIFOINT19.getTXNFULLIF : TBits_1; inline;
  95114. begin
  95115. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  95116. end;
  95117. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE; inline;
  95118. begin
  95119. pTDefRegMap(@Self)^.&set := $00010000;
  95120. end;
  95121. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIE; inline;
  95122. begin
  95123. pTDefRegMap(@Self)^.clr := $00010000;
  95124. end;
  95125. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  95126. begin
  95127. if thebits = 0 then
  95128. pTDefRegMap(@Self)^.clr := $00010000
  95129. else
  95130. pTDefRegMap(@Self)^.&set := $00010000;
  95131. end;
  95132. function TCAN1_C1FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  95133. begin
  95134. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  95135. end;
  95136. procedure TCAN1_C1FIFOINT19.setRXHALFIE; inline;
  95137. begin
  95138. pTDefRegMap(@Self)^.&set := $00020000;
  95139. end;
  95140. procedure TCAN1_C1FIFOINT19.clearRXHALFIE; inline;
  95141. begin
  95142. pTDefRegMap(@Self)^.clr := $00020000;
  95143. end;
  95144. procedure TCAN1_C1FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  95145. begin
  95146. if thebits = 0 then
  95147. pTDefRegMap(@Self)^.clr := $00020000
  95148. else
  95149. pTDefRegMap(@Self)^.&set := $00020000;
  95150. end;
  95151. function TCAN1_C1FIFOINT19.getRXHALFIE : TBits_1; inline;
  95152. begin
  95153. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  95154. end;
  95155. procedure TCAN1_C1FIFOINT19.setRXFULLIE; inline;
  95156. begin
  95157. pTDefRegMap(@Self)^.&set := $00040000;
  95158. end;
  95159. procedure TCAN1_C1FIFOINT19.clearRXFULLIE; inline;
  95160. begin
  95161. pTDefRegMap(@Self)^.clr := $00040000;
  95162. end;
  95163. procedure TCAN1_C1FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  95164. begin
  95165. if thebits = 0 then
  95166. pTDefRegMap(@Self)^.clr := $00040000
  95167. else
  95168. pTDefRegMap(@Self)^.&set := $00040000;
  95169. end;
  95170. function TCAN1_C1FIFOINT19.getRXFULLIE : TBits_1; inline;
  95171. begin
  95172. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  95173. end;
  95174. procedure TCAN1_C1FIFOINT19.setRXOVFLIE; inline;
  95175. begin
  95176. pTDefRegMap(@Self)^.&set := $00080000;
  95177. end;
  95178. procedure TCAN1_C1FIFOINT19.clearRXOVFLIE; inline;
  95179. begin
  95180. pTDefRegMap(@Self)^.clr := $00080000;
  95181. end;
  95182. procedure TCAN1_C1FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  95183. begin
  95184. if thebits = 0 then
  95185. pTDefRegMap(@Self)^.clr := $00080000
  95186. else
  95187. pTDefRegMap(@Self)^.&set := $00080000;
  95188. end;
  95189. function TCAN1_C1FIFOINT19.getRXOVFLIE : TBits_1; inline;
  95190. begin
  95191. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  95192. end;
  95193. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE; inline;
  95194. begin
  95195. pTDefRegMap(@Self)^.&set := $01000000;
  95196. end;
  95197. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIE; inline;
  95198. begin
  95199. pTDefRegMap(@Self)^.clr := $01000000;
  95200. end;
  95201. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  95202. begin
  95203. if thebits = 0 then
  95204. pTDefRegMap(@Self)^.clr := $01000000
  95205. else
  95206. pTDefRegMap(@Self)^.&set := $01000000;
  95207. end;
  95208. function TCAN1_C1FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  95209. begin
  95210. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  95211. end;
  95212. procedure TCAN1_C1FIFOINT19.setTXHALFIE; inline;
  95213. begin
  95214. pTDefRegMap(@Self)^.&set := $02000000;
  95215. end;
  95216. procedure TCAN1_C1FIFOINT19.clearTXHALFIE; inline;
  95217. begin
  95218. pTDefRegMap(@Self)^.clr := $02000000;
  95219. end;
  95220. procedure TCAN1_C1FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  95221. begin
  95222. if thebits = 0 then
  95223. pTDefRegMap(@Self)^.clr := $02000000
  95224. else
  95225. pTDefRegMap(@Self)^.&set := $02000000;
  95226. end;
  95227. function TCAN1_C1FIFOINT19.getTXHALFIE : TBits_1; inline;
  95228. begin
  95229. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  95230. end;
  95231. procedure TCAN1_C1FIFOINT19.setTXNFULLIE; inline;
  95232. begin
  95233. pTDefRegMap(@Self)^.&set := $04000000;
  95234. end;
  95235. procedure TCAN1_C1FIFOINT19.clearTXNFULLIE; inline;
  95236. begin
  95237. pTDefRegMap(@Self)^.clr := $04000000;
  95238. end;
  95239. procedure TCAN1_C1FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  95240. begin
  95241. if thebits = 0 then
  95242. pTDefRegMap(@Self)^.clr := $04000000
  95243. else
  95244. pTDefRegMap(@Self)^.&set := $04000000;
  95245. end;
  95246. function TCAN1_C1FIFOINT19.getTXNFULLIE : TBits_1; inline;
  95247. begin
  95248. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  95249. end;
  95250. procedure TCAN1_C1FIFOINT19.setw(thebits : TBits_32); inline;
  95251. begin
  95252. pTDefRegMap(@Self)^.val := thebits;
  95253. end;
  95254. function TCAN1_C1FIFOINT19.getw : TBits_32; inline;
  95255. begin
  95256. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95257. end;
  95258. procedure TCAN1_C1FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  95259. begin
  95260. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  95261. end;
  95262. function TCAN1_C1FIFOCI19.getCFIFOCI : TBits_5; inline;
  95263. begin
  95264. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  95265. end;
  95266. procedure TCAN1_C1FIFOCI19.setw(thebits : TBits_32); inline;
  95267. begin
  95268. pTDefRegMap(@Self)^.val := thebits;
  95269. end;
  95270. function TCAN1_C1FIFOCI19.getw : TBits_32; inline;
  95271. begin
  95272. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95273. end;
  95274. procedure TCAN1_C1FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  95275. begin
  95276. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  95277. end;
  95278. function TCAN1_C1FIFOCON20.getTXPRI : TBits_2; inline;
  95279. begin
  95280. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  95281. end;
  95282. procedure TCAN1_C1FIFOCON20.setRTREN; inline;
  95283. begin
  95284. pTDefRegMap(@Self)^.&set := $00000004;
  95285. end;
  95286. procedure TCAN1_C1FIFOCON20.clearRTREN; inline;
  95287. begin
  95288. pTDefRegMap(@Self)^.clr := $00000004;
  95289. end;
  95290. procedure TCAN1_C1FIFOCON20.setRTREN(thebits : TBits_1); inline;
  95291. begin
  95292. if thebits = 0 then
  95293. pTDefRegMap(@Self)^.clr := $00000004
  95294. else
  95295. pTDefRegMap(@Self)^.&set := $00000004;
  95296. end;
  95297. function TCAN1_C1FIFOCON20.getRTREN : TBits_1; inline;
  95298. begin
  95299. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95300. end;
  95301. procedure TCAN1_C1FIFOCON20.setTXREQ; inline;
  95302. begin
  95303. pTDefRegMap(@Self)^.&set := $00000008;
  95304. end;
  95305. procedure TCAN1_C1FIFOCON20.clearTXREQ; inline;
  95306. begin
  95307. pTDefRegMap(@Self)^.clr := $00000008;
  95308. end;
  95309. procedure TCAN1_C1FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  95310. begin
  95311. if thebits = 0 then
  95312. pTDefRegMap(@Self)^.clr := $00000008
  95313. else
  95314. pTDefRegMap(@Self)^.&set := $00000008;
  95315. end;
  95316. function TCAN1_C1FIFOCON20.getTXREQ : TBits_1; inline;
  95317. begin
  95318. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95319. end;
  95320. procedure TCAN1_C1FIFOCON20.setTXERR; inline;
  95321. begin
  95322. pTDefRegMap(@Self)^.&set := $00000010;
  95323. end;
  95324. procedure TCAN1_C1FIFOCON20.clearTXERR; inline;
  95325. begin
  95326. pTDefRegMap(@Self)^.clr := $00000010;
  95327. end;
  95328. procedure TCAN1_C1FIFOCON20.setTXERR(thebits : TBits_1); inline;
  95329. begin
  95330. if thebits = 0 then
  95331. pTDefRegMap(@Self)^.clr := $00000010
  95332. else
  95333. pTDefRegMap(@Self)^.&set := $00000010;
  95334. end;
  95335. function TCAN1_C1FIFOCON20.getTXERR : TBits_1; inline;
  95336. begin
  95337. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  95338. end;
  95339. procedure TCAN1_C1FIFOCON20.setTXLARB; inline;
  95340. begin
  95341. pTDefRegMap(@Self)^.&set := $00000020;
  95342. end;
  95343. procedure TCAN1_C1FIFOCON20.clearTXLARB; inline;
  95344. begin
  95345. pTDefRegMap(@Self)^.clr := $00000020;
  95346. end;
  95347. procedure TCAN1_C1FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  95348. begin
  95349. if thebits = 0 then
  95350. pTDefRegMap(@Self)^.clr := $00000020
  95351. else
  95352. pTDefRegMap(@Self)^.&set := $00000020;
  95353. end;
  95354. function TCAN1_C1FIFOCON20.getTXLARB : TBits_1; inline;
  95355. begin
  95356. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  95357. end;
  95358. procedure TCAN1_C1FIFOCON20.setTXABAT; inline;
  95359. begin
  95360. pTDefRegMap(@Self)^.&set := $00000040;
  95361. end;
  95362. procedure TCAN1_C1FIFOCON20.clearTXABAT; inline;
  95363. begin
  95364. pTDefRegMap(@Self)^.clr := $00000040;
  95365. end;
  95366. procedure TCAN1_C1FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  95367. begin
  95368. if thebits = 0 then
  95369. pTDefRegMap(@Self)^.clr := $00000040
  95370. else
  95371. pTDefRegMap(@Self)^.&set := $00000040;
  95372. end;
  95373. function TCAN1_C1FIFOCON20.getTXABAT : TBits_1; inline;
  95374. begin
  95375. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  95376. end;
  95377. procedure TCAN1_C1FIFOCON20.setTXEN; inline;
  95378. begin
  95379. pTDefRegMap(@Self)^.&set := $00000080;
  95380. end;
  95381. procedure TCAN1_C1FIFOCON20.clearTXEN; inline;
  95382. begin
  95383. pTDefRegMap(@Self)^.clr := $00000080;
  95384. end;
  95385. procedure TCAN1_C1FIFOCON20.setTXEN(thebits : TBits_1); inline;
  95386. begin
  95387. if thebits = 0 then
  95388. pTDefRegMap(@Self)^.clr := $00000080
  95389. else
  95390. pTDefRegMap(@Self)^.&set := $00000080;
  95391. end;
  95392. function TCAN1_C1FIFOCON20.getTXEN : TBits_1; inline;
  95393. begin
  95394. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  95395. end;
  95396. procedure TCAN1_C1FIFOCON20.setDONLY; inline;
  95397. begin
  95398. pTDefRegMap(@Self)^.&set := $00001000;
  95399. end;
  95400. procedure TCAN1_C1FIFOCON20.clearDONLY; inline;
  95401. begin
  95402. pTDefRegMap(@Self)^.clr := $00001000;
  95403. end;
  95404. procedure TCAN1_C1FIFOCON20.setDONLY(thebits : TBits_1); inline;
  95405. begin
  95406. if thebits = 0 then
  95407. pTDefRegMap(@Self)^.clr := $00001000
  95408. else
  95409. pTDefRegMap(@Self)^.&set := $00001000;
  95410. end;
  95411. function TCAN1_C1FIFOCON20.getDONLY : TBits_1; inline;
  95412. begin
  95413. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  95414. end;
  95415. procedure TCAN1_C1FIFOCON20.setUINC; inline;
  95416. begin
  95417. pTDefRegMap(@Self)^.&set := $00002000;
  95418. end;
  95419. procedure TCAN1_C1FIFOCON20.clearUINC; inline;
  95420. begin
  95421. pTDefRegMap(@Self)^.clr := $00002000;
  95422. end;
  95423. procedure TCAN1_C1FIFOCON20.setUINC(thebits : TBits_1); inline;
  95424. begin
  95425. if thebits = 0 then
  95426. pTDefRegMap(@Self)^.clr := $00002000
  95427. else
  95428. pTDefRegMap(@Self)^.&set := $00002000;
  95429. end;
  95430. function TCAN1_C1FIFOCON20.getUINC : TBits_1; inline;
  95431. begin
  95432. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  95433. end;
  95434. procedure TCAN1_C1FIFOCON20.setFRESET; inline;
  95435. begin
  95436. pTDefRegMap(@Self)^.&set := $00004000;
  95437. end;
  95438. procedure TCAN1_C1FIFOCON20.clearFRESET; inline;
  95439. begin
  95440. pTDefRegMap(@Self)^.clr := $00004000;
  95441. end;
  95442. procedure TCAN1_C1FIFOCON20.setFRESET(thebits : TBits_1); inline;
  95443. begin
  95444. if thebits = 0 then
  95445. pTDefRegMap(@Self)^.clr := $00004000
  95446. else
  95447. pTDefRegMap(@Self)^.&set := $00004000;
  95448. end;
  95449. function TCAN1_C1FIFOCON20.getFRESET : TBits_1; inline;
  95450. begin
  95451. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  95452. end;
  95453. procedure TCAN1_C1FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  95454. begin
  95455. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  95456. end;
  95457. function TCAN1_C1FIFOCON20.getFSIZE : TBits_5; inline;
  95458. begin
  95459. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  95460. end;
  95461. procedure TCAN1_C1FIFOCON20.setw(thebits : TBits_32); inline;
  95462. begin
  95463. pTDefRegMap(@Self)^.val := thebits;
  95464. end;
  95465. function TCAN1_C1FIFOCON20.getw : TBits_32; inline;
  95466. begin
  95467. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95468. end;
  95469. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF; inline;
  95470. begin
  95471. pTDefRegMap(@Self)^.&set := $00000001;
  95472. end;
  95473. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIF; inline;
  95474. begin
  95475. pTDefRegMap(@Self)^.clr := $00000001;
  95476. end;
  95477. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  95478. begin
  95479. if thebits = 0 then
  95480. pTDefRegMap(@Self)^.clr := $00000001
  95481. else
  95482. pTDefRegMap(@Self)^.&set := $00000001;
  95483. end;
  95484. function TCAN1_C1FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  95485. begin
  95486. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  95487. end;
  95488. procedure TCAN1_C1FIFOINT20.setRXHALFIF; inline;
  95489. begin
  95490. pTDefRegMap(@Self)^.&set := $00000002;
  95491. end;
  95492. procedure TCAN1_C1FIFOINT20.clearRXHALFIF; inline;
  95493. begin
  95494. pTDefRegMap(@Self)^.clr := $00000002;
  95495. end;
  95496. procedure TCAN1_C1FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  95497. begin
  95498. if thebits = 0 then
  95499. pTDefRegMap(@Self)^.clr := $00000002
  95500. else
  95501. pTDefRegMap(@Self)^.&set := $00000002;
  95502. end;
  95503. function TCAN1_C1FIFOINT20.getRXHALFIF : TBits_1; inline;
  95504. begin
  95505. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  95506. end;
  95507. procedure TCAN1_C1FIFOINT20.setRXFULLIF; inline;
  95508. begin
  95509. pTDefRegMap(@Self)^.&set := $00000004;
  95510. end;
  95511. procedure TCAN1_C1FIFOINT20.clearRXFULLIF; inline;
  95512. begin
  95513. pTDefRegMap(@Self)^.clr := $00000004;
  95514. end;
  95515. procedure TCAN1_C1FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  95516. begin
  95517. if thebits = 0 then
  95518. pTDefRegMap(@Self)^.clr := $00000004
  95519. else
  95520. pTDefRegMap(@Self)^.&set := $00000004;
  95521. end;
  95522. function TCAN1_C1FIFOINT20.getRXFULLIF : TBits_1; inline;
  95523. begin
  95524. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95525. end;
  95526. procedure TCAN1_C1FIFOINT20.setRXOVFLIF; inline;
  95527. begin
  95528. pTDefRegMap(@Self)^.&set := $00000008;
  95529. end;
  95530. procedure TCAN1_C1FIFOINT20.clearRXOVFLIF; inline;
  95531. begin
  95532. pTDefRegMap(@Self)^.clr := $00000008;
  95533. end;
  95534. procedure TCAN1_C1FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  95535. begin
  95536. if thebits = 0 then
  95537. pTDefRegMap(@Self)^.clr := $00000008
  95538. else
  95539. pTDefRegMap(@Self)^.&set := $00000008;
  95540. end;
  95541. function TCAN1_C1FIFOINT20.getRXOVFLIF : TBits_1; inline;
  95542. begin
  95543. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95544. end;
  95545. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF; inline;
  95546. begin
  95547. pTDefRegMap(@Self)^.&set := $00000100;
  95548. end;
  95549. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIF; inline;
  95550. begin
  95551. pTDefRegMap(@Self)^.clr := $00000100;
  95552. end;
  95553. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  95554. begin
  95555. if thebits = 0 then
  95556. pTDefRegMap(@Self)^.clr := $00000100
  95557. else
  95558. pTDefRegMap(@Self)^.&set := $00000100;
  95559. end;
  95560. function TCAN1_C1FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  95561. begin
  95562. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  95563. end;
  95564. procedure TCAN1_C1FIFOINT20.setTXHALFIF; inline;
  95565. begin
  95566. pTDefRegMap(@Self)^.&set := $00000200;
  95567. end;
  95568. procedure TCAN1_C1FIFOINT20.clearTXHALFIF; inline;
  95569. begin
  95570. pTDefRegMap(@Self)^.clr := $00000200;
  95571. end;
  95572. procedure TCAN1_C1FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  95573. begin
  95574. if thebits = 0 then
  95575. pTDefRegMap(@Self)^.clr := $00000200
  95576. else
  95577. pTDefRegMap(@Self)^.&set := $00000200;
  95578. end;
  95579. function TCAN1_C1FIFOINT20.getTXHALFIF : TBits_1; inline;
  95580. begin
  95581. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  95582. end;
  95583. procedure TCAN1_C1FIFOINT20.setTXNFULLIF; inline;
  95584. begin
  95585. pTDefRegMap(@Self)^.&set := $00000400;
  95586. end;
  95587. procedure TCAN1_C1FIFOINT20.clearTXNFULLIF; inline;
  95588. begin
  95589. pTDefRegMap(@Self)^.clr := $00000400;
  95590. end;
  95591. procedure TCAN1_C1FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  95592. begin
  95593. if thebits = 0 then
  95594. pTDefRegMap(@Self)^.clr := $00000400
  95595. else
  95596. pTDefRegMap(@Self)^.&set := $00000400;
  95597. end;
  95598. function TCAN1_C1FIFOINT20.getTXNFULLIF : TBits_1; inline;
  95599. begin
  95600. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  95601. end;
  95602. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE; inline;
  95603. begin
  95604. pTDefRegMap(@Self)^.&set := $00010000;
  95605. end;
  95606. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIE; inline;
  95607. begin
  95608. pTDefRegMap(@Self)^.clr := $00010000;
  95609. end;
  95610. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  95611. begin
  95612. if thebits = 0 then
  95613. pTDefRegMap(@Self)^.clr := $00010000
  95614. else
  95615. pTDefRegMap(@Self)^.&set := $00010000;
  95616. end;
  95617. function TCAN1_C1FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  95618. begin
  95619. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  95620. end;
  95621. procedure TCAN1_C1FIFOINT20.setRXHALFIE; inline;
  95622. begin
  95623. pTDefRegMap(@Self)^.&set := $00020000;
  95624. end;
  95625. procedure TCAN1_C1FIFOINT20.clearRXHALFIE; inline;
  95626. begin
  95627. pTDefRegMap(@Self)^.clr := $00020000;
  95628. end;
  95629. procedure TCAN1_C1FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  95630. begin
  95631. if thebits = 0 then
  95632. pTDefRegMap(@Self)^.clr := $00020000
  95633. else
  95634. pTDefRegMap(@Self)^.&set := $00020000;
  95635. end;
  95636. function TCAN1_C1FIFOINT20.getRXHALFIE : TBits_1; inline;
  95637. begin
  95638. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  95639. end;
  95640. procedure TCAN1_C1FIFOINT20.setRXFULLIE; inline;
  95641. begin
  95642. pTDefRegMap(@Self)^.&set := $00040000;
  95643. end;
  95644. procedure TCAN1_C1FIFOINT20.clearRXFULLIE; inline;
  95645. begin
  95646. pTDefRegMap(@Self)^.clr := $00040000;
  95647. end;
  95648. procedure TCAN1_C1FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  95649. begin
  95650. if thebits = 0 then
  95651. pTDefRegMap(@Self)^.clr := $00040000
  95652. else
  95653. pTDefRegMap(@Self)^.&set := $00040000;
  95654. end;
  95655. function TCAN1_C1FIFOINT20.getRXFULLIE : TBits_1; inline;
  95656. begin
  95657. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  95658. end;
  95659. procedure TCAN1_C1FIFOINT20.setRXOVFLIE; inline;
  95660. begin
  95661. pTDefRegMap(@Self)^.&set := $00080000;
  95662. end;
  95663. procedure TCAN1_C1FIFOINT20.clearRXOVFLIE; inline;
  95664. begin
  95665. pTDefRegMap(@Self)^.clr := $00080000;
  95666. end;
  95667. procedure TCAN1_C1FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  95668. begin
  95669. if thebits = 0 then
  95670. pTDefRegMap(@Self)^.clr := $00080000
  95671. else
  95672. pTDefRegMap(@Self)^.&set := $00080000;
  95673. end;
  95674. function TCAN1_C1FIFOINT20.getRXOVFLIE : TBits_1; inline;
  95675. begin
  95676. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  95677. end;
  95678. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE; inline;
  95679. begin
  95680. pTDefRegMap(@Self)^.&set := $01000000;
  95681. end;
  95682. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIE; inline;
  95683. begin
  95684. pTDefRegMap(@Self)^.clr := $01000000;
  95685. end;
  95686. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  95687. begin
  95688. if thebits = 0 then
  95689. pTDefRegMap(@Self)^.clr := $01000000
  95690. else
  95691. pTDefRegMap(@Self)^.&set := $01000000;
  95692. end;
  95693. function TCAN1_C1FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  95694. begin
  95695. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  95696. end;
  95697. procedure TCAN1_C1FIFOINT20.setTXHALFIE; inline;
  95698. begin
  95699. pTDefRegMap(@Self)^.&set := $02000000;
  95700. end;
  95701. procedure TCAN1_C1FIFOINT20.clearTXHALFIE; inline;
  95702. begin
  95703. pTDefRegMap(@Self)^.clr := $02000000;
  95704. end;
  95705. procedure TCAN1_C1FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  95706. begin
  95707. if thebits = 0 then
  95708. pTDefRegMap(@Self)^.clr := $02000000
  95709. else
  95710. pTDefRegMap(@Self)^.&set := $02000000;
  95711. end;
  95712. function TCAN1_C1FIFOINT20.getTXHALFIE : TBits_1; inline;
  95713. begin
  95714. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  95715. end;
  95716. procedure TCAN1_C1FIFOINT20.setTXNFULLIE; inline;
  95717. begin
  95718. pTDefRegMap(@Self)^.&set := $04000000;
  95719. end;
  95720. procedure TCAN1_C1FIFOINT20.clearTXNFULLIE; inline;
  95721. begin
  95722. pTDefRegMap(@Self)^.clr := $04000000;
  95723. end;
  95724. procedure TCAN1_C1FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  95725. begin
  95726. if thebits = 0 then
  95727. pTDefRegMap(@Self)^.clr := $04000000
  95728. else
  95729. pTDefRegMap(@Self)^.&set := $04000000;
  95730. end;
  95731. function TCAN1_C1FIFOINT20.getTXNFULLIE : TBits_1; inline;
  95732. begin
  95733. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  95734. end;
  95735. procedure TCAN1_C1FIFOINT20.setw(thebits : TBits_32); inline;
  95736. begin
  95737. pTDefRegMap(@Self)^.val := thebits;
  95738. end;
  95739. function TCAN1_C1FIFOINT20.getw : TBits_32; inline;
  95740. begin
  95741. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95742. end;
  95743. procedure TCAN1_C1FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  95744. begin
  95745. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  95746. end;
  95747. function TCAN1_C1FIFOCI20.getCFIFOCI : TBits_5; inline;
  95748. begin
  95749. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  95750. end;
  95751. procedure TCAN1_C1FIFOCI20.setw(thebits : TBits_32); inline;
  95752. begin
  95753. pTDefRegMap(@Self)^.val := thebits;
  95754. end;
  95755. function TCAN1_C1FIFOCI20.getw : TBits_32; inline;
  95756. begin
  95757. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95758. end;
  95759. procedure TCAN1_C1FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  95760. begin
  95761. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  95762. end;
  95763. function TCAN1_C1FIFOCON21.getTXPRI : TBits_2; inline;
  95764. begin
  95765. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  95766. end;
  95767. procedure TCAN1_C1FIFOCON21.setRTREN; inline;
  95768. begin
  95769. pTDefRegMap(@Self)^.&set := $00000004;
  95770. end;
  95771. procedure TCAN1_C1FIFOCON21.clearRTREN; inline;
  95772. begin
  95773. pTDefRegMap(@Self)^.clr := $00000004;
  95774. end;
  95775. procedure TCAN1_C1FIFOCON21.setRTREN(thebits : TBits_1); inline;
  95776. begin
  95777. if thebits = 0 then
  95778. pTDefRegMap(@Self)^.clr := $00000004
  95779. else
  95780. pTDefRegMap(@Self)^.&set := $00000004;
  95781. end;
  95782. function TCAN1_C1FIFOCON21.getRTREN : TBits_1; inline;
  95783. begin
  95784. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95785. end;
  95786. procedure TCAN1_C1FIFOCON21.setTXREQ; inline;
  95787. begin
  95788. pTDefRegMap(@Self)^.&set := $00000008;
  95789. end;
  95790. procedure TCAN1_C1FIFOCON21.clearTXREQ; inline;
  95791. begin
  95792. pTDefRegMap(@Self)^.clr := $00000008;
  95793. end;
  95794. procedure TCAN1_C1FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  95795. begin
  95796. if thebits = 0 then
  95797. pTDefRegMap(@Self)^.clr := $00000008
  95798. else
  95799. pTDefRegMap(@Self)^.&set := $00000008;
  95800. end;
  95801. function TCAN1_C1FIFOCON21.getTXREQ : TBits_1; inline;
  95802. begin
  95803. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95804. end;
  95805. procedure TCAN1_C1FIFOCON21.setTXERR; inline;
  95806. begin
  95807. pTDefRegMap(@Self)^.&set := $00000010;
  95808. end;
  95809. procedure TCAN1_C1FIFOCON21.clearTXERR; inline;
  95810. begin
  95811. pTDefRegMap(@Self)^.clr := $00000010;
  95812. end;
  95813. procedure TCAN1_C1FIFOCON21.setTXERR(thebits : TBits_1); inline;
  95814. begin
  95815. if thebits = 0 then
  95816. pTDefRegMap(@Self)^.clr := $00000010
  95817. else
  95818. pTDefRegMap(@Self)^.&set := $00000010;
  95819. end;
  95820. function TCAN1_C1FIFOCON21.getTXERR : TBits_1; inline;
  95821. begin
  95822. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  95823. end;
  95824. procedure TCAN1_C1FIFOCON21.setTXLARB; inline;
  95825. begin
  95826. pTDefRegMap(@Self)^.&set := $00000020;
  95827. end;
  95828. procedure TCAN1_C1FIFOCON21.clearTXLARB; inline;
  95829. begin
  95830. pTDefRegMap(@Self)^.clr := $00000020;
  95831. end;
  95832. procedure TCAN1_C1FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  95833. begin
  95834. if thebits = 0 then
  95835. pTDefRegMap(@Self)^.clr := $00000020
  95836. else
  95837. pTDefRegMap(@Self)^.&set := $00000020;
  95838. end;
  95839. function TCAN1_C1FIFOCON21.getTXLARB : TBits_1; inline;
  95840. begin
  95841. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  95842. end;
  95843. procedure TCAN1_C1FIFOCON21.setTXABAT; inline;
  95844. begin
  95845. pTDefRegMap(@Self)^.&set := $00000040;
  95846. end;
  95847. procedure TCAN1_C1FIFOCON21.clearTXABAT; inline;
  95848. begin
  95849. pTDefRegMap(@Self)^.clr := $00000040;
  95850. end;
  95851. procedure TCAN1_C1FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  95852. begin
  95853. if thebits = 0 then
  95854. pTDefRegMap(@Self)^.clr := $00000040
  95855. else
  95856. pTDefRegMap(@Self)^.&set := $00000040;
  95857. end;
  95858. function TCAN1_C1FIFOCON21.getTXABAT : TBits_1; inline;
  95859. begin
  95860. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  95861. end;
  95862. procedure TCAN1_C1FIFOCON21.setTXEN; inline;
  95863. begin
  95864. pTDefRegMap(@Self)^.&set := $00000080;
  95865. end;
  95866. procedure TCAN1_C1FIFOCON21.clearTXEN; inline;
  95867. begin
  95868. pTDefRegMap(@Self)^.clr := $00000080;
  95869. end;
  95870. procedure TCAN1_C1FIFOCON21.setTXEN(thebits : TBits_1); inline;
  95871. begin
  95872. if thebits = 0 then
  95873. pTDefRegMap(@Self)^.clr := $00000080
  95874. else
  95875. pTDefRegMap(@Self)^.&set := $00000080;
  95876. end;
  95877. function TCAN1_C1FIFOCON21.getTXEN : TBits_1; inline;
  95878. begin
  95879. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  95880. end;
  95881. procedure TCAN1_C1FIFOCON21.setDONLY; inline;
  95882. begin
  95883. pTDefRegMap(@Self)^.&set := $00001000;
  95884. end;
  95885. procedure TCAN1_C1FIFOCON21.clearDONLY; inline;
  95886. begin
  95887. pTDefRegMap(@Self)^.clr := $00001000;
  95888. end;
  95889. procedure TCAN1_C1FIFOCON21.setDONLY(thebits : TBits_1); inline;
  95890. begin
  95891. if thebits = 0 then
  95892. pTDefRegMap(@Self)^.clr := $00001000
  95893. else
  95894. pTDefRegMap(@Self)^.&set := $00001000;
  95895. end;
  95896. function TCAN1_C1FIFOCON21.getDONLY : TBits_1; inline;
  95897. begin
  95898. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  95899. end;
  95900. procedure TCAN1_C1FIFOCON21.setUINC; inline;
  95901. begin
  95902. pTDefRegMap(@Self)^.&set := $00002000;
  95903. end;
  95904. procedure TCAN1_C1FIFOCON21.clearUINC; inline;
  95905. begin
  95906. pTDefRegMap(@Self)^.clr := $00002000;
  95907. end;
  95908. procedure TCAN1_C1FIFOCON21.setUINC(thebits : TBits_1); inline;
  95909. begin
  95910. if thebits = 0 then
  95911. pTDefRegMap(@Self)^.clr := $00002000
  95912. else
  95913. pTDefRegMap(@Self)^.&set := $00002000;
  95914. end;
  95915. function TCAN1_C1FIFOCON21.getUINC : TBits_1; inline;
  95916. begin
  95917. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  95918. end;
  95919. procedure TCAN1_C1FIFOCON21.setFRESET; inline;
  95920. begin
  95921. pTDefRegMap(@Self)^.&set := $00004000;
  95922. end;
  95923. procedure TCAN1_C1FIFOCON21.clearFRESET; inline;
  95924. begin
  95925. pTDefRegMap(@Self)^.clr := $00004000;
  95926. end;
  95927. procedure TCAN1_C1FIFOCON21.setFRESET(thebits : TBits_1); inline;
  95928. begin
  95929. if thebits = 0 then
  95930. pTDefRegMap(@Self)^.clr := $00004000
  95931. else
  95932. pTDefRegMap(@Self)^.&set := $00004000;
  95933. end;
  95934. function TCAN1_C1FIFOCON21.getFRESET : TBits_1; inline;
  95935. begin
  95936. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  95937. end;
  95938. procedure TCAN1_C1FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  95939. begin
  95940. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  95941. end;
  95942. function TCAN1_C1FIFOCON21.getFSIZE : TBits_5; inline;
  95943. begin
  95944. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  95945. end;
  95946. procedure TCAN1_C1FIFOCON21.setw(thebits : TBits_32); inline;
  95947. begin
  95948. pTDefRegMap(@Self)^.val := thebits;
  95949. end;
  95950. function TCAN1_C1FIFOCON21.getw : TBits_32; inline;
  95951. begin
  95952. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95953. end;
  95954. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF; inline;
  95955. begin
  95956. pTDefRegMap(@Self)^.&set := $00000001;
  95957. end;
  95958. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIF; inline;
  95959. begin
  95960. pTDefRegMap(@Self)^.clr := $00000001;
  95961. end;
  95962. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  95963. begin
  95964. if thebits = 0 then
  95965. pTDefRegMap(@Self)^.clr := $00000001
  95966. else
  95967. pTDefRegMap(@Self)^.&set := $00000001;
  95968. end;
  95969. function TCAN1_C1FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  95970. begin
  95971. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  95972. end;
  95973. procedure TCAN1_C1FIFOINT21.setRXHALFIF; inline;
  95974. begin
  95975. pTDefRegMap(@Self)^.&set := $00000002;
  95976. end;
  95977. procedure TCAN1_C1FIFOINT21.clearRXHALFIF; inline;
  95978. begin
  95979. pTDefRegMap(@Self)^.clr := $00000002;
  95980. end;
  95981. procedure TCAN1_C1FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  95982. begin
  95983. if thebits = 0 then
  95984. pTDefRegMap(@Self)^.clr := $00000002
  95985. else
  95986. pTDefRegMap(@Self)^.&set := $00000002;
  95987. end;
  95988. function TCAN1_C1FIFOINT21.getRXHALFIF : TBits_1; inline;
  95989. begin
  95990. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  95991. end;
  95992. procedure TCAN1_C1FIFOINT21.setRXFULLIF; inline;
  95993. begin
  95994. pTDefRegMap(@Self)^.&set := $00000004;
  95995. end;
  95996. procedure TCAN1_C1FIFOINT21.clearRXFULLIF; inline;
  95997. begin
  95998. pTDefRegMap(@Self)^.clr := $00000004;
  95999. end;
  96000. procedure TCAN1_C1FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  96001. begin
  96002. if thebits = 0 then
  96003. pTDefRegMap(@Self)^.clr := $00000004
  96004. else
  96005. pTDefRegMap(@Self)^.&set := $00000004;
  96006. end;
  96007. function TCAN1_C1FIFOINT21.getRXFULLIF : TBits_1; inline;
  96008. begin
  96009. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96010. end;
  96011. procedure TCAN1_C1FIFOINT21.setRXOVFLIF; inline;
  96012. begin
  96013. pTDefRegMap(@Self)^.&set := $00000008;
  96014. end;
  96015. procedure TCAN1_C1FIFOINT21.clearRXOVFLIF; inline;
  96016. begin
  96017. pTDefRegMap(@Self)^.clr := $00000008;
  96018. end;
  96019. procedure TCAN1_C1FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  96020. begin
  96021. if thebits = 0 then
  96022. pTDefRegMap(@Self)^.clr := $00000008
  96023. else
  96024. pTDefRegMap(@Self)^.&set := $00000008;
  96025. end;
  96026. function TCAN1_C1FIFOINT21.getRXOVFLIF : TBits_1; inline;
  96027. begin
  96028. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96029. end;
  96030. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF; inline;
  96031. begin
  96032. pTDefRegMap(@Self)^.&set := $00000100;
  96033. end;
  96034. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIF; inline;
  96035. begin
  96036. pTDefRegMap(@Self)^.clr := $00000100;
  96037. end;
  96038. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  96039. begin
  96040. if thebits = 0 then
  96041. pTDefRegMap(@Self)^.clr := $00000100
  96042. else
  96043. pTDefRegMap(@Self)^.&set := $00000100;
  96044. end;
  96045. function TCAN1_C1FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  96046. begin
  96047. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  96048. end;
  96049. procedure TCAN1_C1FIFOINT21.setTXHALFIF; inline;
  96050. begin
  96051. pTDefRegMap(@Self)^.&set := $00000200;
  96052. end;
  96053. procedure TCAN1_C1FIFOINT21.clearTXHALFIF; inline;
  96054. begin
  96055. pTDefRegMap(@Self)^.clr := $00000200;
  96056. end;
  96057. procedure TCAN1_C1FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  96058. begin
  96059. if thebits = 0 then
  96060. pTDefRegMap(@Self)^.clr := $00000200
  96061. else
  96062. pTDefRegMap(@Self)^.&set := $00000200;
  96063. end;
  96064. function TCAN1_C1FIFOINT21.getTXHALFIF : TBits_1; inline;
  96065. begin
  96066. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  96067. end;
  96068. procedure TCAN1_C1FIFOINT21.setTXNFULLIF; inline;
  96069. begin
  96070. pTDefRegMap(@Self)^.&set := $00000400;
  96071. end;
  96072. procedure TCAN1_C1FIFOINT21.clearTXNFULLIF; inline;
  96073. begin
  96074. pTDefRegMap(@Self)^.clr := $00000400;
  96075. end;
  96076. procedure TCAN1_C1FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  96077. begin
  96078. if thebits = 0 then
  96079. pTDefRegMap(@Self)^.clr := $00000400
  96080. else
  96081. pTDefRegMap(@Self)^.&set := $00000400;
  96082. end;
  96083. function TCAN1_C1FIFOINT21.getTXNFULLIF : TBits_1; inline;
  96084. begin
  96085. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  96086. end;
  96087. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE; inline;
  96088. begin
  96089. pTDefRegMap(@Self)^.&set := $00010000;
  96090. end;
  96091. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIE; inline;
  96092. begin
  96093. pTDefRegMap(@Self)^.clr := $00010000;
  96094. end;
  96095. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  96096. begin
  96097. if thebits = 0 then
  96098. pTDefRegMap(@Self)^.clr := $00010000
  96099. else
  96100. pTDefRegMap(@Self)^.&set := $00010000;
  96101. end;
  96102. function TCAN1_C1FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  96103. begin
  96104. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  96105. end;
  96106. procedure TCAN1_C1FIFOINT21.setRXHALFIE; inline;
  96107. begin
  96108. pTDefRegMap(@Self)^.&set := $00020000;
  96109. end;
  96110. procedure TCAN1_C1FIFOINT21.clearRXHALFIE; inline;
  96111. begin
  96112. pTDefRegMap(@Self)^.clr := $00020000;
  96113. end;
  96114. procedure TCAN1_C1FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  96115. begin
  96116. if thebits = 0 then
  96117. pTDefRegMap(@Self)^.clr := $00020000
  96118. else
  96119. pTDefRegMap(@Self)^.&set := $00020000;
  96120. end;
  96121. function TCAN1_C1FIFOINT21.getRXHALFIE : TBits_1; inline;
  96122. begin
  96123. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  96124. end;
  96125. procedure TCAN1_C1FIFOINT21.setRXFULLIE; inline;
  96126. begin
  96127. pTDefRegMap(@Self)^.&set := $00040000;
  96128. end;
  96129. procedure TCAN1_C1FIFOINT21.clearRXFULLIE; inline;
  96130. begin
  96131. pTDefRegMap(@Self)^.clr := $00040000;
  96132. end;
  96133. procedure TCAN1_C1FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  96134. begin
  96135. if thebits = 0 then
  96136. pTDefRegMap(@Self)^.clr := $00040000
  96137. else
  96138. pTDefRegMap(@Self)^.&set := $00040000;
  96139. end;
  96140. function TCAN1_C1FIFOINT21.getRXFULLIE : TBits_1; inline;
  96141. begin
  96142. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  96143. end;
  96144. procedure TCAN1_C1FIFOINT21.setRXOVFLIE; inline;
  96145. begin
  96146. pTDefRegMap(@Self)^.&set := $00080000;
  96147. end;
  96148. procedure TCAN1_C1FIFOINT21.clearRXOVFLIE; inline;
  96149. begin
  96150. pTDefRegMap(@Self)^.clr := $00080000;
  96151. end;
  96152. procedure TCAN1_C1FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  96153. begin
  96154. if thebits = 0 then
  96155. pTDefRegMap(@Self)^.clr := $00080000
  96156. else
  96157. pTDefRegMap(@Self)^.&set := $00080000;
  96158. end;
  96159. function TCAN1_C1FIFOINT21.getRXOVFLIE : TBits_1; inline;
  96160. begin
  96161. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  96162. end;
  96163. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE; inline;
  96164. begin
  96165. pTDefRegMap(@Self)^.&set := $01000000;
  96166. end;
  96167. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIE; inline;
  96168. begin
  96169. pTDefRegMap(@Self)^.clr := $01000000;
  96170. end;
  96171. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  96172. begin
  96173. if thebits = 0 then
  96174. pTDefRegMap(@Self)^.clr := $01000000
  96175. else
  96176. pTDefRegMap(@Self)^.&set := $01000000;
  96177. end;
  96178. function TCAN1_C1FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  96179. begin
  96180. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  96181. end;
  96182. procedure TCAN1_C1FIFOINT21.setTXHALFIE; inline;
  96183. begin
  96184. pTDefRegMap(@Self)^.&set := $02000000;
  96185. end;
  96186. procedure TCAN1_C1FIFOINT21.clearTXHALFIE; inline;
  96187. begin
  96188. pTDefRegMap(@Self)^.clr := $02000000;
  96189. end;
  96190. procedure TCAN1_C1FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  96191. begin
  96192. if thebits = 0 then
  96193. pTDefRegMap(@Self)^.clr := $02000000
  96194. else
  96195. pTDefRegMap(@Self)^.&set := $02000000;
  96196. end;
  96197. function TCAN1_C1FIFOINT21.getTXHALFIE : TBits_1; inline;
  96198. begin
  96199. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  96200. end;
  96201. procedure TCAN1_C1FIFOINT21.setTXNFULLIE; inline;
  96202. begin
  96203. pTDefRegMap(@Self)^.&set := $04000000;
  96204. end;
  96205. procedure TCAN1_C1FIFOINT21.clearTXNFULLIE; inline;
  96206. begin
  96207. pTDefRegMap(@Self)^.clr := $04000000;
  96208. end;
  96209. procedure TCAN1_C1FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  96210. begin
  96211. if thebits = 0 then
  96212. pTDefRegMap(@Self)^.clr := $04000000
  96213. else
  96214. pTDefRegMap(@Self)^.&set := $04000000;
  96215. end;
  96216. function TCAN1_C1FIFOINT21.getTXNFULLIE : TBits_1; inline;
  96217. begin
  96218. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  96219. end;
  96220. procedure TCAN1_C1FIFOINT21.setw(thebits : TBits_32); inline;
  96221. begin
  96222. pTDefRegMap(@Self)^.val := thebits;
  96223. end;
  96224. function TCAN1_C1FIFOINT21.getw : TBits_32; inline;
  96225. begin
  96226. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96227. end;
  96228. procedure TCAN1_C1FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  96229. begin
  96230. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  96231. end;
  96232. function TCAN1_C1FIFOCI21.getCFIFOCI : TBits_5; inline;
  96233. begin
  96234. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  96235. end;
  96236. procedure TCAN1_C1FIFOCI21.setw(thebits : TBits_32); inline;
  96237. begin
  96238. pTDefRegMap(@Self)^.val := thebits;
  96239. end;
  96240. function TCAN1_C1FIFOCI21.getw : TBits_32; inline;
  96241. begin
  96242. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96243. end;
  96244. procedure TCAN1_C1FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  96245. begin
  96246. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  96247. end;
  96248. function TCAN1_C1FIFOCON22.getTXPRI : TBits_2; inline;
  96249. begin
  96250. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  96251. end;
  96252. procedure TCAN1_C1FIFOCON22.setRTREN; inline;
  96253. begin
  96254. pTDefRegMap(@Self)^.&set := $00000004;
  96255. end;
  96256. procedure TCAN1_C1FIFOCON22.clearRTREN; inline;
  96257. begin
  96258. pTDefRegMap(@Self)^.clr := $00000004;
  96259. end;
  96260. procedure TCAN1_C1FIFOCON22.setRTREN(thebits : TBits_1); inline;
  96261. begin
  96262. if thebits = 0 then
  96263. pTDefRegMap(@Self)^.clr := $00000004
  96264. else
  96265. pTDefRegMap(@Self)^.&set := $00000004;
  96266. end;
  96267. function TCAN1_C1FIFOCON22.getRTREN : TBits_1; inline;
  96268. begin
  96269. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96270. end;
  96271. procedure TCAN1_C1FIFOCON22.setTXREQ; inline;
  96272. begin
  96273. pTDefRegMap(@Self)^.&set := $00000008;
  96274. end;
  96275. procedure TCAN1_C1FIFOCON22.clearTXREQ; inline;
  96276. begin
  96277. pTDefRegMap(@Self)^.clr := $00000008;
  96278. end;
  96279. procedure TCAN1_C1FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  96280. begin
  96281. if thebits = 0 then
  96282. pTDefRegMap(@Self)^.clr := $00000008
  96283. else
  96284. pTDefRegMap(@Self)^.&set := $00000008;
  96285. end;
  96286. function TCAN1_C1FIFOCON22.getTXREQ : TBits_1; inline;
  96287. begin
  96288. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96289. end;
  96290. procedure TCAN1_C1FIFOCON22.setTXERR; inline;
  96291. begin
  96292. pTDefRegMap(@Self)^.&set := $00000010;
  96293. end;
  96294. procedure TCAN1_C1FIFOCON22.clearTXERR; inline;
  96295. begin
  96296. pTDefRegMap(@Self)^.clr := $00000010;
  96297. end;
  96298. procedure TCAN1_C1FIFOCON22.setTXERR(thebits : TBits_1); inline;
  96299. begin
  96300. if thebits = 0 then
  96301. pTDefRegMap(@Self)^.clr := $00000010
  96302. else
  96303. pTDefRegMap(@Self)^.&set := $00000010;
  96304. end;
  96305. function TCAN1_C1FIFOCON22.getTXERR : TBits_1; inline;
  96306. begin
  96307. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  96308. end;
  96309. procedure TCAN1_C1FIFOCON22.setTXLARB; inline;
  96310. begin
  96311. pTDefRegMap(@Self)^.&set := $00000020;
  96312. end;
  96313. procedure TCAN1_C1FIFOCON22.clearTXLARB; inline;
  96314. begin
  96315. pTDefRegMap(@Self)^.clr := $00000020;
  96316. end;
  96317. procedure TCAN1_C1FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  96318. begin
  96319. if thebits = 0 then
  96320. pTDefRegMap(@Self)^.clr := $00000020
  96321. else
  96322. pTDefRegMap(@Self)^.&set := $00000020;
  96323. end;
  96324. function TCAN1_C1FIFOCON22.getTXLARB : TBits_1; inline;
  96325. begin
  96326. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  96327. end;
  96328. procedure TCAN1_C1FIFOCON22.setTXABAT; inline;
  96329. begin
  96330. pTDefRegMap(@Self)^.&set := $00000040;
  96331. end;
  96332. procedure TCAN1_C1FIFOCON22.clearTXABAT; inline;
  96333. begin
  96334. pTDefRegMap(@Self)^.clr := $00000040;
  96335. end;
  96336. procedure TCAN1_C1FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  96337. begin
  96338. if thebits = 0 then
  96339. pTDefRegMap(@Self)^.clr := $00000040
  96340. else
  96341. pTDefRegMap(@Self)^.&set := $00000040;
  96342. end;
  96343. function TCAN1_C1FIFOCON22.getTXABAT : TBits_1; inline;
  96344. begin
  96345. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  96346. end;
  96347. procedure TCAN1_C1FIFOCON22.setTXEN; inline;
  96348. begin
  96349. pTDefRegMap(@Self)^.&set := $00000080;
  96350. end;
  96351. procedure TCAN1_C1FIFOCON22.clearTXEN; inline;
  96352. begin
  96353. pTDefRegMap(@Self)^.clr := $00000080;
  96354. end;
  96355. procedure TCAN1_C1FIFOCON22.setTXEN(thebits : TBits_1); inline;
  96356. begin
  96357. if thebits = 0 then
  96358. pTDefRegMap(@Self)^.clr := $00000080
  96359. else
  96360. pTDefRegMap(@Self)^.&set := $00000080;
  96361. end;
  96362. function TCAN1_C1FIFOCON22.getTXEN : TBits_1; inline;
  96363. begin
  96364. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  96365. end;
  96366. procedure TCAN1_C1FIFOCON22.setDONLY; inline;
  96367. begin
  96368. pTDefRegMap(@Self)^.&set := $00001000;
  96369. end;
  96370. procedure TCAN1_C1FIFOCON22.clearDONLY; inline;
  96371. begin
  96372. pTDefRegMap(@Self)^.clr := $00001000;
  96373. end;
  96374. procedure TCAN1_C1FIFOCON22.setDONLY(thebits : TBits_1); inline;
  96375. begin
  96376. if thebits = 0 then
  96377. pTDefRegMap(@Self)^.clr := $00001000
  96378. else
  96379. pTDefRegMap(@Self)^.&set := $00001000;
  96380. end;
  96381. function TCAN1_C1FIFOCON22.getDONLY : TBits_1; inline;
  96382. begin
  96383. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  96384. end;
  96385. procedure TCAN1_C1FIFOCON22.setUINC; inline;
  96386. begin
  96387. pTDefRegMap(@Self)^.&set := $00002000;
  96388. end;
  96389. procedure TCAN1_C1FIFOCON22.clearUINC; inline;
  96390. begin
  96391. pTDefRegMap(@Self)^.clr := $00002000;
  96392. end;
  96393. procedure TCAN1_C1FIFOCON22.setUINC(thebits : TBits_1); inline;
  96394. begin
  96395. if thebits = 0 then
  96396. pTDefRegMap(@Self)^.clr := $00002000
  96397. else
  96398. pTDefRegMap(@Self)^.&set := $00002000;
  96399. end;
  96400. function TCAN1_C1FIFOCON22.getUINC : TBits_1; inline;
  96401. begin
  96402. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  96403. end;
  96404. procedure TCAN1_C1FIFOCON22.setFRESET; inline;
  96405. begin
  96406. pTDefRegMap(@Self)^.&set := $00004000;
  96407. end;
  96408. procedure TCAN1_C1FIFOCON22.clearFRESET; inline;
  96409. begin
  96410. pTDefRegMap(@Self)^.clr := $00004000;
  96411. end;
  96412. procedure TCAN1_C1FIFOCON22.setFRESET(thebits : TBits_1); inline;
  96413. begin
  96414. if thebits = 0 then
  96415. pTDefRegMap(@Self)^.clr := $00004000
  96416. else
  96417. pTDefRegMap(@Self)^.&set := $00004000;
  96418. end;
  96419. function TCAN1_C1FIFOCON22.getFRESET : TBits_1; inline;
  96420. begin
  96421. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  96422. end;
  96423. procedure TCAN1_C1FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  96424. begin
  96425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  96426. end;
  96427. function TCAN1_C1FIFOCON22.getFSIZE : TBits_5; inline;
  96428. begin
  96429. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  96430. end;
  96431. procedure TCAN1_C1FIFOCON22.setw(thebits : TBits_32); inline;
  96432. begin
  96433. pTDefRegMap(@Self)^.val := thebits;
  96434. end;
  96435. function TCAN1_C1FIFOCON22.getw : TBits_32; inline;
  96436. begin
  96437. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96438. end;
  96439. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF; inline;
  96440. begin
  96441. pTDefRegMap(@Self)^.&set := $00000001;
  96442. end;
  96443. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIF; inline;
  96444. begin
  96445. pTDefRegMap(@Self)^.clr := $00000001;
  96446. end;
  96447. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  96448. begin
  96449. if thebits = 0 then
  96450. pTDefRegMap(@Self)^.clr := $00000001
  96451. else
  96452. pTDefRegMap(@Self)^.&set := $00000001;
  96453. end;
  96454. function TCAN1_C1FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  96455. begin
  96456. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  96457. end;
  96458. procedure TCAN1_C1FIFOINT22.setRXHALFIF; inline;
  96459. begin
  96460. pTDefRegMap(@Self)^.&set := $00000002;
  96461. end;
  96462. procedure TCAN1_C1FIFOINT22.clearRXHALFIF; inline;
  96463. begin
  96464. pTDefRegMap(@Self)^.clr := $00000002;
  96465. end;
  96466. procedure TCAN1_C1FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  96467. begin
  96468. if thebits = 0 then
  96469. pTDefRegMap(@Self)^.clr := $00000002
  96470. else
  96471. pTDefRegMap(@Self)^.&set := $00000002;
  96472. end;
  96473. function TCAN1_C1FIFOINT22.getRXHALFIF : TBits_1; inline;
  96474. begin
  96475. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  96476. end;
  96477. procedure TCAN1_C1FIFOINT22.setRXFULLIF; inline;
  96478. begin
  96479. pTDefRegMap(@Self)^.&set := $00000004;
  96480. end;
  96481. procedure TCAN1_C1FIFOINT22.clearRXFULLIF; inline;
  96482. begin
  96483. pTDefRegMap(@Self)^.clr := $00000004;
  96484. end;
  96485. procedure TCAN1_C1FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  96486. begin
  96487. if thebits = 0 then
  96488. pTDefRegMap(@Self)^.clr := $00000004
  96489. else
  96490. pTDefRegMap(@Self)^.&set := $00000004;
  96491. end;
  96492. function TCAN1_C1FIFOINT22.getRXFULLIF : TBits_1; inline;
  96493. begin
  96494. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96495. end;
  96496. procedure TCAN1_C1FIFOINT22.setRXOVFLIF; inline;
  96497. begin
  96498. pTDefRegMap(@Self)^.&set := $00000008;
  96499. end;
  96500. procedure TCAN1_C1FIFOINT22.clearRXOVFLIF; inline;
  96501. begin
  96502. pTDefRegMap(@Self)^.clr := $00000008;
  96503. end;
  96504. procedure TCAN1_C1FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  96505. begin
  96506. if thebits = 0 then
  96507. pTDefRegMap(@Self)^.clr := $00000008
  96508. else
  96509. pTDefRegMap(@Self)^.&set := $00000008;
  96510. end;
  96511. function TCAN1_C1FIFOINT22.getRXOVFLIF : TBits_1; inline;
  96512. begin
  96513. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96514. end;
  96515. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF; inline;
  96516. begin
  96517. pTDefRegMap(@Self)^.&set := $00000100;
  96518. end;
  96519. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIF; inline;
  96520. begin
  96521. pTDefRegMap(@Self)^.clr := $00000100;
  96522. end;
  96523. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  96524. begin
  96525. if thebits = 0 then
  96526. pTDefRegMap(@Self)^.clr := $00000100
  96527. else
  96528. pTDefRegMap(@Self)^.&set := $00000100;
  96529. end;
  96530. function TCAN1_C1FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  96531. begin
  96532. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  96533. end;
  96534. procedure TCAN1_C1FIFOINT22.setTXHALFIF; inline;
  96535. begin
  96536. pTDefRegMap(@Self)^.&set := $00000200;
  96537. end;
  96538. procedure TCAN1_C1FIFOINT22.clearTXHALFIF; inline;
  96539. begin
  96540. pTDefRegMap(@Self)^.clr := $00000200;
  96541. end;
  96542. procedure TCAN1_C1FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  96543. begin
  96544. if thebits = 0 then
  96545. pTDefRegMap(@Self)^.clr := $00000200
  96546. else
  96547. pTDefRegMap(@Self)^.&set := $00000200;
  96548. end;
  96549. function TCAN1_C1FIFOINT22.getTXHALFIF : TBits_1; inline;
  96550. begin
  96551. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  96552. end;
  96553. procedure TCAN1_C1FIFOINT22.setTXNFULLIF; inline;
  96554. begin
  96555. pTDefRegMap(@Self)^.&set := $00000400;
  96556. end;
  96557. procedure TCAN1_C1FIFOINT22.clearTXNFULLIF; inline;
  96558. begin
  96559. pTDefRegMap(@Self)^.clr := $00000400;
  96560. end;
  96561. procedure TCAN1_C1FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  96562. begin
  96563. if thebits = 0 then
  96564. pTDefRegMap(@Self)^.clr := $00000400
  96565. else
  96566. pTDefRegMap(@Self)^.&set := $00000400;
  96567. end;
  96568. function TCAN1_C1FIFOINT22.getTXNFULLIF : TBits_1; inline;
  96569. begin
  96570. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  96571. end;
  96572. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE; inline;
  96573. begin
  96574. pTDefRegMap(@Self)^.&set := $00010000;
  96575. end;
  96576. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIE; inline;
  96577. begin
  96578. pTDefRegMap(@Self)^.clr := $00010000;
  96579. end;
  96580. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  96581. begin
  96582. if thebits = 0 then
  96583. pTDefRegMap(@Self)^.clr := $00010000
  96584. else
  96585. pTDefRegMap(@Self)^.&set := $00010000;
  96586. end;
  96587. function TCAN1_C1FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  96588. begin
  96589. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  96590. end;
  96591. procedure TCAN1_C1FIFOINT22.setRXHALFIE; inline;
  96592. begin
  96593. pTDefRegMap(@Self)^.&set := $00020000;
  96594. end;
  96595. procedure TCAN1_C1FIFOINT22.clearRXHALFIE; inline;
  96596. begin
  96597. pTDefRegMap(@Self)^.clr := $00020000;
  96598. end;
  96599. procedure TCAN1_C1FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  96600. begin
  96601. if thebits = 0 then
  96602. pTDefRegMap(@Self)^.clr := $00020000
  96603. else
  96604. pTDefRegMap(@Self)^.&set := $00020000;
  96605. end;
  96606. function TCAN1_C1FIFOINT22.getRXHALFIE : TBits_1; inline;
  96607. begin
  96608. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  96609. end;
  96610. procedure TCAN1_C1FIFOINT22.setRXFULLIE; inline;
  96611. begin
  96612. pTDefRegMap(@Self)^.&set := $00040000;
  96613. end;
  96614. procedure TCAN1_C1FIFOINT22.clearRXFULLIE; inline;
  96615. begin
  96616. pTDefRegMap(@Self)^.clr := $00040000;
  96617. end;
  96618. procedure TCAN1_C1FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  96619. begin
  96620. if thebits = 0 then
  96621. pTDefRegMap(@Self)^.clr := $00040000
  96622. else
  96623. pTDefRegMap(@Self)^.&set := $00040000;
  96624. end;
  96625. function TCAN1_C1FIFOINT22.getRXFULLIE : TBits_1; inline;
  96626. begin
  96627. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  96628. end;
  96629. procedure TCAN1_C1FIFOINT22.setRXOVFLIE; inline;
  96630. begin
  96631. pTDefRegMap(@Self)^.&set := $00080000;
  96632. end;
  96633. procedure TCAN1_C1FIFOINT22.clearRXOVFLIE; inline;
  96634. begin
  96635. pTDefRegMap(@Self)^.clr := $00080000;
  96636. end;
  96637. procedure TCAN1_C1FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  96638. begin
  96639. if thebits = 0 then
  96640. pTDefRegMap(@Self)^.clr := $00080000
  96641. else
  96642. pTDefRegMap(@Self)^.&set := $00080000;
  96643. end;
  96644. function TCAN1_C1FIFOINT22.getRXOVFLIE : TBits_1; inline;
  96645. begin
  96646. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  96647. end;
  96648. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE; inline;
  96649. begin
  96650. pTDefRegMap(@Self)^.&set := $01000000;
  96651. end;
  96652. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIE; inline;
  96653. begin
  96654. pTDefRegMap(@Self)^.clr := $01000000;
  96655. end;
  96656. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  96657. begin
  96658. if thebits = 0 then
  96659. pTDefRegMap(@Self)^.clr := $01000000
  96660. else
  96661. pTDefRegMap(@Self)^.&set := $01000000;
  96662. end;
  96663. function TCAN1_C1FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  96664. begin
  96665. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  96666. end;
  96667. procedure TCAN1_C1FIFOINT22.setTXHALFIE; inline;
  96668. begin
  96669. pTDefRegMap(@Self)^.&set := $02000000;
  96670. end;
  96671. procedure TCAN1_C1FIFOINT22.clearTXHALFIE; inline;
  96672. begin
  96673. pTDefRegMap(@Self)^.clr := $02000000;
  96674. end;
  96675. procedure TCAN1_C1FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  96676. begin
  96677. if thebits = 0 then
  96678. pTDefRegMap(@Self)^.clr := $02000000
  96679. else
  96680. pTDefRegMap(@Self)^.&set := $02000000;
  96681. end;
  96682. function TCAN1_C1FIFOINT22.getTXHALFIE : TBits_1; inline;
  96683. begin
  96684. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  96685. end;
  96686. procedure TCAN1_C1FIFOINT22.setTXNFULLIE; inline;
  96687. begin
  96688. pTDefRegMap(@Self)^.&set := $04000000;
  96689. end;
  96690. procedure TCAN1_C1FIFOINT22.clearTXNFULLIE; inline;
  96691. begin
  96692. pTDefRegMap(@Self)^.clr := $04000000;
  96693. end;
  96694. procedure TCAN1_C1FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  96695. begin
  96696. if thebits = 0 then
  96697. pTDefRegMap(@Self)^.clr := $04000000
  96698. else
  96699. pTDefRegMap(@Self)^.&set := $04000000;
  96700. end;
  96701. function TCAN1_C1FIFOINT22.getTXNFULLIE : TBits_1; inline;
  96702. begin
  96703. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  96704. end;
  96705. procedure TCAN1_C1FIFOINT22.setw(thebits : TBits_32); inline;
  96706. begin
  96707. pTDefRegMap(@Self)^.val := thebits;
  96708. end;
  96709. function TCAN1_C1FIFOINT22.getw : TBits_32; inline;
  96710. begin
  96711. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96712. end;
  96713. procedure TCAN1_C1FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  96714. begin
  96715. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  96716. end;
  96717. function TCAN1_C1FIFOCI22.getCFIFOCI : TBits_5; inline;
  96718. begin
  96719. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  96720. end;
  96721. procedure TCAN1_C1FIFOCI22.setw(thebits : TBits_32); inline;
  96722. begin
  96723. pTDefRegMap(@Self)^.val := thebits;
  96724. end;
  96725. function TCAN1_C1FIFOCI22.getw : TBits_32; inline;
  96726. begin
  96727. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96728. end;
  96729. procedure TCAN1_C1FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  96730. begin
  96731. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  96732. end;
  96733. function TCAN1_C1FIFOCON23.getTXPRI : TBits_2; inline;
  96734. begin
  96735. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  96736. end;
  96737. procedure TCAN1_C1FIFOCON23.setRTREN; inline;
  96738. begin
  96739. pTDefRegMap(@Self)^.&set := $00000004;
  96740. end;
  96741. procedure TCAN1_C1FIFOCON23.clearRTREN; inline;
  96742. begin
  96743. pTDefRegMap(@Self)^.clr := $00000004;
  96744. end;
  96745. procedure TCAN1_C1FIFOCON23.setRTREN(thebits : TBits_1); inline;
  96746. begin
  96747. if thebits = 0 then
  96748. pTDefRegMap(@Self)^.clr := $00000004
  96749. else
  96750. pTDefRegMap(@Self)^.&set := $00000004;
  96751. end;
  96752. function TCAN1_C1FIFOCON23.getRTREN : TBits_1; inline;
  96753. begin
  96754. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96755. end;
  96756. procedure TCAN1_C1FIFOCON23.setTXREQ; inline;
  96757. begin
  96758. pTDefRegMap(@Self)^.&set := $00000008;
  96759. end;
  96760. procedure TCAN1_C1FIFOCON23.clearTXREQ; inline;
  96761. begin
  96762. pTDefRegMap(@Self)^.clr := $00000008;
  96763. end;
  96764. procedure TCAN1_C1FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  96765. begin
  96766. if thebits = 0 then
  96767. pTDefRegMap(@Self)^.clr := $00000008
  96768. else
  96769. pTDefRegMap(@Self)^.&set := $00000008;
  96770. end;
  96771. function TCAN1_C1FIFOCON23.getTXREQ : TBits_1; inline;
  96772. begin
  96773. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96774. end;
  96775. procedure TCAN1_C1FIFOCON23.setTXERR; inline;
  96776. begin
  96777. pTDefRegMap(@Self)^.&set := $00000010;
  96778. end;
  96779. procedure TCAN1_C1FIFOCON23.clearTXERR; inline;
  96780. begin
  96781. pTDefRegMap(@Self)^.clr := $00000010;
  96782. end;
  96783. procedure TCAN1_C1FIFOCON23.setTXERR(thebits : TBits_1); inline;
  96784. begin
  96785. if thebits = 0 then
  96786. pTDefRegMap(@Self)^.clr := $00000010
  96787. else
  96788. pTDefRegMap(@Self)^.&set := $00000010;
  96789. end;
  96790. function TCAN1_C1FIFOCON23.getTXERR : TBits_1; inline;
  96791. begin
  96792. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  96793. end;
  96794. procedure TCAN1_C1FIFOCON23.setTXLARB; inline;
  96795. begin
  96796. pTDefRegMap(@Self)^.&set := $00000020;
  96797. end;
  96798. procedure TCAN1_C1FIFOCON23.clearTXLARB; inline;
  96799. begin
  96800. pTDefRegMap(@Self)^.clr := $00000020;
  96801. end;
  96802. procedure TCAN1_C1FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  96803. begin
  96804. if thebits = 0 then
  96805. pTDefRegMap(@Self)^.clr := $00000020
  96806. else
  96807. pTDefRegMap(@Self)^.&set := $00000020;
  96808. end;
  96809. function TCAN1_C1FIFOCON23.getTXLARB : TBits_1; inline;
  96810. begin
  96811. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  96812. end;
  96813. procedure TCAN1_C1FIFOCON23.setTXABAT; inline;
  96814. begin
  96815. pTDefRegMap(@Self)^.&set := $00000040;
  96816. end;
  96817. procedure TCAN1_C1FIFOCON23.clearTXABAT; inline;
  96818. begin
  96819. pTDefRegMap(@Self)^.clr := $00000040;
  96820. end;
  96821. procedure TCAN1_C1FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  96822. begin
  96823. if thebits = 0 then
  96824. pTDefRegMap(@Self)^.clr := $00000040
  96825. else
  96826. pTDefRegMap(@Self)^.&set := $00000040;
  96827. end;
  96828. function TCAN1_C1FIFOCON23.getTXABAT : TBits_1; inline;
  96829. begin
  96830. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  96831. end;
  96832. procedure TCAN1_C1FIFOCON23.setTXEN; inline;
  96833. begin
  96834. pTDefRegMap(@Self)^.&set := $00000080;
  96835. end;
  96836. procedure TCAN1_C1FIFOCON23.clearTXEN; inline;
  96837. begin
  96838. pTDefRegMap(@Self)^.clr := $00000080;
  96839. end;
  96840. procedure TCAN1_C1FIFOCON23.setTXEN(thebits : TBits_1); inline;
  96841. begin
  96842. if thebits = 0 then
  96843. pTDefRegMap(@Self)^.clr := $00000080
  96844. else
  96845. pTDefRegMap(@Self)^.&set := $00000080;
  96846. end;
  96847. function TCAN1_C1FIFOCON23.getTXEN : TBits_1; inline;
  96848. begin
  96849. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  96850. end;
  96851. procedure TCAN1_C1FIFOCON23.setDONLY; inline;
  96852. begin
  96853. pTDefRegMap(@Self)^.&set := $00001000;
  96854. end;
  96855. procedure TCAN1_C1FIFOCON23.clearDONLY; inline;
  96856. begin
  96857. pTDefRegMap(@Self)^.clr := $00001000;
  96858. end;
  96859. procedure TCAN1_C1FIFOCON23.setDONLY(thebits : TBits_1); inline;
  96860. begin
  96861. if thebits = 0 then
  96862. pTDefRegMap(@Self)^.clr := $00001000
  96863. else
  96864. pTDefRegMap(@Self)^.&set := $00001000;
  96865. end;
  96866. function TCAN1_C1FIFOCON23.getDONLY : TBits_1; inline;
  96867. begin
  96868. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  96869. end;
  96870. procedure TCAN1_C1FIFOCON23.setUINC; inline;
  96871. begin
  96872. pTDefRegMap(@Self)^.&set := $00002000;
  96873. end;
  96874. procedure TCAN1_C1FIFOCON23.clearUINC; inline;
  96875. begin
  96876. pTDefRegMap(@Self)^.clr := $00002000;
  96877. end;
  96878. procedure TCAN1_C1FIFOCON23.setUINC(thebits : TBits_1); inline;
  96879. begin
  96880. if thebits = 0 then
  96881. pTDefRegMap(@Self)^.clr := $00002000
  96882. else
  96883. pTDefRegMap(@Self)^.&set := $00002000;
  96884. end;
  96885. function TCAN1_C1FIFOCON23.getUINC : TBits_1; inline;
  96886. begin
  96887. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  96888. end;
  96889. procedure TCAN1_C1FIFOCON23.setFRESET; inline;
  96890. begin
  96891. pTDefRegMap(@Self)^.&set := $00004000;
  96892. end;
  96893. procedure TCAN1_C1FIFOCON23.clearFRESET; inline;
  96894. begin
  96895. pTDefRegMap(@Self)^.clr := $00004000;
  96896. end;
  96897. procedure TCAN1_C1FIFOCON23.setFRESET(thebits : TBits_1); inline;
  96898. begin
  96899. if thebits = 0 then
  96900. pTDefRegMap(@Self)^.clr := $00004000
  96901. else
  96902. pTDefRegMap(@Self)^.&set := $00004000;
  96903. end;
  96904. function TCAN1_C1FIFOCON23.getFRESET : TBits_1; inline;
  96905. begin
  96906. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  96907. end;
  96908. procedure TCAN1_C1FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  96909. begin
  96910. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  96911. end;
  96912. function TCAN1_C1FIFOCON23.getFSIZE : TBits_5; inline;
  96913. begin
  96914. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  96915. end;
  96916. procedure TCAN1_C1FIFOCON23.setw(thebits : TBits_32); inline;
  96917. begin
  96918. pTDefRegMap(@Self)^.val := thebits;
  96919. end;
  96920. function TCAN1_C1FIFOCON23.getw : TBits_32; inline;
  96921. begin
  96922. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96923. end;
  96924. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF; inline;
  96925. begin
  96926. pTDefRegMap(@Self)^.&set := $00000001;
  96927. end;
  96928. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIF; inline;
  96929. begin
  96930. pTDefRegMap(@Self)^.clr := $00000001;
  96931. end;
  96932. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  96933. begin
  96934. if thebits = 0 then
  96935. pTDefRegMap(@Self)^.clr := $00000001
  96936. else
  96937. pTDefRegMap(@Self)^.&set := $00000001;
  96938. end;
  96939. function TCAN1_C1FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  96940. begin
  96941. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  96942. end;
  96943. procedure TCAN1_C1FIFOINT23.setRXHALFIF; inline;
  96944. begin
  96945. pTDefRegMap(@Self)^.&set := $00000002;
  96946. end;
  96947. procedure TCAN1_C1FIFOINT23.clearRXHALFIF; inline;
  96948. begin
  96949. pTDefRegMap(@Self)^.clr := $00000002;
  96950. end;
  96951. procedure TCAN1_C1FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  96952. begin
  96953. if thebits = 0 then
  96954. pTDefRegMap(@Self)^.clr := $00000002
  96955. else
  96956. pTDefRegMap(@Self)^.&set := $00000002;
  96957. end;
  96958. function TCAN1_C1FIFOINT23.getRXHALFIF : TBits_1; inline;
  96959. begin
  96960. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  96961. end;
  96962. procedure TCAN1_C1FIFOINT23.setRXFULLIF; inline;
  96963. begin
  96964. pTDefRegMap(@Self)^.&set := $00000004;
  96965. end;
  96966. procedure TCAN1_C1FIFOINT23.clearRXFULLIF; inline;
  96967. begin
  96968. pTDefRegMap(@Self)^.clr := $00000004;
  96969. end;
  96970. procedure TCAN1_C1FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  96971. begin
  96972. if thebits = 0 then
  96973. pTDefRegMap(@Self)^.clr := $00000004
  96974. else
  96975. pTDefRegMap(@Self)^.&set := $00000004;
  96976. end;
  96977. function TCAN1_C1FIFOINT23.getRXFULLIF : TBits_1; inline;
  96978. begin
  96979. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96980. end;
  96981. procedure TCAN1_C1FIFOINT23.setRXOVFLIF; inline;
  96982. begin
  96983. pTDefRegMap(@Self)^.&set := $00000008;
  96984. end;
  96985. procedure TCAN1_C1FIFOINT23.clearRXOVFLIF; inline;
  96986. begin
  96987. pTDefRegMap(@Self)^.clr := $00000008;
  96988. end;
  96989. procedure TCAN1_C1FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  96990. begin
  96991. if thebits = 0 then
  96992. pTDefRegMap(@Self)^.clr := $00000008
  96993. else
  96994. pTDefRegMap(@Self)^.&set := $00000008;
  96995. end;
  96996. function TCAN1_C1FIFOINT23.getRXOVFLIF : TBits_1; inline;
  96997. begin
  96998. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96999. end;
  97000. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF; inline;
  97001. begin
  97002. pTDefRegMap(@Self)^.&set := $00000100;
  97003. end;
  97004. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIF; inline;
  97005. begin
  97006. pTDefRegMap(@Self)^.clr := $00000100;
  97007. end;
  97008. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  97009. begin
  97010. if thebits = 0 then
  97011. pTDefRegMap(@Self)^.clr := $00000100
  97012. else
  97013. pTDefRegMap(@Self)^.&set := $00000100;
  97014. end;
  97015. function TCAN1_C1FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  97016. begin
  97017. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  97018. end;
  97019. procedure TCAN1_C1FIFOINT23.setTXHALFIF; inline;
  97020. begin
  97021. pTDefRegMap(@Self)^.&set := $00000200;
  97022. end;
  97023. procedure TCAN1_C1FIFOINT23.clearTXHALFIF; inline;
  97024. begin
  97025. pTDefRegMap(@Self)^.clr := $00000200;
  97026. end;
  97027. procedure TCAN1_C1FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  97028. begin
  97029. if thebits = 0 then
  97030. pTDefRegMap(@Self)^.clr := $00000200
  97031. else
  97032. pTDefRegMap(@Self)^.&set := $00000200;
  97033. end;
  97034. function TCAN1_C1FIFOINT23.getTXHALFIF : TBits_1; inline;
  97035. begin
  97036. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  97037. end;
  97038. procedure TCAN1_C1FIFOINT23.setTXNFULLIF; inline;
  97039. begin
  97040. pTDefRegMap(@Self)^.&set := $00000400;
  97041. end;
  97042. procedure TCAN1_C1FIFOINT23.clearTXNFULLIF; inline;
  97043. begin
  97044. pTDefRegMap(@Self)^.clr := $00000400;
  97045. end;
  97046. procedure TCAN1_C1FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  97047. begin
  97048. if thebits = 0 then
  97049. pTDefRegMap(@Self)^.clr := $00000400
  97050. else
  97051. pTDefRegMap(@Self)^.&set := $00000400;
  97052. end;
  97053. function TCAN1_C1FIFOINT23.getTXNFULLIF : TBits_1; inline;
  97054. begin
  97055. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  97056. end;
  97057. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE; inline;
  97058. begin
  97059. pTDefRegMap(@Self)^.&set := $00010000;
  97060. end;
  97061. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIE; inline;
  97062. begin
  97063. pTDefRegMap(@Self)^.clr := $00010000;
  97064. end;
  97065. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  97066. begin
  97067. if thebits = 0 then
  97068. pTDefRegMap(@Self)^.clr := $00010000
  97069. else
  97070. pTDefRegMap(@Self)^.&set := $00010000;
  97071. end;
  97072. function TCAN1_C1FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  97073. begin
  97074. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  97075. end;
  97076. procedure TCAN1_C1FIFOINT23.setRXHALFIE; inline;
  97077. begin
  97078. pTDefRegMap(@Self)^.&set := $00020000;
  97079. end;
  97080. procedure TCAN1_C1FIFOINT23.clearRXHALFIE; inline;
  97081. begin
  97082. pTDefRegMap(@Self)^.clr := $00020000;
  97083. end;
  97084. procedure TCAN1_C1FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  97085. begin
  97086. if thebits = 0 then
  97087. pTDefRegMap(@Self)^.clr := $00020000
  97088. else
  97089. pTDefRegMap(@Self)^.&set := $00020000;
  97090. end;
  97091. function TCAN1_C1FIFOINT23.getRXHALFIE : TBits_1; inline;
  97092. begin
  97093. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  97094. end;
  97095. procedure TCAN1_C1FIFOINT23.setRXFULLIE; inline;
  97096. begin
  97097. pTDefRegMap(@Self)^.&set := $00040000;
  97098. end;
  97099. procedure TCAN1_C1FIFOINT23.clearRXFULLIE; inline;
  97100. begin
  97101. pTDefRegMap(@Self)^.clr := $00040000;
  97102. end;
  97103. procedure TCAN1_C1FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  97104. begin
  97105. if thebits = 0 then
  97106. pTDefRegMap(@Self)^.clr := $00040000
  97107. else
  97108. pTDefRegMap(@Self)^.&set := $00040000;
  97109. end;
  97110. function TCAN1_C1FIFOINT23.getRXFULLIE : TBits_1; inline;
  97111. begin
  97112. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  97113. end;
  97114. procedure TCAN1_C1FIFOINT23.setRXOVFLIE; inline;
  97115. begin
  97116. pTDefRegMap(@Self)^.&set := $00080000;
  97117. end;
  97118. procedure TCAN1_C1FIFOINT23.clearRXOVFLIE; inline;
  97119. begin
  97120. pTDefRegMap(@Self)^.clr := $00080000;
  97121. end;
  97122. procedure TCAN1_C1FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  97123. begin
  97124. if thebits = 0 then
  97125. pTDefRegMap(@Self)^.clr := $00080000
  97126. else
  97127. pTDefRegMap(@Self)^.&set := $00080000;
  97128. end;
  97129. function TCAN1_C1FIFOINT23.getRXOVFLIE : TBits_1; inline;
  97130. begin
  97131. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  97132. end;
  97133. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE; inline;
  97134. begin
  97135. pTDefRegMap(@Self)^.&set := $01000000;
  97136. end;
  97137. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIE; inline;
  97138. begin
  97139. pTDefRegMap(@Self)^.clr := $01000000;
  97140. end;
  97141. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  97142. begin
  97143. if thebits = 0 then
  97144. pTDefRegMap(@Self)^.clr := $01000000
  97145. else
  97146. pTDefRegMap(@Self)^.&set := $01000000;
  97147. end;
  97148. function TCAN1_C1FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  97149. begin
  97150. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  97151. end;
  97152. procedure TCAN1_C1FIFOINT23.setTXHALFIE; inline;
  97153. begin
  97154. pTDefRegMap(@Self)^.&set := $02000000;
  97155. end;
  97156. procedure TCAN1_C1FIFOINT23.clearTXHALFIE; inline;
  97157. begin
  97158. pTDefRegMap(@Self)^.clr := $02000000;
  97159. end;
  97160. procedure TCAN1_C1FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  97161. begin
  97162. if thebits = 0 then
  97163. pTDefRegMap(@Self)^.clr := $02000000
  97164. else
  97165. pTDefRegMap(@Self)^.&set := $02000000;
  97166. end;
  97167. function TCAN1_C1FIFOINT23.getTXHALFIE : TBits_1; inline;
  97168. begin
  97169. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  97170. end;
  97171. procedure TCAN1_C1FIFOINT23.setTXNFULLIE; inline;
  97172. begin
  97173. pTDefRegMap(@Self)^.&set := $04000000;
  97174. end;
  97175. procedure TCAN1_C1FIFOINT23.clearTXNFULLIE; inline;
  97176. begin
  97177. pTDefRegMap(@Self)^.clr := $04000000;
  97178. end;
  97179. procedure TCAN1_C1FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  97180. begin
  97181. if thebits = 0 then
  97182. pTDefRegMap(@Self)^.clr := $04000000
  97183. else
  97184. pTDefRegMap(@Self)^.&set := $04000000;
  97185. end;
  97186. function TCAN1_C1FIFOINT23.getTXNFULLIE : TBits_1; inline;
  97187. begin
  97188. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  97189. end;
  97190. procedure TCAN1_C1FIFOINT23.setw(thebits : TBits_32); inline;
  97191. begin
  97192. pTDefRegMap(@Self)^.val := thebits;
  97193. end;
  97194. function TCAN1_C1FIFOINT23.getw : TBits_32; inline;
  97195. begin
  97196. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97197. end;
  97198. procedure TCAN1_C1FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  97199. begin
  97200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  97201. end;
  97202. function TCAN1_C1FIFOCI23.getCFIFOCI : TBits_5; inline;
  97203. begin
  97204. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  97205. end;
  97206. procedure TCAN1_C1FIFOCI23.setw(thebits : TBits_32); inline;
  97207. begin
  97208. pTDefRegMap(@Self)^.val := thebits;
  97209. end;
  97210. function TCAN1_C1FIFOCI23.getw : TBits_32; inline;
  97211. begin
  97212. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97213. end;
  97214. procedure TCAN1_C1FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  97215. begin
  97216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  97217. end;
  97218. function TCAN1_C1FIFOCON24.getTXPRI : TBits_2; inline;
  97219. begin
  97220. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  97221. end;
  97222. procedure TCAN1_C1FIFOCON24.setRTREN; inline;
  97223. begin
  97224. pTDefRegMap(@Self)^.&set := $00000004;
  97225. end;
  97226. procedure TCAN1_C1FIFOCON24.clearRTREN; inline;
  97227. begin
  97228. pTDefRegMap(@Self)^.clr := $00000004;
  97229. end;
  97230. procedure TCAN1_C1FIFOCON24.setRTREN(thebits : TBits_1); inline;
  97231. begin
  97232. if thebits = 0 then
  97233. pTDefRegMap(@Self)^.clr := $00000004
  97234. else
  97235. pTDefRegMap(@Self)^.&set := $00000004;
  97236. end;
  97237. function TCAN1_C1FIFOCON24.getRTREN : TBits_1; inline;
  97238. begin
  97239. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  97240. end;
  97241. procedure TCAN1_C1FIFOCON24.setTXREQ; inline;
  97242. begin
  97243. pTDefRegMap(@Self)^.&set := $00000008;
  97244. end;
  97245. procedure TCAN1_C1FIFOCON24.clearTXREQ; inline;
  97246. begin
  97247. pTDefRegMap(@Self)^.clr := $00000008;
  97248. end;
  97249. procedure TCAN1_C1FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  97250. begin
  97251. if thebits = 0 then
  97252. pTDefRegMap(@Self)^.clr := $00000008
  97253. else
  97254. pTDefRegMap(@Self)^.&set := $00000008;
  97255. end;
  97256. function TCAN1_C1FIFOCON24.getTXREQ : TBits_1; inline;
  97257. begin
  97258. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  97259. end;
  97260. procedure TCAN1_C1FIFOCON24.setTXERR; inline;
  97261. begin
  97262. pTDefRegMap(@Self)^.&set := $00000010;
  97263. end;
  97264. procedure TCAN1_C1FIFOCON24.clearTXERR; inline;
  97265. begin
  97266. pTDefRegMap(@Self)^.clr := $00000010;
  97267. end;
  97268. procedure TCAN1_C1FIFOCON24.setTXERR(thebits : TBits_1); inline;
  97269. begin
  97270. if thebits = 0 then
  97271. pTDefRegMap(@Self)^.clr := $00000010
  97272. else
  97273. pTDefRegMap(@Self)^.&set := $00000010;
  97274. end;
  97275. function TCAN1_C1FIFOCON24.getTXERR : TBits_1; inline;
  97276. begin
  97277. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  97278. end;
  97279. procedure TCAN1_C1FIFOCON24.setTXLARB; inline;
  97280. begin
  97281. pTDefRegMap(@Self)^.&set := $00000020;
  97282. end;
  97283. procedure TCAN1_C1FIFOCON24.clearTXLARB; inline;
  97284. begin
  97285. pTDefRegMap(@Self)^.clr := $00000020;
  97286. end;
  97287. procedure TCAN1_C1FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  97288. begin
  97289. if thebits = 0 then
  97290. pTDefRegMap(@Self)^.clr := $00000020
  97291. else
  97292. pTDefRegMap(@Self)^.&set := $00000020;
  97293. end;
  97294. function TCAN1_C1FIFOCON24.getTXLARB : TBits_1; inline;
  97295. begin
  97296. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  97297. end;
  97298. procedure TCAN1_C1FIFOCON24.setTXABAT; inline;
  97299. begin
  97300. pTDefRegMap(@Self)^.&set := $00000040;
  97301. end;
  97302. procedure TCAN1_C1FIFOCON24.clearTXABAT; inline;
  97303. begin
  97304. pTDefRegMap(@Self)^.clr := $00000040;
  97305. end;
  97306. procedure TCAN1_C1FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  97307. begin
  97308. if thebits = 0 then
  97309. pTDefRegMap(@Self)^.clr := $00000040
  97310. else
  97311. pTDefRegMap(@Self)^.&set := $00000040;
  97312. end;
  97313. function TCAN1_C1FIFOCON24.getTXABAT : TBits_1; inline;
  97314. begin
  97315. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  97316. end;
  97317. procedure TCAN1_C1FIFOCON24.setTXEN; inline;
  97318. begin
  97319. pTDefRegMap(@Self)^.&set := $00000080;
  97320. end;
  97321. procedure TCAN1_C1FIFOCON24.clearTXEN; inline;
  97322. begin
  97323. pTDefRegMap(@Self)^.clr := $00000080;
  97324. end;
  97325. procedure TCAN1_C1FIFOCON24.setTXEN(thebits : TBits_1); inline;
  97326. begin
  97327. if thebits = 0 then
  97328. pTDefRegMap(@Self)^.clr := $00000080
  97329. else
  97330. pTDefRegMap(@Self)^.&set := $00000080;
  97331. end;
  97332. function TCAN1_C1FIFOCON24.getTXEN : TBits_1; inline;
  97333. begin
  97334. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  97335. end;
  97336. procedure TCAN1_C1FIFOCON24.setDONLY; inline;
  97337. begin
  97338. pTDefRegMap(@Self)^.&set := $00001000;
  97339. end;
  97340. procedure TCAN1_C1FIFOCON24.clearDONLY; inline;
  97341. begin
  97342. pTDefRegMap(@Self)^.clr := $00001000;
  97343. end;
  97344. procedure TCAN1_C1FIFOCON24.setDONLY(thebits : TBits_1); inline;
  97345. begin
  97346. if thebits = 0 then
  97347. pTDefRegMap(@Self)^.clr := $00001000
  97348. else
  97349. pTDefRegMap(@Self)^.&set := $00001000;
  97350. end;
  97351. function TCAN1_C1FIFOCON24.getDONLY : TBits_1; inline;
  97352. begin
  97353. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  97354. end;
  97355. procedure TCAN1_C1FIFOCON24.setUINC; inline;
  97356. begin
  97357. pTDefRegMap(@Self)^.&set := $00002000;
  97358. end;
  97359. procedure TCAN1_C1FIFOCON24.clearUINC; inline;
  97360. begin
  97361. pTDefRegMap(@Self)^.clr := $00002000;
  97362. end;
  97363. procedure TCAN1_C1FIFOCON24.setUINC(thebits : TBits_1); inline;
  97364. begin
  97365. if thebits = 0 then
  97366. pTDefRegMap(@Self)^.clr := $00002000
  97367. else
  97368. pTDefRegMap(@Self)^.&set := $00002000;
  97369. end;
  97370. function TCAN1_C1FIFOCON24.getUINC : TBits_1; inline;
  97371. begin
  97372. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  97373. end;
  97374. procedure TCAN1_C1FIFOCON24.setFRESET; inline;
  97375. begin
  97376. pTDefRegMap(@Self)^.&set := $00004000;
  97377. end;
  97378. procedure TCAN1_C1FIFOCON24.clearFRESET; inline;
  97379. begin
  97380. pTDefRegMap(@Self)^.clr := $00004000;
  97381. end;
  97382. procedure TCAN1_C1FIFOCON24.setFRESET(thebits : TBits_1); inline;
  97383. begin
  97384. if thebits = 0 then
  97385. pTDefRegMap(@Self)^.clr := $00004000
  97386. else
  97387. pTDefRegMap(@Self)^.&set := $00004000;
  97388. end;
  97389. function TCAN1_C1FIFOCON24.getFRESET : TBits_1; inline;
  97390. begin
  97391. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  97392. end;
  97393. procedure TCAN1_C1FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  97394. begin
  97395. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  97396. end;
  97397. function TCAN1_C1FIFOCON24.getFSIZE : TBits_5; inline;
  97398. begin
  97399. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  97400. end;
  97401. procedure TCAN1_C1FIFOCON24.setw(thebits : TBits_32); inline;
  97402. begin
  97403. pTDefRegMap(@Self)^.val := thebits;
  97404. end;
  97405. function TCAN1_C1FIFOCON24.getw : TBits_32; inline;
  97406. begin
  97407. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97408. end;
  97409. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF; inline;
  97410. begin
  97411. pTDefRegMap(@Self)^.&set := $00000001;
  97412. end;
  97413. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIF; inline;
  97414. begin
  97415. pTDefRegMap(@Self)^.clr := $00000001;
  97416. end;
  97417. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  97418. begin
  97419. if thebits = 0 then
  97420. pTDefRegMap(@Self)^.clr := $00000001
  97421. else
  97422. pTDefRegMap(@Self)^.&set := $00000001;
  97423. end;
  97424. function TCAN1_C1FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  97425. begin
  97426. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  97427. end;
  97428. procedure TCAN1_C1FIFOINT24.setRXHALFIF; inline;
  97429. begin
  97430. pTDefRegMap(@Self)^.&set := $00000002;
  97431. end;
  97432. procedure TCAN1_C1FIFOINT24.clearRXHALFIF; inline;
  97433. begin
  97434. pTDefRegMap(@Self)^.clr := $00000002;
  97435. end;
  97436. procedure TCAN1_C1FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  97437. begin
  97438. if thebits = 0 then
  97439. pTDefRegMap(@Self)^.clr := $00000002
  97440. else
  97441. pTDefRegMap(@Self)^.&set := $00000002;
  97442. end;
  97443. function TCAN1_C1FIFOINT24.getRXHALFIF : TBits_1; inline;
  97444. begin
  97445. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  97446. end;
  97447. procedure TCAN1_C1FIFOINT24.setRXFULLIF; inline;
  97448. begin
  97449. pTDefRegMap(@Self)^.&set := $00000004;
  97450. end;
  97451. procedure TCAN1_C1FIFOINT24.clearRXFULLIF; inline;
  97452. begin
  97453. pTDefRegMap(@Self)^.clr := $00000004;
  97454. end;
  97455. procedure TCAN1_C1FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  97456. begin
  97457. if thebits = 0 then
  97458. pTDefRegMap(@Self)^.clr := $00000004
  97459. else
  97460. pTDefRegMap(@Self)^.&set := $00000004;
  97461. end;
  97462. function TCAN1_C1FIFOINT24.getRXFULLIF : TBits_1; inline;
  97463. begin
  97464. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  97465. end;
  97466. procedure TCAN1_C1FIFOINT24.setRXOVFLIF; inline;
  97467. begin
  97468. pTDefRegMap(@Self)^.&set := $00000008;
  97469. end;
  97470. procedure TCAN1_C1FIFOINT24.clearRXOVFLIF; inline;
  97471. begin
  97472. pTDefRegMap(@Self)^.clr := $00000008;
  97473. end;
  97474. procedure TCAN1_C1FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  97475. begin
  97476. if thebits = 0 then
  97477. pTDefRegMap(@Self)^.clr := $00000008
  97478. else
  97479. pTDefRegMap(@Self)^.&set := $00000008;
  97480. end;
  97481. function TCAN1_C1FIFOINT24.getRXOVFLIF : TBits_1; inline;
  97482. begin
  97483. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  97484. end;
  97485. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF; inline;
  97486. begin
  97487. pTDefRegMap(@Self)^.&set := $00000100;
  97488. end;
  97489. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIF; inline;
  97490. begin
  97491. pTDefRegMap(@Self)^.clr := $00000100;
  97492. end;
  97493. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  97494. begin
  97495. if thebits = 0 then
  97496. pTDefRegMap(@Self)^.clr := $00000100
  97497. else
  97498. pTDefRegMap(@Self)^.&set := $00000100;
  97499. end;
  97500. function TCAN1_C1FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  97501. begin
  97502. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  97503. end;
  97504. procedure TCAN1_C1FIFOINT24.setTXHALFIF; inline;
  97505. begin
  97506. pTDefRegMap(@Self)^.&set := $00000200;
  97507. end;
  97508. procedure TCAN1_C1FIFOINT24.clearTXHALFIF; inline;
  97509. begin
  97510. pTDefRegMap(@Self)^.clr := $00000200;
  97511. end;
  97512. procedure TCAN1_C1FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  97513. begin
  97514. if thebits = 0 then
  97515. pTDefRegMap(@Self)^.clr := $00000200
  97516. else
  97517. pTDefRegMap(@Self)^.&set := $00000200;
  97518. end;
  97519. function TCAN1_C1FIFOINT24.getTXHALFIF : TBits_1; inline;
  97520. begin
  97521. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  97522. end;
  97523. procedure TCAN1_C1FIFOINT24.setTXNFULLIF; inline;
  97524. begin
  97525. pTDefRegMap(@Self)^.&set := $00000400;
  97526. end;
  97527. procedure TCAN1_C1FIFOINT24.clearTXNFULLIF; inline;
  97528. begin
  97529. pTDefRegMap(@Self)^.clr := $00000400;
  97530. end;
  97531. procedure TCAN1_C1FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  97532. begin
  97533. if thebits = 0 then
  97534. pTDefRegMap(@Self)^.clr := $00000400
  97535. else
  97536. pTDefRegMap(@Self)^.&set := $00000400;
  97537. end;
  97538. function TCAN1_C1FIFOINT24.getTXNFULLIF : TBits_1; inline;
  97539. begin
  97540. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  97541. end;
  97542. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE; inline;
  97543. begin
  97544. pTDefRegMap(@Self)^.&set := $00010000;
  97545. end;
  97546. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIE; inline;
  97547. begin
  97548. pTDefRegMap(@Self)^.clr := $00010000;
  97549. end;
  97550. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  97551. begin
  97552. if thebits = 0 then
  97553. pTDefRegMap(@Self)^.clr := $00010000
  97554. else
  97555. pTDefRegMap(@Self)^.&set := $00010000;
  97556. end;
  97557. function TCAN1_C1FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  97558. begin
  97559. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  97560. end;
  97561. procedure TCAN1_C1FIFOINT24.setRXHALFIE; inline;
  97562. begin
  97563. pTDefRegMap(@Self)^.&set := $00020000;
  97564. end;
  97565. procedure TCAN1_C1FIFOINT24.clearRXHALFIE; inline;
  97566. begin
  97567. pTDefRegMap(@Self)^.clr := $00020000;
  97568. end;
  97569. procedure TCAN1_C1FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  97570. begin
  97571. if thebits = 0 then
  97572. pTDefRegMap(@Self)^.clr := $00020000
  97573. else
  97574. pTDefRegMap(@Self)^.&set := $00020000;
  97575. end;
  97576. function TCAN1_C1FIFOINT24.getRXHALFIE : TBits_1; inline;
  97577. begin
  97578. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  97579. end;
  97580. procedure TCAN1_C1FIFOINT24.setRXFULLIE; inline;
  97581. begin
  97582. pTDefRegMap(@Self)^.&set := $00040000;
  97583. end;
  97584. procedure TCAN1_C1FIFOINT24.clearRXFULLIE; inline;
  97585. begin
  97586. pTDefRegMap(@Self)^.clr := $00040000;
  97587. end;
  97588. procedure TCAN1_C1FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  97589. begin
  97590. if thebits = 0 then
  97591. pTDefRegMap(@Self)^.clr := $00040000
  97592. else
  97593. pTDefRegMap(@Self)^.&set := $00040000;
  97594. end;
  97595. function TCAN1_C1FIFOINT24.getRXFULLIE : TBits_1; inline;
  97596. begin
  97597. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  97598. end;
  97599. procedure TCAN1_C1FIFOINT24.setRXOVFLIE; inline;
  97600. begin
  97601. pTDefRegMap(@Self)^.&set := $00080000;
  97602. end;
  97603. procedure TCAN1_C1FIFOINT24.clearRXOVFLIE; inline;
  97604. begin
  97605. pTDefRegMap(@Self)^.clr := $00080000;
  97606. end;
  97607. procedure TCAN1_C1FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  97608. begin
  97609. if thebits = 0 then
  97610. pTDefRegMap(@Self)^.clr := $00080000
  97611. else
  97612. pTDefRegMap(@Self)^.&set := $00080000;
  97613. end;
  97614. function TCAN1_C1FIFOINT24.getRXOVFLIE : TBits_1; inline;
  97615. begin
  97616. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  97617. end;
  97618. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE; inline;
  97619. begin
  97620. pTDefRegMap(@Self)^.&set := $01000000;
  97621. end;
  97622. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIE; inline;
  97623. begin
  97624. pTDefRegMap(@Self)^.clr := $01000000;
  97625. end;
  97626. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  97627. begin
  97628. if thebits = 0 then
  97629. pTDefRegMap(@Self)^.clr := $01000000
  97630. else
  97631. pTDefRegMap(@Self)^.&set := $01000000;
  97632. end;
  97633. function TCAN1_C1FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  97634. begin
  97635. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  97636. end;
  97637. procedure TCAN1_C1FIFOINT24.setTXHALFIE; inline;
  97638. begin
  97639. pTDefRegMap(@Self)^.&set := $02000000;
  97640. end;
  97641. procedure TCAN1_C1FIFOINT24.clearTXHALFIE; inline;
  97642. begin
  97643. pTDefRegMap(@Self)^.clr := $02000000;
  97644. end;
  97645. procedure TCAN1_C1FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  97646. begin
  97647. if thebits = 0 then
  97648. pTDefRegMap(@Self)^.clr := $02000000
  97649. else
  97650. pTDefRegMap(@Self)^.&set := $02000000;
  97651. end;
  97652. function TCAN1_C1FIFOINT24.getTXHALFIE : TBits_1; inline;
  97653. begin
  97654. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  97655. end;
  97656. procedure TCAN1_C1FIFOINT24.setTXNFULLIE; inline;
  97657. begin
  97658. pTDefRegMap(@Self)^.&set := $04000000;
  97659. end;
  97660. procedure TCAN1_C1FIFOINT24.clearTXNFULLIE; inline;
  97661. begin
  97662. pTDefRegMap(@Self)^.clr := $04000000;
  97663. end;
  97664. procedure TCAN1_C1FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  97665. begin
  97666. if thebits = 0 then
  97667. pTDefRegMap(@Self)^.clr := $04000000
  97668. else
  97669. pTDefRegMap(@Self)^.&set := $04000000;
  97670. end;
  97671. function TCAN1_C1FIFOINT24.getTXNFULLIE : TBits_1; inline;
  97672. begin
  97673. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  97674. end;
  97675. procedure TCAN1_C1FIFOINT24.setw(thebits : TBits_32); inline;
  97676. begin
  97677. pTDefRegMap(@Self)^.val := thebits;
  97678. end;
  97679. function TCAN1_C1FIFOINT24.getw : TBits_32; inline;
  97680. begin
  97681. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97682. end;
  97683. procedure TCAN1_C1FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  97684. begin
  97685. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  97686. end;
  97687. function TCAN1_C1FIFOCI24.getCFIFOCI : TBits_5; inline;
  97688. begin
  97689. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  97690. end;
  97691. procedure TCAN1_C1FIFOCI24.setw(thebits : TBits_32); inline;
  97692. begin
  97693. pTDefRegMap(@Self)^.val := thebits;
  97694. end;
  97695. function TCAN1_C1FIFOCI24.getw : TBits_32; inline;
  97696. begin
  97697. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97698. end;
  97699. procedure TCAN1_C1FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  97700. begin
  97701. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  97702. end;
  97703. function TCAN1_C1FIFOCON25.getTXPRI : TBits_2; inline;
  97704. begin
  97705. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  97706. end;
  97707. procedure TCAN1_C1FIFOCON25.setRTREN; inline;
  97708. begin
  97709. pTDefRegMap(@Self)^.&set := $00000004;
  97710. end;
  97711. procedure TCAN1_C1FIFOCON25.clearRTREN; inline;
  97712. begin
  97713. pTDefRegMap(@Self)^.clr := $00000004;
  97714. end;
  97715. procedure TCAN1_C1FIFOCON25.setRTREN(thebits : TBits_1); inline;
  97716. begin
  97717. if thebits = 0 then
  97718. pTDefRegMap(@Self)^.clr := $00000004
  97719. else
  97720. pTDefRegMap(@Self)^.&set := $00000004;
  97721. end;
  97722. function TCAN1_C1FIFOCON25.getRTREN : TBits_1; inline;
  97723. begin
  97724. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  97725. end;
  97726. procedure TCAN1_C1FIFOCON25.setTXREQ; inline;
  97727. begin
  97728. pTDefRegMap(@Self)^.&set := $00000008;
  97729. end;
  97730. procedure TCAN1_C1FIFOCON25.clearTXREQ; inline;
  97731. begin
  97732. pTDefRegMap(@Self)^.clr := $00000008;
  97733. end;
  97734. procedure TCAN1_C1FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  97735. begin
  97736. if thebits = 0 then
  97737. pTDefRegMap(@Self)^.clr := $00000008
  97738. else
  97739. pTDefRegMap(@Self)^.&set := $00000008;
  97740. end;
  97741. function TCAN1_C1FIFOCON25.getTXREQ : TBits_1; inline;
  97742. begin
  97743. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  97744. end;
  97745. procedure TCAN1_C1FIFOCON25.setTXERR; inline;
  97746. begin
  97747. pTDefRegMap(@Self)^.&set := $00000010;
  97748. end;
  97749. procedure TCAN1_C1FIFOCON25.clearTXERR; inline;
  97750. begin
  97751. pTDefRegMap(@Self)^.clr := $00000010;
  97752. end;
  97753. procedure TCAN1_C1FIFOCON25.setTXERR(thebits : TBits_1); inline;
  97754. begin
  97755. if thebits = 0 then
  97756. pTDefRegMap(@Self)^.clr := $00000010
  97757. else
  97758. pTDefRegMap(@Self)^.&set := $00000010;
  97759. end;
  97760. function TCAN1_C1FIFOCON25.getTXERR : TBits_1; inline;
  97761. begin
  97762. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  97763. end;
  97764. procedure TCAN1_C1FIFOCON25.setTXLARB; inline;
  97765. begin
  97766. pTDefRegMap(@Self)^.&set := $00000020;
  97767. end;
  97768. procedure TCAN1_C1FIFOCON25.clearTXLARB; inline;
  97769. begin
  97770. pTDefRegMap(@Self)^.clr := $00000020;
  97771. end;
  97772. procedure TCAN1_C1FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  97773. begin
  97774. if thebits = 0 then
  97775. pTDefRegMap(@Self)^.clr := $00000020
  97776. else
  97777. pTDefRegMap(@Self)^.&set := $00000020;
  97778. end;
  97779. function TCAN1_C1FIFOCON25.getTXLARB : TBits_1; inline;
  97780. begin
  97781. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  97782. end;
  97783. procedure TCAN1_C1FIFOCON25.setTXABAT; inline;
  97784. begin
  97785. pTDefRegMap(@Self)^.&set := $00000040;
  97786. end;
  97787. procedure TCAN1_C1FIFOCON25.clearTXABAT; inline;
  97788. begin
  97789. pTDefRegMap(@Self)^.clr := $00000040;
  97790. end;
  97791. procedure TCAN1_C1FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  97792. begin
  97793. if thebits = 0 then
  97794. pTDefRegMap(@Self)^.clr := $00000040
  97795. else
  97796. pTDefRegMap(@Self)^.&set := $00000040;
  97797. end;
  97798. function TCAN1_C1FIFOCON25.getTXABAT : TBits_1; inline;
  97799. begin
  97800. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  97801. end;
  97802. procedure TCAN1_C1FIFOCON25.setTXEN; inline;
  97803. begin
  97804. pTDefRegMap(@Self)^.&set := $00000080;
  97805. end;
  97806. procedure TCAN1_C1FIFOCON25.clearTXEN; inline;
  97807. begin
  97808. pTDefRegMap(@Self)^.clr := $00000080;
  97809. end;
  97810. procedure TCAN1_C1FIFOCON25.setTXEN(thebits : TBits_1); inline;
  97811. begin
  97812. if thebits = 0 then
  97813. pTDefRegMap(@Self)^.clr := $00000080
  97814. else
  97815. pTDefRegMap(@Self)^.&set := $00000080;
  97816. end;
  97817. function TCAN1_C1FIFOCON25.getTXEN : TBits_1; inline;
  97818. begin
  97819. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  97820. end;
  97821. procedure TCAN1_C1FIFOCON25.setDONLY; inline;
  97822. begin
  97823. pTDefRegMap(@Self)^.&set := $00001000;
  97824. end;
  97825. procedure TCAN1_C1FIFOCON25.clearDONLY; inline;
  97826. begin
  97827. pTDefRegMap(@Self)^.clr := $00001000;
  97828. end;
  97829. procedure TCAN1_C1FIFOCON25.setDONLY(thebits : TBits_1); inline;
  97830. begin
  97831. if thebits = 0 then
  97832. pTDefRegMap(@Self)^.clr := $00001000
  97833. else
  97834. pTDefRegMap(@Self)^.&set := $00001000;
  97835. end;
  97836. function TCAN1_C1FIFOCON25.getDONLY : TBits_1; inline;
  97837. begin
  97838. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  97839. end;
  97840. procedure TCAN1_C1FIFOCON25.setUINC; inline;
  97841. begin
  97842. pTDefRegMap(@Self)^.&set := $00002000;
  97843. end;
  97844. procedure TCAN1_C1FIFOCON25.clearUINC; inline;
  97845. begin
  97846. pTDefRegMap(@Self)^.clr := $00002000;
  97847. end;
  97848. procedure TCAN1_C1FIFOCON25.setUINC(thebits : TBits_1); inline;
  97849. begin
  97850. if thebits = 0 then
  97851. pTDefRegMap(@Self)^.clr := $00002000
  97852. else
  97853. pTDefRegMap(@Self)^.&set := $00002000;
  97854. end;
  97855. function TCAN1_C1FIFOCON25.getUINC : TBits_1; inline;
  97856. begin
  97857. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  97858. end;
  97859. procedure TCAN1_C1FIFOCON25.setFRESET; inline;
  97860. begin
  97861. pTDefRegMap(@Self)^.&set := $00004000;
  97862. end;
  97863. procedure TCAN1_C1FIFOCON25.clearFRESET; inline;
  97864. begin
  97865. pTDefRegMap(@Self)^.clr := $00004000;
  97866. end;
  97867. procedure TCAN1_C1FIFOCON25.setFRESET(thebits : TBits_1); inline;
  97868. begin
  97869. if thebits = 0 then
  97870. pTDefRegMap(@Self)^.clr := $00004000
  97871. else
  97872. pTDefRegMap(@Self)^.&set := $00004000;
  97873. end;
  97874. function TCAN1_C1FIFOCON25.getFRESET : TBits_1; inline;
  97875. begin
  97876. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  97877. end;
  97878. procedure TCAN1_C1FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  97879. begin
  97880. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  97881. end;
  97882. function TCAN1_C1FIFOCON25.getFSIZE : TBits_5; inline;
  97883. begin
  97884. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  97885. end;
  97886. procedure TCAN1_C1FIFOCON25.setw(thebits : TBits_32); inline;
  97887. begin
  97888. pTDefRegMap(@Self)^.val := thebits;
  97889. end;
  97890. function TCAN1_C1FIFOCON25.getw : TBits_32; inline;
  97891. begin
  97892. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97893. end;
  97894. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF; inline;
  97895. begin
  97896. pTDefRegMap(@Self)^.&set := $00000001;
  97897. end;
  97898. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIF; inline;
  97899. begin
  97900. pTDefRegMap(@Self)^.clr := $00000001;
  97901. end;
  97902. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  97903. begin
  97904. if thebits = 0 then
  97905. pTDefRegMap(@Self)^.clr := $00000001
  97906. else
  97907. pTDefRegMap(@Self)^.&set := $00000001;
  97908. end;
  97909. function TCAN1_C1FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  97910. begin
  97911. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  97912. end;
  97913. procedure TCAN1_C1FIFOINT25.setRXHALFIF; inline;
  97914. begin
  97915. pTDefRegMap(@Self)^.&set := $00000002;
  97916. end;
  97917. procedure TCAN1_C1FIFOINT25.clearRXHALFIF; inline;
  97918. begin
  97919. pTDefRegMap(@Self)^.clr := $00000002;
  97920. end;
  97921. procedure TCAN1_C1FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  97922. begin
  97923. if thebits = 0 then
  97924. pTDefRegMap(@Self)^.clr := $00000002
  97925. else
  97926. pTDefRegMap(@Self)^.&set := $00000002;
  97927. end;
  97928. function TCAN1_C1FIFOINT25.getRXHALFIF : TBits_1; inline;
  97929. begin
  97930. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  97931. end;
  97932. procedure TCAN1_C1FIFOINT25.setRXFULLIF; inline;
  97933. begin
  97934. pTDefRegMap(@Self)^.&set := $00000004;
  97935. end;
  97936. procedure TCAN1_C1FIFOINT25.clearRXFULLIF; inline;
  97937. begin
  97938. pTDefRegMap(@Self)^.clr := $00000004;
  97939. end;
  97940. procedure TCAN1_C1FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  97941. begin
  97942. if thebits = 0 then
  97943. pTDefRegMap(@Self)^.clr := $00000004
  97944. else
  97945. pTDefRegMap(@Self)^.&set := $00000004;
  97946. end;
  97947. function TCAN1_C1FIFOINT25.getRXFULLIF : TBits_1; inline;
  97948. begin
  97949. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  97950. end;
  97951. procedure TCAN1_C1FIFOINT25.setRXOVFLIF; inline;
  97952. begin
  97953. pTDefRegMap(@Self)^.&set := $00000008;
  97954. end;
  97955. procedure TCAN1_C1FIFOINT25.clearRXOVFLIF; inline;
  97956. begin
  97957. pTDefRegMap(@Self)^.clr := $00000008;
  97958. end;
  97959. procedure TCAN1_C1FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  97960. begin
  97961. if thebits = 0 then
  97962. pTDefRegMap(@Self)^.clr := $00000008
  97963. else
  97964. pTDefRegMap(@Self)^.&set := $00000008;
  97965. end;
  97966. function TCAN1_C1FIFOINT25.getRXOVFLIF : TBits_1; inline;
  97967. begin
  97968. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  97969. end;
  97970. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF; inline;
  97971. begin
  97972. pTDefRegMap(@Self)^.&set := $00000100;
  97973. end;
  97974. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIF; inline;
  97975. begin
  97976. pTDefRegMap(@Self)^.clr := $00000100;
  97977. end;
  97978. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  97979. begin
  97980. if thebits = 0 then
  97981. pTDefRegMap(@Self)^.clr := $00000100
  97982. else
  97983. pTDefRegMap(@Self)^.&set := $00000100;
  97984. end;
  97985. function TCAN1_C1FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  97986. begin
  97987. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  97988. end;
  97989. procedure TCAN1_C1FIFOINT25.setTXHALFIF; inline;
  97990. begin
  97991. pTDefRegMap(@Self)^.&set := $00000200;
  97992. end;
  97993. procedure TCAN1_C1FIFOINT25.clearTXHALFIF; inline;
  97994. begin
  97995. pTDefRegMap(@Self)^.clr := $00000200;
  97996. end;
  97997. procedure TCAN1_C1FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  97998. begin
  97999. if thebits = 0 then
  98000. pTDefRegMap(@Self)^.clr := $00000200
  98001. else
  98002. pTDefRegMap(@Self)^.&set := $00000200;
  98003. end;
  98004. function TCAN1_C1FIFOINT25.getTXHALFIF : TBits_1; inline;
  98005. begin
  98006. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  98007. end;
  98008. procedure TCAN1_C1FIFOINT25.setTXNFULLIF; inline;
  98009. begin
  98010. pTDefRegMap(@Self)^.&set := $00000400;
  98011. end;
  98012. procedure TCAN1_C1FIFOINT25.clearTXNFULLIF; inline;
  98013. begin
  98014. pTDefRegMap(@Self)^.clr := $00000400;
  98015. end;
  98016. procedure TCAN1_C1FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  98017. begin
  98018. if thebits = 0 then
  98019. pTDefRegMap(@Self)^.clr := $00000400
  98020. else
  98021. pTDefRegMap(@Self)^.&set := $00000400;
  98022. end;
  98023. function TCAN1_C1FIFOINT25.getTXNFULLIF : TBits_1; inline;
  98024. begin
  98025. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  98026. end;
  98027. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE; inline;
  98028. begin
  98029. pTDefRegMap(@Self)^.&set := $00010000;
  98030. end;
  98031. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIE; inline;
  98032. begin
  98033. pTDefRegMap(@Self)^.clr := $00010000;
  98034. end;
  98035. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  98036. begin
  98037. if thebits = 0 then
  98038. pTDefRegMap(@Self)^.clr := $00010000
  98039. else
  98040. pTDefRegMap(@Self)^.&set := $00010000;
  98041. end;
  98042. function TCAN1_C1FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  98043. begin
  98044. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  98045. end;
  98046. procedure TCAN1_C1FIFOINT25.setRXHALFIE; inline;
  98047. begin
  98048. pTDefRegMap(@Self)^.&set := $00020000;
  98049. end;
  98050. procedure TCAN1_C1FIFOINT25.clearRXHALFIE; inline;
  98051. begin
  98052. pTDefRegMap(@Self)^.clr := $00020000;
  98053. end;
  98054. procedure TCAN1_C1FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  98055. begin
  98056. if thebits = 0 then
  98057. pTDefRegMap(@Self)^.clr := $00020000
  98058. else
  98059. pTDefRegMap(@Self)^.&set := $00020000;
  98060. end;
  98061. function TCAN1_C1FIFOINT25.getRXHALFIE : TBits_1; inline;
  98062. begin
  98063. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  98064. end;
  98065. procedure TCAN1_C1FIFOINT25.setRXFULLIE; inline;
  98066. begin
  98067. pTDefRegMap(@Self)^.&set := $00040000;
  98068. end;
  98069. procedure TCAN1_C1FIFOINT25.clearRXFULLIE; inline;
  98070. begin
  98071. pTDefRegMap(@Self)^.clr := $00040000;
  98072. end;
  98073. procedure TCAN1_C1FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  98074. begin
  98075. if thebits = 0 then
  98076. pTDefRegMap(@Self)^.clr := $00040000
  98077. else
  98078. pTDefRegMap(@Self)^.&set := $00040000;
  98079. end;
  98080. function TCAN1_C1FIFOINT25.getRXFULLIE : TBits_1; inline;
  98081. begin
  98082. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  98083. end;
  98084. procedure TCAN1_C1FIFOINT25.setRXOVFLIE; inline;
  98085. begin
  98086. pTDefRegMap(@Self)^.&set := $00080000;
  98087. end;
  98088. procedure TCAN1_C1FIFOINT25.clearRXOVFLIE; inline;
  98089. begin
  98090. pTDefRegMap(@Self)^.clr := $00080000;
  98091. end;
  98092. procedure TCAN1_C1FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  98093. begin
  98094. if thebits = 0 then
  98095. pTDefRegMap(@Self)^.clr := $00080000
  98096. else
  98097. pTDefRegMap(@Self)^.&set := $00080000;
  98098. end;
  98099. function TCAN1_C1FIFOINT25.getRXOVFLIE : TBits_1; inline;
  98100. begin
  98101. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  98102. end;
  98103. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE; inline;
  98104. begin
  98105. pTDefRegMap(@Self)^.&set := $01000000;
  98106. end;
  98107. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIE; inline;
  98108. begin
  98109. pTDefRegMap(@Self)^.clr := $01000000;
  98110. end;
  98111. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  98112. begin
  98113. if thebits = 0 then
  98114. pTDefRegMap(@Self)^.clr := $01000000
  98115. else
  98116. pTDefRegMap(@Self)^.&set := $01000000;
  98117. end;
  98118. function TCAN1_C1FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  98119. begin
  98120. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  98121. end;
  98122. procedure TCAN1_C1FIFOINT25.setTXHALFIE; inline;
  98123. begin
  98124. pTDefRegMap(@Self)^.&set := $02000000;
  98125. end;
  98126. procedure TCAN1_C1FIFOINT25.clearTXHALFIE; inline;
  98127. begin
  98128. pTDefRegMap(@Self)^.clr := $02000000;
  98129. end;
  98130. procedure TCAN1_C1FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  98131. begin
  98132. if thebits = 0 then
  98133. pTDefRegMap(@Self)^.clr := $02000000
  98134. else
  98135. pTDefRegMap(@Self)^.&set := $02000000;
  98136. end;
  98137. function TCAN1_C1FIFOINT25.getTXHALFIE : TBits_1; inline;
  98138. begin
  98139. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  98140. end;
  98141. procedure TCAN1_C1FIFOINT25.setTXNFULLIE; inline;
  98142. begin
  98143. pTDefRegMap(@Self)^.&set := $04000000;
  98144. end;
  98145. procedure TCAN1_C1FIFOINT25.clearTXNFULLIE; inline;
  98146. begin
  98147. pTDefRegMap(@Self)^.clr := $04000000;
  98148. end;
  98149. procedure TCAN1_C1FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  98150. begin
  98151. if thebits = 0 then
  98152. pTDefRegMap(@Self)^.clr := $04000000
  98153. else
  98154. pTDefRegMap(@Self)^.&set := $04000000;
  98155. end;
  98156. function TCAN1_C1FIFOINT25.getTXNFULLIE : TBits_1; inline;
  98157. begin
  98158. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  98159. end;
  98160. procedure TCAN1_C1FIFOINT25.setw(thebits : TBits_32); inline;
  98161. begin
  98162. pTDefRegMap(@Self)^.val := thebits;
  98163. end;
  98164. function TCAN1_C1FIFOINT25.getw : TBits_32; inline;
  98165. begin
  98166. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98167. end;
  98168. procedure TCAN1_C1FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  98169. begin
  98170. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98171. end;
  98172. function TCAN1_C1FIFOCI25.getCFIFOCI : TBits_5; inline;
  98173. begin
  98174. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98175. end;
  98176. procedure TCAN1_C1FIFOCI25.setw(thebits : TBits_32); inline;
  98177. begin
  98178. pTDefRegMap(@Self)^.val := thebits;
  98179. end;
  98180. function TCAN1_C1FIFOCI25.getw : TBits_32; inline;
  98181. begin
  98182. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98183. end;
  98184. procedure TCAN1_C1FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  98185. begin
  98186. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  98187. end;
  98188. function TCAN1_C1FIFOCON26.getTXPRI : TBits_2; inline;
  98189. begin
  98190. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  98191. end;
  98192. procedure TCAN1_C1FIFOCON26.setRTREN; inline;
  98193. begin
  98194. pTDefRegMap(@Self)^.&set := $00000004;
  98195. end;
  98196. procedure TCAN1_C1FIFOCON26.clearRTREN; inline;
  98197. begin
  98198. pTDefRegMap(@Self)^.clr := $00000004;
  98199. end;
  98200. procedure TCAN1_C1FIFOCON26.setRTREN(thebits : TBits_1); inline;
  98201. begin
  98202. if thebits = 0 then
  98203. pTDefRegMap(@Self)^.clr := $00000004
  98204. else
  98205. pTDefRegMap(@Self)^.&set := $00000004;
  98206. end;
  98207. function TCAN1_C1FIFOCON26.getRTREN : TBits_1; inline;
  98208. begin
  98209. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  98210. end;
  98211. procedure TCAN1_C1FIFOCON26.setTXREQ; inline;
  98212. begin
  98213. pTDefRegMap(@Self)^.&set := $00000008;
  98214. end;
  98215. procedure TCAN1_C1FIFOCON26.clearTXREQ; inline;
  98216. begin
  98217. pTDefRegMap(@Self)^.clr := $00000008;
  98218. end;
  98219. procedure TCAN1_C1FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  98220. begin
  98221. if thebits = 0 then
  98222. pTDefRegMap(@Self)^.clr := $00000008
  98223. else
  98224. pTDefRegMap(@Self)^.&set := $00000008;
  98225. end;
  98226. function TCAN1_C1FIFOCON26.getTXREQ : TBits_1; inline;
  98227. begin
  98228. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  98229. end;
  98230. procedure TCAN1_C1FIFOCON26.setTXERR; inline;
  98231. begin
  98232. pTDefRegMap(@Self)^.&set := $00000010;
  98233. end;
  98234. procedure TCAN1_C1FIFOCON26.clearTXERR; inline;
  98235. begin
  98236. pTDefRegMap(@Self)^.clr := $00000010;
  98237. end;
  98238. procedure TCAN1_C1FIFOCON26.setTXERR(thebits : TBits_1); inline;
  98239. begin
  98240. if thebits = 0 then
  98241. pTDefRegMap(@Self)^.clr := $00000010
  98242. else
  98243. pTDefRegMap(@Self)^.&set := $00000010;
  98244. end;
  98245. function TCAN1_C1FIFOCON26.getTXERR : TBits_1; inline;
  98246. begin
  98247. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  98248. end;
  98249. procedure TCAN1_C1FIFOCON26.setTXLARB; inline;
  98250. begin
  98251. pTDefRegMap(@Self)^.&set := $00000020;
  98252. end;
  98253. procedure TCAN1_C1FIFOCON26.clearTXLARB; inline;
  98254. begin
  98255. pTDefRegMap(@Self)^.clr := $00000020;
  98256. end;
  98257. procedure TCAN1_C1FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  98258. begin
  98259. if thebits = 0 then
  98260. pTDefRegMap(@Self)^.clr := $00000020
  98261. else
  98262. pTDefRegMap(@Self)^.&set := $00000020;
  98263. end;
  98264. function TCAN1_C1FIFOCON26.getTXLARB : TBits_1; inline;
  98265. begin
  98266. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  98267. end;
  98268. procedure TCAN1_C1FIFOCON26.setTXABAT; inline;
  98269. begin
  98270. pTDefRegMap(@Self)^.&set := $00000040;
  98271. end;
  98272. procedure TCAN1_C1FIFOCON26.clearTXABAT; inline;
  98273. begin
  98274. pTDefRegMap(@Self)^.clr := $00000040;
  98275. end;
  98276. procedure TCAN1_C1FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  98277. begin
  98278. if thebits = 0 then
  98279. pTDefRegMap(@Self)^.clr := $00000040
  98280. else
  98281. pTDefRegMap(@Self)^.&set := $00000040;
  98282. end;
  98283. function TCAN1_C1FIFOCON26.getTXABAT : TBits_1; inline;
  98284. begin
  98285. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  98286. end;
  98287. procedure TCAN1_C1FIFOCON26.setTXEN; inline;
  98288. begin
  98289. pTDefRegMap(@Self)^.&set := $00000080;
  98290. end;
  98291. procedure TCAN1_C1FIFOCON26.clearTXEN; inline;
  98292. begin
  98293. pTDefRegMap(@Self)^.clr := $00000080;
  98294. end;
  98295. procedure TCAN1_C1FIFOCON26.setTXEN(thebits : TBits_1); inline;
  98296. begin
  98297. if thebits = 0 then
  98298. pTDefRegMap(@Self)^.clr := $00000080
  98299. else
  98300. pTDefRegMap(@Self)^.&set := $00000080;
  98301. end;
  98302. function TCAN1_C1FIFOCON26.getTXEN : TBits_1; inline;
  98303. begin
  98304. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98305. end;
  98306. procedure TCAN1_C1FIFOCON26.setDONLY; inline;
  98307. begin
  98308. pTDefRegMap(@Self)^.&set := $00001000;
  98309. end;
  98310. procedure TCAN1_C1FIFOCON26.clearDONLY; inline;
  98311. begin
  98312. pTDefRegMap(@Self)^.clr := $00001000;
  98313. end;
  98314. procedure TCAN1_C1FIFOCON26.setDONLY(thebits : TBits_1); inline;
  98315. begin
  98316. if thebits = 0 then
  98317. pTDefRegMap(@Self)^.clr := $00001000
  98318. else
  98319. pTDefRegMap(@Self)^.&set := $00001000;
  98320. end;
  98321. function TCAN1_C1FIFOCON26.getDONLY : TBits_1; inline;
  98322. begin
  98323. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  98324. end;
  98325. procedure TCAN1_C1FIFOCON26.setUINC; inline;
  98326. begin
  98327. pTDefRegMap(@Self)^.&set := $00002000;
  98328. end;
  98329. procedure TCAN1_C1FIFOCON26.clearUINC; inline;
  98330. begin
  98331. pTDefRegMap(@Self)^.clr := $00002000;
  98332. end;
  98333. procedure TCAN1_C1FIFOCON26.setUINC(thebits : TBits_1); inline;
  98334. begin
  98335. if thebits = 0 then
  98336. pTDefRegMap(@Self)^.clr := $00002000
  98337. else
  98338. pTDefRegMap(@Self)^.&set := $00002000;
  98339. end;
  98340. function TCAN1_C1FIFOCON26.getUINC : TBits_1; inline;
  98341. begin
  98342. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  98343. end;
  98344. procedure TCAN1_C1FIFOCON26.setFRESET; inline;
  98345. begin
  98346. pTDefRegMap(@Self)^.&set := $00004000;
  98347. end;
  98348. procedure TCAN1_C1FIFOCON26.clearFRESET; inline;
  98349. begin
  98350. pTDefRegMap(@Self)^.clr := $00004000;
  98351. end;
  98352. procedure TCAN1_C1FIFOCON26.setFRESET(thebits : TBits_1); inline;
  98353. begin
  98354. if thebits = 0 then
  98355. pTDefRegMap(@Self)^.clr := $00004000
  98356. else
  98357. pTDefRegMap(@Self)^.&set := $00004000;
  98358. end;
  98359. function TCAN1_C1FIFOCON26.getFRESET : TBits_1; inline;
  98360. begin
  98361. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  98362. end;
  98363. procedure TCAN1_C1FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  98364. begin
  98365. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98366. end;
  98367. function TCAN1_C1FIFOCON26.getFSIZE : TBits_5; inline;
  98368. begin
  98369. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98370. end;
  98371. procedure TCAN1_C1FIFOCON26.setw(thebits : TBits_32); inline;
  98372. begin
  98373. pTDefRegMap(@Self)^.val := thebits;
  98374. end;
  98375. function TCAN1_C1FIFOCON26.getw : TBits_32; inline;
  98376. begin
  98377. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98378. end;
  98379. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF; inline;
  98380. begin
  98381. pTDefRegMap(@Self)^.&set := $00000001;
  98382. end;
  98383. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIF; inline;
  98384. begin
  98385. pTDefRegMap(@Self)^.clr := $00000001;
  98386. end;
  98387. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  98388. begin
  98389. if thebits = 0 then
  98390. pTDefRegMap(@Self)^.clr := $00000001
  98391. else
  98392. pTDefRegMap(@Self)^.&set := $00000001;
  98393. end;
  98394. function TCAN1_C1FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  98395. begin
  98396. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  98397. end;
  98398. procedure TCAN1_C1FIFOINT26.setRXHALFIF; inline;
  98399. begin
  98400. pTDefRegMap(@Self)^.&set := $00000002;
  98401. end;
  98402. procedure TCAN1_C1FIFOINT26.clearRXHALFIF; inline;
  98403. begin
  98404. pTDefRegMap(@Self)^.clr := $00000002;
  98405. end;
  98406. procedure TCAN1_C1FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  98407. begin
  98408. if thebits = 0 then
  98409. pTDefRegMap(@Self)^.clr := $00000002
  98410. else
  98411. pTDefRegMap(@Self)^.&set := $00000002;
  98412. end;
  98413. function TCAN1_C1FIFOINT26.getRXHALFIF : TBits_1; inline;
  98414. begin
  98415. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  98416. end;
  98417. procedure TCAN1_C1FIFOINT26.setRXFULLIF; inline;
  98418. begin
  98419. pTDefRegMap(@Self)^.&set := $00000004;
  98420. end;
  98421. procedure TCAN1_C1FIFOINT26.clearRXFULLIF; inline;
  98422. begin
  98423. pTDefRegMap(@Self)^.clr := $00000004;
  98424. end;
  98425. procedure TCAN1_C1FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  98426. begin
  98427. if thebits = 0 then
  98428. pTDefRegMap(@Self)^.clr := $00000004
  98429. else
  98430. pTDefRegMap(@Self)^.&set := $00000004;
  98431. end;
  98432. function TCAN1_C1FIFOINT26.getRXFULLIF : TBits_1; inline;
  98433. begin
  98434. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  98435. end;
  98436. procedure TCAN1_C1FIFOINT26.setRXOVFLIF; inline;
  98437. begin
  98438. pTDefRegMap(@Self)^.&set := $00000008;
  98439. end;
  98440. procedure TCAN1_C1FIFOINT26.clearRXOVFLIF; inline;
  98441. begin
  98442. pTDefRegMap(@Self)^.clr := $00000008;
  98443. end;
  98444. procedure TCAN1_C1FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  98445. begin
  98446. if thebits = 0 then
  98447. pTDefRegMap(@Self)^.clr := $00000008
  98448. else
  98449. pTDefRegMap(@Self)^.&set := $00000008;
  98450. end;
  98451. function TCAN1_C1FIFOINT26.getRXOVFLIF : TBits_1; inline;
  98452. begin
  98453. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  98454. end;
  98455. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF; inline;
  98456. begin
  98457. pTDefRegMap(@Self)^.&set := $00000100;
  98458. end;
  98459. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIF; inline;
  98460. begin
  98461. pTDefRegMap(@Self)^.clr := $00000100;
  98462. end;
  98463. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  98464. begin
  98465. if thebits = 0 then
  98466. pTDefRegMap(@Self)^.clr := $00000100
  98467. else
  98468. pTDefRegMap(@Self)^.&set := $00000100;
  98469. end;
  98470. function TCAN1_C1FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  98471. begin
  98472. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  98473. end;
  98474. procedure TCAN1_C1FIFOINT26.setTXHALFIF; inline;
  98475. begin
  98476. pTDefRegMap(@Self)^.&set := $00000200;
  98477. end;
  98478. procedure TCAN1_C1FIFOINT26.clearTXHALFIF; inline;
  98479. begin
  98480. pTDefRegMap(@Self)^.clr := $00000200;
  98481. end;
  98482. procedure TCAN1_C1FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  98483. begin
  98484. if thebits = 0 then
  98485. pTDefRegMap(@Self)^.clr := $00000200
  98486. else
  98487. pTDefRegMap(@Self)^.&set := $00000200;
  98488. end;
  98489. function TCAN1_C1FIFOINT26.getTXHALFIF : TBits_1; inline;
  98490. begin
  98491. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  98492. end;
  98493. procedure TCAN1_C1FIFOINT26.setTXNFULLIF; inline;
  98494. begin
  98495. pTDefRegMap(@Self)^.&set := $00000400;
  98496. end;
  98497. procedure TCAN1_C1FIFOINT26.clearTXNFULLIF; inline;
  98498. begin
  98499. pTDefRegMap(@Self)^.clr := $00000400;
  98500. end;
  98501. procedure TCAN1_C1FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  98502. begin
  98503. if thebits = 0 then
  98504. pTDefRegMap(@Self)^.clr := $00000400
  98505. else
  98506. pTDefRegMap(@Self)^.&set := $00000400;
  98507. end;
  98508. function TCAN1_C1FIFOINT26.getTXNFULLIF : TBits_1; inline;
  98509. begin
  98510. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  98511. end;
  98512. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE; inline;
  98513. begin
  98514. pTDefRegMap(@Self)^.&set := $00010000;
  98515. end;
  98516. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIE; inline;
  98517. begin
  98518. pTDefRegMap(@Self)^.clr := $00010000;
  98519. end;
  98520. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  98521. begin
  98522. if thebits = 0 then
  98523. pTDefRegMap(@Self)^.clr := $00010000
  98524. else
  98525. pTDefRegMap(@Self)^.&set := $00010000;
  98526. end;
  98527. function TCAN1_C1FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  98528. begin
  98529. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  98530. end;
  98531. procedure TCAN1_C1FIFOINT26.setRXHALFIE; inline;
  98532. begin
  98533. pTDefRegMap(@Self)^.&set := $00020000;
  98534. end;
  98535. procedure TCAN1_C1FIFOINT26.clearRXHALFIE; inline;
  98536. begin
  98537. pTDefRegMap(@Self)^.clr := $00020000;
  98538. end;
  98539. procedure TCAN1_C1FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  98540. begin
  98541. if thebits = 0 then
  98542. pTDefRegMap(@Self)^.clr := $00020000
  98543. else
  98544. pTDefRegMap(@Self)^.&set := $00020000;
  98545. end;
  98546. function TCAN1_C1FIFOINT26.getRXHALFIE : TBits_1; inline;
  98547. begin
  98548. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  98549. end;
  98550. procedure TCAN1_C1FIFOINT26.setRXFULLIE; inline;
  98551. begin
  98552. pTDefRegMap(@Self)^.&set := $00040000;
  98553. end;
  98554. procedure TCAN1_C1FIFOINT26.clearRXFULLIE; inline;
  98555. begin
  98556. pTDefRegMap(@Self)^.clr := $00040000;
  98557. end;
  98558. procedure TCAN1_C1FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  98559. begin
  98560. if thebits = 0 then
  98561. pTDefRegMap(@Self)^.clr := $00040000
  98562. else
  98563. pTDefRegMap(@Self)^.&set := $00040000;
  98564. end;
  98565. function TCAN1_C1FIFOINT26.getRXFULLIE : TBits_1; inline;
  98566. begin
  98567. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  98568. end;
  98569. procedure TCAN1_C1FIFOINT26.setRXOVFLIE; inline;
  98570. begin
  98571. pTDefRegMap(@Self)^.&set := $00080000;
  98572. end;
  98573. procedure TCAN1_C1FIFOINT26.clearRXOVFLIE; inline;
  98574. begin
  98575. pTDefRegMap(@Self)^.clr := $00080000;
  98576. end;
  98577. procedure TCAN1_C1FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  98578. begin
  98579. if thebits = 0 then
  98580. pTDefRegMap(@Self)^.clr := $00080000
  98581. else
  98582. pTDefRegMap(@Self)^.&set := $00080000;
  98583. end;
  98584. function TCAN1_C1FIFOINT26.getRXOVFLIE : TBits_1; inline;
  98585. begin
  98586. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  98587. end;
  98588. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE; inline;
  98589. begin
  98590. pTDefRegMap(@Self)^.&set := $01000000;
  98591. end;
  98592. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIE; inline;
  98593. begin
  98594. pTDefRegMap(@Self)^.clr := $01000000;
  98595. end;
  98596. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  98597. begin
  98598. if thebits = 0 then
  98599. pTDefRegMap(@Self)^.clr := $01000000
  98600. else
  98601. pTDefRegMap(@Self)^.&set := $01000000;
  98602. end;
  98603. function TCAN1_C1FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  98604. begin
  98605. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  98606. end;
  98607. procedure TCAN1_C1FIFOINT26.setTXHALFIE; inline;
  98608. begin
  98609. pTDefRegMap(@Self)^.&set := $02000000;
  98610. end;
  98611. procedure TCAN1_C1FIFOINT26.clearTXHALFIE; inline;
  98612. begin
  98613. pTDefRegMap(@Self)^.clr := $02000000;
  98614. end;
  98615. procedure TCAN1_C1FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  98616. begin
  98617. if thebits = 0 then
  98618. pTDefRegMap(@Self)^.clr := $02000000
  98619. else
  98620. pTDefRegMap(@Self)^.&set := $02000000;
  98621. end;
  98622. function TCAN1_C1FIFOINT26.getTXHALFIE : TBits_1; inline;
  98623. begin
  98624. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  98625. end;
  98626. procedure TCAN1_C1FIFOINT26.setTXNFULLIE; inline;
  98627. begin
  98628. pTDefRegMap(@Self)^.&set := $04000000;
  98629. end;
  98630. procedure TCAN1_C1FIFOINT26.clearTXNFULLIE; inline;
  98631. begin
  98632. pTDefRegMap(@Self)^.clr := $04000000;
  98633. end;
  98634. procedure TCAN1_C1FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  98635. begin
  98636. if thebits = 0 then
  98637. pTDefRegMap(@Self)^.clr := $04000000
  98638. else
  98639. pTDefRegMap(@Self)^.&set := $04000000;
  98640. end;
  98641. function TCAN1_C1FIFOINT26.getTXNFULLIE : TBits_1; inline;
  98642. begin
  98643. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  98644. end;
  98645. procedure TCAN1_C1FIFOINT26.setw(thebits : TBits_32); inline;
  98646. begin
  98647. pTDefRegMap(@Self)^.val := thebits;
  98648. end;
  98649. function TCAN1_C1FIFOINT26.getw : TBits_32; inline;
  98650. begin
  98651. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98652. end;
  98653. procedure TCAN1_C1FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  98654. begin
  98655. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98656. end;
  98657. function TCAN1_C1FIFOCI26.getCFIFOCI : TBits_5; inline;
  98658. begin
  98659. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98660. end;
  98661. procedure TCAN1_C1FIFOCI26.setw(thebits : TBits_32); inline;
  98662. begin
  98663. pTDefRegMap(@Self)^.val := thebits;
  98664. end;
  98665. function TCAN1_C1FIFOCI26.getw : TBits_32; inline;
  98666. begin
  98667. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98668. end;
  98669. procedure TCAN1_C1FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  98670. begin
  98671. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  98672. end;
  98673. function TCAN1_C1FIFOCON27.getTXPRI : TBits_2; inline;
  98674. begin
  98675. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  98676. end;
  98677. procedure TCAN1_C1FIFOCON27.setRTREN; inline;
  98678. begin
  98679. pTDefRegMap(@Self)^.&set := $00000004;
  98680. end;
  98681. procedure TCAN1_C1FIFOCON27.clearRTREN; inline;
  98682. begin
  98683. pTDefRegMap(@Self)^.clr := $00000004;
  98684. end;
  98685. procedure TCAN1_C1FIFOCON27.setRTREN(thebits : TBits_1); inline;
  98686. begin
  98687. if thebits = 0 then
  98688. pTDefRegMap(@Self)^.clr := $00000004
  98689. else
  98690. pTDefRegMap(@Self)^.&set := $00000004;
  98691. end;
  98692. function TCAN1_C1FIFOCON27.getRTREN : TBits_1; inline;
  98693. begin
  98694. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  98695. end;
  98696. procedure TCAN1_C1FIFOCON27.setTXREQ; inline;
  98697. begin
  98698. pTDefRegMap(@Self)^.&set := $00000008;
  98699. end;
  98700. procedure TCAN1_C1FIFOCON27.clearTXREQ; inline;
  98701. begin
  98702. pTDefRegMap(@Self)^.clr := $00000008;
  98703. end;
  98704. procedure TCAN1_C1FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  98705. begin
  98706. if thebits = 0 then
  98707. pTDefRegMap(@Self)^.clr := $00000008
  98708. else
  98709. pTDefRegMap(@Self)^.&set := $00000008;
  98710. end;
  98711. function TCAN1_C1FIFOCON27.getTXREQ : TBits_1; inline;
  98712. begin
  98713. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  98714. end;
  98715. procedure TCAN1_C1FIFOCON27.setTXERR; inline;
  98716. begin
  98717. pTDefRegMap(@Self)^.&set := $00000010;
  98718. end;
  98719. procedure TCAN1_C1FIFOCON27.clearTXERR; inline;
  98720. begin
  98721. pTDefRegMap(@Self)^.clr := $00000010;
  98722. end;
  98723. procedure TCAN1_C1FIFOCON27.setTXERR(thebits : TBits_1); inline;
  98724. begin
  98725. if thebits = 0 then
  98726. pTDefRegMap(@Self)^.clr := $00000010
  98727. else
  98728. pTDefRegMap(@Self)^.&set := $00000010;
  98729. end;
  98730. function TCAN1_C1FIFOCON27.getTXERR : TBits_1; inline;
  98731. begin
  98732. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  98733. end;
  98734. procedure TCAN1_C1FIFOCON27.setTXLARB; inline;
  98735. begin
  98736. pTDefRegMap(@Self)^.&set := $00000020;
  98737. end;
  98738. procedure TCAN1_C1FIFOCON27.clearTXLARB; inline;
  98739. begin
  98740. pTDefRegMap(@Self)^.clr := $00000020;
  98741. end;
  98742. procedure TCAN1_C1FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  98743. begin
  98744. if thebits = 0 then
  98745. pTDefRegMap(@Self)^.clr := $00000020
  98746. else
  98747. pTDefRegMap(@Self)^.&set := $00000020;
  98748. end;
  98749. function TCAN1_C1FIFOCON27.getTXLARB : TBits_1; inline;
  98750. begin
  98751. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  98752. end;
  98753. procedure TCAN1_C1FIFOCON27.setTXABAT; inline;
  98754. begin
  98755. pTDefRegMap(@Self)^.&set := $00000040;
  98756. end;
  98757. procedure TCAN1_C1FIFOCON27.clearTXABAT; inline;
  98758. begin
  98759. pTDefRegMap(@Self)^.clr := $00000040;
  98760. end;
  98761. procedure TCAN1_C1FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  98762. begin
  98763. if thebits = 0 then
  98764. pTDefRegMap(@Self)^.clr := $00000040
  98765. else
  98766. pTDefRegMap(@Self)^.&set := $00000040;
  98767. end;
  98768. function TCAN1_C1FIFOCON27.getTXABAT : TBits_1; inline;
  98769. begin
  98770. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  98771. end;
  98772. procedure TCAN1_C1FIFOCON27.setTXEN; inline;
  98773. begin
  98774. pTDefRegMap(@Self)^.&set := $00000080;
  98775. end;
  98776. procedure TCAN1_C1FIFOCON27.clearTXEN; inline;
  98777. begin
  98778. pTDefRegMap(@Self)^.clr := $00000080;
  98779. end;
  98780. procedure TCAN1_C1FIFOCON27.setTXEN(thebits : TBits_1); inline;
  98781. begin
  98782. if thebits = 0 then
  98783. pTDefRegMap(@Self)^.clr := $00000080
  98784. else
  98785. pTDefRegMap(@Self)^.&set := $00000080;
  98786. end;
  98787. function TCAN1_C1FIFOCON27.getTXEN : TBits_1; inline;
  98788. begin
  98789. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98790. end;
  98791. procedure TCAN1_C1FIFOCON27.setDONLY; inline;
  98792. begin
  98793. pTDefRegMap(@Self)^.&set := $00001000;
  98794. end;
  98795. procedure TCAN1_C1FIFOCON27.clearDONLY; inline;
  98796. begin
  98797. pTDefRegMap(@Self)^.clr := $00001000;
  98798. end;
  98799. procedure TCAN1_C1FIFOCON27.setDONLY(thebits : TBits_1); inline;
  98800. begin
  98801. if thebits = 0 then
  98802. pTDefRegMap(@Self)^.clr := $00001000
  98803. else
  98804. pTDefRegMap(@Self)^.&set := $00001000;
  98805. end;
  98806. function TCAN1_C1FIFOCON27.getDONLY : TBits_1; inline;
  98807. begin
  98808. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  98809. end;
  98810. procedure TCAN1_C1FIFOCON27.setUINC; inline;
  98811. begin
  98812. pTDefRegMap(@Self)^.&set := $00002000;
  98813. end;
  98814. procedure TCAN1_C1FIFOCON27.clearUINC; inline;
  98815. begin
  98816. pTDefRegMap(@Self)^.clr := $00002000;
  98817. end;
  98818. procedure TCAN1_C1FIFOCON27.setUINC(thebits : TBits_1); inline;
  98819. begin
  98820. if thebits = 0 then
  98821. pTDefRegMap(@Self)^.clr := $00002000
  98822. else
  98823. pTDefRegMap(@Self)^.&set := $00002000;
  98824. end;
  98825. function TCAN1_C1FIFOCON27.getUINC : TBits_1; inline;
  98826. begin
  98827. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  98828. end;
  98829. procedure TCAN1_C1FIFOCON27.setFRESET; inline;
  98830. begin
  98831. pTDefRegMap(@Self)^.&set := $00004000;
  98832. end;
  98833. procedure TCAN1_C1FIFOCON27.clearFRESET; inline;
  98834. begin
  98835. pTDefRegMap(@Self)^.clr := $00004000;
  98836. end;
  98837. procedure TCAN1_C1FIFOCON27.setFRESET(thebits : TBits_1); inline;
  98838. begin
  98839. if thebits = 0 then
  98840. pTDefRegMap(@Self)^.clr := $00004000
  98841. else
  98842. pTDefRegMap(@Self)^.&set := $00004000;
  98843. end;
  98844. function TCAN1_C1FIFOCON27.getFRESET : TBits_1; inline;
  98845. begin
  98846. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  98847. end;
  98848. procedure TCAN1_C1FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  98849. begin
  98850. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98851. end;
  98852. function TCAN1_C1FIFOCON27.getFSIZE : TBits_5; inline;
  98853. begin
  98854. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98855. end;
  98856. procedure TCAN1_C1FIFOCON27.setw(thebits : TBits_32); inline;
  98857. begin
  98858. pTDefRegMap(@Self)^.val := thebits;
  98859. end;
  98860. function TCAN1_C1FIFOCON27.getw : TBits_32; inline;
  98861. begin
  98862. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98863. end;
  98864. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF; inline;
  98865. begin
  98866. pTDefRegMap(@Self)^.&set := $00000001;
  98867. end;
  98868. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIF; inline;
  98869. begin
  98870. pTDefRegMap(@Self)^.clr := $00000001;
  98871. end;
  98872. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  98873. begin
  98874. if thebits = 0 then
  98875. pTDefRegMap(@Self)^.clr := $00000001
  98876. else
  98877. pTDefRegMap(@Self)^.&set := $00000001;
  98878. end;
  98879. function TCAN1_C1FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  98880. begin
  98881. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  98882. end;
  98883. procedure TCAN1_C1FIFOINT27.setRXHALFIF; inline;
  98884. begin
  98885. pTDefRegMap(@Self)^.&set := $00000002;
  98886. end;
  98887. procedure TCAN1_C1FIFOINT27.clearRXHALFIF; inline;
  98888. begin
  98889. pTDefRegMap(@Self)^.clr := $00000002;
  98890. end;
  98891. procedure TCAN1_C1FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  98892. begin
  98893. if thebits = 0 then
  98894. pTDefRegMap(@Self)^.clr := $00000002
  98895. else
  98896. pTDefRegMap(@Self)^.&set := $00000002;
  98897. end;
  98898. function TCAN1_C1FIFOINT27.getRXHALFIF : TBits_1; inline;
  98899. begin
  98900. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  98901. end;
  98902. procedure TCAN1_C1FIFOINT27.setRXFULLIF; inline;
  98903. begin
  98904. pTDefRegMap(@Self)^.&set := $00000004;
  98905. end;
  98906. procedure TCAN1_C1FIFOINT27.clearRXFULLIF; inline;
  98907. begin
  98908. pTDefRegMap(@Self)^.clr := $00000004;
  98909. end;
  98910. procedure TCAN1_C1FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  98911. begin
  98912. if thebits = 0 then
  98913. pTDefRegMap(@Self)^.clr := $00000004
  98914. else
  98915. pTDefRegMap(@Self)^.&set := $00000004;
  98916. end;
  98917. function TCAN1_C1FIFOINT27.getRXFULLIF : TBits_1; inline;
  98918. begin
  98919. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  98920. end;
  98921. procedure TCAN1_C1FIFOINT27.setRXOVFLIF; inline;
  98922. begin
  98923. pTDefRegMap(@Self)^.&set := $00000008;
  98924. end;
  98925. procedure TCAN1_C1FIFOINT27.clearRXOVFLIF; inline;
  98926. begin
  98927. pTDefRegMap(@Self)^.clr := $00000008;
  98928. end;
  98929. procedure TCAN1_C1FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  98930. begin
  98931. if thebits = 0 then
  98932. pTDefRegMap(@Self)^.clr := $00000008
  98933. else
  98934. pTDefRegMap(@Self)^.&set := $00000008;
  98935. end;
  98936. function TCAN1_C1FIFOINT27.getRXOVFLIF : TBits_1; inline;
  98937. begin
  98938. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  98939. end;
  98940. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF; inline;
  98941. begin
  98942. pTDefRegMap(@Self)^.&set := $00000100;
  98943. end;
  98944. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIF; inline;
  98945. begin
  98946. pTDefRegMap(@Self)^.clr := $00000100;
  98947. end;
  98948. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  98949. begin
  98950. if thebits = 0 then
  98951. pTDefRegMap(@Self)^.clr := $00000100
  98952. else
  98953. pTDefRegMap(@Self)^.&set := $00000100;
  98954. end;
  98955. function TCAN1_C1FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  98956. begin
  98957. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  98958. end;
  98959. procedure TCAN1_C1FIFOINT27.setTXHALFIF; inline;
  98960. begin
  98961. pTDefRegMap(@Self)^.&set := $00000200;
  98962. end;
  98963. procedure TCAN1_C1FIFOINT27.clearTXHALFIF; inline;
  98964. begin
  98965. pTDefRegMap(@Self)^.clr := $00000200;
  98966. end;
  98967. procedure TCAN1_C1FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  98968. begin
  98969. if thebits = 0 then
  98970. pTDefRegMap(@Self)^.clr := $00000200
  98971. else
  98972. pTDefRegMap(@Self)^.&set := $00000200;
  98973. end;
  98974. function TCAN1_C1FIFOINT27.getTXHALFIF : TBits_1; inline;
  98975. begin
  98976. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  98977. end;
  98978. procedure TCAN1_C1FIFOINT27.setTXNFULLIF; inline;
  98979. begin
  98980. pTDefRegMap(@Self)^.&set := $00000400;
  98981. end;
  98982. procedure TCAN1_C1FIFOINT27.clearTXNFULLIF; inline;
  98983. begin
  98984. pTDefRegMap(@Self)^.clr := $00000400;
  98985. end;
  98986. procedure TCAN1_C1FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  98987. begin
  98988. if thebits = 0 then
  98989. pTDefRegMap(@Self)^.clr := $00000400
  98990. else
  98991. pTDefRegMap(@Self)^.&set := $00000400;
  98992. end;
  98993. function TCAN1_C1FIFOINT27.getTXNFULLIF : TBits_1; inline;
  98994. begin
  98995. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  98996. end;
  98997. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE; inline;
  98998. begin
  98999. pTDefRegMap(@Self)^.&set := $00010000;
  99000. end;
  99001. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIE; inline;
  99002. begin
  99003. pTDefRegMap(@Self)^.clr := $00010000;
  99004. end;
  99005. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  99006. begin
  99007. if thebits = 0 then
  99008. pTDefRegMap(@Self)^.clr := $00010000
  99009. else
  99010. pTDefRegMap(@Self)^.&set := $00010000;
  99011. end;
  99012. function TCAN1_C1FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  99013. begin
  99014. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  99015. end;
  99016. procedure TCAN1_C1FIFOINT27.setRXHALFIE; inline;
  99017. begin
  99018. pTDefRegMap(@Self)^.&set := $00020000;
  99019. end;
  99020. procedure TCAN1_C1FIFOINT27.clearRXHALFIE; inline;
  99021. begin
  99022. pTDefRegMap(@Self)^.clr := $00020000;
  99023. end;
  99024. procedure TCAN1_C1FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  99025. begin
  99026. if thebits = 0 then
  99027. pTDefRegMap(@Self)^.clr := $00020000
  99028. else
  99029. pTDefRegMap(@Self)^.&set := $00020000;
  99030. end;
  99031. function TCAN1_C1FIFOINT27.getRXHALFIE : TBits_1; inline;
  99032. begin
  99033. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  99034. end;
  99035. procedure TCAN1_C1FIFOINT27.setRXFULLIE; inline;
  99036. begin
  99037. pTDefRegMap(@Self)^.&set := $00040000;
  99038. end;
  99039. procedure TCAN1_C1FIFOINT27.clearRXFULLIE; inline;
  99040. begin
  99041. pTDefRegMap(@Self)^.clr := $00040000;
  99042. end;
  99043. procedure TCAN1_C1FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  99044. begin
  99045. if thebits = 0 then
  99046. pTDefRegMap(@Self)^.clr := $00040000
  99047. else
  99048. pTDefRegMap(@Self)^.&set := $00040000;
  99049. end;
  99050. function TCAN1_C1FIFOINT27.getRXFULLIE : TBits_1; inline;
  99051. begin
  99052. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  99053. end;
  99054. procedure TCAN1_C1FIFOINT27.setRXOVFLIE; inline;
  99055. begin
  99056. pTDefRegMap(@Self)^.&set := $00080000;
  99057. end;
  99058. procedure TCAN1_C1FIFOINT27.clearRXOVFLIE; inline;
  99059. begin
  99060. pTDefRegMap(@Self)^.clr := $00080000;
  99061. end;
  99062. procedure TCAN1_C1FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  99063. begin
  99064. if thebits = 0 then
  99065. pTDefRegMap(@Self)^.clr := $00080000
  99066. else
  99067. pTDefRegMap(@Self)^.&set := $00080000;
  99068. end;
  99069. function TCAN1_C1FIFOINT27.getRXOVFLIE : TBits_1; inline;
  99070. begin
  99071. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99072. end;
  99073. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE; inline;
  99074. begin
  99075. pTDefRegMap(@Self)^.&set := $01000000;
  99076. end;
  99077. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIE; inline;
  99078. begin
  99079. pTDefRegMap(@Self)^.clr := $01000000;
  99080. end;
  99081. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  99082. begin
  99083. if thebits = 0 then
  99084. pTDefRegMap(@Self)^.clr := $01000000
  99085. else
  99086. pTDefRegMap(@Self)^.&set := $01000000;
  99087. end;
  99088. function TCAN1_C1FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  99089. begin
  99090. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  99091. end;
  99092. procedure TCAN1_C1FIFOINT27.setTXHALFIE; inline;
  99093. begin
  99094. pTDefRegMap(@Self)^.&set := $02000000;
  99095. end;
  99096. procedure TCAN1_C1FIFOINT27.clearTXHALFIE; inline;
  99097. begin
  99098. pTDefRegMap(@Self)^.clr := $02000000;
  99099. end;
  99100. procedure TCAN1_C1FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  99101. begin
  99102. if thebits = 0 then
  99103. pTDefRegMap(@Self)^.clr := $02000000
  99104. else
  99105. pTDefRegMap(@Self)^.&set := $02000000;
  99106. end;
  99107. function TCAN1_C1FIFOINT27.getTXHALFIE : TBits_1; inline;
  99108. begin
  99109. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  99110. end;
  99111. procedure TCAN1_C1FIFOINT27.setTXNFULLIE; inline;
  99112. begin
  99113. pTDefRegMap(@Self)^.&set := $04000000;
  99114. end;
  99115. procedure TCAN1_C1FIFOINT27.clearTXNFULLIE; inline;
  99116. begin
  99117. pTDefRegMap(@Self)^.clr := $04000000;
  99118. end;
  99119. procedure TCAN1_C1FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  99120. begin
  99121. if thebits = 0 then
  99122. pTDefRegMap(@Self)^.clr := $04000000
  99123. else
  99124. pTDefRegMap(@Self)^.&set := $04000000;
  99125. end;
  99126. function TCAN1_C1FIFOINT27.getTXNFULLIE : TBits_1; inline;
  99127. begin
  99128. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  99129. end;
  99130. procedure TCAN1_C1FIFOINT27.setw(thebits : TBits_32); inline;
  99131. begin
  99132. pTDefRegMap(@Self)^.val := thebits;
  99133. end;
  99134. function TCAN1_C1FIFOINT27.getw : TBits_32; inline;
  99135. begin
  99136. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99137. end;
  99138. procedure TCAN1_C1FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  99139. begin
  99140. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  99141. end;
  99142. function TCAN1_C1FIFOCI27.getCFIFOCI : TBits_5; inline;
  99143. begin
  99144. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  99145. end;
  99146. procedure TCAN1_C1FIFOCI27.setw(thebits : TBits_32); inline;
  99147. begin
  99148. pTDefRegMap(@Self)^.val := thebits;
  99149. end;
  99150. function TCAN1_C1FIFOCI27.getw : TBits_32; inline;
  99151. begin
  99152. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99153. end;
  99154. procedure TCAN1_C1FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  99155. begin
  99156. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  99157. end;
  99158. function TCAN1_C1FIFOCON28.getTXPRI : TBits_2; inline;
  99159. begin
  99160. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  99161. end;
  99162. procedure TCAN1_C1FIFOCON28.setRTREN; inline;
  99163. begin
  99164. pTDefRegMap(@Self)^.&set := $00000004;
  99165. end;
  99166. procedure TCAN1_C1FIFOCON28.clearRTREN; inline;
  99167. begin
  99168. pTDefRegMap(@Self)^.clr := $00000004;
  99169. end;
  99170. procedure TCAN1_C1FIFOCON28.setRTREN(thebits : TBits_1); inline;
  99171. begin
  99172. if thebits = 0 then
  99173. pTDefRegMap(@Self)^.clr := $00000004
  99174. else
  99175. pTDefRegMap(@Self)^.&set := $00000004;
  99176. end;
  99177. function TCAN1_C1FIFOCON28.getRTREN : TBits_1; inline;
  99178. begin
  99179. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  99180. end;
  99181. procedure TCAN1_C1FIFOCON28.setTXREQ; inline;
  99182. begin
  99183. pTDefRegMap(@Self)^.&set := $00000008;
  99184. end;
  99185. procedure TCAN1_C1FIFOCON28.clearTXREQ; inline;
  99186. begin
  99187. pTDefRegMap(@Self)^.clr := $00000008;
  99188. end;
  99189. procedure TCAN1_C1FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  99190. begin
  99191. if thebits = 0 then
  99192. pTDefRegMap(@Self)^.clr := $00000008
  99193. else
  99194. pTDefRegMap(@Self)^.&set := $00000008;
  99195. end;
  99196. function TCAN1_C1FIFOCON28.getTXREQ : TBits_1; inline;
  99197. begin
  99198. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  99199. end;
  99200. procedure TCAN1_C1FIFOCON28.setTXERR; inline;
  99201. begin
  99202. pTDefRegMap(@Self)^.&set := $00000010;
  99203. end;
  99204. procedure TCAN1_C1FIFOCON28.clearTXERR; inline;
  99205. begin
  99206. pTDefRegMap(@Self)^.clr := $00000010;
  99207. end;
  99208. procedure TCAN1_C1FIFOCON28.setTXERR(thebits : TBits_1); inline;
  99209. begin
  99210. if thebits = 0 then
  99211. pTDefRegMap(@Self)^.clr := $00000010
  99212. else
  99213. pTDefRegMap(@Self)^.&set := $00000010;
  99214. end;
  99215. function TCAN1_C1FIFOCON28.getTXERR : TBits_1; inline;
  99216. begin
  99217. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  99218. end;
  99219. procedure TCAN1_C1FIFOCON28.setTXLARB; inline;
  99220. begin
  99221. pTDefRegMap(@Self)^.&set := $00000020;
  99222. end;
  99223. procedure TCAN1_C1FIFOCON28.clearTXLARB; inline;
  99224. begin
  99225. pTDefRegMap(@Self)^.clr := $00000020;
  99226. end;
  99227. procedure TCAN1_C1FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  99228. begin
  99229. if thebits = 0 then
  99230. pTDefRegMap(@Self)^.clr := $00000020
  99231. else
  99232. pTDefRegMap(@Self)^.&set := $00000020;
  99233. end;
  99234. function TCAN1_C1FIFOCON28.getTXLARB : TBits_1; inline;
  99235. begin
  99236. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  99237. end;
  99238. procedure TCAN1_C1FIFOCON28.setTXABAT; inline;
  99239. begin
  99240. pTDefRegMap(@Self)^.&set := $00000040;
  99241. end;
  99242. procedure TCAN1_C1FIFOCON28.clearTXABAT; inline;
  99243. begin
  99244. pTDefRegMap(@Self)^.clr := $00000040;
  99245. end;
  99246. procedure TCAN1_C1FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  99247. begin
  99248. if thebits = 0 then
  99249. pTDefRegMap(@Self)^.clr := $00000040
  99250. else
  99251. pTDefRegMap(@Self)^.&set := $00000040;
  99252. end;
  99253. function TCAN1_C1FIFOCON28.getTXABAT : TBits_1; inline;
  99254. begin
  99255. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  99256. end;
  99257. procedure TCAN1_C1FIFOCON28.setTXEN; inline;
  99258. begin
  99259. pTDefRegMap(@Self)^.&set := $00000080;
  99260. end;
  99261. procedure TCAN1_C1FIFOCON28.clearTXEN; inline;
  99262. begin
  99263. pTDefRegMap(@Self)^.clr := $00000080;
  99264. end;
  99265. procedure TCAN1_C1FIFOCON28.setTXEN(thebits : TBits_1); inline;
  99266. begin
  99267. if thebits = 0 then
  99268. pTDefRegMap(@Self)^.clr := $00000080
  99269. else
  99270. pTDefRegMap(@Self)^.&set := $00000080;
  99271. end;
  99272. function TCAN1_C1FIFOCON28.getTXEN : TBits_1; inline;
  99273. begin
  99274. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  99275. end;
  99276. procedure TCAN1_C1FIFOCON28.setDONLY; inline;
  99277. begin
  99278. pTDefRegMap(@Self)^.&set := $00001000;
  99279. end;
  99280. procedure TCAN1_C1FIFOCON28.clearDONLY; inline;
  99281. begin
  99282. pTDefRegMap(@Self)^.clr := $00001000;
  99283. end;
  99284. procedure TCAN1_C1FIFOCON28.setDONLY(thebits : TBits_1); inline;
  99285. begin
  99286. if thebits = 0 then
  99287. pTDefRegMap(@Self)^.clr := $00001000
  99288. else
  99289. pTDefRegMap(@Self)^.&set := $00001000;
  99290. end;
  99291. function TCAN1_C1FIFOCON28.getDONLY : TBits_1; inline;
  99292. begin
  99293. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  99294. end;
  99295. procedure TCAN1_C1FIFOCON28.setUINC; inline;
  99296. begin
  99297. pTDefRegMap(@Self)^.&set := $00002000;
  99298. end;
  99299. procedure TCAN1_C1FIFOCON28.clearUINC; inline;
  99300. begin
  99301. pTDefRegMap(@Self)^.clr := $00002000;
  99302. end;
  99303. procedure TCAN1_C1FIFOCON28.setUINC(thebits : TBits_1); inline;
  99304. begin
  99305. if thebits = 0 then
  99306. pTDefRegMap(@Self)^.clr := $00002000
  99307. else
  99308. pTDefRegMap(@Self)^.&set := $00002000;
  99309. end;
  99310. function TCAN1_C1FIFOCON28.getUINC : TBits_1; inline;
  99311. begin
  99312. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  99313. end;
  99314. procedure TCAN1_C1FIFOCON28.setFRESET; inline;
  99315. begin
  99316. pTDefRegMap(@Self)^.&set := $00004000;
  99317. end;
  99318. procedure TCAN1_C1FIFOCON28.clearFRESET; inline;
  99319. begin
  99320. pTDefRegMap(@Self)^.clr := $00004000;
  99321. end;
  99322. procedure TCAN1_C1FIFOCON28.setFRESET(thebits : TBits_1); inline;
  99323. begin
  99324. if thebits = 0 then
  99325. pTDefRegMap(@Self)^.clr := $00004000
  99326. else
  99327. pTDefRegMap(@Self)^.&set := $00004000;
  99328. end;
  99329. function TCAN1_C1FIFOCON28.getFRESET : TBits_1; inline;
  99330. begin
  99331. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  99332. end;
  99333. procedure TCAN1_C1FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  99334. begin
  99335. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  99336. end;
  99337. function TCAN1_C1FIFOCON28.getFSIZE : TBits_5; inline;
  99338. begin
  99339. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  99340. end;
  99341. procedure TCAN1_C1FIFOCON28.setw(thebits : TBits_32); inline;
  99342. begin
  99343. pTDefRegMap(@Self)^.val := thebits;
  99344. end;
  99345. function TCAN1_C1FIFOCON28.getw : TBits_32; inline;
  99346. begin
  99347. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99348. end;
  99349. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF; inline;
  99350. begin
  99351. pTDefRegMap(@Self)^.&set := $00000001;
  99352. end;
  99353. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIF; inline;
  99354. begin
  99355. pTDefRegMap(@Self)^.clr := $00000001;
  99356. end;
  99357. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  99358. begin
  99359. if thebits = 0 then
  99360. pTDefRegMap(@Self)^.clr := $00000001
  99361. else
  99362. pTDefRegMap(@Self)^.&set := $00000001;
  99363. end;
  99364. function TCAN1_C1FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  99365. begin
  99366. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  99367. end;
  99368. procedure TCAN1_C1FIFOINT28.setRXHALFIF; inline;
  99369. begin
  99370. pTDefRegMap(@Self)^.&set := $00000002;
  99371. end;
  99372. procedure TCAN1_C1FIFOINT28.clearRXHALFIF; inline;
  99373. begin
  99374. pTDefRegMap(@Self)^.clr := $00000002;
  99375. end;
  99376. procedure TCAN1_C1FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  99377. begin
  99378. if thebits = 0 then
  99379. pTDefRegMap(@Self)^.clr := $00000002
  99380. else
  99381. pTDefRegMap(@Self)^.&set := $00000002;
  99382. end;
  99383. function TCAN1_C1FIFOINT28.getRXHALFIF : TBits_1; inline;
  99384. begin
  99385. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  99386. end;
  99387. procedure TCAN1_C1FIFOINT28.setRXFULLIF; inline;
  99388. begin
  99389. pTDefRegMap(@Self)^.&set := $00000004;
  99390. end;
  99391. procedure TCAN1_C1FIFOINT28.clearRXFULLIF; inline;
  99392. begin
  99393. pTDefRegMap(@Self)^.clr := $00000004;
  99394. end;
  99395. procedure TCAN1_C1FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  99396. begin
  99397. if thebits = 0 then
  99398. pTDefRegMap(@Self)^.clr := $00000004
  99399. else
  99400. pTDefRegMap(@Self)^.&set := $00000004;
  99401. end;
  99402. function TCAN1_C1FIFOINT28.getRXFULLIF : TBits_1; inline;
  99403. begin
  99404. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  99405. end;
  99406. procedure TCAN1_C1FIFOINT28.setRXOVFLIF; inline;
  99407. begin
  99408. pTDefRegMap(@Self)^.&set := $00000008;
  99409. end;
  99410. procedure TCAN1_C1FIFOINT28.clearRXOVFLIF; inline;
  99411. begin
  99412. pTDefRegMap(@Self)^.clr := $00000008;
  99413. end;
  99414. procedure TCAN1_C1FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  99415. begin
  99416. if thebits = 0 then
  99417. pTDefRegMap(@Self)^.clr := $00000008
  99418. else
  99419. pTDefRegMap(@Self)^.&set := $00000008;
  99420. end;
  99421. function TCAN1_C1FIFOINT28.getRXOVFLIF : TBits_1; inline;
  99422. begin
  99423. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  99424. end;
  99425. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF; inline;
  99426. begin
  99427. pTDefRegMap(@Self)^.&set := $00000100;
  99428. end;
  99429. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIF; inline;
  99430. begin
  99431. pTDefRegMap(@Self)^.clr := $00000100;
  99432. end;
  99433. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  99434. begin
  99435. if thebits = 0 then
  99436. pTDefRegMap(@Self)^.clr := $00000100
  99437. else
  99438. pTDefRegMap(@Self)^.&set := $00000100;
  99439. end;
  99440. function TCAN1_C1FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  99441. begin
  99442. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  99443. end;
  99444. procedure TCAN1_C1FIFOINT28.setTXHALFIF; inline;
  99445. begin
  99446. pTDefRegMap(@Self)^.&set := $00000200;
  99447. end;
  99448. procedure TCAN1_C1FIFOINT28.clearTXHALFIF; inline;
  99449. begin
  99450. pTDefRegMap(@Self)^.clr := $00000200;
  99451. end;
  99452. procedure TCAN1_C1FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  99453. begin
  99454. if thebits = 0 then
  99455. pTDefRegMap(@Self)^.clr := $00000200
  99456. else
  99457. pTDefRegMap(@Self)^.&set := $00000200;
  99458. end;
  99459. function TCAN1_C1FIFOINT28.getTXHALFIF : TBits_1; inline;
  99460. begin
  99461. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  99462. end;
  99463. procedure TCAN1_C1FIFOINT28.setTXNFULLIF; inline;
  99464. begin
  99465. pTDefRegMap(@Self)^.&set := $00000400;
  99466. end;
  99467. procedure TCAN1_C1FIFOINT28.clearTXNFULLIF; inline;
  99468. begin
  99469. pTDefRegMap(@Self)^.clr := $00000400;
  99470. end;
  99471. procedure TCAN1_C1FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  99472. begin
  99473. if thebits = 0 then
  99474. pTDefRegMap(@Self)^.clr := $00000400
  99475. else
  99476. pTDefRegMap(@Self)^.&set := $00000400;
  99477. end;
  99478. function TCAN1_C1FIFOINT28.getTXNFULLIF : TBits_1; inline;
  99479. begin
  99480. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  99481. end;
  99482. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE; inline;
  99483. begin
  99484. pTDefRegMap(@Self)^.&set := $00010000;
  99485. end;
  99486. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIE; inline;
  99487. begin
  99488. pTDefRegMap(@Self)^.clr := $00010000;
  99489. end;
  99490. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  99491. begin
  99492. if thebits = 0 then
  99493. pTDefRegMap(@Self)^.clr := $00010000
  99494. else
  99495. pTDefRegMap(@Self)^.&set := $00010000;
  99496. end;
  99497. function TCAN1_C1FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  99498. begin
  99499. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  99500. end;
  99501. procedure TCAN1_C1FIFOINT28.setRXHALFIE; inline;
  99502. begin
  99503. pTDefRegMap(@Self)^.&set := $00020000;
  99504. end;
  99505. procedure TCAN1_C1FIFOINT28.clearRXHALFIE; inline;
  99506. begin
  99507. pTDefRegMap(@Self)^.clr := $00020000;
  99508. end;
  99509. procedure TCAN1_C1FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  99510. begin
  99511. if thebits = 0 then
  99512. pTDefRegMap(@Self)^.clr := $00020000
  99513. else
  99514. pTDefRegMap(@Self)^.&set := $00020000;
  99515. end;
  99516. function TCAN1_C1FIFOINT28.getRXHALFIE : TBits_1; inline;
  99517. begin
  99518. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  99519. end;
  99520. procedure TCAN1_C1FIFOINT28.setRXFULLIE; inline;
  99521. begin
  99522. pTDefRegMap(@Self)^.&set := $00040000;
  99523. end;
  99524. procedure TCAN1_C1FIFOINT28.clearRXFULLIE; inline;
  99525. begin
  99526. pTDefRegMap(@Self)^.clr := $00040000;
  99527. end;
  99528. procedure TCAN1_C1FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  99529. begin
  99530. if thebits = 0 then
  99531. pTDefRegMap(@Self)^.clr := $00040000
  99532. else
  99533. pTDefRegMap(@Self)^.&set := $00040000;
  99534. end;
  99535. function TCAN1_C1FIFOINT28.getRXFULLIE : TBits_1; inline;
  99536. begin
  99537. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  99538. end;
  99539. procedure TCAN1_C1FIFOINT28.setRXOVFLIE; inline;
  99540. begin
  99541. pTDefRegMap(@Self)^.&set := $00080000;
  99542. end;
  99543. procedure TCAN1_C1FIFOINT28.clearRXOVFLIE; inline;
  99544. begin
  99545. pTDefRegMap(@Self)^.clr := $00080000;
  99546. end;
  99547. procedure TCAN1_C1FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  99548. begin
  99549. if thebits = 0 then
  99550. pTDefRegMap(@Self)^.clr := $00080000
  99551. else
  99552. pTDefRegMap(@Self)^.&set := $00080000;
  99553. end;
  99554. function TCAN1_C1FIFOINT28.getRXOVFLIE : TBits_1; inline;
  99555. begin
  99556. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99557. end;
  99558. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE; inline;
  99559. begin
  99560. pTDefRegMap(@Self)^.&set := $01000000;
  99561. end;
  99562. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIE; inline;
  99563. begin
  99564. pTDefRegMap(@Self)^.clr := $01000000;
  99565. end;
  99566. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  99567. begin
  99568. if thebits = 0 then
  99569. pTDefRegMap(@Self)^.clr := $01000000
  99570. else
  99571. pTDefRegMap(@Self)^.&set := $01000000;
  99572. end;
  99573. function TCAN1_C1FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  99574. begin
  99575. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  99576. end;
  99577. procedure TCAN1_C1FIFOINT28.setTXHALFIE; inline;
  99578. begin
  99579. pTDefRegMap(@Self)^.&set := $02000000;
  99580. end;
  99581. procedure TCAN1_C1FIFOINT28.clearTXHALFIE; inline;
  99582. begin
  99583. pTDefRegMap(@Self)^.clr := $02000000;
  99584. end;
  99585. procedure TCAN1_C1FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  99586. begin
  99587. if thebits = 0 then
  99588. pTDefRegMap(@Self)^.clr := $02000000
  99589. else
  99590. pTDefRegMap(@Self)^.&set := $02000000;
  99591. end;
  99592. function TCAN1_C1FIFOINT28.getTXHALFIE : TBits_1; inline;
  99593. begin
  99594. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  99595. end;
  99596. procedure TCAN1_C1FIFOINT28.setTXNFULLIE; inline;
  99597. begin
  99598. pTDefRegMap(@Self)^.&set := $04000000;
  99599. end;
  99600. procedure TCAN1_C1FIFOINT28.clearTXNFULLIE; inline;
  99601. begin
  99602. pTDefRegMap(@Self)^.clr := $04000000;
  99603. end;
  99604. procedure TCAN1_C1FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  99605. begin
  99606. if thebits = 0 then
  99607. pTDefRegMap(@Self)^.clr := $04000000
  99608. else
  99609. pTDefRegMap(@Self)^.&set := $04000000;
  99610. end;
  99611. function TCAN1_C1FIFOINT28.getTXNFULLIE : TBits_1; inline;
  99612. begin
  99613. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  99614. end;
  99615. procedure TCAN1_C1FIFOINT28.setw(thebits : TBits_32); inline;
  99616. begin
  99617. pTDefRegMap(@Self)^.val := thebits;
  99618. end;
  99619. function TCAN1_C1FIFOINT28.getw : TBits_32; inline;
  99620. begin
  99621. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99622. end;
  99623. procedure TCAN1_C1FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  99624. begin
  99625. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  99626. end;
  99627. function TCAN1_C1FIFOCI28.getCFIFOCI : TBits_5; inline;
  99628. begin
  99629. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  99630. end;
  99631. procedure TCAN1_C1FIFOCI28.setw(thebits : TBits_32); inline;
  99632. begin
  99633. pTDefRegMap(@Self)^.val := thebits;
  99634. end;
  99635. function TCAN1_C1FIFOCI28.getw : TBits_32; inline;
  99636. begin
  99637. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99638. end;
  99639. procedure TCAN1_C1FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  99640. begin
  99641. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  99642. end;
  99643. function TCAN1_C1FIFOCON29.getTXPRI : TBits_2; inline;
  99644. begin
  99645. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  99646. end;
  99647. procedure TCAN1_C1FIFOCON29.setRTREN; inline;
  99648. begin
  99649. pTDefRegMap(@Self)^.&set := $00000004;
  99650. end;
  99651. procedure TCAN1_C1FIFOCON29.clearRTREN; inline;
  99652. begin
  99653. pTDefRegMap(@Self)^.clr := $00000004;
  99654. end;
  99655. procedure TCAN1_C1FIFOCON29.setRTREN(thebits : TBits_1); inline;
  99656. begin
  99657. if thebits = 0 then
  99658. pTDefRegMap(@Self)^.clr := $00000004
  99659. else
  99660. pTDefRegMap(@Self)^.&set := $00000004;
  99661. end;
  99662. function TCAN1_C1FIFOCON29.getRTREN : TBits_1; inline;
  99663. begin
  99664. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  99665. end;
  99666. procedure TCAN1_C1FIFOCON29.setTXREQ; inline;
  99667. begin
  99668. pTDefRegMap(@Self)^.&set := $00000008;
  99669. end;
  99670. procedure TCAN1_C1FIFOCON29.clearTXREQ; inline;
  99671. begin
  99672. pTDefRegMap(@Self)^.clr := $00000008;
  99673. end;
  99674. procedure TCAN1_C1FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  99675. begin
  99676. if thebits = 0 then
  99677. pTDefRegMap(@Self)^.clr := $00000008
  99678. else
  99679. pTDefRegMap(@Self)^.&set := $00000008;
  99680. end;
  99681. function TCAN1_C1FIFOCON29.getTXREQ : TBits_1; inline;
  99682. begin
  99683. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  99684. end;
  99685. procedure TCAN1_C1FIFOCON29.setTXERR; inline;
  99686. begin
  99687. pTDefRegMap(@Self)^.&set := $00000010;
  99688. end;
  99689. procedure TCAN1_C1FIFOCON29.clearTXERR; inline;
  99690. begin
  99691. pTDefRegMap(@Self)^.clr := $00000010;
  99692. end;
  99693. procedure TCAN1_C1FIFOCON29.setTXERR(thebits : TBits_1); inline;
  99694. begin
  99695. if thebits = 0 then
  99696. pTDefRegMap(@Self)^.clr := $00000010
  99697. else
  99698. pTDefRegMap(@Self)^.&set := $00000010;
  99699. end;
  99700. function TCAN1_C1FIFOCON29.getTXERR : TBits_1; inline;
  99701. begin
  99702. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  99703. end;
  99704. procedure TCAN1_C1FIFOCON29.setTXLARB; inline;
  99705. begin
  99706. pTDefRegMap(@Self)^.&set := $00000020;
  99707. end;
  99708. procedure TCAN1_C1FIFOCON29.clearTXLARB; inline;
  99709. begin
  99710. pTDefRegMap(@Self)^.clr := $00000020;
  99711. end;
  99712. procedure TCAN1_C1FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  99713. begin
  99714. if thebits = 0 then
  99715. pTDefRegMap(@Self)^.clr := $00000020
  99716. else
  99717. pTDefRegMap(@Self)^.&set := $00000020;
  99718. end;
  99719. function TCAN1_C1FIFOCON29.getTXLARB : TBits_1; inline;
  99720. begin
  99721. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  99722. end;
  99723. procedure TCAN1_C1FIFOCON29.setTXABAT; inline;
  99724. begin
  99725. pTDefRegMap(@Self)^.&set := $00000040;
  99726. end;
  99727. procedure TCAN1_C1FIFOCON29.clearTXABAT; inline;
  99728. begin
  99729. pTDefRegMap(@Self)^.clr := $00000040;
  99730. end;
  99731. procedure TCAN1_C1FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  99732. begin
  99733. if thebits = 0 then
  99734. pTDefRegMap(@Self)^.clr := $00000040
  99735. else
  99736. pTDefRegMap(@Self)^.&set := $00000040;
  99737. end;
  99738. function TCAN1_C1FIFOCON29.getTXABAT : TBits_1; inline;
  99739. begin
  99740. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  99741. end;
  99742. procedure TCAN1_C1FIFOCON29.setTXEN; inline;
  99743. begin
  99744. pTDefRegMap(@Self)^.&set := $00000080;
  99745. end;
  99746. procedure TCAN1_C1FIFOCON29.clearTXEN; inline;
  99747. begin
  99748. pTDefRegMap(@Self)^.clr := $00000080;
  99749. end;
  99750. procedure TCAN1_C1FIFOCON29.setTXEN(thebits : TBits_1); inline;
  99751. begin
  99752. if thebits = 0 then
  99753. pTDefRegMap(@Self)^.clr := $00000080
  99754. else
  99755. pTDefRegMap(@Self)^.&set := $00000080;
  99756. end;
  99757. function TCAN1_C1FIFOCON29.getTXEN : TBits_1; inline;
  99758. begin
  99759. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  99760. end;
  99761. procedure TCAN1_C1FIFOCON29.setDONLY; inline;
  99762. begin
  99763. pTDefRegMap(@Self)^.&set := $00001000;
  99764. end;
  99765. procedure TCAN1_C1FIFOCON29.clearDONLY; inline;
  99766. begin
  99767. pTDefRegMap(@Self)^.clr := $00001000;
  99768. end;
  99769. procedure TCAN1_C1FIFOCON29.setDONLY(thebits : TBits_1); inline;
  99770. begin
  99771. if thebits = 0 then
  99772. pTDefRegMap(@Self)^.clr := $00001000
  99773. else
  99774. pTDefRegMap(@Self)^.&set := $00001000;
  99775. end;
  99776. function TCAN1_C1FIFOCON29.getDONLY : TBits_1; inline;
  99777. begin
  99778. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  99779. end;
  99780. procedure TCAN1_C1FIFOCON29.setUINC; inline;
  99781. begin
  99782. pTDefRegMap(@Self)^.&set := $00002000;
  99783. end;
  99784. procedure TCAN1_C1FIFOCON29.clearUINC; inline;
  99785. begin
  99786. pTDefRegMap(@Self)^.clr := $00002000;
  99787. end;
  99788. procedure TCAN1_C1FIFOCON29.setUINC(thebits : TBits_1); inline;
  99789. begin
  99790. if thebits = 0 then
  99791. pTDefRegMap(@Self)^.clr := $00002000
  99792. else
  99793. pTDefRegMap(@Self)^.&set := $00002000;
  99794. end;
  99795. function TCAN1_C1FIFOCON29.getUINC : TBits_1; inline;
  99796. begin
  99797. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  99798. end;
  99799. procedure TCAN1_C1FIFOCON29.setFRESET; inline;
  99800. begin
  99801. pTDefRegMap(@Self)^.&set := $00004000;
  99802. end;
  99803. procedure TCAN1_C1FIFOCON29.clearFRESET; inline;
  99804. begin
  99805. pTDefRegMap(@Self)^.clr := $00004000;
  99806. end;
  99807. procedure TCAN1_C1FIFOCON29.setFRESET(thebits : TBits_1); inline;
  99808. begin
  99809. if thebits = 0 then
  99810. pTDefRegMap(@Self)^.clr := $00004000
  99811. else
  99812. pTDefRegMap(@Self)^.&set := $00004000;
  99813. end;
  99814. function TCAN1_C1FIFOCON29.getFRESET : TBits_1; inline;
  99815. begin
  99816. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  99817. end;
  99818. procedure TCAN1_C1FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  99819. begin
  99820. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  99821. end;
  99822. function TCAN1_C1FIFOCON29.getFSIZE : TBits_5; inline;
  99823. begin
  99824. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  99825. end;
  99826. procedure TCAN1_C1FIFOCON29.setw(thebits : TBits_32); inline;
  99827. begin
  99828. pTDefRegMap(@Self)^.val := thebits;
  99829. end;
  99830. function TCAN1_C1FIFOCON29.getw : TBits_32; inline;
  99831. begin
  99832. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99833. end;
  99834. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF; inline;
  99835. begin
  99836. pTDefRegMap(@Self)^.&set := $00000001;
  99837. end;
  99838. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIF; inline;
  99839. begin
  99840. pTDefRegMap(@Self)^.clr := $00000001;
  99841. end;
  99842. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  99843. begin
  99844. if thebits = 0 then
  99845. pTDefRegMap(@Self)^.clr := $00000001
  99846. else
  99847. pTDefRegMap(@Self)^.&set := $00000001;
  99848. end;
  99849. function TCAN1_C1FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  99850. begin
  99851. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  99852. end;
  99853. procedure TCAN1_C1FIFOINT29.setRXHALFIF; inline;
  99854. begin
  99855. pTDefRegMap(@Self)^.&set := $00000002;
  99856. end;
  99857. procedure TCAN1_C1FIFOINT29.clearRXHALFIF; inline;
  99858. begin
  99859. pTDefRegMap(@Self)^.clr := $00000002;
  99860. end;
  99861. procedure TCAN1_C1FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  99862. begin
  99863. if thebits = 0 then
  99864. pTDefRegMap(@Self)^.clr := $00000002
  99865. else
  99866. pTDefRegMap(@Self)^.&set := $00000002;
  99867. end;
  99868. function TCAN1_C1FIFOINT29.getRXHALFIF : TBits_1; inline;
  99869. begin
  99870. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  99871. end;
  99872. procedure TCAN1_C1FIFOINT29.setRXFULLIF; inline;
  99873. begin
  99874. pTDefRegMap(@Self)^.&set := $00000004;
  99875. end;
  99876. procedure TCAN1_C1FIFOINT29.clearRXFULLIF; inline;
  99877. begin
  99878. pTDefRegMap(@Self)^.clr := $00000004;
  99879. end;
  99880. procedure TCAN1_C1FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  99881. begin
  99882. if thebits = 0 then
  99883. pTDefRegMap(@Self)^.clr := $00000004
  99884. else
  99885. pTDefRegMap(@Self)^.&set := $00000004;
  99886. end;
  99887. function TCAN1_C1FIFOINT29.getRXFULLIF : TBits_1; inline;
  99888. begin
  99889. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  99890. end;
  99891. procedure TCAN1_C1FIFOINT29.setRXOVFLIF; inline;
  99892. begin
  99893. pTDefRegMap(@Self)^.&set := $00000008;
  99894. end;
  99895. procedure TCAN1_C1FIFOINT29.clearRXOVFLIF; inline;
  99896. begin
  99897. pTDefRegMap(@Self)^.clr := $00000008;
  99898. end;
  99899. procedure TCAN1_C1FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  99900. begin
  99901. if thebits = 0 then
  99902. pTDefRegMap(@Self)^.clr := $00000008
  99903. else
  99904. pTDefRegMap(@Self)^.&set := $00000008;
  99905. end;
  99906. function TCAN1_C1FIFOINT29.getRXOVFLIF : TBits_1; inline;
  99907. begin
  99908. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  99909. end;
  99910. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF; inline;
  99911. begin
  99912. pTDefRegMap(@Self)^.&set := $00000100;
  99913. end;
  99914. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIF; inline;
  99915. begin
  99916. pTDefRegMap(@Self)^.clr := $00000100;
  99917. end;
  99918. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  99919. begin
  99920. if thebits = 0 then
  99921. pTDefRegMap(@Self)^.clr := $00000100
  99922. else
  99923. pTDefRegMap(@Self)^.&set := $00000100;
  99924. end;
  99925. function TCAN1_C1FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  99926. begin
  99927. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  99928. end;
  99929. procedure TCAN1_C1FIFOINT29.setTXHALFIF; inline;
  99930. begin
  99931. pTDefRegMap(@Self)^.&set := $00000200;
  99932. end;
  99933. procedure TCAN1_C1FIFOINT29.clearTXHALFIF; inline;
  99934. begin
  99935. pTDefRegMap(@Self)^.clr := $00000200;
  99936. end;
  99937. procedure TCAN1_C1FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  99938. begin
  99939. if thebits = 0 then
  99940. pTDefRegMap(@Self)^.clr := $00000200
  99941. else
  99942. pTDefRegMap(@Self)^.&set := $00000200;
  99943. end;
  99944. function TCAN1_C1FIFOINT29.getTXHALFIF : TBits_1; inline;
  99945. begin
  99946. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  99947. end;
  99948. procedure TCAN1_C1FIFOINT29.setTXNFULLIF; inline;
  99949. begin
  99950. pTDefRegMap(@Self)^.&set := $00000400;
  99951. end;
  99952. procedure TCAN1_C1FIFOINT29.clearTXNFULLIF; inline;
  99953. begin
  99954. pTDefRegMap(@Self)^.clr := $00000400;
  99955. end;
  99956. procedure TCAN1_C1FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  99957. begin
  99958. if thebits = 0 then
  99959. pTDefRegMap(@Self)^.clr := $00000400
  99960. else
  99961. pTDefRegMap(@Self)^.&set := $00000400;
  99962. end;
  99963. function TCAN1_C1FIFOINT29.getTXNFULLIF : TBits_1; inline;
  99964. begin
  99965. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  99966. end;
  99967. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE; inline;
  99968. begin
  99969. pTDefRegMap(@Self)^.&set := $00010000;
  99970. end;
  99971. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIE; inline;
  99972. begin
  99973. pTDefRegMap(@Self)^.clr := $00010000;
  99974. end;
  99975. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  99976. begin
  99977. if thebits = 0 then
  99978. pTDefRegMap(@Self)^.clr := $00010000
  99979. else
  99980. pTDefRegMap(@Self)^.&set := $00010000;
  99981. end;
  99982. function TCAN1_C1FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  99983. begin
  99984. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  99985. end;
  99986. procedure TCAN1_C1FIFOINT29.setRXHALFIE; inline;
  99987. begin
  99988. pTDefRegMap(@Self)^.&set := $00020000;
  99989. end;
  99990. procedure TCAN1_C1FIFOINT29.clearRXHALFIE; inline;
  99991. begin
  99992. pTDefRegMap(@Self)^.clr := $00020000;
  99993. end;
  99994. procedure TCAN1_C1FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  99995. begin
  99996. if thebits = 0 then
  99997. pTDefRegMap(@Self)^.clr := $00020000
  99998. else
  99999. pTDefRegMap(@Self)^.&set := $00020000;
  100000. end;
  100001. function TCAN1_C1FIFOINT29.getRXHALFIE : TBits_1; inline;
  100002. begin
  100003. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  100004. end;
  100005. procedure TCAN1_C1FIFOINT29.setRXFULLIE; inline;
  100006. begin
  100007. pTDefRegMap(@Self)^.&set := $00040000;
  100008. end;
  100009. procedure TCAN1_C1FIFOINT29.clearRXFULLIE; inline;
  100010. begin
  100011. pTDefRegMap(@Self)^.clr := $00040000;
  100012. end;
  100013. procedure TCAN1_C1FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  100014. begin
  100015. if thebits = 0 then
  100016. pTDefRegMap(@Self)^.clr := $00040000
  100017. else
  100018. pTDefRegMap(@Self)^.&set := $00040000;
  100019. end;
  100020. function TCAN1_C1FIFOINT29.getRXFULLIE : TBits_1; inline;
  100021. begin
  100022. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  100023. end;
  100024. procedure TCAN1_C1FIFOINT29.setRXOVFLIE; inline;
  100025. begin
  100026. pTDefRegMap(@Self)^.&set := $00080000;
  100027. end;
  100028. procedure TCAN1_C1FIFOINT29.clearRXOVFLIE; inline;
  100029. begin
  100030. pTDefRegMap(@Self)^.clr := $00080000;
  100031. end;
  100032. procedure TCAN1_C1FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  100033. begin
  100034. if thebits = 0 then
  100035. pTDefRegMap(@Self)^.clr := $00080000
  100036. else
  100037. pTDefRegMap(@Self)^.&set := $00080000;
  100038. end;
  100039. function TCAN1_C1FIFOINT29.getRXOVFLIE : TBits_1; inline;
  100040. begin
  100041. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100042. end;
  100043. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE; inline;
  100044. begin
  100045. pTDefRegMap(@Self)^.&set := $01000000;
  100046. end;
  100047. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIE; inline;
  100048. begin
  100049. pTDefRegMap(@Self)^.clr := $01000000;
  100050. end;
  100051. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  100052. begin
  100053. if thebits = 0 then
  100054. pTDefRegMap(@Self)^.clr := $01000000
  100055. else
  100056. pTDefRegMap(@Self)^.&set := $01000000;
  100057. end;
  100058. function TCAN1_C1FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  100059. begin
  100060. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  100061. end;
  100062. procedure TCAN1_C1FIFOINT29.setTXHALFIE; inline;
  100063. begin
  100064. pTDefRegMap(@Self)^.&set := $02000000;
  100065. end;
  100066. procedure TCAN1_C1FIFOINT29.clearTXHALFIE; inline;
  100067. begin
  100068. pTDefRegMap(@Self)^.clr := $02000000;
  100069. end;
  100070. procedure TCAN1_C1FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  100071. begin
  100072. if thebits = 0 then
  100073. pTDefRegMap(@Self)^.clr := $02000000
  100074. else
  100075. pTDefRegMap(@Self)^.&set := $02000000;
  100076. end;
  100077. function TCAN1_C1FIFOINT29.getTXHALFIE : TBits_1; inline;
  100078. begin
  100079. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  100080. end;
  100081. procedure TCAN1_C1FIFOINT29.setTXNFULLIE; inline;
  100082. begin
  100083. pTDefRegMap(@Self)^.&set := $04000000;
  100084. end;
  100085. procedure TCAN1_C1FIFOINT29.clearTXNFULLIE; inline;
  100086. begin
  100087. pTDefRegMap(@Self)^.clr := $04000000;
  100088. end;
  100089. procedure TCAN1_C1FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  100090. begin
  100091. if thebits = 0 then
  100092. pTDefRegMap(@Self)^.clr := $04000000
  100093. else
  100094. pTDefRegMap(@Self)^.&set := $04000000;
  100095. end;
  100096. function TCAN1_C1FIFOINT29.getTXNFULLIE : TBits_1; inline;
  100097. begin
  100098. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  100099. end;
  100100. procedure TCAN1_C1FIFOINT29.setw(thebits : TBits_32); inline;
  100101. begin
  100102. pTDefRegMap(@Self)^.val := thebits;
  100103. end;
  100104. function TCAN1_C1FIFOINT29.getw : TBits_32; inline;
  100105. begin
  100106. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100107. end;
  100108. procedure TCAN1_C1FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  100109. begin
  100110. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  100111. end;
  100112. function TCAN1_C1FIFOCI29.getCFIFOCI : TBits_5; inline;
  100113. begin
  100114. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  100115. end;
  100116. procedure TCAN1_C1FIFOCI29.setw(thebits : TBits_32); inline;
  100117. begin
  100118. pTDefRegMap(@Self)^.val := thebits;
  100119. end;
  100120. function TCAN1_C1FIFOCI29.getw : TBits_32; inline;
  100121. begin
  100122. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100123. end;
  100124. procedure TCAN1_C1FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  100125. begin
  100126. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  100127. end;
  100128. function TCAN1_C1FIFOCON30.getTXPRI : TBits_2; inline;
  100129. begin
  100130. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  100131. end;
  100132. procedure TCAN1_C1FIFOCON30.setRTREN; inline;
  100133. begin
  100134. pTDefRegMap(@Self)^.&set := $00000004;
  100135. end;
  100136. procedure TCAN1_C1FIFOCON30.clearRTREN; inline;
  100137. begin
  100138. pTDefRegMap(@Self)^.clr := $00000004;
  100139. end;
  100140. procedure TCAN1_C1FIFOCON30.setRTREN(thebits : TBits_1); inline;
  100141. begin
  100142. if thebits = 0 then
  100143. pTDefRegMap(@Self)^.clr := $00000004
  100144. else
  100145. pTDefRegMap(@Self)^.&set := $00000004;
  100146. end;
  100147. function TCAN1_C1FIFOCON30.getRTREN : TBits_1; inline;
  100148. begin
  100149. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  100150. end;
  100151. procedure TCAN1_C1FIFOCON30.setTXREQ; inline;
  100152. begin
  100153. pTDefRegMap(@Self)^.&set := $00000008;
  100154. end;
  100155. procedure TCAN1_C1FIFOCON30.clearTXREQ; inline;
  100156. begin
  100157. pTDefRegMap(@Self)^.clr := $00000008;
  100158. end;
  100159. procedure TCAN1_C1FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  100160. begin
  100161. if thebits = 0 then
  100162. pTDefRegMap(@Self)^.clr := $00000008
  100163. else
  100164. pTDefRegMap(@Self)^.&set := $00000008;
  100165. end;
  100166. function TCAN1_C1FIFOCON30.getTXREQ : TBits_1; inline;
  100167. begin
  100168. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  100169. end;
  100170. procedure TCAN1_C1FIFOCON30.setTXERR; inline;
  100171. begin
  100172. pTDefRegMap(@Self)^.&set := $00000010;
  100173. end;
  100174. procedure TCAN1_C1FIFOCON30.clearTXERR; inline;
  100175. begin
  100176. pTDefRegMap(@Self)^.clr := $00000010;
  100177. end;
  100178. procedure TCAN1_C1FIFOCON30.setTXERR(thebits : TBits_1); inline;
  100179. begin
  100180. if thebits = 0 then
  100181. pTDefRegMap(@Self)^.clr := $00000010
  100182. else
  100183. pTDefRegMap(@Self)^.&set := $00000010;
  100184. end;
  100185. function TCAN1_C1FIFOCON30.getTXERR : TBits_1; inline;
  100186. begin
  100187. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  100188. end;
  100189. procedure TCAN1_C1FIFOCON30.setTXLARB; inline;
  100190. begin
  100191. pTDefRegMap(@Self)^.&set := $00000020;
  100192. end;
  100193. procedure TCAN1_C1FIFOCON30.clearTXLARB; inline;
  100194. begin
  100195. pTDefRegMap(@Self)^.clr := $00000020;
  100196. end;
  100197. procedure TCAN1_C1FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  100198. begin
  100199. if thebits = 0 then
  100200. pTDefRegMap(@Self)^.clr := $00000020
  100201. else
  100202. pTDefRegMap(@Self)^.&set := $00000020;
  100203. end;
  100204. function TCAN1_C1FIFOCON30.getTXLARB : TBits_1; inline;
  100205. begin
  100206. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  100207. end;
  100208. procedure TCAN1_C1FIFOCON30.setTXABAT; inline;
  100209. begin
  100210. pTDefRegMap(@Self)^.&set := $00000040;
  100211. end;
  100212. procedure TCAN1_C1FIFOCON30.clearTXABAT; inline;
  100213. begin
  100214. pTDefRegMap(@Self)^.clr := $00000040;
  100215. end;
  100216. procedure TCAN1_C1FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  100217. begin
  100218. if thebits = 0 then
  100219. pTDefRegMap(@Self)^.clr := $00000040
  100220. else
  100221. pTDefRegMap(@Self)^.&set := $00000040;
  100222. end;
  100223. function TCAN1_C1FIFOCON30.getTXABAT : TBits_1; inline;
  100224. begin
  100225. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  100226. end;
  100227. procedure TCAN1_C1FIFOCON30.setTXEN; inline;
  100228. begin
  100229. pTDefRegMap(@Self)^.&set := $00000080;
  100230. end;
  100231. procedure TCAN1_C1FIFOCON30.clearTXEN; inline;
  100232. begin
  100233. pTDefRegMap(@Self)^.clr := $00000080;
  100234. end;
  100235. procedure TCAN1_C1FIFOCON30.setTXEN(thebits : TBits_1); inline;
  100236. begin
  100237. if thebits = 0 then
  100238. pTDefRegMap(@Self)^.clr := $00000080
  100239. else
  100240. pTDefRegMap(@Self)^.&set := $00000080;
  100241. end;
  100242. function TCAN1_C1FIFOCON30.getTXEN : TBits_1; inline;
  100243. begin
  100244. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  100245. end;
  100246. procedure TCAN1_C1FIFOCON30.setDONLY; inline;
  100247. begin
  100248. pTDefRegMap(@Self)^.&set := $00001000;
  100249. end;
  100250. procedure TCAN1_C1FIFOCON30.clearDONLY; inline;
  100251. begin
  100252. pTDefRegMap(@Self)^.clr := $00001000;
  100253. end;
  100254. procedure TCAN1_C1FIFOCON30.setDONLY(thebits : TBits_1); inline;
  100255. begin
  100256. if thebits = 0 then
  100257. pTDefRegMap(@Self)^.clr := $00001000
  100258. else
  100259. pTDefRegMap(@Self)^.&set := $00001000;
  100260. end;
  100261. function TCAN1_C1FIFOCON30.getDONLY : TBits_1; inline;
  100262. begin
  100263. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  100264. end;
  100265. procedure TCAN1_C1FIFOCON30.setUINC; inline;
  100266. begin
  100267. pTDefRegMap(@Self)^.&set := $00002000;
  100268. end;
  100269. procedure TCAN1_C1FIFOCON30.clearUINC; inline;
  100270. begin
  100271. pTDefRegMap(@Self)^.clr := $00002000;
  100272. end;
  100273. procedure TCAN1_C1FIFOCON30.setUINC(thebits : TBits_1); inline;
  100274. begin
  100275. if thebits = 0 then
  100276. pTDefRegMap(@Self)^.clr := $00002000
  100277. else
  100278. pTDefRegMap(@Self)^.&set := $00002000;
  100279. end;
  100280. function TCAN1_C1FIFOCON30.getUINC : TBits_1; inline;
  100281. begin
  100282. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  100283. end;
  100284. procedure TCAN1_C1FIFOCON30.setFRESET; inline;
  100285. begin
  100286. pTDefRegMap(@Self)^.&set := $00004000;
  100287. end;
  100288. procedure TCAN1_C1FIFOCON30.clearFRESET; inline;
  100289. begin
  100290. pTDefRegMap(@Self)^.clr := $00004000;
  100291. end;
  100292. procedure TCAN1_C1FIFOCON30.setFRESET(thebits : TBits_1); inline;
  100293. begin
  100294. if thebits = 0 then
  100295. pTDefRegMap(@Self)^.clr := $00004000
  100296. else
  100297. pTDefRegMap(@Self)^.&set := $00004000;
  100298. end;
  100299. function TCAN1_C1FIFOCON30.getFRESET : TBits_1; inline;
  100300. begin
  100301. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  100302. end;
  100303. procedure TCAN1_C1FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  100304. begin
  100305. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  100306. end;
  100307. function TCAN1_C1FIFOCON30.getFSIZE : TBits_5; inline;
  100308. begin
  100309. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  100310. end;
  100311. procedure TCAN1_C1FIFOCON30.setw(thebits : TBits_32); inline;
  100312. begin
  100313. pTDefRegMap(@Self)^.val := thebits;
  100314. end;
  100315. function TCAN1_C1FIFOCON30.getw : TBits_32; inline;
  100316. begin
  100317. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100318. end;
  100319. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF; inline;
  100320. begin
  100321. pTDefRegMap(@Self)^.&set := $00000001;
  100322. end;
  100323. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIF; inline;
  100324. begin
  100325. pTDefRegMap(@Self)^.clr := $00000001;
  100326. end;
  100327. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  100328. begin
  100329. if thebits = 0 then
  100330. pTDefRegMap(@Self)^.clr := $00000001
  100331. else
  100332. pTDefRegMap(@Self)^.&set := $00000001;
  100333. end;
  100334. function TCAN1_C1FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  100335. begin
  100336. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  100337. end;
  100338. procedure TCAN1_C1FIFOINT30.setRXHALFIF; inline;
  100339. begin
  100340. pTDefRegMap(@Self)^.&set := $00000002;
  100341. end;
  100342. procedure TCAN1_C1FIFOINT30.clearRXHALFIF; inline;
  100343. begin
  100344. pTDefRegMap(@Self)^.clr := $00000002;
  100345. end;
  100346. procedure TCAN1_C1FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  100347. begin
  100348. if thebits = 0 then
  100349. pTDefRegMap(@Self)^.clr := $00000002
  100350. else
  100351. pTDefRegMap(@Self)^.&set := $00000002;
  100352. end;
  100353. function TCAN1_C1FIFOINT30.getRXHALFIF : TBits_1; inline;
  100354. begin
  100355. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  100356. end;
  100357. procedure TCAN1_C1FIFOINT30.setRXFULLIF; inline;
  100358. begin
  100359. pTDefRegMap(@Self)^.&set := $00000004;
  100360. end;
  100361. procedure TCAN1_C1FIFOINT30.clearRXFULLIF; inline;
  100362. begin
  100363. pTDefRegMap(@Self)^.clr := $00000004;
  100364. end;
  100365. procedure TCAN1_C1FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  100366. begin
  100367. if thebits = 0 then
  100368. pTDefRegMap(@Self)^.clr := $00000004
  100369. else
  100370. pTDefRegMap(@Self)^.&set := $00000004;
  100371. end;
  100372. function TCAN1_C1FIFOINT30.getRXFULLIF : TBits_1; inline;
  100373. begin
  100374. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  100375. end;
  100376. procedure TCAN1_C1FIFOINT30.setRXOVFLIF; inline;
  100377. begin
  100378. pTDefRegMap(@Self)^.&set := $00000008;
  100379. end;
  100380. procedure TCAN1_C1FIFOINT30.clearRXOVFLIF; inline;
  100381. begin
  100382. pTDefRegMap(@Self)^.clr := $00000008;
  100383. end;
  100384. procedure TCAN1_C1FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  100385. begin
  100386. if thebits = 0 then
  100387. pTDefRegMap(@Self)^.clr := $00000008
  100388. else
  100389. pTDefRegMap(@Self)^.&set := $00000008;
  100390. end;
  100391. function TCAN1_C1FIFOINT30.getRXOVFLIF : TBits_1; inline;
  100392. begin
  100393. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  100394. end;
  100395. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF; inline;
  100396. begin
  100397. pTDefRegMap(@Self)^.&set := $00000100;
  100398. end;
  100399. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIF; inline;
  100400. begin
  100401. pTDefRegMap(@Self)^.clr := $00000100;
  100402. end;
  100403. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  100404. begin
  100405. if thebits = 0 then
  100406. pTDefRegMap(@Self)^.clr := $00000100
  100407. else
  100408. pTDefRegMap(@Self)^.&set := $00000100;
  100409. end;
  100410. function TCAN1_C1FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  100411. begin
  100412. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  100413. end;
  100414. procedure TCAN1_C1FIFOINT30.setTXHALFIF; inline;
  100415. begin
  100416. pTDefRegMap(@Self)^.&set := $00000200;
  100417. end;
  100418. procedure TCAN1_C1FIFOINT30.clearTXHALFIF; inline;
  100419. begin
  100420. pTDefRegMap(@Self)^.clr := $00000200;
  100421. end;
  100422. procedure TCAN1_C1FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  100423. begin
  100424. if thebits = 0 then
  100425. pTDefRegMap(@Self)^.clr := $00000200
  100426. else
  100427. pTDefRegMap(@Self)^.&set := $00000200;
  100428. end;
  100429. function TCAN1_C1FIFOINT30.getTXHALFIF : TBits_1; inline;
  100430. begin
  100431. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  100432. end;
  100433. procedure TCAN1_C1FIFOINT30.setTXNFULLIF; inline;
  100434. begin
  100435. pTDefRegMap(@Self)^.&set := $00000400;
  100436. end;
  100437. procedure TCAN1_C1FIFOINT30.clearTXNFULLIF; inline;
  100438. begin
  100439. pTDefRegMap(@Self)^.clr := $00000400;
  100440. end;
  100441. procedure TCAN1_C1FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  100442. begin
  100443. if thebits = 0 then
  100444. pTDefRegMap(@Self)^.clr := $00000400
  100445. else
  100446. pTDefRegMap(@Self)^.&set := $00000400;
  100447. end;
  100448. function TCAN1_C1FIFOINT30.getTXNFULLIF : TBits_1; inline;
  100449. begin
  100450. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  100451. end;
  100452. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE; inline;
  100453. begin
  100454. pTDefRegMap(@Self)^.&set := $00010000;
  100455. end;
  100456. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIE; inline;
  100457. begin
  100458. pTDefRegMap(@Self)^.clr := $00010000;
  100459. end;
  100460. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  100461. begin
  100462. if thebits = 0 then
  100463. pTDefRegMap(@Self)^.clr := $00010000
  100464. else
  100465. pTDefRegMap(@Self)^.&set := $00010000;
  100466. end;
  100467. function TCAN1_C1FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  100468. begin
  100469. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  100470. end;
  100471. procedure TCAN1_C1FIFOINT30.setRXHALFIE; inline;
  100472. begin
  100473. pTDefRegMap(@Self)^.&set := $00020000;
  100474. end;
  100475. procedure TCAN1_C1FIFOINT30.clearRXHALFIE; inline;
  100476. begin
  100477. pTDefRegMap(@Self)^.clr := $00020000;
  100478. end;
  100479. procedure TCAN1_C1FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  100480. begin
  100481. if thebits = 0 then
  100482. pTDefRegMap(@Self)^.clr := $00020000
  100483. else
  100484. pTDefRegMap(@Self)^.&set := $00020000;
  100485. end;
  100486. function TCAN1_C1FIFOINT30.getRXHALFIE : TBits_1; inline;
  100487. begin
  100488. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  100489. end;
  100490. procedure TCAN1_C1FIFOINT30.setRXFULLIE; inline;
  100491. begin
  100492. pTDefRegMap(@Self)^.&set := $00040000;
  100493. end;
  100494. procedure TCAN1_C1FIFOINT30.clearRXFULLIE; inline;
  100495. begin
  100496. pTDefRegMap(@Self)^.clr := $00040000;
  100497. end;
  100498. procedure TCAN1_C1FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  100499. begin
  100500. if thebits = 0 then
  100501. pTDefRegMap(@Self)^.clr := $00040000
  100502. else
  100503. pTDefRegMap(@Self)^.&set := $00040000;
  100504. end;
  100505. function TCAN1_C1FIFOINT30.getRXFULLIE : TBits_1; inline;
  100506. begin
  100507. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  100508. end;
  100509. procedure TCAN1_C1FIFOINT30.setRXOVFLIE; inline;
  100510. begin
  100511. pTDefRegMap(@Self)^.&set := $00080000;
  100512. end;
  100513. procedure TCAN1_C1FIFOINT30.clearRXOVFLIE; inline;
  100514. begin
  100515. pTDefRegMap(@Self)^.clr := $00080000;
  100516. end;
  100517. procedure TCAN1_C1FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  100518. begin
  100519. if thebits = 0 then
  100520. pTDefRegMap(@Self)^.clr := $00080000
  100521. else
  100522. pTDefRegMap(@Self)^.&set := $00080000;
  100523. end;
  100524. function TCAN1_C1FIFOINT30.getRXOVFLIE : TBits_1; inline;
  100525. begin
  100526. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100527. end;
  100528. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE; inline;
  100529. begin
  100530. pTDefRegMap(@Self)^.&set := $01000000;
  100531. end;
  100532. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIE; inline;
  100533. begin
  100534. pTDefRegMap(@Self)^.clr := $01000000;
  100535. end;
  100536. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  100537. begin
  100538. if thebits = 0 then
  100539. pTDefRegMap(@Self)^.clr := $01000000
  100540. else
  100541. pTDefRegMap(@Self)^.&set := $01000000;
  100542. end;
  100543. function TCAN1_C1FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  100544. begin
  100545. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  100546. end;
  100547. procedure TCAN1_C1FIFOINT30.setTXHALFIE; inline;
  100548. begin
  100549. pTDefRegMap(@Self)^.&set := $02000000;
  100550. end;
  100551. procedure TCAN1_C1FIFOINT30.clearTXHALFIE; inline;
  100552. begin
  100553. pTDefRegMap(@Self)^.clr := $02000000;
  100554. end;
  100555. procedure TCAN1_C1FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  100556. begin
  100557. if thebits = 0 then
  100558. pTDefRegMap(@Self)^.clr := $02000000
  100559. else
  100560. pTDefRegMap(@Self)^.&set := $02000000;
  100561. end;
  100562. function TCAN1_C1FIFOINT30.getTXHALFIE : TBits_1; inline;
  100563. begin
  100564. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  100565. end;
  100566. procedure TCAN1_C1FIFOINT30.setTXNFULLIE; inline;
  100567. begin
  100568. pTDefRegMap(@Self)^.&set := $04000000;
  100569. end;
  100570. procedure TCAN1_C1FIFOINT30.clearTXNFULLIE; inline;
  100571. begin
  100572. pTDefRegMap(@Self)^.clr := $04000000;
  100573. end;
  100574. procedure TCAN1_C1FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  100575. begin
  100576. if thebits = 0 then
  100577. pTDefRegMap(@Self)^.clr := $04000000
  100578. else
  100579. pTDefRegMap(@Self)^.&set := $04000000;
  100580. end;
  100581. function TCAN1_C1FIFOINT30.getTXNFULLIE : TBits_1; inline;
  100582. begin
  100583. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  100584. end;
  100585. procedure TCAN1_C1FIFOINT30.setw(thebits : TBits_32); inline;
  100586. begin
  100587. pTDefRegMap(@Self)^.val := thebits;
  100588. end;
  100589. function TCAN1_C1FIFOINT30.getw : TBits_32; inline;
  100590. begin
  100591. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100592. end;
  100593. procedure TCAN1_C1FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  100594. begin
  100595. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  100596. end;
  100597. function TCAN1_C1FIFOCI30.getCFIFOCI : TBits_5; inline;
  100598. begin
  100599. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  100600. end;
  100601. procedure TCAN1_C1FIFOCI30.setw(thebits : TBits_32); inline;
  100602. begin
  100603. pTDefRegMap(@Self)^.val := thebits;
  100604. end;
  100605. function TCAN1_C1FIFOCI30.getw : TBits_32; inline;
  100606. begin
  100607. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100608. end;
  100609. procedure TCAN1_C1FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  100610. begin
  100611. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  100612. end;
  100613. function TCAN1_C1FIFOCON31.getTXPRI : TBits_2; inline;
  100614. begin
  100615. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  100616. end;
  100617. procedure TCAN1_C1FIFOCON31.setRTREN; inline;
  100618. begin
  100619. pTDefRegMap(@Self)^.&set := $00000004;
  100620. end;
  100621. procedure TCAN1_C1FIFOCON31.clearRTREN; inline;
  100622. begin
  100623. pTDefRegMap(@Self)^.clr := $00000004;
  100624. end;
  100625. procedure TCAN1_C1FIFOCON31.setRTREN(thebits : TBits_1); inline;
  100626. begin
  100627. if thebits = 0 then
  100628. pTDefRegMap(@Self)^.clr := $00000004
  100629. else
  100630. pTDefRegMap(@Self)^.&set := $00000004;
  100631. end;
  100632. function TCAN1_C1FIFOCON31.getRTREN : TBits_1; inline;
  100633. begin
  100634. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  100635. end;
  100636. procedure TCAN1_C1FIFOCON31.setTXREQ; inline;
  100637. begin
  100638. pTDefRegMap(@Self)^.&set := $00000008;
  100639. end;
  100640. procedure TCAN1_C1FIFOCON31.clearTXREQ; inline;
  100641. begin
  100642. pTDefRegMap(@Self)^.clr := $00000008;
  100643. end;
  100644. procedure TCAN1_C1FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  100645. begin
  100646. if thebits = 0 then
  100647. pTDefRegMap(@Self)^.clr := $00000008
  100648. else
  100649. pTDefRegMap(@Self)^.&set := $00000008;
  100650. end;
  100651. function TCAN1_C1FIFOCON31.getTXREQ : TBits_1; inline;
  100652. begin
  100653. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  100654. end;
  100655. procedure TCAN1_C1FIFOCON31.setTXERR; inline;
  100656. begin
  100657. pTDefRegMap(@Self)^.&set := $00000010;
  100658. end;
  100659. procedure TCAN1_C1FIFOCON31.clearTXERR; inline;
  100660. begin
  100661. pTDefRegMap(@Self)^.clr := $00000010;
  100662. end;
  100663. procedure TCAN1_C1FIFOCON31.setTXERR(thebits : TBits_1); inline;
  100664. begin
  100665. if thebits = 0 then
  100666. pTDefRegMap(@Self)^.clr := $00000010
  100667. else
  100668. pTDefRegMap(@Self)^.&set := $00000010;
  100669. end;
  100670. function TCAN1_C1FIFOCON31.getTXERR : TBits_1; inline;
  100671. begin
  100672. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  100673. end;
  100674. procedure TCAN1_C1FIFOCON31.setTXLARB; inline;
  100675. begin
  100676. pTDefRegMap(@Self)^.&set := $00000020;
  100677. end;
  100678. procedure TCAN1_C1FIFOCON31.clearTXLARB; inline;
  100679. begin
  100680. pTDefRegMap(@Self)^.clr := $00000020;
  100681. end;
  100682. procedure TCAN1_C1FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  100683. begin
  100684. if thebits = 0 then
  100685. pTDefRegMap(@Self)^.clr := $00000020
  100686. else
  100687. pTDefRegMap(@Self)^.&set := $00000020;
  100688. end;
  100689. function TCAN1_C1FIFOCON31.getTXLARB : TBits_1; inline;
  100690. begin
  100691. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  100692. end;
  100693. procedure TCAN1_C1FIFOCON31.setTXABAT; inline;
  100694. begin
  100695. pTDefRegMap(@Self)^.&set := $00000040;
  100696. end;
  100697. procedure TCAN1_C1FIFOCON31.clearTXABAT; inline;
  100698. begin
  100699. pTDefRegMap(@Self)^.clr := $00000040;
  100700. end;
  100701. procedure TCAN1_C1FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  100702. begin
  100703. if thebits = 0 then
  100704. pTDefRegMap(@Self)^.clr := $00000040
  100705. else
  100706. pTDefRegMap(@Self)^.&set := $00000040;
  100707. end;
  100708. function TCAN1_C1FIFOCON31.getTXABAT : TBits_1; inline;
  100709. begin
  100710. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  100711. end;
  100712. procedure TCAN1_C1FIFOCON31.setTXEN; inline;
  100713. begin
  100714. pTDefRegMap(@Self)^.&set := $00000080;
  100715. end;
  100716. procedure TCAN1_C1FIFOCON31.clearTXEN; inline;
  100717. begin
  100718. pTDefRegMap(@Self)^.clr := $00000080;
  100719. end;
  100720. procedure TCAN1_C1FIFOCON31.setTXEN(thebits : TBits_1); inline;
  100721. begin
  100722. if thebits = 0 then
  100723. pTDefRegMap(@Self)^.clr := $00000080
  100724. else
  100725. pTDefRegMap(@Self)^.&set := $00000080;
  100726. end;
  100727. function TCAN1_C1FIFOCON31.getTXEN : TBits_1; inline;
  100728. begin
  100729. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  100730. end;
  100731. procedure TCAN1_C1FIFOCON31.setDONLY; inline;
  100732. begin
  100733. pTDefRegMap(@Self)^.&set := $00001000;
  100734. end;
  100735. procedure TCAN1_C1FIFOCON31.clearDONLY; inline;
  100736. begin
  100737. pTDefRegMap(@Self)^.clr := $00001000;
  100738. end;
  100739. procedure TCAN1_C1FIFOCON31.setDONLY(thebits : TBits_1); inline;
  100740. begin
  100741. if thebits = 0 then
  100742. pTDefRegMap(@Self)^.clr := $00001000
  100743. else
  100744. pTDefRegMap(@Self)^.&set := $00001000;
  100745. end;
  100746. function TCAN1_C1FIFOCON31.getDONLY : TBits_1; inline;
  100747. begin
  100748. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  100749. end;
  100750. procedure TCAN1_C1FIFOCON31.setUINC; inline;
  100751. begin
  100752. pTDefRegMap(@Self)^.&set := $00002000;
  100753. end;
  100754. procedure TCAN1_C1FIFOCON31.clearUINC; inline;
  100755. begin
  100756. pTDefRegMap(@Self)^.clr := $00002000;
  100757. end;
  100758. procedure TCAN1_C1FIFOCON31.setUINC(thebits : TBits_1); inline;
  100759. begin
  100760. if thebits = 0 then
  100761. pTDefRegMap(@Self)^.clr := $00002000
  100762. else
  100763. pTDefRegMap(@Self)^.&set := $00002000;
  100764. end;
  100765. function TCAN1_C1FIFOCON31.getUINC : TBits_1; inline;
  100766. begin
  100767. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  100768. end;
  100769. procedure TCAN1_C1FIFOCON31.setFRESET; inline;
  100770. begin
  100771. pTDefRegMap(@Self)^.&set := $00004000;
  100772. end;
  100773. procedure TCAN1_C1FIFOCON31.clearFRESET; inline;
  100774. begin
  100775. pTDefRegMap(@Self)^.clr := $00004000;
  100776. end;
  100777. procedure TCAN1_C1FIFOCON31.setFRESET(thebits : TBits_1); inline;
  100778. begin
  100779. if thebits = 0 then
  100780. pTDefRegMap(@Self)^.clr := $00004000
  100781. else
  100782. pTDefRegMap(@Self)^.&set := $00004000;
  100783. end;
  100784. function TCAN1_C1FIFOCON31.getFRESET : TBits_1; inline;
  100785. begin
  100786. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  100787. end;
  100788. procedure TCAN1_C1FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  100789. begin
  100790. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  100791. end;
  100792. function TCAN1_C1FIFOCON31.getFSIZE : TBits_5; inline;
  100793. begin
  100794. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  100795. end;
  100796. procedure TCAN1_C1FIFOCON31.setw(thebits : TBits_32); inline;
  100797. begin
  100798. pTDefRegMap(@Self)^.val := thebits;
  100799. end;
  100800. function TCAN1_C1FIFOCON31.getw : TBits_32; inline;
  100801. begin
  100802. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100803. end;
  100804. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF; inline;
  100805. begin
  100806. pTDefRegMap(@Self)^.&set := $00000001;
  100807. end;
  100808. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIF; inline;
  100809. begin
  100810. pTDefRegMap(@Self)^.clr := $00000001;
  100811. end;
  100812. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  100813. begin
  100814. if thebits = 0 then
  100815. pTDefRegMap(@Self)^.clr := $00000001
  100816. else
  100817. pTDefRegMap(@Self)^.&set := $00000001;
  100818. end;
  100819. function TCAN1_C1FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  100820. begin
  100821. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  100822. end;
  100823. procedure TCAN1_C1FIFOINT31.setRXHALFIF; inline;
  100824. begin
  100825. pTDefRegMap(@Self)^.&set := $00000002;
  100826. end;
  100827. procedure TCAN1_C1FIFOINT31.clearRXHALFIF; inline;
  100828. begin
  100829. pTDefRegMap(@Self)^.clr := $00000002;
  100830. end;
  100831. procedure TCAN1_C1FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  100832. begin
  100833. if thebits = 0 then
  100834. pTDefRegMap(@Self)^.clr := $00000002
  100835. else
  100836. pTDefRegMap(@Self)^.&set := $00000002;
  100837. end;
  100838. function TCAN1_C1FIFOINT31.getRXHALFIF : TBits_1; inline;
  100839. begin
  100840. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  100841. end;
  100842. procedure TCAN1_C1FIFOINT31.setRXFULLIF; inline;
  100843. begin
  100844. pTDefRegMap(@Self)^.&set := $00000004;
  100845. end;
  100846. procedure TCAN1_C1FIFOINT31.clearRXFULLIF; inline;
  100847. begin
  100848. pTDefRegMap(@Self)^.clr := $00000004;
  100849. end;
  100850. procedure TCAN1_C1FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  100851. begin
  100852. if thebits = 0 then
  100853. pTDefRegMap(@Self)^.clr := $00000004
  100854. else
  100855. pTDefRegMap(@Self)^.&set := $00000004;
  100856. end;
  100857. function TCAN1_C1FIFOINT31.getRXFULLIF : TBits_1; inline;
  100858. begin
  100859. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  100860. end;
  100861. procedure TCAN1_C1FIFOINT31.setRXOVFLIF; inline;
  100862. begin
  100863. pTDefRegMap(@Self)^.&set := $00000008;
  100864. end;
  100865. procedure TCAN1_C1FIFOINT31.clearRXOVFLIF; inline;
  100866. begin
  100867. pTDefRegMap(@Self)^.clr := $00000008;
  100868. end;
  100869. procedure TCAN1_C1FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  100870. begin
  100871. if thebits = 0 then
  100872. pTDefRegMap(@Self)^.clr := $00000008
  100873. else
  100874. pTDefRegMap(@Self)^.&set := $00000008;
  100875. end;
  100876. function TCAN1_C1FIFOINT31.getRXOVFLIF : TBits_1; inline;
  100877. begin
  100878. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  100879. end;
  100880. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF; inline;
  100881. begin
  100882. pTDefRegMap(@Self)^.&set := $00000100;
  100883. end;
  100884. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIF; inline;
  100885. begin
  100886. pTDefRegMap(@Self)^.clr := $00000100;
  100887. end;
  100888. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  100889. begin
  100890. if thebits = 0 then
  100891. pTDefRegMap(@Self)^.clr := $00000100
  100892. else
  100893. pTDefRegMap(@Self)^.&set := $00000100;
  100894. end;
  100895. function TCAN1_C1FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  100896. begin
  100897. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  100898. end;
  100899. procedure TCAN1_C1FIFOINT31.setTXHALFIF; inline;
  100900. begin
  100901. pTDefRegMap(@Self)^.&set := $00000200;
  100902. end;
  100903. procedure TCAN1_C1FIFOINT31.clearTXHALFIF; inline;
  100904. begin
  100905. pTDefRegMap(@Self)^.clr := $00000200;
  100906. end;
  100907. procedure TCAN1_C1FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  100908. begin
  100909. if thebits = 0 then
  100910. pTDefRegMap(@Self)^.clr := $00000200
  100911. else
  100912. pTDefRegMap(@Self)^.&set := $00000200;
  100913. end;
  100914. function TCAN1_C1FIFOINT31.getTXHALFIF : TBits_1; inline;
  100915. begin
  100916. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  100917. end;
  100918. procedure TCAN1_C1FIFOINT31.setTXNFULLIF; inline;
  100919. begin
  100920. pTDefRegMap(@Self)^.&set := $00000400;
  100921. end;
  100922. procedure TCAN1_C1FIFOINT31.clearTXNFULLIF; inline;
  100923. begin
  100924. pTDefRegMap(@Self)^.clr := $00000400;
  100925. end;
  100926. procedure TCAN1_C1FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  100927. begin
  100928. if thebits = 0 then
  100929. pTDefRegMap(@Self)^.clr := $00000400
  100930. else
  100931. pTDefRegMap(@Self)^.&set := $00000400;
  100932. end;
  100933. function TCAN1_C1FIFOINT31.getTXNFULLIF : TBits_1; inline;
  100934. begin
  100935. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  100936. end;
  100937. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE; inline;
  100938. begin
  100939. pTDefRegMap(@Self)^.&set := $00010000;
  100940. end;
  100941. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIE; inline;
  100942. begin
  100943. pTDefRegMap(@Self)^.clr := $00010000;
  100944. end;
  100945. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  100946. begin
  100947. if thebits = 0 then
  100948. pTDefRegMap(@Self)^.clr := $00010000
  100949. else
  100950. pTDefRegMap(@Self)^.&set := $00010000;
  100951. end;
  100952. function TCAN1_C1FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  100953. begin
  100954. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  100955. end;
  100956. procedure TCAN1_C1FIFOINT31.setRXHALFIE; inline;
  100957. begin
  100958. pTDefRegMap(@Self)^.&set := $00020000;
  100959. end;
  100960. procedure TCAN1_C1FIFOINT31.clearRXHALFIE; inline;
  100961. begin
  100962. pTDefRegMap(@Self)^.clr := $00020000;
  100963. end;
  100964. procedure TCAN1_C1FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  100965. begin
  100966. if thebits = 0 then
  100967. pTDefRegMap(@Self)^.clr := $00020000
  100968. else
  100969. pTDefRegMap(@Self)^.&set := $00020000;
  100970. end;
  100971. function TCAN1_C1FIFOINT31.getRXHALFIE : TBits_1; inline;
  100972. begin
  100973. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  100974. end;
  100975. procedure TCAN1_C1FIFOINT31.setRXFULLIE; inline;
  100976. begin
  100977. pTDefRegMap(@Self)^.&set := $00040000;
  100978. end;
  100979. procedure TCAN1_C1FIFOINT31.clearRXFULLIE; inline;
  100980. begin
  100981. pTDefRegMap(@Self)^.clr := $00040000;
  100982. end;
  100983. procedure TCAN1_C1FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  100984. begin
  100985. if thebits = 0 then
  100986. pTDefRegMap(@Self)^.clr := $00040000
  100987. else
  100988. pTDefRegMap(@Self)^.&set := $00040000;
  100989. end;
  100990. function TCAN1_C1FIFOINT31.getRXFULLIE : TBits_1; inline;
  100991. begin
  100992. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  100993. end;
  100994. procedure TCAN1_C1FIFOINT31.setRXOVFLIE; inline;
  100995. begin
  100996. pTDefRegMap(@Self)^.&set := $00080000;
  100997. end;
  100998. procedure TCAN1_C1FIFOINT31.clearRXOVFLIE; inline;
  100999. begin
  101000. pTDefRegMap(@Self)^.clr := $00080000;
  101001. end;
  101002. procedure TCAN1_C1FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  101003. begin
  101004. if thebits = 0 then
  101005. pTDefRegMap(@Self)^.clr := $00080000
  101006. else
  101007. pTDefRegMap(@Self)^.&set := $00080000;
  101008. end;
  101009. function TCAN1_C1FIFOINT31.getRXOVFLIE : TBits_1; inline;
  101010. begin
  101011. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  101012. end;
  101013. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE; inline;
  101014. begin
  101015. pTDefRegMap(@Self)^.&set := $01000000;
  101016. end;
  101017. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIE; inline;
  101018. begin
  101019. pTDefRegMap(@Self)^.clr := $01000000;
  101020. end;
  101021. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  101022. begin
  101023. if thebits = 0 then
  101024. pTDefRegMap(@Self)^.clr := $01000000
  101025. else
  101026. pTDefRegMap(@Self)^.&set := $01000000;
  101027. end;
  101028. function TCAN1_C1FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  101029. begin
  101030. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  101031. end;
  101032. procedure TCAN1_C1FIFOINT31.setTXHALFIE; inline;
  101033. begin
  101034. pTDefRegMap(@Self)^.&set := $02000000;
  101035. end;
  101036. procedure TCAN1_C1FIFOINT31.clearTXHALFIE; inline;
  101037. begin
  101038. pTDefRegMap(@Self)^.clr := $02000000;
  101039. end;
  101040. procedure TCAN1_C1FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  101041. begin
  101042. if thebits = 0 then
  101043. pTDefRegMap(@Self)^.clr := $02000000
  101044. else
  101045. pTDefRegMap(@Self)^.&set := $02000000;
  101046. end;
  101047. function TCAN1_C1FIFOINT31.getTXHALFIE : TBits_1; inline;
  101048. begin
  101049. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  101050. end;
  101051. procedure TCAN1_C1FIFOINT31.setTXNFULLIE; inline;
  101052. begin
  101053. pTDefRegMap(@Self)^.&set := $04000000;
  101054. end;
  101055. procedure TCAN1_C1FIFOINT31.clearTXNFULLIE; inline;
  101056. begin
  101057. pTDefRegMap(@Self)^.clr := $04000000;
  101058. end;
  101059. procedure TCAN1_C1FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  101060. begin
  101061. if thebits = 0 then
  101062. pTDefRegMap(@Self)^.clr := $04000000
  101063. else
  101064. pTDefRegMap(@Self)^.&set := $04000000;
  101065. end;
  101066. function TCAN1_C1FIFOINT31.getTXNFULLIE : TBits_1; inline;
  101067. begin
  101068. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  101069. end;
  101070. procedure TCAN1_C1FIFOINT31.setw(thebits : TBits_32); inline;
  101071. begin
  101072. pTDefRegMap(@Self)^.val := thebits;
  101073. end;
  101074. function TCAN1_C1FIFOINT31.getw : TBits_32; inline;
  101075. begin
  101076. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101077. end;
  101078. procedure TCAN1_C1FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  101079. begin
  101080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  101081. end;
  101082. function TCAN1_C1FIFOCI31.getCFIFOCI : TBits_5; inline;
  101083. begin
  101084. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  101085. end;
  101086. procedure TCAN1_C1FIFOCI31.setw(thebits : TBits_32); inline;
  101087. begin
  101088. pTDefRegMap(@Self)^.val := thebits;
  101089. end;
  101090. function TCAN1_C1FIFOCI31.getw : TBits_32; inline;
  101091. begin
  101092. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101093. end;
  101094. procedure TCAN2_C2CON.setDNCNT(thebits : TBits_5); inline;
  101095. begin
  101096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  101097. end;
  101098. function TCAN2_C2CON.getDNCNT : TBits_5; inline;
  101099. begin
  101100. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  101101. end;
  101102. procedure TCAN2_C2CON.setCANBUSY; inline;
  101103. begin
  101104. pTDefRegMap(@Self)^.&set := $00000800;
  101105. end;
  101106. procedure TCAN2_C2CON.clearCANBUSY; inline;
  101107. begin
  101108. pTDefRegMap(@Self)^.clr := $00000800;
  101109. end;
  101110. procedure TCAN2_C2CON.setCANBUSY(thebits : TBits_1); inline;
  101111. begin
  101112. if thebits = 0 then
  101113. pTDefRegMap(@Self)^.clr := $00000800
  101114. else
  101115. pTDefRegMap(@Self)^.&set := $00000800;
  101116. end;
  101117. function TCAN2_C2CON.getCANBUSY : TBits_1; inline;
  101118. begin
  101119. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  101120. end;
  101121. procedure TCAN2_C2CON.setSIDL; inline;
  101122. begin
  101123. pTDefRegMap(@Self)^.&set := $00002000;
  101124. end;
  101125. procedure TCAN2_C2CON.clearSIDL; inline;
  101126. begin
  101127. pTDefRegMap(@Self)^.clr := $00002000;
  101128. end;
  101129. procedure TCAN2_C2CON.setSIDL(thebits : TBits_1); inline;
  101130. begin
  101131. if thebits = 0 then
  101132. pTDefRegMap(@Self)^.clr := $00002000
  101133. else
  101134. pTDefRegMap(@Self)^.&set := $00002000;
  101135. end;
  101136. function TCAN2_C2CON.getSIDL : TBits_1; inline;
  101137. begin
  101138. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  101139. end;
  101140. procedure TCAN2_C2CON.setON; inline;
  101141. begin
  101142. pTDefRegMap(@Self)^.&set := $00008000;
  101143. end;
  101144. procedure TCAN2_C2CON.clearON; inline;
  101145. begin
  101146. pTDefRegMap(@Self)^.clr := $00008000;
  101147. end;
  101148. procedure TCAN2_C2CON.setON(thebits : TBits_1); inline;
  101149. begin
  101150. if thebits = 0 then
  101151. pTDefRegMap(@Self)^.clr := $00008000
  101152. else
  101153. pTDefRegMap(@Self)^.&set := $00008000;
  101154. end;
  101155. function TCAN2_C2CON.getON : TBits_1; inline;
  101156. begin
  101157. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  101158. end;
  101159. procedure TCAN2_C2CON.setCANCAP; inline;
  101160. begin
  101161. pTDefRegMap(@Self)^.&set := $00100000;
  101162. end;
  101163. procedure TCAN2_C2CON.clearCANCAP; inline;
  101164. begin
  101165. pTDefRegMap(@Self)^.clr := $00100000;
  101166. end;
  101167. procedure TCAN2_C2CON.setCANCAP(thebits : TBits_1); inline;
  101168. begin
  101169. if thebits = 0 then
  101170. pTDefRegMap(@Self)^.clr := $00100000
  101171. else
  101172. pTDefRegMap(@Self)^.&set := $00100000;
  101173. end;
  101174. function TCAN2_C2CON.getCANCAP : TBits_1; inline;
  101175. begin
  101176. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  101177. end;
  101178. procedure TCAN2_C2CON.setOPMOD(thebits : TBits_3); inline;
  101179. begin
  101180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  101181. end;
  101182. function TCAN2_C2CON.getOPMOD : TBits_3; inline;
  101183. begin
  101184. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  101185. end;
  101186. procedure TCAN2_C2CON.setREQOP(thebits : TBits_3); inline;
  101187. begin
  101188. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  101189. end;
  101190. function TCAN2_C2CON.getREQOP : TBits_3; inline;
  101191. begin
  101192. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  101193. end;
  101194. procedure TCAN2_C2CON.setABAT; inline;
  101195. begin
  101196. pTDefRegMap(@Self)^.&set := $08000000;
  101197. end;
  101198. procedure TCAN2_C2CON.clearABAT; inline;
  101199. begin
  101200. pTDefRegMap(@Self)^.clr := $08000000;
  101201. end;
  101202. procedure TCAN2_C2CON.setABAT(thebits : TBits_1); inline;
  101203. begin
  101204. if thebits = 0 then
  101205. pTDefRegMap(@Self)^.clr := $08000000
  101206. else
  101207. pTDefRegMap(@Self)^.&set := $08000000;
  101208. end;
  101209. function TCAN2_C2CON.getABAT : TBits_1; inline;
  101210. begin
  101211. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  101212. end;
  101213. procedure TCAN2_C2CON.setw(thebits : TBits_32); inline;
  101214. begin
  101215. pTDefRegMap(@Self)^.val := thebits;
  101216. end;
  101217. function TCAN2_C2CON.getw : TBits_32; inline;
  101218. begin
  101219. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101220. end;
  101221. procedure TCAN2_C2CFG.setBRP(thebits : TBits_6); inline;
  101222. begin
  101223. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  101224. end;
  101225. function TCAN2_C2CFG.getBRP : TBits_6; inline;
  101226. begin
  101227. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  101228. end;
  101229. procedure TCAN2_C2CFG.setSJW(thebits : TBits_2); inline;
  101230. begin
  101231. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  101232. end;
  101233. function TCAN2_C2CFG.getSJW : TBits_2; inline;
  101234. begin
  101235. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  101236. end;
  101237. procedure TCAN2_C2CFG.setPRSEG(thebits : TBits_3); inline;
  101238. begin
  101239. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  101240. end;
  101241. function TCAN2_C2CFG.getPRSEG : TBits_3; inline;
  101242. begin
  101243. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  101244. end;
  101245. procedure TCAN2_C2CFG.setSEG1PH(thebits : TBits_3); inline;
  101246. begin
  101247. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  101248. end;
  101249. function TCAN2_C2CFG.getSEG1PH : TBits_3; inline;
  101250. begin
  101251. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  101252. end;
  101253. procedure TCAN2_C2CFG.setSAM; inline;
  101254. begin
  101255. pTDefRegMap(@Self)^.&set := $00004000;
  101256. end;
  101257. procedure TCAN2_C2CFG.clearSAM; inline;
  101258. begin
  101259. pTDefRegMap(@Self)^.clr := $00004000;
  101260. end;
  101261. procedure TCAN2_C2CFG.setSAM(thebits : TBits_1); inline;
  101262. begin
  101263. if thebits = 0 then
  101264. pTDefRegMap(@Self)^.clr := $00004000
  101265. else
  101266. pTDefRegMap(@Self)^.&set := $00004000;
  101267. end;
  101268. function TCAN2_C2CFG.getSAM : TBits_1; inline;
  101269. begin
  101270. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  101271. end;
  101272. procedure TCAN2_C2CFG.setSEG2PHTS; inline;
  101273. begin
  101274. pTDefRegMap(@Self)^.&set := $00008000;
  101275. end;
  101276. procedure TCAN2_C2CFG.clearSEG2PHTS; inline;
  101277. begin
  101278. pTDefRegMap(@Self)^.clr := $00008000;
  101279. end;
  101280. procedure TCAN2_C2CFG.setSEG2PHTS(thebits : TBits_1); inline;
  101281. begin
  101282. if thebits = 0 then
  101283. pTDefRegMap(@Self)^.clr := $00008000
  101284. else
  101285. pTDefRegMap(@Self)^.&set := $00008000;
  101286. end;
  101287. function TCAN2_C2CFG.getSEG2PHTS : TBits_1; inline;
  101288. begin
  101289. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  101290. end;
  101291. procedure TCAN2_C2CFG.setSEG2PH(thebits : TBits_3); inline;
  101292. begin
  101293. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  101294. end;
  101295. function TCAN2_C2CFG.getSEG2PH : TBits_3; inline;
  101296. begin
  101297. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  101298. end;
  101299. procedure TCAN2_C2CFG.setWAKFIL; inline;
  101300. begin
  101301. pTDefRegMap(@Self)^.&set := $00400000;
  101302. end;
  101303. procedure TCAN2_C2CFG.clearWAKFIL; inline;
  101304. begin
  101305. pTDefRegMap(@Self)^.clr := $00400000;
  101306. end;
  101307. procedure TCAN2_C2CFG.setWAKFIL(thebits : TBits_1); inline;
  101308. begin
  101309. if thebits = 0 then
  101310. pTDefRegMap(@Self)^.clr := $00400000
  101311. else
  101312. pTDefRegMap(@Self)^.&set := $00400000;
  101313. end;
  101314. function TCAN2_C2CFG.getWAKFIL : TBits_1; inline;
  101315. begin
  101316. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  101317. end;
  101318. procedure TCAN2_C2CFG.setw(thebits : TBits_32); inline;
  101319. begin
  101320. pTDefRegMap(@Self)^.val := thebits;
  101321. end;
  101322. function TCAN2_C2CFG.getw : TBits_32; inline;
  101323. begin
  101324. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101325. end;
  101326. procedure TCAN2_C2INT.setTBIF; inline;
  101327. begin
  101328. pTDefRegMap(@Self)^.&set := $00000001;
  101329. end;
  101330. procedure TCAN2_C2INT.clearTBIF; inline;
  101331. begin
  101332. pTDefRegMap(@Self)^.clr := $00000001;
  101333. end;
  101334. procedure TCAN2_C2INT.setTBIF(thebits : TBits_1); inline;
  101335. begin
  101336. if thebits = 0 then
  101337. pTDefRegMap(@Self)^.clr := $00000001
  101338. else
  101339. pTDefRegMap(@Self)^.&set := $00000001;
  101340. end;
  101341. function TCAN2_C2INT.getTBIF : TBits_1; inline;
  101342. begin
  101343. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  101344. end;
  101345. procedure TCAN2_C2INT.setRBIF; inline;
  101346. begin
  101347. pTDefRegMap(@Self)^.&set := $00000002;
  101348. end;
  101349. procedure TCAN2_C2INT.clearRBIF; inline;
  101350. begin
  101351. pTDefRegMap(@Self)^.clr := $00000002;
  101352. end;
  101353. procedure TCAN2_C2INT.setRBIF(thebits : TBits_1); inline;
  101354. begin
  101355. if thebits = 0 then
  101356. pTDefRegMap(@Self)^.clr := $00000002
  101357. else
  101358. pTDefRegMap(@Self)^.&set := $00000002;
  101359. end;
  101360. function TCAN2_C2INT.getRBIF : TBits_1; inline;
  101361. begin
  101362. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  101363. end;
  101364. procedure TCAN2_C2INT.setCTMRIF; inline;
  101365. begin
  101366. pTDefRegMap(@Self)^.&set := $00000004;
  101367. end;
  101368. procedure TCAN2_C2INT.clearCTMRIF; inline;
  101369. begin
  101370. pTDefRegMap(@Self)^.clr := $00000004;
  101371. end;
  101372. procedure TCAN2_C2INT.setCTMRIF(thebits : TBits_1); inline;
  101373. begin
  101374. if thebits = 0 then
  101375. pTDefRegMap(@Self)^.clr := $00000004
  101376. else
  101377. pTDefRegMap(@Self)^.&set := $00000004;
  101378. end;
  101379. function TCAN2_C2INT.getCTMRIF : TBits_1; inline;
  101380. begin
  101381. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  101382. end;
  101383. procedure TCAN2_C2INT.setMODIF; inline;
  101384. begin
  101385. pTDefRegMap(@Self)^.&set := $00000008;
  101386. end;
  101387. procedure TCAN2_C2INT.clearMODIF; inline;
  101388. begin
  101389. pTDefRegMap(@Self)^.clr := $00000008;
  101390. end;
  101391. procedure TCAN2_C2INT.setMODIF(thebits : TBits_1); inline;
  101392. begin
  101393. if thebits = 0 then
  101394. pTDefRegMap(@Self)^.clr := $00000008
  101395. else
  101396. pTDefRegMap(@Self)^.&set := $00000008;
  101397. end;
  101398. function TCAN2_C2INT.getMODIF : TBits_1; inline;
  101399. begin
  101400. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  101401. end;
  101402. procedure TCAN2_C2INT.setRBOVIF; inline;
  101403. begin
  101404. pTDefRegMap(@Self)^.&set := $00000800;
  101405. end;
  101406. procedure TCAN2_C2INT.clearRBOVIF; inline;
  101407. begin
  101408. pTDefRegMap(@Self)^.clr := $00000800;
  101409. end;
  101410. procedure TCAN2_C2INT.setRBOVIF(thebits : TBits_1); inline;
  101411. begin
  101412. if thebits = 0 then
  101413. pTDefRegMap(@Self)^.clr := $00000800
  101414. else
  101415. pTDefRegMap(@Self)^.&set := $00000800;
  101416. end;
  101417. function TCAN2_C2INT.getRBOVIF : TBits_1; inline;
  101418. begin
  101419. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  101420. end;
  101421. procedure TCAN2_C2INT.setSERRIF; inline;
  101422. begin
  101423. pTDefRegMap(@Self)^.&set := $00001000;
  101424. end;
  101425. procedure TCAN2_C2INT.clearSERRIF; inline;
  101426. begin
  101427. pTDefRegMap(@Self)^.clr := $00001000;
  101428. end;
  101429. procedure TCAN2_C2INT.setSERRIF(thebits : TBits_1); inline;
  101430. begin
  101431. if thebits = 0 then
  101432. pTDefRegMap(@Self)^.clr := $00001000
  101433. else
  101434. pTDefRegMap(@Self)^.&set := $00001000;
  101435. end;
  101436. function TCAN2_C2INT.getSERRIF : TBits_1; inline;
  101437. begin
  101438. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  101439. end;
  101440. procedure TCAN2_C2INT.setCERRIF; inline;
  101441. begin
  101442. pTDefRegMap(@Self)^.&set := $00002000;
  101443. end;
  101444. procedure TCAN2_C2INT.clearCERRIF; inline;
  101445. begin
  101446. pTDefRegMap(@Self)^.clr := $00002000;
  101447. end;
  101448. procedure TCAN2_C2INT.setCERRIF(thebits : TBits_1); inline;
  101449. begin
  101450. if thebits = 0 then
  101451. pTDefRegMap(@Self)^.clr := $00002000
  101452. else
  101453. pTDefRegMap(@Self)^.&set := $00002000;
  101454. end;
  101455. function TCAN2_C2INT.getCERRIF : TBits_1; inline;
  101456. begin
  101457. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  101458. end;
  101459. procedure TCAN2_C2INT.setWAKIF; inline;
  101460. begin
  101461. pTDefRegMap(@Self)^.&set := $00004000;
  101462. end;
  101463. procedure TCAN2_C2INT.clearWAKIF; inline;
  101464. begin
  101465. pTDefRegMap(@Self)^.clr := $00004000;
  101466. end;
  101467. procedure TCAN2_C2INT.setWAKIF(thebits : TBits_1); inline;
  101468. begin
  101469. if thebits = 0 then
  101470. pTDefRegMap(@Self)^.clr := $00004000
  101471. else
  101472. pTDefRegMap(@Self)^.&set := $00004000;
  101473. end;
  101474. function TCAN2_C2INT.getWAKIF : TBits_1; inline;
  101475. begin
  101476. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  101477. end;
  101478. procedure TCAN2_C2INT.setIVRIF; inline;
  101479. begin
  101480. pTDefRegMap(@Self)^.&set := $00008000;
  101481. end;
  101482. procedure TCAN2_C2INT.clearIVRIF; inline;
  101483. begin
  101484. pTDefRegMap(@Self)^.clr := $00008000;
  101485. end;
  101486. procedure TCAN2_C2INT.setIVRIF(thebits : TBits_1); inline;
  101487. begin
  101488. if thebits = 0 then
  101489. pTDefRegMap(@Self)^.clr := $00008000
  101490. else
  101491. pTDefRegMap(@Self)^.&set := $00008000;
  101492. end;
  101493. function TCAN2_C2INT.getIVRIF : TBits_1; inline;
  101494. begin
  101495. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  101496. end;
  101497. procedure TCAN2_C2INT.setTBIE; inline;
  101498. begin
  101499. pTDefRegMap(@Self)^.&set := $00010000;
  101500. end;
  101501. procedure TCAN2_C2INT.clearTBIE; inline;
  101502. begin
  101503. pTDefRegMap(@Self)^.clr := $00010000;
  101504. end;
  101505. procedure TCAN2_C2INT.setTBIE(thebits : TBits_1); inline;
  101506. begin
  101507. if thebits = 0 then
  101508. pTDefRegMap(@Self)^.clr := $00010000
  101509. else
  101510. pTDefRegMap(@Self)^.&set := $00010000;
  101511. end;
  101512. function TCAN2_C2INT.getTBIE : TBits_1; inline;
  101513. begin
  101514. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  101515. end;
  101516. procedure TCAN2_C2INT.setRBIE; inline;
  101517. begin
  101518. pTDefRegMap(@Self)^.&set := $00020000;
  101519. end;
  101520. procedure TCAN2_C2INT.clearRBIE; inline;
  101521. begin
  101522. pTDefRegMap(@Self)^.clr := $00020000;
  101523. end;
  101524. procedure TCAN2_C2INT.setRBIE(thebits : TBits_1); inline;
  101525. begin
  101526. if thebits = 0 then
  101527. pTDefRegMap(@Self)^.clr := $00020000
  101528. else
  101529. pTDefRegMap(@Self)^.&set := $00020000;
  101530. end;
  101531. function TCAN2_C2INT.getRBIE : TBits_1; inline;
  101532. begin
  101533. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  101534. end;
  101535. procedure TCAN2_C2INT.setCTMRIE; inline;
  101536. begin
  101537. pTDefRegMap(@Self)^.&set := $00040000;
  101538. end;
  101539. procedure TCAN2_C2INT.clearCTMRIE; inline;
  101540. begin
  101541. pTDefRegMap(@Self)^.clr := $00040000;
  101542. end;
  101543. procedure TCAN2_C2INT.setCTMRIE(thebits : TBits_1); inline;
  101544. begin
  101545. if thebits = 0 then
  101546. pTDefRegMap(@Self)^.clr := $00040000
  101547. else
  101548. pTDefRegMap(@Self)^.&set := $00040000;
  101549. end;
  101550. function TCAN2_C2INT.getCTMRIE : TBits_1; inline;
  101551. begin
  101552. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  101553. end;
  101554. procedure TCAN2_C2INT.setMODIE; inline;
  101555. begin
  101556. pTDefRegMap(@Self)^.&set := $00080000;
  101557. end;
  101558. procedure TCAN2_C2INT.clearMODIE; inline;
  101559. begin
  101560. pTDefRegMap(@Self)^.clr := $00080000;
  101561. end;
  101562. procedure TCAN2_C2INT.setMODIE(thebits : TBits_1); inline;
  101563. begin
  101564. if thebits = 0 then
  101565. pTDefRegMap(@Self)^.clr := $00080000
  101566. else
  101567. pTDefRegMap(@Self)^.&set := $00080000;
  101568. end;
  101569. function TCAN2_C2INT.getMODIE : TBits_1; inline;
  101570. begin
  101571. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  101572. end;
  101573. procedure TCAN2_C2INT.setRBOVIE; inline;
  101574. begin
  101575. pTDefRegMap(@Self)^.&set := $08000000;
  101576. end;
  101577. procedure TCAN2_C2INT.clearRBOVIE; inline;
  101578. begin
  101579. pTDefRegMap(@Self)^.clr := $08000000;
  101580. end;
  101581. procedure TCAN2_C2INT.setRBOVIE(thebits : TBits_1); inline;
  101582. begin
  101583. if thebits = 0 then
  101584. pTDefRegMap(@Self)^.clr := $08000000
  101585. else
  101586. pTDefRegMap(@Self)^.&set := $08000000;
  101587. end;
  101588. function TCAN2_C2INT.getRBOVIE : TBits_1; inline;
  101589. begin
  101590. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  101591. end;
  101592. procedure TCAN2_C2INT.setSERRIE; inline;
  101593. begin
  101594. pTDefRegMap(@Self)^.&set := $10000000;
  101595. end;
  101596. procedure TCAN2_C2INT.clearSERRIE; inline;
  101597. begin
  101598. pTDefRegMap(@Self)^.clr := $10000000;
  101599. end;
  101600. procedure TCAN2_C2INT.setSERRIE(thebits : TBits_1); inline;
  101601. begin
  101602. if thebits = 0 then
  101603. pTDefRegMap(@Self)^.clr := $10000000
  101604. else
  101605. pTDefRegMap(@Self)^.&set := $10000000;
  101606. end;
  101607. function TCAN2_C2INT.getSERRIE : TBits_1; inline;
  101608. begin
  101609. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  101610. end;
  101611. procedure TCAN2_C2INT.setCERRIE; inline;
  101612. begin
  101613. pTDefRegMap(@Self)^.&set := $20000000;
  101614. end;
  101615. procedure TCAN2_C2INT.clearCERRIE; inline;
  101616. begin
  101617. pTDefRegMap(@Self)^.clr := $20000000;
  101618. end;
  101619. procedure TCAN2_C2INT.setCERRIE(thebits : TBits_1); inline;
  101620. begin
  101621. if thebits = 0 then
  101622. pTDefRegMap(@Self)^.clr := $20000000
  101623. else
  101624. pTDefRegMap(@Self)^.&set := $20000000;
  101625. end;
  101626. function TCAN2_C2INT.getCERRIE : TBits_1; inline;
  101627. begin
  101628. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  101629. end;
  101630. procedure TCAN2_C2INT.setWAKIE; inline;
  101631. begin
  101632. pTDefRegMap(@Self)^.&set := $40000000;
  101633. end;
  101634. procedure TCAN2_C2INT.clearWAKIE; inline;
  101635. begin
  101636. pTDefRegMap(@Self)^.clr := $40000000;
  101637. end;
  101638. procedure TCAN2_C2INT.setWAKIE(thebits : TBits_1); inline;
  101639. begin
  101640. if thebits = 0 then
  101641. pTDefRegMap(@Self)^.clr := $40000000
  101642. else
  101643. pTDefRegMap(@Self)^.&set := $40000000;
  101644. end;
  101645. function TCAN2_C2INT.getWAKIE : TBits_1; inline;
  101646. begin
  101647. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  101648. end;
  101649. procedure TCAN2_C2INT.setIVRIE; inline;
  101650. begin
  101651. pTDefRegMap(@Self)^.&set := $80000000;
  101652. end;
  101653. procedure TCAN2_C2INT.clearIVRIE; inline;
  101654. begin
  101655. pTDefRegMap(@Self)^.clr := $80000000;
  101656. end;
  101657. procedure TCAN2_C2INT.setIVRIE(thebits : TBits_1); inline;
  101658. begin
  101659. if thebits = 0 then
  101660. pTDefRegMap(@Self)^.clr := $80000000
  101661. else
  101662. pTDefRegMap(@Self)^.&set := $80000000;
  101663. end;
  101664. function TCAN2_C2INT.getIVRIE : TBits_1; inline;
  101665. begin
  101666. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  101667. end;
  101668. procedure TCAN2_C2INT.setw(thebits : TBits_32); inline;
  101669. begin
  101670. pTDefRegMap(@Self)^.val := thebits;
  101671. end;
  101672. function TCAN2_C2INT.getw : TBits_32; inline;
  101673. begin
  101674. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101675. end;
  101676. procedure TCAN2_C2VEC.setICODE(thebits : TBits_7); inline;
  101677. begin
  101678. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  101679. end;
  101680. function TCAN2_C2VEC.getICODE : TBits_7; inline;
  101681. begin
  101682. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  101683. end;
  101684. procedure TCAN2_C2VEC.setFILHIT(thebits : TBits_5); inline;
  101685. begin
  101686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  101687. end;
  101688. function TCAN2_C2VEC.getFILHIT : TBits_5; inline;
  101689. begin
  101690. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  101691. end;
  101692. procedure TCAN2_C2VEC.setw(thebits : TBits_32); inline;
  101693. begin
  101694. pTDefRegMap(@Self)^.val := thebits;
  101695. end;
  101696. function TCAN2_C2VEC.getw : TBits_32; inline;
  101697. begin
  101698. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101699. end;
  101700. procedure TCAN2_C2TREC.setRERRCNT(thebits : TBits_8); inline;
  101701. begin
  101702. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  101703. end;
  101704. function TCAN2_C2TREC.getRERRCNT : TBits_8; inline;
  101705. begin
  101706. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  101707. end;
  101708. procedure TCAN2_C2TREC.setTERRCNT(thebits : TBits_8); inline;
  101709. begin
  101710. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  101711. end;
  101712. function TCAN2_C2TREC.getTERRCNT : TBits_8; inline;
  101713. begin
  101714. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  101715. end;
  101716. procedure TCAN2_C2TREC.setEWARN; inline;
  101717. begin
  101718. pTDefRegMap(@Self)^.&set := $00010000;
  101719. end;
  101720. procedure TCAN2_C2TREC.clearEWARN; inline;
  101721. begin
  101722. pTDefRegMap(@Self)^.clr := $00010000;
  101723. end;
  101724. procedure TCAN2_C2TREC.setEWARN(thebits : TBits_1); inline;
  101725. begin
  101726. if thebits = 0 then
  101727. pTDefRegMap(@Self)^.clr := $00010000
  101728. else
  101729. pTDefRegMap(@Self)^.&set := $00010000;
  101730. end;
  101731. function TCAN2_C2TREC.getEWARN : TBits_1; inline;
  101732. begin
  101733. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  101734. end;
  101735. procedure TCAN2_C2TREC.setRXWARN; inline;
  101736. begin
  101737. pTDefRegMap(@Self)^.&set := $00020000;
  101738. end;
  101739. procedure TCAN2_C2TREC.clearRXWARN; inline;
  101740. begin
  101741. pTDefRegMap(@Self)^.clr := $00020000;
  101742. end;
  101743. procedure TCAN2_C2TREC.setRXWARN(thebits : TBits_1); inline;
  101744. begin
  101745. if thebits = 0 then
  101746. pTDefRegMap(@Self)^.clr := $00020000
  101747. else
  101748. pTDefRegMap(@Self)^.&set := $00020000;
  101749. end;
  101750. function TCAN2_C2TREC.getRXWARN : TBits_1; inline;
  101751. begin
  101752. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  101753. end;
  101754. procedure TCAN2_C2TREC.setTXWARN; inline;
  101755. begin
  101756. pTDefRegMap(@Self)^.&set := $00040000;
  101757. end;
  101758. procedure TCAN2_C2TREC.clearTXWARN; inline;
  101759. begin
  101760. pTDefRegMap(@Self)^.clr := $00040000;
  101761. end;
  101762. procedure TCAN2_C2TREC.setTXWARN(thebits : TBits_1); inline;
  101763. begin
  101764. if thebits = 0 then
  101765. pTDefRegMap(@Self)^.clr := $00040000
  101766. else
  101767. pTDefRegMap(@Self)^.&set := $00040000;
  101768. end;
  101769. function TCAN2_C2TREC.getTXWARN : TBits_1; inline;
  101770. begin
  101771. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  101772. end;
  101773. procedure TCAN2_C2TREC.setRXBP; inline;
  101774. begin
  101775. pTDefRegMap(@Self)^.&set := $00080000;
  101776. end;
  101777. procedure TCAN2_C2TREC.clearRXBP; inline;
  101778. begin
  101779. pTDefRegMap(@Self)^.clr := $00080000;
  101780. end;
  101781. procedure TCAN2_C2TREC.setRXBP(thebits : TBits_1); inline;
  101782. begin
  101783. if thebits = 0 then
  101784. pTDefRegMap(@Self)^.clr := $00080000
  101785. else
  101786. pTDefRegMap(@Self)^.&set := $00080000;
  101787. end;
  101788. function TCAN2_C2TREC.getRXBP : TBits_1; inline;
  101789. begin
  101790. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  101791. end;
  101792. procedure TCAN2_C2TREC.setTXBP; inline;
  101793. begin
  101794. pTDefRegMap(@Self)^.&set := $00100000;
  101795. end;
  101796. procedure TCAN2_C2TREC.clearTXBP; inline;
  101797. begin
  101798. pTDefRegMap(@Self)^.clr := $00100000;
  101799. end;
  101800. procedure TCAN2_C2TREC.setTXBP(thebits : TBits_1); inline;
  101801. begin
  101802. if thebits = 0 then
  101803. pTDefRegMap(@Self)^.clr := $00100000
  101804. else
  101805. pTDefRegMap(@Self)^.&set := $00100000;
  101806. end;
  101807. function TCAN2_C2TREC.getTXBP : TBits_1; inline;
  101808. begin
  101809. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  101810. end;
  101811. procedure TCAN2_C2TREC.setTXBO; inline;
  101812. begin
  101813. pTDefRegMap(@Self)^.&set := $00200000;
  101814. end;
  101815. procedure TCAN2_C2TREC.clearTXBO; inline;
  101816. begin
  101817. pTDefRegMap(@Self)^.clr := $00200000;
  101818. end;
  101819. procedure TCAN2_C2TREC.setTXBO(thebits : TBits_1); inline;
  101820. begin
  101821. if thebits = 0 then
  101822. pTDefRegMap(@Self)^.clr := $00200000
  101823. else
  101824. pTDefRegMap(@Self)^.&set := $00200000;
  101825. end;
  101826. function TCAN2_C2TREC.getTXBO : TBits_1; inline;
  101827. begin
  101828. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  101829. end;
  101830. procedure TCAN2_C2TREC.setw(thebits : TBits_32); inline;
  101831. begin
  101832. pTDefRegMap(@Self)^.val := thebits;
  101833. end;
  101834. function TCAN2_C2TREC.getw : TBits_32; inline;
  101835. begin
  101836. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101837. end;
  101838. procedure TCAN2_C2FSTAT.setFIFOIP(thebits : TBits_32); inline;
  101839. begin
  101840. pTDefRegMap(@Self)^.val := thebits;
  101841. end;
  101842. function TCAN2_C2FSTAT.getFIFOIP : TBits_32; inline;
  101843. begin
  101844. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101845. end;
  101846. procedure TCAN2_C2FSTAT.setFIFOIP0; inline;
  101847. begin
  101848. pTDefRegMap(@Self)^.&set := $00000001;
  101849. end;
  101850. procedure TCAN2_C2FSTAT.clearFIFOIP0; inline;
  101851. begin
  101852. pTDefRegMap(@Self)^.clr := $00000001;
  101853. end;
  101854. procedure TCAN2_C2FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  101855. begin
  101856. if thebits = 0 then
  101857. pTDefRegMap(@Self)^.clr := $00000001
  101858. else
  101859. pTDefRegMap(@Self)^.&set := $00000001;
  101860. end;
  101861. function TCAN2_C2FSTAT.getFIFOIP0 : TBits_1; inline;
  101862. begin
  101863. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  101864. end;
  101865. procedure TCAN2_C2FSTAT.setFIFOIP1; inline;
  101866. begin
  101867. pTDefRegMap(@Self)^.&set := $00000002;
  101868. end;
  101869. procedure TCAN2_C2FSTAT.clearFIFOIP1; inline;
  101870. begin
  101871. pTDefRegMap(@Self)^.clr := $00000002;
  101872. end;
  101873. procedure TCAN2_C2FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  101874. begin
  101875. if thebits = 0 then
  101876. pTDefRegMap(@Self)^.clr := $00000002
  101877. else
  101878. pTDefRegMap(@Self)^.&set := $00000002;
  101879. end;
  101880. function TCAN2_C2FSTAT.getFIFOIP1 : TBits_1; inline;
  101881. begin
  101882. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  101883. end;
  101884. procedure TCAN2_C2FSTAT.setFIFOIP2; inline;
  101885. begin
  101886. pTDefRegMap(@Self)^.&set := $00000004;
  101887. end;
  101888. procedure TCAN2_C2FSTAT.clearFIFOIP2; inline;
  101889. begin
  101890. pTDefRegMap(@Self)^.clr := $00000004;
  101891. end;
  101892. procedure TCAN2_C2FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  101893. begin
  101894. if thebits = 0 then
  101895. pTDefRegMap(@Self)^.clr := $00000004
  101896. else
  101897. pTDefRegMap(@Self)^.&set := $00000004;
  101898. end;
  101899. function TCAN2_C2FSTAT.getFIFOIP2 : TBits_1; inline;
  101900. begin
  101901. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  101902. end;
  101903. procedure TCAN2_C2FSTAT.setFIFOIP3; inline;
  101904. begin
  101905. pTDefRegMap(@Self)^.&set := $00000008;
  101906. end;
  101907. procedure TCAN2_C2FSTAT.clearFIFOIP3; inline;
  101908. begin
  101909. pTDefRegMap(@Self)^.clr := $00000008;
  101910. end;
  101911. procedure TCAN2_C2FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  101912. begin
  101913. if thebits = 0 then
  101914. pTDefRegMap(@Self)^.clr := $00000008
  101915. else
  101916. pTDefRegMap(@Self)^.&set := $00000008;
  101917. end;
  101918. function TCAN2_C2FSTAT.getFIFOIP3 : TBits_1; inline;
  101919. begin
  101920. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  101921. end;
  101922. procedure TCAN2_C2FSTAT.setFIFOIP4; inline;
  101923. begin
  101924. pTDefRegMap(@Self)^.&set := $00000010;
  101925. end;
  101926. procedure TCAN2_C2FSTAT.clearFIFOIP4; inline;
  101927. begin
  101928. pTDefRegMap(@Self)^.clr := $00000010;
  101929. end;
  101930. procedure TCAN2_C2FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  101931. begin
  101932. if thebits = 0 then
  101933. pTDefRegMap(@Self)^.clr := $00000010
  101934. else
  101935. pTDefRegMap(@Self)^.&set := $00000010;
  101936. end;
  101937. function TCAN2_C2FSTAT.getFIFOIP4 : TBits_1; inline;
  101938. begin
  101939. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  101940. end;
  101941. procedure TCAN2_C2FSTAT.setFIFOIP5; inline;
  101942. begin
  101943. pTDefRegMap(@Self)^.&set := $00000020;
  101944. end;
  101945. procedure TCAN2_C2FSTAT.clearFIFOIP5; inline;
  101946. begin
  101947. pTDefRegMap(@Self)^.clr := $00000020;
  101948. end;
  101949. procedure TCAN2_C2FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  101950. begin
  101951. if thebits = 0 then
  101952. pTDefRegMap(@Self)^.clr := $00000020
  101953. else
  101954. pTDefRegMap(@Self)^.&set := $00000020;
  101955. end;
  101956. function TCAN2_C2FSTAT.getFIFOIP5 : TBits_1; inline;
  101957. begin
  101958. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  101959. end;
  101960. procedure TCAN2_C2FSTAT.setFIFOIP6; inline;
  101961. begin
  101962. pTDefRegMap(@Self)^.&set := $00000040;
  101963. end;
  101964. procedure TCAN2_C2FSTAT.clearFIFOIP6; inline;
  101965. begin
  101966. pTDefRegMap(@Self)^.clr := $00000040;
  101967. end;
  101968. procedure TCAN2_C2FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  101969. begin
  101970. if thebits = 0 then
  101971. pTDefRegMap(@Self)^.clr := $00000040
  101972. else
  101973. pTDefRegMap(@Self)^.&set := $00000040;
  101974. end;
  101975. function TCAN2_C2FSTAT.getFIFOIP6 : TBits_1; inline;
  101976. begin
  101977. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  101978. end;
  101979. procedure TCAN2_C2FSTAT.setFIFOIP7; inline;
  101980. begin
  101981. pTDefRegMap(@Self)^.&set := $00000080;
  101982. end;
  101983. procedure TCAN2_C2FSTAT.clearFIFOIP7; inline;
  101984. begin
  101985. pTDefRegMap(@Self)^.clr := $00000080;
  101986. end;
  101987. procedure TCAN2_C2FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  101988. begin
  101989. if thebits = 0 then
  101990. pTDefRegMap(@Self)^.clr := $00000080
  101991. else
  101992. pTDefRegMap(@Self)^.&set := $00000080;
  101993. end;
  101994. function TCAN2_C2FSTAT.getFIFOIP7 : TBits_1; inline;
  101995. begin
  101996. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  101997. end;
  101998. procedure TCAN2_C2FSTAT.setFIFOIP8; inline;
  101999. begin
  102000. pTDefRegMap(@Self)^.&set := $00000100;
  102001. end;
  102002. procedure TCAN2_C2FSTAT.clearFIFOIP8; inline;
  102003. begin
  102004. pTDefRegMap(@Self)^.clr := $00000100;
  102005. end;
  102006. procedure TCAN2_C2FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  102007. begin
  102008. if thebits = 0 then
  102009. pTDefRegMap(@Self)^.clr := $00000100
  102010. else
  102011. pTDefRegMap(@Self)^.&set := $00000100;
  102012. end;
  102013. function TCAN2_C2FSTAT.getFIFOIP8 : TBits_1; inline;
  102014. begin
  102015. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  102016. end;
  102017. procedure TCAN2_C2FSTAT.setFIFOIP9; inline;
  102018. begin
  102019. pTDefRegMap(@Self)^.&set := $00000200;
  102020. end;
  102021. procedure TCAN2_C2FSTAT.clearFIFOIP9; inline;
  102022. begin
  102023. pTDefRegMap(@Self)^.clr := $00000200;
  102024. end;
  102025. procedure TCAN2_C2FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  102026. begin
  102027. if thebits = 0 then
  102028. pTDefRegMap(@Self)^.clr := $00000200
  102029. else
  102030. pTDefRegMap(@Self)^.&set := $00000200;
  102031. end;
  102032. function TCAN2_C2FSTAT.getFIFOIP9 : TBits_1; inline;
  102033. begin
  102034. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  102035. end;
  102036. procedure TCAN2_C2FSTAT.setFIFOIP10; inline;
  102037. begin
  102038. pTDefRegMap(@Self)^.&set := $00000400;
  102039. end;
  102040. procedure TCAN2_C2FSTAT.clearFIFOIP10; inline;
  102041. begin
  102042. pTDefRegMap(@Self)^.clr := $00000400;
  102043. end;
  102044. procedure TCAN2_C2FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  102045. begin
  102046. if thebits = 0 then
  102047. pTDefRegMap(@Self)^.clr := $00000400
  102048. else
  102049. pTDefRegMap(@Self)^.&set := $00000400;
  102050. end;
  102051. function TCAN2_C2FSTAT.getFIFOIP10 : TBits_1; inline;
  102052. begin
  102053. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  102054. end;
  102055. procedure TCAN2_C2FSTAT.setFIFOIP11; inline;
  102056. begin
  102057. pTDefRegMap(@Self)^.&set := $00000800;
  102058. end;
  102059. procedure TCAN2_C2FSTAT.clearFIFOIP11; inline;
  102060. begin
  102061. pTDefRegMap(@Self)^.clr := $00000800;
  102062. end;
  102063. procedure TCAN2_C2FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  102064. begin
  102065. if thebits = 0 then
  102066. pTDefRegMap(@Self)^.clr := $00000800
  102067. else
  102068. pTDefRegMap(@Self)^.&set := $00000800;
  102069. end;
  102070. function TCAN2_C2FSTAT.getFIFOIP11 : TBits_1; inline;
  102071. begin
  102072. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  102073. end;
  102074. procedure TCAN2_C2FSTAT.setFIFOIP12; inline;
  102075. begin
  102076. pTDefRegMap(@Self)^.&set := $00001000;
  102077. end;
  102078. procedure TCAN2_C2FSTAT.clearFIFOIP12; inline;
  102079. begin
  102080. pTDefRegMap(@Self)^.clr := $00001000;
  102081. end;
  102082. procedure TCAN2_C2FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  102083. begin
  102084. if thebits = 0 then
  102085. pTDefRegMap(@Self)^.clr := $00001000
  102086. else
  102087. pTDefRegMap(@Self)^.&set := $00001000;
  102088. end;
  102089. function TCAN2_C2FSTAT.getFIFOIP12 : TBits_1; inline;
  102090. begin
  102091. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  102092. end;
  102093. procedure TCAN2_C2FSTAT.setFIFOIP13; inline;
  102094. begin
  102095. pTDefRegMap(@Self)^.&set := $00002000;
  102096. end;
  102097. procedure TCAN2_C2FSTAT.clearFIFOIP13; inline;
  102098. begin
  102099. pTDefRegMap(@Self)^.clr := $00002000;
  102100. end;
  102101. procedure TCAN2_C2FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  102102. begin
  102103. if thebits = 0 then
  102104. pTDefRegMap(@Self)^.clr := $00002000
  102105. else
  102106. pTDefRegMap(@Self)^.&set := $00002000;
  102107. end;
  102108. function TCAN2_C2FSTAT.getFIFOIP13 : TBits_1; inline;
  102109. begin
  102110. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  102111. end;
  102112. procedure TCAN2_C2FSTAT.setFIFOIP14; inline;
  102113. begin
  102114. pTDefRegMap(@Self)^.&set := $00004000;
  102115. end;
  102116. procedure TCAN2_C2FSTAT.clearFIFOIP14; inline;
  102117. begin
  102118. pTDefRegMap(@Self)^.clr := $00004000;
  102119. end;
  102120. procedure TCAN2_C2FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  102121. begin
  102122. if thebits = 0 then
  102123. pTDefRegMap(@Self)^.clr := $00004000
  102124. else
  102125. pTDefRegMap(@Self)^.&set := $00004000;
  102126. end;
  102127. function TCAN2_C2FSTAT.getFIFOIP14 : TBits_1; inline;
  102128. begin
  102129. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  102130. end;
  102131. procedure TCAN2_C2FSTAT.setFIFOIP15; inline;
  102132. begin
  102133. pTDefRegMap(@Self)^.&set := $00008000;
  102134. end;
  102135. procedure TCAN2_C2FSTAT.clearFIFOIP15; inline;
  102136. begin
  102137. pTDefRegMap(@Self)^.clr := $00008000;
  102138. end;
  102139. procedure TCAN2_C2FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  102140. begin
  102141. if thebits = 0 then
  102142. pTDefRegMap(@Self)^.clr := $00008000
  102143. else
  102144. pTDefRegMap(@Self)^.&set := $00008000;
  102145. end;
  102146. function TCAN2_C2FSTAT.getFIFOIP15 : TBits_1; inline;
  102147. begin
  102148. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  102149. end;
  102150. procedure TCAN2_C2FSTAT.setFIFOIP16; inline;
  102151. begin
  102152. pTDefRegMap(@Self)^.&set := $00010000;
  102153. end;
  102154. procedure TCAN2_C2FSTAT.clearFIFOIP16; inline;
  102155. begin
  102156. pTDefRegMap(@Self)^.clr := $00010000;
  102157. end;
  102158. procedure TCAN2_C2FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  102159. begin
  102160. if thebits = 0 then
  102161. pTDefRegMap(@Self)^.clr := $00010000
  102162. else
  102163. pTDefRegMap(@Self)^.&set := $00010000;
  102164. end;
  102165. function TCAN2_C2FSTAT.getFIFOIP16 : TBits_1; inline;
  102166. begin
  102167. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  102168. end;
  102169. procedure TCAN2_C2FSTAT.setFIFOIP17; inline;
  102170. begin
  102171. pTDefRegMap(@Self)^.&set := $00020000;
  102172. end;
  102173. procedure TCAN2_C2FSTAT.clearFIFOIP17; inline;
  102174. begin
  102175. pTDefRegMap(@Self)^.clr := $00020000;
  102176. end;
  102177. procedure TCAN2_C2FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  102178. begin
  102179. if thebits = 0 then
  102180. pTDefRegMap(@Self)^.clr := $00020000
  102181. else
  102182. pTDefRegMap(@Self)^.&set := $00020000;
  102183. end;
  102184. function TCAN2_C2FSTAT.getFIFOIP17 : TBits_1; inline;
  102185. begin
  102186. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  102187. end;
  102188. procedure TCAN2_C2FSTAT.setFIFOIP18; inline;
  102189. begin
  102190. pTDefRegMap(@Self)^.&set := $00040000;
  102191. end;
  102192. procedure TCAN2_C2FSTAT.clearFIFOIP18; inline;
  102193. begin
  102194. pTDefRegMap(@Self)^.clr := $00040000;
  102195. end;
  102196. procedure TCAN2_C2FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  102197. begin
  102198. if thebits = 0 then
  102199. pTDefRegMap(@Self)^.clr := $00040000
  102200. else
  102201. pTDefRegMap(@Self)^.&set := $00040000;
  102202. end;
  102203. function TCAN2_C2FSTAT.getFIFOIP18 : TBits_1; inline;
  102204. begin
  102205. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  102206. end;
  102207. procedure TCAN2_C2FSTAT.setFIFOIP19; inline;
  102208. begin
  102209. pTDefRegMap(@Self)^.&set := $00080000;
  102210. end;
  102211. procedure TCAN2_C2FSTAT.clearFIFOIP19; inline;
  102212. begin
  102213. pTDefRegMap(@Self)^.clr := $00080000;
  102214. end;
  102215. procedure TCAN2_C2FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  102216. begin
  102217. if thebits = 0 then
  102218. pTDefRegMap(@Self)^.clr := $00080000
  102219. else
  102220. pTDefRegMap(@Self)^.&set := $00080000;
  102221. end;
  102222. function TCAN2_C2FSTAT.getFIFOIP19 : TBits_1; inline;
  102223. begin
  102224. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  102225. end;
  102226. procedure TCAN2_C2FSTAT.setFIFOIP20; inline;
  102227. begin
  102228. pTDefRegMap(@Self)^.&set := $00100000;
  102229. end;
  102230. procedure TCAN2_C2FSTAT.clearFIFOIP20; inline;
  102231. begin
  102232. pTDefRegMap(@Self)^.clr := $00100000;
  102233. end;
  102234. procedure TCAN2_C2FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  102235. begin
  102236. if thebits = 0 then
  102237. pTDefRegMap(@Self)^.clr := $00100000
  102238. else
  102239. pTDefRegMap(@Self)^.&set := $00100000;
  102240. end;
  102241. function TCAN2_C2FSTAT.getFIFOIP20 : TBits_1; inline;
  102242. begin
  102243. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  102244. end;
  102245. procedure TCAN2_C2FSTAT.setFIFOIP21; inline;
  102246. begin
  102247. pTDefRegMap(@Self)^.&set := $00200000;
  102248. end;
  102249. procedure TCAN2_C2FSTAT.clearFIFOIP21; inline;
  102250. begin
  102251. pTDefRegMap(@Self)^.clr := $00200000;
  102252. end;
  102253. procedure TCAN2_C2FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  102254. begin
  102255. if thebits = 0 then
  102256. pTDefRegMap(@Self)^.clr := $00200000
  102257. else
  102258. pTDefRegMap(@Self)^.&set := $00200000;
  102259. end;
  102260. function TCAN2_C2FSTAT.getFIFOIP21 : TBits_1; inline;
  102261. begin
  102262. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  102263. end;
  102264. procedure TCAN2_C2FSTAT.setFIFOIP22; inline;
  102265. begin
  102266. pTDefRegMap(@Self)^.&set := $00400000;
  102267. end;
  102268. procedure TCAN2_C2FSTAT.clearFIFOIP22; inline;
  102269. begin
  102270. pTDefRegMap(@Self)^.clr := $00400000;
  102271. end;
  102272. procedure TCAN2_C2FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  102273. begin
  102274. if thebits = 0 then
  102275. pTDefRegMap(@Self)^.clr := $00400000
  102276. else
  102277. pTDefRegMap(@Self)^.&set := $00400000;
  102278. end;
  102279. function TCAN2_C2FSTAT.getFIFOIP22 : TBits_1; inline;
  102280. begin
  102281. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  102282. end;
  102283. procedure TCAN2_C2FSTAT.setFIFOIP23; inline;
  102284. begin
  102285. pTDefRegMap(@Self)^.&set := $00800000;
  102286. end;
  102287. procedure TCAN2_C2FSTAT.clearFIFOIP23; inline;
  102288. begin
  102289. pTDefRegMap(@Self)^.clr := $00800000;
  102290. end;
  102291. procedure TCAN2_C2FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  102292. begin
  102293. if thebits = 0 then
  102294. pTDefRegMap(@Self)^.clr := $00800000
  102295. else
  102296. pTDefRegMap(@Self)^.&set := $00800000;
  102297. end;
  102298. function TCAN2_C2FSTAT.getFIFOIP23 : TBits_1; inline;
  102299. begin
  102300. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  102301. end;
  102302. procedure TCAN2_C2FSTAT.setFIFOIP24; inline;
  102303. begin
  102304. pTDefRegMap(@Self)^.&set := $01000000;
  102305. end;
  102306. procedure TCAN2_C2FSTAT.clearFIFOIP24; inline;
  102307. begin
  102308. pTDefRegMap(@Self)^.clr := $01000000;
  102309. end;
  102310. procedure TCAN2_C2FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  102311. begin
  102312. if thebits = 0 then
  102313. pTDefRegMap(@Self)^.clr := $01000000
  102314. else
  102315. pTDefRegMap(@Self)^.&set := $01000000;
  102316. end;
  102317. function TCAN2_C2FSTAT.getFIFOIP24 : TBits_1; inline;
  102318. begin
  102319. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  102320. end;
  102321. procedure TCAN2_C2FSTAT.setFIFOIP25; inline;
  102322. begin
  102323. pTDefRegMap(@Self)^.&set := $02000000;
  102324. end;
  102325. procedure TCAN2_C2FSTAT.clearFIFOIP25; inline;
  102326. begin
  102327. pTDefRegMap(@Self)^.clr := $02000000;
  102328. end;
  102329. procedure TCAN2_C2FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  102330. begin
  102331. if thebits = 0 then
  102332. pTDefRegMap(@Self)^.clr := $02000000
  102333. else
  102334. pTDefRegMap(@Self)^.&set := $02000000;
  102335. end;
  102336. function TCAN2_C2FSTAT.getFIFOIP25 : TBits_1; inline;
  102337. begin
  102338. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  102339. end;
  102340. procedure TCAN2_C2FSTAT.setFIFOIP26; inline;
  102341. begin
  102342. pTDefRegMap(@Self)^.&set := $04000000;
  102343. end;
  102344. procedure TCAN2_C2FSTAT.clearFIFOIP26; inline;
  102345. begin
  102346. pTDefRegMap(@Self)^.clr := $04000000;
  102347. end;
  102348. procedure TCAN2_C2FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  102349. begin
  102350. if thebits = 0 then
  102351. pTDefRegMap(@Self)^.clr := $04000000
  102352. else
  102353. pTDefRegMap(@Self)^.&set := $04000000;
  102354. end;
  102355. function TCAN2_C2FSTAT.getFIFOIP26 : TBits_1; inline;
  102356. begin
  102357. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  102358. end;
  102359. procedure TCAN2_C2FSTAT.setFIFOIP27; inline;
  102360. begin
  102361. pTDefRegMap(@Self)^.&set := $08000000;
  102362. end;
  102363. procedure TCAN2_C2FSTAT.clearFIFOIP27; inline;
  102364. begin
  102365. pTDefRegMap(@Self)^.clr := $08000000;
  102366. end;
  102367. procedure TCAN2_C2FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  102368. begin
  102369. if thebits = 0 then
  102370. pTDefRegMap(@Self)^.clr := $08000000
  102371. else
  102372. pTDefRegMap(@Self)^.&set := $08000000;
  102373. end;
  102374. function TCAN2_C2FSTAT.getFIFOIP27 : TBits_1; inline;
  102375. begin
  102376. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  102377. end;
  102378. procedure TCAN2_C2FSTAT.setFIFOIP28; inline;
  102379. begin
  102380. pTDefRegMap(@Self)^.&set := $10000000;
  102381. end;
  102382. procedure TCAN2_C2FSTAT.clearFIFOIP28; inline;
  102383. begin
  102384. pTDefRegMap(@Self)^.clr := $10000000;
  102385. end;
  102386. procedure TCAN2_C2FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  102387. begin
  102388. if thebits = 0 then
  102389. pTDefRegMap(@Self)^.clr := $10000000
  102390. else
  102391. pTDefRegMap(@Self)^.&set := $10000000;
  102392. end;
  102393. function TCAN2_C2FSTAT.getFIFOIP28 : TBits_1; inline;
  102394. begin
  102395. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  102396. end;
  102397. procedure TCAN2_C2FSTAT.setFIFOIP29; inline;
  102398. begin
  102399. pTDefRegMap(@Self)^.&set := $20000000;
  102400. end;
  102401. procedure TCAN2_C2FSTAT.clearFIFOIP29; inline;
  102402. begin
  102403. pTDefRegMap(@Self)^.clr := $20000000;
  102404. end;
  102405. procedure TCAN2_C2FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  102406. begin
  102407. if thebits = 0 then
  102408. pTDefRegMap(@Self)^.clr := $20000000
  102409. else
  102410. pTDefRegMap(@Self)^.&set := $20000000;
  102411. end;
  102412. function TCAN2_C2FSTAT.getFIFOIP29 : TBits_1; inline;
  102413. begin
  102414. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  102415. end;
  102416. procedure TCAN2_C2FSTAT.setFIFOIP30; inline;
  102417. begin
  102418. pTDefRegMap(@Self)^.&set := $40000000;
  102419. end;
  102420. procedure TCAN2_C2FSTAT.clearFIFOIP30; inline;
  102421. begin
  102422. pTDefRegMap(@Self)^.clr := $40000000;
  102423. end;
  102424. procedure TCAN2_C2FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  102425. begin
  102426. if thebits = 0 then
  102427. pTDefRegMap(@Self)^.clr := $40000000
  102428. else
  102429. pTDefRegMap(@Self)^.&set := $40000000;
  102430. end;
  102431. function TCAN2_C2FSTAT.getFIFOIP30 : TBits_1; inline;
  102432. begin
  102433. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  102434. end;
  102435. procedure TCAN2_C2FSTAT.setFIFOIP31; inline;
  102436. begin
  102437. pTDefRegMap(@Self)^.&set := $80000000;
  102438. end;
  102439. procedure TCAN2_C2FSTAT.clearFIFOIP31; inline;
  102440. begin
  102441. pTDefRegMap(@Self)^.clr := $80000000;
  102442. end;
  102443. procedure TCAN2_C2FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  102444. begin
  102445. if thebits = 0 then
  102446. pTDefRegMap(@Self)^.clr := $80000000
  102447. else
  102448. pTDefRegMap(@Self)^.&set := $80000000;
  102449. end;
  102450. function TCAN2_C2FSTAT.getFIFOIP31 : TBits_1; inline;
  102451. begin
  102452. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  102453. end;
  102454. procedure TCAN2_C2FSTAT.setw(thebits : TBits_32); inline;
  102455. begin
  102456. pTDefRegMap(@Self)^.val := thebits;
  102457. end;
  102458. function TCAN2_C2FSTAT.getw : TBits_32; inline;
  102459. begin
  102460. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102461. end;
  102462. procedure TCAN2_C2RXOVF.setRXOVF(thebits : TBits_32); inline;
  102463. begin
  102464. pTDefRegMap(@Self)^.val := thebits;
  102465. end;
  102466. function TCAN2_C2RXOVF.getRXOVF : TBits_32; inline;
  102467. begin
  102468. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102469. end;
  102470. procedure TCAN2_C2RXOVF.setRXOVF0; inline;
  102471. begin
  102472. pTDefRegMap(@Self)^.&set := $00000001;
  102473. end;
  102474. procedure TCAN2_C2RXOVF.clearRXOVF0; inline;
  102475. begin
  102476. pTDefRegMap(@Self)^.clr := $00000001;
  102477. end;
  102478. procedure TCAN2_C2RXOVF.setRXOVF0(thebits : TBits_1); inline;
  102479. begin
  102480. if thebits = 0 then
  102481. pTDefRegMap(@Self)^.clr := $00000001
  102482. else
  102483. pTDefRegMap(@Self)^.&set := $00000001;
  102484. end;
  102485. function TCAN2_C2RXOVF.getRXOVF0 : TBits_1; inline;
  102486. begin
  102487. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  102488. end;
  102489. procedure TCAN2_C2RXOVF.setRXOVF1; inline;
  102490. begin
  102491. pTDefRegMap(@Self)^.&set := $00000002;
  102492. end;
  102493. procedure TCAN2_C2RXOVF.clearRXOVF1; inline;
  102494. begin
  102495. pTDefRegMap(@Self)^.clr := $00000002;
  102496. end;
  102497. procedure TCAN2_C2RXOVF.setRXOVF1(thebits : TBits_1); inline;
  102498. begin
  102499. if thebits = 0 then
  102500. pTDefRegMap(@Self)^.clr := $00000002
  102501. else
  102502. pTDefRegMap(@Self)^.&set := $00000002;
  102503. end;
  102504. function TCAN2_C2RXOVF.getRXOVF1 : TBits_1; inline;
  102505. begin
  102506. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  102507. end;
  102508. procedure TCAN2_C2RXOVF.setRXOVF2; inline;
  102509. begin
  102510. pTDefRegMap(@Self)^.&set := $00000004;
  102511. end;
  102512. procedure TCAN2_C2RXOVF.clearRXOVF2; inline;
  102513. begin
  102514. pTDefRegMap(@Self)^.clr := $00000004;
  102515. end;
  102516. procedure TCAN2_C2RXOVF.setRXOVF2(thebits : TBits_1); inline;
  102517. begin
  102518. if thebits = 0 then
  102519. pTDefRegMap(@Self)^.clr := $00000004
  102520. else
  102521. pTDefRegMap(@Self)^.&set := $00000004;
  102522. end;
  102523. function TCAN2_C2RXOVF.getRXOVF2 : TBits_1; inline;
  102524. begin
  102525. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  102526. end;
  102527. procedure TCAN2_C2RXOVF.setRXOVF3; inline;
  102528. begin
  102529. pTDefRegMap(@Self)^.&set := $00000008;
  102530. end;
  102531. procedure TCAN2_C2RXOVF.clearRXOVF3; inline;
  102532. begin
  102533. pTDefRegMap(@Self)^.clr := $00000008;
  102534. end;
  102535. procedure TCAN2_C2RXOVF.setRXOVF3(thebits : TBits_1); inline;
  102536. begin
  102537. if thebits = 0 then
  102538. pTDefRegMap(@Self)^.clr := $00000008
  102539. else
  102540. pTDefRegMap(@Self)^.&set := $00000008;
  102541. end;
  102542. function TCAN2_C2RXOVF.getRXOVF3 : TBits_1; inline;
  102543. begin
  102544. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  102545. end;
  102546. procedure TCAN2_C2RXOVF.setRXOVF4; inline;
  102547. begin
  102548. pTDefRegMap(@Self)^.&set := $00000010;
  102549. end;
  102550. procedure TCAN2_C2RXOVF.clearRXOVF4; inline;
  102551. begin
  102552. pTDefRegMap(@Self)^.clr := $00000010;
  102553. end;
  102554. procedure TCAN2_C2RXOVF.setRXOVF4(thebits : TBits_1); inline;
  102555. begin
  102556. if thebits = 0 then
  102557. pTDefRegMap(@Self)^.clr := $00000010
  102558. else
  102559. pTDefRegMap(@Self)^.&set := $00000010;
  102560. end;
  102561. function TCAN2_C2RXOVF.getRXOVF4 : TBits_1; inline;
  102562. begin
  102563. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  102564. end;
  102565. procedure TCAN2_C2RXOVF.setRXOVF5; inline;
  102566. begin
  102567. pTDefRegMap(@Self)^.&set := $00000020;
  102568. end;
  102569. procedure TCAN2_C2RXOVF.clearRXOVF5; inline;
  102570. begin
  102571. pTDefRegMap(@Self)^.clr := $00000020;
  102572. end;
  102573. procedure TCAN2_C2RXOVF.setRXOVF5(thebits : TBits_1); inline;
  102574. begin
  102575. if thebits = 0 then
  102576. pTDefRegMap(@Self)^.clr := $00000020
  102577. else
  102578. pTDefRegMap(@Self)^.&set := $00000020;
  102579. end;
  102580. function TCAN2_C2RXOVF.getRXOVF5 : TBits_1; inline;
  102581. begin
  102582. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  102583. end;
  102584. procedure TCAN2_C2RXOVF.setRXOVF6; inline;
  102585. begin
  102586. pTDefRegMap(@Self)^.&set := $00000040;
  102587. end;
  102588. procedure TCAN2_C2RXOVF.clearRXOVF6; inline;
  102589. begin
  102590. pTDefRegMap(@Self)^.clr := $00000040;
  102591. end;
  102592. procedure TCAN2_C2RXOVF.setRXOVF6(thebits : TBits_1); inline;
  102593. begin
  102594. if thebits = 0 then
  102595. pTDefRegMap(@Self)^.clr := $00000040
  102596. else
  102597. pTDefRegMap(@Self)^.&set := $00000040;
  102598. end;
  102599. function TCAN2_C2RXOVF.getRXOVF6 : TBits_1; inline;
  102600. begin
  102601. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  102602. end;
  102603. procedure TCAN2_C2RXOVF.setRXOVF7; inline;
  102604. begin
  102605. pTDefRegMap(@Self)^.&set := $00000080;
  102606. end;
  102607. procedure TCAN2_C2RXOVF.clearRXOVF7; inline;
  102608. begin
  102609. pTDefRegMap(@Self)^.clr := $00000080;
  102610. end;
  102611. procedure TCAN2_C2RXOVF.setRXOVF7(thebits : TBits_1); inline;
  102612. begin
  102613. if thebits = 0 then
  102614. pTDefRegMap(@Self)^.clr := $00000080
  102615. else
  102616. pTDefRegMap(@Self)^.&set := $00000080;
  102617. end;
  102618. function TCAN2_C2RXOVF.getRXOVF7 : TBits_1; inline;
  102619. begin
  102620. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  102621. end;
  102622. procedure TCAN2_C2RXOVF.setRXOVF8; inline;
  102623. begin
  102624. pTDefRegMap(@Self)^.&set := $00000100;
  102625. end;
  102626. procedure TCAN2_C2RXOVF.clearRXOVF8; inline;
  102627. begin
  102628. pTDefRegMap(@Self)^.clr := $00000100;
  102629. end;
  102630. procedure TCAN2_C2RXOVF.setRXOVF8(thebits : TBits_1); inline;
  102631. begin
  102632. if thebits = 0 then
  102633. pTDefRegMap(@Self)^.clr := $00000100
  102634. else
  102635. pTDefRegMap(@Self)^.&set := $00000100;
  102636. end;
  102637. function TCAN2_C2RXOVF.getRXOVF8 : TBits_1; inline;
  102638. begin
  102639. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  102640. end;
  102641. procedure TCAN2_C2RXOVF.setRXOVF9; inline;
  102642. begin
  102643. pTDefRegMap(@Self)^.&set := $00000200;
  102644. end;
  102645. procedure TCAN2_C2RXOVF.clearRXOVF9; inline;
  102646. begin
  102647. pTDefRegMap(@Self)^.clr := $00000200;
  102648. end;
  102649. procedure TCAN2_C2RXOVF.setRXOVF9(thebits : TBits_1); inline;
  102650. begin
  102651. if thebits = 0 then
  102652. pTDefRegMap(@Self)^.clr := $00000200
  102653. else
  102654. pTDefRegMap(@Self)^.&set := $00000200;
  102655. end;
  102656. function TCAN2_C2RXOVF.getRXOVF9 : TBits_1; inline;
  102657. begin
  102658. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  102659. end;
  102660. procedure TCAN2_C2RXOVF.setRXOVF10; inline;
  102661. begin
  102662. pTDefRegMap(@Self)^.&set := $00000400;
  102663. end;
  102664. procedure TCAN2_C2RXOVF.clearRXOVF10; inline;
  102665. begin
  102666. pTDefRegMap(@Self)^.clr := $00000400;
  102667. end;
  102668. procedure TCAN2_C2RXOVF.setRXOVF10(thebits : TBits_1); inline;
  102669. begin
  102670. if thebits = 0 then
  102671. pTDefRegMap(@Self)^.clr := $00000400
  102672. else
  102673. pTDefRegMap(@Self)^.&set := $00000400;
  102674. end;
  102675. function TCAN2_C2RXOVF.getRXOVF10 : TBits_1; inline;
  102676. begin
  102677. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  102678. end;
  102679. procedure TCAN2_C2RXOVF.setRXOVF11; inline;
  102680. begin
  102681. pTDefRegMap(@Self)^.&set := $00000800;
  102682. end;
  102683. procedure TCAN2_C2RXOVF.clearRXOVF11; inline;
  102684. begin
  102685. pTDefRegMap(@Self)^.clr := $00000800;
  102686. end;
  102687. procedure TCAN2_C2RXOVF.setRXOVF11(thebits : TBits_1); inline;
  102688. begin
  102689. if thebits = 0 then
  102690. pTDefRegMap(@Self)^.clr := $00000800
  102691. else
  102692. pTDefRegMap(@Self)^.&set := $00000800;
  102693. end;
  102694. function TCAN2_C2RXOVF.getRXOVF11 : TBits_1; inline;
  102695. begin
  102696. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  102697. end;
  102698. procedure TCAN2_C2RXOVF.setRXOVF12; inline;
  102699. begin
  102700. pTDefRegMap(@Self)^.&set := $00001000;
  102701. end;
  102702. procedure TCAN2_C2RXOVF.clearRXOVF12; inline;
  102703. begin
  102704. pTDefRegMap(@Self)^.clr := $00001000;
  102705. end;
  102706. procedure TCAN2_C2RXOVF.setRXOVF12(thebits : TBits_1); inline;
  102707. begin
  102708. if thebits = 0 then
  102709. pTDefRegMap(@Self)^.clr := $00001000
  102710. else
  102711. pTDefRegMap(@Self)^.&set := $00001000;
  102712. end;
  102713. function TCAN2_C2RXOVF.getRXOVF12 : TBits_1; inline;
  102714. begin
  102715. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  102716. end;
  102717. procedure TCAN2_C2RXOVF.setRXOVF13; inline;
  102718. begin
  102719. pTDefRegMap(@Self)^.&set := $00002000;
  102720. end;
  102721. procedure TCAN2_C2RXOVF.clearRXOVF13; inline;
  102722. begin
  102723. pTDefRegMap(@Self)^.clr := $00002000;
  102724. end;
  102725. procedure TCAN2_C2RXOVF.setRXOVF13(thebits : TBits_1); inline;
  102726. begin
  102727. if thebits = 0 then
  102728. pTDefRegMap(@Self)^.clr := $00002000
  102729. else
  102730. pTDefRegMap(@Self)^.&set := $00002000;
  102731. end;
  102732. function TCAN2_C2RXOVF.getRXOVF13 : TBits_1; inline;
  102733. begin
  102734. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  102735. end;
  102736. procedure TCAN2_C2RXOVF.setRXOVF14; inline;
  102737. begin
  102738. pTDefRegMap(@Self)^.&set := $00004000;
  102739. end;
  102740. procedure TCAN2_C2RXOVF.clearRXOVF14; inline;
  102741. begin
  102742. pTDefRegMap(@Self)^.clr := $00004000;
  102743. end;
  102744. procedure TCAN2_C2RXOVF.setRXOVF14(thebits : TBits_1); inline;
  102745. begin
  102746. if thebits = 0 then
  102747. pTDefRegMap(@Self)^.clr := $00004000
  102748. else
  102749. pTDefRegMap(@Self)^.&set := $00004000;
  102750. end;
  102751. function TCAN2_C2RXOVF.getRXOVF14 : TBits_1; inline;
  102752. begin
  102753. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  102754. end;
  102755. procedure TCAN2_C2RXOVF.setRXOVF15; inline;
  102756. begin
  102757. pTDefRegMap(@Self)^.&set := $00008000;
  102758. end;
  102759. procedure TCAN2_C2RXOVF.clearRXOVF15; inline;
  102760. begin
  102761. pTDefRegMap(@Self)^.clr := $00008000;
  102762. end;
  102763. procedure TCAN2_C2RXOVF.setRXOVF15(thebits : TBits_1); inline;
  102764. begin
  102765. if thebits = 0 then
  102766. pTDefRegMap(@Self)^.clr := $00008000
  102767. else
  102768. pTDefRegMap(@Self)^.&set := $00008000;
  102769. end;
  102770. function TCAN2_C2RXOVF.getRXOVF15 : TBits_1; inline;
  102771. begin
  102772. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  102773. end;
  102774. procedure TCAN2_C2RXOVF.setRXOVF16; inline;
  102775. begin
  102776. pTDefRegMap(@Self)^.&set := $00010000;
  102777. end;
  102778. procedure TCAN2_C2RXOVF.clearRXOVF16; inline;
  102779. begin
  102780. pTDefRegMap(@Self)^.clr := $00010000;
  102781. end;
  102782. procedure TCAN2_C2RXOVF.setRXOVF16(thebits : TBits_1); inline;
  102783. begin
  102784. if thebits = 0 then
  102785. pTDefRegMap(@Self)^.clr := $00010000
  102786. else
  102787. pTDefRegMap(@Self)^.&set := $00010000;
  102788. end;
  102789. function TCAN2_C2RXOVF.getRXOVF16 : TBits_1; inline;
  102790. begin
  102791. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  102792. end;
  102793. procedure TCAN2_C2RXOVF.setRXOVF17; inline;
  102794. begin
  102795. pTDefRegMap(@Self)^.&set := $00020000;
  102796. end;
  102797. procedure TCAN2_C2RXOVF.clearRXOVF17; inline;
  102798. begin
  102799. pTDefRegMap(@Self)^.clr := $00020000;
  102800. end;
  102801. procedure TCAN2_C2RXOVF.setRXOVF17(thebits : TBits_1); inline;
  102802. begin
  102803. if thebits = 0 then
  102804. pTDefRegMap(@Self)^.clr := $00020000
  102805. else
  102806. pTDefRegMap(@Self)^.&set := $00020000;
  102807. end;
  102808. function TCAN2_C2RXOVF.getRXOVF17 : TBits_1; inline;
  102809. begin
  102810. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  102811. end;
  102812. procedure TCAN2_C2RXOVF.setRXOVF18; inline;
  102813. begin
  102814. pTDefRegMap(@Self)^.&set := $00040000;
  102815. end;
  102816. procedure TCAN2_C2RXOVF.clearRXOVF18; inline;
  102817. begin
  102818. pTDefRegMap(@Self)^.clr := $00040000;
  102819. end;
  102820. procedure TCAN2_C2RXOVF.setRXOVF18(thebits : TBits_1); inline;
  102821. begin
  102822. if thebits = 0 then
  102823. pTDefRegMap(@Self)^.clr := $00040000
  102824. else
  102825. pTDefRegMap(@Self)^.&set := $00040000;
  102826. end;
  102827. function TCAN2_C2RXOVF.getRXOVF18 : TBits_1; inline;
  102828. begin
  102829. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  102830. end;
  102831. procedure TCAN2_C2RXOVF.setRXOVF19; inline;
  102832. begin
  102833. pTDefRegMap(@Self)^.&set := $00080000;
  102834. end;
  102835. procedure TCAN2_C2RXOVF.clearRXOVF19; inline;
  102836. begin
  102837. pTDefRegMap(@Self)^.clr := $00080000;
  102838. end;
  102839. procedure TCAN2_C2RXOVF.setRXOVF19(thebits : TBits_1); inline;
  102840. begin
  102841. if thebits = 0 then
  102842. pTDefRegMap(@Self)^.clr := $00080000
  102843. else
  102844. pTDefRegMap(@Self)^.&set := $00080000;
  102845. end;
  102846. function TCAN2_C2RXOVF.getRXOVF19 : TBits_1; inline;
  102847. begin
  102848. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  102849. end;
  102850. procedure TCAN2_C2RXOVF.setRXOVF20; inline;
  102851. begin
  102852. pTDefRegMap(@Self)^.&set := $00100000;
  102853. end;
  102854. procedure TCAN2_C2RXOVF.clearRXOVF20; inline;
  102855. begin
  102856. pTDefRegMap(@Self)^.clr := $00100000;
  102857. end;
  102858. procedure TCAN2_C2RXOVF.setRXOVF20(thebits : TBits_1); inline;
  102859. begin
  102860. if thebits = 0 then
  102861. pTDefRegMap(@Self)^.clr := $00100000
  102862. else
  102863. pTDefRegMap(@Self)^.&set := $00100000;
  102864. end;
  102865. function TCAN2_C2RXOVF.getRXOVF20 : TBits_1; inline;
  102866. begin
  102867. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  102868. end;
  102869. procedure TCAN2_C2RXOVF.setRXOVF21; inline;
  102870. begin
  102871. pTDefRegMap(@Self)^.&set := $00200000;
  102872. end;
  102873. procedure TCAN2_C2RXOVF.clearRXOVF21; inline;
  102874. begin
  102875. pTDefRegMap(@Self)^.clr := $00200000;
  102876. end;
  102877. procedure TCAN2_C2RXOVF.setRXOVF21(thebits : TBits_1); inline;
  102878. begin
  102879. if thebits = 0 then
  102880. pTDefRegMap(@Self)^.clr := $00200000
  102881. else
  102882. pTDefRegMap(@Self)^.&set := $00200000;
  102883. end;
  102884. function TCAN2_C2RXOVF.getRXOVF21 : TBits_1; inline;
  102885. begin
  102886. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  102887. end;
  102888. procedure TCAN2_C2RXOVF.setRXOVF22; inline;
  102889. begin
  102890. pTDefRegMap(@Self)^.&set := $00400000;
  102891. end;
  102892. procedure TCAN2_C2RXOVF.clearRXOVF22; inline;
  102893. begin
  102894. pTDefRegMap(@Self)^.clr := $00400000;
  102895. end;
  102896. procedure TCAN2_C2RXOVF.setRXOVF22(thebits : TBits_1); inline;
  102897. begin
  102898. if thebits = 0 then
  102899. pTDefRegMap(@Self)^.clr := $00400000
  102900. else
  102901. pTDefRegMap(@Self)^.&set := $00400000;
  102902. end;
  102903. function TCAN2_C2RXOVF.getRXOVF22 : TBits_1; inline;
  102904. begin
  102905. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  102906. end;
  102907. procedure TCAN2_C2RXOVF.setRXOVF23; inline;
  102908. begin
  102909. pTDefRegMap(@Self)^.&set := $00800000;
  102910. end;
  102911. procedure TCAN2_C2RXOVF.clearRXOVF23; inline;
  102912. begin
  102913. pTDefRegMap(@Self)^.clr := $00800000;
  102914. end;
  102915. procedure TCAN2_C2RXOVF.setRXOVF23(thebits : TBits_1); inline;
  102916. begin
  102917. if thebits = 0 then
  102918. pTDefRegMap(@Self)^.clr := $00800000
  102919. else
  102920. pTDefRegMap(@Self)^.&set := $00800000;
  102921. end;
  102922. function TCAN2_C2RXOVF.getRXOVF23 : TBits_1; inline;
  102923. begin
  102924. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  102925. end;
  102926. procedure TCAN2_C2RXOVF.setRXOVF24; inline;
  102927. begin
  102928. pTDefRegMap(@Self)^.&set := $01000000;
  102929. end;
  102930. procedure TCAN2_C2RXOVF.clearRXOVF24; inline;
  102931. begin
  102932. pTDefRegMap(@Self)^.clr := $01000000;
  102933. end;
  102934. procedure TCAN2_C2RXOVF.setRXOVF24(thebits : TBits_1); inline;
  102935. begin
  102936. if thebits = 0 then
  102937. pTDefRegMap(@Self)^.clr := $01000000
  102938. else
  102939. pTDefRegMap(@Self)^.&set := $01000000;
  102940. end;
  102941. function TCAN2_C2RXOVF.getRXOVF24 : TBits_1; inline;
  102942. begin
  102943. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  102944. end;
  102945. procedure TCAN2_C2RXOVF.setRXOVF25; inline;
  102946. begin
  102947. pTDefRegMap(@Self)^.&set := $02000000;
  102948. end;
  102949. procedure TCAN2_C2RXOVF.clearRXOVF25; inline;
  102950. begin
  102951. pTDefRegMap(@Self)^.clr := $02000000;
  102952. end;
  102953. procedure TCAN2_C2RXOVF.setRXOVF25(thebits : TBits_1); inline;
  102954. begin
  102955. if thebits = 0 then
  102956. pTDefRegMap(@Self)^.clr := $02000000
  102957. else
  102958. pTDefRegMap(@Self)^.&set := $02000000;
  102959. end;
  102960. function TCAN2_C2RXOVF.getRXOVF25 : TBits_1; inline;
  102961. begin
  102962. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  102963. end;
  102964. procedure TCAN2_C2RXOVF.setRXOVF26; inline;
  102965. begin
  102966. pTDefRegMap(@Self)^.&set := $04000000;
  102967. end;
  102968. procedure TCAN2_C2RXOVF.clearRXOVF26; inline;
  102969. begin
  102970. pTDefRegMap(@Self)^.clr := $04000000;
  102971. end;
  102972. procedure TCAN2_C2RXOVF.setRXOVF26(thebits : TBits_1); inline;
  102973. begin
  102974. if thebits = 0 then
  102975. pTDefRegMap(@Self)^.clr := $04000000
  102976. else
  102977. pTDefRegMap(@Self)^.&set := $04000000;
  102978. end;
  102979. function TCAN2_C2RXOVF.getRXOVF26 : TBits_1; inline;
  102980. begin
  102981. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  102982. end;
  102983. procedure TCAN2_C2RXOVF.setRXOVF27; inline;
  102984. begin
  102985. pTDefRegMap(@Self)^.&set := $08000000;
  102986. end;
  102987. procedure TCAN2_C2RXOVF.clearRXOVF27; inline;
  102988. begin
  102989. pTDefRegMap(@Self)^.clr := $08000000;
  102990. end;
  102991. procedure TCAN2_C2RXOVF.setRXOVF27(thebits : TBits_1); inline;
  102992. begin
  102993. if thebits = 0 then
  102994. pTDefRegMap(@Self)^.clr := $08000000
  102995. else
  102996. pTDefRegMap(@Self)^.&set := $08000000;
  102997. end;
  102998. function TCAN2_C2RXOVF.getRXOVF27 : TBits_1; inline;
  102999. begin
  103000. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  103001. end;
  103002. procedure TCAN2_C2RXOVF.setRXOVF28; inline;
  103003. begin
  103004. pTDefRegMap(@Self)^.&set := $10000000;
  103005. end;
  103006. procedure TCAN2_C2RXOVF.clearRXOVF28; inline;
  103007. begin
  103008. pTDefRegMap(@Self)^.clr := $10000000;
  103009. end;
  103010. procedure TCAN2_C2RXOVF.setRXOVF28(thebits : TBits_1); inline;
  103011. begin
  103012. if thebits = 0 then
  103013. pTDefRegMap(@Self)^.clr := $10000000
  103014. else
  103015. pTDefRegMap(@Self)^.&set := $10000000;
  103016. end;
  103017. function TCAN2_C2RXOVF.getRXOVF28 : TBits_1; inline;
  103018. begin
  103019. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  103020. end;
  103021. procedure TCAN2_C2RXOVF.setRXOVF29; inline;
  103022. begin
  103023. pTDefRegMap(@Self)^.&set := $20000000;
  103024. end;
  103025. procedure TCAN2_C2RXOVF.clearRXOVF29; inline;
  103026. begin
  103027. pTDefRegMap(@Self)^.clr := $20000000;
  103028. end;
  103029. procedure TCAN2_C2RXOVF.setRXOVF29(thebits : TBits_1); inline;
  103030. begin
  103031. if thebits = 0 then
  103032. pTDefRegMap(@Self)^.clr := $20000000
  103033. else
  103034. pTDefRegMap(@Self)^.&set := $20000000;
  103035. end;
  103036. function TCAN2_C2RXOVF.getRXOVF29 : TBits_1; inline;
  103037. begin
  103038. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  103039. end;
  103040. procedure TCAN2_C2RXOVF.setRXOVF30; inline;
  103041. begin
  103042. pTDefRegMap(@Self)^.&set := $40000000;
  103043. end;
  103044. procedure TCAN2_C2RXOVF.clearRXOVF30; inline;
  103045. begin
  103046. pTDefRegMap(@Self)^.clr := $40000000;
  103047. end;
  103048. procedure TCAN2_C2RXOVF.setRXOVF30(thebits : TBits_1); inline;
  103049. begin
  103050. if thebits = 0 then
  103051. pTDefRegMap(@Self)^.clr := $40000000
  103052. else
  103053. pTDefRegMap(@Self)^.&set := $40000000;
  103054. end;
  103055. function TCAN2_C2RXOVF.getRXOVF30 : TBits_1; inline;
  103056. begin
  103057. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  103058. end;
  103059. procedure TCAN2_C2RXOVF.setRXOVF31; inline;
  103060. begin
  103061. pTDefRegMap(@Self)^.&set := $80000000;
  103062. end;
  103063. procedure TCAN2_C2RXOVF.clearRXOVF31; inline;
  103064. begin
  103065. pTDefRegMap(@Self)^.clr := $80000000;
  103066. end;
  103067. procedure TCAN2_C2RXOVF.setRXOVF31(thebits : TBits_1); inline;
  103068. begin
  103069. if thebits = 0 then
  103070. pTDefRegMap(@Self)^.clr := $80000000
  103071. else
  103072. pTDefRegMap(@Self)^.&set := $80000000;
  103073. end;
  103074. function TCAN2_C2RXOVF.getRXOVF31 : TBits_1; inline;
  103075. begin
  103076. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  103077. end;
  103078. procedure TCAN2_C2RXOVF.setw(thebits : TBits_32); inline;
  103079. begin
  103080. pTDefRegMap(@Self)^.val := thebits;
  103081. end;
  103082. function TCAN2_C2RXOVF.getw : TBits_32; inline;
  103083. begin
  103084. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103085. end;
  103086. procedure TCAN2_C2TMR.setCANTSPRE(thebits : TBits_16); inline;
  103087. begin
  103088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  103089. end;
  103090. function TCAN2_C2TMR.getCANTSPRE : TBits_16; inline;
  103091. begin
  103092. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  103093. end;
  103094. procedure TCAN2_C2TMR.setCANTS(thebits : TBits_16); inline;
  103095. begin
  103096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  103097. end;
  103098. function TCAN2_C2TMR.getCANTS : TBits_16; inline;
  103099. begin
  103100. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  103101. end;
  103102. procedure TCAN2_C2TMR.setw(thebits : TBits_32); inline;
  103103. begin
  103104. pTDefRegMap(@Self)^.val := thebits;
  103105. end;
  103106. function TCAN2_C2TMR.getw : TBits_32; inline;
  103107. begin
  103108. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103109. end;
  103110. procedure TCAN2_C2RXM0.setEID(thebits : TBits_18); inline;
  103111. begin
  103112. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  103113. end;
  103114. function TCAN2_C2RXM0.getEID : TBits_18; inline;
  103115. begin
  103116. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  103117. end;
  103118. procedure TCAN2_C2RXM0.setMIDE; inline;
  103119. begin
  103120. pTDefRegMap(@Self)^.&set := $00080000;
  103121. end;
  103122. procedure TCAN2_C2RXM0.clearMIDE; inline;
  103123. begin
  103124. pTDefRegMap(@Self)^.clr := $00080000;
  103125. end;
  103126. procedure TCAN2_C2RXM0.setMIDE(thebits : TBits_1); inline;
  103127. begin
  103128. if thebits = 0 then
  103129. pTDefRegMap(@Self)^.clr := $00080000
  103130. else
  103131. pTDefRegMap(@Self)^.&set := $00080000;
  103132. end;
  103133. function TCAN2_C2RXM0.getMIDE : TBits_1; inline;
  103134. begin
  103135. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103136. end;
  103137. procedure TCAN2_C2RXM0.setSID(thebits : TBits_11); inline;
  103138. begin
  103139. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  103140. end;
  103141. function TCAN2_C2RXM0.getSID : TBits_11; inline;
  103142. begin
  103143. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  103144. end;
  103145. procedure TCAN2_C2RXM0.setw(thebits : TBits_32); inline;
  103146. begin
  103147. pTDefRegMap(@Self)^.val := thebits;
  103148. end;
  103149. function TCAN2_C2RXM0.getw : TBits_32; inline;
  103150. begin
  103151. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103152. end;
  103153. procedure TCAN2_C2RXM1.setEID(thebits : TBits_18); inline;
  103154. begin
  103155. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  103156. end;
  103157. function TCAN2_C2RXM1.getEID : TBits_18; inline;
  103158. begin
  103159. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  103160. end;
  103161. procedure TCAN2_C2RXM1.setMIDE; inline;
  103162. begin
  103163. pTDefRegMap(@Self)^.&set := $00080000;
  103164. end;
  103165. procedure TCAN2_C2RXM1.clearMIDE; inline;
  103166. begin
  103167. pTDefRegMap(@Self)^.clr := $00080000;
  103168. end;
  103169. procedure TCAN2_C2RXM1.setMIDE(thebits : TBits_1); inline;
  103170. begin
  103171. if thebits = 0 then
  103172. pTDefRegMap(@Self)^.clr := $00080000
  103173. else
  103174. pTDefRegMap(@Self)^.&set := $00080000;
  103175. end;
  103176. function TCAN2_C2RXM1.getMIDE : TBits_1; inline;
  103177. begin
  103178. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103179. end;
  103180. procedure TCAN2_C2RXM1.setSID(thebits : TBits_11); inline;
  103181. begin
  103182. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  103183. end;
  103184. function TCAN2_C2RXM1.getSID : TBits_11; inline;
  103185. begin
  103186. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  103187. end;
  103188. procedure TCAN2_C2RXM1.setw(thebits : TBits_32); inline;
  103189. begin
  103190. pTDefRegMap(@Self)^.val := thebits;
  103191. end;
  103192. function TCAN2_C2RXM1.getw : TBits_32; inline;
  103193. begin
  103194. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103195. end;
  103196. procedure TCAN2_C2RXM2.setEID(thebits : TBits_18); inline;
  103197. begin
  103198. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  103199. end;
  103200. function TCAN2_C2RXM2.getEID : TBits_18; inline;
  103201. begin
  103202. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  103203. end;
  103204. procedure TCAN2_C2RXM2.setMIDE; inline;
  103205. begin
  103206. pTDefRegMap(@Self)^.&set := $00080000;
  103207. end;
  103208. procedure TCAN2_C2RXM2.clearMIDE; inline;
  103209. begin
  103210. pTDefRegMap(@Self)^.clr := $00080000;
  103211. end;
  103212. procedure TCAN2_C2RXM2.setMIDE(thebits : TBits_1); inline;
  103213. begin
  103214. if thebits = 0 then
  103215. pTDefRegMap(@Self)^.clr := $00080000
  103216. else
  103217. pTDefRegMap(@Self)^.&set := $00080000;
  103218. end;
  103219. function TCAN2_C2RXM2.getMIDE : TBits_1; inline;
  103220. begin
  103221. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103222. end;
  103223. procedure TCAN2_C2RXM2.setSID(thebits : TBits_11); inline;
  103224. begin
  103225. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  103226. end;
  103227. function TCAN2_C2RXM2.getSID : TBits_11; inline;
  103228. begin
  103229. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  103230. end;
  103231. procedure TCAN2_C2RXM2.setw(thebits : TBits_32); inline;
  103232. begin
  103233. pTDefRegMap(@Self)^.val := thebits;
  103234. end;
  103235. function TCAN2_C2RXM2.getw : TBits_32; inline;
  103236. begin
  103237. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103238. end;
  103239. procedure TCAN2_C2RXM3.setEID(thebits : TBits_18); inline;
  103240. begin
  103241. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  103242. end;
  103243. function TCAN2_C2RXM3.getEID : TBits_18; inline;
  103244. begin
  103245. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  103246. end;
  103247. procedure TCAN2_C2RXM3.setMIDE; inline;
  103248. begin
  103249. pTDefRegMap(@Self)^.&set := $00080000;
  103250. end;
  103251. procedure TCAN2_C2RXM3.clearMIDE; inline;
  103252. begin
  103253. pTDefRegMap(@Self)^.clr := $00080000;
  103254. end;
  103255. procedure TCAN2_C2RXM3.setMIDE(thebits : TBits_1); inline;
  103256. begin
  103257. if thebits = 0 then
  103258. pTDefRegMap(@Self)^.clr := $00080000
  103259. else
  103260. pTDefRegMap(@Self)^.&set := $00080000;
  103261. end;
  103262. function TCAN2_C2RXM3.getMIDE : TBits_1; inline;
  103263. begin
  103264. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103265. end;
  103266. procedure TCAN2_C2RXM3.setSID(thebits : TBits_11); inline;
  103267. begin
  103268. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  103269. end;
  103270. function TCAN2_C2RXM3.getSID : TBits_11; inline;
  103271. begin
  103272. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  103273. end;
  103274. procedure TCAN2_C2RXM3.setw(thebits : TBits_32); inline;
  103275. begin
  103276. pTDefRegMap(@Self)^.val := thebits;
  103277. end;
  103278. function TCAN2_C2RXM3.getw : TBits_32; inline;
  103279. begin
  103280. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103281. end;
  103282. procedure TCAN2_C2FLTCON0.setFSEL0(thebits : TBits_5); inline;
  103283. begin
  103284. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103285. end;
  103286. function TCAN2_C2FLTCON0.getFSEL0 : TBits_5; inline;
  103287. begin
  103288. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103289. end;
  103290. procedure TCAN2_C2FLTCON0.setMSEL0(thebits : TBits_2); inline;
  103291. begin
  103292. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  103293. end;
  103294. function TCAN2_C2FLTCON0.getMSEL0 : TBits_2; inline;
  103295. begin
  103296. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  103297. end;
  103298. procedure TCAN2_C2FLTCON0.setFLTEN0; inline;
  103299. begin
  103300. pTDefRegMap(@Self)^.&set := $00000080;
  103301. end;
  103302. procedure TCAN2_C2FLTCON0.clearFLTEN0; inline;
  103303. begin
  103304. pTDefRegMap(@Self)^.clr := $00000080;
  103305. end;
  103306. procedure TCAN2_C2FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  103307. begin
  103308. if thebits = 0 then
  103309. pTDefRegMap(@Self)^.clr := $00000080
  103310. else
  103311. pTDefRegMap(@Self)^.&set := $00000080;
  103312. end;
  103313. function TCAN2_C2FLTCON0.getFLTEN0 : TBits_1; inline;
  103314. begin
  103315. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103316. end;
  103317. procedure TCAN2_C2FLTCON0.setFSEL1(thebits : TBits_5); inline;
  103318. begin
  103319. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  103320. end;
  103321. function TCAN2_C2FLTCON0.getFSEL1 : TBits_5; inline;
  103322. begin
  103323. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  103324. end;
  103325. procedure TCAN2_C2FLTCON0.setMSEL1(thebits : TBits_2); inline;
  103326. begin
  103327. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  103328. end;
  103329. function TCAN2_C2FLTCON0.getMSEL1 : TBits_2; inline;
  103330. begin
  103331. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  103332. end;
  103333. procedure TCAN2_C2FLTCON0.setFLTEN1; inline;
  103334. begin
  103335. pTDefRegMap(@Self)^.&set := $00008000;
  103336. end;
  103337. procedure TCAN2_C2FLTCON0.clearFLTEN1; inline;
  103338. begin
  103339. pTDefRegMap(@Self)^.clr := $00008000;
  103340. end;
  103341. procedure TCAN2_C2FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  103342. begin
  103343. if thebits = 0 then
  103344. pTDefRegMap(@Self)^.clr := $00008000
  103345. else
  103346. pTDefRegMap(@Self)^.&set := $00008000;
  103347. end;
  103348. function TCAN2_C2FLTCON0.getFLTEN1 : TBits_1; inline;
  103349. begin
  103350. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  103351. end;
  103352. procedure TCAN2_C2FLTCON0.setFSEL2(thebits : TBits_5); inline;
  103353. begin
  103354. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103355. end;
  103356. function TCAN2_C2FLTCON0.getFSEL2 : TBits_5; inline;
  103357. begin
  103358. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103359. end;
  103360. procedure TCAN2_C2FLTCON0.setMSEL2(thebits : TBits_2); inline;
  103361. begin
  103362. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  103363. end;
  103364. function TCAN2_C2FLTCON0.getMSEL2 : TBits_2; inline;
  103365. begin
  103366. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  103367. end;
  103368. procedure TCAN2_C2FLTCON0.setFLTEN2; inline;
  103369. begin
  103370. pTDefRegMap(@Self)^.&set := $00800000;
  103371. end;
  103372. procedure TCAN2_C2FLTCON0.clearFLTEN2; inline;
  103373. begin
  103374. pTDefRegMap(@Self)^.clr := $00800000;
  103375. end;
  103376. procedure TCAN2_C2FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  103377. begin
  103378. if thebits = 0 then
  103379. pTDefRegMap(@Self)^.clr := $00800000
  103380. else
  103381. pTDefRegMap(@Self)^.&set := $00800000;
  103382. end;
  103383. function TCAN2_C2FLTCON0.getFLTEN2 : TBits_1; inline;
  103384. begin
  103385. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  103386. end;
  103387. procedure TCAN2_C2FLTCON0.setFSEL3(thebits : TBits_5); inline;
  103388. begin
  103389. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  103390. end;
  103391. function TCAN2_C2FLTCON0.getFSEL3 : TBits_5; inline;
  103392. begin
  103393. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  103394. end;
  103395. procedure TCAN2_C2FLTCON0.setMSEL3(thebits : TBits_2); inline;
  103396. begin
  103397. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  103398. end;
  103399. function TCAN2_C2FLTCON0.getMSEL3 : TBits_2; inline;
  103400. begin
  103401. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  103402. end;
  103403. procedure TCAN2_C2FLTCON0.setFLTEN3; inline;
  103404. begin
  103405. pTDefRegMap(@Self)^.&set := $80000000;
  103406. end;
  103407. procedure TCAN2_C2FLTCON0.clearFLTEN3; inline;
  103408. begin
  103409. pTDefRegMap(@Self)^.clr := $80000000;
  103410. end;
  103411. procedure TCAN2_C2FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  103412. begin
  103413. if thebits = 0 then
  103414. pTDefRegMap(@Self)^.clr := $80000000
  103415. else
  103416. pTDefRegMap(@Self)^.&set := $80000000;
  103417. end;
  103418. function TCAN2_C2FLTCON0.getFLTEN3 : TBits_1; inline;
  103419. begin
  103420. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  103421. end;
  103422. procedure TCAN2_C2FLTCON0.setw(thebits : TBits_32); inline;
  103423. begin
  103424. pTDefRegMap(@Self)^.val := thebits;
  103425. end;
  103426. function TCAN2_C2FLTCON0.getw : TBits_32; inline;
  103427. begin
  103428. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103429. end;
  103430. procedure TCAN2_C2FLTCON1.setFSEL4(thebits : TBits_5); inline;
  103431. begin
  103432. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103433. end;
  103434. function TCAN2_C2FLTCON1.getFSEL4 : TBits_5; inline;
  103435. begin
  103436. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103437. end;
  103438. procedure TCAN2_C2FLTCON1.setMSEL4(thebits : TBits_2); inline;
  103439. begin
  103440. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  103441. end;
  103442. function TCAN2_C2FLTCON1.getMSEL4 : TBits_2; inline;
  103443. begin
  103444. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  103445. end;
  103446. procedure TCAN2_C2FLTCON1.setFLTEN4; inline;
  103447. begin
  103448. pTDefRegMap(@Self)^.&set := $00000080;
  103449. end;
  103450. procedure TCAN2_C2FLTCON1.clearFLTEN4; inline;
  103451. begin
  103452. pTDefRegMap(@Self)^.clr := $00000080;
  103453. end;
  103454. procedure TCAN2_C2FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  103455. begin
  103456. if thebits = 0 then
  103457. pTDefRegMap(@Self)^.clr := $00000080
  103458. else
  103459. pTDefRegMap(@Self)^.&set := $00000080;
  103460. end;
  103461. function TCAN2_C2FLTCON1.getFLTEN4 : TBits_1; inline;
  103462. begin
  103463. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103464. end;
  103465. procedure TCAN2_C2FLTCON1.setFSEL5(thebits : TBits_5); inline;
  103466. begin
  103467. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  103468. end;
  103469. function TCAN2_C2FLTCON1.getFSEL5 : TBits_5; inline;
  103470. begin
  103471. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  103472. end;
  103473. procedure TCAN2_C2FLTCON1.setMSEL5(thebits : TBits_2); inline;
  103474. begin
  103475. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  103476. end;
  103477. function TCAN2_C2FLTCON1.getMSEL5 : TBits_2; inline;
  103478. begin
  103479. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  103480. end;
  103481. procedure TCAN2_C2FLTCON1.setFLTEN5; inline;
  103482. begin
  103483. pTDefRegMap(@Self)^.&set := $00008000;
  103484. end;
  103485. procedure TCAN2_C2FLTCON1.clearFLTEN5; inline;
  103486. begin
  103487. pTDefRegMap(@Self)^.clr := $00008000;
  103488. end;
  103489. procedure TCAN2_C2FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  103490. begin
  103491. if thebits = 0 then
  103492. pTDefRegMap(@Self)^.clr := $00008000
  103493. else
  103494. pTDefRegMap(@Self)^.&set := $00008000;
  103495. end;
  103496. function TCAN2_C2FLTCON1.getFLTEN5 : TBits_1; inline;
  103497. begin
  103498. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  103499. end;
  103500. procedure TCAN2_C2FLTCON1.setFSEL6(thebits : TBits_5); inline;
  103501. begin
  103502. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103503. end;
  103504. function TCAN2_C2FLTCON1.getFSEL6 : TBits_5; inline;
  103505. begin
  103506. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103507. end;
  103508. procedure TCAN2_C2FLTCON1.setMSEL6(thebits : TBits_2); inline;
  103509. begin
  103510. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  103511. end;
  103512. function TCAN2_C2FLTCON1.getMSEL6 : TBits_2; inline;
  103513. begin
  103514. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  103515. end;
  103516. procedure TCAN2_C2FLTCON1.setFLTEN6; inline;
  103517. begin
  103518. pTDefRegMap(@Self)^.&set := $00800000;
  103519. end;
  103520. procedure TCAN2_C2FLTCON1.clearFLTEN6; inline;
  103521. begin
  103522. pTDefRegMap(@Self)^.clr := $00800000;
  103523. end;
  103524. procedure TCAN2_C2FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  103525. begin
  103526. if thebits = 0 then
  103527. pTDefRegMap(@Self)^.clr := $00800000
  103528. else
  103529. pTDefRegMap(@Self)^.&set := $00800000;
  103530. end;
  103531. function TCAN2_C2FLTCON1.getFLTEN6 : TBits_1; inline;
  103532. begin
  103533. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  103534. end;
  103535. procedure TCAN2_C2FLTCON1.setFSEL7(thebits : TBits_5); inline;
  103536. begin
  103537. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  103538. end;
  103539. function TCAN2_C2FLTCON1.getFSEL7 : TBits_5; inline;
  103540. begin
  103541. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  103542. end;
  103543. procedure TCAN2_C2FLTCON1.setMSEL7(thebits : TBits_2); inline;
  103544. begin
  103545. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  103546. end;
  103547. function TCAN2_C2FLTCON1.getMSEL7 : TBits_2; inline;
  103548. begin
  103549. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  103550. end;
  103551. procedure TCAN2_C2FLTCON1.setFLTEN7; inline;
  103552. begin
  103553. pTDefRegMap(@Self)^.&set := $80000000;
  103554. end;
  103555. procedure TCAN2_C2FLTCON1.clearFLTEN7; inline;
  103556. begin
  103557. pTDefRegMap(@Self)^.clr := $80000000;
  103558. end;
  103559. procedure TCAN2_C2FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  103560. begin
  103561. if thebits = 0 then
  103562. pTDefRegMap(@Self)^.clr := $80000000
  103563. else
  103564. pTDefRegMap(@Self)^.&set := $80000000;
  103565. end;
  103566. function TCAN2_C2FLTCON1.getFLTEN7 : TBits_1; inline;
  103567. begin
  103568. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  103569. end;
  103570. procedure TCAN2_C2FLTCON1.setw(thebits : TBits_32); inline;
  103571. begin
  103572. pTDefRegMap(@Self)^.val := thebits;
  103573. end;
  103574. function TCAN2_C2FLTCON1.getw : TBits_32; inline;
  103575. begin
  103576. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103577. end;
  103578. procedure TCAN2_C2FLTCON2.setFSEL8(thebits : TBits_5); inline;
  103579. begin
  103580. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103581. end;
  103582. function TCAN2_C2FLTCON2.getFSEL8 : TBits_5; inline;
  103583. begin
  103584. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103585. end;
  103586. procedure TCAN2_C2FLTCON2.setMSEL8(thebits : TBits_2); inline;
  103587. begin
  103588. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  103589. end;
  103590. function TCAN2_C2FLTCON2.getMSEL8 : TBits_2; inline;
  103591. begin
  103592. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  103593. end;
  103594. procedure TCAN2_C2FLTCON2.setFLTEN8; inline;
  103595. begin
  103596. pTDefRegMap(@Self)^.&set := $00000080;
  103597. end;
  103598. procedure TCAN2_C2FLTCON2.clearFLTEN8; inline;
  103599. begin
  103600. pTDefRegMap(@Self)^.clr := $00000080;
  103601. end;
  103602. procedure TCAN2_C2FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  103603. begin
  103604. if thebits = 0 then
  103605. pTDefRegMap(@Self)^.clr := $00000080
  103606. else
  103607. pTDefRegMap(@Self)^.&set := $00000080;
  103608. end;
  103609. function TCAN2_C2FLTCON2.getFLTEN8 : TBits_1; inline;
  103610. begin
  103611. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103612. end;
  103613. procedure TCAN2_C2FLTCON2.setFSEL9(thebits : TBits_5); inline;
  103614. begin
  103615. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  103616. end;
  103617. function TCAN2_C2FLTCON2.getFSEL9 : TBits_5; inline;
  103618. begin
  103619. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  103620. end;
  103621. procedure TCAN2_C2FLTCON2.setMSEL9(thebits : TBits_2); inline;
  103622. begin
  103623. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  103624. end;
  103625. function TCAN2_C2FLTCON2.getMSEL9 : TBits_2; inline;
  103626. begin
  103627. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  103628. end;
  103629. procedure TCAN2_C2FLTCON2.setFLTEN9; inline;
  103630. begin
  103631. pTDefRegMap(@Self)^.&set := $00008000;
  103632. end;
  103633. procedure TCAN2_C2FLTCON2.clearFLTEN9; inline;
  103634. begin
  103635. pTDefRegMap(@Self)^.clr := $00008000;
  103636. end;
  103637. procedure TCAN2_C2FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  103638. begin
  103639. if thebits = 0 then
  103640. pTDefRegMap(@Self)^.clr := $00008000
  103641. else
  103642. pTDefRegMap(@Self)^.&set := $00008000;
  103643. end;
  103644. function TCAN2_C2FLTCON2.getFLTEN9 : TBits_1; inline;
  103645. begin
  103646. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  103647. end;
  103648. procedure TCAN2_C2FLTCON2.setFSEL10(thebits : TBits_5); inline;
  103649. begin
  103650. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103651. end;
  103652. function TCAN2_C2FLTCON2.getFSEL10 : TBits_5; inline;
  103653. begin
  103654. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103655. end;
  103656. procedure TCAN2_C2FLTCON2.setMSEL10(thebits : TBits_2); inline;
  103657. begin
  103658. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  103659. end;
  103660. function TCAN2_C2FLTCON2.getMSEL10 : TBits_2; inline;
  103661. begin
  103662. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  103663. end;
  103664. procedure TCAN2_C2FLTCON2.setFLTEN10; inline;
  103665. begin
  103666. pTDefRegMap(@Self)^.&set := $00800000;
  103667. end;
  103668. procedure TCAN2_C2FLTCON2.clearFLTEN10; inline;
  103669. begin
  103670. pTDefRegMap(@Self)^.clr := $00800000;
  103671. end;
  103672. procedure TCAN2_C2FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  103673. begin
  103674. if thebits = 0 then
  103675. pTDefRegMap(@Self)^.clr := $00800000
  103676. else
  103677. pTDefRegMap(@Self)^.&set := $00800000;
  103678. end;
  103679. function TCAN2_C2FLTCON2.getFLTEN10 : TBits_1; inline;
  103680. begin
  103681. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  103682. end;
  103683. procedure TCAN2_C2FLTCON2.setFSEL11(thebits : TBits_5); inline;
  103684. begin
  103685. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  103686. end;
  103687. function TCAN2_C2FLTCON2.getFSEL11 : TBits_5; inline;
  103688. begin
  103689. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  103690. end;
  103691. procedure TCAN2_C2FLTCON2.setMSEL11(thebits : TBits_2); inline;
  103692. begin
  103693. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  103694. end;
  103695. function TCAN2_C2FLTCON2.getMSEL11 : TBits_2; inline;
  103696. begin
  103697. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  103698. end;
  103699. procedure TCAN2_C2FLTCON2.setFLTEN11; inline;
  103700. begin
  103701. pTDefRegMap(@Self)^.&set := $80000000;
  103702. end;
  103703. procedure TCAN2_C2FLTCON2.clearFLTEN11; inline;
  103704. begin
  103705. pTDefRegMap(@Self)^.clr := $80000000;
  103706. end;
  103707. procedure TCAN2_C2FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  103708. begin
  103709. if thebits = 0 then
  103710. pTDefRegMap(@Self)^.clr := $80000000
  103711. else
  103712. pTDefRegMap(@Self)^.&set := $80000000;
  103713. end;
  103714. function TCAN2_C2FLTCON2.getFLTEN11 : TBits_1; inline;
  103715. begin
  103716. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  103717. end;
  103718. procedure TCAN2_C2FLTCON2.setw(thebits : TBits_32); inline;
  103719. begin
  103720. pTDefRegMap(@Self)^.val := thebits;
  103721. end;
  103722. function TCAN2_C2FLTCON2.getw : TBits_32; inline;
  103723. begin
  103724. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103725. end;
  103726. procedure TCAN2_C2FLTCON3.setFSEL12(thebits : TBits_5); inline;
  103727. begin
  103728. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103729. end;
  103730. function TCAN2_C2FLTCON3.getFSEL12 : TBits_5; inline;
  103731. begin
  103732. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103733. end;
  103734. procedure TCAN2_C2FLTCON3.setMSEL12(thebits : TBits_2); inline;
  103735. begin
  103736. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  103737. end;
  103738. function TCAN2_C2FLTCON3.getMSEL12 : TBits_2; inline;
  103739. begin
  103740. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  103741. end;
  103742. procedure TCAN2_C2FLTCON3.setFLTEN12; inline;
  103743. begin
  103744. pTDefRegMap(@Self)^.&set := $00000080;
  103745. end;
  103746. procedure TCAN2_C2FLTCON3.clearFLTEN12; inline;
  103747. begin
  103748. pTDefRegMap(@Self)^.clr := $00000080;
  103749. end;
  103750. procedure TCAN2_C2FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  103751. begin
  103752. if thebits = 0 then
  103753. pTDefRegMap(@Self)^.clr := $00000080
  103754. else
  103755. pTDefRegMap(@Self)^.&set := $00000080;
  103756. end;
  103757. function TCAN2_C2FLTCON3.getFLTEN12 : TBits_1; inline;
  103758. begin
  103759. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103760. end;
  103761. procedure TCAN2_C2FLTCON3.setFSEL13(thebits : TBits_5); inline;
  103762. begin
  103763. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  103764. end;
  103765. function TCAN2_C2FLTCON3.getFSEL13 : TBits_5; inline;
  103766. begin
  103767. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  103768. end;
  103769. procedure TCAN2_C2FLTCON3.setMSEL13(thebits : TBits_2); inline;
  103770. begin
  103771. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  103772. end;
  103773. function TCAN2_C2FLTCON3.getMSEL13 : TBits_2; inline;
  103774. begin
  103775. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  103776. end;
  103777. procedure TCAN2_C2FLTCON3.setFLTEN13; inline;
  103778. begin
  103779. pTDefRegMap(@Self)^.&set := $00008000;
  103780. end;
  103781. procedure TCAN2_C2FLTCON3.clearFLTEN13; inline;
  103782. begin
  103783. pTDefRegMap(@Self)^.clr := $00008000;
  103784. end;
  103785. procedure TCAN2_C2FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  103786. begin
  103787. if thebits = 0 then
  103788. pTDefRegMap(@Self)^.clr := $00008000
  103789. else
  103790. pTDefRegMap(@Self)^.&set := $00008000;
  103791. end;
  103792. function TCAN2_C2FLTCON3.getFLTEN13 : TBits_1; inline;
  103793. begin
  103794. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  103795. end;
  103796. procedure TCAN2_C2FLTCON3.setFSEL14(thebits : TBits_5); inline;
  103797. begin
  103798. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103799. end;
  103800. function TCAN2_C2FLTCON3.getFSEL14 : TBits_5; inline;
  103801. begin
  103802. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103803. end;
  103804. procedure TCAN2_C2FLTCON3.setMSEL14(thebits : TBits_2); inline;
  103805. begin
  103806. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  103807. end;
  103808. function TCAN2_C2FLTCON3.getMSEL14 : TBits_2; inline;
  103809. begin
  103810. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  103811. end;
  103812. procedure TCAN2_C2FLTCON3.setFLTEN14; inline;
  103813. begin
  103814. pTDefRegMap(@Self)^.&set := $00800000;
  103815. end;
  103816. procedure TCAN2_C2FLTCON3.clearFLTEN14; inline;
  103817. begin
  103818. pTDefRegMap(@Self)^.clr := $00800000;
  103819. end;
  103820. procedure TCAN2_C2FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  103821. begin
  103822. if thebits = 0 then
  103823. pTDefRegMap(@Self)^.clr := $00800000
  103824. else
  103825. pTDefRegMap(@Self)^.&set := $00800000;
  103826. end;
  103827. function TCAN2_C2FLTCON3.getFLTEN14 : TBits_1; inline;
  103828. begin
  103829. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  103830. end;
  103831. procedure TCAN2_C2FLTCON3.setFSEL15(thebits : TBits_5); inline;
  103832. begin
  103833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  103834. end;
  103835. function TCAN2_C2FLTCON3.getFSEL15 : TBits_5; inline;
  103836. begin
  103837. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  103838. end;
  103839. procedure TCAN2_C2FLTCON3.setMSEL15(thebits : TBits_2); inline;
  103840. begin
  103841. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  103842. end;
  103843. function TCAN2_C2FLTCON3.getMSEL15 : TBits_2; inline;
  103844. begin
  103845. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  103846. end;
  103847. procedure TCAN2_C2FLTCON3.setFLTEN15; inline;
  103848. begin
  103849. pTDefRegMap(@Self)^.&set := $80000000;
  103850. end;
  103851. procedure TCAN2_C2FLTCON3.clearFLTEN15; inline;
  103852. begin
  103853. pTDefRegMap(@Self)^.clr := $80000000;
  103854. end;
  103855. procedure TCAN2_C2FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  103856. begin
  103857. if thebits = 0 then
  103858. pTDefRegMap(@Self)^.clr := $80000000
  103859. else
  103860. pTDefRegMap(@Self)^.&set := $80000000;
  103861. end;
  103862. function TCAN2_C2FLTCON3.getFLTEN15 : TBits_1; inline;
  103863. begin
  103864. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  103865. end;
  103866. procedure TCAN2_C2FLTCON3.setw(thebits : TBits_32); inline;
  103867. begin
  103868. pTDefRegMap(@Self)^.val := thebits;
  103869. end;
  103870. function TCAN2_C2FLTCON3.getw : TBits_32; inline;
  103871. begin
  103872. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103873. end;
  103874. procedure TCAN2_C2FLTCON4.setFSEL16(thebits : TBits_5); inline;
  103875. begin
  103876. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103877. end;
  103878. function TCAN2_C2FLTCON4.getFSEL16 : TBits_5; inline;
  103879. begin
  103880. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103881. end;
  103882. procedure TCAN2_C2FLTCON4.setMSEL16(thebits : TBits_2); inline;
  103883. begin
  103884. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  103885. end;
  103886. function TCAN2_C2FLTCON4.getMSEL16 : TBits_2; inline;
  103887. begin
  103888. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  103889. end;
  103890. procedure TCAN2_C2FLTCON4.setFLTEN16; inline;
  103891. begin
  103892. pTDefRegMap(@Self)^.&set := $00000080;
  103893. end;
  103894. procedure TCAN2_C2FLTCON4.clearFLTEN16; inline;
  103895. begin
  103896. pTDefRegMap(@Self)^.clr := $00000080;
  103897. end;
  103898. procedure TCAN2_C2FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  103899. begin
  103900. if thebits = 0 then
  103901. pTDefRegMap(@Self)^.clr := $00000080
  103902. else
  103903. pTDefRegMap(@Self)^.&set := $00000080;
  103904. end;
  103905. function TCAN2_C2FLTCON4.getFLTEN16 : TBits_1; inline;
  103906. begin
  103907. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103908. end;
  103909. procedure TCAN2_C2FLTCON4.setFSEL17(thebits : TBits_5); inline;
  103910. begin
  103911. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  103912. end;
  103913. function TCAN2_C2FLTCON4.getFSEL17 : TBits_5; inline;
  103914. begin
  103915. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  103916. end;
  103917. procedure TCAN2_C2FLTCON4.setMSEL17(thebits : TBits_2); inline;
  103918. begin
  103919. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  103920. end;
  103921. function TCAN2_C2FLTCON4.getMSEL17 : TBits_2; inline;
  103922. begin
  103923. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  103924. end;
  103925. procedure TCAN2_C2FLTCON4.setFLTEN17; inline;
  103926. begin
  103927. pTDefRegMap(@Self)^.&set := $00008000;
  103928. end;
  103929. procedure TCAN2_C2FLTCON4.clearFLTEN17; inline;
  103930. begin
  103931. pTDefRegMap(@Self)^.clr := $00008000;
  103932. end;
  103933. procedure TCAN2_C2FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  103934. begin
  103935. if thebits = 0 then
  103936. pTDefRegMap(@Self)^.clr := $00008000
  103937. else
  103938. pTDefRegMap(@Self)^.&set := $00008000;
  103939. end;
  103940. function TCAN2_C2FLTCON4.getFLTEN17 : TBits_1; inline;
  103941. begin
  103942. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  103943. end;
  103944. procedure TCAN2_C2FLTCON4.setFSEL18(thebits : TBits_5); inline;
  103945. begin
  103946. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103947. end;
  103948. function TCAN2_C2FLTCON4.getFSEL18 : TBits_5; inline;
  103949. begin
  103950. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103951. end;
  103952. procedure TCAN2_C2FLTCON4.setMSEL18(thebits : TBits_2); inline;
  103953. begin
  103954. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  103955. end;
  103956. function TCAN2_C2FLTCON4.getMSEL18 : TBits_2; inline;
  103957. begin
  103958. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  103959. end;
  103960. procedure TCAN2_C2FLTCON4.setFLTEN18; inline;
  103961. begin
  103962. pTDefRegMap(@Self)^.&set := $00800000;
  103963. end;
  103964. procedure TCAN2_C2FLTCON4.clearFLTEN18; inline;
  103965. begin
  103966. pTDefRegMap(@Self)^.clr := $00800000;
  103967. end;
  103968. procedure TCAN2_C2FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  103969. begin
  103970. if thebits = 0 then
  103971. pTDefRegMap(@Self)^.clr := $00800000
  103972. else
  103973. pTDefRegMap(@Self)^.&set := $00800000;
  103974. end;
  103975. function TCAN2_C2FLTCON4.getFLTEN18 : TBits_1; inline;
  103976. begin
  103977. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  103978. end;
  103979. procedure TCAN2_C2FLTCON4.setFSEL19(thebits : TBits_5); inline;
  103980. begin
  103981. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  103982. end;
  103983. function TCAN2_C2FLTCON4.getFSEL19 : TBits_5; inline;
  103984. begin
  103985. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  103986. end;
  103987. procedure TCAN2_C2FLTCON4.setMSEL19(thebits : TBits_2); inline;
  103988. begin
  103989. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  103990. end;
  103991. function TCAN2_C2FLTCON4.getMSEL19 : TBits_2; inline;
  103992. begin
  103993. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  103994. end;
  103995. procedure TCAN2_C2FLTCON4.setFLTEN19; inline;
  103996. begin
  103997. pTDefRegMap(@Self)^.&set := $80000000;
  103998. end;
  103999. procedure TCAN2_C2FLTCON4.clearFLTEN19; inline;
  104000. begin
  104001. pTDefRegMap(@Self)^.clr := $80000000;
  104002. end;
  104003. procedure TCAN2_C2FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  104004. begin
  104005. if thebits = 0 then
  104006. pTDefRegMap(@Self)^.clr := $80000000
  104007. else
  104008. pTDefRegMap(@Self)^.&set := $80000000;
  104009. end;
  104010. function TCAN2_C2FLTCON4.getFLTEN19 : TBits_1; inline;
  104011. begin
  104012. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  104013. end;
  104014. procedure TCAN2_C2FLTCON4.setw(thebits : TBits_32); inline;
  104015. begin
  104016. pTDefRegMap(@Self)^.val := thebits;
  104017. end;
  104018. function TCAN2_C2FLTCON4.getw : TBits_32; inline;
  104019. begin
  104020. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104021. end;
  104022. procedure TCAN2_C2FLTCON5.setFSEL20(thebits : TBits_5); inline;
  104023. begin
  104024. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  104025. end;
  104026. function TCAN2_C2FLTCON5.getFSEL20 : TBits_5; inline;
  104027. begin
  104028. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  104029. end;
  104030. procedure TCAN2_C2FLTCON5.setMSEL20(thebits : TBits_2); inline;
  104031. begin
  104032. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  104033. end;
  104034. function TCAN2_C2FLTCON5.getMSEL20 : TBits_2; inline;
  104035. begin
  104036. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  104037. end;
  104038. procedure TCAN2_C2FLTCON5.setFLTEN20; inline;
  104039. begin
  104040. pTDefRegMap(@Self)^.&set := $00000080;
  104041. end;
  104042. procedure TCAN2_C2FLTCON5.clearFLTEN20; inline;
  104043. begin
  104044. pTDefRegMap(@Self)^.clr := $00000080;
  104045. end;
  104046. procedure TCAN2_C2FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  104047. begin
  104048. if thebits = 0 then
  104049. pTDefRegMap(@Self)^.clr := $00000080
  104050. else
  104051. pTDefRegMap(@Self)^.&set := $00000080;
  104052. end;
  104053. function TCAN2_C2FLTCON5.getFLTEN20 : TBits_1; inline;
  104054. begin
  104055. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  104056. end;
  104057. procedure TCAN2_C2FLTCON5.setFSEL21(thebits : TBits_5); inline;
  104058. begin
  104059. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  104060. end;
  104061. function TCAN2_C2FLTCON5.getFSEL21 : TBits_5; inline;
  104062. begin
  104063. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  104064. end;
  104065. procedure TCAN2_C2FLTCON5.setMSEL21(thebits : TBits_2); inline;
  104066. begin
  104067. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  104068. end;
  104069. function TCAN2_C2FLTCON5.getMSEL21 : TBits_2; inline;
  104070. begin
  104071. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  104072. end;
  104073. procedure TCAN2_C2FLTCON5.setFLTEN21; inline;
  104074. begin
  104075. pTDefRegMap(@Self)^.&set := $00008000;
  104076. end;
  104077. procedure TCAN2_C2FLTCON5.clearFLTEN21; inline;
  104078. begin
  104079. pTDefRegMap(@Self)^.clr := $00008000;
  104080. end;
  104081. procedure TCAN2_C2FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  104082. begin
  104083. if thebits = 0 then
  104084. pTDefRegMap(@Self)^.clr := $00008000
  104085. else
  104086. pTDefRegMap(@Self)^.&set := $00008000;
  104087. end;
  104088. function TCAN2_C2FLTCON5.getFLTEN21 : TBits_1; inline;
  104089. begin
  104090. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  104091. end;
  104092. procedure TCAN2_C2FLTCON5.setFSEL22(thebits : TBits_5); inline;
  104093. begin
  104094. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  104095. end;
  104096. function TCAN2_C2FLTCON5.getFSEL22 : TBits_5; inline;
  104097. begin
  104098. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  104099. end;
  104100. procedure TCAN2_C2FLTCON5.setMSEL22(thebits : TBits_2); inline;
  104101. begin
  104102. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  104103. end;
  104104. function TCAN2_C2FLTCON5.getMSEL22 : TBits_2; inline;
  104105. begin
  104106. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  104107. end;
  104108. procedure TCAN2_C2FLTCON5.setFLTEN22; inline;
  104109. begin
  104110. pTDefRegMap(@Self)^.&set := $00800000;
  104111. end;
  104112. procedure TCAN2_C2FLTCON5.clearFLTEN22; inline;
  104113. begin
  104114. pTDefRegMap(@Self)^.clr := $00800000;
  104115. end;
  104116. procedure TCAN2_C2FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  104117. begin
  104118. if thebits = 0 then
  104119. pTDefRegMap(@Self)^.clr := $00800000
  104120. else
  104121. pTDefRegMap(@Self)^.&set := $00800000;
  104122. end;
  104123. function TCAN2_C2FLTCON5.getFLTEN22 : TBits_1; inline;
  104124. begin
  104125. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  104126. end;
  104127. procedure TCAN2_C2FLTCON5.setFSEL23(thebits : TBits_5); inline;
  104128. begin
  104129. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  104130. end;
  104131. function TCAN2_C2FLTCON5.getFSEL23 : TBits_5; inline;
  104132. begin
  104133. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  104134. end;
  104135. procedure TCAN2_C2FLTCON5.setMSEL23(thebits : TBits_2); inline;
  104136. begin
  104137. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  104138. end;
  104139. function TCAN2_C2FLTCON5.getMSEL23 : TBits_2; inline;
  104140. begin
  104141. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  104142. end;
  104143. procedure TCAN2_C2FLTCON5.setFLTEN23; inline;
  104144. begin
  104145. pTDefRegMap(@Self)^.&set := $80000000;
  104146. end;
  104147. procedure TCAN2_C2FLTCON5.clearFLTEN23; inline;
  104148. begin
  104149. pTDefRegMap(@Self)^.clr := $80000000;
  104150. end;
  104151. procedure TCAN2_C2FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  104152. begin
  104153. if thebits = 0 then
  104154. pTDefRegMap(@Self)^.clr := $80000000
  104155. else
  104156. pTDefRegMap(@Self)^.&set := $80000000;
  104157. end;
  104158. function TCAN2_C2FLTCON5.getFLTEN23 : TBits_1; inline;
  104159. begin
  104160. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  104161. end;
  104162. procedure TCAN2_C2FLTCON5.setw(thebits : TBits_32); inline;
  104163. begin
  104164. pTDefRegMap(@Self)^.val := thebits;
  104165. end;
  104166. function TCAN2_C2FLTCON5.getw : TBits_32; inline;
  104167. begin
  104168. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104169. end;
  104170. procedure TCAN2_C2FLTCON6.setFSEL24(thebits : TBits_5); inline;
  104171. begin
  104172. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  104173. end;
  104174. function TCAN2_C2FLTCON6.getFSEL24 : TBits_5; inline;
  104175. begin
  104176. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  104177. end;
  104178. procedure TCAN2_C2FLTCON6.setMSEL24(thebits : TBits_2); inline;
  104179. begin
  104180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  104181. end;
  104182. function TCAN2_C2FLTCON6.getMSEL24 : TBits_2; inline;
  104183. begin
  104184. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  104185. end;
  104186. procedure TCAN2_C2FLTCON6.setFLTEN24; inline;
  104187. begin
  104188. pTDefRegMap(@Self)^.&set := $00000080;
  104189. end;
  104190. procedure TCAN2_C2FLTCON6.clearFLTEN24; inline;
  104191. begin
  104192. pTDefRegMap(@Self)^.clr := $00000080;
  104193. end;
  104194. procedure TCAN2_C2FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  104195. begin
  104196. if thebits = 0 then
  104197. pTDefRegMap(@Self)^.clr := $00000080
  104198. else
  104199. pTDefRegMap(@Self)^.&set := $00000080;
  104200. end;
  104201. function TCAN2_C2FLTCON6.getFLTEN24 : TBits_1; inline;
  104202. begin
  104203. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  104204. end;
  104205. procedure TCAN2_C2FLTCON6.setFSEL25(thebits : TBits_5); inline;
  104206. begin
  104207. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  104208. end;
  104209. function TCAN2_C2FLTCON6.getFSEL25 : TBits_5; inline;
  104210. begin
  104211. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  104212. end;
  104213. procedure TCAN2_C2FLTCON6.setMSEL25(thebits : TBits_2); inline;
  104214. begin
  104215. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  104216. end;
  104217. function TCAN2_C2FLTCON6.getMSEL25 : TBits_2; inline;
  104218. begin
  104219. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  104220. end;
  104221. procedure TCAN2_C2FLTCON6.setFLTEN25; inline;
  104222. begin
  104223. pTDefRegMap(@Self)^.&set := $00008000;
  104224. end;
  104225. procedure TCAN2_C2FLTCON6.clearFLTEN25; inline;
  104226. begin
  104227. pTDefRegMap(@Self)^.clr := $00008000;
  104228. end;
  104229. procedure TCAN2_C2FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  104230. begin
  104231. if thebits = 0 then
  104232. pTDefRegMap(@Self)^.clr := $00008000
  104233. else
  104234. pTDefRegMap(@Self)^.&set := $00008000;
  104235. end;
  104236. function TCAN2_C2FLTCON6.getFLTEN25 : TBits_1; inline;
  104237. begin
  104238. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  104239. end;
  104240. procedure TCAN2_C2FLTCON6.setFSEL26(thebits : TBits_5); inline;
  104241. begin
  104242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  104243. end;
  104244. function TCAN2_C2FLTCON6.getFSEL26 : TBits_5; inline;
  104245. begin
  104246. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  104247. end;
  104248. procedure TCAN2_C2FLTCON6.setMSEL26(thebits : TBits_2); inline;
  104249. begin
  104250. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  104251. end;
  104252. function TCAN2_C2FLTCON6.getMSEL26 : TBits_2; inline;
  104253. begin
  104254. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  104255. end;
  104256. procedure TCAN2_C2FLTCON6.setFLTEN26; inline;
  104257. begin
  104258. pTDefRegMap(@Self)^.&set := $00800000;
  104259. end;
  104260. procedure TCAN2_C2FLTCON6.clearFLTEN26; inline;
  104261. begin
  104262. pTDefRegMap(@Self)^.clr := $00800000;
  104263. end;
  104264. procedure TCAN2_C2FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  104265. begin
  104266. if thebits = 0 then
  104267. pTDefRegMap(@Self)^.clr := $00800000
  104268. else
  104269. pTDefRegMap(@Self)^.&set := $00800000;
  104270. end;
  104271. function TCAN2_C2FLTCON6.getFLTEN26 : TBits_1; inline;
  104272. begin
  104273. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  104274. end;
  104275. procedure TCAN2_C2FLTCON6.setFSEL27(thebits : TBits_5); inline;
  104276. begin
  104277. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  104278. end;
  104279. function TCAN2_C2FLTCON6.getFSEL27 : TBits_5; inline;
  104280. begin
  104281. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  104282. end;
  104283. procedure TCAN2_C2FLTCON6.setMSEL27(thebits : TBits_2); inline;
  104284. begin
  104285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  104286. end;
  104287. function TCAN2_C2FLTCON6.getMSEL27 : TBits_2; inline;
  104288. begin
  104289. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  104290. end;
  104291. procedure TCAN2_C2FLTCON6.setFLTEN27; inline;
  104292. begin
  104293. pTDefRegMap(@Self)^.&set := $80000000;
  104294. end;
  104295. procedure TCAN2_C2FLTCON6.clearFLTEN27; inline;
  104296. begin
  104297. pTDefRegMap(@Self)^.clr := $80000000;
  104298. end;
  104299. procedure TCAN2_C2FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  104300. begin
  104301. if thebits = 0 then
  104302. pTDefRegMap(@Self)^.clr := $80000000
  104303. else
  104304. pTDefRegMap(@Self)^.&set := $80000000;
  104305. end;
  104306. function TCAN2_C2FLTCON6.getFLTEN27 : TBits_1; inline;
  104307. begin
  104308. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  104309. end;
  104310. procedure TCAN2_C2FLTCON6.setw(thebits : TBits_32); inline;
  104311. begin
  104312. pTDefRegMap(@Self)^.val := thebits;
  104313. end;
  104314. function TCAN2_C2FLTCON6.getw : TBits_32; inline;
  104315. begin
  104316. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104317. end;
  104318. procedure TCAN2_C2FLTCON7.setFSEL28(thebits : TBits_5); inline;
  104319. begin
  104320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  104321. end;
  104322. function TCAN2_C2FLTCON7.getFSEL28 : TBits_5; inline;
  104323. begin
  104324. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  104325. end;
  104326. procedure TCAN2_C2FLTCON7.setMSEL28(thebits : TBits_2); inline;
  104327. begin
  104328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  104329. end;
  104330. function TCAN2_C2FLTCON7.getMSEL28 : TBits_2; inline;
  104331. begin
  104332. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  104333. end;
  104334. procedure TCAN2_C2FLTCON7.setFLTEN28; inline;
  104335. begin
  104336. pTDefRegMap(@Self)^.&set := $00000080;
  104337. end;
  104338. procedure TCAN2_C2FLTCON7.clearFLTEN28; inline;
  104339. begin
  104340. pTDefRegMap(@Self)^.clr := $00000080;
  104341. end;
  104342. procedure TCAN2_C2FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  104343. begin
  104344. if thebits = 0 then
  104345. pTDefRegMap(@Self)^.clr := $00000080
  104346. else
  104347. pTDefRegMap(@Self)^.&set := $00000080;
  104348. end;
  104349. function TCAN2_C2FLTCON7.getFLTEN28 : TBits_1; inline;
  104350. begin
  104351. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  104352. end;
  104353. procedure TCAN2_C2FLTCON7.setFSEL29(thebits : TBits_5); inline;
  104354. begin
  104355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  104356. end;
  104357. function TCAN2_C2FLTCON7.getFSEL29 : TBits_5; inline;
  104358. begin
  104359. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  104360. end;
  104361. procedure TCAN2_C2FLTCON7.setMSEL29(thebits : TBits_2); inline;
  104362. begin
  104363. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  104364. end;
  104365. function TCAN2_C2FLTCON7.getMSEL29 : TBits_2; inline;
  104366. begin
  104367. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  104368. end;
  104369. procedure TCAN2_C2FLTCON7.setFLTEN29; inline;
  104370. begin
  104371. pTDefRegMap(@Self)^.&set := $00008000;
  104372. end;
  104373. procedure TCAN2_C2FLTCON7.clearFLTEN29; inline;
  104374. begin
  104375. pTDefRegMap(@Self)^.clr := $00008000;
  104376. end;
  104377. procedure TCAN2_C2FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  104378. begin
  104379. if thebits = 0 then
  104380. pTDefRegMap(@Self)^.clr := $00008000
  104381. else
  104382. pTDefRegMap(@Self)^.&set := $00008000;
  104383. end;
  104384. function TCAN2_C2FLTCON7.getFLTEN29 : TBits_1; inline;
  104385. begin
  104386. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  104387. end;
  104388. procedure TCAN2_C2FLTCON7.setFSEL30(thebits : TBits_5); inline;
  104389. begin
  104390. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  104391. end;
  104392. function TCAN2_C2FLTCON7.getFSEL30 : TBits_5; inline;
  104393. begin
  104394. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  104395. end;
  104396. procedure TCAN2_C2FLTCON7.setMSEL30(thebits : TBits_2); inline;
  104397. begin
  104398. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  104399. end;
  104400. function TCAN2_C2FLTCON7.getMSEL30 : TBits_2; inline;
  104401. begin
  104402. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  104403. end;
  104404. procedure TCAN2_C2FLTCON7.setFLTEN30; inline;
  104405. begin
  104406. pTDefRegMap(@Self)^.&set := $00800000;
  104407. end;
  104408. procedure TCAN2_C2FLTCON7.clearFLTEN30; inline;
  104409. begin
  104410. pTDefRegMap(@Self)^.clr := $00800000;
  104411. end;
  104412. procedure TCAN2_C2FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  104413. begin
  104414. if thebits = 0 then
  104415. pTDefRegMap(@Self)^.clr := $00800000
  104416. else
  104417. pTDefRegMap(@Self)^.&set := $00800000;
  104418. end;
  104419. function TCAN2_C2FLTCON7.getFLTEN30 : TBits_1; inline;
  104420. begin
  104421. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  104422. end;
  104423. procedure TCAN2_C2FLTCON7.setFSEL31(thebits : TBits_5); inline;
  104424. begin
  104425. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  104426. end;
  104427. function TCAN2_C2FLTCON7.getFSEL31 : TBits_5; inline;
  104428. begin
  104429. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  104430. end;
  104431. procedure TCAN2_C2FLTCON7.setMSEL31(thebits : TBits_2); inline;
  104432. begin
  104433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  104434. end;
  104435. function TCAN2_C2FLTCON7.getMSEL31 : TBits_2; inline;
  104436. begin
  104437. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  104438. end;
  104439. procedure TCAN2_C2FLTCON7.setFLTEN31; inline;
  104440. begin
  104441. pTDefRegMap(@Self)^.&set := $80000000;
  104442. end;
  104443. procedure TCAN2_C2FLTCON7.clearFLTEN31; inline;
  104444. begin
  104445. pTDefRegMap(@Self)^.clr := $80000000;
  104446. end;
  104447. procedure TCAN2_C2FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  104448. begin
  104449. if thebits = 0 then
  104450. pTDefRegMap(@Self)^.clr := $80000000
  104451. else
  104452. pTDefRegMap(@Self)^.&set := $80000000;
  104453. end;
  104454. function TCAN2_C2FLTCON7.getFLTEN31 : TBits_1; inline;
  104455. begin
  104456. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  104457. end;
  104458. procedure TCAN2_C2FLTCON7.setw(thebits : TBits_32); inline;
  104459. begin
  104460. pTDefRegMap(@Self)^.val := thebits;
  104461. end;
  104462. function TCAN2_C2FLTCON7.getw : TBits_32; inline;
  104463. begin
  104464. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104465. end;
  104466. procedure TCAN2_C2RXF0.setEID(thebits : TBits_18); inline;
  104467. begin
  104468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104469. end;
  104470. function TCAN2_C2RXF0.getEID : TBits_18; inline;
  104471. begin
  104472. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104473. end;
  104474. procedure TCAN2_C2RXF0.setEXID; inline;
  104475. begin
  104476. pTDefRegMap(@Self)^.&set := $00080000;
  104477. end;
  104478. procedure TCAN2_C2RXF0.clearEXID; inline;
  104479. begin
  104480. pTDefRegMap(@Self)^.clr := $00080000;
  104481. end;
  104482. procedure TCAN2_C2RXF0.setEXID(thebits : TBits_1); inline;
  104483. begin
  104484. if thebits = 0 then
  104485. pTDefRegMap(@Self)^.clr := $00080000
  104486. else
  104487. pTDefRegMap(@Self)^.&set := $00080000;
  104488. end;
  104489. function TCAN2_C2RXF0.getEXID : TBits_1; inline;
  104490. begin
  104491. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104492. end;
  104493. procedure TCAN2_C2RXF0.setSID(thebits : TBits_11); inline;
  104494. begin
  104495. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104496. end;
  104497. function TCAN2_C2RXF0.getSID : TBits_11; inline;
  104498. begin
  104499. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104500. end;
  104501. procedure TCAN2_C2RXF0.setw(thebits : TBits_32); inline;
  104502. begin
  104503. pTDefRegMap(@Self)^.val := thebits;
  104504. end;
  104505. function TCAN2_C2RXF0.getw : TBits_32; inline;
  104506. begin
  104507. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104508. end;
  104509. procedure TCAN2_C2RXF1.setEID(thebits : TBits_18); inline;
  104510. begin
  104511. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104512. end;
  104513. function TCAN2_C2RXF1.getEID : TBits_18; inline;
  104514. begin
  104515. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104516. end;
  104517. procedure TCAN2_C2RXF1.setEXID; inline;
  104518. begin
  104519. pTDefRegMap(@Self)^.&set := $00080000;
  104520. end;
  104521. procedure TCAN2_C2RXF1.clearEXID; inline;
  104522. begin
  104523. pTDefRegMap(@Self)^.clr := $00080000;
  104524. end;
  104525. procedure TCAN2_C2RXF1.setEXID(thebits : TBits_1); inline;
  104526. begin
  104527. if thebits = 0 then
  104528. pTDefRegMap(@Self)^.clr := $00080000
  104529. else
  104530. pTDefRegMap(@Self)^.&set := $00080000;
  104531. end;
  104532. function TCAN2_C2RXF1.getEXID : TBits_1; inline;
  104533. begin
  104534. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104535. end;
  104536. procedure TCAN2_C2RXF1.setSID(thebits : TBits_11); inline;
  104537. begin
  104538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104539. end;
  104540. function TCAN2_C2RXF1.getSID : TBits_11; inline;
  104541. begin
  104542. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104543. end;
  104544. procedure TCAN2_C2RXF1.setw(thebits : TBits_32); inline;
  104545. begin
  104546. pTDefRegMap(@Self)^.val := thebits;
  104547. end;
  104548. function TCAN2_C2RXF1.getw : TBits_32; inline;
  104549. begin
  104550. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104551. end;
  104552. procedure TCAN2_C2RXF2.setEID(thebits : TBits_18); inline;
  104553. begin
  104554. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104555. end;
  104556. function TCAN2_C2RXF2.getEID : TBits_18; inline;
  104557. begin
  104558. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104559. end;
  104560. procedure TCAN2_C2RXF2.setEXID; inline;
  104561. begin
  104562. pTDefRegMap(@Self)^.&set := $00080000;
  104563. end;
  104564. procedure TCAN2_C2RXF2.clearEXID; inline;
  104565. begin
  104566. pTDefRegMap(@Self)^.clr := $00080000;
  104567. end;
  104568. procedure TCAN2_C2RXF2.setEXID(thebits : TBits_1); inline;
  104569. begin
  104570. if thebits = 0 then
  104571. pTDefRegMap(@Self)^.clr := $00080000
  104572. else
  104573. pTDefRegMap(@Self)^.&set := $00080000;
  104574. end;
  104575. function TCAN2_C2RXF2.getEXID : TBits_1; inline;
  104576. begin
  104577. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104578. end;
  104579. procedure TCAN2_C2RXF2.setSID(thebits : TBits_11); inline;
  104580. begin
  104581. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104582. end;
  104583. function TCAN2_C2RXF2.getSID : TBits_11; inline;
  104584. begin
  104585. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104586. end;
  104587. procedure TCAN2_C2RXF2.setw(thebits : TBits_32); inline;
  104588. begin
  104589. pTDefRegMap(@Self)^.val := thebits;
  104590. end;
  104591. function TCAN2_C2RXF2.getw : TBits_32; inline;
  104592. begin
  104593. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104594. end;
  104595. procedure TCAN2_C2RXF3.setEID(thebits : TBits_18); inline;
  104596. begin
  104597. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104598. end;
  104599. function TCAN2_C2RXF3.getEID : TBits_18; inline;
  104600. begin
  104601. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104602. end;
  104603. procedure TCAN2_C2RXF3.setEXID; inline;
  104604. begin
  104605. pTDefRegMap(@Self)^.&set := $00080000;
  104606. end;
  104607. procedure TCAN2_C2RXF3.clearEXID; inline;
  104608. begin
  104609. pTDefRegMap(@Self)^.clr := $00080000;
  104610. end;
  104611. procedure TCAN2_C2RXF3.setEXID(thebits : TBits_1); inline;
  104612. begin
  104613. if thebits = 0 then
  104614. pTDefRegMap(@Self)^.clr := $00080000
  104615. else
  104616. pTDefRegMap(@Self)^.&set := $00080000;
  104617. end;
  104618. function TCAN2_C2RXF3.getEXID : TBits_1; inline;
  104619. begin
  104620. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104621. end;
  104622. procedure TCAN2_C2RXF3.setSID(thebits : TBits_11); inline;
  104623. begin
  104624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104625. end;
  104626. function TCAN2_C2RXF3.getSID : TBits_11; inline;
  104627. begin
  104628. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104629. end;
  104630. procedure TCAN2_C2RXF3.setw(thebits : TBits_32); inline;
  104631. begin
  104632. pTDefRegMap(@Self)^.val := thebits;
  104633. end;
  104634. function TCAN2_C2RXF3.getw : TBits_32; inline;
  104635. begin
  104636. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104637. end;
  104638. procedure TCAN2_C2RXF4.setEID(thebits : TBits_18); inline;
  104639. begin
  104640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104641. end;
  104642. function TCAN2_C2RXF4.getEID : TBits_18; inline;
  104643. begin
  104644. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104645. end;
  104646. procedure TCAN2_C2RXF4.setEXID; inline;
  104647. begin
  104648. pTDefRegMap(@Self)^.&set := $00080000;
  104649. end;
  104650. procedure TCAN2_C2RXF4.clearEXID; inline;
  104651. begin
  104652. pTDefRegMap(@Self)^.clr := $00080000;
  104653. end;
  104654. procedure TCAN2_C2RXF4.setEXID(thebits : TBits_1); inline;
  104655. begin
  104656. if thebits = 0 then
  104657. pTDefRegMap(@Self)^.clr := $00080000
  104658. else
  104659. pTDefRegMap(@Self)^.&set := $00080000;
  104660. end;
  104661. function TCAN2_C2RXF4.getEXID : TBits_1; inline;
  104662. begin
  104663. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104664. end;
  104665. procedure TCAN2_C2RXF4.setSID(thebits : TBits_11); inline;
  104666. begin
  104667. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104668. end;
  104669. function TCAN2_C2RXF4.getSID : TBits_11; inline;
  104670. begin
  104671. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104672. end;
  104673. procedure TCAN2_C2RXF4.setw(thebits : TBits_32); inline;
  104674. begin
  104675. pTDefRegMap(@Self)^.val := thebits;
  104676. end;
  104677. function TCAN2_C2RXF4.getw : TBits_32; inline;
  104678. begin
  104679. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104680. end;
  104681. procedure TCAN2_C2RXF5.setEID(thebits : TBits_18); inline;
  104682. begin
  104683. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104684. end;
  104685. function TCAN2_C2RXF5.getEID : TBits_18; inline;
  104686. begin
  104687. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104688. end;
  104689. procedure TCAN2_C2RXF5.setEXID; inline;
  104690. begin
  104691. pTDefRegMap(@Self)^.&set := $00080000;
  104692. end;
  104693. procedure TCAN2_C2RXF5.clearEXID; inline;
  104694. begin
  104695. pTDefRegMap(@Self)^.clr := $00080000;
  104696. end;
  104697. procedure TCAN2_C2RXF5.setEXID(thebits : TBits_1); inline;
  104698. begin
  104699. if thebits = 0 then
  104700. pTDefRegMap(@Self)^.clr := $00080000
  104701. else
  104702. pTDefRegMap(@Self)^.&set := $00080000;
  104703. end;
  104704. function TCAN2_C2RXF5.getEXID : TBits_1; inline;
  104705. begin
  104706. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104707. end;
  104708. procedure TCAN2_C2RXF5.setSID(thebits : TBits_11); inline;
  104709. begin
  104710. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104711. end;
  104712. function TCAN2_C2RXF5.getSID : TBits_11; inline;
  104713. begin
  104714. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104715. end;
  104716. procedure TCAN2_C2RXF5.setw(thebits : TBits_32); inline;
  104717. begin
  104718. pTDefRegMap(@Self)^.val := thebits;
  104719. end;
  104720. function TCAN2_C2RXF5.getw : TBits_32; inline;
  104721. begin
  104722. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104723. end;
  104724. procedure TCAN2_C2RXF6.setEID(thebits : TBits_18); inline;
  104725. begin
  104726. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104727. end;
  104728. function TCAN2_C2RXF6.getEID : TBits_18; inline;
  104729. begin
  104730. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104731. end;
  104732. procedure TCAN2_C2RXF6.setEXID; inline;
  104733. begin
  104734. pTDefRegMap(@Self)^.&set := $00080000;
  104735. end;
  104736. procedure TCAN2_C2RXF6.clearEXID; inline;
  104737. begin
  104738. pTDefRegMap(@Self)^.clr := $00080000;
  104739. end;
  104740. procedure TCAN2_C2RXF6.setEXID(thebits : TBits_1); inline;
  104741. begin
  104742. if thebits = 0 then
  104743. pTDefRegMap(@Self)^.clr := $00080000
  104744. else
  104745. pTDefRegMap(@Self)^.&set := $00080000;
  104746. end;
  104747. function TCAN2_C2RXF6.getEXID : TBits_1; inline;
  104748. begin
  104749. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104750. end;
  104751. procedure TCAN2_C2RXF6.setSID(thebits : TBits_11); inline;
  104752. begin
  104753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104754. end;
  104755. function TCAN2_C2RXF6.getSID : TBits_11; inline;
  104756. begin
  104757. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104758. end;
  104759. procedure TCAN2_C2RXF6.setw(thebits : TBits_32); inline;
  104760. begin
  104761. pTDefRegMap(@Self)^.val := thebits;
  104762. end;
  104763. function TCAN2_C2RXF6.getw : TBits_32; inline;
  104764. begin
  104765. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104766. end;
  104767. procedure TCAN2_C2RXF7.setEID(thebits : TBits_18); inline;
  104768. begin
  104769. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104770. end;
  104771. function TCAN2_C2RXF7.getEID : TBits_18; inline;
  104772. begin
  104773. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104774. end;
  104775. procedure TCAN2_C2RXF7.setEXID; inline;
  104776. begin
  104777. pTDefRegMap(@Self)^.&set := $00080000;
  104778. end;
  104779. procedure TCAN2_C2RXF7.clearEXID; inline;
  104780. begin
  104781. pTDefRegMap(@Self)^.clr := $00080000;
  104782. end;
  104783. procedure TCAN2_C2RXF7.setEXID(thebits : TBits_1); inline;
  104784. begin
  104785. if thebits = 0 then
  104786. pTDefRegMap(@Self)^.clr := $00080000
  104787. else
  104788. pTDefRegMap(@Self)^.&set := $00080000;
  104789. end;
  104790. function TCAN2_C2RXF7.getEXID : TBits_1; inline;
  104791. begin
  104792. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104793. end;
  104794. procedure TCAN2_C2RXF7.setSID(thebits : TBits_11); inline;
  104795. begin
  104796. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104797. end;
  104798. function TCAN2_C2RXF7.getSID : TBits_11; inline;
  104799. begin
  104800. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104801. end;
  104802. procedure TCAN2_C2RXF7.setw(thebits : TBits_32); inline;
  104803. begin
  104804. pTDefRegMap(@Self)^.val := thebits;
  104805. end;
  104806. function TCAN2_C2RXF7.getw : TBits_32; inline;
  104807. begin
  104808. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104809. end;
  104810. procedure TCAN2_C2RXF8.setEID(thebits : TBits_18); inline;
  104811. begin
  104812. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104813. end;
  104814. function TCAN2_C2RXF8.getEID : TBits_18; inline;
  104815. begin
  104816. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104817. end;
  104818. procedure TCAN2_C2RXF8.setEXID; inline;
  104819. begin
  104820. pTDefRegMap(@Self)^.&set := $00080000;
  104821. end;
  104822. procedure TCAN2_C2RXF8.clearEXID; inline;
  104823. begin
  104824. pTDefRegMap(@Self)^.clr := $00080000;
  104825. end;
  104826. procedure TCAN2_C2RXF8.setEXID(thebits : TBits_1); inline;
  104827. begin
  104828. if thebits = 0 then
  104829. pTDefRegMap(@Self)^.clr := $00080000
  104830. else
  104831. pTDefRegMap(@Self)^.&set := $00080000;
  104832. end;
  104833. function TCAN2_C2RXF8.getEXID : TBits_1; inline;
  104834. begin
  104835. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104836. end;
  104837. procedure TCAN2_C2RXF8.setSID(thebits : TBits_11); inline;
  104838. begin
  104839. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104840. end;
  104841. function TCAN2_C2RXF8.getSID : TBits_11; inline;
  104842. begin
  104843. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104844. end;
  104845. procedure TCAN2_C2RXF8.setw(thebits : TBits_32); inline;
  104846. begin
  104847. pTDefRegMap(@Self)^.val := thebits;
  104848. end;
  104849. function TCAN2_C2RXF8.getw : TBits_32; inline;
  104850. begin
  104851. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104852. end;
  104853. procedure TCAN2_C2RXF9.setEID(thebits : TBits_18); inline;
  104854. begin
  104855. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104856. end;
  104857. function TCAN2_C2RXF9.getEID : TBits_18; inline;
  104858. begin
  104859. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104860. end;
  104861. procedure TCAN2_C2RXF9.setEXID; inline;
  104862. begin
  104863. pTDefRegMap(@Self)^.&set := $00080000;
  104864. end;
  104865. procedure TCAN2_C2RXF9.clearEXID; inline;
  104866. begin
  104867. pTDefRegMap(@Self)^.clr := $00080000;
  104868. end;
  104869. procedure TCAN2_C2RXF9.setEXID(thebits : TBits_1); inline;
  104870. begin
  104871. if thebits = 0 then
  104872. pTDefRegMap(@Self)^.clr := $00080000
  104873. else
  104874. pTDefRegMap(@Self)^.&set := $00080000;
  104875. end;
  104876. function TCAN2_C2RXF9.getEXID : TBits_1; inline;
  104877. begin
  104878. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104879. end;
  104880. procedure TCAN2_C2RXF9.setSID(thebits : TBits_11); inline;
  104881. begin
  104882. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104883. end;
  104884. function TCAN2_C2RXF9.getSID : TBits_11; inline;
  104885. begin
  104886. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104887. end;
  104888. procedure TCAN2_C2RXF9.setw(thebits : TBits_32); inline;
  104889. begin
  104890. pTDefRegMap(@Self)^.val := thebits;
  104891. end;
  104892. function TCAN2_C2RXF9.getw : TBits_32; inline;
  104893. begin
  104894. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104895. end;
  104896. procedure TCAN2_C2RXF10.setEID(thebits : TBits_18); inline;
  104897. begin
  104898. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104899. end;
  104900. function TCAN2_C2RXF10.getEID : TBits_18; inline;
  104901. begin
  104902. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104903. end;
  104904. procedure TCAN2_C2RXF10.setEXID; inline;
  104905. begin
  104906. pTDefRegMap(@Self)^.&set := $00080000;
  104907. end;
  104908. procedure TCAN2_C2RXF10.clearEXID; inline;
  104909. begin
  104910. pTDefRegMap(@Self)^.clr := $00080000;
  104911. end;
  104912. procedure TCAN2_C2RXF10.setEXID(thebits : TBits_1); inline;
  104913. begin
  104914. if thebits = 0 then
  104915. pTDefRegMap(@Self)^.clr := $00080000
  104916. else
  104917. pTDefRegMap(@Self)^.&set := $00080000;
  104918. end;
  104919. function TCAN2_C2RXF10.getEXID : TBits_1; inline;
  104920. begin
  104921. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104922. end;
  104923. procedure TCAN2_C2RXF10.setSID(thebits : TBits_11); inline;
  104924. begin
  104925. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104926. end;
  104927. function TCAN2_C2RXF10.getSID : TBits_11; inline;
  104928. begin
  104929. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104930. end;
  104931. procedure TCAN2_C2RXF10.setw(thebits : TBits_32); inline;
  104932. begin
  104933. pTDefRegMap(@Self)^.val := thebits;
  104934. end;
  104935. function TCAN2_C2RXF10.getw : TBits_32; inline;
  104936. begin
  104937. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104938. end;
  104939. procedure TCAN2_C2RXF11.setEID(thebits : TBits_18); inline;
  104940. begin
  104941. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104942. end;
  104943. function TCAN2_C2RXF11.getEID : TBits_18; inline;
  104944. begin
  104945. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104946. end;
  104947. procedure TCAN2_C2RXF11.setEXID; inline;
  104948. begin
  104949. pTDefRegMap(@Self)^.&set := $00080000;
  104950. end;
  104951. procedure TCAN2_C2RXF11.clearEXID; inline;
  104952. begin
  104953. pTDefRegMap(@Self)^.clr := $00080000;
  104954. end;
  104955. procedure TCAN2_C2RXF11.setEXID(thebits : TBits_1); inline;
  104956. begin
  104957. if thebits = 0 then
  104958. pTDefRegMap(@Self)^.clr := $00080000
  104959. else
  104960. pTDefRegMap(@Self)^.&set := $00080000;
  104961. end;
  104962. function TCAN2_C2RXF11.getEXID : TBits_1; inline;
  104963. begin
  104964. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104965. end;
  104966. procedure TCAN2_C2RXF11.setSID(thebits : TBits_11); inline;
  104967. begin
  104968. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  104969. end;
  104970. function TCAN2_C2RXF11.getSID : TBits_11; inline;
  104971. begin
  104972. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  104973. end;
  104974. procedure TCAN2_C2RXF11.setw(thebits : TBits_32); inline;
  104975. begin
  104976. pTDefRegMap(@Self)^.val := thebits;
  104977. end;
  104978. function TCAN2_C2RXF11.getw : TBits_32; inline;
  104979. begin
  104980. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104981. end;
  104982. procedure TCAN2_C2RXF12.setEID(thebits : TBits_18); inline;
  104983. begin
  104984. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  104985. end;
  104986. function TCAN2_C2RXF12.getEID : TBits_18; inline;
  104987. begin
  104988. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  104989. end;
  104990. procedure TCAN2_C2RXF12.setEXID; inline;
  104991. begin
  104992. pTDefRegMap(@Self)^.&set := $00080000;
  104993. end;
  104994. procedure TCAN2_C2RXF12.clearEXID; inline;
  104995. begin
  104996. pTDefRegMap(@Self)^.clr := $00080000;
  104997. end;
  104998. procedure TCAN2_C2RXF12.setEXID(thebits : TBits_1); inline;
  104999. begin
  105000. if thebits = 0 then
  105001. pTDefRegMap(@Self)^.clr := $00080000
  105002. else
  105003. pTDefRegMap(@Self)^.&set := $00080000;
  105004. end;
  105005. function TCAN2_C2RXF12.getEXID : TBits_1; inline;
  105006. begin
  105007. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105008. end;
  105009. procedure TCAN2_C2RXF12.setSID(thebits : TBits_11); inline;
  105010. begin
  105011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105012. end;
  105013. function TCAN2_C2RXF12.getSID : TBits_11; inline;
  105014. begin
  105015. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105016. end;
  105017. procedure TCAN2_C2RXF12.setw(thebits : TBits_32); inline;
  105018. begin
  105019. pTDefRegMap(@Self)^.val := thebits;
  105020. end;
  105021. function TCAN2_C2RXF12.getw : TBits_32; inline;
  105022. begin
  105023. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105024. end;
  105025. procedure TCAN2_C2RXF13.setEID(thebits : TBits_18); inline;
  105026. begin
  105027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105028. end;
  105029. function TCAN2_C2RXF13.getEID : TBits_18; inline;
  105030. begin
  105031. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105032. end;
  105033. procedure TCAN2_C2RXF13.setEXID; inline;
  105034. begin
  105035. pTDefRegMap(@Self)^.&set := $00080000;
  105036. end;
  105037. procedure TCAN2_C2RXF13.clearEXID; inline;
  105038. begin
  105039. pTDefRegMap(@Self)^.clr := $00080000;
  105040. end;
  105041. procedure TCAN2_C2RXF13.setEXID(thebits : TBits_1); inline;
  105042. begin
  105043. if thebits = 0 then
  105044. pTDefRegMap(@Self)^.clr := $00080000
  105045. else
  105046. pTDefRegMap(@Self)^.&set := $00080000;
  105047. end;
  105048. function TCAN2_C2RXF13.getEXID : TBits_1; inline;
  105049. begin
  105050. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105051. end;
  105052. procedure TCAN2_C2RXF13.setSID(thebits : TBits_11); inline;
  105053. begin
  105054. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105055. end;
  105056. function TCAN2_C2RXF13.getSID : TBits_11; inline;
  105057. begin
  105058. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105059. end;
  105060. procedure TCAN2_C2RXF13.setw(thebits : TBits_32); inline;
  105061. begin
  105062. pTDefRegMap(@Self)^.val := thebits;
  105063. end;
  105064. function TCAN2_C2RXF13.getw : TBits_32; inline;
  105065. begin
  105066. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105067. end;
  105068. procedure TCAN2_C2RXF14.setEID(thebits : TBits_18); inline;
  105069. begin
  105070. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105071. end;
  105072. function TCAN2_C2RXF14.getEID : TBits_18; inline;
  105073. begin
  105074. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105075. end;
  105076. procedure TCAN2_C2RXF14.setEXID; inline;
  105077. begin
  105078. pTDefRegMap(@Self)^.&set := $00080000;
  105079. end;
  105080. procedure TCAN2_C2RXF14.clearEXID; inline;
  105081. begin
  105082. pTDefRegMap(@Self)^.clr := $00080000;
  105083. end;
  105084. procedure TCAN2_C2RXF14.setEXID(thebits : TBits_1); inline;
  105085. begin
  105086. if thebits = 0 then
  105087. pTDefRegMap(@Self)^.clr := $00080000
  105088. else
  105089. pTDefRegMap(@Self)^.&set := $00080000;
  105090. end;
  105091. function TCAN2_C2RXF14.getEXID : TBits_1; inline;
  105092. begin
  105093. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105094. end;
  105095. procedure TCAN2_C2RXF14.setSID(thebits : TBits_11); inline;
  105096. begin
  105097. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105098. end;
  105099. function TCAN2_C2RXF14.getSID : TBits_11; inline;
  105100. begin
  105101. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105102. end;
  105103. procedure TCAN2_C2RXF14.setw(thebits : TBits_32); inline;
  105104. begin
  105105. pTDefRegMap(@Self)^.val := thebits;
  105106. end;
  105107. function TCAN2_C2RXF14.getw : TBits_32; inline;
  105108. begin
  105109. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105110. end;
  105111. procedure TCAN2_C2RXF15.setEID(thebits : TBits_18); inline;
  105112. begin
  105113. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105114. end;
  105115. function TCAN2_C2RXF15.getEID : TBits_18; inline;
  105116. begin
  105117. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105118. end;
  105119. procedure TCAN2_C2RXF15.setEXID; inline;
  105120. begin
  105121. pTDefRegMap(@Self)^.&set := $00080000;
  105122. end;
  105123. procedure TCAN2_C2RXF15.clearEXID; inline;
  105124. begin
  105125. pTDefRegMap(@Self)^.clr := $00080000;
  105126. end;
  105127. procedure TCAN2_C2RXF15.setEXID(thebits : TBits_1); inline;
  105128. begin
  105129. if thebits = 0 then
  105130. pTDefRegMap(@Self)^.clr := $00080000
  105131. else
  105132. pTDefRegMap(@Self)^.&set := $00080000;
  105133. end;
  105134. function TCAN2_C2RXF15.getEXID : TBits_1; inline;
  105135. begin
  105136. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105137. end;
  105138. procedure TCAN2_C2RXF15.setSID(thebits : TBits_11); inline;
  105139. begin
  105140. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105141. end;
  105142. function TCAN2_C2RXF15.getSID : TBits_11; inline;
  105143. begin
  105144. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105145. end;
  105146. procedure TCAN2_C2RXF15.setw(thebits : TBits_32); inline;
  105147. begin
  105148. pTDefRegMap(@Self)^.val := thebits;
  105149. end;
  105150. function TCAN2_C2RXF15.getw : TBits_32; inline;
  105151. begin
  105152. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105153. end;
  105154. procedure TCAN2_C2RXF16.setEID(thebits : TBits_18); inline;
  105155. begin
  105156. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105157. end;
  105158. function TCAN2_C2RXF16.getEID : TBits_18; inline;
  105159. begin
  105160. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105161. end;
  105162. procedure TCAN2_C2RXF16.setEXID; inline;
  105163. begin
  105164. pTDefRegMap(@Self)^.&set := $00080000;
  105165. end;
  105166. procedure TCAN2_C2RXF16.clearEXID; inline;
  105167. begin
  105168. pTDefRegMap(@Self)^.clr := $00080000;
  105169. end;
  105170. procedure TCAN2_C2RXF16.setEXID(thebits : TBits_1); inline;
  105171. begin
  105172. if thebits = 0 then
  105173. pTDefRegMap(@Self)^.clr := $00080000
  105174. else
  105175. pTDefRegMap(@Self)^.&set := $00080000;
  105176. end;
  105177. function TCAN2_C2RXF16.getEXID : TBits_1; inline;
  105178. begin
  105179. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105180. end;
  105181. procedure TCAN2_C2RXF16.setSID(thebits : TBits_11); inline;
  105182. begin
  105183. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105184. end;
  105185. function TCAN2_C2RXF16.getSID : TBits_11; inline;
  105186. begin
  105187. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105188. end;
  105189. procedure TCAN2_C2RXF16.setw(thebits : TBits_32); inline;
  105190. begin
  105191. pTDefRegMap(@Self)^.val := thebits;
  105192. end;
  105193. function TCAN2_C2RXF16.getw : TBits_32; inline;
  105194. begin
  105195. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105196. end;
  105197. procedure TCAN2_C2RXF17.setEID(thebits : TBits_18); inline;
  105198. begin
  105199. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105200. end;
  105201. function TCAN2_C2RXF17.getEID : TBits_18; inline;
  105202. begin
  105203. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105204. end;
  105205. procedure TCAN2_C2RXF17.setEXID; inline;
  105206. begin
  105207. pTDefRegMap(@Self)^.&set := $00080000;
  105208. end;
  105209. procedure TCAN2_C2RXF17.clearEXID; inline;
  105210. begin
  105211. pTDefRegMap(@Self)^.clr := $00080000;
  105212. end;
  105213. procedure TCAN2_C2RXF17.setEXID(thebits : TBits_1); inline;
  105214. begin
  105215. if thebits = 0 then
  105216. pTDefRegMap(@Self)^.clr := $00080000
  105217. else
  105218. pTDefRegMap(@Self)^.&set := $00080000;
  105219. end;
  105220. function TCAN2_C2RXF17.getEXID : TBits_1; inline;
  105221. begin
  105222. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105223. end;
  105224. procedure TCAN2_C2RXF17.setSID(thebits : TBits_11); inline;
  105225. begin
  105226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105227. end;
  105228. function TCAN2_C2RXF17.getSID : TBits_11; inline;
  105229. begin
  105230. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105231. end;
  105232. procedure TCAN2_C2RXF17.setw(thebits : TBits_32); inline;
  105233. begin
  105234. pTDefRegMap(@Self)^.val := thebits;
  105235. end;
  105236. function TCAN2_C2RXF17.getw : TBits_32; inline;
  105237. begin
  105238. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105239. end;
  105240. procedure TCAN2_C2RXF18.setEID(thebits : TBits_18); inline;
  105241. begin
  105242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105243. end;
  105244. function TCAN2_C2RXF18.getEID : TBits_18; inline;
  105245. begin
  105246. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105247. end;
  105248. procedure TCAN2_C2RXF18.setEXID; inline;
  105249. begin
  105250. pTDefRegMap(@Self)^.&set := $00080000;
  105251. end;
  105252. procedure TCAN2_C2RXF18.clearEXID; inline;
  105253. begin
  105254. pTDefRegMap(@Self)^.clr := $00080000;
  105255. end;
  105256. procedure TCAN2_C2RXF18.setEXID(thebits : TBits_1); inline;
  105257. begin
  105258. if thebits = 0 then
  105259. pTDefRegMap(@Self)^.clr := $00080000
  105260. else
  105261. pTDefRegMap(@Self)^.&set := $00080000;
  105262. end;
  105263. function TCAN2_C2RXF18.getEXID : TBits_1; inline;
  105264. begin
  105265. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105266. end;
  105267. procedure TCAN2_C2RXF18.setSID(thebits : TBits_11); inline;
  105268. begin
  105269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105270. end;
  105271. function TCAN2_C2RXF18.getSID : TBits_11; inline;
  105272. begin
  105273. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105274. end;
  105275. procedure TCAN2_C2RXF18.setw(thebits : TBits_32); inline;
  105276. begin
  105277. pTDefRegMap(@Self)^.val := thebits;
  105278. end;
  105279. function TCAN2_C2RXF18.getw : TBits_32; inline;
  105280. begin
  105281. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105282. end;
  105283. procedure TCAN2_C2RXF19.setEID(thebits : TBits_18); inline;
  105284. begin
  105285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105286. end;
  105287. function TCAN2_C2RXF19.getEID : TBits_18; inline;
  105288. begin
  105289. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105290. end;
  105291. procedure TCAN2_C2RXF19.setEXID; inline;
  105292. begin
  105293. pTDefRegMap(@Self)^.&set := $00080000;
  105294. end;
  105295. procedure TCAN2_C2RXF19.clearEXID; inline;
  105296. begin
  105297. pTDefRegMap(@Self)^.clr := $00080000;
  105298. end;
  105299. procedure TCAN2_C2RXF19.setEXID(thebits : TBits_1); inline;
  105300. begin
  105301. if thebits = 0 then
  105302. pTDefRegMap(@Self)^.clr := $00080000
  105303. else
  105304. pTDefRegMap(@Self)^.&set := $00080000;
  105305. end;
  105306. function TCAN2_C2RXF19.getEXID : TBits_1; inline;
  105307. begin
  105308. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105309. end;
  105310. procedure TCAN2_C2RXF19.setSID(thebits : TBits_11); inline;
  105311. begin
  105312. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105313. end;
  105314. function TCAN2_C2RXF19.getSID : TBits_11; inline;
  105315. begin
  105316. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105317. end;
  105318. procedure TCAN2_C2RXF19.setw(thebits : TBits_32); inline;
  105319. begin
  105320. pTDefRegMap(@Self)^.val := thebits;
  105321. end;
  105322. function TCAN2_C2RXF19.getw : TBits_32; inline;
  105323. begin
  105324. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105325. end;
  105326. procedure TCAN2_C2RXF20.setEID(thebits : TBits_18); inline;
  105327. begin
  105328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105329. end;
  105330. function TCAN2_C2RXF20.getEID : TBits_18; inline;
  105331. begin
  105332. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105333. end;
  105334. procedure TCAN2_C2RXF20.setEXID; inline;
  105335. begin
  105336. pTDefRegMap(@Self)^.&set := $00080000;
  105337. end;
  105338. procedure TCAN2_C2RXF20.clearEXID; inline;
  105339. begin
  105340. pTDefRegMap(@Self)^.clr := $00080000;
  105341. end;
  105342. procedure TCAN2_C2RXF20.setEXID(thebits : TBits_1); inline;
  105343. begin
  105344. if thebits = 0 then
  105345. pTDefRegMap(@Self)^.clr := $00080000
  105346. else
  105347. pTDefRegMap(@Self)^.&set := $00080000;
  105348. end;
  105349. function TCAN2_C2RXF20.getEXID : TBits_1; inline;
  105350. begin
  105351. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105352. end;
  105353. procedure TCAN2_C2RXF20.setSID(thebits : TBits_11); inline;
  105354. begin
  105355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105356. end;
  105357. function TCAN2_C2RXF20.getSID : TBits_11; inline;
  105358. begin
  105359. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105360. end;
  105361. procedure TCAN2_C2RXF20.setw(thebits : TBits_32); inline;
  105362. begin
  105363. pTDefRegMap(@Self)^.val := thebits;
  105364. end;
  105365. function TCAN2_C2RXF20.getw : TBits_32; inline;
  105366. begin
  105367. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105368. end;
  105369. procedure TCAN2_C2RXF21.setEID(thebits : TBits_18); inline;
  105370. begin
  105371. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105372. end;
  105373. function TCAN2_C2RXF21.getEID : TBits_18; inline;
  105374. begin
  105375. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105376. end;
  105377. procedure TCAN2_C2RXF21.setEXID; inline;
  105378. begin
  105379. pTDefRegMap(@Self)^.&set := $00080000;
  105380. end;
  105381. procedure TCAN2_C2RXF21.clearEXID; inline;
  105382. begin
  105383. pTDefRegMap(@Self)^.clr := $00080000;
  105384. end;
  105385. procedure TCAN2_C2RXF21.setEXID(thebits : TBits_1); inline;
  105386. begin
  105387. if thebits = 0 then
  105388. pTDefRegMap(@Self)^.clr := $00080000
  105389. else
  105390. pTDefRegMap(@Self)^.&set := $00080000;
  105391. end;
  105392. function TCAN2_C2RXF21.getEXID : TBits_1; inline;
  105393. begin
  105394. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105395. end;
  105396. procedure TCAN2_C2RXF21.setSID(thebits : TBits_11); inline;
  105397. begin
  105398. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105399. end;
  105400. function TCAN2_C2RXF21.getSID : TBits_11; inline;
  105401. begin
  105402. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105403. end;
  105404. procedure TCAN2_C2RXF21.setw(thebits : TBits_32); inline;
  105405. begin
  105406. pTDefRegMap(@Self)^.val := thebits;
  105407. end;
  105408. function TCAN2_C2RXF21.getw : TBits_32; inline;
  105409. begin
  105410. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105411. end;
  105412. procedure TCAN2_C2RXF22.setEID(thebits : TBits_18); inline;
  105413. begin
  105414. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105415. end;
  105416. function TCAN2_C2RXF22.getEID : TBits_18; inline;
  105417. begin
  105418. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105419. end;
  105420. procedure TCAN2_C2RXF22.setEXID; inline;
  105421. begin
  105422. pTDefRegMap(@Self)^.&set := $00080000;
  105423. end;
  105424. procedure TCAN2_C2RXF22.clearEXID; inline;
  105425. begin
  105426. pTDefRegMap(@Self)^.clr := $00080000;
  105427. end;
  105428. procedure TCAN2_C2RXF22.setEXID(thebits : TBits_1); inline;
  105429. begin
  105430. if thebits = 0 then
  105431. pTDefRegMap(@Self)^.clr := $00080000
  105432. else
  105433. pTDefRegMap(@Self)^.&set := $00080000;
  105434. end;
  105435. function TCAN2_C2RXF22.getEXID : TBits_1; inline;
  105436. begin
  105437. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105438. end;
  105439. procedure TCAN2_C2RXF22.setSID(thebits : TBits_11); inline;
  105440. begin
  105441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105442. end;
  105443. function TCAN2_C2RXF22.getSID : TBits_11; inline;
  105444. begin
  105445. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105446. end;
  105447. procedure TCAN2_C2RXF22.setw(thebits : TBits_32); inline;
  105448. begin
  105449. pTDefRegMap(@Self)^.val := thebits;
  105450. end;
  105451. function TCAN2_C2RXF22.getw : TBits_32; inline;
  105452. begin
  105453. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105454. end;
  105455. procedure TCAN2_C2RXF23.setEID(thebits : TBits_18); inline;
  105456. begin
  105457. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105458. end;
  105459. function TCAN2_C2RXF23.getEID : TBits_18; inline;
  105460. begin
  105461. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105462. end;
  105463. procedure TCAN2_C2RXF23.setEXID; inline;
  105464. begin
  105465. pTDefRegMap(@Self)^.&set := $00080000;
  105466. end;
  105467. procedure TCAN2_C2RXF23.clearEXID; inline;
  105468. begin
  105469. pTDefRegMap(@Self)^.clr := $00080000;
  105470. end;
  105471. procedure TCAN2_C2RXF23.setEXID(thebits : TBits_1); inline;
  105472. begin
  105473. if thebits = 0 then
  105474. pTDefRegMap(@Self)^.clr := $00080000
  105475. else
  105476. pTDefRegMap(@Self)^.&set := $00080000;
  105477. end;
  105478. function TCAN2_C2RXF23.getEXID : TBits_1; inline;
  105479. begin
  105480. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105481. end;
  105482. procedure TCAN2_C2RXF23.setSID(thebits : TBits_11); inline;
  105483. begin
  105484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105485. end;
  105486. function TCAN2_C2RXF23.getSID : TBits_11; inline;
  105487. begin
  105488. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105489. end;
  105490. procedure TCAN2_C2RXF23.setw(thebits : TBits_32); inline;
  105491. begin
  105492. pTDefRegMap(@Self)^.val := thebits;
  105493. end;
  105494. function TCAN2_C2RXF23.getw : TBits_32; inline;
  105495. begin
  105496. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105497. end;
  105498. procedure TCAN2_C2RXF24.setEID(thebits : TBits_18); inline;
  105499. begin
  105500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105501. end;
  105502. function TCAN2_C2RXF24.getEID : TBits_18; inline;
  105503. begin
  105504. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105505. end;
  105506. procedure TCAN2_C2RXF24.setEXID; inline;
  105507. begin
  105508. pTDefRegMap(@Self)^.&set := $00080000;
  105509. end;
  105510. procedure TCAN2_C2RXF24.clearEXID; inline;
  105511. begin
  105512. pTDefRegMap(@Self)^.clr := $00080000;
  105513. end;
  105514. procedure TCAN2_C2RXF24.setEXID(thebits : TBits_1); inline;
  105515. begin
  105516. if thebits = 0 then
  105517. pTDefRegMap(@Self)^.clr := $00080000
  105518. else
  105519. pTDefRegMap(@Self)^.&set := $00080000;
  105520. end;
  105521. function TCAN2_C2RXF24.getEXID : TBits_1; inline;
  105522. begin
  105523. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105524. end;
  105525. procedure TCAN2_C2RXF24.setSID(thebits : TBits_11); inline;
  105526. begin
  105527. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105528. end;
  105529. function TCAN2_C2RXF24.getSID : TBits_11; inline;
  105530. begin
  105531. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105532. end;
  105533. procedure TCAN2_C2RXF24.setw(thebits : TBits_32); inline;
  105534. begin
  105535. pTDefRegMap(@Self)^.val := thebits;
  105536. end;
  105537. function TCAN2_C2RXF24.getw : TBits_32; inline;
  105538. begin
  105539. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105540. end;
  105541. procedure TCAN2_C2RXF25.setEID(thebits : TBits_18); inline;
  105542. begin
  105543. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105544. end;
  105545. function TCAN2_C2RXF25.getEID : TBits_18; inline;
  105546. begin
  105547. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105548. end;
  105549. procedure TCAN2_C2RXF25.setEXID; inline;
  105550. begin
  105551. pTDefRegMap(@Self)^.&set := $00080000;
  105552. end;
  105553. procedure TCAN2_C2RXF25.clearEXID; inline;
  105554. begin
  105555. pTDefRegMap(@Self)^.clr := $00080000;
  105556. end;
  105557. procedure TCAN2_C2RXF25.setEXID(thebits : TBits_1); inline;
  105558. begin
  105559. if thebits = 0 then
  105560. pTDefRegMap(@Self)^.clr := $00080000
  105561. else
  105562. pTDefRegMap(@Self)^.&set := $00080000;
  105563. end;
  105564. function TCAN2_C2RXF25.getEXID : TBits_1; inline;
  105565. begin
  105566. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105567. end;
  105568. procedure TCAN2_C2RXF25.setSID(thebits : TBits_11); inline;
  105569. begin
  105570. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105571. end;
  105572. function TCAN2_C2RXF25.getSID : TBits_11; inline;
  105573. begin
  105574. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105575. end;
  105576. procedure TCAN2_C2RXF25.setw(thebits : TBits_32); inline;
  105577. begin
  105578. pTDefRegMap(@Self)^.val := thebits;
  105579. end;
  105580. function TCAN2_C2RXF25.getw : TBits_32; inline;
  105581. begin
  105582. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105583. end;
  105584. procedure TCAN2_C2RXF26.setEID(thebits : TBits_18); inline;
  105585. begin
  105586. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105587. end;
  105588. function TCAN2_C2RXF26.getEID : TBits_18; inline;
  105589. begin
  105590. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105591. end;
  105592. procedure TCAN2_C2RXF26.setEXID; inline;
  105593. begin
  105594. pTDefRegMap(@Self)^.&set := $00080000;
  105595. end;
  105596. procedure TCAN2_C2RXF26.clearEXID; inline;
  105597. begin
  105598. pTDefRegMap(@Self)^.clr := $00080000;
  105599. end;
  105600. procedure TCAN2_C2RXF26.setEXID(thebits : TBits_1); inline;
  105601. begin
  105602. if thebits = 0 then
  105603. pTDefRegMap(@Self)^.clr := $00080000
  105604. else
  105605. pTDefRegMap(@Self)^.&set := $00080000;
  105606. end;
  105607. function TCAN2_C2RXF26.getEXID : TBits_1; inline;
  105608. begin
  105609. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105610. end;
  105611. procedure TCAN2_C2RXF26.setSID(thebits : TBits_11); inline;
  105612. begin
  105613. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105614. end;
  105615. function TCAN2_C2RXF26.getSID : TBits_11; inline;
  105616. begin
  105617. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105618. end;
  105619. procedure TCAN2_C2RXF26.setw(thebits : TBits_32); inline;
  105620. begin
  105621. pTDefRegMap(@Self)^.val := thebits;
  105622. end;
  105623. function TCAN2_C2RXF26.getw : TBits_32; inline;
  105624. begin
  105625. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105626. end;
  105627. procedure TCAN2_C2RXF27.setEID(thebits : TBits_18); inline;
  105628. begin
  105629. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105630. end;
  105631. function TCAN2_C2RXF27.getEID : TBits_18; inline;
  105632. begin
  105633. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105634. end;
  105635. procedure TCAN2_C2RXF27.setEXID; inline;
  105636. begin
  105637. pTDefRegMap(@Self)^.&set := $00080000;
  105638. end;
  105639. procedure TCAN2_C2RXF27.clearEXID; inline;
  105640. begin
  105641. pTDefRegMap(@Self)^.clr := $00080000;
  105642. end;
  105643. procedure TCAN2_C2RXF27.setEXID(thebits : TBits_1); inline;
  105644. begin
  105645. if thebits = 0 then
  105646. pTDefRegMap(@Self)^.clr := $00080000
  105647. else
  105648. pTDefRegMap(@Self)^.&set := $00080000;
  105649. end;
  105650. function TCAN2_C2RXF27.getEXID : TBits_1; inline;
  105651. begin
  105652. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105653. end;
  105654. procedure TCAN2_C2RXF27.setSID(thebits : TBits_11); inline;
  105655. begin
  105656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105657. end;
  105658. function TCAN2_C2RXF27.getSID : TBits_11; inline;
  105659. begin
  105660. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105661. end;
  105662. procedure TCAN2_C2RXF27.setw(thebits : TBits_32); inline;
  105663. begin
  105664. pTDefRegMap(@Self)^.val := thebits;
  105665. end;
  105666. function TCAN2_C2RXF27.getw : TBits_32; inline;
  105667. begin
  105668. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105669. end;
  105670. procedure TCAN2_C2RXF28.setEID(thebits : TBits_18); inline;
  105671. begin
  105672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105673. end;
  105674. function TCAN2_C2RXF28.getEID : TBits_18; inline;
  105675. begin
  105676. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105677. end;
  105678. procedure TCAN2_C2RXF28.setEXID; inline;
  105679. begin
  105680. pTDefRegMap(@Self)^.&set := $00080000;
  105681. end;
  105682. procedure TCAN2_C2RXF28.clearEXID; inline;
  105683. begin
  105684. pTDefRegMap(@Self)^.clr := $00080000;
  105685. end;
  105686. procedure TCAN2_C2RXF28.setEXID(thebits : TBits_1); inline;
  105687. begin
  105688. if thebits = 0 then
  105689. pTDefRegMap(@Self)^.clr := $00080000
  105690. else
  105691. pTDefRegMap(@Self)^.&set := $00080000;
  105692. end;
  105693. function TCAN2_C2RXF28.getEXID : TBits_1; inline;
  105694. begin
  105695. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105696. end;
  105697. procedure TCAN2_C2RXF28.setSID(thebits : TBits_11); inline;
  105698. begin
  105699. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105700. end;
  105701. function TCAN2_C2RXF28.getSID : TBits_11; inline;
  105702. begin
  105703. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105704. end;
  105705. procedure TCAN2_C2RXF28.setw(thebits : TBits_32); inline;
  105706. begin
  105707. pTDefRegMap(@Self)^.val := thebits;
  105708. end;
  105709. function TCAN2_C2RXF28.getw : TBits_32; inline;
  105710. begin
  105711. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105712. end;
  105713. procedure TCAN2_C2RXF29.setEID(thebits : TBits_18); inline;
  105714. begin
  105715. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105716. end;
  105717. function TCAN2_C2RXF29.getEID : TBits_18; inline;
  105718. begin
  105719. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105720. end;
  105721. procedure TCAN2_C2RXF29.setEXID; inline;
  105722. begin
  105723. pTDefRegMap(@Self)^.&set := $00080000;
  105724. end;
  105725. procedure TCAN2_C2RXF29.clearEXID; inline;
  105726. begin
  105727. pTDefRegMap(@Self)^.clr := $00080000;
  105728. end;
  105729. procedure TCAN2_C2RXF29.setEXID(thebits : TBits_1); inline;
  105730. begin
  105731. if thebits = 0 then
  105732. pTDefRegMap(@Self)^.clr := $00080000
  105733. else
  105734. pTDefRegMap(@Self)^.&set := $00080000;
  105735. end;
  105736. function TCAN2_C2RXF29.getEXID : TBits_1; inline;
  105737. begin
  105738. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105739. end;
  105740. procedure TCAN2_C2RXF29.setSID(thebits : TBits_11); inline;
  105741. begin
  105742. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105743. end;
  105744. function TCAN2_C2RXF29.getSID : TBits_11; inline;
  105745. begin
  105746. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105747. end;
  105748. procedure TCAN2_C2RXF29.setw(thebits : TBits_32); inline;
  105749. begin
  105750. pTDefRegMap(@Self)^.val := thebits;
  105751. end;
  105752. function TCAN2_C2RXF29.getw : TBits_32; inline;
  105753. begin
  105754. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105755. end;
  105756. procedure TCAN2_C2RXF30.setEID(thebits : TBits_18); inline;
  105757. begin
  105758. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105759. end;
  105760. function TCAN2_C2RXF30.getEID : TBits_18; inline;
  105761. begin
  105762. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105763. end;
  105764. procedure TCAN2_C2RXF30.setEXID; inline;
  105765. begin
  105766. pTDefRegMap(@Self)^.&set := $00080000;
  105767. end;
  105768. procedure TCAN2_C2RXF30.clearEXID; inline;
  105769. begin
  105770. pTDefRegMap(@Self)^.clr := $00080000;
  105771. end;
  105772. procedure TCAN2_C2RXF30.setEXID(thebits : TBits_1); inline;
  105773. begin
  105774. if thebits = 0 then
  105775. pTDefRegMap(@Self)^.clr := $00080000
  105776. else
  105777. pTDefRegMap(@Self)^.&set := $00080000;
  105778. end;
  105779. function TCAN2_C2RXF30.getEXID : TBits_1; inline;
  105780. begin
  105781. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105782. end;
  105783. procedure TCAN2_C2RXF30.setSID(thebits : TBits_11); inline;
  105784. begin
  105785. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105786. end;
  105787. function TCAN2_C2RXF30.getSID : TBits_11; inline;
  105788. begin
  105789. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105790. end;
  105791. procedure TCAN2_C2RXF30.setw(thebits : TBits_32); inline;
  105792. begin
  105793. pTDefRegMap(@Self)^.val := thebits;
  105794. end;
  105795. function TCAN2_C2RXF30.getw : TBits_32; inline;
  105796. begin
  105797. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105798. end;
  105799. procedure TCAN2_C2RXF31.setEID(thebits : TBits_18); inline;
  105800. begin
  105801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  105802. end;
  105803. function TCAN2_C2RXF31.getEID : TBits_18; inline;
  105804. begin
  105805. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  105806. end;
  105807. procedure TCAN2_C2RXF31.setEXID; inline;
  105808. begin
  105809. pTDefRegMap(@Self)^.&set := $00080000;
  105810. end;
  105811. procedure TCAN2_C2RXF31.clearEXID; inline;
  105812. begin
  105813. pTDefRegMap(@Self)^.clr := $00080000;
  105814. end;
  105815. procedure TCAN2_C2RXF31.setEXID(thebits : TBits_1); inline;
  105816. begin
  105817. if thebits = 0 then
  105818. pTDefRegMap(@Self)^.clr := $00080000
  105819. else
  105820. pTDefRegMap(@Self)^.&set := $00080000;
  105821. end;
  105822. function TCAN2_C2RXF31.getEXID : TBits_1; inline;
  105823. begin
  105824. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105825. end;
  105826. procedure TCAN2_C2RXF31.setSID(thebits : TBits_11); inline;
  105827. begin
  105828. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  105829. end;
  105830. function TCAN2_C2RXF31.getSID : TBits_11; inline;
  105831. begin
  105832. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  105833. end;
  105834. procedure TCAN2_C2RXF31.setw(thebits : TBits_32); inline;
  105835. begin
  105836. pTDefRegMap(@Self)^.val := thebits;
  105837. end;
  105838. function TCAN2_C2RXF31.getw : TBits_32; inline;
  105839. begin
  105840. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105841. end;
  105842. procedure TCAN2_C2FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  105843. begin
  105844. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  105845. end;
  105846. function TCAN2_C2FIFOCON0.getTXPRI : TBits_2; inline;
  105847. begin
  105848. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  105849. end;
  105850. procedure TCAN2_C2FIFOCON0.setRTREN; inline;
  105851. begin
  105852. pTDefRegMap(@Self)^.&set := $00000004;
  105853. end;
  105854. procedure TCAN2_C2FIFOCON0.clearRTREN; inline;
  105855. begin
  105856. pTDefRegMap(@Self)^.clr := $00000004;
  105857. end;
  105858. procedure TCAN2_C2FIFOCON0.setRTREN(thebits : TBits_1); inline;
  105859. begin
  105860. if thebits = 0 then
  105861. pTDefRegMap(@Self)^.clr := $00000004
  105862. else
  105863. pTDefRegMap(@Self)^.&set := $00000004;
  105864. end;
  105865. function TCAN2_C2FIFOCON0.getRTREN : TBits_1; inline;
  105866. begin
  105867. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  105868. end;
  105869. procedure TCAN2_C2FIFOCON0.setTXREQ; inline;
  105870. begin
  105871. pTDefRegMap(@Self)^.&set := $00000008;
  105872. end;
  105873. procedure TCAN2_C2FIFOCON0.clearTXREQ; inline;
  105874. begin
  105875. pTDefRegMap(@Self)^.clr := $00000008;
  105876. end;
  105877. procedure TCAN2_C2FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  105878. begin
  105879. if thebits = 0 then
  105880. pTDefRegMap(@Self)^.clr := $00000008
  105881. else
  105882. pTDefRegMap(@Self)^.&set := $00000008;
  105883. end;
  105884. function TCAN2_C2FIFOCON0.getTXREQ : TBits_1; inline;
  105885. begin
  105886. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  105887. end;
  105888. procedure TCAN2_C2FIFOCON0.setTXERR; inline;
  105889. begin
  105890. pTDefRegMap(@Self)^.&set := $00000010;
  105891. end;
  105892. procedure TCAN2_C2FIFOCON0.clearTXERR; inline;
  105893. begin
  105894. pTDefRegMap(@Self)^.clr := $00000010;
  105895. end;
  105896. procedure TCAN2_C2FIFOCON0.setTXERR(thebits : TBits_1); inline;
  105897. begin
  105898. if thebits = 0 then
  105899. pTDefRegMap(@Self)^.clr := $00000010
  105900. else
  105901. pTDefRegMap(@Self)^.&set := $00000010;
  105902. end;
  105903. function TCAN2_C2FIFOCON0.getTXERR : TBits_1; inline;
  105904. begin
  105905. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  105906. end;
  105907. procedure TCAN2_C2FIFOCON0.setTXLARB; inline;
  105908. begin
  105909. pTDefRegMap(@Self)^.&set := $00000020;
  105910. end;
  105911. procedure TCAN2_C2FIFOCON0.clearTXLARB; inline;
  105912. begin
  105913. pTDefRegMap(@Self)^.clr := $00000020;
  105914. end;
  105915. procedure TCAN2_C2FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  105916. begin
  105917. if thebits = 0 then
  105918. pTDefRegMap(@Self)^.clr := $00000020
  105919. else
  105920. pTDefRegMap(@Self)^.&set := $00000020;
  105921. end;
  105922. function TCAN2_C2FIFOCON0.getTXLARB : TBits_1; inline;
  105923. begin
  105924. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  105925. end;
  105926. procedure TCAN2_C2FIFOCON0.setTXABAT; inline;
  105927. begin
  105928. pTDefRegMap(@Self)^.&set := $00000040;
  105929. end;
  105930. procedure TCAN2_C2FIFOCON0.clearTXABAT; inline;
  105931. begin
  105932. pTDefRegMap(@Self)^.clr := $00000040;
  105933. end;
  105934. procedure TCAN2_C2FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  105935. begin
  105936. if thebits = 0 then
  105937. pTDefRegMap(@Self)^.clr := $00000040
  105938. else
  105939. pTDefRegMap(@Self)^.&set := $00000040;
  105940. end;
  105941. function TCAN2_C2FIFOCON0.getTXABAT : TBits_1; inline;
  105942. begin
  105943. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  105944. end;
  105945. procedure TCAN2_C2FIFOCON0.setTXEN; inline;
  105946. begin
  105947. pTDefRegMap(@Self)^.&set := $00000080;
  105948. end;
  105949. procedure TCAN2_C2FIFOCON0.clearTXEN; inline;
  105950. begin
  105951. pTDefRegMap(@Self)^.clr := $00000080;
  105952. end;
  105953. procedure TCAN2_C2FIFOCON0.setTXEN(thebits : TBits_1); inline;
  105954. begin
  105955. if thebits = 0 then
  105956. pTDefRegMap(@Self)^.clr := $00000080
  105957. else
  105958. pTDefRegMap(@Self)^.&set := $00000080;
  105959. end;
  105960. function TCAN2_C2FIFOCON0.getTXEN : TBits_1; inline;
  105961. begin
  105962. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  105963. end;
  105964. procedure TCAN2_C2FIFOCON0.setDONLY; inline;
  105965. begin
  105966. pTDefRegMap(@Self)^.&set := $00001000;
  105967. end;
  105968. procedure TCAN2_C2FIFOCON0.clearDONLY; inline;
  105969. begin
  105970. pTDefRegMap(@Self)^.clr := $00001000;
  105971. end;
  105972. procedure TCAN2_C2FIFOCON0.setDONLY(thebits : TBits_1); inline;
  105973. begin
  105974. if thebits = 0 then
  105975. pTDefRegMap(@Self)^.clr := $00001000
  105976. else
  105977. pTDefRegMap(@Self)^.&set := $00001000;
  105978. end;
  105979. function TCAN2_C2FIFOCON0.getDONLY : TBits_1; inline;
  105980. begin
  105981. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  105982. end;
  105983. procedure TCAN2_C2FIFOCON0.setUINC; inline;
  105984. begin
  105985. pTDefRegMap(@Self)^.&set := $00002000;
  105986. end;
  105987. procedure TCAN2_C2FIFOCON0.clearUINC; inline;
  105988. begin
  105989. pTDefRegMap(@Self)^.clr := $00002000;
  105990. end;
  105991. procedure TCAN2_C2FIFOCON0.setUINC(thebits : TBits_1); inline;
  105992. begin
  105993. if thebits = 0 then
  105994. pTDefRegMap(@Self)^.clr := $00002000
  105995. else
  105996. pTDefRegMap(@Self)^.&set := $00002000;
  105997. end;
  105998. function TCAN2_C2FIFOCON0.getUINC : TBits_1; inline;
  105999. begin
  106000. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  106001. end;
  106002. procedure TCAN2_C2FIFOCON0.setFRESET; inline;
  106003. begin
  106004. pTDefRegMap(@Self)^.&set := $00004000;
  106005. end;
  106006. procedure TCAN2_C2FIFOCON0.clearFRESET; inline;
  106007. begin
  106008. pTDefRegMap(@Self)^.clr := $00004000;
  106009. end;
  106010. procedure TCAN2_C2FIFOCON0.setFRESET(thebits : TBits_1); inline;
  106011. begin
  106012. if thebits = 0 then
  106013. pTDefRegMap(@Self)^.clr := $00004000
  106014. else
  106015. pTDefRegMap(@Self)^.&set := $00004000;
  106016. end;
  106017. function TCAN2_C2FIFOCON0.getFRESET : TBits_1; inline;
  106018. begin
  106019. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  106020. end;
  106021. procedure TCAN2_C2FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  106022. begin
  106023. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  106024. end;
  106025. function TCAN2_C2FIFOCON0.getFSIZE : TBits_5; inline;
  106026. begin
  106027. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  106028. end;
  106029. procedure TCAN2_C2FIFOCON0.setw(thebits : TBits_32); inline;
  106030. begin
  106031. pTDefRegMap(@Self)^.val := thebits;
  106032. end;
  106033. function TCAN2_C2FIFOCON0.getw : TBits_32; inline;
  106034. begin
  106035. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106036. end;
  106037. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIF; inline;
  106038. begin
  106039. pTDefRegMap(@Self)^.&set := $00000001;
  106040. end;
  106041. procedure TCAN2_C2FIFOINT0.clearRXNEMPTYIF; inline;
  106042. begin
  106043. pTDefRegMap(@Self)^.clr := $00000001;
  106044. end;
  106045. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  106046. begin
  106047. if thebits = 0 then
  106048. pTDefRegMap(@Self)^.clr := $00000001
  106049. else
  106050. pTDefRegMap(@Self)^.&set := $00000001;
  106051. end;
  106052. function TCAN2_C2FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  106053. begin
  106054. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  106055. end;
  106056. procedure TCAN2_C2FIFOINT0.setRXHALFIF; inline;
  106057. begin
  106058. pTDefRegMap(@Self)^.&set := $00000002;
  106059. end;
  106060. procedure TCAN2_C2FIFOINT0.clearRXHALFIF; inline;
  106061. begin
  106062. pTDefRegMap(@Self)^.clr := $00000002;
  106063. end;
  106064. procedure TCAN2_C2FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  106065. begin
  106066. if thebits = 0 then
  106067. pTDefRegMap(@Self)^.clr := $00000002
  106068. else
  106069. pTDefRegMap(@Self)^.&set := $00000002;
  106070. end;
  106071. function TCAN2_C2FIFOINT0.getRXHALFIF : TBits_1; inline;
  106072. begin
  106073. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  106074. end;
  106075. procedure TCAN2_C2FIFOINT0.setRXFULLIF; inline;
  106076. begin
  106077. pTDefRegMap(@Self)^.&set := $00000004;
  106078. end;
  106079. procedure TCAN2_C2FIFOINT0.clearRXFULLIF; inline;
  106080. begin
  106081. pTDefRegMap(@Self)^.clr := $00000004;
  106082. end;
  106083. procedure TCAN2_C2FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  106084. begin
  106085. if thebits = 0 then
  106086. pTDefRegMap(@Self)^.clr := $00000004
  106087. else
  106088. pTDefRegMap(@Self)^.&set := $00000004;
  106089. end;
  106090. function TCAN2_C2FIFOINT0.getRXFULLIF : TBits_1; inline;
  106091. begin
  106092. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106093. end;
  106094. procedure TCAN2_C2FIFOINT0.setRXOVFLIF; inline;
  106095. begin
  106096. pTDefRegMap(@Self)^.&set := $00000008;
  106097. end;
  106098. procedure TCAN2_C2FIFOINT0.clearRXOVFLIF; inline;
  106099. begin
  106100. pTDefRegMap(@Self)^.clr := $00000008;
  106101. end;
  106102. procedure TCAN2_C2FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  106103. begin
  106104. if thebits = 0 then
  106105. pTDefRegMap(@Self)^.clr := $00000008
  106106. else
  106107. pTDefRegMap(@Self)^.&set := $00000008;
  106108. end;
  106109. function TCAN2_C2FIFOINT0.getRXOVFLIF : TBits_1; inline;
  106110. begin
  106111. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106112. end;
  106113. procedure TCAN2_C2FIFOINT0.setTXEMPTYIF; inline;
  106114. begin
  106115. pTDefRegMap(@Self)^.&set := $00000100;
  106116. end;
  106117. procedure TCAN2_C2FIFOINT0.clearTXEMPTYIF; inline;
  106118. begin
  106119. pTDefRegMap(@Self)^.clr := $00000100;
  106120. end;
  106121. procedure TCAN2_C2FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  106122. begin
  106123. if thebits = 0 then
  106124. pTDefRegMap(@Self)^.clr := $00000100
  106125. else
  106126. pTDefRegMap(@Self)^.&set := $00000100;
  106127. end;
  106128. function TCAN2_C2FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  106129. begin
  106130. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  106131. end;
  106132. procedure TCAN2_C2FIFOINT0.setTXHALFIF; inline;
  106133. begin
  106134. pTDefRegMap(@Self)^.&set := $00000200;
  106135. end;
  106136. procedure TCAN2_C2FIFOINT0.clearTXHALFIF; inline;
  106137. begin
  106138. pTDefRegMap(@Self)^.clr := $00000200;
  106139. end;
  106140. procedure TCAN2_C2FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  106141. begin
  106142. if thebits = 0 then
  106143. pTDefRegMap(@Self)^.clr := $00000200
  106144. else
  106145. pTDefRegMap(@Self)^.&set := $00000200;
  106146. end;
  106147. function TCAN2_C2FIFOINT0.getTXHALFIF : TBits_1; inline;
  106148. begin
  106149. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  106150. end;
  106151. procedure TCAN2_C2FIFOINT0.setTXNFULLIF; inline;
  106152. begin
  106153. pTDefRegMap(@Self)^.&set := $00000400;
  106154. end;
  106155. procedure TCAN2_C2FIFOINT0.clearTXNFULLIF; inline;
  106156. begin
  106157. pTDefRegMap(@Self)^.clr := $00000400;
  106158. end;
  106159. procedure TCAN2_C2FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  106160. begin
  106161. if thebits = 0 then
  106162. pTDefRegMap(@Self)^.clr := $00000400
  106163. else
  106164. pTDefRegMap(@Self)^.&set := $00000400;
  106165. end;
  106166. function TCAN2_C2FIFOINT0.getTXNFULLIF : TBits_1; inline;
  106167. begin
  106168. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  106169. end;
  106170. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIE; inline;
  106171. begin
  106172. pTDefRegMap(@Self)^.&set := $00010000;
  106173. end;
  106174. procedure TCAN2_C2FIFOINT0.clearRXNEMPTYIE; inline;
  106175. begin
  106176. pTDefRegMap(@Self)^.clr := $00010000;
  106177. end;
  106178. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  106179. begin
  106180. if thebits = 0 then
  106181. pTDefRegMap(@Self)^.clr := $00010000
  106182. else
  106183. pTDefRegMap(@Self)^.&set := $00010000;
  106184. end;
  106185. function TCAN2_C2FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  106186. begin
  106187. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  106188. end;
  106189. procedure TCAN2_C2FIFOINT0.setRXHALFIE; inline;
  106190. begin
  106191. pTDefRegMap(@Self)^.&set := $00020000;
  106192. end;
  106193. procedure TCAN2_C2FIFOINT0.clearRXHALFIE; inline;
  106194. begin
  106195. pTDefRegMap(@Self)^.clr := $00020000;
  106196. end;
  106197. procedure TCAN2_C2FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  106198. begin
  106199. if thebits = 0 then
  106200. pTDefRegMap(@Self)^.clr := $00020000
  106201. else
  106202. pTDefRegMap(@Self)^.&set := $00020000;
  106203. end;
  106204. function TCAN2_C2FIFOINT0.getRXHALFIE : TBits_1; inline;
  106205. begin
  106206. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  106207. end;
  106208. procedure TCAN2_C2FIFOINT0.setRXFULLIE; inline;
  106209. begin
  106210. pTDefRegMap(@Self)^.&set := $00040000;
  106211. end;
  106212. procedure TCAN2_C2FIFOINT0.clearRXFULLIE; inline;
  106213. begin
  106214. pTDefRegMap(@Self)^.clr := $00040000;
  106215. end;
  106216. procedure TCAN2_C2FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  106217. begin
  106218. if thebits = 0 then
  106219. pTDefRegMap(@Self)^.clr := $00040000
  106220. else
  106221. pTDefRegMap(@Self)^.&set := $00040000;
  106222. end;
  106223. function TCAN2_C2FIFOINT0.getRXFULLIE : TBits_1; inline;
  106224. begin
  106225. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  106226. end;
  106227. procedure TCAN2_C2FIFOINT0.setRXOVFLIE; inline;
  106228. begin
  106229. pTDefRegMap(@Self)^.&set := $00080000;
  106230. end;
  106231. procedure TCAN2_C2FIFOINT0.clearRXOVFLIE; inline;
  106232. begin
  106233. pTDefRegMap(@Self)^.clr := $00080000;
  106234. end;
  106235. procedure TCAN2_C2FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  106236. begin
  106237. if thebits = 0 then
  106238. pTDefRegMap(@Self)^.clr := $00080000
  106239. else
  106240. pTDefRegMap(@Self)^.&set := $00080000;
  106241. end;
  106242. function TCAN2_C2FIFOINT0.getRXOVFLIE : TBits_1; inline;
  106243. begin
  106244. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  106245. end;
  106246. procedure TCAN2_C2FIFOINT0.setTXEMPTYIE; inline;
  106247. begin
  106248. pTDefRegMap(@Self)^.&set := $01000000;
  106249. end;
  106250. procedure TCAN2_C2FIFOINT0.clearTXEMPTYIE; inline;
  106251. begin
  106252. pTDefRegMap(@Self)^.clr := $01000000;
  106253. end;
  106254. procedure TCAN2_C2FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  106255. begin
  106256. if thebits = 0 then
  106257. pTDefRegMap(@Self)^.clr := $01000000
  106258. else
  106259. pTDefRegMap(@Self)^.&set := $01000000;
  106260. end;
  106261. function TCAN2_C2FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  106262. begin
  106263. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  106264. end;
  106265. procedure TCAN2_C2FIFOINT0.setTXHALFIE; inline;
  106266. begin
  106267. pTDefRegMap(@Self)^.&set := $02000000;
  106268. end;
  106269. procedure TCAN2_C2FIFOINT0.clearTXHALFIE; inline;
  106270. begin
  106271. pTDefRegMap(@Self)^.clr := $02000000;
  106272. end;
  106273. procedure TCAN2_C2FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  106274. begin
  106275. if thebits = 0 then
  106276. pTDefRegMap(@Self)^.clr := $02000000
  106277. else
  106278. pTDefRegMap(@Self)^.&set := $02000000;
  106279. end;
  106280. function TCAN2_C2FIFOINT0.getTXHALFIE : TBits_1; inline;
  106281. begin
  106282. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  106283. end;
  106284. procedure TCAN2_C2FIFOINT0.setTXNFULLIE; inline;
  106285. begin
  106286. pTDefRegMap(@Self)^.&set := $04000000;
  106287. end;
  106288. procedure TCAN2_C2FIFOINT0.clearTXNFULLIE; inline;
  106289. begin
  106290. pTDefRegMap(@Self)^.clr := $04000000;
  106291. end;
  106292. procedure TCAN2_C2FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  106293. begin
  106294. if thebits = 0 then
  106295. pTDefRegMap(@Self)^.clr := $04000000
  106296. else
  106297. pTDefRegMap(@Self)^.&set := $04000000;
  106298. end;
  106299. function TCAN2_C2FIFOINT0.getTXNFULLIE : TBits_1; inline;
  106300. begin
  106301. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  106302. end;
  106303. procedure TCAN2_C2FIFOINT0.setw(thebits : TBits_32); inline;
  106304. begin
  106305. pTDefRegMap(@Self)^.val := thebits;
  106306. end;
  106307. function TCAN2_C2FIFOINT0.getw : TBits_32; inline;
  106308. begin
  106309. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106310. end;
  106311. procedure TCAN2_C2FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  106312. begin
  106313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  106314. end;
  106315. function TCAN2_C2FIFOCI0.getCFIFOCI : TBits_5; inline;
  106316. begin
  106317. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  106318. end;
  106319. procedure TCAN2_C2FIFOCI0.setw(thebits : TBits_32); inline;
  106320. begin
  106321. pTDefRegMap(@Self)^.val := thebits;
  106322. end;
  106323. function TCAN2_C2FIFOCI0.getw : TBits_32; inline;
  106324. begin
  106325. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106326. end;
  106327. procedure TCAN2_C2FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  106328. begin
  106329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  106330. end;
  106331. function TCAN2_C2FIFOCON1.getTXPRI : TBits_2; inline;
  106332. begin
  106333. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  106334. end;
  106335. procedure TCAN2_C2FIFOCON1.setRTREN; inline;
  106336. begin
  106337. pTDefRegMap(@Self)^.&set := $00000004;
  106338. end;
  106339. procedure TCAN2_C2FIFOCON1.clearRTREN; inline;
  106340. begin
  106341. pTDefRegMap(@Self)^.clr := $00000004;
  106342. end;
  106343. procedure TCAN2_C2FIFOCON1.setRTREN(thebits : TBits_1); inline;
  106344. begin
  106345. if thebits = 0 then
  106346. pTDefRegMap(@Self)^.clr := $00000004
  106347. else
  106348. pTDefRegMap(@Self)^.&set := $00000004;
  106349. end;
  106350. function TCAN2_C2FIFOCON1.getRTREN : TBits_1; inline;
  106351. begin
  106352. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106353. end;
  106354. procedure TCAN2_C2FIFOCON1.setTXREQ; inline;
  106355. begin
  106356. pTDefRegMap(@Self)^.&set := $00000008;
  106357. end;
  106358. procedure TCAN2_C2FIFOCON1.clearTXREQ; inline;
  106359. begin
  106360. pTDefRegMap(@Self)^.clr := $00000008;
  106361. end;
  106362. procedure TCAN2_C2FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  106363. begin
  106364. if thebits = 0 then
  106365. pTDefRegMap(@Self)^.clr := $00000008
  106366. else
  106367. pTDefRegMap(@Self)^.&set := $00000008;
  106368. end;
  106369. function TCAN2_C2FIFOCON1.getTXREQ : TBits_1; inline;
  106370. begin
  106371. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106372. end;
  106373. procedure TCAN2_C2FIFOCON1.setTXERR; inline;
  106374. begin
  106375. pTDefRegMap(@Self)^.&set := $00000010;
  106376. end;
  106377. procedure TCAN2_C2FIFOCON1.clearTXERR; inline;
  106378. begin
  106379. pTDefRegMap(@Self)^.clr := $00000010;
  106380. end;
  106381. procedure TCAN2_C2FIFOCON1.setTXERR(thebits : TBits_1); inline;
  106382. begin
  106383. if thebits = 0 then
  106384. pTDefRegMap(@Self)^.clr := $00000010
  106385. else
  106386. pTDefRegMap(@Self)^.&set := $00000010;
  106387. end;
  106388. function TCAN2_C2FIFOCON1.getTXERR : TBits_1; inline;
  106389. begin
  106390. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  106391. end;
  106392. procedure TCAN2_C2FIFOCON1.setTXLARB; inline;
  106393. begin
  106394. pTDefRegMap(@Self)^.&set := $00000020;
  106395. end;
  106396. procedure TCAN2_C2FIFOCON1.clearTXLARB; inline;
  106397. begin
  106398. pTDefRegMap(@Self)^.clr := $00000020;
  106399. end;
  106400. procedure TCAN2_C2FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  106401. begin
  106402. if thebits = 0 then
  106403. pTDefRegMap(@Self)^.clr := $00000020
  106404. else
  106405. pTDefRegMap(@Self)^.&set := $00000020;
  106406. end;
  106407. function TCAN2_C2FIFOCON1.getTXLARB : TBits_1; inline;
  106408. begin
  106409. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  106410. end;
  106411. procedure TCAN2_C2FIFOCON1.setTXABAT; inline;
  106412. begin
  106413. pTDefRegMap(@Self)^.&set := $00000040;
  106414. end;
  106415. procedure TCAN2_C2FIFOCON1.clearTXABAT; inline;
  106416. begin
  106417. pTDefRegMap(@Self)^.clr := $00000040;
  106418. end;
  106419. procedure TCAN2_C2FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  106420. begin
  106421. if thebits = 0 then
  106422. pTDefRegMap(@Self)^.clr := $00000040
  106423. else
  106424. pTDefRegMap(@Self)^.&set := $00000040;
  106425. end;
  106426. function TCAN2_C2FIFOCON1.getTXABAT : TBits_1; inline;
  106427. begin
  106428. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  106429. end;
  106430. procedure TCAN2_C2FIFOCON1.setTXEN; inline;
  106431. begin
  106432. pTDefRegMap(@Self)^.&set := $00000080;
  106433. end;
  106434. procedure TCAN2_C2FIFOCON1.clearTXEN; inline;
  106435. begin
  106436. pTDefRegMap(@Self)^.clr := $00000080;
  106437. end;
  106438. procedure TCAN2_C2FIFOCON1.setTXEN(thebits : TBits_1); inline;
  106439. begin
  106440. if thebits = 0 then
  106441. pTDefRegMap(@Self)^.clr := $00000080
  106442. else
  106443. pTDefRegMap(@Self)^.&set := $00000080;
  106444. end;
  106445. function TCAN2_C2FIFOCON1.getTXEN : TBits_1; inline;
  106446. begin
  106447. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  106448. end;
  106449. procedure TCAN2_C2FIFOCON1.setDONLY; inline;
  106450. begin
  106451. pTDefRegMap(@Self)^.&set := $00001000;
  106452. end;
  106453. procedure TCAN2_C2FIFOCON1.clearDONLY; inline;
  106454. begin
  106455. pTDefRegMap(@Self)^.clr := $00001000;
  106456. end;
  106457. procedure TCAN2_C2FIFOCON1.setDONLY(thebits : TBits_1); inline;
  106458. begin
  106459. if thebits = 0 then
  106460. pTDefRegMap(@Self)^.clr := $00001000
  106461. else
  106462. pTDefRegMap(@Self)^.&set := $00001000;
  106463. end;
  106464. function TCAN2_C2FIFOCON1.getDONLY : TBits_1; inline;
  106465. begin
  106466. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  106467. end;
  106468. procedure TCAN2_C2FIFOCON1.setUINC; inline;
  106469. begin
  106470. pTDefRegMap(@Self)^.&set := $00002000;
  106471. end;
  106472. procedure TCAN2_C2FIFOCON1.clearUINC; inline;
  106473. begin
  106474. pTDefRegMap(@Self)^.clr := $00002000;
  106475. end;
  106476. procedure TCAN2_C2FIFOCON1.setUINC(thebits : TBits_1); inline;
  106477. begin
  106478. if thebits = 0 then
  106479. pTDefRegMap(@Self)^.clr := $00002000
  106480. else
  106481. pTDefRegMap(@Self)^.&set := $00002000;
  106482. end;
  106483. function TCAN2_C2FIFOCON1.getUINC : TBits_1; inline;
  106484. begin
  106485. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  106486. end;
  106487. procedure TCAN2_C2FIFOCON1.setFRESET; inline;
  106488. begin
  106489. pTDefRegMap(@Self)^.&set := $00004000;
  106490. end;
  106491. procedure TCAN2_C2FIFOCON1.clearFRESET; inline;
  106492. begin
  106493. pTDefRegMap(@Self)^.clr := $00004000;
  106494. end;
  106495. procedure TCAN2_C2FIFOCON1.setFRESET(thebits : TBits_1); inline;
  106496. begin
  106497. if thebits = 0 then
  106498. pTDefRegMap(@Self)^.clr := $00004000
  106499. else
  106500. pTDefRegMap(@Self)^.&set := $00004000;
  106501. end;
  106502. function TCAN2_C2FIFOCON1.getFRESET : TBits_1; inline;
  106503. begin
  106504. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  106505. end;
  106506. procedure TCAN2_C2FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  106507. begin
  106508. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  106509. end;
  106510. function TCAN2_C2FIFOCON1.getFSIZE : TBits_5; inline;
  106511. begin
  106512. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  106513. end;
  106514. procedure TCAN2_C2FIFOCON1.setw(thebits : TBits_32); inline;
  106515. begin
  106516. pTDefRegMap(@Self)^.val := thebits;
  106517. end;
  106518. function TCAN2_C2FIFOCON1.getw : TBits_32; inline;
  106519. begin
  106520. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106521. end;
  106522. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIF; inline;
  106523. begin
  106524. pTDefRegMap(@Self)^.&set := $00000001;
  106525. end;
  106526. procedure TCAN2_C2FIFOINT1.clearRXNEMPTYIF; inline;
  106527. begin
  106528. pTDefRegMap(@Self)^.clr := $00000001;
  106529. end;
  106530. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  106531. begin
  106532. if thebits = 0 then
  106533. pTDefRegMap(@Self)^.clr := $00000001
  106534. else
  106535. pTDefRegMap(@Self)^.&set := $00000001;
  106536. end;
  106537. function TCAN2_C2FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  106538. begin
  106539. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  106540. end;
  106541. procedure TCAN2_C2FIFOINT1.setRXHALFIF; inline;
  106542. begin
  106543. pTDefRegMap(@Self)^.&set := $00000002;
  106544. end;
  106545. procedure TCAN2_C2FIFOINT1.clearRXHALFIF; inline;
  106546. begin
  106547. pTDefRegMap(@Self)^.clr := $00000002;
  106548. end;
  106549. procedure TCAN2_C2FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  106550. begin
  106551. if thebits = 0 then
  106552. pTDefRegMap(@Self)^.clr := $00000002
  106553. else
  106554. pTDefRegMap(@Self)^.&set := $00000002;
  106555. end;
  106556. function TCAN2_C2FIFOINT1.getRXHALFIF : TBits_1; inline;
  106557. begin
  106558. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  106559. end;
  106560. procedure TCAN2_C2FIFOINT1.setRXFULLIF; inline;
  106561. begin
  106562. pTDefRegMap(@Self)^.&set := $00000004;
  106563. end;
  106564. procedure TCAN2_C2FIFOINT1.clearRXFULLIF; inline;
  106565. begin
  106566. pTDefRegMap(@Self)^.clr := $00000004;
  106567. end;
  106568. procedure TCAN2_C2FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  106569. begin
  106570. if thebits = 0 then
  106571. pTDefRegMap(@Self)^.clr := $00000004
  106572. else
  106573. pTDefRegMap(@Self)^.&set := $00000004;
  106574. end;
  106575. function TCAN2_C2FIFOINT1.getRXFULLIF : TBits_1; inline;
  106576. begin
  106577. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106578. end;
  106579. procedure TCAN2_C2FIFOINT1.setRXOVFLIF; inline;
  106580. begin
  106581. pTDefRegMap(@Self)^.&set := $00000008;
  106582. end;
  106583. procedure TCAN2_C2FIFOINT1.clearRXOVFLIF; inline;
  106584. begin
  106585. pTDefRegMap(@Self)^.clr := $00000008;
  106586. end;
  106587. procedure TCAN2_C2FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  106588. begin
  106589. if thebits = 0 then
  106590. pTDefRegMap(@Self)^.clr := $00000008
  106591. else
  106592. pTDefRegMap(@Self)^.&set := $00000008;
  106593. end;
  106594. function TCAN2_C2FIFOINT1.getRXOVFLIF : TBits_1; inline;
  106595. begin
  106596. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106597. end;
  106598. procedure TCAN2_C2FIFOINT1.setTXEMPTYIF; inline;
  106599. begin
  106600. pTDefRegMap(@Self)^.&set := $00000100;
  106601. end;
  106602. procedure TCAN2_C2FIFOINT1.clearTXEMPTYIF; inline;
  106603. begin
  106604. pTDefRegMap(@Self)^.clr := $00000100;
  106605. end;
  106606. procedure TCAN2_C2FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  106607. begin
  106608. if thebits = 0 then
  106609. pTDefRegMap(@Self)^.clr := $00000100
  106610. else
  106611. pTDefRegMap(@Self)^.&set := $00000100;
  106612. end;
  106613. function TCAN2_C2FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  106614. begin
  106615. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  106616. end;
  106617. procedure TCAN2_C2FIFOINT1.setTXHALFIF; inline;
  106618. begin
  106619. pTDefRegMap(@Self)^.&set := $00000200;
  106620. end;
  106621. procedure TCAN2_C2FIFOINT1.clearTXHALFIF; inline;
  106622. begin
  106623. pTDefRegMap(@Self)^.clr := $00000200;
  106624. end;
  106625. procedure TCAN2_C2FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  106626. begin
  106627. if thebits = 0 then
  106628. pTDefRegMap(@Self)^.clr := $00000200
  106629. else
  106630. pTDefRegMap(@Self)^.&set := $00000200;
  106631. end;
  106632. function TCAN2_C2FIFOINT1.getTXHALFIF : TBits_1; inline;
  106633. begin
  106634. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  106635. end;
  106636. procedure TCAN2_C2FIFOINT1.setTXNFULLIF; inline;
  106637. begin
  106638. pTDefRegMap(@Self)^.&set := $00000400;
  106639. end;
  106640. procedure TCAN2_C2FIFOINT1.clearTXNFULLIF; inline;
  106641. begin
  106642. pTDefRegMap(@Self)^.clr := $00000400;
  106643. end;
  106644. procedure TCAN2_C2FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  106645. begin
  106646. if thebits = 0 then
  106647. pTDefRegMap(@Self)^.clr := $00000400
  106648. else
  106649. pTDefRegMap(@Self)^.&set := $00000400;
  106650. end;
  106651. function TCAN2_C2FIFOINT1.getTXNFULLIF : TBits_1; inline;
  106652. begin
  106653. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  106654. end;
  106655. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIE; inline;
  106656. begin
  106657. pTDefRegMap(@Self)^.&set := $00010000;
  106658. end;
  106659. procedure TCAN2_C2FIFOINT1.clearRXNEMPTYIE; inline;
  106660. begin
  106661. pTDefRegMap(@Self)^.clr := $00010000;
  106662. end;
  106663. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  106664. begin
  106665. if thebits = 0 then
  106666. pTDefRegMap(@Self)^.clr := $00010000
  106667. else
  106668. pTDefRegMap(@Self)^.&set := $00010000;
  106669. end;
  106670. function TCAN2_C2FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  106671. begin
  106672. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  106673. end;
  106674. procedure TCAN2_C2FIFOINT1.setRXHALFIE; inline;
  106675. begin
  106676. pTDefRegMap(@Self)^.&set := $00020000;
  106677. end;
  106678. procedure TCAN2_C2FIFOINT1.clearRXHALFIE; inline;
  106679. begin
  106680. pTDefRegMap(@Self)^.clr := $00020000;
  106681. end;
  106682. procedure TCAN2_C2FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  106683. begin
  106684. if thebits = 0 then
  106685. pTDefRegMap(@Self)^.clr := $00020000
  106686. else
  106687. pTDefRegMap(@Self)^.&set := $00020000;
  106688. end;
  106689. function TCAN2_C2FIFOINT1.getRXHALFIE : TBits_1; inline;
  106690. begin
  106691. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  106692. end;
  106693. procedure TCAN2_C2FIFOINT1.setRXFULLIE; inline;
  106694. begin
  106695. pTDefRegMap(@Self)^.&set := $00040000;
  106696. end;
  106697. procedure TCAN2_C2FIFOINT1.clearRXFULLIE; inline;
  106698. begin
  106699. pTDefRegMap(@Self)^.clr := $00040000;
  106700. end;
  106701. procedure TCAN2_C2FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  106702. begin
  106703. if thebits = 0 then
  106704. pTDefRegMap(@Self)^.clr := $00040000
  106705. else
  106706. pTDefRegMap(@Self)^.&set := $00040000;
  106707. end;
  106708. function TCAN2_C2FIFOINT1.getRXFULLIE : TBits_1; inline;
  106709. begin
  106710. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  106711. end;
  106712. procedure TCAN2_C2FIFOINT1.setRXOVFLIE; inline;
  106713. begin
  106714. pTDefRegMap(@Self)^.&set := $00080000;
  106715. end;
  106716. procedure TCAN2_C2FIFOINT1.clearRXOVFLIE; inline;
  106717. begin
  106718. pTDefRegMap(@Self)^.clr := $00080000;
  106719. end;
  106720. procedure TCAN2_C2FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  106721. begin
  106722. if thebits = 0 then
  106723. pTDefRegMap(@Self)^.clr := $00080000
  106724. else
  106725. pTDefRegMap(@Self)^.&set := $00080000;
  106726. end;
  106727. function TCAN2_C2FIFOINT1.getRXOVFLIE : TBits_1; inline;
  106728. begin
  106729. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  106730. end;
  106731. procedure TCAN2_C2FIFOINT1.setTXEMPTYIE; inline;
  106732. begin
  106733. pTDefRegMap(@Self)^.&set := $01000000;
  106734. end;
  106735. procedure TCAN2_C2FIFOINT1.clearTXEMPTYIE; inline;
  106736. begin
  106737. pTDefRegMap(@Self)^.clr := $01000000;
  106738. end;
  106739. procedure TCAN2_C2FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  106740. begin
  106741. if thebits = 0 then
  106742. pTDefRegMap(@Self)^.clr := $01000000
  106743. else
  106744. pTDefRegMap(@Self)^.&set := $01000000;
  106745. end;
  106746. function TCAN2_C2FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  106747. begin
  106748. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  106749. end;
  106750. procedure TCAN2_C2FIFOINT1.setTXHALFIE; inline;
  106751. begin
  106752. pTDefRegMap(@Self)^.&set := $02000000;
  106753. end;
  106754. procedure TCAN2_C2FIFOINT1.clearTXHALFIE; inline;
  106755. begin
  106756. pTDefRegMap(@Self)^.clr := $02000000;
  106757. end;
  106758. procedure TCAN2_C2FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  106759. begin
  106760. if thebits = 0 then
  106761. pTDefRegMap(@Self)^.clr := $02000000
  106762. else
  106763. pTDefRegMap(@Self)^.&set := $02000000;
  106764. end;
  106765. function TCAN2_C2FIFOINT1.getTXHALFIE : TBits_1; inline;
  106766. begin
  106767. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  106768. end;
  106769. procedure TCAN2_C2FIFOINT1.setTXNFULLIE; inline;
  106770. begin
  106771. pTDefRegMap(@Self)^.&set := $04000000;
  106772. end;
  106773. procedure TCAN2_C2FIFOINT1.clearTXNFULLIE; inline;
  106774. begin
  106775. pTDefRegMap(@Self)^.clr := $04000000;
  106776. end;
  106777. procedure TCAN2_C2FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  106778. begin
  106779. if thebits = 0 then
  106780. pTDefRegMap(@Self)^.clr := $04000000
  106781. else
  106782. pTDefRegMap(@Self)^.&set := $04000000;
  106783. end;
  106784. function TCAN2_C2FIFOINT1.getTXNFULLIE : TBits_1; inline;
  106785. begin
  106786. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  106787. end;
  106788. procedure TCAN2_C2FIFOINT1.setw(thebits : TBits_32); inline;
  106789. begin
  106790. pTDefRegMap(@Self)^.val := thebits;
  106791. end;
  106792. function TCAN2_C2FIFOINT1.getw : TBits_32; inline;
  106793. begin
  106794. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106795. end;
  106796. procedure TCAN2_C2FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  106797. begin
  106798. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  106799. end;
  106800. function TCAN2_C2FIFOCI1.getCFIFOCI : TBits_5; inline;
  106801. begin
  106802. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  106803. end;
  106804. procedure TCAN2_C2FIFOCI1.setw(thebits : TBits_32); inline;
  106805. begin
  106806. pTDefRegMap(@Self)^.val := thebits;
  106807. end;
  106808. function TCAN2_C2FIFOCI1.getw : TBits_32; inline;
  106809. begin
  106810. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106811. end;
  106812. procedure TCAN2_C2FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  106813. begin
  106814. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  106815. end;
  106816. function TCAN2_C2FIFOCON2.getTXPRI : TBits_2; inline;
  106817. begin
  106818. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  106819. end;
  106820. procedure TCAN2_C2FIFOCON2.setRTREN; inline;
  106821. begin
  106822. pTDefRegMap(@Self)^.&set := $00000004;
  106823. end;
  106824. procedure TCAN2_C2FIFOCON2.clearRTREN; inline;
  106825. begin
  106826. pTDefRegMap(@Self)^.clr := $00000004;
  106827. end;
  106828. procedure TCAN2_C2FIFOCON2.setRTREN(thebits : TBits_1); inline;
  106829. begin
  106830. if thebits = 0 then
  106831. pTDefRegMap(@Self)^.clr := $00000004
  106832. else
  106833. pTDefRegMap(@Self)^.&set := $00000004;
  106834. end;
  106835. function TCAN2_C2FIFOCON2.getRTREN : TBits_1; inline;
  106836. begin
  106837. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106838. end;
  106839. procedure TCAN2_C2FIFOCON2.setTXREQ; inline;
  106840. begin
  106841. pTDefRegMap(@Self)^.&set := $00000008;
  106842. end;
  106843. procedure TCAN2_C2FIFOCON2.clearTXREQ; inline;
  106844. begin
  106845. pTDefRegMap(@Self)^.clr := $00000008;
  106846. end;
  106847. procedure TCAN2_C2FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  106848. begin
  106849. if thebits = 0 then
  106850. pTDefRegMap(@Self)^.clr := $00000008
  106851. else
  106852. pTDefRegMap(@Self)^.&set := $00000008;
  106853. end;
  106854. function TCAN2_C2FIFOCON2.getTXREQ : TBits_1; inline;
  106855. begin
  106856. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106857. end;
  106858. procedure TCAN2_C2FIFOCON2.setTXERR; inline;
  106859. begin
  106860. pTDefRegMap(@Self)^.&set := $00000010;
  106861. end;
  106862. procedure TCAN2_C2FIFOCON2.clearTXERR; inline;
  106863. begin
  106864. pTDefRegMap(@Self)^.clr := $00000010;
  106865. end;
  106866. procedure TCAN2_C2FIFOCON2.setTXERR(thebits : TBits_1); inline;
  106867. begin
  106868. if thebits = 0 then
  106869. pTDefRegMap(@Self)^.clr := $00000010
  106870. else
  106871. pTDefRegMap(@Self)^.&set := $00000010;
  106872. end;
  106873. function TCAN2_C2FIFOCON2.getTXERR : TBits_1; inline;
  106874. begin
  106875. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  106876. end;
  106877. procedure TCAN2_C2FIFOCON2.setTXLARB; inline;
  106878. begin
  106879. pTDefRegMap(@Self)^.&set := $00000020;
  106880. end;
  106881. procedure TCAN2_C2FIFOCON2.clearTXLARB; inline;
  106882. begin
  106883. pTDefRegMap(@Self)^.clr := $00000020;
  106884. end;
  106885. procedure TCAN2_C2FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  106886. begin
  106887. if thebits = 0 then
  106888. pTDefRegMap(@Self)^.clr := $00000020
  106889. else
  106890. pTDefRegMap(@Self)^.&set := $00000020;
  106891. end;
  106892. function TCAN2_C2FIFOCON2.getTXLARB : TBits_1; inline;
  106893. begin
  106894. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  106895. end;
  106896. procedure TCAN2_C2FIFOCON2.setTXABAT; inline;
  106897. begin
  106898. pTDefRegMap(@Self)^.&set := $00000040;
  106899. end;
  106900. procedure TCAN2_C2FIFOCON2.clearTXABAT; inline;
  106901. begin
  106902. pTDefRegMap(@Self)^.clr := $00000040;
  106903. end;
  106904. procedure TCAN2_C2FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  106905. begin
  106906. if thebits = 0 then
  106907. pTDefRegMap(@Self)^.clr := $00000040
  106908. else
  106909. pTDefRegMap(@Self)^.&set := $00000040;
  106910. end;
  106911. function TCAN2_C2FIFOCON2.getTXABAT : TBits_1; inline;
  106912. begin
  106913. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  106914. end;
  106915. procedure TCAN2_C2FIFOCON2.setTXEN; inline;
  106916. begin
  106917. pTDefRegMap(@Self)^.&set := $00000080;
  106918. end;
  106919. procedure TCAN2_C2FIFOCON2.clearTXEN; inline;
  106920. begin
  106921. pTDefRegMap(@Self)^.clr := $00000080;
  106922. end;
  106923. procedure TCAN2_C2FIFOCON2.setTXEN(thebits : TBits_1); inline;
  106924. begin
  106925. if thebits = 0 then
  106926. pTDefRegMap(@Self)^.clr := $00000080
  106927. else
  106928. pTDefRegMap(@Self)^.&set := $00000080;
  106929. end;
  106930. function TCAN2_C2FIFOCON2.getTXEN : TBits_1; inline;
  106931. begin
  106932. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  106933. end;
  106934. procedure TCAN2_C2FIFOCON2.setDONLY; inline;
  106935. begin
  106936. pTDefRegMap(@Self)^.&set := $00001000;
  106937. end;
  106938. procedure TCAN2_C2FIFOCON2.clearDONLY; inline;
  106939. begin
  106940. pTDefRegMap(@Self)^.clr := $00001000;
  106941. end;
  106942. procedure TCAN2_C2FIFOCON2.setDONLY(thebits : TBits_1); inline;
  106943. begin
  106944. if thebits = 0 then
  106945. pTDefRegMap(@Self)^.clr := $00001000
  106946. else
  106947. pTDefRegMap(@Self)^.&set := $00001000;
  106948. end;
  106949. function TCAN2_C2FIFOCON2.getDONLY : TBits_1; inline;
  106950. begin
  106951. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  106952. end;
  106953. procedure TCAN2_C2FIFOCON2.setUINC; inline;
  106954. begin
  106955. pTDefRegMap(@Self)^.&set := $00002000;
  106956. end;
  106957. procedure TCAN2_C2FIFOCON2.clearUINC; inline;
  106958. begin
  106959. pTDefRegMap(@Self)^.clr := $00002000;
  106960. end;
  106961. procedure TCAN2_C2FIFOCON2.setUINC(thebits : TBits_1); inline;
  106962. begin
  106963. if thebits = 0 then
  106964. pTDefRegMap(@Self)^.clr := $00002000
  106965. else
  106966. pTDefRegMap(@Self)^.&set := $00002000;
  106967. end;
  106968. function TCAN2_C2FIFOCON2.getUINC : TBits_1; inline;
  106969. begin
  106970. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  106971. end;
  106972. procedure TCAN2_C2FIFOCON2.setFRESET; inline;
  106973. begin
  106974. pTDefRegMap(@Self)^.&set := $00004000;
  106975. end;
  106976. procedure TCAN2_C2FIFOCON2.clearFRESET; inline;
  106977. begin
  106978. pTDefRegMap(@Self)^.clr := $00004000;
  106979. end;
  106980. procedure TCAN2_C2FIFOCON2.setFRESET(thebits : TBits_1); inline;
  106981. begin
  106982. if thebits = 0 then
  106983. pTDefRegMap(@Self)^.clr := $00004000
  106984. else
  106985. pTDefRegMap(@Self)^.&set := $00004000;
  106986. end;
  106987. function TCAN2_C2FIFOCON2.getFRESET : TBits_1; inline;
  106988. begin
  106989. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  106990. end;
  106991. procedure TCAN2_C2FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  106992. begin
  106993. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  106994. end;
  106995. function TCAN2_C2FIFOCON2.getFSIZE : TBits_5; inline;
  106996. begin
  106997. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  106998. end;
  106999. procedure TCAN2_C2FIFOCON2.setw(thebits : TBits_32); inline;
  107000. begin
  107001. pTDefRegMap(@Self)^.val := thebits;
  107002. end;
  107003. function TCAN2_C2FIFOCON2.getw : TBits_32; inline;
  107004. begin
  107005. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107006. end;
  107007. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIF; inline;
  107008. begin
  107009. pTDefRegMap(@Self)^.&set := $00000001;
  107010. end;
  107011. procedure TCAN2_C2FIFOINT2.clearRXNEMPTYIF; inline;
  107012. begin
  107013. pTDefRegMap(@Self)^.clr := $00000001;
  107014. end;
  107015. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  107016. begin
  107017. if thebits = 0 then
  107018. pTDefRegMap(@Self)^.clr := $00000001
  107019. else
  107020. pTDefRegMap(@Self)^.&set := $00000001;
  107021. end;
  107022. function TCAN2_C2FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  107023. begin
  107024. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  107025. end;
  107026. procedure TCAN2_C2FIFOINT2.setRXHALFIF; inline;
  107027. begin
  107028. pTDefRegMap(@Self)^.&set := $00000002;
  107029. end;
  107030. procedure TCAN2_C2FIFOINT2.clearRXHALFIF; inline;
  107031. begin
  107032. pTDefRegMap(@Self)^.clr := $00000002;
  107033. end;
  107034. procedure TCAN2_C2FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  107035. begin
  107036. if thebits = 0 then
  107037. pTDefRegMap(@Self)^.clr := $00000002
  107038. else
  107039. pTDefRegMap(@Self)^.&set := $00000002;
  107040. end;
  107041. function TCAN2_C2FIFOINT2.getRXHALFIF : TBits_1; inline;
  107042. begin
  107043. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  107044. end;
  107045. procedure TCAN2_C2FIFOINT2.setRXFULLIF; inline;
  107046. begin
  107047. pTDefRegMap(@Self)^.&set := $00000004;
  107048. end;
  107049. procedure TCAN2_C2FIFOINT2.clearRXFULLIF; inline;
  107050. begin
  107051. pTDefRegMap(@Self)^.clr := $00000004;
  107052. end;
  107053. procedure TCAN2_C2FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  107054. begin
  107055. if thebits = 0 then
  107056. pTDefRegMap(@Self)^.clr := $00000004
  107057. else
  107058. pTDefRegMap(@Self)^.&set := $00000004;
  107059. end;
  107060. function TCAN2_C2FIFOINT2.getRXFULLIF : TBits_1; inline;
  107061. begin
  107062. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107063. end;
  107064. procedure TCAN2_C2FIFOINT2.setRXOVFLIF; inline;
  107065. begin
  107066. pTDefRegMap(@Self)^.&set := $00000008;
  107067. end;
  107068. procedure TCAN2_C2FIFOINT2.clearRXOVFLIF; inline;
  107069. begin
  107070. pTDefRegMap(@Self)^.clr := $00000008;
  107071. end;
  107072. procedure TCAN2_C2FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  107073. begin
  107074. if thebits = 0 then
  107075. pTDefRegMap(@Self)^.clr := $00000008
  107076. else
  107077. pTDefRegMap(@Self)^.&set := $00000008;
  107078. end;
  107079. function TCAN2_C2FIFOINT2.getRXOVFLIF : TBits_1; inline;
  107080. begin
  107081. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107082. end;
  107083. procedure TCAN2_C2FIFOINT2.setTXEMPTYIF; inline;
  107084. begin
  107085. pTDefRegMap(@Self)^.&set := $00000100;
  107086. end;
  107087. procedure TCAN2_C2FIFOINT2.clearTXEMPTYIF; inline;
  107088. begin
  107089. pTDefRegMap(@Self)^.clr := $00000100;
  107090. end;
  107091. procedure TCAN2_C2FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  107092. begin
  107093. if thebits = 0 then
  107094. pTDefRegMap(@Self)^.clr := $00000100
  107095. else
  107096. pTDefRegMap(@Self)^.&set := $00000100;
  107097. end;
  107098. function TCAN2_C2FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  107099. begin
  107100. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  107101. end;
  107102. procedure TCAN2_C2FIFOINT2.setTXHALFIF; inline;
  107103. begin
  107104. pTDefRegMap(@Self)^.&set := $00000200;
  107105. end;
  107106. procedure TCAN2_C2FIFOINT2.clearTXHALFIF; inline;
  107107. begin
  107108. pTDefRegMap(@Self)^.clr := $00000200;
  107109. end;
  107110. procedure TCAN2_C2FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  107111. begin
  107112. if thebits = 0 then
  107113. pTDefRegMap(@Self)^.clr := $00000200
  107114. else
  107115. pTDefRegMap(@Self)^.&set := $00000200;
  107116. end;
  107117. function TCAN2_C2FIFOINT2.getTXHALFIF : TBits_1; inline;
  107118. begin
  107119. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  107120. end;
  107121. procedure TCAN2_C2FIFOINT2.setTXNFULLIF; inline;
  107122. begin
  107123. pTDefRegMap(@Self)^.&set := $00000400;
  107124. end;
  107125. procedure TCAN2_C2FIFOINT2.clearTXNFULLIF; inline;
  107126. begin
  107127. pTDefRegMap(@Self)^.clr := $00000400;
  107128. end;
  107129. procedure TCAN2_C2FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  107130. begin
  107131. if thebits = 0 then
  107132. pTDefRegMap(@Self)^.clr := $00000400
  107133. else
  107134. pTDefRegMap(@Self)^.&set := $00000400;
  107135. end;
  107136. function TCAN2_C2FIFOINT2.getTXNFULLIF : TBits_1; inline;
  107137. begin
  107138. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  107139. end;
  107140. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIE; inline;
  107141. begin
  107142. pTDefRegMap(@Self)^.&set := $00010000;
  107143. end;
  107144. procedure TCAN2_C2FIFOINT2.clearRXNEMPTYIE; inline;
  107145. begin
  107146. pTDefRegMap(@Self)^.clr := $00010000;
  107147. end;
  107148. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  107149. begin
  107150. if thebits = 0 then
  107151. pTDefRegMap(@Self)^.clr := $00010000
  107152. else
  107153. pTDefRegMap(@Self)^.&set := $00010000;
  107154. end;
  107155. function TCAN2_C2FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  107156. begin
  107157. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  107158. end;
  107159. procedure TCAN2_C2FIFOINT2.setRXHALFIE; inline;
  107160. begin
  107161. pTDefRegMap(@Self)^.&set := $00020000;
  107162. end;
  107163. procedure TCAN2_C2FIFOINT2.clearRXHALFIE; inline;
  107164. begin
  107165. pTDefRegMap(@Self)^.clr := $00020000;
  107166. end;
  107167. procedure TCAN2_C2FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  107168. begin
  107169. if thebits = 0 then
  107170. pTDefRegMap(@Self)^.clr := $00020000
  107171. else
  107172. pTDefRegMap(@Self)^.&set := $00020000;
  107173. end;
  107174. function TCAN2_C2FIFOINT2.getRXHALFIE : TBits_1; inline;
  107175. begin
  107176. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  107177. end;
  107178. procedure TCAN2_C2FIFOINT2.setRXFULLIE; inline;
  107179. begin
  107180. pTDefRegMap(@Self)^.&set := $00040000;
  107181. end;
  107182. procedure TCAN2_C2FIFOINT2.clearRXFULLIE; inline;
  107183. begin
  107184. pTDefRegMap(@Self)^.clr := $00040000;
  107185. end;
  107186. procedure TCAN2_C2FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  107187. begin
  107188. if thebits = 0 then
  107189. pTDefRegMap(@Self)^.clr := $00040000
  107190. else
  107191. pTDefRegMap(@Self)^.&set := $00040000;
  107192. end;
  107193. function TCAN2_C2FIFOINT2.getRXFULLIE : TBits_1; inline;
  107194. begin
  107195. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  107196. end;
  107197. procedure TCAN2_C2FIFOINT2.setRXOVFLIE; inline;
  107198. begin
  107199. pTDefRegMap(@Self)^.&set := $00080000;
  107200. end;
  107201. procedure TCAN2_C2FIFOINT2.clearRXOVFLIE; inline;
  107202. begin
  107203. pTDefRegMap(@Self)^.clr := $00080000;
  107204. end;
  107205. procedure TCAN2_C2FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  107206. begin
  107207. if thebits = 0 then
  107208. pTDefRegMap(@Self)^.clr := $00080000
  107209. else
  107210. pTDefRegMap(@Self)^.&set := $00080000;
  107211. end;
  107212. function TCAN2_C2FIFOINT2.getRXOVFLIE : TBits_1; inline;
  107213. begin
  107214. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  107215. end;
  107216. procedure TCAN2_C2FIFOINT2.setTXEMPTYIE; inline;
  107217. begin
  107218. pTDefRegMap(@Self)^.&set := $01000000;
  107219. end;
  107220. procedure TCAN2_C2FIFOINT2.clearTXEMPTYIE; inline;
  107221. begin
  107222. pTDefRegMap(@Self)^.clr := $01000000;
  107223. end;
  107224. procedure TCAN2_C2FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  107225. begin
  107226. if thebits = 0 then
  107227. pTDefRegMap(@Self)^.clr := $01000000
  107228. else
  107229. pTDefRegMap(@Self)^.&set := $01000000;
  107230. end;
  107231. function TCAN2_C2FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  107232. begin
  107233. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  107234. end;
  107235. procedure TCAN2_C2FIFOINT2.setTXHALFIE; inline;
  107236. begin
  107237. pTDefRegMap(@Self)^.&set := $02000000;
  107238. end;
  107239. procedure TCAN2_C2FIFOINT2.clearTXHALFIE; inline;
  107240. begin
  107241. pTDefRegMap(@Self)^.clr := $02000000;
  107242. end;
  107243. procedure TCAN2_C2FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  107244. begin
  107245. if thebits = 0 then
  107246. pTDefRegMap(@Self)^.clr := $02000000
  107247. else
  107248. pTDefRegMap(@Self)^.&set := $02000000;
  107249. end;
  107250. function TCAN2_C2FIFOINT2.getTXHALFIE : TBits_1; inline;
  107251. begin
  107252. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  107253. end;
  107254. procedure TCAN2_C2FIFOINT2.setTXNFULLIE; inline;
  107255. begin
  107256. pTDefRegMap(@Self)^.&set := $04000000;
  107257. end;
  107258. procedure TCAN2_C2FIFOINT2.clearTXNFULLIE; inline;
  107259. begin
  107260. pTDefRegMap(@Self)^.clr := $04000000;
  107261. end;
  107262. procedure TCAN2_C2FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  107263. begin
  107264. if thebits = 0 then
  107265. pTDefRegMap(@Self)^.clr := $04000000
  107266. else
  107267. pTDefRegMap(@Self)^.&set := $04000000;
  107268. end;
  107269. function TCAN2_C2FIFOINT2.getTXNFULLIE : TBits_1; inline;
  107270. begin
  107271. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  107272. end;
  107273. procedure TCAN2_C2FIFOINT2.setw(thebits : TBits_32); inline;
  107274. begin
  107275. pTDefRegMap(@Self)^.val := thebits;
  107276. end;
  107277. function TCAN2_C2FIFOINT2.getw : TBits_32; inline;
  107278. begin
  107279. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107280. end;
  107281. procedure TCAN2_C2FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  107282. begin
  107283. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  107284. end;
  107285. function TCAN2_C2FIFOCI2.getCFIFOCI : TBits_5; inline;
  107286. begin
  107287. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  107288. end;
  107289. procedure TCAN2_C2FIFOCI2.setw(thebits : TBits_32); inline;
  107290. begin
  107291. pTDefRegMap(@Self)^.val := thebits;
  107292. end;
  107293. function TCAN2_C2FIFOCI2.getw : TBits_32; inline;
  107294. begin
  107295. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107296. end;
  107297. procedure TCAN2_C2FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  107298. begin
  107299. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  107300. end;
  107301. function TCAN2_C2FIFOCON3.getTXPRI : TBits_2; inline;
  107302. begin
  107303. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  107304. end;
  107305. procedure TCAN2_C2FIFOCON3.setRTREN; inline;
  107306. begin
  107307. pTDefRegMap(@Self)^.&set := $00000004;
  107308. end;
  107309. procedure TCAN2_C2FIFOCON3.clearRTREN; inline;
  107310. begin
  107311. pTDefRegMap(@Self)^.clr := $00000004;
  107312. end;
  107313. procedure TCAN2_C2FIFOCON3.setRTREN(thebits : TBits_1); inline;
  107314. begin
  107315. if thebits = 0 then
  107316. pTDefRegMap(@Self)^.clr := $00000004
  107317. else
  107318. pTDefRegMap(@Self)^.&set := $00000004;
  107319. end;
  107320. function TCAN2_C2FIFOCON3.getRTREN : TBits_1; inline;
  107321. begin
  107322. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107323. end;
  107324. procedure TCAN2_C2FIFOCON3.setTXREQ; inline;
  107325. begin
  107326. pTDefRegMap(@Self)^.&set := $00000008;
  107327. end;
  107328. procedure TCAN2_C2FIFOCON3.clearTXREQ; inline;
  107329. begin
  107330. pTDefRegMap(@Self)^.clr := $00000008;
  107331. end;
  107332. procedure TCAN2_C2FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  107333. begin
  107334. if thebits = 0 then
  107335. pTDefRegMap(@Self)^.clr := $00000008
  107336. else
  107337. pTDefRegMap(@Self)^.&set := $00000008;
  107338. end;
  107339. function TCAN2_C2FIFOCON3.getTXREQ : TBits_1; inline;
  107340. begin
  107341. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107342. end;
  107343. procedure TCAN2_C2FIFOCON3.setTXERR; inline;
  107344. begin
  107345. pTDefRegMap(@Self)^.&set := $00000010;
  107346. end;
  107347. procedure TCAN2_C2FIFOCON3.clearTXERR; inline;
  107348. begin
  107349. pTDefRegMap(@Self)^.clr := $00000010;
  107350. end;
  107351. procedure TCAN2_C2FIFOCON3.setTXERR(thebits : TBits_1); inline;
  107352. begin
  107353. if thebits = 0 then
  107354. pTDefRegMap(@Self)^.clr := $00000010
  107355. else
  107356. pTDefRegMap(@Self)^.&set := $00000010;
  107357. end;
  107358. function TCAN2_C2FIFOCON3.getTXERR : TBits_1; inline;
  107359. begin
  107360. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  107361. end;
  107362. procedure TCAN2_C2FIFOCON3.setTXLARB; inline;
  107363. begin
  107364. pTDefRegMap(@Self)^.&set := $00000020;
  107365. end;
  107366. procedure TCAN2_C2FIFOCON3.clearTXLARB; inline;
  107367. begin
  107368. pTDefRegMap(@Self)^.clr := $00000020;
  107369. end;
  107370. procedure TCAN2_C2FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  107371. begin
  107372. if thebits = 0 then
  107373. pTDefRegMap(@Self)^.clr := $00000020
  107374. else
  107375. pTDefRegMap(@Self)^.&set := $00000020;
  107376. end;
  107377. function TCAN2_C2FIFOCON3.getTXLARB : TBits_1; inline;
  107378. begin
  107379. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  107380. end;
  107381. procedure TCAN2_C2FIFOCON3.setTXABAT; inline;
  107382. begin
  107383. pTDefRegMap(@Self)^.&set := $00000040;
  107384. end;
  107385. procedure TCAN2_C2FIFOCON3.clearTXABAT; inline;
  107386. begin
  107387. pTDefRegMap(@Self)^.clr := $00000040;
  107388. end;
  107389. procedure TCAN2_C2FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  107390. begin
  107391. if thebits = 0 then
  107392. pTDefRegMap(@Self)^.clr := $00000040
  107393. else
  107394. pTDefRegMap(@Self)^.&set := $00000040;
  107395. end;
  107396. function TCAN2_C2FIFOCON3.getTXABAT : TBits_1; inline;
  107397. begin
  107398. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  107399. end;
  107400. procedure TCAN2_C2FIFOCON3.setTXEN; inline;
  107401. begin
  107402. pTDefRegMap(@Self)^.&set := $00000080;
  107403. end;
  107404. procedure TCAN2_C2FIFOCON3.clearTXEN; inline;
  107405. begin
  107406. pTDefRegMap(@Self)^.clr := $00000080;
  107407. end;
  107408. procedure TCAN2_C2FIFOCON3.setTXEN(thebits : TBits_1); inline;
  107409. begin
  107410. if thebits = 0 then
  107411. pTDefRegMap(@Self)^.clr := $00000080
  107412. else
  107413. pTDefRegMap(@Self)^.&set := $00000080;
  107414. end;
  107415. function TCAN2_C2FIFOCON3.getTXEN : TBits_1; inline;
  107416. begin
  107417. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  107418. end;
  107419. procedure TCAN2_C2FIFOCON3.setDONLY; inline;
  107420. begin
  107421. pTDefRegMap(@Self)^.&set := $00001000;
  107422. end;
  107423. procedure TCAN2_C2FIFOCON3.clearDONLY; inline;
  107424. begin
  107425. pTDefRegMap(@Self)^.clr := $00001000;
  107426. end;
  107427. procedure TCAN2_C2FIFOCON3.setDONLY(thebits : TBits_1); inline;
  107428. begin
  107429. if thebits = 0 then
  107430. pTDefRegMap(@Self)^.clr := $00001000
  107431. else
  107432. pTDefRegMap(@Self)^.&set := $00001000;
  107433. end;
  107434. function TCAN2_C2FIFOCON3.getDONLY : TBits_1; inline;
  107435. begin
  107436. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  107437. end;
  107438. procedure TCAN2_C2FIFOCON3.setUINC; inline;
  107439. begin
  107440. pTDefRegMap(@Self)^.&set := $00002000;
  107441. end;
  107442. procedure TCAN2_C2FIFOCON3.clearUINC; inline;
  107443. begin
  107444. pTDefRegMap(@Self)^.clr := $00002000;
  107445. end;
  107446. procedure TCAN2_C2FIFOCON3.setUINC(thebits : TBits_1); inline;
  107447. begin
  107448. if thebits = 0 then
  107449. pTDefRegMap(@Self)^.clr := $00002000
  107450. else
  107451. pTDefRegMap(@Self)^.&set := $00002000;
  107452. end;
  107453. function TCAN2_C2FIFOCON3.getUINC : TBits_1; inline;
  107454. begin
  107455. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  107456. end;
  107457. procedure TCAN2_C2FIFOCON3.setFRESET; inline;
  107458. begin
  107459. pTDefRegMap(@Self)^.&set := $00004000;
  107460. end;
  107461. procedure TCAN2_C2FIFOCON3.clearFRESET; inline;
  107462. begin
  107463. pTDefRegMap(@Self)^.clr := $00004000;
  107464. end;
  107465. procedure TCAN2_C2FIFOCON3.setFRESET(thebits : TBits_1); inline;
  107466. begin
  107467. if thebits = 0 then
  107468. pTDefRegMap(@Self)^.clr := $00004000
  107469. else
  107470. pTDefRegMap(@Self)^.&set := $00004000;
  107471. end;
  107472. function TCAN2_C2FIFOCON3.getFRESET : TBits_1; inline;
  107473. begin
  107474. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  107475. end;
  107476. procedure TCAN2_C2FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  107477. begin
  107478. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  107479. end;
  107480. function TCAN2_C2FIFOCON3.getFSIZE : TBits_5; inline;
  107481. begin
  107482. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  107483. end;
  107484. procedure TCAN2_C2FIFOCON3.setw(thebits : TBits_32); inline;
  107485. begin
  107486. pTDefRegMap(@Self)^.val := thebits;
  107487. end;
  107488. function TCAN2_C2FIFOCON3.getw : TBits_32; inline;
  107489. begin
  107490. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107491. end;
  107492. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIF; inline;
  107493. begin
  107494. pTDefRegMap(@Self)^.&set := $00000001;
  107495. end;
  107496. procedure TCAN2_C2FIFOINT3.clearRXNEMPTYIF; inline;
  107497. begin
  107498. pTDefRegMap(@Self)^.clr := $00000001;
  107499. end;
  107500. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  107501. begin
  107502. if thebits = 0 then
  107503. pTDefRegMap(@Self)^.clr := $00000001
  107504. else
  107505. pTDefRegMap(@Self)^.&set := $00000001;
  107506. end;
  107507. function TCAN2_C2FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  107508. begin
  107509. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  107510. end;
  107511. procedure TCAN2_C2FIFOINT3.setRXHALFIF; inline;
  107512. begin
  107513. pTDefRegMap(@Self)^.&set := $00000002;
  107514. end;
  107515. procedure TCAN2_C2FIFOINT3.clearRXHALFIF; inline;
  107516. begin
  107517. pTDefRegMap(@Self)^.clr := $00000002;
  107518. end;
  107519. procedure TCAN2_C2FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  107520. begin
  107521. if thebits = 0 then
  107522. pTDefRegMap(@Self)^.clr := $00000002
  107523. else
  107524. pTDefRegMap(@Self)^.&set := $00000002;
  107525. end;
  107526. function TCAN2_C2FIFOINT3.getRXHALFIF : TBits_1; inline;
  107527. begin
  107528. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  107529. end;
  107530. procedure TCAN2_C2FIFOINT3.setRXFULLIF; inline;
  107531. begin
  107532. pTDefRegMap(@Self)^.&set := $00000004;
  107533. end;
  107534. procedure TCAN2_C2FIFOINT3.clearRXFULLIF; inline;
  107535. begin
  107536. pTDefRegMap(@Self)^.clr := $00000004;
  107537. end;
  107538. procedure TCAN2_C2FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  107539. begin
  107540. if thebits = 0 then
  107541. pTDefRegMap(@Self)^.clr := $00000004
  107542. else
  107543. pTDefRegMap(@Self)^.&set := $00000004;
  107544. end;
  107545. function TCAN2_C2FIFOINT3.getRXFULLIF : TBits_1; inline;
  107546. begin
  107547. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107548. end;
  107549. procedure TCAN2_C2FIFOINT3.setRXOVFLIF; inline;
  107550. begin
  107551. pTDefRegMap(@Self)^.&set := $00000008;
  107552. end;
  107553. procedure TCAN2_C2FIFOINT3.clearRXOVFLIF; inline;
  107554. begin
  107555. pTDefRegMap(@Self)^.clr := $00000008;
  107556. end;
  107557. procedure TCAN2_C2FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  107558. begin
  107559. if thebits = 0 then
  107560. pTDefRegMap(@Self)^.clr := $00000008
  107561. else
  107562. pTDefRegMap(@Self)^.&set := $00000008;
  107563. end;
  107564. function TCAN2_C2FIFOINT3.getRXOVFLIF : TBits_1; inline;
  107565. begin
  107566. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107567. end;
  107568. procedure TCAN2_C2FIFOINT3.setTXEMPTYIF; inline;
  107569. begin
  107570. pTDefRegMap(@Self)^.&set := $00000100;
  107571. end;
  107572. procedure TCAN2_C2FIFOINT3.clearTXEMPTYIF; inline;
  107573. begin
  107574. pTDefRegMap(@Self)^.clr := $00000100;
  107575. end;
  107576. procedure TCAN2_C2FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  107577. begin
  107578. if thebits = 0 then
  107579. pTDefRegMap(@Self)^.clr := $00000100
  107580. else
  107581. pTDefRegMap(@Self)^.&set := $00000100;
  107582. end;
  107583. function TCAN2_C2FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  107584. begin
  107585. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  107586. end;
  107587. procedure TCAN2_C2FIFOINT3.setTXHALFIF; inline;
  107588. begin
  107589. pTDefRegMap(@Self)^.&set := $00000200;
  107590. end;
  107591. procedure TCAN2_C2FIFOINT3.clearTXHALFIF; inline;
  107592. begin
  107593. pTDefRegMap(@Self)^.clr := $00000200;
  107594. end;
  107595. procedure TCAN2_C2FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  107596. begin
  107597. if thebits = 0 then
  107598. pTDefRegMap(@Self)^.clr := $00000200
  107599. else
  107600. pTDefRegMap(@Self)^.&set := $00000200;
  107601. end;
  107602. function TCAN2_C2FIFOINT3.getTXHALFIF : TBits_1; inline;
  107603. begin
  107604. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  107605. end;
  107606. procedure TCAN2_C2FIFOINT3.setTXNFULLIF; inline;
  107607. begin
  107608. pTDefRegMap(@Self)^.&set := $00000400;
  107609. end;
  107610. procedure TCAN2_C2FIFOINT3.clearTXNFULLIF; inline;
  107611. begin
  107612. pTDefRegMap(@Self)^.clr := $00000400;
  107613. end;
  107614. procedure TCAN2_C2FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  107615. begin
  107616. if thebits = 0 then
  107617. pTDefRegMap(@Self)^.clr := $00000400
  107618. else
  107619. pTDefRegMap(@Self)^.&set := $00000400;
  107620. end;
  107621. function TCAN2_C2FIFOINT3.getTXNFULLIF : TBits_1; inline;
  107622. begin
  107623. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  107624. end;
  107625. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIE; inline;
  107626. begin
  107627. pTDefRegMap(@Self)^.&set := $00010000;
  107628. end;
  107629. procedure TCAN2_C2FIFOINT3.clearRXNEMPTYIE; inline;
  107630. begin
  107631. pTDefRegMap(@Self)^.clr := $00010000;
  107632. end;
  107633. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  107634. begin
  107635. if thebits = 0 then
  107636. pTDefRegMap(@Self)^.clr := $00010000
  107637. else
  107638. pTDefRegMap(@Self)^.&set := $00010000;
  107639. end;
  107640. function TCAN2_C2FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  107641. begin
  107642. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  107643. end;
  107644. procedure TCAN2_C2FIFOINT3.setRXHALFIE; inline;
  107645. begin
  107646. pTDefRegMap(@Self)^.&set := $00020000;
  107647. end;
  107648. procedure TCAN2_C2FIFOINT3.clearRXHALFIE; inline;
  107649. begin
  107650. pTDefRegMap(@Self)^.clr := $00020000;
  107651. end;
  107652. procedure TCAN2_C2FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  107653. begin
  107654. if thebits = 0 then
  107655. pTDefRegMap(@Self)^.clr := $00020000
  107656. else
  107657. pTDefRegMap(@Self)^.&set := $00020000;
  107658. end;
  107659. function TCAN2_C2FIFOINT3.getRXHALFIE : TBits_1; inline;
  107660. begin
  107661. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  107662. end;
  107663. procedure TCAN2_C2FIFOINT3.setRXFULLIE; inline;
  107664. begin
  107665. pTDefRegMap(@Self)^.&set := $00040000;
  107666. end;
  107667. procedure TCAN2_C2FIFOINT3.clearRXFULLIE; inline;
  107668. begin
  107669. pTDefRegMap(@Self)^.clr := $00040000;
  107670. end;
  107671. procedure TCAN2_C2FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  107672. begin
  107673. if thebits = 0 then
  107674. pTDefRegMap(@Self)^.clr := $00040000
  107675. else
  107676. pTDefRegMap(@Self)^.&set := $00040000;
  107677. end;
  107678. function TCAN2_C2FIFOINT3.getRXFULLIE : TBits_1; inline;
  107679. begin
  107680. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  107681. end;
  107682. procedure TCAN2_C2FIFOINT3.setRXOVFLIE; inline;
  107683. begin
  107684. pTDefRegMap(@Self)^.&set := $00080000;
  107685. end;
  107686. procedure TCAN2_C2FIFOINT3.clearRXOVFLIE; inline;
  107687. begin
  107688. pTDefRegMap(@Self)^.clr := $00080000;
  107689. end;
  107690. procedure TCAN2_C2FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  107691. begin
  107692. if thebits = 0 then
  107693. pTDefRegMap(@Self)^.clr := $00080000
  107694. else
  107695. pTDefRegMap(@Self)^.&set := $00080000;
  107696. end;
  107697. function TCAN2_C2FIFOINT3.getRXOVFLIE : TBits_1; inline;
  107698. begin
  107699. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  107700. end;
  107701. procedure TCAN2_C2FIFOINT3.setTXEMPTYIE; inline;
  107702. begin
  107703. pTDefRegMap(@Self)^.&set := $01000000;
  107704. end;
  107705. procedure TCAN2_C2FIFOINT3.clearTXEMPTYIE; inline;
  107706. begin
  107707. pTDefRegMap(@Self)^.clr := $01000000;
  107708. end;
  107709. procedure TCAN2_C2FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  107710. begin
  107711. if thebits = 0 then
  107712. pTDefRegMap(@Self)^.clr := $01000000
  107713. else
  107714. pTDefRegMap(@Self)^.&set := $01000000;
  107715. end;
  107716. function TCAN2_C2FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  107717. begin
  107718. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  107719. end;
  107720. procedure TCAN2_C2FIFOINT3.setTXHALFIE; inline;
  107721. begin
  107722. pTDefRegMap(@Self)^.&set := $02000000;
  107723. end;
  107724. procedure TCAN2_C2FIFOINT3.clearTXHALFIE; inline;
  107725. begin
  107726. pTDefRegMap(@Self)^.clr := $02000000;
  107727. end;
  107728. procedure TCAN2_C2FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  107729. begin
  107730. if thebits = 0 then
  107731. pTDefRegMap(@Self)^.clr := $02000000
  107732. else
  107733. pTDefRegMap(@Self)^.&set := $02000000;
  107734. end;
  107735. function TCAN2_C2FIFOINT3.getTXHALFIE : TBits_1; inline;
  107736. begin
  107737. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  107738. end;
  107739. procedure TCAN2_C2FIFOINT3.setTXNFULLIE; inline;
  107740. begin
  107741. pTDefRegMap(@Self)^.&set := $04000000;
  107742. end;
  107743. procedure TCAN2_C2FIFOINT3.clearTXNFULLIE; inline;
  107744. begin
  107745. pTDefRegMap(@Self)^.clr := $04000000;
  107746. end;
  107747. procedure TCAN2_C2FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  107748. begin
  107749. if thebits = 0 then
  107750. pTDefRegMap(@Self)^.clr := $04000000
  107751. else
  107752. pTDefRegMap(@Self)^.&set := $04000000;
  107753. end;
  107754. function TCAN2_C2FIFOINT3.getTXNFULLIE : TBits_1; inline;
  107755. begin
  107756. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  107757. end;
  107758. procedure TCAN2_C2FIFOINT3.setw(thebits : TBits_32); inline;
  107759. begin
  107760. pTDefRegMap(@Self)^.val := thebits;
  107761. end;
  107762. function TCAN2_C2FIFOINT3.getw : TBits_32; inline;
  107763. begin
  107764. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107765. end;
  107766. procedure TCAN2_C2FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  107767. begin
  107768. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  107769. end;
  107770. function TCAN2_C2FIFOCI3.getCFIFOCI : TBits_5; inline;
  107771. begin
  107772. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  107773. end;
  107774. procedure TCAN2_C2FIFOCI3.setw(thebits : TBits_32); inline;
  107775. begin
  107776. pTDefRegMap(@Self)^.val := thebits;
  107777. end;
  107778. function TCAN2_C2FIFOCI3.getw : TBits_32; inline;
  107779. begin
  107780. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107781. end;
  107782. procedure TCAN2_C2FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  107783. begin
  107784. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  107785. end;
  107786. function TCAN2_C2FIFOCON4.getTXPRI : TBits_2; inline;
  107787. begin
  107788. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  107789. end;
  107790. procedure TCAN2_C2FIFOCON4.setRTREN; inline;
  107791. begin
  107792. pTDefRegMap(@Self)^.&set := $00000004;
  107793. end;
  107794. procedure TCAN2_C2FIFOCON4.clearRTREN; inline;
  107795. begin
  107796. pTDefRegMap(@Self)^.clr := $00000004;
  107797. end;
  107798. procedure TCAN2_C2FIFOCON4.setRTREN(thebits : TBits_1); inline;
  107799. begin
  107800. if thebits = 0 then
  107801. pTDefRegMap(@Self)^.clr := $00000004
  107802. else
  107803. pTDefRegMap(@Self)^.&set := $00000004;
  107804. end;
  107805. function TCAN2_C2FIFOCON4.getRTREN : TBits_1; inline;
  107806. begin
  107807. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107808. end;
  107809. procedure TCAN2_C2FIFOCON4.setTXREQ; inline;
  107810. begin
  107811. pTDefRegMap(@Self)^.&set := $00000008;
  107812. end;
  107813. procedure TCAN2_C2FIFOCON4.clearTXREQ; inline;
  107814. begin
  107815. pTDefRegMap(@Self)^.clr := $00000008;
  107816. end;
  107817. procedure TCAN2_C2FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  107818. begin
  107819. if thebits = 0 then
  107820. pTDefRegMap(@Self)^.clr := $00000008
  107821. else
  107822. pTDefRegMap(@Self)^.&set := $00000008;
  107823. end;
  107824. function TCAN2_C2FIFOCON4.getTXREQ : TBits_1; inline;
  107825. begin
  107826. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107827. end;
  107828. procedure TCAN2_C2FIFOCON4.setTXERR; inline;
  107829. begin
  107830. pTDefRegMap(@Self)^.&set := $00000010;
  107831. end;
  107832. procedure TCAN2_C2FIFOCON4.clearTXERR; inline;
  107833. begin
  107834. pTDefRegMap(@Self)^.clr := $00000010;
  107835. end;
  107836. procedure TCAN2_C2FIFOCON4.setTXERR(thebits : TBits_1); inline;
  107837. begin
  107838. if thebits = 0 then
  107839. pTDefRegMap(@Self)^.clr := $00000010
  107840. else
  107841. pTDefRegMap(@Self)^.&set := $00000010;
  107842. end;
  107843. function TCAN2_C2FIFOCON4.getTXERR : TBits_1; inline;
  107844. begin
  107845. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  107846. end;
  107847. procedure TCAN2_C2FIFOCON4.setTXLARB; inline;
  107848. begin
  107849. pTDefRegMap(@Self)^.&set := $00000020;
  107850. end;
  107851. procedure TCAN2_C2FIFOCON4.clearTXLARB; inline;
  107852. begin
  107853. pTDefRegMap(@Self)^.clr := $00000020;
  107854. end;
  107855. procedure TCAN2_C2FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  107856. begin
  107857. if thebits = 0 then
  107858. pTDefRegMap(@Self)^.clr := $00000020
  107859. else
  107860. pTDefRegMap(@Self)^.&set := $00000020;
  107861. end;
  107862. function TCAN2_C2FIFOCON4.getTXLARB : TBits_1; inline;
  107863. begin
  107864. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  107865. end;
  107866. procedure TCAN2_C2FIFOCON4.setTXABAT; inline;
  107867. begin
  107868. pTDefRegMap(@Self)^.&set := $00000040;
  107869. end;
  107870. procedure TCAN2_C2FIFOCON4.clearTXABAT; inline;
  107871. begin
  107872. pTDefRegMap(@Self)^.clr := $00000040;
  107873. end;
  107874. procedure TCAN2_C2FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  107875. begin
  107876. if thebits = 0 then
  107877. pTDefRegMap(@Self)^.clr := $00000040
  107878. else
  107879. pTDefRegMap(@Self)^.&set := $00000040;
  107880. end;
  107881. function TCAN2_C2FIFOCON4.getTXABAT : TBits_1; inline;
  107882. begin
  107883. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  107884. end;
  107885. procedure TCAN2_C2FIFOCON4.setTXEN; inline;
  107886. begin
  107887. pTDefRegMap(@Self)^.&set := $00000080;
  107888. end;
  107889. procedure TCAN2_C2FIFOCON4.clearTXEN; inline;
  107890. begin
  107891. pTDefRegMap(@Self)^.clr := $00000080;
  107892. end;
  107893. procedure TCAN2_C2FIFOCON4.setTXEN(thebits : TBits_1); inline;
  107894. begin
  107895. if thebits = 0 then
  107896. pTDefRegMap(@Self)^.clr := $00000080
  107897. else
  107898. pTDefRegMap(@Self)^.&set := $00000080;
  107899. end;
  107900. function TCAN2_C2FIFOCON4.getTXEN : TBits_1; inline;
  107901. begin
  107902. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  107903. end;
  107904. procedure TCAN2_C2FIFOCON4.setDONLY; inline;
  107905. begin
  107906. pTDefRegMap(@Self)^.&set := $00001000;
  107907. end;
  107908. procedure TCAN2_C2FIFOCON4.clearDONLY; inline;
  107909. begin
  107910. pTDefRegMap(@Self)^.clr := $00001000;
  107911. end;
  107912. procedure TCAN2_C2FIFOCON4.setDONLY(thebits : TBits_1); inline;
  107913. begin
  107914. if thebits = 0 then
  107915. pTDefRegMap(@Self)^.clr := $00001000
  107916. else
  107917. pTDefRegMap(@Self)^.&set := $00001000;
  107918. end;
  107919. function TCAN2_C2FIFOCON4.getDONLY : TBits_1; inline;
  107920. begin
  107921. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  107922. end;
  107923. procedure TCAN2_C2FIFOCON4.setUINC; inline;
  107924. begin
  107925. pTDefRegMap(@Self)^.&set := $00002000;
  107926. end;
  107927. procedure TCAN2_C2FIFOCON4.clearUINC; inline;
  107928. begin
  107929. pTDefRegMap(@Self)^.clr := $00002000;
  107930. end;
  107931. procedure TCAN2_C2FIFOCON4.setUINC(thebits : TBits_1); inline;
  107932. begin
  107933. if thebits = 0 then
  107934. pTDefRegMap(@Self)^.clr := $00002000
  107935. else
  107936. pTDefRegMap(@Self)^.&set := $00002000;
  107937. end;
  107938. function TCAN2_C2FIFOCON4.getUINC : TBits_1; inline;
  107939. begin
  107940. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  107941. end;
  107942. procedure TCAN2_C2FIFOCON4.setFRESET; inline;
  107943. begin
  107944. pTDefRegMap(@Self)^.&set := $00004000;
  107945. end;
  107946. procedure TCAN2_C2FIFOCON4.clearFRESET; inline;
  107947. begin
  107948. pTDefRegMap(@Self)^.clr := $00004000;
  107949. end;
  107950. procedure TCAN2_C2FIFOCON4.setFRESET(thebits : TBits_1); inline;
  107951. begin
  107952. if thebits = 0 then
  107953. pTDefRegMap(@Self)^.clr := $00004000
  107954. else
  107955. pTDefRegMap(@Self)^.&set := $00004000;
  107956. end;
  107957. function TCAN2_C2FIFOCON4.getFRESET : TBits_1; inline;
  107958. begin
  107959. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  107960. end;
  107961. procedure TCAN2_C2FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  107962. begin
  107963. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  107964. end;
  107965. function TCAN2_C2FIFOCON4.getFSIZE : TBits_5; inline;
  107966. begin
  107967. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  107968. end;
  107969. procedure TCAN2_C2FIFOCON4.setw(thebits : TBits_32); inline;
  107970. begin
  107971. pTDefRegMap(@Self)^.val := thebits;
  107972. end;
  107973. function TCAN2_C2FIFOCON4.getw : TBits_32; inline;
  107974. begin
  107975. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107976. end;
  107977. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIF; inline;
  107978. begin
  107979. pTDefRegMap(@Self)^.&set := $00000001;
  107980. end;
  107981. procedure TCAN2_C2FIFOINT4.clearRXNEMPTYIF; inline;
  107982. begin
  107983. pTDefRegMap(@Self)^.clr := $00000001;
  107984. end;
  107985. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  107986. begin
  107987. if thebits = 0 then
  107988. pTDefRegMap(@Self)^.clr := $00000001
  107989. else
  107990. pTDefRegMap(@Self)^.&set := $00000001;
  107991. end;
  107992. function TCAN2_C2FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  107993. begin
  107994. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  107995. end;
  107996. procedure TCAN2_C2FIFOINT4.setRXHALFIF; inline;
  107997. begin
  107998. pTDefRegMap(@Self)^.&set := $00000002;
  107999. end;
  108000. procedure TCAN2_C2FIFOINT4.clearRXHALFIF; inline;
  108001. begin
  108002. pTDefRegMap(@Self)^.clr := $00000002;
  108003. end;
  108004. procedure TCAN2_C2FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  108005. begin
  108006. if thebits = 0 then
  108007. pTDefRegMap(@Self)^.clr := $00000002
  108008. else
  108009. pTDefRegMap(@Self)^.&set := $00000002;
  108010. end;
  108011. function TCAN2_C2FIFOINT4.getRXHALFIF : TBits_1; inline;
  108012. begin
  108013. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  108014. end;
  108015. procedure TCAN2_C2FIFOINT4.setRXFULLIF; inline;
  108016. begin
  108017. pTDefRegMap(@Self)^.&set := $00000004;
  108018. end;
  108019. procedure TCAN2_C2FIFOINT4.clearRXFULLIF; inline;
  108020. begin
  108021. pTDefRegMap(@Self)^.clr := $00000004;
  108022. end;
  108023. procedure TCAN2_C2FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  108024. begin
  108025. if thebits = 0 then
  108026. pTDefRegMap(@Self)^.clr := $00000004
  108027. else
  108028. pTDefRegMap(@Self)^.&set := $00000004;
  108029. end;
  108030. function TCAN2_C2FIFOINT4.getRXFULLIF : TBits_1; inline;
  108031. begin
  108032. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108033. end;
  108034. procedure TCAN2_C2FIFOINT4.setRXOVFLIF; inline;
  108035. begin
  108036. pTDefRegMap(@Self)^.&set := $00000008;
  108037. end;
  108038. procedure TCAN2_C2FIFOINT4.clearRXOVFLIF; inline;
  108039. begin
  108040. pTDefRegMap(@Self)^.clr := $00000008;
  108041. end;
  108042. procedure TCAN2_C2FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  108043. begin
  108044. if thebits = 0 then
  108045. pTDefRegMap(@Self)^.clr := $00000008
  108046. else
  108047. pTDefRegMap(@Self)^.&set := $00000008;
  108048. end;
  108049. function TCAN2_C2FIFOINT4.getRXOVFLIF : TBits_1; inline;
  108050. begin
  108051. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108052. end;
  108053. procedure TCAN2_C2FIFOINT4.setTXEMPTYIF; inline;
  108054. begin
  108055. pTDefRegMap(@Self)^.&set := $00000100;
  108056. end;
  108057. procedure TCAN2_C2FIFOINT4.clearTXEMPTYIF; inline;
  108058. begin
  108059. pTDefRegMap(@Self)^.clr := $00000100;
  108060. end;
  108061. procedure TCAN2_C2FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  108062. begin
  108063. if thebits = 0 then
  108064. pTDefRegMap(@Self)^.clr := $00000100
  108065. else
  108066. pTDefRegMap(@Self)^.&set := $00000100;
  108067. end;
  108068. function TCAN2_C2FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  108069. begin
  108070. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  108071. end;
  108072. procedure TCAN2_C2FIFOINT4.setTXHALFIF; inline;
  108073. begin
  108074. pTDefRegMap(@Self)^.&set := $00000200;
  108075. end;
  108076. procedure TCAN2_C2FIFOINT4.clearTXHALFIF; inline;
  108077. begin
  108078. pTDefRegMap(@Self)^.clr := $00000200;
  108079. end;
  108080. procedure TCAN2_C2FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  108081. begin
  108082. if thebits = 0 then
  108083. pTDefRegMap(@Self)^.clr := $00000200
  108084. else
  108085. pTDefRegMap(@Self)^.&set := $00000200;
  108086. end;
  108087. function TCAN2_C2FIFOINT4.getTXHALFIF : TBits_1; inline;
  108088. begin
  108089. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  108090. end;
  108091. procedure TCAN2_C2FIFOINT4.setTXNFULLIF; inline;
  108092. begin
  108093. pTDefRegMap(@Self)^.&set := $00000400;
  108094. end;
  108095. procedure TCAN2_C2FIFOINT4.clearTXNFULLIF; inline;
  108096. begin
  108097. pTDefRegMap(@Self)^.clr := $00000400;
  108098. end;
  108099. procedure TCAN2_C2FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  108100. begin
  108101. if thebits = 0 then
  108102. pTDefRegMap(@Self)^.clr := $00000400
  108103. else
  108104. pTDefRegMap(@Self)^.&set := $00000400;
  108105. end;
  108106. function TCAN2_C2FIFOINT4.getTXNFULLIF : TBits_1; inline;
  108107. begin
  108108. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  108109. end;
  108110. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIE; inline;
  108111. begin
  108112. pTDefRegMap(@Self)^.&set := $00010000;
  108113. end;
  108114. procedure TCAN2_C2FIFOINT4.clearRXNEMPTYIE; inline;
  108115. begin
  108116. pTDefRegMap(@Self)^.clr := $00010000;
  108117. end;
  108118. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  108119. begin
  108120. if thebits = 0 then
  108121. pTDefRegMap(@Self)^.clr := $00010000
  108122. else
  108123. pTDefRegMap(@Self)^.&set := $00010000;
  108124. end;
  108125. function TCAN2_C2FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  108126. begin
  108127. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  108128. end;
  108129. procedure TCAN2_C2FIFOINT4.setRXHALFIE; inline;
  108130. begin
  108131. pTDefRegMap(@Self)^.&set := $00020000;
  108132. end;
  108133. procedure TCAN2_C2FIFOINT4.clearRXHALFIE; inline;
  108134. begin
  108135. pTDefRegMap(@Self)^.clr := $00020000;
  108136. end;
  108137. procedure TCAN2_C2FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  108138. begin
  108139. if thebits = 0 then
  108140. pTDefRegMap(@Self)^.clr := $00020000
  108141. else
  108142. pTDefRegMap(@Self)^.&set := $00020000;
  108143. end;
  108144. function TCAN2_C2FIFOINT4.getRXHALFIE : TBits_1; inline;
  108145. begin
  108146. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  108147. end;
  108148. procedure TCAN2_C2FIFOINT4.setRXFULLIE; inline;
  108149. begin
  108150. pTDefRegMap(@Self)^.&set := $00040000;
  108151. end;
  108152. procedure TCAN2_C2FIFOINT4.clearRXFULLIE; inline;
  108153. begin
  108154. pTDefRegMap(@Self)^.clr := $00040000;
  108155. end;
  108156. procedure TCAN2_C2FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  108157. begin
  108158. if thebits = 0 then
  108159. pTDefRegMap(@Self)^.clr := $00040000
  108160. else
  108161. pTDefRegMap(@Self)^.&set := $00040000;
  108162. end;
  108163. function TCAN2_C2FIFOINT4.getRXFULLIE : TBits_1; inline;
  108164. begin
  108165. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  108166. end;
  108167. procedure TCAN2_C2FIFOINT4.setRXOVFLIE; inline;
  108168. begin
  108169. pTDefRegMap(@Self)^.&set := $00080000;
  108170. end;
  108171. procedure TCAN2_C2FIFOINT4.clearRXOVFLIE; inline;
  108172. begin
  108173. pTDefRegMap(@Self)^.clr := $00080000;
  108174. end;
  108175. procedure TCAN2_C2FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  108176. begin
  108177. if thebits = 0 then
  108178. pTDefRegMap(@Self)^.clr := $00080000
  108179. else
  108180. pTDefRegMap(@Self)^.&set := $00080000;
  108181. end;
  108182. function TCAN2_C2FIFOINT4.getRXOVFLIE : TBits_1; inline;
  108183. begin
  108184. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  108185. end;
  108186. procedure TCAN2_C2FIFOINT4.setTXEMPTYIE; inline;
  108187. begin
  108188. pTDefRegMap(@Self)^.&set := $01000000;
  108189. end;
  108190. procedure TCAN2_C2FIFOINT4.clearTXEMPTYIE; inline;
  108191. begin
  108192. pTDefRegMap(@Self)^.clr := $01000000;
  108193. end;
  108194. procedure TCAN2_C2FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  108195. begin
  108196. if thebits = 0 then
  108197. pTDefRegMap(@Self)^.clr := $01000000
  108198. else
  108199. pTDefRegMap(@Self)^.&set := $01000000;
  108200. end;
  108201. function TCAN2_C2FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  108202. begin
  108203. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  108204. end;
  108205. procedure TCAN2_C2FIFOINT4.setTXHALFIE; inline;
  108206. begin
  108207. pTDefRegMap(@Self)^.&set := $02000000;
  108208. end;
  108209. procedure TCAN2_C2FIFOINT4.clearTXHALFIE; inline;
  108210. begin
  108211. pTDefRegMap(@Self)^.clr := $02000000;
  108212. end;
  108213. procedure TCAN2_C2FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  108214. begin
  108215. if thebits = 0 then
  108216. pTDefRegMap(@Self)^.clr := $02000000
  108217. else
  108218. pTDefRegMap(@Self)^.&set := $02000000;
  108219. end;
  108220. function TCAN2_C2FIFOINT4.getTXHALFIE : TBits_1; inline;
  108221. begin
  108222. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  108223. end;
  108224. procedure TCAN2_C2FIFOINT4.setTXNFULLIE; inline;
  108225. begin
  108226. pTDefRegMap(@Self)^.&set := $04000000;
  108227. end;
  108228. procedure TCAN2_C2FIFOINT4.clearTXNFULLIE; inline;
  108229. begin
  108230. pTDefRegMap(@Self)^.clr := $04000000;
  108231. end;
  108232. procedure TCAN2_C2FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  108233. begin
  108234. if thebits = 0 then
  108235. pTDefRegMap(@Self)^.clr := $04000000
  108236. else
  108237. pTDefRegMap(@Self)^.&set := $04000000;
  108238. end;
  108239. function TCAN2_C2FIFOINT4.getTXNFULLIE : TBits_1; inline;
  108240. begin
  108241. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  108242. end;
  108243. procedure TCAN2_C2FIFOINT4.setw(thebits : TBits_32); inline;
  108244. begin
  108245. pTDefRegMap(@Self)^.val := thebits;
  108246. end;
  108247. function TCAN2_C2FIFOINT4.getw : TBits_32; inline;
  108248. begin
  108249. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108250. end;
  108251. procedure TCAN2_C2FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  108252. begin
  108253. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  108254. end;
  108255. function TCAN2_C2FIFOCI4.getCFIFOCI : TBits_5; inline;
  108256. begin
  108257. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  108258. end;
  108259. procedure TCAN2_C2FIFOCI4.setw(thebits : TBits_32); inline;
  108260. begin
  108261. pTDefRegMap(@Self)^.val := thebits;
  108262. end;
  108263. function TCAN2_C2FIFOCI4.getw : TBits_32; inline;
  108264. begin
  108265. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108266. end;
  108267. procedure TCAN2_C2FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  108268. begin
  108269. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  108270. end;
  108271. function TCAN2_C2FIFOCON5.getTXPRI : TBits_2; inline;
  108272. begin
  108273. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  108274. end;
  108275. procedure TCAN2_C2FIFOCON5.setRTREN; inline;
  108276. begin
  108277. pTDefRegMap(@Self)^.&set := $00000004;
  108278. end;
  108279. procedure TCAN2_C2FIFOCON5.clearRTREN; inline;
  108280. begin
  108281. pTDefRegMap(@Self)^.clr := $00000004;
  108282. end;
  108283. procedure TCAN2_C2FIFOCON5.setRTREN(thebits : TBits_1); inline;
  108284. begin
  108285. if thebits = 0 then
  108286. pTDefRegMap(@Self)^.clr := $00000004
  108287. else
  108288. pTDefRegMap(@Self)^.&set := $00000004;
  108289. end;
  108290. function TCAN2_C2FIFOCON5.getRTREN : TBits_1; inline;
  108291. begin
  108292. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108293. end;
  108294. procedure TCAN2_C2FIFOCON5.setTXREQ; inline;
  108295. begin
  108296. pTDefRegMap(@Self)^.&set := $00000008;
  108297. end;
  108298. procedure TCAN2_C2FIFOCON5.clearTXREQ; inline;
  108299. begin
  108300. pTDefRegMap(@Self)^.clr := $00000008;
  108301. end;
  108302. procedure TCAN2_C2FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  108303. begin
  108304. if thebits = 0 then
  108305. pTDefRegMap(@Self)^.clr := $00000008
  108306. else
  108307. pTDefRegMap(@Self)^.&set := $00000008;
  108308. end;
  108309. function TCAN2_C2FIFOCON5.getTXREQ : TBits_1; inline;
  108310. begin
  108311. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108312. end;
  108313. procedure TCAN2_C2FIFOCON5.setTXERR; inline;
  108314. begin
  108315. pTDefRegMap(@Self)^.&set := $00000010;
  108316. end;
  108317. procedure TCAN2_C2FIFOCON5.clearTXERR; inline;
  108318. begin
  108319. pTDefRegMap(@Self)^.clr := $00000010;
  108320. end;
  108321. procedure TCAN2_C2FIFOCON5.setTXERR(thebits : TBits_1); inline;
  108322. begin
  108323. if thebits = 0 then
  108324. pTDefRegMap(@Self)^.clr := $00000010
  108325. else
  108326. pTDefRegMap(@Self)^.&set := $00000010;
  108327. end;
  108328. function TCAN2_C2FIFOCON5.getTXERR : TBits_1; inline;
  108329. begin
  108330. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  108331. end;
  108332. procedure TCAN2_C2FIFOCON5.setTXLARB; inline;
  108333. begin
  108334. pTDefRegMap(@Self)^.&set := $00000020;
  108335. end;
  108336. procedure TCAN2_C2FIFOCON5.clearTXLARB; inline;
  108337. begin
  108338. pTDefRegMap(@Self)^.clr := $00000020;
  108339. end;
  108340. procedure TCAN2_C2FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  108341. begin
  108342. if thebits = 0 then
  108343. pTDefRegMap(@Self)^.clr := $00000020
  108344. else
  108345. pTDefRegMap(@Self)^.&set := $00000020;
  108346. end;
  108347. function TCAN2_C2FIFOCON5.getTXLARB : TBits_1; inline;
  108348. begin
  108349. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  108350. end;
  108351. procedure TCAN2_C2FIFOCON5.setTXABAT; inline;
  108352. begin
  108353. pTDefRegMap(@Self)^.&set := $00000040;
  108354. end;
  108355. procedure TCAN2_C2FIFOCON5.clearTXABAT; inline;
  108356. begin
  108357. pTDefRegMap(@Self)^.clr := $00000040;
  108358. end;
  108359. procedure TCAN2_C2FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  108360. begin
  108361. if thebits = 0 then
  108362. pTDefRegMap(@Self)^.clr := $00000040
  108363. else
  108364. pTDefRegMap(@Self)^.&set := $00000040;
  108365. end;
  108366. function TCAN2_C2FIFOCON5.getTXABAT : TBits_1; inline;
  108367. begin
  108368. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  108369. end;
  108370. procedure TCAN2_C2FIFOCON5.setTXEN; inline;
  108371. begin
  108372. pTDefRegMap(@Self)^.&set := $00000080;
  108373. end;
  108374. procedure TCAN2_C2FIFOCON5.clearTXEN; inline;
  108375. begin
  108376. pTDefRegMap(@Self)^.clr := $00000080;
  108377. end;
  108378. procedure TCAN2_C2FIFOCON5.setTXEN(thebits : TBits_1); inline;
  108379. begin
  108380. if thebits = 0 then
  108381. pTDefRegMap(@Self)^.clr := $00000080
  108382. else
  108383. pTDefRegMap(@Self)^.&set := $00000080;
  108384. end;
  108385. function TCAN2_C2FIFOCON5.getTXEN : TBits_1; inline;
  108386. begin
  108387. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  108388. end;
  108389. procedure TCAN2_C2FIFOCON5.setDONLY; inline;
  108390. begin
  108391. pTDefRegMap(@Self)^.&set := $00001000;
  108392. end;
  108393. procedure TCAN2_C2FIFOCON5.clearDONLY; inline;
  108394. begin
  108395. pTDefRegMap(@Self)^.clr := $00001000;
  108396. end;
  108397. procedure TCAN2_C2FIFOCON5.setDONLY(thebits : TBits_1); inline;
  108398. begin
  108399. if thebits = 0 then
  108400. pTDefRegMap(@Self)^.clr := $00001000
  108401. else
  108402. pTDefRegMap(@Self)^.&set := $00001000;
  108403. end;
  108404. function TCAN2_C2FIFOCON5.getDONLY : TBits_1; inline;
  108405. begin
  108406. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  108407. end;
  108408. procedure TCAN2_C2FIFOCON5.setUINC; inline;
  108409. begin
  108410. pTDefRegMap(@Self)^.&set := $00002000;
  108411. end;
  108412. procedure TCAN2_C2FIFOCON5.clearUINC; inline;
  108413. begin
  108414. pTDefRegMap(@Self)^.clr := $00002000;
  108415. end;
  108416. procedure TCAN2_C2FIFOCON5.setUINC(thebits : TBits_1); inline;
  108417. begin
  108418. if thebits = 0 then
  108419. pTDefRegMap(@Self)^.clr := $00002000
  108420. else
  108421. pTDefRegMap(@Self)^.&set := $00002000;
  108422. end;
  108423. function TCAN2_C2FIFOCON5.getUINC : TBits_1; inline;
  108424. begin
  108425. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  108426. end;
  108427. procedure TCAN2_C2FIFOCON5.setFRESET; inline;
  108428. begin
  108429. pTDefRegMap(@Self)^.&set := $00004000;
  108430. end;
  108431. procedure TCAN2_C2FIFOCON5.clearFRESET; inline;
  108432. begin
  108433. pTDefRegMap(@Self)^.clr := $00004000;
  108434. end;
  108435. procedure TCAN2_C2FIFOCON5.setFRESET(thebits : TBits_1); inline;
  108436. begin
  108437. if thebits = 0 then
  108438. pTDefRegMap(@Self)^.clr := $00004000
  108439. else
  108440. pTDefRegMap(@Self)^.&set := $00004000;
  108441. end;
  108442. function TCAN2_C2FIFOCON5.getFRESET : TBits_1; inline;
  108443. begin
  108444. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  108445. end;
  108446. procedure TCAN2_C2FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  108447. begin
  108448. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  108449. end;
  108450. function TCAN2_C2FIFOCON5.getFSIZE : TBits_5; inline;
  108451. begin
  108452. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  108453. end;
  108454. procedure TCAN2_C2FIFOCON5.setw(thebits : TBits_32); inline;
  108455. begin
  108456. pTDefRegMap(@Self)^.val := thebits;
  108457. end;
  108458. function TCAN2_C2FIFOCON5.getw : TBits_32; inline;
  108459. begin
  108460. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108461. end;
  108462. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIF; inline;
  108463. begin
  108464. pTDefRegMap(@Self)^.&set := $00000001;
  108465. end;
  108466. procedure TCAN2_C2FIFOINT5.clearRXNEMPTYIF; inline;
  108467. begin
  108468. pTDefRegMap(@Self)^.clr := $00000001;
  108469. end;
  108470. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  108471. begin
  108472. if thebits = 0 then
  108473. pTDefRegMap(@Self)^.clr := $00000001
  108474. else
  108475. pTDefRegMap(@Self)^.&set := $00000001;
  108476. end;
  108477. function TCAN2_C2FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  108478. begin
  108479. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  108480. end;
  108481. procedure TCAN2_C2FIFOINT5.setRXHALFIF; inline;
  108482. begin
  108483. pTDefRegMap(@Self)^.&set := $00000002;
  108484. end;
  108485. procedure TCAN2_C2FIFOINT5.clearRXHALFIF; inline;
  108486. begin
  108487. pTDefRegMap(@Self)^.clr := $00000002;
  108488. end;
  108489. procedure TCAN2_C2FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  108490. begin
  108491. if thebits = 0 then
  108492. pTDefRegMap(@Self)^.clr := $00000002
  108493. else
  108494. pTDefRegMap(@Self)^.&set := $00000002;
  108495. end;
  108496. function TCAN2_C2FIFOINT5.getRXHALFIF : TBits_1; inline;
  108497. begin
  108498. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  108499. end;
  108500. procedure TCAN2_C2FIFOINT5.setRXFULLIF; inline;
  108501. begin
  108502. pTDefRegMap(@Self)^.&set := $00000004;
  108503. end;
  108504. procedure TCAN2_C2FIFOINT5.clearRXFULLIF; inline;
  108505. begin
  108506. pTDefRegMap(@Self)^.clr := $00000004;
  108507. end;
  108508. procedure TCAN2_C2FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  108509. begin
  108510. if thebits = 0 then
  108511. pTDefRegMap(@Self)^.clr := $00000004
  108512. else
  108513. pTDefRegMap(@Self)^.&set := $00000004;
  108514. end;
  108515. function TCAN2_C2FIFOINT5.getRXFULLIF : TBits_1; inline;
  108516. begin
  108517. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108518. end;
  108519. procedure TCAN2_C2FIFOINT5.setRXOVFLIF; inline;
  108520. begin
  108521. pTDefRegMap(@Self)^.&set := $00000008;
  108522. end;
  108523. procedure TCAN2_C2FIFOINT5.clearRXOVFLIF; inline;
  108524. begin
  108525. pTDefRegMap(@Self)^.clr := $00000008;
  108526. end;
  108527. procedure TCAN2_C2FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  108528. begin
  108529. if thebits = 0 then
  108530. pTDefRegMap(@Self)^.clr := $00000008
  108531. else
  108532. pTDefRegMap(@Self)^.&set := $00000008;
  108533. end;
  108534. function TCAN2_C2FIFOINT5.getRXOVFLIF : TBits_1; inline;
  108535. begin
  108536. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108537. end;
  108538. procedure TCAN2_C2FIFOINT5.setTXEMPTYIF; inline;
  108539. begin
  108540. pTDefRegMap(@Self)^.&set := $00000100;
  108541. end;
  108542. procedure TCAN2_C2FIFOINT5.clearTXEMPTYIF; inline;
  108543. begin
  108544. pTDefRegMap(@Self)^.clr := $00000100;
  108545. end;
  108546. procedure TCAN2_C2FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  108547. begin
  108548. if thebits = 0 then
  108549. pTDefRegMap(@Self)^.clr := $00000100
  108550. else
  108551. pTDefRegMap(@Self)^.&set := $00000100;
  108552. end;
  108553. function TCAN2_C2FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  108554. begin
  108555. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  108556. end;
  108557. procedure TCAN2_C2FIFOINT5.setTXHALFIF; inline;
  108558. begin
  108559. pTDefRegMap(@Self)^.&set := $00000200;
  108560. end;
  108561. procedure TCAN2_C2FIFOINT5.clearTXHALFIF; inline;
  108562. begin
  108563. pTDefRegMap(@Self)^.clr := $00000200;
  108564. end;
  108565. procedure TCAN2_C2FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  108566. begin
  108567. if thebits = 0 then
  108568. pTDefRegMap(@Self)^.clr := $00000200
  108569. else
  108570. pTDefRegMap(@Self)^.&set := $00000200;
  108571. end;
  108572. function TCAN2_C2FIFOINT5.getTXHALFIF : TBits_1; inline;
  108573. begin
  108574. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  108575. end;
  108576. procedure TCAN2_C2FIFOINT5.setTXNFULLIF; inline;
  108577. begin
  108578. pTDefRegMap(@Self)^.&set := $00000400;
  108579. end;
  108580. procedure TCAN2_C2FIFOINT5.clearTXNFULLIF; inline;
  108581. begin
  108582. pTDefRegMap(@Self)^.clr := $00000400;
  108583. end;
  108584. procedure TCAN2_C2FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  108585. begin
  108586. if thebits = 0 then
  108587. pTDefRegMap(@Self)^.clr := $00000400
  108588. else
  108589. pTDefRegMap(@Self)^.&set := $00000400;
  108590. end;
  108591. function TCAN2_C2FIFOINT5.getTXNFULLIF : TBits_1; inline;
  108592. begin
  108593. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  108594. end;
  108595. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIE; inline;
  108596. begin
  108597. pTDefRegMap(@Self)^.&set := $00010000;
  108598. end;
  108599. procedure TCAN2_C2FIFOINT5.clearRXNEMPTYIE; inline;
  108600. begin
  108601. pTDefRegMap(@Self)^.clr := $00010000;
  108602. end;
  108603. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  108604. begin
  108605. if thebits = 0 then
  108606. pTDefRegMap(@Self)^.clr := $00010000
  108607. else
  108608. pTDefRegMap(@Self)^.&set := $00010000;
  108609. end;
  108610. function TCAN2_C2FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  108611. begin
  108612. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  108613. end;
  108614. procedure TCAN2_C2FIFOINT5.setRXHALFIE; inline;
  108615. begin
  108616. pTDefRegMap(@Self)^.&set := $00020000;
  108617. end;
  108618. procedure TCAN2_C2FIFOINT5.clearRXHALFIE; inline;
  108619. begin
  108620. pTDefRegMap(@Self)^.clr := $00020000;
  108621. end;
  108622. procedure TCAN2_C2FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  108623. begin
  108624. if thebits = 0 then
  108625. pTDefRegMap(@Self)^.clr := $00020000
  108626. else
  108627. pTDefRegMap(@Self)^.&set := $00020000;
  108628. end;
  108629. function TCAN2_C2FIFOINT5.getRXHALFIE : TBits_1; inline;
  108630. begin
  108631. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  108632. end;
  108633. procedure TCAN2_C2FIFOINT5.setRXFULLIE; inline;
  108634. begin
  108635. pTDefRegMap(@Self)^.&set := $00040000;
  108636. end;
  108637. procedure TCAN2_C2FIFOINT5.clearRXFULLIE; inline;
  108638. begin
  108639. pTDefRegMap(@Self)^.clr := $00040000;
  108640. end;
  108641. procedure TCAN2_C2FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  108642. begin
  108643. if thebits = 0 then
  108644. pTDefRegMap(@Self)^.clr := $00040000
  108645. else
  108646. pTDefRegMap(@Self)^.&set := $00040000;
  108647. end;
  108648. function TCAN2_C2FIFOINT5.getRXFULLIE : TBits_1; inline;
  108649. begin
  108650. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  108651. end;
  108652. procedure TCAN2_C2FIFOINT5.setRXOVFLIE; inline;
  108653. begin
  108654. pTDefRegMap(@Self)^.&set := $00080000;
  108655. end;
  108656. procedure TCAN2_C2FIFOINT5.clearRXOVFLIE; inline;
  108657. begin
  108658. pTDefRegMap(@Self)^.clr := $00080000;
  108659. end;
  108660. procedure TCAN2_C2FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  108661. begin
  108662. if thebits = 0 then
  108663. pTDefRegMap(@Self)^.clr := $00080000
  108664. else
  108665. pTDefRegMap(@Self)^.&set := $00080000;
  108666. end;
  108667. function TCAN2_C2FIFOINT5.getRXOVFLIE : TBits_1; inline;
  108668. begin
  108669. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  108670. end;
  108671. procedure TCAN2_C2FIFOINT5.setTXEMPTYIE; inline;
  108672. begin
  108673. pTDefRegMap(@Self)^.&set := $01000000;
  108674. end;
  108675. procedure TCAN2_C2FIFOINT5.clearTXEMPTYIE; inline;
  108676. begin
  108677. pTDefRegMap(@Self)^.clr := $01000000;
  108678. end;
  108679. procedure TCAN2_C2FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  108680. begin
  108681. if thebits = 0 then
  108682. pTDefRegMap(@Self)^.clr := $01000000
  108683. else
  108684. pTDefRegMap(@Self)^.&set := $01000000;
  108685. end;
  108686. function TCAN2_C2FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  108687. begin
  108688. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  108689. end;
  108690. procedure TCAN2_C2FIFOINT5.setTXHALFIE; inline;
  108691. begin
  108692. pTDefRegMap(@Self)^.&set := $02000000;
  108693. end;
  108694. procedure TCAN2_C2FIFOINT5.clearTXHALFIE; inline;
  108695. begin
  108696. pTDefRegMap(@Self)^.clr := $02000000;
  108697. end;
  108698. procedure TCAN2_C2FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  108699. begin
  108700. if thebits = 0 then
  108701. pTDefRegMap(@Self)^.clr := $02000000
  108702. else
  108703. pTDefRegMap(@Self)^.&set := $02000000;
  108704. end;
  108705. function TCAN2_C2FIFOINT5.getTXHALFIE : TBits_1; inline;
  108706. begin
  108707. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  108708. end;
  108709. procedure TCAN2_C2FIFOINT5.setTXNFULLIE; inline;
  108710. begin
  108711. pTDefRegMap(@Self)^.&set := $04000000;
  108712. end;
  108713. procedure TCAN2_C2FIFOINT5.clearTXNFULLIE; inline;
  108714. begin
  108715. pTDefRegMap(@Self)^.clr := $04000000;
  108716. end;
  108717. procedure TCAN2_C2FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  108718. begin
  108719. if thebits = 0 then
  108720. pTDefRegMap(@Self)^.clr := $04000000
  108721. else
  108722. pTDefRegMap(@Self)^.&set := $04000000;
  108723. end;
  108724. function TCAN2_C2FIFOINT5.getTXNFULLIE : TBits_1; inline;
  108725. begin
  108726. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  108727. end;
  108728. procedure TCAN2_C2FIFOINT5.setw(thebits : TBits_32); inline;
  108729. begin
  108730. pTDefRegMap(@Self)^.val := thebits;
  108731. end;
  108732. function TCAN2_C2FIFOINT5.getw : TBits_32; inline;
  108733. begin
  108734. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108735. end;
  108736. procedure TCAN2_C2FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  108737. begin
  108738. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  108739. end;
  108740. function TCAN2_C2FIFOCI5.getCFIFOCI : TBits_5; inline;
  108741. begin
  108742. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  108743. end;
  108744. procedure TCAN2_C2FIFOCI5.setw(thebits : TBits_32); inline;
  108745. begin
  108746. pTDefRegMap(@Self)^.val := thebits;
  108747. end;
  108748. function TCAN2_C2FIFOCI5.getw : TBits_32; inline;
  108749. begin
  108750. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108751. end;
  108752. procedure TCAN2_C2FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  108753. begin
  108754. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  108755. end;
  108756. function TCAN2_C2FIFOCON6.getTXPRI : TBits_2; inline;
  108757. begin
  108758. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  108759. end;
  108760. procedure TCAN2_C2FIFOCON6.setRTREN; inline;
  108761. begin
  108762. pTDefRegMap(@Self)^.&set := $00000004;
  108763. end;
  108764. procedure TCAN2_C2FIFOCON6.clearRTREN; inline;
  108765. begin
  108766. pTDefRegMap(@Self)^.clr := $00000004;
  108767. end;
  108768. procedure TCAN2_C2FIFOCON6.setRTREN(thebits : TBits_1); inline;
  108769. begin
  108770. if thebits = 0 then
  108771. pTDefRegMap(@Self)^.clr := $00000004
  108772. else
  108773. pTDefRegMap(@Self)^.&set := $00000004;
  108774. end;
  108775. function TCAN2_C2FIFOCON6.getRTREN : TBits_1; inline;
  108776. begin
  108777. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108778. end;
  108779. procedure TCAN2_C2FIFOCON6.setTXREQ; inline;
  108780. begin
  108781. pTDefRegMap(@Self)^.&set := $00000008;
  108782. end;
  108783. procedure TCAN2_C2FIFOCON6.clearTXREQ; inline;
  108784. begin
  108785. pTDefRegMap(@Self)^.clr := $00000008;
  108786. end;
  108787. procedure TCAN2_C2FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  108788. begin
  108789. if thebits = 0 then
  108790. pTDefRegMap(@Self)^.clr := $00000008
  108791. else
  108792. pTDefRegMap(@Self)^.&set := $00000008;
  108793. end;
  108794. function TCAN2_C2FIFOCON6.getTXREQ : TBits_1; inline;
  108795. begin
  108796. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108797. end;
  108798. procedure TCAN2_C2FIFOCON6.setTXERR; inline;
  108799. begin
  108800. pTDefRegMap(@Self)^.&set := $00000010;
  108801. end;
  108802. procedure TCAN2_C2FIFOCON6.clearTXERR; inline;
  108803. begin
  108804. pTDefRegMap(@Self)^.clr := $00000010;
  108805. end;
  108806. procedure TCAN2_C2FIFOCON6.setTXERR(thebits : TBits_1); inline;
  108807. begin
  108808. if thebits = 0 then
  108809. pTDefRegMap(@Self)^.clr := $00000010
  108810. else
  108811. pTDefRegMap(@Self)^.&set := $00000010;
  108812. end;
  108813. function TCAN2_C2FIFOCON6.getTXERR : TBits_1; inline;
  108814. begin
  108815. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  108816. end;
  108817. procedure TCAN2_C2FIFOCON6.setTXLARB; inline;
  108818. begin
  108819. pTDefRegMap(@Self)^.&set := $00000020;
  108820. end;
  108821. procedure TCAN2_C2FIFOCON6.clearTXLARB; inline;
  108822. begin
  108823. pTDefRegMap(@Self)^.clr := $00000020;
  108824. end;
  108825. procedure TCAN2_C2FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  108826. begin
  108827. if thebits = 0 then
  108828. pTDefRegMap(@Self)^.clr := $00000020
  108829. else
  108830. pTDefRegMap(@Self)^.&set := $00000020;
  108831. end;
  108832. function TCAN2_C2FIFOCON6.getTXLARB : TBits_1; inline;
  108833. begin
  108834. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  108835. end;
  108836. procedure TCAN2_C2FIFOCON6.setTXABAT; inline;
  108837. begin
  108838. pTDefRegMap(@Self)^.&set := $00000040;
  108839. end;
  108840. procedure TCAN2_C2FIFOCON6.clearTXABAT; inline;
  108841. begin
  108842. pTDefRegMap(@Self)^.clr := $00000040;
  108843. end;
  108844. procedure TCAN2_C2FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  108845. begin
  108846. if thebits = 0 then
  108847. pTDefRegMap(@Self)^.clr := $00000040
  108848. else
  108849. pTDefRegMap(@Self)^.&set := $00000040;
  108850. end;
  108851. function TCAN2_C2FIFOCON6.getTXABAT : TBits_1; inline;
  108852. begin
  108853. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  108854. end;
  108855. procedure TCAN2_C2FIFOCON6.setTXEN; inline;
  108856. begin
  108857. pTDefRegMap(@Self)^.&set := $00000080;
  108858. end;
  108859. procedure TCAN2_C2FIFOCON6.clearTXEN; inline;
  108860. begin
  108861. pTDefRegMap(@Self)^.clr := $00000080;
  108862. end;
  108863. procedure TCAN2_C2FIFOCON6.setTXEN(thebits : TBits_1); inline;
  108864. begin
  108865. if thebits = 0 then
  108866. pTDefRegMap(@Self)^.clr := $00000080
  108867. else
  108868. pTDefRegMap(@Self)^.&set := $00000080;
  108869. end;
  108870. function TCAN2_C2FIFOCON6.getTXEN : TBits_1; inline;
  108871. begin
  108872. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  108873. end;
  108874. procedure TCAN2_C2FIFOCON6.setDONLY; inline;
  108875. begin
  108876. pTDefRegMap(@Self)^.&set := $00001000;
  108877. end;
  108878. procedure TCAN2_C2FIFOCON6.clearDONLY; inline;
  108879. begin
  108880. pTDefRegMap(@Self)^.clr := $00001000;
  108881. end;
  108882. procedure TCAN2_C2FIFOCON6.setDONLY(thebits : TBits_1); inline;
  108883. begin
  108884. if thebits = 0 then
  108885. pTDefRegMap(@Self)^.clr := $00001000
  108886. else
  108887. pTDefRegMap(@Self)^.&set := $00001000;
  108888. end;
  108889. function TCAN2_C2FIFOCON6.getDONLY : TBits_1; inline;
  108890. begin
  108891. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  108892. end;
  108893. procedure TCAN2_C2FIFOCON6.setUINC; inline;
  108894. begin
  108895. pTDefRegMap(@Self)^.&set := $00002000;
  108896. end;
  108897. procedure TCAN2_C2FIFOCON6.clearUINC; inline;
  108898. begin
  108899. pTDefRegMap(@Self)^.clr := $00002000;
  108900. end;
  108901. procedure TCAN2_C2FIFOCON6.setUINC(thebits : TBits_1); inline;
  108902. begin
  108903. if thebits = 0 then
  108904. pTDefRegMap(@Self)^.clr := $00002000
  108905. else
  108906. pTDefRegMap(@Self)^.&set := $00002000;
  108907. end;
  108908. function TCAN2_C2FIFOCON6.getUINC : TBits_1; inline;
  108909. begin
  108910. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  108911. end;
  108912. procedure TCAN2_C2FIFOCON6.setFRESET; inline;
  108913. begin
  108914. pTDefRegMap(@Self)^.&set := $00004000;
  108915. end;
  108916. procedure TCAN2_C2FIFOCON6.clearFRESET; inline;
  108917. begin
  108918. pTDefRegMap(@Self)^.clr := $00004000;
  108919. end;
  108920. procedure TCAN2_C2FIFOCON6.setFRESET(thebits : TBits_1); inline;
  108921. begin
  108922. if thebits = 0 then
  108923. pTDefRegMap(@Self)^.clr := $00004000
  108924. else
  108925. pTDefRegMap(@Self)^.&set := $00004000;
  108926. end;
  108927. function TCAN2_C2FIFOCON6.getFRESET : TBits_1; inline;
  108928. begin
  108929. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  108930. end;
  108931. procedure TCAN2_C2FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  108932. begin
  108933. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  108934. end;
  108935. function TCAN2_C2FIFOCON6.getFSIZE : TBits_5; inline;
  108936. begin
  108937. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  108938. end;
  108939. procedure TCAN2_C2FIFOCON6.setw(thebits : TBits_32); inline;
  108940. begin
  108941. pTDefRegMap(@Self)^.val := thebits;
  108942. end;
  108943. function TCAN2_C2FIFOCON6.getw : TBits_32; inline;
  108944. begin
  108945. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108946. end;
  108947. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIF; inline;
  108948. begin
  108949. pTDefRegMap(@Self)^.&set := $00000001;
  108950. end;
  108951. procedure TCAN2_C2FIFOINT6.clearRXNEMPTYIF; inline;
  108952. begin
  108953. pTDefRegMap(@Self)^.clr := $00000001;
  108954. end;
  108955. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  108956. begin
  108957. if thebits = 0 then
  108958. pTDefRegMap(@Self)^.clr := $00000001
  108959. else
  108960. pTDefRegMap(@Self)^.&set := $00000001;
  108961. end;
  108962. function TCAN2_C2FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  108963. begin
  108964. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  108965. end;
  108966. procedure TCAN2_C2FIFOINT6.setRXHALFIF; inline;
  108967. begin
  108968. pTDefRegMap(@Self)^.&set := $00000002;
  108969. end;
  108970. procedure TCAN2_C2FIFOINT6.clearRXHALFIF; inline;
  108971. begin
  108972. pTDefRegMap(@Self)^.clr := $00000002;
  108973. end;
  108974. procedure TCAN2_C2FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  108975. begin
  108976. if thebits = 0 then
  108977. pTDefRegMap(@Self)^.clr := $00000002
  108978. else
  108979. pTDefRegMap(@Self)^.&set := $00000002;
  108980. end;
  108981. function TCAN2_C2FIFOINT6.getRXHALFIF : TBits_1; inline;
  108982. begin
  108983. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  108984. end;
  108985. procedure TCAN2_C2FIFOINT6.setRXFULLIF; inline;
  108986. begin
  108987. pTDefRegMap(@Self)^.&set := $00000004;
  108988. end;
  108989. procedure TCAN2_C2FIFOINT6.clearRXFULLIF; inline;
  108990. begin
  108991. pTDefRegMap(@Self)^.clr := $00000004;
  108992. end;
  108993. procedure TCAN2_C2FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  108994. begin
  108995. if thebits = 0 then
  108996. pTDefRegMap(@Self)^.clr := $00000004
  108997. else
  108998. pTDefRegMap(@Self)^.&set := $00000004;
  108999. end;
  109000. function TCAN2_C2FIFOINT6.getRXFULLIF : TBits_1; inline;
  109001. begin
  109002. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109003. end;
  109004. procedure TCAN2_C2FIFOINT6.setRXOVFLIF; inline;
  109005. begin
  109006. pTDefRegMap(@Self)^.&set := $00000008;
  109007. end;
  109008. procedure TCAN2_C2FIFOINT6.clearRXOVFLIF; inline;
  109009. begin
  109010. pTDefRegMap(@Self)^.clr := $00000008;
  109011. end;
  109012. procedure TCAN2_C2FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  109013. begin
  109014. if thebits = 0 then
  109015. pTDefRegMap(@Self)^.clr := $00000008
  109016. else
  109017. pTDefRegMap(@Self)^.&set := $00000008;
  109018. end;
  109019. function TCAN2_C2FIFOINT6.getRXOVFLIF : TBits_1; inline;
  109020. begin
  109021. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109022. end;
  109023. procedure TCAN2_C2FIFOINT6.setTXEMPTYIF; inline;
  109024. begin
  109025. pTDefRegMap(@Self)^.&set := $00000100;
  109026. end;
  109027. procedure TCAN2_C2FIFOINT6.clearTXEMPTYIF; inline;
  109028. begin
  109029. pTDefRegMap(@Self)^.clr := $00000100;
  109030. end;
  109031. procedure TCAN2_C2FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  109032. begin
  109033. if thebits = 0 then
  109034. pTDefRegMap(@Self)^.clr := $00000100
  109035. else
  109036. pTDefRegMap(@Self)^.&set := $00000100;
  109037. end;
  109038. function TCAN2_C2FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  109039. begin
  109040. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  109041. end;
  109042. procedure TCAN2_C2FIFOINT6.setTXHALFIF; inline;
  109043. begin
  109044. pTDefRegMap(@Self)^.&set := $00000200;
  109045. end;
  109046. procedure TCAN2_C2FIFOINT6.clearTXHALFIF; inline;
  109047. begin
  109048. pTDefRegMap(@Self)^.clr := $00000200;
  109049. end;
  109050. procedure TCAN2_C2FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  109051. begin
  109052. if thebits = 0 then
  109053. pTDefRegMap(@Self)^.clr := $00000200
  109054. else
  109055. pTDefRegMap(@Self)^.&set := $00000200;
  109056. end;
  109057. function TCAN2_C2FIFOINT6.getTXHALFIF : TBits_1; inline;
  109058. begin
  109059. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  109060. end;
  109061. procedure TCAN2_C2FIFOINT6.setTXNFULLIF; inline;
  109062. begin
  109063. pTDefRegMap(@Self)^.&set := $00000400;
  109064. end;
  109065. procedure TCAN2_C2FIFOINT6.clearTXNFULLIF; inline;
  109066. begin
  109067. pTDefRegMap(@Self)^.clr := $00000400;
  109068. end;
  109069. procedure TCAN2_C2FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  109070. begin
  109071. if thebits = 0 then
  109072. pTDefRegMap(@Self)^.clr := $00000400
  109073. else
  109074. pTDefRegMap(@Self)^.&set := $00000400;
  109075. end;
  109076. function TCAN2_C2FIFOINT6.getTXNFULLIF : TBits_1; inline;
  109077. begin
  109078. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  109079. end;
  109080. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIE; inline;
  109081. begin
  109082. pTDefRegMap(@Self)^.&set := $00010000;
  109083. end;
  109084. procedure TCAN2_C2FIFOINT6.clearRXNEMPTYIE; inline;
  109085. begin
  109086. pTDefRegMap(@Self)^.clr := $00010000;
  109087. end;
  109088. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  109089. begin
  109090. if thebits = 0 then
  109091. pTDefRegMap(@Self)^.clr := $00010000
  109092. else
  109093. pTDefRegMap(@Self)^.&set := $00010000;
  109094. end;
  109095. function TCAN2_C2FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  109096. begin
  109097. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  109098. end;
  109099. procedure TCAN2_C2FIFOINT6.setRXHALFIE; inline;
  109100. begin
  109101. pTDefRegMap(@Self)^.&set := $00020000;
  109102. end;
  109103. procedure TCAN2_C2FIFOINT6.clearRXHALFIE; inline;
  109104. begin
  109105. pTDefRegMap(@Self)^.clr := $00020000;
  109106. end;
  109107. procedure TCAN2_C2FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  109108. begin
  109109. if thebits = 0 then
  109110. pTDefRegMap(@Self)^.clr := $00020000
  109111. else
  109112. pTDefRegMap(@Self)^.&set := $00020000;
  109113. end;
  109114. function TCAN2_C2FIFOINT6.getRXHALFIE : TBits_1; inline;
  109115. begin
  109116. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  109117. end;
  109118. procedure TCAN2_C2FIFOINT6.setRXFULLIE; inline;
  109119. begin
  109120. pTDefRegMap(@Self)^.&set := $00040000;
  109121. end;
  109122. procedure TCAN2_C2FIFOINT6.clearRXFULLIE; inline;
  109123. begin
  109124. pTDefRegMap(@Self)^.clr := $00040000;
  109125. end;
  109126. procedure TCAN2_C2FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  109127. begin
  109128. if thebits = 0 then
  109129. pTDefRegMap(@Self)^.clr := $00040000
  109130. else
  109131. pTDefRegMap(@Self)^.&set := $00040000;
  109132. end;
  109133. function TCAN2_C2FIFOINT6.getRXFULLIE : TBits_1; inline;
  109134. begin
  109135. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  109136. end;
  109137. procedure TCAN2_C2FIFOINT6.setRXOVFLIE; inline;
  109138. begin
  109139. pTDefRegMap(@Self)^.&set := $00080000;
  109140. end;
  109141. procedure TCAN2_C2FIFOINT6.clearRXOVFLIE; inline;
  109142. begin
  109143. pTDefRegMap(@Self)^.clr := $00080000;
  109144. end;
  109145. procedure TCAN2_C2FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  109146. begin
  109147. if thebits = 0 then
  109148. pTDefRegMap(@Self)^.clr := $00080000
  109149. else
  109150. pTDefRegMap(@Self)^.&set := $00080000;
  109151. end;
  109152. function TCAN2_C2FIFOINT6.getRXOVFLIE : TBits_1; inline;
  109153. begin
  109154. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  109155. end;
  109156. procedure TCAN2_C2FIFOINT6.setTXEMPTYIE; inline;
  109157. begin
  109158. pTDefRegMap(@Self)^.&set := $01000000;
  109159. end;
  109160. procedure TCAN2_C2FIFOINT6.clearTXEMPTYIE; inline;
  109161. begin
  109162. pTDefRegMap(@Self)^.clr := $01000000;
  109163. end;
  109164. procedure TCAN2_C2FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  109165. begin
  109166. if thebits = 0 then
  109167. pTDefRegMap(@Self)^.clr := $01000000
  109168. else
  109169. pTDefRegMap(@Self)^.&set := $01000000;
  109170. end;
  109171. function TCAN2_C2FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  109172. begin
  109173. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  109174. end;
  109175. procedure TCAN2_C2FIFOINT6.setTXHALFIE; inline;
  109176. begin
  109177. pTDefRegMap(@Self)^.&set := $02000000;
  109178. end;
  109179. procedure TCAN2_C2FIFOINT6.clearTXHALFIE; inline;
  109180. begin
  109181. pTDefRegMap(@Self)^.clr := $02000000;
  109182. end;
  109183. procedure TCAN2_C2FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  109184. begin
  109185. if thebits = 0 then
  109186. pTDefRegMap(@Self)^.clr := $02000000
  109187. else
  109188. pTDefRegMap(@Self)^.&set := $02000000;
  109189. end;
  109190. function TCAN2_C2FIFOINT6.getTXHALFIE : TBits_1; inline;
  109191. begin
  109192. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  109193. end;
  109194. procedure TCAN2_C2FIFOINT6.setTXNFULLIE; inline;
  109195. begin
  109196. pTDefRegMap(@Self)^.&set := $04000000;
  109197. end;
  109198. procedure TCAN2_C2FIFOINT6.clearTXNFULLIE; inline;
  109199. begin
  109200. pTDefRegMap(@Self)^.clr := $04000000;
  109201. end;
  109202. procedure TCAN2_C2FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  109203. begin
  109204. if thebits = 0 then
  109205. pTDefRegMap(@Self)^.clr := $04000000
  109206. else
  109207. pTDefRegMap(@Self)^.&set := $04000000;
  109208. end;
  109209. function TCAN2_C2FIFOINT6.getTXNFULLIE : TBits_1; inline;
  109210. begin
  109211. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  109212. end;
  109213. procedure TCAN2_C2FIFOINT6.setw(thebits : TBits_32); inline;
  109214. begin
  109215. pTDefRegMap(@Self)^.val := thebits;
  109216. end;
  109217. function TCAN2_C2FIFOINT6.getw : TBits_32; inline;
  109218. begin
  109219. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109220. end;
  109221. procedure TCAN2_C2FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  109222. begin
  109223. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  109224. end;
  109225. function TCAN2_C2FIFOCI6.getCFIFOCI : TBits_5; inline;
  109226. begin
  109227. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  109228. end;
  109229. procedure TCAN2_C2FIFOCI6.setw(thebits : TBits_32); inline;
  109230. begin
  109231. pTDefRegMap(@Self)^.val := thebits;
  109232. end;
  109233. function TCAN2_C2FIFOCI6.getw : TBits_32; inline;
  109234. begin
  109235. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109236. end;
  109237. procedure TCAN2_C2FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  109238. begin
  109239. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  109240. end;
  109241. function TCAN2_C2FIFOCON7.getTXPRI : TBits_2; inline;
  109242. begin
  109243. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  109244. end;
  109245. procedure TCAN2_C2FIFOCON7.setRTREN; inline;
  109246. begin
  109247. pTDefRegMap(@Self)^.&set := $00000004;
  109248. end;
  109249. procedure TCAN2_C2FIFOCON7.clearRTREN; inline;
  109250. begin
  109251. pTDefRegMap(@Self)^.clr := $00000004;
  109252. end;
  109253. procedure TCAN2_C2FIFOCON7.setRTREN(thebits : TBits_1); inline;
  109254. begin
  109255. if thebits = 0 then
  109256. pTDefRegMap(@Self)^.clr := $00000004
  109257. else
  109258. pTDefRegMap(@Self)^.&set := $00000004;
  109259. end;
  109260. function TCAN2_C2FIFOCON7.getRTREN : TBits_1; inline;
  109261. begin
  109262. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109263. end;
  109264. procedure TCAN2_C2FIFOCON7.setTXREQ; inline;
  109265. begin
  109266. pTDefRegMap(@Self)^.&set := $00000008;
  109267. end;
  109268. procedure TCAN2_C2FIFOCON7.clearTXREQ; inline;
  109269. begin
  109270. pTDefRegMap(@Self)^.clr := $00000008;
  109271. end;
  109272. procedure TCAN2_C2FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  109273. begin
  109274. if thebits = 0 then
  109275. pTDefRegMap(@Self)^.clr := $00000008
  109276. else
  109277. pTDefRegMap(@Self)^.&set := $00000008;
  109278. end;
  109279. function TCAN2_C2FIFOCON7.getTXREQ : TBits_1; inline;
  109280. begin
  109281. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109282. end;
  109283. procedure TCAN2_C2FIFOCON7.setTXERR; inline;
  109284. begin
  109285. pTDefRegMap(@Self)^.&set := $00000010;
  109286. end;
  109287. procedure TCAN2_C2FIFOCON7.clearTXERR; inline;
  109288. begin
  109289. pTDefRegMap(@Self)^.clr := $00000010;
  109290. end;
  109291. procedure TCAN2_C2FIFOCON7.setTXERR(thebits : TBits_1); inline;
  109292. begin
  109293. if thebits = 0 then
  109294. pTDefRegMap(@Self)^.clr := $00000010
  109295. else
  109296. pTDefRegMap(@Self)^.&set := $00000010;
  109297. end;
  109298. function TCAN2_C2FIFOCON7.getTXERR : TBits_1; inline;
  109299. begin
  109300. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  109301. end;
  109302. procedure TCAN2_C2FIFOCON7.setTXLARB; inline;
  109303. begin
  109304. pTDefRegMap(@Self)^.&set := $00000020;
  109305. end;
  109306. procedure TCAN2_C2FIFOCON7.clearTXLARB; inline;
  109307. begin
  109308. pTDefRegMap(@Self)^.clr := $00000020;
  109309. end;
  109310. procedure TCAN2_C2FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  109311. begin
  109312. if thebits = 0 then
  109313. pTDefRegMap(@Self)^.clr := $00000020
  109314. else
  109315. pTDefRegMap(@Self)^.&set := $00000020;
  109316. end;
  109317. function TCAN2_C2FIFOCON7.getTXLARB : TBits_1; inline;
  109318. begin
  109319. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  109320. end;
  109321. procedure TCAN2_C2FIFOCON7.setTXABAT; inline;
  109322. begin
  109323. pTDefRegMap(@Self)^.&set := $00000040;
  109324. end;
  109325. procedure TCAN2_C2FIFOCON7.clearTXABAT; inline;
  109326. begin
  109327. pTDefRegMap(@Self)^.clr := $00000040;
  109328. end;
  109329. procedure TCAN2_C2FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  109330. begin
  109331. if thebits = 0 then
  109332. pTDefRegMap(@Self)^.clr := $00000040
  109333. else
  109334. pTDefRegMap(@Self)^.&set := $00000040;
  109335. end;
  109336. function TCAN2_C2FIFOCON7.getTXABAT : TBits_1; inline;
  109337. begin
  109338. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  109339. end;
  109340. procedure TCAN2_C2FIFOCON7.setTXEN; inline;
  109341. begin
  109342. pTDefRegMap(@Self)^.&set := $00000080;
  109343. end;
  109344. procedure TCAN2_C2FIFOCON7.clearTXEN; inline;
  109345. begin
  109346. pTDefRegMap(@Self)^.clr := $00000080;
  109347. end;
  109348. procedure TCAN2_C2FIFOCON7.setTXEN(thebits : TBits_1); inline;
  109349. begin
  109350. if thebits = 0 then
  109351. pTDefRegMap(@Self)^.clr := $00000080
  109352. else
  109353. pTDefRegMap(@Self)^.&set := $00000080;
  109354. end;
  109355. function TCAN2_C2FIFOCON7.getTXEN : TBits_1; inline;
  109356. begin
  109357. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  109358. end;
  109359. procedure TCAN2_C2FIFOCON7.setDONLY; inline;
  109360. begin
  109361. pTDefRegMap(@Self)^.&set := $00001000;
  109362. end;
  109363. procedure TCAN2_C2FIFOCON7.clearDONLY; inline;
  109364. begin
  109365. pTDefRegMap(@Self)^.clr := $00001000;
  109366. end;
  109367. procedure TCAN2_C2FIFOCON7.setDONLY(thebits : TBits_1); inline;
  109368. begin
  109369. if thebits = 0 then
  109370. pTDefRegMap(@Self)^.clr := $00001000
  109371. else
  109372. pTDefRegMap(@Self)^.&set := $00001000;
  109373. end;
  109374. function TCAN2_C2FIFOCON7.getDONLY : TBits_1; inline;
  109375. begin
  109376. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  109377. end;
  109378. procedure TCAN2_C2FIFOCON7.setUINC; inline;
  109379. begin
  109380. pTDefRegMap(@Self)^.&set := $00002000;
  109381. end;
  109382. procedure TCAN2_C2FIFOCON7.clearUINC; inline;
  109383. begin
  109384. pTDefRegMap(@Self)^.clr := $00002000;
  109385. end;
  109386. procedure TCAN2_C2FIFOCON7.setUINC(thebits : TBits_1); inline;
  109387. begin
  109388. if thebits = 0 then
  109389. pTDefRegMap(@Self)^.clr := $00002000
  109390. else
  109391. pTDefRegMap(@Self)^.&set := $00002000;
  109392. end;
  109393. function TCAN2_C2FIFOCON7.getUINC : TBits_1; inline;
  109394. begin
  109395. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  109396. end;
  109397. procedure TCAN2_C2FIFOCON7.setFRESET; inline;
  109398. begin
  109399. pTDefRegMap(@Self)^.&set := $00004000;
  109400. end;
  109401. procedure TCAN2_C2FIFOCON7.clearFRESET; inline;
  109402. begin
  109403. pTDefRegMap(@Self)^.clr := $00004000;
  109404. end;
  109405. procedure TCAN2_C2FIFOCON7.setFRESET(thebits : TBits_1); inline;
  109406. begin
  109407. if thebits = 0 then
  109408. pTDefRegMap(@Self)^.clr := $00004000
  109409. else
  109410. pTDefRegMap(@Self)^.&set := $00004000;
  109411. end;
  109412. function TCAN2_C2FIFOCON7.getFRESET : TBits_1; inline;
  109413. begin
  109414. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  109415. end;
  109416. procedure TCAN2_C2FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  109417. begin
  109418. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  109419. end;
  109420. function TCAN2_C2FIFOCON7.getFSIZE : TBits_5; inline;
  109421. begin
  109422. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  109423. end;
  109424. procedure TCAN2_C2FIFOCON7.setw(thebits : TBits_32); inline;
  109425. begin
  109426. pTDefRegMap(@Self)^.val := thebits;
  109427. end;
  109428. function TCAN2_C2FIFOCON7.getw : TBits_32; inline;
  109429. begin
  109430. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109431. end;
  109432. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIF; inline;
  109433. begin
  109434. pTDefRegMap(@Self)^.&set := $00000001;
  109435. end;
  109436. procedure TCAN2_C2FIFOINT7.clearRXNEMPTYIF; inline;
  109437. begin
  109438. pTDefRegMap(@Self)^.clr := $00000001;
  109439. end;
  109440. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  109441. begin
  109442. if thebits = 0 then
  109443. pTDefRegMap(@Self)^.clr := $00000001
  109444. else
  109445. pTDefRegMap(@Self)^.&set := $00000001;
  109446. end;
  109447. function TCAN2_C2FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  109448. begin
  109449. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  109450. end;
  109451. procedure TCAN2_C2FIFOINT7.setRXHALFIF; inline;
  109452. begin
  109453. pTDefRegMap(@Self)^.&set := $00000002;
  109454. end;
  109455. procedure TCAN2_C2FIFOINT7.clearRXHALFIF; inline;
  109456. begin
  109457. pTDefRegMap(@Self)^.clr := $00000002;
  109458. end;
  109459. procedure TCAN2_C2FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  109460. begin
  109461. if thebits = 0 then
  109462. pTDefRegMap(@Self)^.clr := $00000002
  109463. else
  109464. pTDefRegMap(@Self)^.&set := $00000002;
  109465. end;
  109466. function TCAN2_C2FIFOINT7.getRXHALFIF : TBits_1; inline;
  109467. begin
  109468. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  109469. end;
  109470. procedure TCAN2_C2FIFOINT7.setRXFULLIF; inline;
  109471. begin
  109472. pTDefRegMap(@Self)^.&set := $00000004;
  109473. end;
  109474. procedure TCAN2_C2FIFOINT7.clearRXFULLIF; inline;
  109475. begin
  109476. pTDefRegMap(@Self)^.clr := $00000004;
  109477. end;
  109478. procedure TCAN2_C2FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  109479. begin
  109480. if thebits = 0 then
  109481. pTDefRegMap(@Self)^.clr := $00000004
  109482. else
  109483. pTDefRegMap(@Self)^.&set := $00000004;
  109484. end;
  109485. function TCAN2_C2FIFOINT7.getRXFULLIF : TBits_1; inline;
  109486. begin
  109487. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109488. end;
  109489. procedure TCAN2_C2FIFOINT7.setRXOVFLIF; inline;
  109490. begin
  109491. pTDefRegMap(@Self)^.&set := $00000008;
  109492. end;
  109493. procedure TCAN2_C2FIFOINT7.clearRXOVFLIF; inline;
  109494. begin
  109495. pTDefRegMap(@Self)^.clr := $00000008;
  109496. end;
  109497. procedure TCAN2_C2FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  109498. begin
  109499. if thebits = 0 then
  109500. pTDefRegMap(@Self)^.clr := $00000008
  109501. else
  109502. pTDefRegMap(@Self)^.&set := $00000008;
  109503. end;
  109504. function TCAN2_C2FIFOINT7.getRXOVFLIF : TBits_1; inline;
  109505. begin
  109506. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109507. end;
  109508. procedure TCAN2_C2FIFOINT7.setTXEMPTYIF; inline;
  109509. begin
  109510. pTDefRegMap(@Self)^.&set := $00000100;
  109511. end;
  109512. procedure TCAN2_C2FIFOINT7.clearTXEMPTYIF; inline;
  109513. begin
  109514. pTDefRegMap(@Self)^.clr := $00000100;
  109515. end;
  109516. procedure TCAN2_C2FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  109517. begin
  109518. if thebits = 0 then
  109519. pTDefRegMap(@Self)^.clr := $00000100
  109520. else
  109521. pTDefRegMap(@Self)^.&set := $00000100;
  109522. end;
  109523. function TCAN2_C2FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  109524. begin
  109525. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  109526. end;
  109527. procedure TCAN2_C2FIFOINT7.setTXHALFIF; inline;
  109528. begin
  109529. pTDefRegMap(@Self)^.&set := $00000200;
  109530. end;
  109531. procedure TCAN2_C2FIFOINT7.clearTXHALFIF; inline;
  109532. begin
  109533. pTDefRegMap(@Self)^.clr := $00000200;
  109534. end;
  109535. procedure TCAN2_C2FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  109536. begin
  109537. if thebits = 0 then
  109538. pTDefRegMap(@Self)^.clr := $00000200
  109539. else
  109540. pTDefRegMap(@Self)^.&set := $00000200;
  109541. end;
  109542. function TCAN2_C2FIFOINT7.getTXHALFIF : TBits_1; inline;
  109543. begin
  109544. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  109545. end;
  109546. procedure TCAN2_C2FIFOINT7.setTXNFULLIF; inline;
  109547. begin
  109548. pTDefRegMap(@Self)^.&set := $00000400;
  109549. end;
  109550. procedure TCAN2_C2FIFOINT7.clearTXNFULLIF; inline;
  109551. begin
  109552. pTDefRegMap(@Self)^.clr := $00000400;
  109553. end;
  109554. procedure TCAN2_C2FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  109555. begin
  109556. if thebits = 0 then
  109557. pTDefRegMap(@Self)^.clr := $00000400
  109558. else
  109559. pTDefRegMap(@Self)^.&set := $00000400;
  109560. end;
  109561. function TCAN2_C2FIFOINT7.getTXNFULLIF : TBits_1; inline;
  109562. begin
  109563. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  109564. end;
  109565. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIE; inline;
  109566. begin
  109567. pTDefRegMap(@Self)^.&set := $00010000;
  109568. end;
  109569. procedure TCAN2_C2FIFOINT7.clearRXNEMPTYIE; inline;
  109570. begin
  109571. pTDefRegMap(@Self)^.clr := $00010000;
  109572. end;
  109573. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  109574. begin
  109575. if thebits = 0 then
  109576. pTDefRegMap(@Self)^.clr := $00010000
  109577. else
  109578. pTDefRegMap(@Self)^.&set := $00010000;
  109579. end;
  109580. function TCAN2_C2FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  109581. begin
  109582. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  109583. end;
  109584. procedure TCAN2_C2FIFOINT7.setRXHALFIE; inline;
  109585. begin
  109586. pTDefRegMap(@Self)^.&set := $00020000;
  109587. end;
  109588. procedure TCAN2_C2FIFOINT7.clearRXHALFIE; inline;
  109589. begin
  109590. pTDefRegMap(@Self)^.clr := $00020000;
  109591. end;
  109592. procedure TCAN2_C2FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  109593. begin
  109594. if thebits = 0 then
  109595. pTDefRegMap(@Self)^.clr := $00020000
  109596. else
  109597. pTDefRegMap(@Self)^.&set := $00020000;
  109598. end;
  109599. function TCAN2_C2FIFOINT7.getRXHALFIE : TBits_1; inline;
  109600. begin
  109601. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  109602. end;
  109603. procedure TCAN2_C2FIFOINT7.setRXFULLIE; inline;
  109604. begin
  109605. pTDefRegMap(@Self)^.&set := $00040000;
  109606. end;
  109607. procedure TCAN2_C2FIFOINT7.clearRXFULLIE; inline;
  109608. begin
  109609. pTDefRegMap(@Self)^.clr := $00040000;
  109610. end;
  109611. procedure TCAN2_C2FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  109612. begin
  109613. if thebits = 0 then
  109614. pTDefRegMap(@Self)^.clr := $00040000
  109615. else
  109616. pTDefRegMap(@Self)^.&set := $00040000;
  109617. end;
  109618. function TCAN2_C2FIFOINT7.getRXFULLIE : TBits_1; inline;
  109619. begin
  109620. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  109621. end;
  109622. procedure TCAN2_C2FIFOINT7.setRXOVFLIE; inline;
  109623. begin
  109624. pTDefRegMap(@Self)^.&set := $00080000;
  109625. end;
  109626. procedure TCAN2_C2FIFOINT7.clearRXOVFLIE; inline;
  109627. begin
  109628. pTDefRegMap(@Self)^.clr := $00080000;
  109629. end;
  109630. procedure TCAN2_C2FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  109631. begin
  109632. if thebits = 0 then
  109633. pTDefRegMap(@Self)^.clr := $00080000
  109634. else
  109635. pTDefRegMap(@Self)^.&set := $00080000;
  109636. end;
  109637. function TCAN2_C2FIFOINT7.getRXOVFLIE : TBits_1; inline;
  109638. begin
  109639. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  109640. end;
  109641. procedure TCAN2_C2FIFOINT7.setTXEMPTYIE; inline;
  109642. begin
  109643. pTDefRegMap(@Self)^.&set := $01000000;
  109644. end;
  109645. procedure TCAN2_C2FIFOINT7.clearTXEMPTYIE; inline;
  109646. begin
  109647. pTDefRegMap(@Self)^.clr := $01000000;
  109648. end;
  109649. procedure TCAN2_C2FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  109650. begin
  109651. if thebits = 0 then
  109652. pTDefRegMap(@Self)^.clr := $01000000
  109653. else
  109654. pTDefRegMap(@Self)^.&set := $01000000;
  109655. end;
  109656. function TCAN2_C2FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  109657. begin
  109658. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  109659. end;
  109660. procedure TCAN2_C2FIFOINT7.setTXHALFIE; inline;
  109661. begin
  109662. pTDefRegMap(@Self)^.&set := $02000000;
  109663. end;
  109664. procedure TCAN2_C2FIFOINT7.clearTXHALFIE; inline;
  109665. begin
  109666. pTDefRegMap(@Self)^.clr := $02000000;
  109667. end;
  109668. procedure TCAN2_C2FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  109669. begin
  109670. if thebits = 0 then
  109671. pTDefRegMap(@Self)^.clr := $02000000
  109672. else
  109673. pTDefRegMap(@Self)^.&set := $02000000;
  109674. end;
  109675. function TCAN2_C2FIFOINT7.getTXHALFIE : TBits_1; inline;
  109676. begin
  109677. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  109678. end;
  109679. procedure TCAN2_C2FIFOINT7.setTXNFULLIE; inline;
  109680. begin
  109681. pTDefRegMap(@Self)^.&set := $04000000;
  109682. end;
  109683. procedure TCAN2_C2FIFOINT7.clearTXNFULLIE; inline;
  109684. begin
  109685. pTDefRegMap(@Self)^.clr := $04000000;
  109686. end;
  109687. procedure TCAN2_C2FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  109688. begin
  109689. if thebits = 0 then
  109690. pTDefRegMap(@Self)^.clr := $04000000
  109691. else
  109692. pTDefRegMap(@Self)^.&set := $04000000;
  109693. end;
  109694. function TCAN2_C2FIFOINT7.getTXNFULLIE : TBits_1; inline;
  109695. begin
  109696. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  109697. end;
  109698. procedure TCAN2_C2FIFOINT7.setw(thebits : TBits_32); inline;
  109699. begin
  109700. pTDefRegMap(@Self)^.val := thebits;
  109701. end;
  109702. function TCAN2_C2FIFOINT7.getw : TBits_32; inline;
  109703. begin
  109704. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109705. end;
  109706. procedure TCAN2_C2FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  109707. begin
  109708. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  109709. end;
  109710. function TCAN2_C2FIFOCI7.getCFIFOCI : TBits_5; inline;
  109711. begin
  109712. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  109713. end;
  109714. procedure TCAN2_C2FIFOCI7.setw(thebits : TBits_32); inline;
  109715. begin
  109716. pTDefRegMap(@Self)^.val := thebits;
  109717. end;
  109718. function TCAN2_C2FIFOCI7.getw : TBits_32; inline;
  109719. begin
  109720. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109721. end;
  109722. procedure TCAN2_C2FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  109723. begin
  109724. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  109725. end;
  109726. function TCAN2_C2FIFOCON8.getTXPRI : TBits_2; inline;
  109727. begin
  109728. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  109729. end;
  109730. procedure TCAN2_C2FIFOCON8.setRTREN; inline;
  109731. begin
  109732. pTDefRegMap(@Self)^.&set := $00000004;
  109733. end;
  109734. procedure TCAN2_C2FIFOCON8.clearRTREN; inline;
  109735. begin
  109736. pTDefRegMap(@Self)^.clr := $00000004;
  109737. end;
  109738. procedure TCAN2_C2FIFOCON8.setRTREN(thebits : TBits_1); inline;
  109739. begin
  109740. if thebits = 0 then
  109741. pTDefRegMap(@Self)^.clr := $00000004
  109742. else
  109743. pTDefRegMap(@Self)^.&set := $00000004;
  109744. end;
  109745. function TCAN2_C2FIFOCON8.getRTREN : TBits_1; inline;
  109746. begin
  109747. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109748. end;
  109749. procedure TCAN2_C2FIFOCON8.setTXREQ; inline;
  109750. begin
  109751. pTDefRegMap(@Self)^.&set := $00000008;
  109752. end;
  109753. procedure TCAN2_C2FIFOCON8.clearTXREQ; inline;
  109754. begin
  109755. pTDefRegMap(@Self)^.clr := $00000008;
  109756. end;
  109757. procedure TCAN2_C2FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  109758. begin
  109759. if thebits = 0 then
  109760. pTDefRegMap(@Self)^.clr := $00000008
  109761. else
  109762. pTDefRegMap(@Self)^.&set := $00000008;
  109763. end;
  109764. function TCAN2_C2FIFOCON8.getTXREQ : TBits_1; inline;
  109765. begin
  109766. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109767. end;
  109768. procedure TCAN2_C2FIFOCON8.setTXERR; inline;
  109769. begin
  109770. pTDefRegMap(@Self)^.&set := $00000010;
  109771. end;
  109772. procedure TCAN2_C2FIFOCON8.clearTXERR; inline;
  109773. begin
  109774. pTDefRegMap(@Self)^.clr := $00000010;
  109775. end;
  109776. procedure TCAN2_C2FIFOCON8.setTXERR(thebits : TBits_1); inline;
  109777. begin
  109778. if thebits = 0 then
  109779. pTDefRegMap(@Self)^.clr := $00000010
  109780. else
  109781. pTDefRegMap(@Self)^.&set := $00000010;
  109782. end;
  109783. function TCAN2_C2FIFOCON8.getTXERR : TBits_1; inline;
  109784. begin
  109785. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  109786. end;
  109787. procedure TCAN2_C2FIFOCON8.setTXLARB; inline;
  109788. begin
  109789. pTDefRegMap(@Self)^.&set := $00000020;
  109790. end;
  109791. procedure TCAN2_C2FIFOCON8.clearTXLARB; inline;
  109792. begin
  109793. pTDefRegMap(@Self)^.clr := $00000020;
  109794. end;
  109795. procedure TCAN2_C2FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  109796. begin
  109797. if thebits = 0 then
  109798. pTDefRegMap(@Self)^.clr := $00000020
  109799. else
  109800. pTDefRegMap(@Self)^.&set := $00000020;
  109801. end;
  109802. function TCAN2_C2FIFOCON8.getTXLARB : TBits_1; inline;
  109803. begin
  109804. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  109805. end;
  109806. procedure TCAN2_C2FIFOCON8.setTXABAT; inline;
  109807. begin
  109808. pTDefRegMap(@Self)^.&set := $00000040;
  109809. end;
  109810. procedure TCAN2_C2FIFOCON8.clearTXABAT; inline;
  109811. begin
  109812. pTDefRegMap(@Self)^.clr := $00000040;
  109813. end;
  109814. procedure TCAN2_C2FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  109815. begin
  109816. if thebits = 0 then
  109817. pTDefRegMap(@Self)^.clr := $00000040
  109818. else
  109819. pTDefRegMap(@Self)^.&set := $00000040;
  109820. end;
  109821. function TCAN2_C2FIFOCON8.getTXABAT : TBits_1; inline;
  109822. begin
  109823. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  109824. end;
  109825. procedure TCAN2_C2FIFOCON8.setTXEN; inline;
  109826. begin
  109827. pTDefRegMap(@Self)^.&set := $00000080;
  109828. end;
  109829. procedure TCAN2_C2FIFOCON8.clearTXEN; inline;
  109830. begin
  109831. pTDefRegMap(@Self)^.clr := $00000080;
  109832. end;
  109833. procedure TCAN2_C2FIFOCON8.setTXEN(thebits : TBits_1); inline;
  109834. begin
  109835. if thebits = 0 then
  109836. pTDefRegMap(@Self)^.clr := $00000080
  109837. else
  109838. pTDefRegMap(@Self)^.&set := $00000080;
  109839. end;
  109840. function TCAN2_C2FIFOCON8.getTXEN : TBits_1; inline;
  109841. begin
  109842. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  109843. end;
  109844. procedure TCAN2_C2FIFOCON8.setDONLY; inline;
  109845. begin
  109846. pTDefRegMap(@Self)^.&set := $00001000;
  109847. end;
  109848. procedure TCAN2_C2FIFOCON8.clearDONLY; inline;
  109849. begin
  109850. pTDefRegMap(@Self)^.clr := $00001000;
  109851. end;
  109852. procedure TCAN2_C2FIFOCON8.setDONLY(thebits : TBits_1); inline;
  109853. begin
  109854. if thebits = 0 then
  109855. pTDefRegMap(@Self)^.clr := $00001000
  109856. else
  109857. pTDefRegMap(@Self)^.&set := $00001000;
  109858. end;
  109859. function TCAN2_C2FIFOCON8.getDONLY : TBits_1; inline;
  109860. begin
  109861. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  109862. end;
  109863. procedure TCAN2_C2FIFOCON8.setUINC; inline;
  109864. begin
  109865. pTDefRegMap(@Self)^.&set := $00002000;
  109866. end;
  109867. procedure TCAN2_C2FIFOCON8.clearUINC; inline;
  109868. begin
  109869. pTDefRegMap(@Self)^.clr := $00002000;
  109870. end;
  109871. procedure TCAN2_C2FIFOCON8.setUINC(thebits : TBits_1); inline;
  109872. begin
  109873. if thebits = 0 then
  109874. pTDefRegMap(@Self)^.clr := $00002000
  109875. else
  109876. pTDefRegMap(@Self)^.&set := $00002000;
  109877. end;
  109878. function TCAN2_C2FIFOCON8.getUINC : TBits_1; inline;
  109879. begin
  109880. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  109881. end;
  109882. procedure TCAN2_C2FIFOCON8.setFRESET; inline;
  109883. begin
  109884. pTDefRegMap(@Self)^.&set := $00004000;
  109885. end;
  109886. procedure TCAN2_C2FIFOCON8.clearFRESET; inline;
  109887. begin
  109888. pTDefRegMap(@Self)^.clr := $00004000;
  109889. end;
  109890. procedure TCAN2_C2FIFOCON8.setFRESET(thebits : TBits_1); inline;
  109891. begin
  109892. if thebits = 0 then
  109893. pTDefRegMap(@Self)^.clr := $00004000
  109894. else
  109895. pTDefRegMap(@Self)^.&set := $00004000;
  109896. end;
  109897. function TCAN2_C2FIFOCON8.getFRESET : TBits_1; inline;
  109898. begin
  109899. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  109900. end;
  109901. procedure TCAN2_C2FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  109902. begin
  109903. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  109904. end;
  109905. function TCAN2_C2FIFOCON8.getFSIZE : TBits_5; inline;
  109906. begin
  109907. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  109908. end;
  109909. procedure TCAN2_C2FIFOCON8.setw(thebits : TBits_32); inline;
  109910. begin
  109911. pTDefRegMap(@Self)^.val := thebits;
  109912. end;
  109913. function TCAN2_C2FIFOCON8.getw : TBits_32; inline;
  109914. begin
  109915. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109916. end;
  109917. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIF; inline;
  109918. begin
  109919. pTDefRegMap(@Self)^.&set := $00000001;
  109920. end;
  109921. procedure TCAN2_C2FIFOINT8.clearRXNEMPTYIF; inline;
  109922. begin
  109923. pTDefRegMap(@Self)^.clr := $00000001;
  109924. end;
  109925. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  109926. begin
  109927. if thebits = 0 then
  109928. pTDefRegMap(@Self)^.clr := $00000001
  109929. else
  109930. pTDefRegMap(@Self)^.&set := $00000001;
  109931. end;
  109932. function TCAN2_C2FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  109933. begin
  109934. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  109935. end;
  109936. procedure TCAN2_C2FIFOINT8.setRXHALFIF; inline;
  109937. begin
  109938. pTDefRegMap(@Self)^.&set := $00000002;
  109939. end;
  109940. procedure TCAN2_C2FIFOINT8.clearRXHALFIF; inline;
  109941. begin
  109942. pTDefRegMap(@Self)^.clr := $00000002;
  109943. end;
  109944. procedure TCAN2_C2FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  109945. begin
  109946. if thebits = 0 then
  109947. pTDefRegMap(@Self)^.clr := $00000002
  109948. else
  109949. pTDefRegMap(@Self)^.&set := $00000002;
  109950. end;
  109951. function TCAN2_C2FIFOINT8.getRXHALFIF : TBits_1; inline;
  109952. begin
  109953. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  109954. end;
  109955. procedure TCAN2_C2FIFOINT8.setRXFULLIF; inline;
  109956. begin
  109957. pTDefRegMap(@Self)^.&set := $00000004;
  109958. end;
  109959. procedure TCAN2_C2FIFOINT8.clearRXFULLIF; inline;
  109960. begin
  109961. pTDefRegMap(@Self)^.clr := $00000004;
  109962. end;
  109963. procedure TCAN2_C2FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  109964. begin
  109965. if thebits = 0 then
  109966. pTDefRegMap(@Self)^.clr := $00000004
  109967. else
  109968. pTDefRegMap(@Self)^.&set := $00000004;
  109969. end;
  109970. function TCAN2_C2FIFOINT8.getRXFULLIF : TBits_1; inline;
  109971. begin
  109972. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109973. end;
  109974. procedure TCAN2_C2FIFOINT8.setRXOVFLIF; inline;
  109975. begin
  109976. pTDefRegMap(@Self)^.&set := $00000008;
  109977. end;
  109978. procedure TCAN2_C2FIFOINT8.clearRXOVFLIF; inline;
  109979. begin
  109980. pTDefRegMap(@Self)^.clr := $00000008;
  109981. end;
  109982. procedure TCAN2_C2FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  109983. begin
  109984. if thebits = 0 then
  109985. pTDefRegMap(@Self)^.clr := $00000008
  109986. else
  109987. pTDefRegMap(@Self)^.&set := $00000008;
  109988. end;
  109989. function TCAN2_C2FIFOINT8.getRXOVFLIF : TBits_1; inline;
  109990. begin
  109991. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109992. end;
  109993. procedure TCAN2_C2FIFOINT8.setTXEMPTYIF; inline;
  109994. begin
  109995. pTDefRegMap(@Self)^.&set := $00000100;
  109996. end;
  109997. procedure TCAN2_C2FIFOINT8.clearTXEMPTYIF; inline;
  109998. begin
  109999. pTDefRegMap(@Self)^.clr := $00000100;
  110000. end;
  110001. procedure TCAN2_C2FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  110002. begin
  110003. if thebits = 0 then
  110004. pTDefRegMap(@Self)^.clr := $00000100
  110005. else
  110006. pTDefRegMap(@Self)^.&set := $00000100;
  110007. end;
  110008. function TCAN2_C2FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  110009. begin
  110010. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  110011. end;
  110012. procedure TCAN2_C2FIFOINT8.setTXHALFIF; inline;
  110013. begin
  110014. pTDefRegMap(@Self)^.&set := $00000200;
  110015. end;
  110016. procedure TCAN2_C2FIFOINT8.clearTXHALFIF; inline;
  110017. begin
  110018. pTDefRegMap(@Self)^.clr := $00000200;
  110019. end;
  110020. procedure TCAN2_C2FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  110021. begin
  110022. if thebits = 0 then
  110023. pTDefRegMap(@Self)^.clr := $00000200
  110024. else
  110025. pTDefRegMap(@Self)^.&set := $00000200;
  110026. end;
  110027. function TCAN2_C2FIFOINT8.getTXHALFIF : TBits_1; inline;
  110028. begin
  110029. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  110030. end;
  110031. procedure TCAN2_C2FIFOINT8.setTXNFULLIF; inline;
  110032. begin
  110033. pTDefRegMap(@Self)^.&set := $00000400;
  110034. end;
  110035. procedure TCAN2_C2FIFOINT8.clearTXNFULLIF; inline;
  110036. begin
  110037. pTDefRegMap(@Self)^.clr := $00000400;
  110038. end;
  110039. procedure TCAN2_C2FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  110040. begin
  110041. if thebits = 0 then
  110042. pTDefRegMap(@Self)^.clr := $00000400
  110043. else
  110044. pTDefRegMap(@Self)^.&set := $00000400;
  110045. end;
  110046. function TCAN2_C2FIFOINT8.getTXNFULLIF : TBits_1; inline;
  110047. begin
  110048. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  110049. end;
  110050. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIE; inline;
  110051. begin
  110052. pTDefRegMap(@Self)^.&set := $00010000;
  110053. end;
  110054. procedure TCAN2_C2FIFOINT8.clearRXNEMPTYIE; inline;
  110055. begin
  110056. pTDefRegMap(@Self)^.clr := $00010000;
  110057. end;
  110058. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  110059. begin
  110060. if thebits = 0 then
  110061. pTDefRegMap(@Self)^.clr := $00010000
  110062. else
  110063. pTDefRegMap(@Self)^.&set := $00010000;
  110064. end;
  110065. function TCAN2_C2FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  110066. begin
  110067. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  110068. end;
  110069. procedure TCAN2_C2FIFOINT8.setRXHALFIE; inline;
  110070. begin
  110071. pTDefRegMap(@Self)^.&set := $00020000;
  110072. end;
  110073. procedure TCAN2_C2FIFOINT8.clearRXHALFIE; inline;
  110074. begin
  110075. pTDefRegMap(@Self)^.clr := $00020000;
  110076. end;
  110077. procedure TCAN2_C2FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  110078. begin
  110079. if thebits = 0 then
  110080. pTDefRegMap(@Self)^.clr := $00020000
  110081. else
  110082. pTDefRegMap(@Self)^.&set := $00020000;
  110083. end;
  110084. function TCAN2_C2FIFOINT8.getRXHALFIE : TBits_1; inline;
  110085. begin
  110086. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  110087. end;
  110088. procedure TCAN2_C2FIFOINT8.setRXFULLIE; inline;
  110089. begin
  110090. pTDefRegMap(@Self)^.&set := $00040000;
  110091. end;
  110092. procedure TCAN2_C2FIFOINT8.clearRXFULLIE; inline;
  110093. begin
  110094. pTDefRegMap(@Self)^.clr := $00040000;
  110095. end;
  110096. procedure TCAN2_C2FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  110097. begin
  110098. if thebits = 0 then
  110099. pTDefRegMap(@Self)^.clr := $00040000
  110100. else
  110101. pTDefRegMap(@Self)^.&set := $00040000;
  110102. end;
  110103. function TCAN2_C2FIFOINT8.getRXFULLIE : TBits_1; inline;
  110104. begin
  110105. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  110106. end;
  110107. procedure TCAN2_C2FIFOINT8.setRXOVFLIE; inline;
  110108. begin
  110109. pTDefRegMap(@Self)^.&set := $00080000;
  110110. end;
  110111. procedure TCAN2_C2FIFOINT8.clearRXOVFLIE; inline;
  110112. begin
  110113. pTDefRegMap(@Self)^.clr := $00080000;
  110114. end;
  110115. procedure TCAN2_C2FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  110116. begin
  110117. if thebits = 0 then
  110118. pTDefRegMap(@Self)^.clr := $00080000
  110119. else
  110120. pTDefRegMap(@Self)^.&set := $00080000;
  110121. end;
  110122. function TCAN2_C2FIFOINT8.getRXOVFLIE : TBits_1; inline;
  110123. begin
  110124. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  110125. end;
  110126. procedure TCAN2_C2FIFOINT8.setTXEMPTYIE; inline;
  110127. begin
  110128. pTDefRegMap(@Self)^.&set := $01000000;
  110129. end;
  110130. procedure TCAN2_C2FIFOINT8.clearTXEMPTYIE; inline;
  110131. begin
  110132. pTDefRegMap(@Self)^.clr := $01000000;
  110133. end;
  110134. procedure TCAN2_C2FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  110135. begin
  110136. if thebits = 0 then
  110137. pTDefRegMap(@Self)^.clr := $01000000
  110138. else
  110139. pTDefRegMap(@Self)^.&set := $01000000;
  110140. end;
  110141. function TCAN2_C2FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  110142. begin
  110143. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  110144. end;
  110145. procedure TCAN2_C2FIFOINT8.setTXHALFIE; inline;
  110146. begin
  110147. pTDefRegMap(@Self)^.&set := $02000000;
  110148. end;
  110149. procedure TCAN2_C2FIFOINT8.clearTXHALFIE; inline;
  110150. begin
  110151. pTDefRegMap(@Self)^.clr := $02000000;
  110152. end;
  110153. procedure TCAN2_C2FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  110154. begin
  110155. if thebits = 0 then
  110156. pTDefRegMap(@Self)^.clr := $02000000
  110157. else
  110158. pTDefRegMap(@Self)^.&set := $02000000;
  110159. end;
  110160. function TCAN2_C2FIFOINT8.getTXHALFIE : TBits_1; inline;
  110161. begin
  110162. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  110163. end;
  110164. procedure TCAN2_C2FIFOINT8.setTXNFULLIE; inline;
  110165. begin
  110166. pTDefRegMap(@Self)^.&set := $04000000;
  110167. end;
  110168. procedure TCAN2_C2FIFOINT8.clearTXNFULLIE; inline;
  110169. begin
  110170. pTDefRegMap(@Self)^.clr := $04000000;
  110171. end;
  110172. procedure TCAN2_C2FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  110173. begin
  110174. if thebits = 0 then
  110175. pTDefRegMap(@Self)^.clr := $04000000
  110176. else
  110177. pTDefRegMap(@Self)^.&set := $04000000;
  110178. end;
  110179. function TCAN2_C2FIFOINT8.getTXNFULLIE : TBits_1; inline;
  110180. begin
  110181. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  110182. end;
  110183. procedure TCAN2_C2FIFOINT8.setw(thebits : TBits_32); inline;
  110184. begin
  110185. pTDefRegMap(@Self)^.val := thebits;
  110186. end;
  110187. function TCAN2_C2FIFOINT8.getw : TBits_32; inline;
  110188. begin
  110189. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110190. end;
  110191. procedure TCAN2_C2FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  110192. begin
  110193. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  110194. end;
  110195. function TCAN2_C2FIFOCI8.getCFIFOCI : TBits_5; inline;
  110196. begin
  110197. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  110198. end;
  110199. procedure TCAN2_C2FIFOCI8.setw(thebits : TBits_32); inline;
  110200. begin
  110201. pTDefRegMap(@Self)^.val := thebits;
  110202. end;
  110203. function TCAN2_C2FIFOCI8.getw : TBits_32; inline;
  110204. begin
  110205. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110206. end;
  110207. procedure TCAN2_C2FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  110208. begin
  110209. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  110210. end;
  110211. function TCAN2_C2FIFOCON9.getTXPRI : TBits_2; inline;
  110212. begin
  110213. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  110214. end;
  110215. procedure TCAN2_C2FIFOCON9.setRTREN; inline;
  110216. begin
  110217. pTDefRegMap(@Self)^.&set := $00000004;
  110218. end;
  110219. procedure TCAN2_C2FIFOCON9.clearRTREN; inline;
  110220. begin
  110221. pTDefRegMap(@Self)^.clr := $00000004;
  110222. end;
  110223. procedure TCAN2_C2FIFOCON9.setRTREN(thebits : TBits_1); inline;
  110224. begin
  110225. if thebits = 0 then
  110226. pTDefRegMap(@Self)^.clr := $00000004
  110227. else
  110228. pTDefRegMap(@Self)^.&set := $00000004;
  110229. end;
  110230. function TCAN2_C2FIFOCON9.getRTREN : TBits_1; inline;
  110231. begin
  110232. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110233. end;
  110234. procedure TCAN2_C2FIFOCON9.setTXREQ; inline;
  110235. begin
  110236. pTDefRegMap(@Self)^.&set := $00000008;
  110237. end;
  110238. procedure TCAN2_C2FIFOCON9.clearTXREQ; inline;
  110239. begin
  110240. pTDefRegMap(@Self)^.clr := $00000008;
  110241. end;
  110242. procedure TCAN2_C2FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  110243. begin
  110244. if thebits = 0 then
  110245. pTDefRegMap(@Self)^.clr := $00000008
  110246. else
  110247. pTDefRegMap(@Self)^.&set := $00000008;
  110248. end;
  110249. function TCAN2_C2FIFOCON9.getTXREQ : TBits_1; inline;
  110250. begin
  110251. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110252. end;
  110253. procedure TCAN2_C2FIFOCON9.setTXERR; inline;
  110254. begin
  110255. pTDefRegMap(@Self)^.&set := $00000010;
  110256. end;
  110257. procedure TCAN2_C2FIFOCON9.clearTXERR; inline;
  110258. begin
  110259. pTDefRegMap(@Self)^.clr := $00000010;
  110260. end;
  110261. procedure TCAN2_C2FIFOCON9.setTXERR(thebits : TBits_1); inline;
  110262. begin
  110263. if thebits = 0 then
  110264. pTDefRegMap(@Self)^.clr := $00000010
  110265. else
  110266. pTDefRegMap(@Self)^.&set := $00000010;
  110267. end;
  110268. function TCAN2_C2FIFOCON9.getTXERR : TBits_1; inline;
  110269. begin
  110270. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  110271. end;
  110272. procedure TCAN2_C2FIFOCON9.setTXLARB; inline;
  110273. begin
  110274. pTDefRegMap(@Self)^.&set := $00000020;
  110275. end;
  110276. procedure TCAN2_C2FIFOCON9.clearTXLARB; inline;
  110277. begin
  110278. pTDefRegMap(@Self)^.clr := $00000020;
  110279. end;
  110280. procedure TCAN2_C2FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  110281. begin
  110282. if thebits = 0 then
  110283. pTDefRegMap(@Self)^.clr := $00000020
  110284. else
  110285. pTDefRegMap(@Self)^.&set := $00000020;
  110286. end;
  110287. function TCAN2_C2FIFOCON9.getTXLARB : TBits_1; inline;
  110288. begin
  110289. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  110290. end;
  110291. procedure TCAN2_C2FIFOCON9.setTXABAT; inline;
  110292. begin
  110293. pTDefRegMap(@Self)^.&set := $00000040;
  110294. end;
  110295. procedure TCAN2_C2FIFOCON9.clearTXABAT; inline;
  110296. begin
  110297. pTDefRegMap(@Self)^.clr := $00000040;
  110298. end;
  110299. procedure TCAN2_C2FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  110300. begin
  110301. if thebits = 0 then
  110302. pTDefRegMap(@Self)^.clr := $00000040
  110303. else
  110304. pTDefRegMap(@Self)^.&set := $00000040;
  110305. end;
  110306. function TCAN2_C2FIFOCON9.getTXABAT : TBits_1; inline;
  110307. begin
  110308. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  110309. end;
  110310. procedure TCAN2_C2FIFOCON9.setTXEN; inline;
  110311. begin
  110312. pTDefRegMap(@Self)^.&set := $00000080;
  110313. end;
  110314. procedure TCAN2_C2FIFOCON9.clearTXEN; inline;
  110315. begin
  110316. pTDefRegMap(@Self)^.clr := $00000080;
  110317. end;
  110318. procedure TCAN2_C2FIFOCON9.setTXEN(thebits : TBits_1); inline;
  110319. begin
  110320. if thebits = 0 then
  110321. pTDefRegMap(@Self)^.clr := $00000080
  110322. else
  110323. pTDefRegMap(@Self)^.&set := $00000080;
  110324. end;
  110325. function TCAN2_C2FIFOCON9.getTXEN : TBits_1; inline;
  110326. begin
  110327. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  110328. end;
  110329. procedure TCAN2_C2FIFOCON9.setDONLY; inline;
  110330. begin
  110331. pTDefRegMap(@Self)^.&set := $00001000;
  110332. end;
  110333. procedure TCAN2_C2FIFOCON9.clearDONLY; inline;
  110334. begin
  110335. pTDefRegMap(@Self)^.clr := $00001000;
  110336. end;
  110337. procedure TCAN2_C2FIFOCON9.setDONLY(thebits : TBits_1); inline;
  110338. begin
  110339. if thebits = 0 then
  110340. pTDefRegMap(@Self)^.clr := $00001000
  110341. else
  110342. pTDefRegMap(@Self)^.&set := $00001000;
  110343. end;
  110344. function TCAN2_C2FIFOCON9.getDONLY : TBits_1; inline;
  110345. begin
  110346. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  110347. end;
  110348. procedure TCAN2_C2FIFOCON9.setUINC; inline;
  110349. begin
  110350. pTDefRegMap(@Self)^.&set := $00002000;
  110351. end;
  110352. procedure TCAN2_C2FIFOCON9.clearUINC; inline;
  110353. begin
  110354. pTDefRegMap(@Self)^.clr := $00002000;
  110355. end;
  110356. procedure TCAN2_C2FIFOCON9.setUINC(thebits : TBits_1); inline;
  110357. begin
  110358. if thebits = 0 then
  110359. pTDefRegMap(@Self)^.clr := $00002000
  110360. else
  110361. pTDefRegMap(@Self)^.&set := $00002000;
  110362. end;
  110363. function TCAN2_C2FIFOCON9.getUINC : TBits_1; inline;
  110364. begin
  110365. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  110366. end;
  110367. procedure TCAN2_C2FIFOCON9.setFRESET; inline;
  110368. begin
  110369. pTDefRegMap(@Self)^.&set := $00004000;
  110370. end;
  110371. procedure TCAN2_C2FIFOCON9.clearFRESET; inline;
  110372. begin
  110373. pTDefRegMap(@Self)^.clr := $00004000;
  110374. end;
  110375. procedure TCAN2_C2FIFOCON9.setFRESET(thebits : TBits_1); inline;
  110376. begin
  110377. if thebits = 0 then
  110378. pTDefRegMap(@Self)^.clr := $00004000
  110379. else
  110380. pTDefRegMap(@Self)^.&set := $00004000;
  110381. end;
  110382. function TCAN2_C2FIFOCON9.getFRESET : TBits_1; inline;
  110383. begin
  110384. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  110385. end;
  110386. procedure TCAN2_C2FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  110387. begin
  110388. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  110389. end;
  110390. function TCAN2_C2FIFOCON9.getFSIZE : TBits_5; inline;
  110391. begin
  110392. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  110393. end;
  110394. procedure TCAN2_C2FIFOCON9.setw(thebits : TBits_32); inline;
  110395. begin
  110396. pTDefRegMap(@Self)^.val := thebits;
  110397. end;
  110398. function TCAN2_C2FIFOCON9.getw : TBits_32; inline;
  110399. begin
  110400. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110401. end;
  110402. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIF; inline;
  110403. begin
  110404. pTDefRegMap(@Self)^.&set := $00000001;
  110405. end;
  110406. procedure TCAN2_C2FIFOINT9.clearRXNEMPTYIF; inline;
  110407. begin
  110408. pTDefRegMap(@Self)^.clr := $00000001;
  110409. end;
  110410. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  110411. begin
  110412. if thebits = 0 then
  110413. pTDefRegMap(@Self)^.clr := $00000001
  110414. else
  110415. pTDefRegMap(@Self)^.&set := $00000001;
  110416. end;
  110417. function TCAN2_C2FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  110418. begin
  110419. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  110420. end;
  110421. procedure TCAN2_C2FIFOINT9.setRXHALFIF; inline;
  110422. begin
  110423. pTDefRegMap(@Self)^.&set := $00000002;
  110424. end;
  110425. procedure TCAN2_C2FIFOINT9.clearRXHALFIF; inline;
  110426. begin
  110427. pTDefRegMap(@Self)^.clr := $00000002;
  110428. end;
  110429. procedure TCAN2_C2FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  110430. begin
  110431. if thebits = 0 then
  110432. pTDefRegMap(@Self)^.clr := $00000002
  110433. else
  110434. pTDefRegMap(@Self)^.&set := $00000002;
  110435. end;
  110436. function TCAN2_C2FIFOINT9.getRXHALFIF : TBits_1; inline;
  110437. begin
  110438. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  110439. end;
  110440. procedure TCAN2_C2FIFOINT9.setRXFULLIF; inline;
  110441. begin
  110442. pTDefRegMap(@Self)^.&set := $00000004;
  110443. end;
  110444. procedure TCAN2_C2FIFOINT9.clearRXFULLIF; inline;
  110445. begin
  110446. pTDefRegMap(@Self)^.clr := $00000004;
  110447. end;
  110448. procedure TCAN2_C2FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  110449. begin
  110450. if thebits = 0 then
  110451. pTDefRegMap(@Self)^.clr := $00000004
  110452. else
  110453. pTDefRegMap(@Self)^.&set := $00000004;
  110454. end;
  110455. function TCAN2_C2FIFOINT9.getRXFULLIF : TBits_1; inline;
  110456. begin
  110457. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110458. end;
  110459. procedure TCAN2_C2FIFOINT9.setRXOVFLIF; inline;
  110460. begin
  110461. pTDefRegMap(@Self)^.&set := $00000008;
  110462. end;
  110463. procedure TCAN2_C2FIFOINT9.clearRXOVFLIF; inline;
  110464. begin
  110465. pTDefRegMap(@Self)^.clr := $00000008;
  110466. end;
  110467. procedure TCAN2_C2FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  110468. begin
  110469. if thebits = 0 then
  110470. pTDefRegMap(@Self)^.clr := $00000008
  110471. else
  110472. pTDefRegMap(@Self)^.&set := $00000008;
  110473. end;
  110474. function TCAN2_C2FIFOINT9.getRXOVFLIF : TBits_1; inline;
  110475. begin
  110476. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110477. end;
  110478. procedure TCAN2_C2FIFOINT9.setTXEMPTYIF; inline;
  110479. begin
  110480. pTDefRegMap(@Self)^.&set := $00000100;
  110481. end;
  110482. procedure TCAN2_C2FIFOINT9.clearTXEMPTYIF; inline;
  110483. begin
  110484. pTDefRegMap(@Self)^.clr := $00000100;
  110485. end;
  110486. procedure TCAN2_C2FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  110487. begin
  110488. if thebits = 0 then
  110489. pTDefRegMap(@Self)^.clr := $00000100
  110490. else
  110491. pTDefRegMap(@Self)^.&set := $00000100;
  110492. end;
  110493. function TCAN2_C2FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  110494. begin
  110495. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  110496. end;
  110497. procedure TCAN2_C2FIFOINT9.setTXHALFIF; inline;
  110498. begin
  110499. pTDefRegMap(@Self)^.&set := $00000200;
  110500. end;
  110501. procedure TCAN2_C2FIFOINT9.clearTXHALFIF; inline;
  110502. begin
  110503. pTDefRegMap(@Self)^.clr := $00000200;
  110504. end;
  110505. procedure TCAN2_C2FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  110506. begin
  110507. if thebits = 0 then
  110508. pTDefRegMap(@Self)^.clr := $00000200
  110509. else
  110510. pTDefRegMap(@Self)^.&set := $00000200;
  110511. end;
  110512. function TCAN2_C2FIFOINT9.getTXHALFIF : TBits_1; inline;
  110513. begin
  110514. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  110515. end;
  110516. procedure TCAN2_C2FIFOINT9.setTXNFULLIF; inline;
  110517. begin
  110518. pTDefRegMap(@Self)^.&set := $00000400;
  110519. end;
  110520. procedure TCAN2_C2FIFOINT9.clearTXNFULLIF; inline;
  110521. begin
  110522. pTDefRegMap(@Self)^.clr := $00000400;
  110523. end;
  110524. procedure TCAN2_C2FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  110525. begin
  110526. if thebits = 0 then
  110527. pTDefRegMap(@Self)^.clr := $00000400
  110528. else
  110529. pTDefRegMap(@Self)^.&set := $00000400;
  110530. end;
  110531. function TCAN2_C2FIFOINT9.getTXNFULLIF : TBits_1; inline;
  110532. begin
  110533. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  110534. end;
  110535. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIE; inline;
  110536. begin
  110537. pTDefRegMap(@Self)^.&set := $00010000;
  110538. end;
  110539. procedure TCAN2_C2FIFOINT9.clearRXNEMPTYIE; inline;
  110540. begin
  110541. pTDefRegMap(@Self)^.clr := $00010000;
  110542. end;
  110543. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  110544. begin
  110545. if thebits = 0 then
  110546. pTDefRegMap(@Self)^.clr := $00010000
  110547. else
  110548. pTDefRegMap(@Self)^.&set := $00010000;
  110549. end;
  110550. function TCAN2_C2FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  110551. begin
  110552. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  110553. end;
  110554. procedure TCAN2_C2FIFOINT9.setRXHALFIE; inline;
  110555. begin
  110556. pTDefRegMap(@Self)^.&set := $00020000;
  110557. end;
  110558. procedure TCAN2_C2FIFOINT9.clearRXHALFIE; inline;
  110559. begin
  110560. pTDefRegMap(@Self)^.clr := $00020000;
  110561. end;
  110562. procedure TCAN2_C2FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  110563. begin
  110564. if thebits = 0 then
  110565. pTDefRegMap(@Self)^.clr := $00020000
  110566. else
  110567. pTDefRegMap(@Self)^.&set := $00020000;
  110568. end;
  110569. function TCAN2_C2FIFOINT9.getRXHALFIE : TBits_1; inline;
  110570. begin
  110571. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  110572. end;
  110573. procedure TCAN2_C2FIFOINT9.setRXFULLIE; inline;
  110574. begin
  110575. pTDefRegMap(@Self)^.&set := $00040000;
  110576. end;
  110577. procedure TCAN2_C2FIFOINT9.clearRXFULLIE; inline;
  110578. begin
  110579. pTDefRegMap(@Self)^.clr := $00040000;
  110580. end;
  110581. procedure TCAN2_C2FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  110582. begin
  110583. if thebits = 0 then
  110584. pTDefRegMap(@Self)^.clr := $00040000
  110585. else
  110586. pTDefRegMap(@Self)^.&set := $00040000;
  110587. end;
  110588. function TCAN2_C2FIFOINT9.getRXFULLIE : TBits_1; inline;
  110589. begin
  110590. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  110591. end;
  110592. procedure TCAN2_C2FIFOINT9.setRXOVFLIE; inline;
  110593. begin
  110594. pTDefRegMap(@Self)^.&set := $00080000;
  110595. end;
  110596. procedure TCAN2_C2FIFOINT9.clearRXOVFLIE; inline;
  110597. begin
  110598. pTDefRegMap(@Self)^.clr := $00080000;
  110599. end;
  110600. procedure TCAN2_C2FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  110601. begin
  110602. if thebits = 0 then
  110603. pTDefRegMap(@Self)^.clr := $00080000
  110604. else
  110605. pTDefRegMap(@Self)^.&set := $00080000;
  110606. end;
  110607. function TCAN2_C2FIFOINT9.getRXOVFLIE : TBits_1; inline;
  110608. begin
  110609. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  110610. end;
  110611. procedure TCAN2_C2FIFOINT9.setTXEMPTYIE; inline;
  110612. begin
  110613. pTDefRegMap(@Self)^.&set := $01000000;
  110614. end;
  110615. procedure TCAN2_C2FIFOINT9.clearTXEMPTYIE; inline;
  110616. begin
  110617. pTDefRegMap(@Self)^.clr := $01000000;
  110618. end;
  110619. procedure TCAN2_C2FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  110620. begin
  110621. if thebits = 0 then
  110622. pTDefRegMap(@Self)^.clr := $01000000
  110623. else
  110624. pTDefRegMap(@Self)^.&set := $01000000;
  110625. end;
  110626. function TCAN2_C2FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  110627. begin
  110628. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  110629. end;
  110630. procedure TCAN2_C2FIFOINT9.setTXHALFIE; inline;
  110631. begin
  110632. pTDefRegMap(@Self)^.&set := $02000000;
  110633. end;
  110634. procedure TCAN2_C2FIFOINT9.clearTXHALFIE; inline;
  110635. begin
  110636. pTDefRegMap(@Self)^.clr := $02000000;
  110637. end;
  110638. procedure TCAN2_C2FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  110639. begin
  110640. if thebits = 0 then
  110641. pTDefRegMap(@Self)^.clr := $02000000
  110642. else
  110643. pTDefRegMap(@Self)^.&set := $02000000;
  110644. end;
  110645. function TCAN2_C2FIFOINT9.getTXHALFIE : TBits_1; inline;
  110646. begin
  110647. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  110648. end;
  110649. procedure TCAN2_C2FIFOINT9.setTXNFULLIE; inline;
  110650. begin
  110651. pTDefRegMap(@Self)^.&set := $04000000;
  110652. end;
  110653. procedure TCAN2_C2FIFOINT9.clearTXNFULLIE; inline;
  110654. begin
  110655. pTDefRegMap(@Self)^.clr := $04000000;
  110656. end;
  110657. procedure TCAN2_C2FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  110658. begin
  110659. if thebits = 0 then
  110660. pTDefRegMap(@Self)^.clr := $04000000
  110661. else
  110662. pTDefRegMap(@Self)^.&set := $04000000;
  110663. end;
  110664. function TCAN2_C2FIFOINT9.getTXNFULLIE : TBits_1; inline;
  110665. begin
  110666. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  110667. end;
  110668. procedure TCAN2_C2FIFOINT9.setw(thebits : TBits_32); inline;
  110669. begin
  110670. pTDefRegMap(@Self)^.val := thebits;
  110671. end;
  110672. function TCAN2_C2FIFOINT9.getw : TBits_32; inline;
  110673. begin
  110674. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110675. end;
  110676. procedure TCAN2_C2FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  110677. begin
  110678. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  110679. end;
  110680. function TCAN2_C2FIFOCI9.getCFIFOCI : TBits_5; inline;
  110681. begin
  110682. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  110683. end;
  110684. procedure TCAN2_C2FIFOCI9.setw(thebits : TBits_32); inline;
  110685. begin
  110686. pTDefRegMap(@Self)^.val := thebits;
  110687. end;
  110688. function TCAN2_C2FIFOCI9.getw : TBits_32; inline;
  110689. begin
  110690. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110691. end;
  110692. procedure TCAN2_C2FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  110693. begin
  110694. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  110695. end;
  110696. function TCAN2_C2FIFOCON10.getTXPRI : TBits_2; inline;
  110697. begin
  110698. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  110699. end;
  110700. procedure TCAN2_C2FIFOCON10.setRTREN; inline;
  110701. begin
  110702. pTDefRegMap(@Self)^.&set := $00000004;
  110703. end;
  110704. procedure TCAN2_C2FIFOCON10.clearRTREN; inline;
  110705. begin
  110706. pTDefRegMap(@Self)^.clr := $00000004;
  110707. end;
  110708. procedure TCAN2_C2FIFOCON10.setRTREN(thebits : TBits_1); inline;
  110709. begin
  110710. if thebits = 0 then
  110711. pTDefRegMap(@Self)^.clr := $00000004
  110712. else
  110713. pTDefRegMap(@Self)^.&set := $00000004;
  110714. end;
  110715. function TCAN2_C2FIFOCON10.getRTREN : TBits_1; inline;
  110716. begin
  110717. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110718. end;
  110719. procedure TCAN2_C2FIFOCON10.setTXREQ; inline;
  110720. begin
  110721. pTDefRegMap(@Self)^.&set := $00000008;
  110722. end;
  110723. procedure TCAN2_C2FIFOCON10.clearTXREQ; inline;
  110724. begin
  110725. pTDefRegMap(@Self)^.clr := $00000008;
  110726. end;
  110727. procedure TCAN2_C2FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  110728. begin
  110729. if thebits = 0 then
  110730. pTDefRegMap(@Self)^.clr := $00000008
  110731. else
  110732. pTDefRegMap(@Self)^.&set := $00000008;
  110733. end;
  110734. function TCAN2_C2FIFOCON10.getTXREQ : TBits_1; inline;
  110735. begin
  110736. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110737. end;
  110738. procedure TCAN2_C2FIFOCON10.setTXERR; inline;
  110739. begin
  110740. pTDefRegMap(@Self)^.&set := $00000010;
  110741. end;
  110742. procedure TCAN2_C2FIFOCON10.clearTXERR; inline;
  110743. begin
  110744. pTDefRegMap(@Self)^.clr := $00000010;
  110745. end;
  110746. procedure TCAN2_C2FIFOCON10.setTXERR(thebits : TBits_1); inline;
  110747. begin
  110748. if thebits = 0 then
  110749. pTDefRegMap(@Self)^.clr := $00000010
  110750. else
  110751. pTDefRegMap(@Self)^.&set := $00000010;
  110752. end;
  110753. function TCAN2_C2FIFOCON10.getTXERR : TBits_1; inline;
  110754. begin
  110755. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  110756. end;
  110757. procedure TCAN2_C2FIFOCON10.setTXLARB; inline;
  110758. begin
  110759. pTDefRegMap(@Self)^.&set := $00000020;
  110760. end;
  110761. procedure TCAN2_C2FIFOCON10.clearTXLARB; inline;
  110762. begin
  110763. pTDefRegMap(@Self)^.clr := $00000020;
  110764. end;
  110765. procedure TCAN2_C2FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  110766. begin
  110767. if thebits = 0 then
  110768. pTDefRegMap(@Self)^.clr := $00000020
  110769. else
  110770. pTDefRegMap(@Self)^.&set := $00000020;
  110771. end;
  110772. function TCAN2_C2FIFOCON10.getTXLARB : TBits_1; inline;
  110773. begin
  110774. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  110775. end;
  110776. procedure TCAN2_C2FIFOCON10.setTXABAT; inline;
  110777. begin
  110778. pTDefRegMap(@Self)^.&set := $00000040;
  110779. end;
  110780. procedure TCAN2_C2FIFOCON10.clearTXABAT; inline;
  110781. begin
  110782. pTDefRegMap(@Self)^.clr := $00000040;
  110783. end;
  110784. procedure TCAN2_C2FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  110785. begin
  110786. if thebits = 0 then
  110787. pTDefRegMap(@Self)^.clr := $00000040
  110788. else
  110789. pTDefRegMap(@Self)^.&set := $00000040;
  110790. end;
  110791. function TCAN2_C2FIFOCON10.getTXABAT : TBits_1; inline;
  110792. begin
  110793. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  110794. end;
  110795. procedure TCAN2_C2FIFOCON10.setTXEN; inline;
  110796. begin
  110797. pTDefRegMap(@Self)^.&set := $00000080;
  110798. end;
  110799. procedure TCAN2_C2FIFOCON10.clearTXEN; inline;
  110800. begin
  110801. pTDefRegMap(@Self)^.clr := $00000080;
  110802. end;
  110803. procedure TCAN2_C2FIFOCON10.setTXEN(thebits : TBits_1); inline;
  110804. begin
  110805. if thebits = 0 then
  110806. pTDefRegMap(@Self)^.clr := $00000080
  110807. else
  110808. pTDefRegMap(@Self)^.&set := $00000080;
  110809. end;
  110810. function TCAN2_C2FIFOCON10.getTXEN : TBits_1; inline;
  110811. begin
  110812. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  110813. end;
  110814. procedure TCAN2_C2FIFOCON10.setDONLY; inline;
  110815. begin
  110816. pTDefRegMap(@Self)^.&set := $00001000;
  110817. end;
  110818. procedure TCAN2_C2FIFOCON10.clearDONLY; inline;
  110819. begin
  110820. pTDefRegMap(@Self)^.clr := $00001000;
  110821. end;
  110822. procedure TCAN2_C2FIFOCON10.setDONLY(thebits : TBits_1); inline;
  110823. begin
  110824. if thebits = 0 then
  110825. pTDefRegMap(@Self)^.clr := $00001000
  110826. else
  110827. pTDefRegMap(@Self)^.&set := $00001000;
  110828. end;
  110829. function TCAN2_C2FIFOCON10.getDONLY : TBits_1; inline;
  110830. begin
  110831. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  110832. end;
  110833. procedure TCAN2_C2FIFOCON10.setUINC; inline;
  110834. begin
  110835. pTDefRegMap(@Self)^.&set := $00002000;
  110836. end;
  110837. procedure TCAN2_C2FIFOCON10.clearUINC; inline;
  110838. begin
  110839. pTDefRegMap(@Self)^.clr := $00002000;
  110840. end;
  110841. procedure TCAN2_C2FIFOCON10.setUINC(thebits : TBits_1); inline;
  110842. begin
  110843. if thebits = 0 then
  110844. pTDefRegMap(@Self)^.clr := $00002000
  110845. else
  110846. pTDefRegMap(@Self)^.&set := $00002000;
  110847. end;
  110848. function TCAN2_C2FIFOCON10.getUINC : TBits_1; inline;
  110849. begin
  110850. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  110851. end;
  110852. procedure TCAN2_C2FIFOCON10.setFRESET; inline;
  110853. begin
  110854. pTDefRegMap(@Self)^.&set := $00004000;
  110855. end;
  110856. procedure TCAN2_C2FIFOCON10.clearFRESET; inline;
  110857. begin
  110858. pTDefRegMap(@Self)^.clr := $00004000;
  110859. end;
  110860. procedure TCAN2_C2FIFOCON10.setFRESET(thebits : TBits_1); inline;
  110861. begin
  110862. if thebits = 0 then
  110863. pTDefRegMap(@Self)^.clr := $00004000
  110864. else
  110865. pTDefRegMap(@Self)^.&set := $00004000;
  110866. end;
  110867. function TCAN2_C2FIFOCON10.getFRESET : TBits_1; inline;
  110868. begin
  110869. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  110870. end;
  110871. procedure TCAN2_C2FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  110872. begin
  110873. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  110874. end;
  110875. function TCAN2_C2FIFOCON10.getFSIZE : TBits_5; inline;
  110876. begin
  110877. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  110878. end;
  110879. procedure TCAN2_C2FIFOCON10.setw(thebits : TBits_32); inline;
  110880. begin
  110881. pTDefRegMap(@Self)^.val := thebits;
  110882. end;
  110883. function TCAN2_C2FIFOCON10.getw : TBits_32; inline;
  110884. begin
  110885. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110886. end;
  110887. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIF; inline;
  110888. begin
  110889. pTDefRegMap(@Self)^.&set := $00000001;
  110890. end;
  110891. procedure TCAN2_C2FIFOINT10.clearRXNEMPTYIF; inline;
  110892. begin
  110893. pTDefRegMap(@Self)^.clr := $00000001;
  110894. end;
  110895. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  110896. begin
  110897. if thebits = 0 then
  110898. pTDefRegMap(@Self)^.clr := $00000001
  110899. else
  110900. pTDefRegMap(@Self)^.&set := $00000001;
  110901. end;
  110902. function TCAN2_C2FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  110903. begin
  110904. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  110905. end;
  110906. procedure TCAN2_C2FIFOINT10.setRXHALFIF; inline;
  110907. begin
  110908. pTDefRegMap(@Self)^.&set := $00000002;
  110909. end;
  110910. procedure TCAN2_C2FIFOINT10.clearRXHALFIF; inline;
  110911. begin
  110912. pTDefRegMap(@Self)^.clr := $00000002;
  110913. end;
  110914. procedure TCAN2_C2FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  110915. begin
  110916. if thebits = 0 then
  110917. pTDefRegMap(@Self)^.clr := $00000002
  110918. else
  110919. pTDefRegMap(@Self)^.&set := $00000002;
  110920. end;
  110921. function TCAN2_C2FIFOINT10.getRXHALFIF : TBits_1; inline;
  110922. begin
  110923. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  110924. end;
  110925. procedure TCAN2_C2FIFOINT10.setRXFULLIF; inline;
  110926. begin
  110927. pTDefRegMap(@Self)^.&set := $00000004;
  110928. end;
  110929. procedure TCAN2_C2FIFOINT10.clearRXFULLIF; inline;
  110930. begin
  110931. pTDefRegMap(@Self)^.clr := $00000004;
  110932. end;
  110933. procedure TCAN2_C2FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  110934. begin
  110935. if thebits = 0 then
  110936. pTDefRegMap(@Self)^.clr := $00000004
  110937. else
  110938. pTDefRegMap(@Self)^.&set := $00000004;
  110939. end;
  110940. function TCAN2_C2FIFOINT10.getRXFULLIF : TBits_1; inline;
  110941. begin
  110942. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110943. end;
  110944. procedure TCAN2_C2FIFOINT10.setRXOVFLIF; inline;
  110945. begin
  110946. pTDefRegMap(@Self)^.&set := $00000008;
  110947. end;
  110948. procedure TCAN2_C2FIFOINT10.clearRXOVFLIF; inline;
  110949. begin
  110950. pTDefRegMap(@Self)^.clr := $00000008;
  110951. end;
  110952. procedure TCAN2_C2FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  110953. begin
  110954. if thebits = 0 then
  110955. pTDefRegMap(@Self)^.clr := $00000008
  110956. else
  110957. pTDefRegMap(@Self)^.&set := $00000008;
  110958. end;
  110959. function TCAN2_C2FIFOINT10.getRXOVFLIF : TBits_1; inline;
  110960. begin
  110961. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110962. end;
  110963. procedure TCAN2_C2FIFOINT10.setTXEMPTYIF; inline;
  110964. begin
  110965. pTDefRegMap(@Self)^.&set := $00000100;
  110966. end;
  110967. procedure TCAN2_C2FIFOINT10.clearTXEMPTYIF; inline;
  110968. begin
  110969. pTDefRegMap(@Self)^.clr := $00000100;
  110970. end;
  110971. procedure TCAN2_C2FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  110972. begin
  110973. if thebits = 0 then
  110974. pTDefRegMap(@Self)^.clr := $00000100
  110975. else
  110976. pTDefRegMap(@Self)^.&set := $00000100;
  110977. end;
  110978. function TCAN2_C2FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  110979. begin
  110980. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  110981. end;
  110982. procedure TCAN2_C2FIFOINT10.setTXHALFIF; inline;
  110983. begin
  110984. pTDefRegMap(@Self)^.&set := $00000200;
  110985. end;
  110986. procedure TCAN2_C2FIFOINT10.clearTXHALFIF; inline;
  110987. begin
  110988. pTDefRegMap(@Self)^.clr := $00000200;
  110989. end;
  110990. procedure TCAN2_C2FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  110991. begin
  110992. if thebits = 0 then
  110993. pTDefRegMap(@Self)^.clr := $00000200
  110994. else
  110995. pTDefRegMap(@Self)^.&set := $00000200;
  110996. end;
  110997. function TCAN2_C2FIFOINT10.getTXHALFIF : TBits_1; inline;
  110998. begin
  110999. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  111000. end;
  111001. procedure TCAN2_C2FIFOINT10.setTXNFULLIF; inline;
  111002. begin
  111003. pTDefRegMap(@Self)^.&set := $00000400;
  111004. end;
  111005. procedure TCAN2_C2FIFOINT10.clearTXNFULLIF; inline;
  111006. begin
  111007. pTDefRegMap(@Self)^.clr := $00000400;
  111008. end;
  111009. procedure TCAN2_C2FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  111010. begin
  111011. if thebits = 0 then
  111012. pTDefRegMap(@Self)^.clr := $00000400
  111013. else
  111014. pTDefRegMap(@Self)^.&set := $00000400;
  111015. end;
  111016. function TCAN2_C2FIFOINT10.getTXNFULLIF : TBits_1; inline;
  111017. begin
  111018. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  111019. end;
  111020. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIE; inline;
  111021. begin
  111022. pTDefRegMap(@Self)^.&set := $00010000;
  111023. end;
  111024. procedure TCAN2_C2FIFOINT10.clearRXNEMPTYIE; inline;
  111025. begin
  111026. pTDefRegMap(@Self)^.clr := $00010000;
  111027. end;
  111028. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  111029. begin
  111030. if thebits = 0 then
  111031. pTDefRegMap(@Self)^.clr := $00010000
  111032. else
  111033. pTDefRegMap(@Self)^.&set := $00010000;
  111034. end;
  111035. function TCAN2_C2FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  111036. begin
  111037. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  111038. end;
  111039. procedure TCAN2_C2FIFOINT10.setRXHALFIE; inline;
  111040. begin
  111041. pTDefRegMap(@Self)^.&set := $00020000;
  111042. end;
  111043. procedure TCAN2_C2FIFOINT10.clearRXHALFIE; inline;
  111044. begin
  111045. pTDefRegMap(@Self)^.clr := $00020000;
  111046. end;
  111047. procedure TCAN2_C2FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  111048. begin
  111049. if thebits = 0 then
  111050. pTDefRegMap(@Self)^.clr := $00020000
  111051. else
  111052. pTDefRegMap(@Self)^.&set := $00020000;
  111053. end;
  111054. function TCAN2_C2FIFOINT10.getRXHALFIE : TBits_1; inline;
  111055. begin
  111056. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  111057. end;
  111058. procedure TCAN2_C2FIFOINT10.setRXFULLIE; inline;
  111059. begin
  111060. pTDefRegMap(@Self)^.&set := $00040000;
  111061. end;
  111062. procedure TCAN2_C2FIFOINT10.clearRXFULLIE; inline;
  111063. begin
  111064. pTDefRegMap(@Self)^.clr := $00040000;
  111065. end;
  111066. procedure TCAN2_C2FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  111067. begin
  111068. if thebits = 0 then
  111069. pTDefRegMap(@Self)^.clr := $00040000
  111070. else
  111071. pTDefRegMap(@Self)^.&set := $00040000;
  111072. end;
  111073. function TCAN2_C2FIFOINT10.getRXFULLIE : TBits_1; inline;
  111074. begin
  111075. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  111076. end;
  111077. procedure TCAN2_C2FIFOINT10.setRXOVFLIE; inline;
  111078. begin
  111079. pTDefRegMap(@Self)^.&set := $00080000;
  111080. end;
  111081. procedure TCAN2_C2FIFOINT10.clearRXOVFLIE; inline;
  111082. begin
  111083. pTDefRegMap(@Self)^.clr := $00080000;
  111084. end;
  111085. procedure TCAN2_C2FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  111086. begin
  111087. if thebits = 0 then
  111088. pTDefRegMap(@Self)^.clr := $00080000
  111089. else
  111090. pTDefRegMap(@Self)^.&set := $00080000;
  111091. end;
  111092. function TCAN2_C2FIFOINT10.getRXOVFLIE : TBits_1; inline;
  111093. begin
  111094. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  111095. end;
  111096. procedure TCAN2_C2FIFOINT10.setTXEMPTYIE; inline;
  111097. begin
  111098. pTDefRegMap(@Self)^.&set := $01000000;
  111099. end;
  111100. procedure TCAN2_C2FIFOINT10.clearTXEMPTYIE; inline;
  111101. begin
  111102. pTDefRegMap(@Self)^.clr := $01000000;
  111103. end;
  111104. procedure TCAN2_C2FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  111105. begin
  111106. if thebits = 0 then
  111107. pTDefRegMap(@Self)^.clr := $01000000
  111108. else
  111109. pTDefRegMap(@Self)^.&set := $01000000;
  111110. end;
  111111. function TCAN2_C2FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  111112. begin
  111113. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  111114. end;
  111115. procedure TCAN2_C2FIFOINT10.setTXHALFIE; inline;
  111116. begin
  111117. pTDefRegMap(@Self)^.&set := $02000000;
  111118. end;
  111119. procedure TCAN2_C2FIFOINT10.clearTXHALFIE; inline;
  111120. begin
  111121. pTDefRegMap(@Self)^.clr := $02000000;
  111122. end;
  111123. procedure TCAN2_C2FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  111124. begin
  111125. if thebits = 0 then
  111126. pTDefRegMap(@Self)^.clr := $02000000
  111127. else
  111128. pTDefRegMap(@Self)^.&set := $02000000;
  111129. end;
  111130. function TCAN2_C2FIFOINT10.getTXHALFIE : TBits_1; inline;
  111131. begin
  111132. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  111133. end;
  111134. procedure TCAN2_C2FIFOINT10.setTXNFULLIE; inline;
  111135. begin
  111136. pTDefRegMap(@Self)^.&set := $04000000;
  111137. end;
  111138. procedure TCAN2_C2FIFOINT10.clearTXNFULLIE; inline;
  111139. begin
  111140. pTDefRegMap(@Self)^.clr := $04000000;
  111141. end;
  111142. procedure TCAN2_C2FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  111143. begin
  111144. if thebits = 0 then
  111145. pTDefRegMap(@Self)^.clr := $04000000
  111146. else
  111147. pTDefRegMap(@Self)^.&set := $04000000;
  111148. end;
  111149. function TCAN2_C2FIFOINT10.getTXNFULLIE : TBits_1; inline;
  111150. begin
  111151. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  111152. end;
  111153. procedure TCAN2_C2FIFOINT10.setw(thebits : TBits_32); inline;
  111154. begin
  111155. pTDefRegMap(@Self)^.val := thebits;
  111156. end;
  111157. function TCAN2_C2FIFOINT10.getw : TBits_32; inline;
  111158. begin
  111159. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111160. end;
  111161. procedure TCAN2_C2FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  111162. begin
  111163. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  111164. end;
  111165. function TCAN2_C2FIFOCI10.getCFIFOCI : TBits_5; inline;
  111166. begin
  111167. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  111168. end;
  111169. procedure TCAN2_C2FIFOCI10.setw(thebits : TBits_32); inline;
  111170. begin
  111171. pTDefRegMap(@Self)^.val := thebits;
  111172. end;
  111173. function TCAN2_C2FIFOCI10.getw : TBits_32; inline;
  111174. begin
  111175. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111176. end;
  111177. procedure TCAN2_C2FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  111178. begin
  111179. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  111180. end;
  111181. function TCAN2_C2FIFOCON11.getTXPRI : TBits_2; inline;
  111182. begin
  111183. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  111184. end;
  111185. procedure TCAN2_C2FIFOCON11.setRTREN; inline;
  111186. begin
  111187. pTDefRegMap(@Self)^.&set := $00000004;
  111188. end;
  111189. procedure TCAN2_C2FIFOCON11.clearRTREN; inline;
  111190. begin
  111191. pTDefRegMap(@Self)^.clr := $00000004;
  111192. end;
  111193. procedure TCAN2_C2FIFOCON11.setRTREN(thebits : TBits_1); inline;
  111194. begin
  111195. if thebits = 0 then
  111196. pTDefRegMap(@Self)^.clr := $00000004
  111197. else
  111198. pTDefRegMap(@Self)^.&set := $00000004;
  111199. end;
  111200. function TCAN2_C2FIFOCON11.getRTREN : TBits_1; inline;
  111201. begin
  111202. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111203. end;
  111204. procedure TCAN2_C2FIFOCON11.setTXREQ; inline;
  111205. begin
  111206. pTDefRegMap(@Self)^.&set := $00000008;
  111207. end;
  111208. procedure TCAN2_C2FIFOCON11.clearTXREQ; inline;
  111209. begin
  111210. pTDefRegMap(@Self)^.clr := $00000008;
  111211. end;
  111212. procedure TCAN2_C2FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  111213. begin
  111214. if thebits = 0 then
  111215. pTDefRegMap(@Self)^.clr := $00000008
  111216. else
  111217. pTDefRegMap(@Self)^.&set := $00000008;
  111218. end;
  111219. function TCAN2_C2FIFOCON11.getTXREQ : TBits_1; inline;
  111220. begin
  111221. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111222. end;
  111223. procedure TCAN2_C2FIFOCON11.setTXERR; inline;
  111224. begin
  111225. pTDefRegMap(@Self)^.&set := $00000010;
  111226. end;
  111227. procedure TCAN2_C2FIFOCON11.clearTXERR; inline;
  111228. begin
  111229. pTDefRegMap(@Self)^.clr := $00000010;
  111230. end;
  111231. procedure TCAN2_C2FIFOCON11.setTXERR(thebits : TBits_1); inline;
  111232. begin
  111233. if thebits = 0 then
  111234. pTDefRegMap(@Self)^.clr := $00000010
  111235. else
  111236. pTDefRegMap(@Self)^.&set := $00000010;
  111237. end;
  111238. function TCAN2_C2FIFOCON11.getTXERR : TBits_1; inline;
  111239. begin
  111240. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  111241. end;
  111242. procedure TCAN2_C2FIFOCON11.setTXLARB; inline;
  111243. begin
  111244. pTDefRegMap(@Self)^.&set := $00000020;
  111245. end;
  111246. procedure TCAN2_C2FIFOCON11.clearTXLARB; inline;
  111247. begin
  111248. pTDefRegMap(@Self)^.clr := $00000020;
  111249. end;
  111250. procedure TCAN2_C2FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  111251. begin
  111252. if thebits = 0 then
  111253. pTDefRegMap(@Self)^.clr := $00000020
  111254. else
  111255. pTDefRegMap(@Self)^.&set := $00000020;
  111256. end;
  111257. function TCAN2_C2FIFOCON11.getTXLARB : TBits_1; inline;
  111258. begin
  111259. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  111260. end;
  111261. procedure TCAN2_C2FIFOCON11.setTXABAT; inline;
  111262. begin
  111263. pTDefRegMap(@Self)^.&set := $00000040;
  111264. end;
  111265. procedure TCAN2_C2FIFOCON11.clearTXABAT; inline;
  111266. begin
  111267. pTDefRegMap(@Self)^.clr := $00000040;
  111268. end;
  111269. procedure TCAN2_C2FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  111270. begin
  111271. if thebits = 0 then
  111272. pTDefRegMap(@Self)^.clr := $00000040
  111273. else
  111274. pTDefRegMap(@Self)^.&set := $00000040;
  111275. end;
  111276. function TCAN2_C2FIFOCON11.getTXABAT : TBits_1; inline;
  111277. begin
  111278. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  111279. end;
  111280. procedure TCAN2_C2FIFOCON11.setTXEN; inline;
  111281. begin
  111282. pTDefRegMap(@Self)^.&set := $00000080;
  111283. end;
  111284. procedure TCAN2_C2FIFOCON11.clearTXEN; inline;
  111285. begin
  111286. pTDefRegMap(@Self)^.clr := $00000080;
  111287. end;
  111288. procedure TCAN2_C2FIFOCON11.setTXEN(thebits : TBits_1); inline;
  111289. begin
  111290. if thebits = 0 then
  111291. pTDefRegMap(@Self)^.clr := $00000080
  111292. else
  111293. pTDefRegMap(@Self)^.&set := $00000080;
  111294. end;
  111295. function TCAN2_C2FIFOCON11.getTXEN : TBits_1; inline;
  111296. begin
  111297. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  111298. end;
  111299. procedure TCAN2_C2FIFOCON11.setDONLY; inline;
  111300. begin
  111301. pTDefRegMap(@Self)^.&set := $00001000;
  111302. end;
  111303. procedure TCAN2_C2FIFOCON11.clearDONLY; inline;
  111304. begin
  111305. pTDefRegMap(@Self)^.clr := $00001000;
  111306. end;
  111307. procedure TCAN2_C2FIFOCON11.setDONLY(thebits : TBits_1); inline;
  111308. begin
  111309. if thebits = 0 then
  111310. pTDefRegMap(@Self)^.clr := $00001000
  111311. else
  111312. pTDefRegMap(@Self)^.&set := $00001000;
  111313. end;
  111314. function TCAN2_C2FIFOCON11.getDONLY : TBits_1; inline;
  111315. begin
  111316. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  111317. end;
  111318. procedure TCAN2_C2FIFOCON11.setUINC; inline;
  111319. begin
  111320. pTDefRegMap(@Self)^.&set := $00002000;
  111321. end;
  111322. procedure TCAN2_C2FIFOCON11.clearUINC; inline;
  111323. begin
  111324. pTDefRegMap(@Self)^.clr := $00002000;
  111325. end;
  111326. procedure TCAN2_C2FIFOCON11.setUINC(thebits : TBits_1); inline;
  111327. begin
  111328. if thebits = 0 then
  111329. pTDefRegMap(@Self)^.clr := $00002000
  111330. else
  111331. pTDefRegMap(@Self)^.&set := $00002000;
  111332. end;
  111333. function TCAN2_C2FIFOCON11.getUINC : TBits_1; inline;
  111334. begin
  111335. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  111336. end;
  111337. procedure TCAN2_C2FIFOCON11.setFRESET; inline;
  111338. begin
  111339. pTDefRegMap(@Self)^.&set := $00004000;
  111340. end;
  111341. procedure TCAN2_C2FIFOCON11.clearFRESET; inline;
  111342. begin
  111343. pTDefRegMap(@Self)^.clr := $00004000;
  111344. end;
  111345. procedure TCAN2_C2FIFOCON11.setFRESET(thebits : TBits_1); inline;
  111346. begin
  111347. if thebits = 0 then
  111348. pTDefRegMap(@Self)^.clr := $00004000
  111349. else
  111350. pTDefRegMap(@Self)^.&set := $00004000;
  111351. end;
  111352. function TCAN2_C2FIFOCON11.getFRESET : TBits_1; inline;
  111353. begin
  111354. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  111355. end;
  111356. procedure TCAN2_C2FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  111357. begin
  111358. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  111359. end;
  111360. function TCAN2_C2FIFOCON11.getFSIZE : TBits_5; inline;
  111361. begin
  111362. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  111363. end;
  111364. procedure TCAN2_C2FIFOCON11.setw(thebits : TBits_32); inline;
  111365. begin
  111366. pTDefRegMap(@Self)^.val := thebits;
  111367. end;
  111368. function TCAN2_C2FIFOCON11.getw : TBits_32; inline;
  111369. begin
  111370. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111371. end;
  111372. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIF; inline;
  111373. begin
  111374. pTDefRegMap(@Self)^.&set := $00000001;
  111375. end;
  111376. procedure TCAN2_C2FIFOINT11.clearRXNEMPTYIF; inline;
  111377. begin
  111378. pTDefRegMap(@Self)^.clr := $00000001;
  111379. end;
  111380. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  111381. begin
  111382. if thebits = 0 then
  111383. pTDefRegMap(@Self)^.clr := $00000001
  111384. else
  111385. pTDefRegMap(@Self)^.&set := $00000001;
  111386. end;
  111387. function TCAN2_C2FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  111388. begin
  111389. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  111390. end;
  111391. procedure TCAN2_C2FIFOINT11.setRXHALFIF; inline;
  111392. begin
  111393. pTDefRegMap(@Self)^.&set := $00000002;
  111394. end;
  111395. procedure TCAN2_C2FIFOINT11.clearRXHALFIF; inline;
  111396. begin
  111397. pTDefRegMap(@Self)^.clr := $00000002;
  111398. end;
  111399. procedure TCAN2_C2FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  111400. begin
  111401. if thebits = 0 then
  111402. pTDefRegMap(@Self)^.clr := $00000002
  111403. else
  111404. pTDefRegMap(@Self)^.&set := $00000002;
  111405. end;
  111406. function TCAN2_C2FIFOINT11.getRXHALFIF : TBits_1; inline;
  111407. begin
  111408. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  111409. end;
  111410. procedure TCAN2_C2FIFOINT11.setRXFULLIF; inline;
  111411. begin
  111412. pTDefRegMap(@Self)^.&set := $00000004;
  111413. end;
  111414. procedure TCAN2_C2FIFOINT11.clearRXFULLIF; inline;
  111415. begin
  111416. pTDefRegMap(@Self)^.clr := $00000004;
  111417. end;
  111418. procedure TCAN2_C2FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  111419. begin
  111420. if thebits = 0 then
  111421. pTDefRegMap(@Self)^.clr := $00000004
  111422. else
  111423. pTDefRegMap(@Self)^.&set := $00000004;
  111424. end;
  111425. function TCAN2_C2FIFOINT11.getRXFULLIF : TBits_1; inline;
  111426. begin
  111427. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111428. end;
  111429. procedure TCAN2_C2FIFOINT11.setRXOVFLIF; inline;
  111430. begin
  111431. pTDefRegMap(@Self)^.&set := $00000008;
  111432. end;
  111433. procedure TCAN2_C2FIFOINT11.clearRXOVFLIF; inline;
  111434. begin
  111435. pTDefRegMap(@Self)^.clr := $00000008;
  111436. end;
  111437. procedure TCAN2_C2FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  111438. begin
  111439. if thebits = 0 then
  111440. pTDefRegMap(@Self)^.clr := $00000008
  111441. else
  111442. pTDefRegMap(@Self)^.&set := $00000008;
  111443. end;
  111444. function TCAN2_C2FIFOINT11.getRXOVFLIF : TBits_1; inline;
  111445. begin
  111446. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111447. end;
  111448. procedure TCAN2_C2FIFOINT11.setTXEMPTYIF; inline;
  111449. begin
  111450. pTDefRegMap(@Self)^.&set := $00000100;
  111451. end;
  111452. procedure TCAN2_C2FIFOINT11.clearTXEMPTYIF; inline;
  111453. begin
  111454. pTDefRegMap(@Self)^.clr := $00000100;
  111455. end;
  111456. procedure TCAN2_C2FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  111457. begin
  111458. if thebits = 0 then
  111459. pTDefRegMap(@Self)^.clr := $00000100
  111460. else
  111461. pTDefRegMap(@Self)^.&set := $00000100;
  111462. end;
  111463. function TCAN2_C2FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  111464. begin
  111465. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  111466. end;
  111467. procedure TCAN2_C2FIFOINT11.setTXHALFIF; inline;
  111468. begin
  111469. pTDefRegMap(@Self)^.&set := $00000200;
  111470. end;
  111471. procedure TCAN2_C2FIFOINT11.clearTXHALFIF; inline;
  111472. begin
  111473. pTDefRegMap(@Self)^.clr := $00000200;
  111474. end;
  111475. procedure TCAN2_C2FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  111476. begin
  111477. if thebits = 0 then
  111478. pTDefRegMap(@Self)^.clr := $00000200
  111479. else
  111480. pTDefRegMap(@Self)^.&set := $00000200;
  111481. end;
  111482. function TCAN2_C2FIFOINT11.getTXHALFIF : TBits_1; inline;
  111483. begin
  111484. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  111485. end;
  111486. procedure TCAN2_C2FIFOINT11.setTXNFULLIF; inline;
  111487. begin
  111488. pTDefRegMap(@Self)^.&set := $00000400;
  111489. end;
  111490. procedure TCAN2_C2FIFOINT11.clearTXNFULLIF; inline;
  111491. begin
  111492. pTDefRegMap(@Self)^.clr := $00000400;
  111493. end;
  111494. procedure TCAN2_C2FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  111495. begin
  111496. if thebits = 0 then
  111497. pTDefRegMap(@Self)^.clr := $00000400
  111498. else
  111499. pTDefRegMap(@Self)^.&set := $00000400;
  111500. end;
  111501. function TCAN2_C2FIFOINT11.getTXNFULLIF : TBits_1; inline;
  111502. begin
  111503. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  111504. end;
  111505. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIE; inline;
  111506. begin
  111507. pTDefRegMap(@Self)^.&set := $00010000;
  111508. end;
  111509. procedure TCAN2_C2FIFOINT11.clearRXNEMPTYIE; inline;
  111510. begin
  111511. pTDefRegMap(@Self)^.clr := $00010000;
  111512. end;
  111513. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  111514. begin
  111515. if thebits = 0 then
  111516. pTDefRegMap(@Self)^.clr := $00010000
  111517. else
  111518. pTDefRegMap(@Self)^.&set := $00010000;
  111519. end;
  111520. function TCAN2_C2FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  111521. begin
  111522. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  111523. end;
  111524. procedure TCAN2_C2FIFOINT11.setRXHALFIE; inline;
  111525. begin
  111526. pTDefRegMap(@Self)^.&set := $00020000;
  111527. end;
  111528. procedure TCAN2_C2FIFOINT11.clearRXHALFIE; inline;
  111529. begin
  111530. pTDefRegMap(@Self)^.clr := $00020000;
  111531. end;
  111532. procedure TCAN2_C2FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  111533. begin
  111534. if thebits = 0 then
  111535. pTDefRegMap(@Self)^.clr := $00020000
  111536. else
  111537. pTDefRegMap(@Self)^.&set := $00020000;
  111538. end;
  111539. function TCAN2_C2FIFOINT11.getRXHALFIE : TBits_1; inline;
  111540. begin
  111541. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  111542. end;
  111543. procedure TCAN2_C2FIFOINT11.setRXFULLIE; inline;
  111544. begin
  111545. pTDefRegMap(@Self)^.&set := $00040000;
  111546. end;
  111547. procedure TCAN2_C2FIFOINT11.clearRXFULLIE; inline;
  111548. begin
  111549. pTDefRegMap(@Self)^.clr := $00040000;
  111550. end;
  111551. procedure TCAN2_C2FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  111552. begin
  111553. if thebits = 0 then
  111554. pTDefRegMap(@Self)^.clr := $00040000
  111555. else
  111556. pTDefRegMap(@Self)^.&set := $00040000;
  111557. end;
  111558. function TCAN2_C2FIFOINT11.getRXFULLIE : TBits_1; inline;
  111559. begin
  111560. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  111561. end;
  111562. procedure TCAN2_C2FIFOINT11.setRXOVFLIE; inline;
  111563. begin
  111564. pTDefRegMap(@Self)^.&set := $00080000;
  111565. end;
  111566. procedure TCAN2_C2FIFOINT11.clearRXOVFLIE; inline;
  111567. begin
  111568. pTDefRegMap(@Self)^.clr := $00080000;
  111569. end;
  111570. procedure TCAN2_C2FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  111571. begin
  111572. if thebits = 0 then
  111573. pTDefRegMap(@Self)^.clr := $00080000
  111574. else
  111575. pTDefRegMap(@Self)^.&set := $00080000;
  111576. end;
  111577. function TCAN2_C2FIFOINT11.getRXOVFLIE : TBits_1; inline;
  111578. begin
  111579. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  111580. end;
  111581. procedure TCAN2_C2FIFOINT11.setTXEMPTYIE; inline;
  111582. begin
  111583. pTDefRegMap(@Self)^.&set := $01000000;
  111584. end;
  111585. procedure TCAN2_C2FIFOINT11.clearTXEMPTYIE; inline;
  111586. begin
  111587. pTDefRegMap(@Self)^.clr := $01000000;
  111588. end;
  111589. procedure TCAN2_C2FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  111590. begin
  111591. if thebits = 0 then
  111592. pTDefRegMap(@Self)^.clr := $01000000
  111593. else
  111594. pTDefRegMap(@Self)^.&set := $01000000;
  111595. end;
  111596. function TCAN2_C2FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  111597. begin
  111598. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  111599. end;
  111600. procedure TCAN2_C2FIFOINT11.setTXHALFIE; inline;
  111601. begin
  111602. pTDefRegMap(@Self)^.&set := $02000000;
  111603. end;
  111604. procedure TCAN2_C2FIFOINT11.clearTXHALFIE; inline;
  111605. begin
  111606. pTDefRegMap(@Self)^.clr := $02000000;
  111607. end;
  111608. procedure TCAN2_C2FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  111609. begin
  111610. if thebits = 0 then
  111611. pTDefRegMap(@Self)^.clr := $02000000
  111612. else
  111613. pTDefRegMap(@Self)^.&set := $02000000;
  111614. end;
  111615. function TCAN2_C2FIFOINT11.getTXHALFIE : TBits_1; inline;
  111616. begin
  111617. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  111618. end;
  111619. procedure TCAN2_C2FIFOINT11.setTXNFULLIE; inline;
  111620. begin
  111621. pTDefRegMap(@Self)^.&set := $04000000;
  111622. end;
  111623. procedure TCAN2_C2FIFOINT11.clearTXNFULLIE; inline;
  111624. begin
  111625. pTDefRegMap(@Self)^.clr := $04000000;
  111626. end;
  111627. procedure TCAN2_C2FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  111628. begin
  111629. if thebits = 0 then
  111630. pTDefRegMap(@Self)^.clr := $04000000
  111631. else
  111632. pTDefRegMap(@Self)^.&set := $04000000;
  111633. end;
  111634. function TCAN2_C2FIFOINT11.getTXNFULLIE : TBits_1; inline;
  111635. begin
  111636. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  111637. end;
  111638. procedure TCAN2_C2FIFOINT11.setw(thebits : TBits_32); inline;
  111639. begin
  111640. pTDefRegMap(@Self)^.val := thebits;
  111641. end;
  111642. function TCAN2_C2FIFOINT11.getw : TBits_32; inline;
  111643. begin
  111644. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111645. end;
  111646. procedure TCAN2_C2FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  111647. begin
  111648. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  111649. end;
  111650. function TCAN2_C2FIFOCI11.getCFIFOCI : TBits_5; inline;
  111651. begin
  111652. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  111653. end;
  111654. procedure TCAN2_C2FIFOCI11.setw(thebits : TBits_32); inline;
  111655. begin
  111656. pTDefRegMap(@Self)^.val := thebits;
  111657. end;
  111658. function TCAN2_C2FIFOCI11.getw : TBits_32; inline;
  111659. begin
  111660. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111661. end;
  111662. procedure TCAN2_C2FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  111663. begin
  111664. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  111665. end;
  111666. function TCAN2_C2FIFOCON12.getTXPRI : TBits_2; inline;
  111667. begin
  111668. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  111669. end;
  111670. procedure TCAN2_C2FIFOCON12.setRTREN; inline;
  111671. begin
  111672. pTDefRegMap(@Self)^.&set := $00000004;
  111673. end;
  111674. procedure TCAN2_C2FIFOCON12.clearRTREN; inline;
  111675. begin
  111676. pTDefRegMap(@Self)^.clr := $00000004;
  111677. end;
  111678. procedure TCAN2_C2FIFOCON12.setRTREN(thebits : TBits_1); inline;
  111679. begin
  111680. if thebits = 0 then
  111681. pTDefRegMap(@Self)^.clr := $00000004
  111682. else
  111683. pTDefRegMap(@Self)^.&set := $00000004;
  111684. end;
  111685. function TCAN2_C2FIFOCON12.getRTREN : TBits_1; inline;
  111686. begin
  111687. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111688. end;
  111689. procedure TCAN2_C2FIFOCON12.setTXREQ; inline;
  111690. begin
  111691. pTDefRegMap(@Self)^.&set := $00000008;
  111692. end;
  111693. procedure TCAN2_C2FIFOCON12.clearTXREQ; inline;
  111694. begin
  111695. pTDefRegMap(@Self)^.clr := $00000008;
  111696. end;
  111697. procedure TCAN2_C2FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  111698. begin
  111699. if thebits = 0 then
  111700. pTDefRegMap(@Self)^.clr := $00000008
  111701. else
  111702. pTDefRegMap(@Self)^.&set := $00000008;
  111703. end;
  111704. function TCAN2_C2FIFOCON12.getTXREQ : TBits_1; inline;
  111705. begin
  111706. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111707. end;
  111708. procedure TCAN2_C2FIFOCON12.setTXERR; inline;
  111709. begin
  111710. pTDefRegMap(@Self)^.&set := $00000010;
  111711. end;
  111712. procedure TCAN2_C2FIFOCON12.clearTXERR; inline;
  111713. begin
  111714. pTDefRegMap(@Self)^.clr := $00000010;
  111715. end;
  111716. procedure TCAN2_C2FIFOCON12.setTXERR(thebits : TBits_1); inline;
  111717. begin
  111718. if thebits = 0 then
  111719. pTDefRegMap(@Self)^.clr := $00000010
  111720. else
  111721. pTDefRegMap(@Self)^.&set := $00000010;
  111722. end;
  111723. function TCAN2_C2FIFOCON12.getTXERR : TBits_1; inline;
  111724. begin
  111725. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  111726. end;
  111727. procedure TCAN2_C2FIFOCON12.setTXLARB; inline;
  111728. begin
  111729. pTDefRegMap(@Self)^.&set := $00000020;
  111730. end;
  111731. procedure TCAN2_C2FIFOCON12.clearTXLARB; inline;
  111732. begin
  111733. pTDefRegMap(@Self)^.clr := $00000020;
  111734. end;
  111735. procedure TCAN2_C2FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  111736. begin
  111737. if thebits = 0 then
  111738. pTDefRegMap(@Self)^.clr := $00000020
  111739. else
  111740. pTDefRegMap(@Self)^.&set := $00000020;
  111741. end;
  111742. function TCAN2_C2FIFOCON12.getTXLARB : TBits_1; inline;
  111743. begin
  111744. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  111745. end;
  111746. procedure TCAN2_C2FIFOCON12.setTXABAT; inline;
  111747. begin
  111748. pTDefRegMap(@Self)^.&set := $00000040;
  111749. end;
  111750. procedure TCAN2_C2FIFOCON12.clearTXABAT; inline;
  111751. begin
  111752. pTDefRegMap(@Self)^.clr := $00000040;
  111753. end;
  111754. procedure TCAN2_C2FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  111755. begin
  111756. if thebits = 0 then
  111757. pTDefRegMap(@Self)^.clr := $00000040
  111758. else
  111759. pTDefRegMap(@Self)^.&set := $00000040;
  111760. end;
  111761. function TCAN2_C2FIFOCON12.getTXABAT : TBits_1; inline;
  111762. begin
  111763. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  111764. end;
  111765. procedure TCAN2_C2FIFOCON12.setTXEN; inline;
  111766. begin
  111767. pTDefRegMap(@Self)^.&set := $00000080;
  111768. end;
  111769. procedure TCAN2_C2FIFOCON12.clearTXEN; inline;
  111770. begin
  111771. pTDefRegMap(@Self)^.clr := $00000080;
  111772. end;
  111773. procedure TCAN2_C2FIFOCON12.setTXEN(thebits : TBits_1); inline;
  111774. begin
  111775. if thebits = 0 then
  111776. pTDefRegMap(@Self)^.clr := $00000080
  111777. else
  111778. pTDefRegMap(@Self)^.&set := $00000080;
  111779. end;
  111780. function TCAN2_C2FIFOCON12.getTXEN : TBits_1; inline;
  111781. begin
  111782. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  111783. end;
  111784. procedure TCAN2_C2FIFOCON12.setDONLY; inline;
  111785. begin
  111786. pTDefRegMap(@Self)^.&set := $00001000;
  111787. end;
  111788. procedure TCAN2_C2FIFOCON12.clearDONLY; inline;
  111789. begin
  111790. pTDefRegMap(@Self)^.clr := $00001000;
  111791. end;
  111792. procedure TCAN2_C2FIFOCON12.setDONLY(thebits : TBits_1); inline;
  111793. begin
  111794. if thebits = 0 then
  111795. pTDefRegMap(@Self)^.clr := $00001000
  111796. else
  111797. pTDefRegMap(@Self)^.&set := $00001000;
  111798. end;
  111799. function TCAN2_C2FIFOCON12.getDONLY : TBits_1; inline;
  111800. begin
  111801. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  111802. end;
  111803. procedure TCAN2_C2FIFOCON12.setUINC; inline;
  111804. begin
  111805. pTDefRegMap(@Self)^.&set := $00002000;
  111806. end;
  111807. procedure TCAN2_C2FIFOCON12.clearUINC; inline;
  111808. begin
  111809. pTDefRegMap(@Self)^.clr := $00002000;
  111810. end;
  111811. procedure TCAN2_C2FIFOCON12.setUINC(thebits : TBits_1); inline;
  111812. begin
  111813. if thebits = 0 then
  111814. pTDefRegMap(@Self)^.clr := $00002000
  111815. else
  111816. pTDefRegMap(@Self)^.&set := $00002000;
  111817. end;
  111818. function TCAN2_C2FIFOCON12.getUINC : TBits_1; inline;
  111819. begin
  111820. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  111821. end;
  111822. procedure TCAN2_C2FIFOCON12.setFRESET; inline;
  111823. begin
  111824. pTDefRegMap(@Self)^.&set := $00004000;
  111825. end;
  111826. procedure TCAN2_C2FIFOCON12.clearFRESET; inline;
  111827. begin
  111828. pTDefRegMap(@Self)^.clr := $00004000;
  111829. end;
  111830. procedure TCAN2_C2FIFOCON12.setFRESET(thebits : TBits_1); inline;
  111831. begin
  111832. if thebits = 0 then
  111833. pTDefRegMap(@Self)^.clr := $00004000
  111834. else
  111835. pTDefRegMap(@Self)^.&set := $00004000;
  111836. end;
  111837. function TCAN2_C2FIFOCON12.getFRESET : TBits_1; inline;
  111838. begin
  111839. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  111840. end;
  111841. procedure TCAN2_C2FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  111842. begin
  111843. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  111844. end;
  111845. function TCAN2_C2FIFOCON12.getFSIZE : TBits_5; inline;
  111846. begin
  111847. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  111848. end;
  111849. procedure TCAN2_C2FIFOCON12.setw(thebits : TBits_32); inline;
  111850. begin
  111851. pTDefRegMap(@Self)^.val := thebits;
  111852. end;
  111853. function TCAN2_C2FIFOCON12.getw : TBits_32; inline;
  111854. begin
  111855. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111856. end;
  111857. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIF; inline;
  111858. begin
  111859. pTDefRegMap(@Self)^.&set := $00000001;
  111860. end;
  111861. procedure TCAN2_C2FIFOINT12.clearRXNEMPTYIF; inline;
  111862. begin
  111863. pTDefRegMap(@Self)^.clr := $00000001;
  111864. end;
  111865. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  111866. begin
  111867. if thebits = 0 then
  111868. pTDefRegMap(@Self)^.clr := $00000001
  111869. else
  111870. pTDefRegMap(@Self)^.&set := $00000001;
  111871. end;
  111872. function TCAN2_C2FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  111873. begin
  111874. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  111875. end;
  111876. procedure TCAN2_C2FIFOINT12.setRXHALFIF; inline;
  111877. begin
  111878. pTDefRegMap(@Self)^.&set := $00000002;
  111879. end;
  111880. procedure TCAN2_C2FIFOINT12.clearRXHALFIF; inline;
  111881. begin
  111882. pTDefRegMap(@Self)^.clr := $00000002;
  111883. end;
  111884. procedure TCAN2_C2FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  111885. begin
  111886. if thebits = 0 then
  111887. pTDefRegMap(@Self)^.clr := $00000002
  111888. else
  111889. pTDefRegMap(@Self)^.&set := $00000002;
  111890. end;
  111891. function TCAN2_C2FIFOINT12.getRXHALFIF : TBits_1; inline;
  111892. begin
  111893. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  111894. end;
  111895. procedure TCAN2_C2FIFOINT12.setRXFULLIF; inline;
  111896. begin
  111897. pTDefRegMap(@Self)^.&set := $00000004;
  111898. end;
  111899. procedure TCAN2_C2FIFOINT12.clearRXFULLIF; inline;
  111900. begin
  111901. pTDefRegMap(@Self)^.clr := $00000004;
  111902. end;
  111903. procedure TCAN2_C2FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  111904. begin
  111905. if thebits = 0 then
  111906. pTDefRegMap(@Self)^.clr := $00000004
  111907. else
  111908. pTDefRegMap(@Self)^.&set := $00000004;
  111909. end;
  111910. function TCAN2_C2FIFOINT12.getRXFULLIF : TBits_1; inline;
  111911. begin
  111912. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111913. end;
  111914. procedure TCAN2_C2FIFOINT12.setRXOVFLIF; inline;
  111915. begin
  111916. pTDefRegMap(@Self)^.&set := $00000008;
  111917. end;
  111918. procedure TCAN2_C2FIFOINT12.clearRXOVFLIF; inline;
  111919. begin
  111920. pTDefRegMap(@Self)^.clr := $00000008;
  111921. end;
  111922. procedure TCAN2_C2FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  111923. begin
  111924. if thebits = 0 then
  111925. pTDefRegMap(@Self)^.clr := $00000008
  111926. else
  111927. pTDefRegMap(@Self)^.&set := $00000008;
  111928. end;
  111929. function TCAN2_C2FIFOINT12.getRXOVFLIF : TBits_1; inline;
  111930. begin
  111931. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111932. end;
  111933. procedure TCAN2_C2FIFOINT12.setTXEMPTYIF; inline;
  111934. begin
  111935. pTDefRegMap(@Self)^.&set := $00000100;
  111936. end;
  111937. procedure TCAN2_C2FIFOINT12.clearTXEMPTYIF; inline;
  111938. begin
  111939. pTDefRegMap(@Self)^.clr := $00000100;
  111940. end;
  111941. procedure TCAN2_C2FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  111942. begin
  111943. if thebits = 0 then
  111944. pTDefRegMap(@Self)^.clr := $00000100
  111945. else
  111946. pTDefRegMap(@Self)^.&set := $00000100;
  111947. end;
  111948. function TCAN2_C2FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  111949. begin
  111950. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  111951. end;
  111952. procedure TCAN2_C2FIFOINT12.setTXHALFIF; inline;
  111953. begin
  111954. pTDefRegMap(@Self)^.&set := $00000200;
  111955. end;
  111956. procedure TCAN2_C2FIFOINT12.clearTXHALFIF; inline;
  111957. begin
  111958. pTDefRegMap(@Self)^.clr := $00000200;
  111959. end;
  111960. procedure TCAN2_C2FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  111961. begin
  111962. if thebits = 0 then
  111963. pTDefRegMap(@Self)^.clr := $00000200
  111964. else
  111965. pTDefRegMap(@Self)^.&set := $00000200;
  111966. end;
  111967. function TCAN2_C2FIFOINT12.getTXHALFIF : TBits_1; inline;
  111968. begin
  111969. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  111970. end;
  111971. procedure TCAN2_C2FIFOINT12.setTXNFULLIF; inline;
  111972. begin
  111973. pTDefRegMap(@Self)^.&set := $00000400;
  111974. end;
  111975. procedure TCAN2_C2FIFOINT12.clearTXNFULLIF; inline;
  111976. begin
  111977. pTDefRegMap(@Self)^.clr := $00000400;
  111978. end;
  111979. procedure TCAN2_C2FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  111980. begin
  111981. if thebits = 0 then
  111982. pTDefRegMap(@Self)^.clr := $00000400
  111983. else
  111984. pTDefRegMap(@Self)^.&set := $00000400;
  111985. end;
  111986. function TCAN2_C2FIFOINT12.getTXNFULLIF : TBits_1; inline;
  111987. begin
  111988. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  111989. end;
  111990. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIE; inline;
  111991. begin
  111992. pTDefRegMap(@Self)^.&set := $00010000;
  111993. end;
  111994. procedure TCAN2_C2FIFOINT12.clearRXNEMPTYIE; inline;
  111995. begin
  111996. pTDefRegMap(@Self)^.clr := $00010000;
  111997. end;
  111998. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  111999. begin
  112000. if thebits = 0 then
  112001. pTDefRegMap(@Self)^.clr := $00010000
  112002. else
  112003. pTDefRegMap(@Self)^.&set := $00010000;
  112004. end;
  112005. function TCAN2_C2FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  112006. begin
  112007. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  112008. end;
  112009. procedure TCAN2_C2FIFOINT12.setRXHALFIE; inline;
  112010. begin
  112011. pTDefRegMap(@Self)^.&set := $00020000;
  112012. end;
  112013. procedure TCAN2_C2FIFOINT12.clearRXHALFIE; inline;
  112014. begin
  112015. pTDefRegMap(@Self)^.clr := $00020000;
  112016. end;
  112017. procedure TCAN2_C2FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  112018. begin
  112019. if thebits = 0 then
  112020. pTDefRegMap(@Self)^.clr := $00020000
  112021. else
  112022. pTDefRegMap(@Self)^.&set := $00020000;
  112023. end;
  112024. function TCAN2_C2FIFOINT12.getRXHALFIE : TBits_1; inline;
  112025. begin
  112026. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  112027. end;
  112028. procedure TCAN2_C2FIFOINT12.setRXFULLIE; inline;
  112029. begin
  112030. pTDefRegMap(@Self)^.&set := $00040000;
  112031. end;
  112032. procedure TCAN2_C2FIFOINT12.clearRXFULLIE; inline;
  112033. begin
  112034. pTDefRegMap(@Self)^.clr := $00040000;
  112035. end;
  112036. procedure TCAN2_C2FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  112037. begin
  112038. if thebits = 0 then
  112039. pTDefRegMap(@Self)^.clr := $00040000
  112040. else
  112041. pTDefRegMap(@Self)^.&set := $00040000;
  112042. end;
  112043. function TCAN2_C2FIFOINT12.getRXFULLIE : TBits_1; inline;
  112044. begin
  112045. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  112046. end;
  112047. procedure TCAN2_C2FIFOINT12.setRXOVFLIE; inline;
  112048. begin
  112049. pTDefRegMap(@Self)^.&set := $00080000;
  112050. end;
  112051. procedure TCAN2_C2FIFOINT12.clearRXOVFLIE; inline;
  112052. begin
  112053. pTDefRegMap(@Self)^.clr := $00080000;
  112054. end;
  112055. procedure TCAN2_C2FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  112056. begin
  112057. if thebits = 0 then
  112058. pTDefRegMap(@Self)^.clr := $00080000
  112059. else
  112060. pTDefRegMap(@Self)^.&set := $00080000;
  112061. end;
  112062. function TCAN2_C2FIFOINT12.getRXOVFLIE : TBits_1; inline;
  112063. begin
  112064. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  112065. end;
  112066. procedure TCAN2_C2FIFOINT12.setTXEMPTYIE; inline;
  112067. begin
  112068. pTDefRegMap(@Self)^.&set := $01000000;
  112069. end;
  112070. procedure TCAN2_C2FIFOINT12.clearTXEMPTYIE; inline;
  112071. begin
  112072. pTDefRegMap(@Self)^.clr := $01000000;
  112073. end;
  112074. procedure TCAN2_C2FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  112075. begin
  112076. if thebits = 0 then
  112077. pTDefRegMap(@Self)^.clr := $01000000
  112078. else
  112079. pTDefRegMap(@Self)^.&set := $01000000;
  112080. end;
  112081. function TCAN2_C2FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  112082. begin
  112083. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  112084. end;
  112085. procedure TCAN2_C2FIFOINT12.setTXHALFIE; inline;
  112086. begin
  112087. pTDefRegMap(@Self)^.&set := $02000000;
  112088. end;
  112089. procedure TCAN2_C2FIFOINT12.clearTXHALFIE; inline;
  112090. begin
  112091. pTDefRegMap(@Self)^.clr := $02000000;
  112092. end;
  112093. procedure TCAN2_C2FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  112094. begin
  112095. if thebits = 0 then
  112096. pTDefRegMap(@Self)^.clr := $02000000
  112097. else
  112098. pTDefRegMap(@Self)^.&set := $02000000;
  112099. end;
  112100. function TCAN2_C2FIFOINT12.getTXHALFIE : TBits_1; inline;
  112101. begin
  112102. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  112103. end;
  112104. procedure TCAN2_C2FIFOINT12.setTXNFULLIE; inline;
  112105. begin
  112106. pTDefRegMap(@Self)^.&set := $04000000;
  112107. end;
  112108. procedure TCAN2_C2FIFOINT12.clearTXNFULLIE; inline;
  112109. begin
  112110. pTDefRegMap(@Self)^.clr := $04000000;
  112111. end;
  112112. procedure TCAN2_C2FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  112113. begin
  112114. if thebits = 0 then
  112115. pTDefRegMap(@Self)^.clr := $04000000
  112116. else
  112117. pTDefRegMap(@Self)^.&set := $04000000;
  112118. end;
  112119. function TCAN2_C2FIFOINT12.getTXNFULLIE : TBits_1; inline;
  112120. begin
  112121. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  112122. end;
  112123. procedure TCAN2_C2FIFOINT12.setw(thebits : TBits_32); inline;
  112124. begin
  112125. pTDefRegMap(@Self)^.val := thebits;
  112126. end;
  112127. function TCAN2_C2FIFOINT12.getw : TBits_32; inline;
  112128. begin
  112129. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112130. end;
  112131. procedure TCAN2_C2FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  112132. begin
  112133. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  112134. end;
  112135. function TCAN2_C2FIFOCI12.getCFIFOCI : TBits_5; inline;
  112136. begin
  112137. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  112138. end;
  112139. procedure TCAN2_C2FIFOCI12.setw(thebits : TBits_32); inline;
  112140. begin
  112141. pTDefRegMap(@Self)^.val := thebits;
  112142. end;
  112143. function TCAN2_C2FIFOCI12.getw : TBits_32; inline;
  112144. begin
  112145. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112146. end;
  112147. procedure TCAN2_C2FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  112148. begin
  112149. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  112150. end;
  112151. function TCAN2_C2FIFOCON13.getTXPRI : TBits_2; inline;
  112152. begin
  112153. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  112154. end;
  112155. procedure TCAN2_C2FIFOCON13.setRTREN; inline;
  112156. begin
  112157. pTDefRegMap(@Self)^.&set := $00000004;
  112158. end;
  112159. procedure TCAN2_C2FIFOCON13.clearRTREN; inline;
  112160. begin
  112161. pTDefRegMap(@Self)^.clr := $00000004;
  112162. end;
  112163. procedure TCAN2_C2FIFOCON13.setRTREN(thebits : TBits_1); inline;
  112164. begin
  112165. if thebits = 0 then
  112166. pTDefRegMap(@Self)^.clr := $00000004
  112167. else
  112168. pTDefRegMap(@Self)^.&set := $00000004;
  112169. end;
  112170. function TCAN2_C2FIFOCON13.getRTREN : TBits_1; inline;
  112171. begin
  112172. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112173. end;
  112174. procedure TCAN2_C2FIFOCON13.setTXREQ; inline;
  112175. begin
  112176. pTDefRegMap(@Self)^.&set := $00000008;
  112177. end;
  112178. procedure TCAN2_C2FIFOCON13.clearTXREQ; inline;
  112179. begin
  112180. pTDefRegMap(@Self)^.clr := $00000008;
  112181. end;
  112182. procedure TCAN2_C2FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  112183. begin
  112184. if thebits = 0 then
  112185. pTDefRegMap(@Self)^.clr := $00000008
  112186. else
  112187. pTDefRegMap(@Self)^.&set := $00000008;
  112188. end;
  112189. function TCAN2_C2FIFOCON13.getTXREQ : TBits_1; inline;
  112190. begin
  112191. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112192. end;
  112193. procedure TCAN2_C2FIFOCON13.setTXERR; inline;
  112194. begin
  112195. pTDefRegMap(@Self)^.&set := $00000010;
  112196. end;
  112197. procedure TCAN2_C2FIFOCON13.clearTXERR; inline;
  112198. begin
  112199. pTDefRegMap(@Self)^.clr := $00000010;
  112200. end;
  112201. procedure TCAN2_C2FIFOCON13.setTXERR(thebits : TBits_1); inline;
  112202. begin
  112203. if thebits = 0 then
  112204. pTDefRegMap(@Self)^.clr := $00000010
  112205. else
  112206. pTDefRegMap(@Self)^.&set := $00000010;
  112207. end;
  112208. function TCAN2_C2FIFOCON13.getTXERR : TBits_1; inline;
  112209. begin
  112210. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  112211. end;
  112212. procedure TCAN2_C2FIFOCON13.setTXLARB; inline;
  112213. begin
  112214. pTDefRegMap(@Self)^.&set := $00000020;
  112215. end;
  112216. procedure TCAN2_C2FIFOCON13.clearTXLARB; inline;
  112217. begin
  112218. pTDefRegMap(@Self)^.clr := $00000020;
  112219. end;
  112220. procedure TCAN2_C2FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  112221. begin
  112222. if thebits = 0 then
  112223. pTDefRegMap(@Self)^.clr := $00000020
  112224. else
  112225. pTDefRegMap(@Self)^.&set := $00000020;
  112226. end;
  112227. function TCAN2_C2FIFOCON13.getTXLARB : TBits_1; inline;
  112228. begin
  112229. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  112230. end;
  112231. procedure TCAN2_C2FIFOCON13.setTXABAT; inline;
  112232. begin
  112233. pTDefRegMap(@Self)^.&set := $00000040;
  112234. end;
  112235. procedure TCAN2_C2FIFOCON13.clearTXABAT; inline;
  112236. begin
  112237. pTDefRegMap(@Self)^.clr := $00000040;
  112238. end;
  112239. procedure TCAN2_C2FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  112240. begin
  112241. if thebits = 0 then
  112242. pTDefRegMap(@Self)^.clr := $00000040
  112243. else
  112244. pTDefRegMap(@Self)^.&set := $00000040;
  112245. end;
  112246. function TCAN2_C2FIFOCON13.getTXABAT : TBits_1; inline;
  112247. begin
  112248. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  112249. end;
  112250. procedure TCAN2_C2FIFOCON13.setTXEN; inline;
  112251. begin
  112252. pTDefRegMap(@Self)^.&set := $00000080;
  112253. end;
  112254. procedure TCAN2_C2FIFOCON13.clearTXEN; inline;
  112255. begin
  112256. pTDefRegMap(@Self)^.clr := $00000080;
  112257. end;
  112258. procedure TCAN2_C2FIFOCON13.setTXEN(thebits : TBits_1); inline;
  112259. begin
  112260. if thebits = 0 then
  112261. pTDefRegMap(@Self)^.clr := $00000080
  112262. else
  112263. pTDefRegMap(@Self)^.&set := $00000080;
  112264. end;
  112265. function TCAN2_C2FIFOCON13.getTXEN : TBits_1; inline;
  112266. begin
  112267. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  112268. end;
  112269. procedure TCAN2_C2FIFOCON13.setDONLY; inline;
  112270. begin
  112271. pTDefRegMap(@Self)^.&set := $00001000;
  112272. end;
  112273. procedure TCAN2_C2FIFOCON13.clearDONLY; inline;
  112274. begin
  112275. pTDefRegMap(@Self)^.clr := $00001000;
  112276. end;
  112277. procedure TCAN2_C2FIFOCON13.setDONLY(thebits : TBits_1); inline;
  112278. begin
  112279. if thebits = 0 then
  112280. pTDefRegMap(@Self)^.clr := $00001000
  112281. else
  112282. pTDefRegMap(@Self)^.&set := $00001000;
  112283. end;
  112284. function TCAN2_C2FIFOCON13.getDONLY : TBits_1; inline;
  112285. begin
  112286. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  112287. end;
  112288. procedure TCAN2_C2FIFOCON13.setUINC; inline;
  112289. begin
  112290. pTDefRegMap(@Self)^.&set := $00002000;
  112291. end;
  112292. procedure TCAN2_C2FIFOCON13.clearUINC; inline;
  112293. begin
  112294. pTDefRegMap(@Self)^.clr := $00002000;
  112295. end;
  112296. procedure TCAN2_C2FIFOCON13.setUINC(thebits : TBits_1); inline;
  112297. begin
  112298. if thebits = 0 then
  112299. pTDefRegMap(@Self)^.clr := $00002000
  112300. else
  112301. pTDefRegMap(@Self)^.&set := $00002000;
  112302. end;
  112303. function TCAN2_C2FIFOCON13.getUINC : TBits_1; inline;
  112304. begin
  112305. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  112306. end;
  112307. procedure TCAN2_C2FIFOCON13.setFRESET; inline;
  112308. begin
  112309. pTDefRegMap(@Self)^.&set := $00004000;
  112310. end;
  112311. procedure TCAN2_C2FIFOCON13.clearFRESET; inline;
  112312. begin
  112313. pTDefRegMap(@Self)^.clr := $00004000;
  112314. end;
  112315. procedure TCAN2_C2FIFOCON13.setFRESET(thebits : TBits_1); inline;
  112316. begin
  112317. if thebits = 0 then
  112318. pTDefRegMap(@Self)^.clr := $00004000
  112319. else
  112320. pTDefRegMap(@Self)^.&set := $00004000;
  112321. end;
  112322. function TCAN2_C2FIFOCON13.getFRESET : TBits_1; inline;
  112323. begin
  112324. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  112325. end;
  112326. procedure TCAN2_C2FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  112327. begin
  112328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  112329. end;
  112330. function TCAN2_C2FIFOCON13.getFSIZE : TBits_5; inline;
  112331. begin
  112332. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  112333. end;
  112334. procedure TCAN2_C2FIFOCON13.setw(thebits : TBits_32); inline;
  112335. begin
  112336. pTDefRegMap(@Self)^.val := thebits;
  112337. end;
  112338. function TCAN2_C2FIFOCON13.getw : TBits_32; inline;
  112339. begin
  112340. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112341. end;
  112342. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIF; inline;
  112343. begin
  112344. pTDefRegMap(@Self)^.&set := $00000001;
  112345. end;
  112346. procedure TCAN2_C2FIFOINT13.clearRXNEMPTYIF; inline;
  112347. begin
  112348. pTDefRegMap(@Self)^.clr := $00000001;
  112349. end;
  112350. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  112351. begin
  112352. if thebits = 0 then
  112353. pTDefRegMap(@Self)^.clr := $00000001
  112354. else
  112355. pTDefRegMap(@Self)^.&set := $00000001;
  112356. end;
  112357. function TCAN2_C2FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  112358. begin
  112359. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  112360. end;
  112361. procedure TCAN2_C2FIFOINT13.setRXHALFIF; inline;
  112362. begin
  112363. pTDefRegMap(@Self)^.&set := $00000002;
  112364. end;
  112365. procedure TCAN2_C2FIFOINT13.clearRXHALFIF; inline;
  112366. begin
  112367. pTDefRegMap(@Self)^.clr := $00000002;
  112368. end;
  112369. procedure TCAN2_C2FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  112370. begin
  112371. if thebits = 0 then
  112372. pTDefRegMap(@Self)^.clr := $00000002
  112373. else
  112374. pTDefRegMap(@Self)^.&set := $00000002;
  112375. end;
  112376. function TCAN2_C2FIFOINT13.getRXHALFIF : TBits_1; inline;
  112377. begin
  112378. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  112379. end;
  112380. procedure TCAN2_C2FIFOINT13.setRXFULLIF; inline;
  112381. begin
  112382. pTDefRegMap(@Self)^.&set := $00000004;
  112383. end;
  112384. procedure TCAN2_C2FIFOINT13.clearRXFULLIF; inline;
  112385. begin
  112386. pTDefRegMap(@Self)^.clr := $00000004;
  112387. end;
  112388. procedure TCAN2_C2FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  112389. begin
  112390. if thebits = 0 then
  112391. pTDefRegMap(@Self)^.clr := $00000004
  112392. else
  112393. pTDefRegMap(@Self)^.&set := $00000004;
  112394. end;
  112395. function TCAN2_C2FIFOINT13.getRXFULLIF : TBits_1; inline;
  112396. begin
  112397. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112398. end;
  112399. procedure TCAN2_C2FIFOINT13.setRXOVFLIF; inline;
  112400. begin
  112401. pTDefRegMap(@Self)^.&set := $00000008;
  112402. end;
  112403. procedure TCAN2_C2FIFOINT13.clearRXOVFLIF; inline;
  112404. begin
  112405. pTDefRegMap(@Self)^.clr := $00000008;
  112406. end;
  112407. procedure TCAN2_C2FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  112408. begin
  112409. if thebits = 0 then
  112410. pTDefRegMap(@Self)^.clr := $00000008
  112411. else
  112412. pTDefRegMap(@Self)^.&set := $00000008;
  112413. end;
  112414. function TCAN2_C2FIFOINT13.getRXOVFLIF : TBits_1; inline;
  112415. begin
  112416. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112417. end;
  112418. procedure TCAN2_C2FIFOINT13.setTXEMPTYIF; inline;
  112419. begin
  112420. pTDefRegMap(@Self)^.&set := $00000100;
  112421. end;
  112422. procedure TCAN2_C2FIFOINT13.clearTXEMPTYIF; inline;
  112423. begin
  112424. pTDefRegMap(@Self)^.clr := $00000100;
  112425. end;
  112426. procedure TCAN2_C2FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  112427. begin
  112428. if thebits = 0 then
  112429. pTDefRegMap(@Self)^.clr := $00000100
  112430. else
  112431. pTDefRegMap(@Self)^.&set := $00000100;
  112432. end;
  112433. function TCAN2_C2FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  112434. begin
  112435. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  112436. end;
  112437. procedure TCAN2_C2FIFOINT13.setTXHALFIF; inline;
  112438. begin
  112439. pTDefRegMap(@Self)^.&set := $00000200;
  112440. end;
  112441. procedure TCAN2_C2FIFOINT13.clearTXHALFIF; inline;
  112442. begin
  112443. pTDefRegMap(@Self)^.clr := $00000200;
  112444. end;
  112445. procedure TCAN2_C2FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  112446. begin
  112447. if thebits = 0 then
  112448. pTDefRegMap(@Self)^.clr := $00000200
  112449. else
  112450. pTDefRegMap(@Self)^.&set := $00000200;
  112451. end;
  112452. function TCAN2_C2FIFOINT13.getTXHALFIF : TBits_1; inline;
  112453. begin
  112454. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  112455. end;
  112456. procedure TCAN2_C2FIFOINT13.setTXNFULLIF; inline;
  112457. begin
  112458. pTDefRegMap(@Self)^.&set := $00000400;
  112459. end;
  112460. procedure TCAN2_C2FIFOINT13.clearTXNFULLIF; inline;
  112461. begin
  112462. pTDefRegMap(@Self)^.clr := $00000400;
  112463. end;
  112464. procedure TCAN2_C2FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  112465. begin
  112466. if thebits = 0 then
  112467. pTDefRegMap(@Self)^.clr := $00000400
  112468. else
  112469. pTDefRegMap(@Self)^.&set := $00000400;
  112470. end;
  112471. function TCAN2_C2FIFOINT13.getTXNFULLIF : TBits_1; inline;
  112472. begin
  112473. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  112474. end;
  112475. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIE; inline;
  112476. begin
  112477. pTDefRegMap(@Self)^.&set := $00010000;
  112478. end;
  112479. procedure TCAN2_C2FIFOINT13.clearRXNEMPTYIE; inline;
  112480. begin
  112481. pTDefRegMap(@Self)^.clr := $00010000;
  112482. end;
  112483. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  112484. begin
  112485. if thebits = 0 then
  112486. pTDefRegMap(@Self)^.clr := $00010000
  112487. else
  112488. pTDefRegMap(@Self)^.&set := $00010000;
  112489. end;
  112490. function TCAN2_C2FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  112491. begin
  112492. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  112493. end;
  112494. procedure TCAN2_C2FIFOINT13.setRXHALFIE; inline;
  112495. begin
  112496. pTDefRegMap(@Self)^.&set := $00020000;
  112497. end;
  112498. procedure TCAN2_C2FIFOINT13.clearRXHALFIE; inline;
  112499. begin
  112500. pTDefRegMap(@Self)^.clr := $00020000;
  112501. end;
  112502. procedure TCAN2_C2FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  112503. begin
  112504. if thebits = 0 then
  112505. pTDefRegMap(@Self)^.clr := $00020000
  112506. else
  112507. pTDefRegMap(@Self)^.&set := $00020000;
  112508. end;
  112509. function TCAN2_C2FIFOINT13.getRXHALFIE : TBits_1; inline;
  112510. begin
  112511. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  112512. end;
  112513. procedure TCAN2_C2FIFOINT13.setRXFULLIE; inline;
  112514. begin
  112515. pTDefRegMap(@Self)^.&set := $00040000;
  112516. end;
  112517. procedure TCAN2_C2FIFOINT13.clearRXFULLIE; inline;
  112518. begin
  112519. pTDefRegMap(@Self)^.clr := $00040000;
  112520. end;
  112521. procedure TCAN2_C2FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  112522. begin
  112523. if thebits = 0 then
  112524. pTDefRegMap(@Self)^.clr := $00040000
  112525. else
  112526. pTDefRegMap(@Self)^.&set := $00040000;
  112527. end;
  112528. function TCAN2_C2FIFOINT13.getRXFULLIE : TBits_1; inline;
  112529. begin
  112530. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  112531. end;
  112532. procedure TCAN2_C2FIFOINT13.setRXOVFLIE; inline;
  112533. begin
  112534. pTDefRegMap(@Self)^.&set := $00080000;
  112535. end;
  112536. procedure TCAN2_C2FIFOINT13.clearRXOVFLIE; inline;
  112537. begin
  112538. pTDefRegMap(@Self)^.clr := $00080000;
  112539. end;
  112540. procedure TCAN2_C2FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  112541. begin
  112542. if thebits = 0 then
  112543. pTDefRegMap(@Self)^.clr := $00080000
  112544. else
  112545. pTDefRegMap(@Self)^.&set := $00080000;
  112546. end;
  112547. function TCAN2_C2FIFOINT13.getRXOVFLIE : TBits_1; inline;
  112548. begin
  112549. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  112550. end;
  112551. procedure TCAN2_C2FIFOINT13.setTXEMPTYIE; inline;
  112552. begin
  112553. pTDefRegMap(@Self)^.&set := $01000000;
  112554. end;
  112555. procedure TCAN2_C2FIFOINT13.clearTXEMPTYIE; inline;
  112556. begin
  112557. pTDefRegMap(@Self)^.clr := $01000000;
  112558. end;
  112559. procedure TCAN2_C2FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  112560. begin
  112561. if thebits = 0 then
  112562. pTDefRegMap(@Self)^.clr := $01000000
  112563. else
  112564. pTDefRegMap(@Self)^.&set := $01000000;
  112565. end;
  112566. function TCAN2_C2FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  112567. begin
  112568. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  112569. end;
  112570. procedure TCAN2_C2FIFOINT13.setTXHALFIE; inline;
  112571. begin
  112572. pTDefRegMap(@Self)^.&set := $02000000;
  112573. end;
  112574. procedure TCAN2_C2FIFOINT13.clearTXHALFIE; inline;
  112575. begin
  112576. pTDefRegMap(@Self)^.clr := $02000000;
  112577. end;
  112578. procedure TCAN2_C2FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  112579. begin
  112580. if thebits = 0 then
  112581. pTDefRegMap(@Self)^.clr := $02000000
  112582. else
  112583. pTDefRegMap(@Self)^.&set := $02000000;
  112584. end;
  112585. function TCAN2_C2FIFOINT13.getTXHALFIE : TBits_1; inline;
  112586. begin
  112587. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  112588. end;
  112589. procedure TCAN2_C2FIFOINT13.setTXNFULLIE; inline;
  112590. begin
  112591. pTDefRegMap(@Self)^.&set := $04000000;
  112592. end;
  112593. procedure TCAN2_C2FIFOINT13.clearTXNFULLIE; inline;
  112594. begin
  112595. pTDefRegMap(@Self)^.clr := $04000000;
  112596. end;
  112597. procedure TCAN2_C2FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  112598. begin
  112599. if thebits = 0 then
  112600. pTDefRegMap(@Self)^.clr := $04000000
  112601. else
  112602. pTDefRegMap(@Self)^.&set := $04000000;
  112603. end;
  112604. function TCAN2_C2FIFOINT13.getTXNFULLIE : TBits_1; inline;
  112605. begin
  112606. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  112607. end;
  112608. procedure TCAN2_C2FIFOINT13.setw(thebits : TBits_32); inline;
  112609. begin
  112610. pTDefRegMap(@Self)^.val := thebits;
  112611. end;
  112612. function TCAN2_C2FIFOINT13.getw : TBits_32; inline;
  112613. begin
  112614. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112615. end;
  112616. procedure TCAN2_C2FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  112617. begin
  112618. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  112619. end;
  112620. function TCAN2_C2FIFOCI13.getCFIFOCI : TBits_5; inline;
  112621. begin
  112622. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  112623. end;
  112624. procedure TCAN2_C2FIFOCI13.setw(thebits : TBits_32); inline;
  112625. begin
  112626. pTDefRegMap(@Self)^.val := thebits;
  112627. end;
  112628. function TCAN2_C2FIFOCI13.getw : TBits_32; inline;
  112629. begin
  112630. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112631. end;
  112632. procedure TCAN2_C2FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  112633. begin
  112634. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  112635. end;
  112636. function TCAN2_C2FIFOCON14.getTXPRI : TBits_2; inline;
  112637. begin
  112638. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  112639. end;
  112640. procedure TCAN2_C2FIFOCON14.setRTREN; inline;
  112641. begin
  112642. pTDefRegMap(@Self)^.&set := $00000004;
  112643. end;
  112644. procedure TCAN2_C2FIFOCON14.clearRTREN; inline;
  112645. begin
  112646. pTDefRegMap(@Self)^.clr := $00000004;
  112647. end;
  112648. procedure TCAN2_C2FIFOCON14.setRTREN(thebits : TBits_1); inline;
  112649. begin
  112650. if thebits = 0 then
  112651. pTDefRegMap(@Self)^.clr := $00000004
  112652. else
  112653. pTDefRegMap(@Self)^.&set := $00000004;
  112654. end;
  112655. function TCAN2_C2FIFOCON14.getRTREN : TBits_1; inline;
  112656. begin
  112657. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112658. end;
  112659. procedure TCAN2_C2FIFOCON14.setTXREQ; inline;
  112660. begin
  112661. pTDefRegMap(@Self)^.&set := $00000008;
  112662. end;
  112663. procedure TCAN2_C2FIFOCON14.clearTXREQ; inline;
  112664. begin
  112665. pTDefRegMap(@Self)^.clr := $00000008;
  112666. end;
  112667. procedure TCAN2_C2FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  112668. begin
  112669. if thebits = 0 then
  112670. pTDefRegMap(@Self)^.clr := $00000008
  112671. else
  112672. pTDefRegMap(@Self)^.&set := $00000008;
  112673. end;
  112674. function TCAN2_C2FIFOCON14.getTXREQ : TBits_1; inline;
  112675. begin
  112676. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112677. end;
  112678. procedure TCAN2_C2FIFOCON14.setTXERR; inline;
  112679. begin
  112680. pTDefRegMap(@Self)^.&set := $00000010;
  112681. end;
  112682. procedure TCAN2_C2FIFOCON14.clearTXERR; inline;
  112683. begin
  112684. pTDefRegMap(@Self)^.clr := $00000010;
  112685. end;
  112686. procedure TCAN2_C2FIFOCON14.setTXERR(thebits : TBits_1); inline;
  112687. begin
  112688. if thebits = 0 then
  112689. pTDefRegMap(@Self)^.clr := $00000010
  112690. else
  112691. pTDefRegMap(@Self)^.&set := $00000010;
  112692. end;
  112693. function TCAN2_C2FIFOCON14.getTXERR : TBits_1; inline;
  112694. begin
  112695. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  112696. end;
  112697. procedure TCAN2_C2FIFOCON14.setTXLARB; inline;
  112698. begin
  112699. pTDefRegMap(@Self)^.&set := $00000020;
  112700. end;
  112701. procedure TCAN2_C2FIFOCON14.clearTXLARB; inline;
  112702. begin
  112703. pTDefRegMap(@Self)^.clr := $00000020;
  112704. end;
  112705. procedure TCAN2_C2FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  112706. begin
  112707. if thebits = 0 then
  112708. pTDefRegMap(@Self)^.clr := $00000020
  112709. else
  112710. pTDefRegMap(@Self)^.&set := $00000020;
  112711. end;
  112712. function TCAN2_C2FIFOCON14.getTXLARB : TBits_1; inline;
  112713. begin
  112714. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  112715. end;
  112716. procedure TCAN2_C2FIFOCON14.setTXABAT; inline;
  112717. begin
  112718. pTDefRegMap(@Self)^.&set := $00000040;
  112719. end;
  112720. procedure TCAN2_C2FIFOCON14.clearTXABAT; inline;
  112721. begin
  112722. pTDefRegMap(@Self)^.clr := $00000040;
  112723. end;
  112724. procedure TCAN2_C2FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  112725. begin
  112726. if thebits = 0 then
  112727. pTDefRegMap(@Self)^.clr := $00000040
  112728. else
  112729. pTDefRegMap(@Self)^.&set := $00000040;
  112730. end;
  112731. function TCAN2_C2FIFOCON14.getTXABAT : TBits_1; inline;
  112732. begin
  112733. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  112734. end;
  112735. procedure TCAN2_C2FIFOCON14.setTXEN; inline;
  112736. begin
  112737. pTDefRegMap(@Self)^.&set := $00000080;
  112738. end;
  112739. procedure TCAN2_C2FIFOCON14.clearTXEN; inline;
  112740. begin
  112741. pTDefRegMap(@Self)^.clr := $00000080;
  112742. end;
  112743. procedure TCAN2_C2FIFOCON14.setTXEN(thebits : TBits_1); inline;
  112744. begin
  112745. if thebits = 0 then
  112746. pTDefRegMap(@Self)^.clr := $00000080
  112747. else
  112748. pTDefRegMap(@Self)^.&set := $00000080;
  112749. end;
  112750. function TCAN2_C2FIFOCON14.getTXEN : TBits_1; inline;
  112751. begin
  112752. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  112753. end;
  112754. procedure TCAN2_C2FIFOCON14.setDONLY; inline;
  112755. begin
  112756. pTDefRegMap(@Self)^.&set := $00001000;
  112757. end;
  112758. procedure TCAN2_C2FIFOCON14.clearDONLY; inline;
  112759. begin
  112760. pTDefRegMap(@Self)^.clr := $00001000;
  112761. end;
  112762. procedure TCAN2_C2FIFOCON14.setDONLY(thebits : TBits_1); inline;
  112763. begin
  112764. if thebits = 0 then
  112765. pTDefRegMap(@Self)^.clr := $00001000
  112766. else
  112767. pTDefRegMap(@Self)^.&set := $00001000;
  112768. end;
  112769. function TCAN2_C2FIFOCON14.getDONLY : TBits_1; inline;
  112770. begin
  112771. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  112772. end;
  112773. procedure TCAN2_C2FIFOCON14.setUINC; inline;
  112774. begin
  112775. pTDefRegMap(@Self)^.&set := $00002000;
  112776. end;
  112777. procedure TCAN2_C2FIFOCON14.clearUINC; inline;
  112778. begin
  112779. pTDefRegMap(@Self)^.clr := $00002000;
  112780. end;
  112781. procedure TCAN2_C2FIFOCON14.setUINC(thebits : TBits_1); inline;
  112782. begin
  112783. if thebits = 0 then
  112784. pTDefRegMap(@Self)^.clr := $00002000
  112785. else
  112786. pTDefRegMap(@Self)^.&set := $00002000;
  112787. end;
  112788. function TCAN2_C2FIFOCON14.getUINC : TBits_1; inline;
  112789. begin
  112790. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  112791. end;
  112792. procedure TCAN2_C2FIFOCON14.setFRESET; inline;
  112793. begin
  112794. pTDefRegMap(@Self)^.&set := $00004000;
  112795. end;
  112796. procedure TCAN2_C2FIFOCON14.clearFRESET; inline;
  112797. begin
  112798. pTDefRegMap(@Self)^.clr := $00004000;
  112799. end;
  112800. procedure TCAN2_C2FIFOCON14.setFRESET(thebits : TBits_1); inline;
  112801. begin
  112802. if thebits = 0 then
  112803. pTDefRegMap(@Self)^.clr := $00004000
  112804. else
  112805. pTDefRegMap(@Self)^.&set := $00004000;
  112806. end;
  112807. function TCAN2_C2FIFOCON14.getFRESET : TBits_1; inline;
  112808. begin
  112809. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  112810. end;
  112811. procedure TCAN2_C2FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  112812. begin
  112813. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  112814. end;
  112815. function TCAN2_C2FIFOCON14.getFSIZE : TBits_5; inline;
  112816. begin
  112817. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  112818. end;
  112819. procedure TCAN2_C2FIFOCON14.setw(thebits : TBits_32); inline;
  112820. begin
  112821. pTDefRegMap(@Self)^.val := thebits;
  112822. end;
  112823. function TCAN2_C2FIFOCON14.getw : TBits_32; inline;
  112824. begin
  112825. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112826. end;
  112827. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIF; inline;
  112828. begin
  112829. pTDefRegMap(@Self)^.&set := $00000001;
  112830. end;
  112831. procedure TCAN2_C2FIFOINT14.clearRXNEMPTYIF; inline;
  112832. begin
  112833. pTDefRegMap(@Self)^.clr := $00000001;
  112834. end;
  112835. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  112836. begin
  112837. if thebits = 0 then
  112838. pTDefRegMap(@Self)^.clr := $00000001
  112839. else
  112840. pTDefRegMap(@Self)^.&set := $00000001;
  112841. end;
  112842. function TCAN2_C2FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  112843. begin
  112844. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  112845. end;
  112846. procedure TCAN2_C2FIFOINT14.setRXHALFIF; inline;
  112847. begin
  112848. pTDefRegMap(@Self)^.&set := $00000002;
  112849. end;
  112850. procedure TCAN2_C2FIFOINT14.clearRXHALFIF; inline;
  112851. begin
  112852. pTDefRegMap(@Self)^.clr := $00000002;
  112853. end;
  112854. procedure TCAN2_C2FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  112855. begin
  112856. if thebits = 0 then
  112857. pTDefRegMap(@Self)^.clr := $00000002
  112858. else
  112859. pTDefRegMap(@Self)^.&set := $00000002;
  112860. end;
  112861. function TCAN2_C2FIFOINT14.getRXHALFIF : TBits_1; inline;
  112862. begin
  112863. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  112864. end;
  112865. procedure TCAN2_C2FIFOINT14.setRXFULLIF; inline;
  112866. begin
  112867. pTDefRegMap(@Self)^.&set := $00000004;
  112868. end;
  112869. procedure TCAN2_C2FIFOINT14.clearRXFULLIF; inline;
  112870. begin
  112871. pTDefRegMap(@Self)^.clr := $00000004;
  112872. end;
  112873. procedure TCAN2_C2FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  112874. begin
  112875. if thebits = 0 then
  112876. pTDefRegMap(@Self)^.clr := $00000004
  112877. else
  112878. pTDefRegMap(@Self)^.&set := $00000004;
  112879. end;
  112880. function TCAN2_C2FIFOINT14.getRXFULLIF : TBits_1; inline;
  112881. begin
  112882. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112883. end;
  112884. procedure TCAN2_C2FIFOINT14.setRXOVFLIF; inline;
  112885. begin
  112886. pTDefRegMap(@Self)^.&set := $00000008;
  112887. end;
  112888. procedure TCAN2_C2FIFOINT14.clearRXOVFLIF; inline;
  112889. begin
  112890. pTDefRegMap(@Self)^.clr := $00000008;
  112891. end;
  112892. procedure TCAN2_C2FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  112893. begin
  112894. if thebits = 0 then
  112895. pTDefRegMap(@Self)^.clr := $00000008
  112896. else
  112897. pTDefRegMap(@Self)^.&set := $00000008;
  112898. end;
  112899. function TCAN2_C2FIFOINT14.getRXOVFLIF : TBits_1; inline;
  112900. begin
  112901. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112902. end;
  112903. procedure TCAN2_C2FIFOINT14.setTXEMPTYIF; inline;
  112904. begin
  112905. pTDefRegMap(@Self)^.&set := $00000100;
  112906. end;
  112907. procedure TCAN2_C2FIFOINT14.clearTXEMPTYIF; inline;
  112908. begin
  112909. pTDefRegMap(@Self)^.clr := $00000100;
  112910. end;
  112911. procedure TCAN2_C2FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  112912. begin
  112913. if thebits = 0 then
  112914. pTDefRegMap(@Self)^.clr := $00000100
  112915. else
  112916. pTDefRegMap(@Self)^.&set := $00000100;
  112917. end;
  112918. function TCAN2_C2FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  112919. begin
  112920. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  112921. end;
  112922. procedure TCAN2_C2FIFOINT14.setTXHALFIF; inline;
  112923. begin
  112924. pTDefRegMap(@Self)^.&set := $00000200;
  112925. end;
  112926. procedure TCAN2_C2FIFOINT14.clearTXHALFIF; inline;
  112927. begin
  112928. pTDefRegMap(@Self)^.clr := $00000200;
  112929. end;
  112930. procedure TCAN2_C2FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  112931. begin
  112932. if thebits = 0 then
  112933. pTDefRegMap(@Self)^.clr := $00000200
  112934. else
  112935. pTDefRegMap(@Self)^.&set := $00000200;
  112936. end;
  112937. function TCAN2_C2FIFOINT14.getTXHALFIF : TBits_1; inline;
  112938. begin
  112939. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  112940. end;
  112941. procedure TCAN2_C2FIFOINT14.setTXNFULLIF; inline;
  112942. begin
  112943. pTDefRegMap(@Self)^.&set := $00000400;
  112944. end;
  112945. procedure TCAN2_C2FIFOINT14.clearTXNFULLIF; inline;
  112946. begin
  112947. pTDefRegMap(@Self)^.clr := $00000400;
  112948. end;
  112949. procedure TCAN2_C2FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  112950. begin
  112951. if thebits = 0 then
  112952. pTDefRegMap(@Self)^.clr := $00000400
  112953. else
  112954. pTDefRegMap(@Self)^.&set := $00000400;
  112955. end;
  112956. function TCAN2_C2FIFOINT14.getTXNFULLIF : TBits_1; inline;
  112957. begin
  112958. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  112959. end;
  112960. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIE; inline;
  112961. begin
  112962. pTDefRegMap(@Self)^.&set := $00010000;
  112963. end;
  112964. procedure TCAN2_C2FIFOINT14.clearRXNEMPTYIE; inline;
  112965. begin
  112966. pTDefRegMap(@Self)^.clr := $00010000;
  112967. end;
  112968. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  112969. begin
  112970. if thebits = 0 then
  112971. pTDefRegMap(@Self)^.clr := $00010000
  112972. else
  112973. pTDefRegMap(@Self)^.&set := $00010000;
  112974. end;
  112975. function TCAN2_C2FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  112976. begin
  112977. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  112978. end;
  112979. procedure TCAN2_C2FIFOINT14.setRXHALFIE; inline;
  112980. begin
  112981. pTDefRegMap(@Self)^.&set := $00020000;
  112982. end;
  112983. procedure TCAN2_C2FIFOINT14.clearRXHALFIE; inline;
  112984. begin
  112985. pTDefRegMap(@Self)^.clr := $00020000;
  112986. end;
  112987. procedure TCAN2_C2FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  112988. begin
  112989. if thebits = 0 then
  112990. pTDefRegMap(@Self)^.clr := $00020000
  112991. else
  112992. pTDefRegMap(@Self)^.&set := $00020000;
  112993. end;
  112994. function TCAN2_C2FIFOINT14.getRXHALFIE : TBits_1; inline;
  112995. begin
  112996. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  112997. end;
  112998. procedure TCAN2_C2FIFOINT14.setRXFULLIE; inline;
  112999. begin
  113000. pTDefRegMap(@Self)^.&set := $00040000;
  113001. end;
  113002. procedure TCAN2_C2FIFOINT14.clearRXFULLIE; inline;
  113003. begin
  113004. pTDefRegMap(@Self)^.clr := $00040000;
  113005. end;
  113006. procedure TCAN2_C2FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  113007. begin
  113008. if thebits = 0 then
  113009. pTDefRegMap(@Self)^.clr := $00040000
  113010. else
  113011. pTDefRegMap(@Self)^.&set := $00040000;
  113012. end;
  113013. function TCAN2_C2FIFOINT14.getRXFULLIE : TBits_1; inline;
  113014. begin
  113015. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  113016. end;
  113017. procedure TCAN2_C2FIFOINT14.setRXOVFLIE; inline;
  113018. begin
  113019. pTDefRegMap(@Self)^.&set := $00080000;
  113020. end;
  113021. procedure TCAN2_C2FIFOINT14.clearRXOVFLIE; inline;
  113022. begin
  113023. pTDefRegMap(@Self)^.clr := $00080000;
  113024. end;
  113025. procedure TCAN2_C2FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  113026. begin
  113027. if thebits = 0 then
  113028. pTDefRegMap(@Self)^.clr := $00080000
  113029. else
  113030. pTDefRegMap(@Self)^.&set := $00080000;
  113031. end;
  113032. function TCAN2_C2FIFOINT14.getRXOVFLIE : TBits_1; inline;
  113033. begin
  113034. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  113035. end;
  113036. procedure TCAN2_C2FIFOINT14.setTXEMPTYIE; inline;
  113037. begin
  113038. pTDefRegMap(@Self)^.&set := $01000000;
  113039. end;
  113040. procedure TCAN2_C2FIFOINT14.clearTXEMPTYIE; inline;
  113041. begin
  113042. pTDefRegMap(@Self)^.clr := $01000000;
  113043. end;
  113044. procedure TCAN2_C2FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  113045. begin
  113046. if thebits = 0 then
  113047. pTDefRegMap(@Self)^.clr := $01000000
  113048. else
  113049. pTDefRegMap(@Self)^.&set := $01000000;
  113050. end;
  113051. function TCAN2_C2FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  113052. begin
  113053. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  113054. end;
  113055. procedure TCAN2_C2FIFOINT14.setTXHALFIE; inline;
  113056. begin
  113057. pTDefRegMap(@Self)^.&set := $02000000;
  113058. end;
  113059. procedure TCAN2_C2FIFOINT14.clearTXHALFIE; inline;
  113060. begin
  113061. pTDefRegMap(@Self)^.clr := $02000000;
  113062. end;
  113063. procedure TCAN2_C2FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  113064. begin
  113065. if thebits = 0 then
  113066. pTDefRegMap(@Self)^.clr := $02000000
  113067. else
  113068. pTDefRegMap(@Self)^.&set := $02000000;
  113069. end;
  113070. function TCAN2_C2FIFOINT14.getTXHALFIE : TBits_1; inline;
  113071. begin
  113072. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  113073. end;
  113074. procedure TCAN2_C2FIFOINT14.setTXNFULLIE; inline;
  113075. begin
  113076. pTDefRegMap(@Self)^.&set := $04000000;
  113077. end;
  113078. procedure TCAN2_C2FIFOINT14.clearTXNFULLIE; inline;
  113079. begin
  113080. pTDefRegMap(@Self)^.clr := $04000000;
  113081. end;
  113082. procedure TCAN2_C2FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  113083. begin
  113084. if thebits = 0 then
  113085. pTDefRegMap(@Self)^.clr := $04000000
  113086. else
  113087. pTDefRegMap(@Self)^.&set := $04000000;
  113088. end;
  113089. function TCAN2_C2FIFOINT14.getTXNFULLIE : TBits_1; inline;
  113090. begin
  113091. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  113092. end;
  113093. procedure TCAN2_C2FIFOINT14.setw(thebits : TBits_32); inline;
  113094. begin
  113095. pTDefRegMap(@Self)^.val := thebits;
  113096. end;
  113097. function TCAN2_C2FIFOINT14.getw : TBits_32; inline;
  113098. begin
  113099. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113100. end;
  113101. procedure TCAN2_C2FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  113102. begin
  113103. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  113104. end;
  113105. function TCAN2_C2FIFOCI14.getCFIFOCI : TBits_5; inline;
  113106. begin
  113107. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  113108. end;
  113109. procedure TCAN2_C2FIFOCI14.setw(thebits : TBits_32); inline;
  113110. begin
  113111. pTDefRegMap(@Self)^.val := thebits;
  113112. end;
  113113. function TCAN2_C2FIFOCI14.getw : TBits_32; inline;
  113114. begin
  113115. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113116. end;
  113117. procedure TCAN2_C2FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  113118. begin
  113119. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  113120. end;
  113121. function TCAN2_C2FIFOCON15.getTXPRI : TBits_2; inline;
  113122. begin
  113123. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  113124. end;
  113125. procedure TCAN2_C2FIFOCON15.setRTREN; inline;
  113126. begin
  113127. pTDefRegMap(@Self)^.&set := $00000004;
  113128. end;
  113129. procedure TCAN2_C2FIFOCON15.clearRTREN; inline;
  113130. begin
  113131. pTDefRegMap(@Self)^.clr := $00000004;
  113132. end;
  113133. procedure TCAN2_C2FIFOCON15.setRTREN(thebits : TBits_1); inline;
  113134. begin
  113135. if thebits = 0 then
  113136. pTDefRegMap(@Self)^.clr := $00000004
  113137. else
  113138. pTDefRegMap(@Self)^.&set := $00000004;
  113139. end;
  113140. function TCAN2_C2FIFOCON15.getRTREN : TBits_1; inline;
  113141. begin
  113142. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113143. end;
  113144. procedure TCAN2_C2FIFOCON15.setTXREQ; inline;
  113145. begin
  113146. pTDefRegMap(@Self)^.&set := $00000008;
  113147. end;
  113148. procedure TCAN2_C2FIFOCON15.clearTXREQ; inline;
  113149. begin
  113150. pTDefRegMap(@Self)^.clr := $00000008;
  113151. end;
  113152. procedure TCAN2_C2FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  113153. begin
  113154. if thebits = 0 then
  113155. pTDefRegMap(@Self)^.clr := $00000008
  113156. else
  113157. pTDefRegMap(@Self)^.&set := $00000008;
  113158. end;
  113159. function TCAN2_C2FIFOCON15.getTXREQ : TBits_1; inline;
  113160. begin
  113161. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113162. end;
  113163. procedure TCAN2_C2FIFOCON15.setTXERR; inline;
  113164. begin
  113165. pTDefRegMap(@Self)^.&set := $00000010;
  113166. end;
  113167. procedure TCAN2_C2FIFOCON15.clearTXERR; inline;
  113168. begin
  113169. pTDefRegMap(@Self)^.clr := $00000010;
  113170. end;
  113171. procedure TCAN2_C2FIFOCON15.setTXERR(thebits : TBits_1); inline;
  113172. begin
  113173. if thebits = 0 then
  113174. pTDefRegMap(@Self)^.clr := $00000010
  113175. else
  113176. pTDefRegMap(@Self)^.&set := $00000010;
  113177. end;
  113178. function TCAN2_C2FIFOCON15.getTXERR : TBits_1; inline;
  113179. begin
  113180. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  113181. end;
  113182. procedure TCAN2_C2FIFOCON15.setTXLARB; inline;
  113183. begin
  113184. pTDefRegMap(@Self)^.&set := $00000020;
  113185. end;
  113186. procedure TCAN2_C2FIFOCON15.clearTXLARB; inline;
  113187. begin
  113188. pTDefRegMap(@Self)^.clr := $00000020;
  113189. end;
  113190. procedure TCAN2_C2FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  113191. begin
  113192. if thebits = 0 then
  113193. pTDefRegMap(@Self)^.clr := $00000020
  113194. else
  113195. pTDefRegMap(@Self)^.&set := $00000020;
  113196. end;
  113197. function TCAN2_C2FIFOCON15.getTXLARB : TBits_1; inline;
  113198. begin
  113199. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  113200. end;
  113201. procedure TCAN2_C2FIFOCON15.setTXABAT; inline;
  113202. begin
  113203. pTDefRegMap(@Self)^.&set := $00000040;
  113204. end;
  113205. procedure TCAN2_C2FIFOCON15.clearTXABAT; inline;
  113206. begin
  113207. pTDefRegMap(@Self)^.clr := $00000040;
  113208. end;
  113209. procedure TCAN2_C2FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  113210. begin
  113211. if thebits = 0 then
  113212. pTDefRegMap(@Self)^.clr := $00000040
  113213. else
  113214. pTDefRegMap(@Self)^.&set := $00000040;
  113215. end;
  113216. function TCAN2_C2FIFOCON15.getTXABAT : TBits_1; inline;
  113217. begin
  113218. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  113219. end;
  113220. procedure TCAN2_C2FIFOCON15.setTXEN; inline;
  113221. begin
  113222. pTDefRegMap(@Self)^.&set := $00000080;
  113223. end;
  113224. procedure TCAN2_C2FIFOCON15.clearTXEN; inline;
  113225. begin
  113226. pTDefRegMap(@Self)^.clr := $00000080;
  113227. end;
  113228. procedure TCAN2_C2FIFOCON15.setTXEN(thebits : TBits_1); inline;
  113229. begin
  113230. if thebits = 0 then
  113231. pTDefRegMap(@Self)^.clr := $00000080
  113232. else
  113233. pTDefRegMap(@Self)^.&set := $00000080;
  113234. end;
  113235. function TCAN2_C2FIFOCON15.getTXEN : TBits_1; inline;
  113236. begin
  113237. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  113238. end;
  113239. procedure TCAN2_C2FIFOCON15.setDONLY; inline;
  113240. begin
  113241. pTDefRegMap(@Self)^.&set := $00001000;
  113242. end;
  113243. procedure TCAN2_C2FIFOCON15.clearDONLY; inline;
  113244. begin
  113245. pTDefRegMap(@Self)^.clr := $00001000;
  113246. end;
  113247. procedure TCAN2_C2FIFOCON15.setDONLY(thebits : TBits_1); inline;
  113248. begin
  113249. if thebits = 0 then
  113250. pTDefRegMap(@Self)^.clr := $00001000
  113251. else
  113252. pTDefRegMap(@Self)^.&set := $00001000;
  113253. end;
  113254. function TCAN2_C2FIFOCON15.getDONLY : TBits_1; inline;
  113255. begin
  113256. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  113257. end;
  113258. procedure TCAN2_C2FIFOCON15.setUINC; inline;
  113259. begin
  113260. pTDefRegMap(@Self)^.&set := $00002000;
  113261. end;
  113262. procedure TCAN2_C2FIFOCON15.clearUINC; inline;
  113263. begin
  113264. pTDefRegMap(@Self)^.clr := $00002000;
  113265. end;
  113266. procedure TCAN2_C2FIFOCON15.setUINC(thebits : TBits_1); inline;
  113267. begin
  113268. if thebits = 0 then
  113269. pTDefRegMap(@Self)^.clr := $00002000
  113270. else
  113271. pTDefRegMap(@Self)^.&set := $00002000;
  113272. end;
  113273. function TCAN2_C2FIFOCON15.getUINC : TBits_1; inline;
  113274. begin
  113275. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  113276. end;
  113277. procedure TCAN2_C2FIFOCON15.setFRESET; inline;
  113278. begin
  113279. pTDefRegMap(@Self)^.&set := $00004000;
  113280. end;
  113281. procedure TCAN2_C2FIFOCON15.clearFRESET; inline;
  113282. begin
  113283. pTDefRegMap(@Self)^.clr := $00004000;
  113284. end;
  113285. procedure TCAN2_C2FIFOCON15.setFRESET(thebits : TBits_1); inline;
  113286. begin
  113287. if thebits = 0 then
  113288. pTDefRegMap(@Self)^.clr := $00004000
  113289. else
  113290. pTDefRegMap(@Self)^.&set := $00004000;
  113291. end;
  113292. function TCAN2_C2FIFOCON15.getFRESET : TBits_1; inline;
  113293. begin
  113294. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  113295. end;
  113296. procedure TCAN2_C2FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  113297. begin
  113298. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  113299. end;
  113300. function TCAN2_C2FIFOCON15.getFSIZE : TBits_5; inline;
  113301. begin
  113302. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  113303. end;
  113304. procedure TCAN2_C2FIFOCON15.setw(thebits : TBits_32); inline;
  113305. begin
  113306. pTDefRegMap(@Self)^.val := thebits;
  113307. end;
  113308. function TCAN2_C2FIFOCON15.getw : TBits_32; inline;
  113309. begin
  113310. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113311. end;
  113312. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIF; inline;
  113313. begin
  113314. pTDefRegMap(@Self)^.&set := $00000001;
  113315. end;
  113316. procedure TCAN2_C2FIFOINT15.clearRXNEMPTYIF; inline;
  113317. begin
  113318. pTDefRegMap(@Self)^.clr := $00000001;
  113319. end;
  113320. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  113321. begin
  113322. if thebits = 0 then
  113323. pTDefRegMap(@Self)^.clr := $00000001
  113324. else
  113325. pTDefRegMap(@Self)^.&set := $00000001;
  113326. end;
  113327. function TCAN2_C2FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  113328. begin
  113329. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  113330. end;
  113331. procedure TCAN2_C2FIFOINT15.setRXHALFIF; inline;
  113332. begin
  113333. pTDefRegMap(@Self)^.&set := $00000002;
  113334. end;
  113335. procedure TCAN2_C2FIFOINT15.clearRXHALFIF; inline;
  113336. begin
  113337. pTDefRegMap(@Self)^.clr := $00000002;
  113338. end;
  113339. procedure TCAN2_C2FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  113340. begin
  113341. if thebits = 0 then
  113342. pTDefRegMap(@Self)^.clr := $00000002
  113343. else
  113344. pTDefRegMap(@Self)^.&set := $00000002;
  113345. end;
  113346. function TCAN2_C2FIFOINT15.getRXHALFIF : TBits_1; inline;
  113347. begin
  113348. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  113349. end;
  113350. procedure TCAN2_C2FIFOINT15.setRXFULLIF; inline;
  113351. begin
  113352. pTDefRegMap(@Self)^.&set := $00000004;
  113353. end;
  113354. procedure TCAN2_C2FIFOINT15.clearRXFULLIF; inline;
  113355. begin
  113356. pTDefRegMap(@Self)^.clr := $00000004;
  113357. end;
  113358. procedure TCAN2_C2FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  113359. begin
  113360. if thebits = 0 then
  113361. pTDefRegMap(@Self)^.clr := $00000004
  113362. else
  113363. pTDefRegMap(@Self)^.&set := $00000004;
  113364. end;
  113365. function TCAN2_C2FIFOINT15.getRXFULLIF : TBits_1; inline;
  113366. begin
  113367. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113368. end;
  113369. procedure TCAN2_C2FIFOINT15.setRXOVFLIF; inline;
  113370. begin
  113371. pTDefRegMap(@Self)^.&set := $00000008;
  113372. end;
  113373. procedure TCAN2_C2FIFOINT15.clearRXOVFLIF; inline;
  113374. begin
  113375. pTDefRegMap(@Self)^.clr := $00000008;
  113376. end;
  113377. procedure TCAN2_C2FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  113378. begin
  113379. if thebits = 0 then
  113380. pTDefRegMap(@Self)^.clr := $00000008
  113381. else
  113382. pTDefRegMap(@Self)^.&set := $00000008;
  113383. end;
  113384. function TCAN2_C2FIFOINT15.getRXOVFLIF : TBits_1; inline;
  113385. begin
  113386. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113387. end;
  113388. procedure TCAN2_C2FIFOINT15.setTXEMPTYIF; inline;
  113389. begin
  113390. pTDefRegMap(@Self)^.&set := $00000100;
  113391. end;
  113392. procedure TCAN2_C2FIFOINT15.clearTXEMPTYIF; inline;
  113393. begin
  113394. pTDefRegMap(@Self)^.clr := $00000100;
  113395. end;
  113396. procedure TCAN2_C2FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  113397. begin
  113398. if thebits = 0 then
  113399. pTDefRegMap(@Self)^.clr := $00000100
  113400. else
  113401. pTDefRegMap(@Self)^.&set := $00000100;
  113402. end;
  113403. function TCAN2_C2FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  113404. begin
  113405. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  113406. end;
  113407. procedure TCAN2_C2FIFOINT15.setTXHALFIF; inline;
  113408. begin
  113409. pTDefRegMap(@Self)^.&set := $00000200;
  113410. end;
  113411. procedure TCAN2_C2FIFOINT15.clearTXHALFIF; inline;
  113412. begin
  113413. pTDefRegMap(@Self)^.clr := $00000200;
  113414. end;
  113415. procedure TCAN2_C2FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  113416. begin
  113417. if thebits = 0 then
  113418. pTDefRegMap(@Self)^.clr := $00000200
  113419. else
  113420. pTDefRegMap(@Self)^.&set := $00000200;
  113421. end;
  113422. function TCAN2_C2FIFOINT15.getTXHALFIF : TBits_1; inline;
  113423. begin
  113424. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  113425. end;
  113426. procedure TCAN2_C2FIFOINT15.setTXNFULLIF; inline;
  113427. begin
  113428. pTDefRegMap(@Self)^.&set := $00000400;
  113429. end;
  113430. procedure TCAN2_C2FIFOINT15.clearTXNFULLIF; inline;
  113431. begin
  113432. pTDefRegMap(@Self)^.clr := $00000400;
  113433. end;
  113434. procedure TCAN2_C2FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  113435. begin
  113436. if thebits = 0 then
  113437. pTDefRegMap(@Self)^.clr := $00000400
  113438. else
  113439. pTDefRegMap(@Self)^.&set := $00000400;
  113440. end;
  113441. function TCAN2_C2FIFOINT15.getTXNFULLIF : TBits_1; inline;
  113442. begin
  113443. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  113444. end;
  113445. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIE; inline;
  113446. begin
  113447. pTDefRegMap(@Self)^.&set := $00010000;
  113448. end;
  113449. procedure TCAN2_C2FIFOINT15.clearRXNEMPTYIE; inline;
  113450. begin
  113451. pTDefRegMap(@Self)^.clr := $00010000;
  113452. end;
  113453. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  113454. begin
  113455. if thebits = 0 then
  113456. pTDefRegMap(@Self)^.clr := $00010000
  113457. else
  113458. pTDefRegMap(@Self)^.&set := $00010000;
  113459. end;
  113460. function TCAN2_C2FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  113461. begin
  113462. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  113463. end;
  113464. procedure TCAN2_C2FIFOINT15.setRXHALFIE; inline;
  113465. begin
  113466. pTDefRegMap(@Self)^.&set := $00020000;
  113467. end;
  113468. procedure TCAN2_C2FIFOINT15.clearRXHALFIE; inline;
  113469. begin
  113470. pTDefRegMap(@Self)^.clr := $00020000;
  113471. end;
  113472. procedure TCAN2_C2FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  113473. begin
  113474. if thebits = 0 then
  113475. pTDefRegMap(@Self)^.clr := $00020000
  113476. else
  113477. pTDefRegMap(@Self)^.&set := $00020000;
  113478. end;
  113479. function TCAN2_C2FIFOINT15.getRXHALFIE : TBits_1; inline;
  113480. begin
  113481. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  113482. end;
  113483. procedure TCAN2_C2FIFOINT15.setRXFULLIE; inline;
  113484. begin
  113485. pTDefRegMap(@Self)^.&set := $00040000;
  113486. end;
  113487. procedure TCAN2_C2FIFOINT15.clearRXFULLIE; inline;
  113488. begin
  113489. pTDefRegMap(@Self)^.clr := $00040000;
  113490. end;
  113491. procedure TCAN2_C2FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  113492. begin
  113493. if thebits = 0 then
  113494. pTDefRegMap(@Self)^.clr := $00040000
  113495. else
  113496. pTDefRegMap(@Self)^.&set := $00040000;
  113497. end;
  113498. function TCAN2_C2FIFOINT15.getRXFULLIE : TBits_1; inline;
  113499. begin
  113500. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  113501. end;
  113502. procedure TCAN2_C2FIFOINT15.setRXOVFLIE; inline;
  113503. begin
  113504. pTDefRegMap(@Self)^.&set := $00080000;
  113505. end;
  113506. procedure TCAN2_C2FIFOINT15.clearRXOVFLIE; inline;
  113507. begin
  113508. pTDefRegMap(@Self)^.clr := $00080000;
  113509. end;
  113510. procedure TCAN2_C2FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  113511. begin
  113512. if thebits = 0 then
  113513. pTDefRegMap(@Self)^.clr := $00080000
  113514. else
  113515. pTDefRegMap(@Self)^.&set := $00080000;
  113516. end;
  113517. function TCAN2_C2FIFOINT15.getRXOVFLIE : TBits_1; inline;
  113518. begin
  113519. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  113520. end;
  113521. procedure TCAN2_C2FIFOINT15.setTXEMPTYIE; inline;
  113522. begin
  113523. pTDefRegMap(@Self)^.&set := $01000000;
  113524. end;
  113525. procedure TCAN2_C2FIFOINT15.clearTXEMPTYIE; inline;
  113526. begin
  113527. pTDefRegMap(@Self)^.clr := $01000000;
  113528. end;
  113529. procedure TCAN2_C2FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  113530. begin
  113531. if thebits = 0 then
  113532. pTDefRegMap(@Self)^.clr := $01000000
  113533. else
  113534. pTDefRegMap(@Self)^.&set := $01000000;
  113535. end;
  113536. function TCAN2_C2FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  113537. begin
  113538. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  113539. end;
  113540. procedure TCAN2_C2FIFOINT15.setTXHALFIE; inline;
  113541. begin
  113542. pTDefRegMap(@Self)^.&set := $02000000;
  113543. end;
  113544. procedure TCAN2_C2FIFOINT15.clearTXHALFIE; inline;
  113545. begin
  113546. pTDefRegMap(@Self)^.clr := $02000000;
  113547. end;
  113548. procedure TCAN2_C2FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  113549. begin
  113550. if thebits = 0 then
  113551. pTDefRegMap(@Self)^.clr := $02000000
  113552. else
  113553. pTDefRegMap(@Self)^.&set := $02000000;
  113554. end;
  113555. function TCAN2_C2FIFOINT15.getTXHALFIE : TBits_1; inline;
  113556. begin
  113557. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  113558. end;
  113559. procedure TCAN2_C2FIFOINT15.setTXNFULLIE; inline;
  113560. begin
  113561. pTDefRegMap(@Self)^.&set := $04000000;
  113562. end;
  113563. procedure TCAN2_C2FIFOINT15.clearTXNFULLIE; inline;
  113564. begin
  113565. pTDefRegMap(@Self)^.clr := $04000000;
  113566. end;
  113567. procedure TCAN2_C2FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  113568. begin
  113569. if thebits = 0 then
  113570. pTDefRegMap(@Self)^.clr := $04000000
  113571. else
  113572. pTDefRegMap(@Self)^.&set := $04000000;
  113573. end;
  113574. function TCAN2_C2FIFOINT15.getTXNFULLIE : TBits_1; inline;
  113575. begin
  113576. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  113577. end;
  113578. procedure TCAN2_C2FIFOINT15.setw(thebits : TBits_32); inline;
  113579. begin
  113580. pTDefRegMap(@Self)^.val := thebits;
  113581. end;
  113582. function TCAN2_C2FIFOINT15.getw : TBits_32; inline;
  113583. begin
  113584. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113585. end;
  113586. procedure TCAN2_C2FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  113587. begin
  113588. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  113589. end;
  113590. function TCAN2_C2FIFOCI15.getCFIFOCI : TBits_5; inline;
  113591. begin
  113592. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  113593. end;
  113594. procedure TCAN2_C2FIFOCI15.setw(thebits : TBits_32); inline;
  113595. begin
  113596. pTDefRegMap(@Self)^.val := thebits;
  113597. end;
  113598. function TCAN2_C2FIFOCI15.getw : TBits_32; inline;
  113599. begin
  113600. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113601. end;
  113602. procedure TCAN2_C2FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  113603. begin
  113604. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  113605. end;
  113606. function TCAN2_C2FIFOCON16.getTXPRI : TBits_2; inline;
  113607. begin
  113608. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  113609. end;
  113610. procedure TCAN2_C2FIFOCON16.setRTREN; inline;
  113611. begin
  113612. pTDefRegMap(@Self)^.&set := $00000004;
  113613. end;
  113614. procedure TCAN2_C2FIFOCON16.clearRTREN; inline;
  113615. begin
  113616. pTDefRegMap(@Self)^.clr := $00000004;
  113617. end;
  113618. procedure TCAN2_C2FIFOCON16.setRTREN(thebits : TBits_1); inline;
  113619. begin
  113620. if thebits = 0 then
  113621. pTDefRegMap(@Self)^.clr := $00000004
  113622. else
  113623. pTDefRegMap(@Self)^.&set := $00000004;
  113624. end;
  113625. function TCAN2_C2FIFOCON16.getRTREN : TBits_1; inline;
  113626. begin
  113627. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113628. end;
  113629. procedure TCAN2_C2FIFOCON16.setTXREQ; inline;
  113630. begin
  113631. pTDefRegMap(@Self)^.&set := $00000008;
  113632. end;
  113633. procedure TCAN2_C2FIFOCON16.clearTXREQ; inline;
  113634. begin
  113635. pTDefRegMap(@Self)^.clr := $00000008;
  113636. end;
  113637. procedure TCAN2_C2FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  113638. begin
  113639. if thebits = 0 then
  113640. pTDefRegMap(@Self)^.clr := $00000008
  113641. else
  113642. pTDefRegMap(@Self)^.&set := $00000008;
  113643. end;
  113644. function TCAN2_C2FIFOCON16.getTXREQ : TBits_1; inline;
  113645. begin
  113646. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113647. end;
  113648. procedure TCAN2_C2FIFOCON16.setTXERR; inline;
  113649. begin
  113650. pTDefRegMap(@Self)^.&set := $00000010;
  113651. end;
  113652. procedure TCAN2_C2FIFOCON16.clearTXERR; inline;
  113653. begin
  113654. pTDefRegMap(@Self)^.clr := $00000010;
  113655. end;
  113656. procedure TCAN2_C2FIFOCON16.setTXERR(thebits : TBits_1); inline;
  113657. begin
  113658. if thebits = 0 then
  113659. pTDefRegMap(@Self)^.clr := $00000010
  113660. else
  113661. pTDefRegMap(@Self)^.&set := $00000010;
  113662. end;
  113663. function TCAN2_C2FIFOCON16.getTXERR : TBits_1; inline;
  113664. begin
  113665. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  113666. end;
  113667. procedure TCAN2_C2FIFOCON16.setTXLARB; inline;
  113668. begin
  113669. pTDefRegMap(@Self)^.&set := $00000020;
  113670. end;
  113671. procedure TCAN2_C2FIFOCON16.clearTXLARB; inline;
  113672. begin
  113673. pTDefRegMap(@Self)^.clr := $00000020;
  113674. end;
  113675. procedure TCAN2_C2FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  113676. begin
  113677. if thebits = 0 then
  113678. pTDefRegMap(@Self)^.clr := $00000020
  113679. else
  113680. pTDefRegMap(@Self)^.&set := $00000020;
  113681. end;
  113682. function TCAN2_C2FIFOCON16.getTXLARB : TBits_1; inline;
  113683. begin
  113684. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  113685. end;
  113686. procedure TCAN2_C2FIFOCON16.setTXABAT; inline;
  113687. begin
  113688. pTDefRegMap(@Self)^.&set := $00000040;
  113689. end;
  113690. procedure TCAN2_C2FIFOCON16.clearTXABAT; inline;
  113691. begin
  113692. pTDefRegMap(@Self)^.clr := $00000040;
  113693. end;
  113694. procedure TCAN2_C2FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  113695. begin
  113696. if thebits = 0 then
  113697. pTDefRegMap(@Self)^.clr := $00000040
  113698. else
  113699. pTDefRegMap(@Self)^.&set := $00000040;
  113700. end;
  113701. function TCAN2_C2FIFOCON16.getTXABAT : TBits_1; inline;
  113702. begin
  113703. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  113704. end;
  113705. procedure TCAN2_C2FIFOCON16.setTXEN; inline;
  113706. begin
  113707. pTDefRegMap(@Self)^.&set := $00000080;
  113708. end;
  113709. procedure TCAN2_C2FIFOCON16.clearTXEN; inline;
  113710. begin
  113711. pTDefRegMap(@Self)^.clr := $00000080;
  113712. end;
  113713. procedure TCAN2_C2FIFOCON16.setTXEN(thebits : TBits_1); inline;
  113714. begin
  113715. if thebits = 0 then
  113716. pTDefRegMap(@Self)^.clr := $00000080
  113717. else
  113718. pTDefRegMap(@Self)^.&set := $00000080;
  113719. end;
  113720. function TCAN2_C2FIFOCON16.getTXEN : TBits_1; inline;
  113721. begin
  113722. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  113723. end;
  113724. procedure TCAN2_C2FIFOCON16.setDONLY; inline;
  113725. begin
  113726. pTDefRegMap(@Self)^.&set := $00001000;
  113727. end;
  113728. procedure TCAN2_C2FIFOCON16.clearDONLY; inline;
  113729. begin
  113730. pTDefRegMap(@Self)^.clr := $00001000;
  113731. end;
  113732. procedure TCAN2_C2FIFOCON16.setDONLY(thebits : TBits_1); inline;
  113733. begin
  113734. if thebits = 0 then
  113735. pTDefRegMap(@Self)^.clr := $00001000
  113736. else
  113737. pTDefRegMap(@Self)^.&set := $00001000;
  113738. end;
  113739. function TCAN2_C2FIFOCON16.getDONLY : TBits_1; inline;
  113740. begin
  113741. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  113742. end;
  113743. procedure TCAN2_C2FIFOCON16.setUINC; inline;
  113744. begin
  113745. pTDefRegMap(@Self)^.&set := $00002000;
  113746. end;
  113747. procedure TCAN2_C2FIFOCON16.clearUINC; inline;
  113748. begin
  113749. pTDefRegMap(@Self)^.clr := $00002000;
  113750. end;
  113751. procedure TCAN2_C2FIFOCON16.setUINC(thebits : TBits_1); inline;
  113752. begin
  113753. if thebits = 0 then
  113754. pTDefRegMap(@Self)^.clr := $00002000
  113755. else
  113756. pTDefRegMap(@Self)^.&set := $00002000;
  113757. end;
  113758. function TCAN2_C2FIFOCON16.getUINC : TBits_1; inline;
  113759. begin
  113760. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  113761. end;
  113762. procedure TCAN2_C2FIFOCON16.setFRESET; inline;
  113763. begin
  113764. pTDefRegMap(@Self)^.&set := $00004000;
  113765. end;
  113766. procedure TCAN2_C2FIFOCON16.clearFRESET; inline;
  113767. begin
  113768. pTDefRegMap(@Self)^.clr := $00004000;
  113769. end;
  113770. procedure TCAN2_C2FIFOCON16.setFRESET(thebits : TBits_1); inline;
  113771. begin
  113772. if thebits = 0 then
  113773. pTDefRegMap(@Self)^.clr := $00004000
  113774. else
  113775. pTDefRegMap(@Self)^.&set := $00004000;
  113776. end;
  113777. function TCAN2_C2FIFOCON16.getFRESET : TBits_1; inline;
  113778. begin
  113779. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  113780. end;
  113781. procedure TCAN2_C2FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  113782. begin
  113783. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  113784. end;
  113785. function TCAN2_C2FIFOCON16.getFSIZE : TBits_5; inline;
  113786. begin
  113787. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  113788. end;
  113789. procedure TCAN2_C2FIFOCON16.setw(thebits : TBits_32); inline;
  113790. begin
  113791. pTDefRegMap(@Self)^.val := thebits;
  113792. end;
  113793. function TCAN2_C2FIFOCON16.getw : TBits_32; inline;
  113794. begin
  113795. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113796. end;
  113797. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIF; inline;
  113798. begin
  113799. pTDefRegMap(@Self)^.&set := $00000001;
  113800. end;
  113801. procedure TCAN2_C2FIFOINT16.clearRXNEMPTYIF; inline;
  113802. begin
  113803. pTDefRegMap(@Self)^.clr := $00000001;
  113804. end;
  113805. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  113806. begin
  113807. if thebits = 0 then
  113808. pTDefRegMap(@Self)^.clr := $00000001
  113809. else
  113810. pTDefRegMap(@Self)^.&set := $00000001;
  113811. end;
  113812. function TCAN2_C2FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  113813. begin
  113814. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  113815. end;
  113816. procedure TCAN2_C2FIFOINT16.setRXHALFIF; inline;
  113817. begin
  113818. pTDefRegMap(@Self)^.&set := $00000002;
  113819. end;
  113820. procedure TCAN2_C2FIFOINT16.clearRXHALFIF; inline;
  113821. begin
  113822. pTDefRegMap(@Self)^.clr := $00000002;
  113823. end;
  113824. procedure TCAN2_C2FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  113825. begin
  113826. if thebits = 0 then
  113827. pTDefRegMap(@Self)^.clr := $00000002
  113828. else
  113829. pTDefRegMap(@Self)^.&set := $00000002;
  113830. end;
  113831. function TCAN2_C2FIFOINT16.getRXHALFIF : TBits_1; inline;
  113832. begin
  113833. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  113834. end;
  113835. procedure TCAN2_C2FIFOINT16.setRXFULLIF; inline;
  113836. begin
  113837. pTDefRegMap(@Self)^.&set := $00000004;
  113838. end;
  113839. procedure TCAN2_C2FIFOINT16.clearRXFULLIF; inline;
  113840. begin
  113841. pTDefRegMap(@Self)^.clr := $00000004;
  113842. end;
  113843. procedure TCAN2_C2FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  113844. begin
  113845. if thebits = 0 then
  113846. pTDefRegMap(@Self)^.clr := $00000004
  113847. else
  113848. pTDefRegMap(@Self)^.&set := $00000004;
  113849. end;
  113850. function TCAN2_C2FIFOINT16.getRXFULLIF : TBits_1; inline;
  113851. begin
  113852. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113853. end;
  113854. procedure TCAN2_C2FIFOINT16.setRXOVFLIF; inline;
  113855. begin
  113856. pTDefRegMap(@Self)^.&set := $00000008;
  113857. end;
  113858. procedure TCAN2_C2FIFOINT16.clearRXOVFLIF; inline;
  113859. begin
  113860. pTDefRegMap(@Self)^.clr := $00000008;
  113861. end;
  113862. procedure TCAN2_C2FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  113863. begin
  113864. if thebits = 0 then
  113865. pTDefRegMap(@Self)^.clr := $00000008
  113866. else
  113867. pTDefRegMap(@Self)^.&set := $00000008;
  113868. end;
  113869. function TCAN2_C2FIFOINT16.getRXOVFLIF : TBits_1; inline;
  113870. begin
  113871. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113872. end;
  113873. procedure TCAN2_C2FIFOINT16.setTXEMPTYIF; inline;
  113874. begin
  113875. pTDefRegMap(@Self)^.&set := $00000100;
  113876. end;
  113877. procedure TCAN2_C2FIFOINT16.clearTXEMPTYIF; inline;
  113878. begin
  113879. pTDefRegMap(@Self)^.clr := $00000100;
  113880. end;
  113881. procedure TCAN2_C2FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  113882. begin
  113883. if thebits = 0 then
  113884. pTDefRegMap(@Self)^.clr := $00000100
  113885. else
  113886. pTDefRegMap(@Self)^.&set := $00000100;
  113887. end;
  113888. function TCAN2_C2FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  113889. begin
  113890. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  113891. end;
  113892. procedure TCAN2_C2FIFOINT16.setTXHALFIF; inline;
  113893. begin
  113894. pTDefRegMap(@Self)^.&set := $00000200;
  113895. end;
  113896. procedure TCAN2_C2FIFOINT16.clearTXHALFIF; inline;
  113897. begin
  113898. pTDefRegMap(@Self)^.clr := $00000200;
  113899. end;
  113900. procedure TCAN2_C2FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  113901. begin
  113902. if thebits = 0 then
  113903. pTDefRegMap(@Self)^.clr := $00000200
  113904. else
  113905. pTDefRegMap(@Self)^.&set := $00000200;
  113906. end;
  113907. function TCAN2_C2FIFOINT16.getTXHALFIF : TBits_1; inline;
  113908. begin
  113909. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  113910. end;
  113911. procedure TCAN2_C2FIFOINT16.setTXNFULLIF; inline;
  113912. begin
  113913. pTDefRegMap(@Self)^.&set := $00000400;
  113914. end;
  113915. procedure TCAN2_C2FIFOINT16.clearTXNFULLIF; inline;
  113916. begin
  113917. pTDefRegMap(@Self)^.clr := $00000400;
  113918. end;
  113919. procedure TCAN2_C2FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  113920. begin
  113921. if thebits = 0 then
  113922. pTDefRegMap(@Self)^.clr := $00000400
  113923. else
  113924. pTDefRegMap(@Self)^.&set := $00000400;
  113925. end;
  113926. function TCAN2_C2FIFOINT16.getTXNFULLIF : TBits_1; inline;
  113927. begin
  113928. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  113929. end;
  113930. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIE; inline;
  113931. begin
  113932. pTDefRegMap(@Self)^.&set := $00010000;
  113933. end;
  113934. procedure TCAN2_C2FIFOINT16.clearRXNEMPTYIE; inline;
  113935. begin
  113936. pTDefRegMap(@Self)^.clr := $00010000;
  113937. end;
  113938. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  113939. begin
  113940. if thebits = 0 then
  113941. pTDefRegMap(@Self)^.clr := $00010000
  113942. else
  113943. pTDefRegMap(@Self)^.&set := $00010000;
  113944. end;
  113945. function TCAN2_C2FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  113946. begin
  113947. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  113948. end;
  113949. procedure TCAN2_C2FIFOINT16.setRXHALFIE; inline;
  113950. begin
  113951. pTDefRegMap(@Self)^.&set := $00020000;
  113952. end;
  113953. procedure TCAN2_C2FIFOINT16.clearRXHALFIE; inline;
  113954. begin
  113955. pTDefRegMap(@Self)^.clr := $00020000;
  113956. end;
  113957. procedure TCAN2_C2FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  113958. begin
  113959. if thebits = 0 then
  113960. pTDefRegMap(@Self)^.clr := $00020000
  113961. else
  113962. pTDefRegMap(@Self)^.&set := $00020000;
  113963. end;
  113964. function TCAN2_C2FIFOINT16.getRXHALFIE : TBits_1; inline;
  113965. begin
  113966. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  113967. end;
  113968. procedure TCAN2_C2FIFOINT16.setRXFULLIE; inline;
  113969. begin
  113970. pTDefRegMap(@Self)^.&set := $00040000;
  113971. end;
  113972. procedure TCAN2_C2FIFOINT16.clearRXFULLIE; inline;
  113973. begin
  113974. pTDefRegMap(@Self)^.clr := $00040000;
  113975. end;
  113976. procedure TCAN2_C2FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  113977. begin
  113978. if thebits = 0 then
  113979. pTDefRegMap(@Self)^.clr := $00040000
  113980. else
  113981. pTDefRegMap(@Self)^.&set := $00040000;
  113982. end;
  113983. function TCAN2_C2FIFOINT16.getRXFULLIE : TBits_1; inline;
  113984. begin
  113985. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  113986. end;
  113987. procedure TCAN2_C2FIFOINT16.setRXOVFLIE; inline;
  113988. begin
  113989. pTDefRegMap(@Self)^.&set := $00080000;
  113990. end;
  113991. procedure TCAN2_C2FIFOINT16.clearRXOVFLIE; inline;
  113992. begin
  113993. pTDefRegMap(@Self)^.clr := $00080000;
  113994. end;
  113995. procedure TCAN2_C2FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  113996. begin
  113997. if thebits = 0 then
  113998. pTDefRegMap(@Self)^.clr := $00080000
  113999. else
  114000. pTDefRegMap(@Self)^.&set := $00080000;
  114001. end;
  114002. function TCAN2_C2FIFOINT16.getRXOVFLIE : TBits_1; inline;
  114003. begin
  114004. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  114005. end;
  114006. procedure TCAN2_C2FIFOINT16.setTXEMPTYIE; inline;
  114007. begin
  114008. pTDefRegMap(@Self)^.&set := $01000000;
  114009. end;
  114010. procedure TCAN2_C2FIFOINT16.clearTXEMPTYIE; inline;
  114011. begin
  114012. pTDefRegMap(@Self)^.clr := $01000000;
  114013. end;
  114014. procedure TCAN2_C2FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  114015. begin
  114016. if thebits = 0 then
  114017. pTDefRegMap(@Self)^.clr := $01000000
  114018. else
  114019. pTDefRegMap(@Self)^.&set := $01000000;
  114020. end;
  114021. function TCAN2_C2FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  114022. begin
  114023. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  114024. end;
  114025. procedure TCAN2_C2FIFOINT16.setTXHALFIE; inline;
  114026. begin
  114027. pTDefRegMap(@Self)^.&set := $02000000;
  114028. end;
  114029. procedure TCAN2_C2FIFOINT16.clearTXHALFIE; inline;
  114030. begin
  114031. pTDefRegMap(@Self)^.clr := $02000000;
  114032. end;
  114033. procedure TCAN2_C2FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  114034. begin
  114035. if thebits = 0 then
  114036. pTDefRegMap(@Self)^.clr := $02000000
  114037. else
  114038. pTDefRegMap(@Self)^.&set := $02000000;
  114039. end;
  114040. function TCAN2_C2FIFOINT16.getTXHALFIE : TBits_1; inline;
  114041. begin
  114042. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  114043. end;
  114044. procedure TCAN2_C2FIFOINT16.setTXNFULLIE; inline;
  114045. begin
  114046. pTDefRegMap(@Self)^.&set := $04000000;
  114047. end;
  114048. procedure TCAN2_C2FIFOINT16.clearTXNFULLIE; inline;
  114049. begin
  114050. pTDefRegMap(@Self)^.clr := $04000000;
  114051. end;
  114052. procedure TCAN2_C2FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  114053. begin
  114054. if thebits = 0 then
  114055. pTDefRegMap(@Self)^.clr := $04000000
  114056. else
  114057. pTDefRegMap(@Self)^.&set := $04000000;
  114058. end;
  114059. function TCAN2_C2FIFOINT16.getTXNFULLIE : TBits_1; inline;
  114060. begin
  114061. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  114062. end;
  114063. procedure TCAN2_C2FIFOINT16.setw(thebits : TBits_32); inline;
  114064. begin
  114065. pTDefRegMap(@Self)^.val := thebits;
  114066. end;
  114067. function TCAN2_C2FIFOINT16.getw : TBits_32; inline;
  114068. begin
  114069. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114070. end;
  114071. procedure TCAN2_C2FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  114072. begin
  114073. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  114074. end;
  114075. function TCAN2_C2FIFOCI16.getCFIFOCI : TBits_5; inline;
  114076. begin
  114077. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  114078. end;
  114079. procedure TCAN2_C2FIFOCI16.setw(thebits : TBits_32); inline;
  114080. begin
  114081. pTDefRegMap(@Self)^.val := thebits;
  114082. end;
  114083. function TCAN2_C2FIFOCI16.getw : TBits_32; inline;
  114084. begin
  114085. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114086. end;
  114087. procedure TCAN2_C2FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  114088. begin
  114089. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  114090. end;
  114091. function TCAN2_C2FIFOCON17.getTXPRI : TBits_2; inline;
  114092. begin
  114093. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  114094. end;
  114095. procedure TCAN2_C2FIFOCON17.setRTREN; inline;
  114096. begin
  114097. pTDefRegMap(@Self)^.&set := $00000004;
  114098. end;
  114099. procedure TCAN2_C2FIFOCON17.clearRTREN; inline;
  114100. begin
  114101. pTDefRegMap(@Self)^.clr := $00000004;
  114102. end;
  114103. procedure TCAN2_C2FIFOCON17.setRTREN(thebits : TBits_1); inline;
  114104. begin
  114105. if thebits = 0 then
  114106. pTDefRegMap(@Self)^.clr := $00000004
  114107. else
  114108. pTDefRegMap(@Self)^.&set := $00000004;
  114109. end;
  114110. function TCAN2_C2FIFOCON17.getRTREN : TBits_1; inline;
  114111. begin
  114112. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114113. end;
  114114. procedure TCAN2_C2FIFOCON17.setTXREQ; inline;
  114115. begin
  114116. pTDefRegMap(@Self)^.&set := $00000008;
  114117. end;
  114118. procedure TCAN2_C2FIFOCON17.clearTXREQ; inline;
  114119. begin
  114120. pTDefRegMap(@Self)^.clr := $00000008;
  114121. end;
  114122. procedure TCAN2_C2FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  114123. begin
  114124. if thebits = 0 then
  114125. pTDefRegMap(@Self)^.clr := $00000008
  114126. else
  114127. pTDefRegMap(@Self)^.&set := $00000008;
  114128. end;
  114129. function TCAN2_C2FIFOCON17.getTXREQ : TBits_1; inline;
  114130. begin
  114131. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114132. end;
  114133. procedure TCAN2_C2FIFOCON17.setTXERR; inline;
  114134. begin
  114135. pTDefRegMap(@Self)^.&set := $00000010;
  114136. end;
  114137. procedure TCAN2_C2FIFOCON17.clearTXERR; inline;
  114138. begin
  114139. pTDefRegMap(@Self)^.clr := $00000010;
  114140. end;
  114141. procedure TCAN2_C2FIFOCON17.setTXERR(thebits : TBits_1); inline;
  114142. begin
  114143. if thebits = 0 then
  114144. pTDefRegMap(@Self)^.clr := $00000010
  114145. else
  114146. pTDefRegMap(@Self)^.&set := $00000010;
  114147. end;
  114148. function TCAN2_C2FIFOCON17.getTXERR : TBits_1; inline;
  114149. begin
  114150. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  114151. end;
  114152. procedure TCAN2_C2FIFOCON17.setTXLARB; inline;
  114153. begin
  114154. pTDefRegMap(@Self)^.&set := $00000020;
  114155. end;
  114156. procedure TCAN2_C2FIFOCON17.clearTXLARB; inline;
  114157. begin
  114158. pTDefRegMap(@Self)^.clr := $00000020;
  114159. end;
  114160. procedure TCAN2_C2FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  114161. begin
  114162. if thebits = 0 then
  114163. pTDefRegMap(@Self)^.clr := $00000020
  114164. else
  114165. pTDefRegMap(@Self)^.&set := $00000020;
  114166. end;
  114167. function TCAN2_C2FIFOCON17.getTXLARB : TBits_1; inline;
  114168. begin
  114169. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  114170. end;
  114171. procedure TCAN2_C2FIFOCON17.setTXABAT; inline;
  114172. begin
  114173. pTDefRegMap(@Self)^.&set := $00000040;
  114174. end;
  114175. procedure TCAN2_C2FIFOCON17.clearTXABAT; inline;
  114176. begin
  114177. pTDefRegMap(@Self)^.clr := $00000040;
  114178. end;
  114179. procedure TCAN2_C2FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  114180. begin
  114181. if thebits = 0 then
  114182. pTDefRegMap(@Self)^.clr := $00000040
  114183. else
  114184. pTDefRegMap(@Self)^.&set := $00000040;
  114185. end;
  114186. function TCAN2_C2FIFOCON17.getTXABAT : TBits_1; inline;
  114187. begin
  114188. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  114189. end;
  114190. procedure TCAN2_C2FIFOCON17.setTXEN; inline;
  114191. begin
  114192. pTDefRegMap(@Self)^.&set := $00000080;
  114193. end;
  114194. procedure TCAN2_C2FIFOCON17.clearTXEN; inline;
  114195. begin
  114196. pTDefRegMap(@Self)^.clr := $00000080;
  114197. end;
  114198. procedure TCAN2_C2FIFOCON17.setTXEN(thebits : TBits_1); inline;
  114199. begin
  114200. if thebits = 0 then
  114201. pTDefRegMap(@Self)^.clr := $00000080
  114202. else
  114203. pTDefRegMap(@Self)^.&set := $00000080;
  114204. end;
  114205. function TCAN2_C2FIFOCON17.getTXEN : TBits_1; inline;
  114206. begin
  114207. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  114208. end;
  114209. procedure TCAN2_C2FIFOCON17.setDONLY; inline;
  114210. begin
  114211. pTDefRegMap(@Self)^.&set := $00001000;
  114212. end;
  114213. procedure TCAN2_C2FIFOCON17.clearDONLY; inline;
  114214. begin
  114215. pTDefRegMap(@Self)^.clr := $00001000;
  114216. end;
  114217. procedure TCAN2_C2FIFOCON17.setDONLY(thebits : TBits_1); inline;
  114218. begin
  114219. if thebits = 0 then
  114220. pTDefRegMap(@Self)^.clr := $00001000
  114221. else
  114222. pTDefRegMap(@Self)^.&set := $00001000;
  114223. end;
  114224. function TCAN2_C2FIFOCON17.getDONLY : TBits_1; inline;
  114225. begin
  114226. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  114227. end;
  114228. procedure TCAN2_C2FIFOCON17.setUINC; inline;
  114229. begin
  114230. pTDefRegMap(@Self)^.&set := $00002000;
  114231. end;
  114232. procedure TCAN2_C2FIFOCON17.clearUINC; inline;
  114233. begin
  114234. pTDefRegMap(@Self)^.clr := $00002000;
  114235. end;
  114236. procedure TCAN2_C2FIFOCON17.setUINC(thebits : TBits_1); inline;
  114237. begin
  114238. if thebits = 0 then
  114239. pTDefRegMap(@Self)^.clr := $00002000
  114240. else
  114241. pTDefRegMap(@Self)^.&set := $00002000;
  114242. end;
  114243. function TCAN2_C2FIFOCON17.getUINC : TBits_1; inline;
  114244. begin
  114245. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  114246. end;
  114247. procedure TCAN2_C2FIFOCON17.setFRESET; inline;
  114248. begin
  114249. pTDefRegMap(@Self)^.&set := $00004000;
  114250. end;
  114251. procedure TCAN2_C2FIFOCON17.clearFRESET; inline;
  114252. begin
  114253. pTDefRegMap(@Self)^.clr := $00004000;
  114254. end;
  114255. procedure TCAN2_C2FIFOCON17.setFRESET(thebits : TBits_1); inline;
  114256. begin
  114257. if thebits = 0 then
  114258. pTDefRegMap(@Self)^.clr := $00004000
  114259. else
  114260. pTDefRegMap(@Self)^.&set := $00004000;
  114261. end;
  114262. function TCAN2_C2FIFOCON17.getFRESET : TBits_1; inline;
  114263. begin
  114264. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  114265. end;
  114266. procedure TCAN2_C2FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  114267. begin
  114268. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  114269. end;
  114270. function TCAN2_C2FIFOCON17.getFSIZE : TBits_5; inline;
  114271. begin
  114272. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  114273. end;
  114274. procedure TCAN2_C2FIFOCON17.setw(thebits : TBits_32); inline;
  114275. begin
  114276. pTDefRegMap(@Self)^.val := thebits;
  114277. end;
  114278. function TCAN2_C2FIFOCON17.getw : TBits_32; inline;
  114279. begin
  114280. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114281. end;
  114282. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIF; inline;
  114283. begin
  114284. pTDefRegMap(@Self)^.&set := $00000001;
  114285. end;
  114286. procedure TCAN2_C2FIFOINT17.clearRXNEMPTYIF; inline;
  114287. begin
  114288. pTDefRegMap(@Self)^.clr := $00000001;
  114289. end;
  114290. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  114291. begin
  114292. if thebits = 0 then
  114293. pTDefRegMap(@Self)^.clr := $00000001
  114294. else
  114295. pTDefRegMap(@Self)^.&set := $00000001;
  114296. end;
  114297. function TCAN2_C2FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  114298. begin
  114299. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  114300. end;
  114301. procedure TCAN2_C2FIFOINT17.setRXHALFIF; inline;
  114302. begin
  114303. pTDefRegMap(@Self)^.&set := $00000002;
  114304. end;
  114305. procedure TCAN2_C2FIFOINT17.clearRXHALFIF; inline;
  114306. begin
  114307. pTDefRegMap(@Self)^.clr := $00000002;
  114308. end;
  114309. procedure TCAN2_C2FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  114310. begin
  114311. if thebits = 0 then
  114312. pTDefRegMap(@Self)^.clr := $00000002
  114313. else
  114314. pTDefRegMap(@Self)^.&set := $00000002;
  114315. end;
  114316. function TCAN2_C2FIFOINT17.getRXHALFIF : TBits_1; inline;
  114317. begin
  114318. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  114319. end;
  114320. procedure TCAN2_C2FIFOINT17.setRXFULLIF; inline;
  114321. begin
  114322. pTDefRegMap(@Self)^.&set := $00000004;
  114323. end;
  114324. procedure TCAN2_C2FIFOINT17.clearRXFULLIF; inline;
  114325. begin
  114326. pTDefRegMap(@Self)^.clr := $00000004;
  114327. end;
  114328. procedure TCAN2_C2FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  114329. begin
  114330. if thebits = 0 then
  114331. pTDefRegMap(@Self)^.clr := $00000004
  114332. else
  114333. pTDefRegMap(@Self)^.&set := $00000004;
  114334. end;
  114335. function TCAN2_C2FIFOINT17.getRXFULLIF : TBits_1; inline;
  114336. begin
  114337. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114338. end;
  114339. procedure TCAN2_C2FIFOINT17.setRXOVFLIF; inline;
  114340. begin
  114341. pTDefRegMap(@Self)^.&set := $00000008;
  114342. end;
  114343. procedure TCAN2_C2FIFOINT17.clearRXOVFLIF; inline;
  114344. begin
  114345. pTDefRegMap(@Self)^.clr := $00000008;
  114346. end;
  114347. procedure TCAN2_C2FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  114348. begin
  114349. if thebits = 0 then
  114350. pTDefRegMap(@Self)^.clr := $00000008
  114351. else
  114352. pTDefRegMap(@Self)^.&set := $00000008;
  114353. end;
  114354. function TCAN2_C2FIFOINT17.getRXOVFLIF : TBits_1; inline;
  114355. begin
  114356. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114357. end;
  114358. procedure TCAN2_C2FIFOINT17.setTXEMPTYIF; inline;
  114359. begin
  114360. pTDefRegMap(@Self)^.&set := $00000100;
  114361. end;
  114362. procedure TCAN2_C2FIFOINT17.clearTXEMPTYIF; inline;
  114363. begin
  114364. pTDefRegMap(@Self)^.clr := $00000100;
  114365. end;
  114366. procedure TCAN2_C2FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  114367. begin
  114368. if thebits = 0 then
  114369. pTDefRegMap(@Self)^.clr := $00000100
  114370. else
  114371. pTDefRegMap(@Self)^.&set := $00000100;
  114372. end;
  114373. function TCAN2_C2FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  114374. begin
  114375. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  114376. end;
  114377. procedure TCAN2_C2FIFOINT17.setTXHALFIF; inline;
  114378. begin
  114379. pTDefRegMap(@Self)^.&set := $00000200;
  114380. end;
  114381. procedure TCAN2_C2FIFOINT17.clearTXHALFIF; inline;
  114382. begin
  114383. pTDefRegMap(@Self)^.clr := $00000200;
  114384. end;
  114385. procedure TCAN2_C2FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  114386. begin
  114387. if thebits = 0 then
  114388. pTDefRegMap(@Self)^.clr := $00000200
  114389. else
  114390. pTDefRegMap(@Self)^.&set := $00000200;
  114391. end;
  114392. function TCAN2_C2FIFOINT17.getTXHALFIF : TBits_1; inline;
  114393. begin
  114394. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  114395. end;
  114396. procedure TCAN2_C2FIFOINT17.setTXNFULLIF; inline;
  114397. begin
  114398. pTDefRegMap(@Self)^.&set := $00000400;
  114399. end;
  114400. procedure TCAN2_C2FIFOINT17.clearTXNFULLIF; inline;
  114401. begin
  114402. pTDefRegMap(@Self)^.clr := $00000400;
  114403. end;
  114404. procedure TCAN2_C2FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  114405. begin
  114406. if thebits = 0 then
  114407. pTDefRegMap(@Self)^.clr := $00000400
  114408. else
  114409. pTDefRegMap(@Self)^.&set := $00000400;
  114410. end;
  114411. function TCAN2_C2FIFOINT17.getTXNFULLIF : TBits_1; inline;
  114412. begin
  114413. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  114414. end;
  114415. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIE; inline;
  114416. begin
  114417. pTDefRegMap(@Self)^.&set := $00010000;
  114418. end;
  114419. procedure TCAN2_C2FIFOINT17.clearRXNEMPTYIE; inline;
  114420. begin
  114421. pTDefRegMap(@Self)^.clr := $00010000;
  114422. end;
  114423. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  114424. begin
  114425. if thebits = 0 then
  114426. pTDefRegMap(@Self)^.clr := $00010000
  114427. else
  114428. pTDefRegMap(@Self)^.&set := $00010000;
  114429. end;
  114430. function TCAN2_C2FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  114431. begin
  114432. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  114433. end;
  114434. procedure TCAN2_C2FIFOINT17.setRXHALFIE; inline;
  114435. begin
  114436. pTDefRegMap(@Self)^.&set := $00020000;
  114437. end;
  114438. procedure TCAN2_C2FIFOINT17.clearRXHALFIE; inline;
  114439. begin
  114440. pTDefRegMap(@Self)^.clr := $00020000;
  114441. end;
  114442. procedure TCAN2_C2FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  114443. begin
  114444. if thebits = 0 then
  114445. pTDefRegMap(@Self)^.clr := $00020000
  114446. else
  114447. pTDefRegMap(@Self)^.&set := $00020000;
  114448. end;
  114449. function TCAN2_C2FIFOINT17.getRXHALFIE : TBits_1; inline;
  114450. begin
  114451. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  114452. end;
  114453. procedure TCAN2_C2FIFOINT17.setRXFULLIE; inline;
  114454. begin
  114455. pTDefRegMap(@Self)^.&set := $00040000;
  114456. end;
  114457. procedure TCAN2_C2FIFOINT17.clearRXFULLIE; inline;
  114458. begin
  114459. pTDefRegMap(@Self)^.clr := $00040000;
  114460. end;
  114461. procedure TCAN2_C2FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  114462. begin
  114463. if thebits = 0 then
  114464. pTDefRegMap(@Self)^.clr := $00040000
  114465. else
  114466. pTDefRegMap(@Self)^.&set := $00040000;
  114467. end;
  114468. function TCAN2_C2FIFOINT17.getRXFULLIE : TBits_1; inline;
  114469. begin
  114470. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  114471. end;
  114472. procedure TCAN2_C2FIFOINT17.setRXOVFLIE; inline;
  114473. begin
  114474. pTDefRegMap(@Self)^.&set := $00080000;
  114475. end;
  114476. procedure TCAN2_C2FIFOINT17.clearRXOVFLIE; inline;
  114477. begin
  114478. pTDefRegMap(@Self)^.clr := $00080000;
  114479. end;
  114480. procedure TCAN2_C2FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  114481. begin
  114482. if thebits = 0 then
  114483. pTDefRegMap(@Self)^.clr := $00080000
  114484. else
  114485. pTDefRegMap(@Self)^.&set := $00080000;
  114486. end;
  114487. function TCAN2_C2FIFOINT17.getRXOVFLIE : TBits_1; inline;
  114488. begin
  114489. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  114490. end;
  114491. procedure TCAN2_C2FIFOINT17.setTXEMPTYIE; inline;
  114492. begin
  114493. pTDefRegMap(@Self)^.&set := $01000000;
  114494. end;
  114495. procedure TCAN2_C2FIFOINT17.clearTXEMPTYIE; inline;
  114496. begin
  114497. pTDefRegMap(@Self)^.clr := $01000000;
  114498. end;
  114499. procedure TCAN2_C2FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  114500. begin
  114501. if thebits = 0 then
  114502. pTDefRegMap(@Self)^.clr := $01000000
  114503. else
  114504. pTDefRegMap(@Self)^.&set := $01000000;
  114505. end;
  114506. function TCAN2_C2FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  114507. begin
  114508. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  114509. end;
  114510. procedure TCAN2_C2FIFOINT17.setTXHALFIE; inline;
  114511. begin
  114512. pTDefRegMap(@Self)^.&set := $02000000;
  114513. end;
  114514. procedure TCAN2_C2FIFOINT17.clearTXHALFIE; inline;
  114515. begin
  114516. pTDefRegMap(@Self)^.clr := $02000000;
  114517. end;
  114518. procedure TCAN2_C2FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  114519. begin
  114520. if thebits = 0 then
  114521. pTDefRegMap(@Self)^.clr := $02000000
  114522. else
  114523. pTDefRegMap(@Self)^.&set := $02000000;
  114524. end;
  114525. function TCAN2_C2FIFOINT17.getTXHALFIE : TBits_1; inline;
  114526. begin
  114527. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  114528. end;
  114529. procedure TCAN2_C2FIFOINT17.setTXNFULLIE; inline;
  114530. begin
  114531. pTDefRegMap(@Self)^.&set := $04000000;
  114532. end;
  114533. procedure TCAN2_C2FIFOINT17.clearTXNFULLIE; inline;
  114534. begin
  114535. pTDefRegMap(@Self)^.clr := $04000000;
  114536. end;
  114537. procedure TCAN2_C2FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  114538. begin
  114539. if thebits = 0 then
  114540. pTDefRegMap(@Self)^.clr := $04000000
  114541. else
  114542. pTDefRegMap(@Self)^.&set := $04000000;
  114543. end;
  114544. function TCAN2_C2FIFOINT17.getTXNFULLIE : TBits_1; inline;
  114545. begin
  114546. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  114547. end;
  114548. procedure TCAN2_C2FIFOINT17.setw(thebits : TBits_32); inline;
  114549. begin
  114550. pTDefRegMap(@Self)^.val := thebits;
  114551. end;
  114552. function TCAN2_C2FIFOINT17.getw : TBits_32; inline;
  114553. begin
  114554. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114555. end;
  114556. procedure TCAN2_C2FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  114557. begin
  114558. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  114559. end;
  114560. function TCAN2_C2FIFOCI17.getCFIFOCI : TBits_5; inline;
  114561. begin
  114562. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  114563. end;
  114564. procedure TCAN2_C2FIFOCI17.setw(thebits : TBits_32); inline;
  114565. begin
  114566. pTDefRegMap(@Self)^.val := thebits;
  114567. end;
  114568. function TCAN2_C2FIFOCI17.getw : TBits_32; inline;
  114569. begin
  114570. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114571. end;
  114572. procedure TCAN2_C2FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  114573. begin
  114574. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  114575. end;
  114576. function TCAN2_C2FIFOCON18.getTXPRI : TBits_2; inline;
  114577. begin
  114578. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  114579. end;
  114580. procedure TCAN2_C2FIFOCON18.setRTREN; inline;
  114581. begin
  114582. pTDefRegMap(@Self)^.&set := $00000004;
  114583. end;
  114584. procedure TCAN2_C2FIFOCON18.clearRTREN; inline;
  114585. begin
  114586. pTDefRegMap(@Self)^.clr := $00000004;
  114587. end;
  114588. procedure TCAN2_C2FIFOCON18.setRTREN(thebits : TBits_1); inline;
  114589. begin
  114590. if thebits = 0 then
  114591. pTDefRegMap(@Self)^.clr := $00000004
  114592. else
  114593. pTDefRegMap(@Self)^.&set := $00000004;
  114594. end;
  114595. function TCAN2_C2FIFOCON18.getRTREN : TBits_1; inline;
  114596. begin
  114597. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114598. end;
  114599. procedure TCAN2_C2FIFOCON18.setTXREQ; inline;
  114600. begin
  114601. pTDefRegMap(@Self)^.&set := $00000008;
  114602. end;
  114603. procedure TCAN2_C2FIFOCON18.clearTXREQ; inline;
  114604. begin
  114605. pTDefRegMap(@Self)^.clr := $00000008;
  114606. end;
  114607. procedure TCAN2_C2FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  114608. begin
  114609. if thebits = 0 then
  114610. pTDefRegMap(@Self)^.clr := $00000008
  114611. else
  114612. pTDefRegMap(@Self)^.&set := $00000008;
  114613. end;
  114614. function TCAN2_C2FIFOCON18.getTXREQ : TBits_1; inline;
  114615. begin
  114616. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114617. end;
  114618. procedure TCAN2_C2FIFOCON18.setTXERR; inline;
  114619. begin
  114620. pTDefRegMap(@Self)^.&set := $00000010;
  114621. end;
  114622. procedure TCAN2_C2FIFOCON18.clearTXERR; inline;
  114623. begin
  114624. pTDefRegMap(@Self)^.clr := $00000010;
  114625. end;
  114626. procedure TCAN2_C2FIFOCON18.setTXERR(thebits : TBits_1); inline;
  114627. begin
  114628. if thebits = 0 then
  114629. pTDefRegMap(@Self)^.clr := $00000010
  114630. else
  114631. pTDefRegMap(@Self)^.&set := $00000010;
  114632. end;
  114633. function TCAN2_C2FIFOCON18.getTXERR : TBits_1; inline;
  114634. begin
  114635. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  114636. end;
  114637. procedure TCAN2_C2FIFOCON18.setTXLARB; inline;
  114638. begin
  114639. pTDefRegMap(@Self)^.&set := $00000020;
  114640. end;
  114641. procedure TCAN2_C2FIFOCON18.clearTXLARB; inline;
  114642. begin
  114643. pTDefRegMap(@Self)^.clr := $00000020;
  114644. end;
  114645. procedure TCAN2_C2FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  114646. begin
  114647. if thebits = 0 then
  114648. pTDefRegMap(@Self)^.clr := $00000020
  114649. else
  114650. pTDefRegMap(@Self)^.&set := $00000020;
  114651. end;
  114652. function TCAN2_C2FIFOCON18.getTXLARB : TBits_1; inline;
  114653. begin
  114654. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  114655. end;
  114656. procedure TCAN2_C2FIFOCON18.setTXABAT; inline;
  114657. begin
  114658. pTDefRegMap(@Self)^.&set := $00000040;
  114659. end;
  114660. procedure TCAN2_C2FIFOCON18.clearTXABAT; inline;
  114661. begin
  114662. pTDefRegMap(@Self)^.clr := $00000040;
  114663. end;
  114664. procedure TCAN2_C2FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  114665. begin
  114666. if thebits = 0 then
  114667. pTDefRegMap(@Self)^.clr := $00000040
  114668. else
  114669. pTDefRegMap(@Self)^.&set := $00000040;
  114670. end;
  114671. function TCAN2_C2FIFOCON18.getTXABAT : TBits_1; inline;
  114672. begin
  114673. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  114674. end;
  114675. procedure TCAN2_C2FIFOCON18.setTXEN; inline;
  114676. begin
  114677. pTDefRegMap(@Self)^.&set := $00000080;
  114678. end;
  114679. procedure TCAN2_C2FIFOCON18.clearTXEN; inline;
  114680. begin
  114681. pTDefRegMap(@Self)^.clr := $00000080;
  114682. end;
  114683. procedure TCAN2_C2FIFOCON18.setTXEN(thebits : TBits_1); inline;
  114684. begin
  114685. if thebits = 0 then
  114686. pTDefRegMap(@Self)^.clr := $00000080
  114687. else
  114688. pTDefRegMap(@Self)^.&set := $00000080;
  114689. end;
  114690. function TCAN2_C2FIFOCON18.getTXEN : TBits_1; inline;
  114691. begin
  114692. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  114693. end;
  114694. procedure TCAN2_C2FIFOCON18.setDONLY; inline;
  114695. begin
  114696. pTDefRegMap(@Self)^.&set := $00001000;
  114697. end;
  114698. procedure TCAN2_C2FIFOCON18.clearDONLY; inline;
  114699. begin
  114700. pTDefRegMap(@Self)^.clr := $00001000;
  114701. end;
  114702. procedure TCAN2_C2FIFOCON18.setDONLY(thebits : TBits_1); inline;
  114703. begin
  114704. if thebits = 0 then
  114705. pTDefRegMap(@Self)^.clr := $00001000
  114706. else
  114707. pTDefRegMap(@Self)^.&set := $00001000;
  114708. end;
  114709. function TCAN2_C2FIFOCON18.getDONLY : TBits_1; inline;
  114710. begin
  114711. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  114712. end;
  114713. procedure TCAN2_C2FIFOCON18.setUINC; inline;
  114714. begin
  114715. pTDefRegMap(@Self)^.&set := $00002000;
  114716. end;
  114717. procedure TCAN2_C2FIFOCON18.clearUINC; inline;
  114718. begin
  114719. pTDefRegMap(@Self)^.clr := $00002000;
  114720. end;
  114721. procedure TCAN2_C2FIFOCON18.setUINC(thebits : TBits_1); inline;
  114722. begin
  114723. if thebits = 0 then
  114724. pTDefRegMap(@Self)^.clr := $00002000
  114725. else
  114726. pTDefRegMap(@Self)^.&set := $00002000;
  114727. end;
  114728. function TCAN2_C2FIFOCON18.getUINC : TBits_1; inline;
  114729. begin
  114730. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  114731. end;
  114732. procedure TCAN2_C2FIFOCON18.setFRESET; inline;
  114733. begin
  114734. pTDefRegMap(@Self)^.&set := $00004000;
  114735. end;
  114736. procedure TCAN2_C2FIFOCON18.clearFRESET; inline;
  114737. begin
  114738. pTDefRegMap(@Self)^.clr := $00004000;
  114739. end;
  114740. procedure TCAN2_C2FIFOCON18.setFRESET(thebits : TBits_1); inline;
  114741. begin
  114742. if thebits = 0 then
  114743. pTDefRegMap(@Self)^.clr := $00004000
  114744. else
  114745. pTDefRegMap(@Self)^.&set := $00004000;
  114746. end;
  114747. function TCAN2_C2FIFOCON18.getFRESET : TBits_1; inline;
  114748. begin
  114749. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  114750. end;
  114751. procedure TCAN2_C2FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  114752. begin
  114753. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  114754. end;
  114755. function TCAN2_C2FIFOCON18.getFSIZE : TBits_5; inline;
  114756. begin
  114757. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  114758. end;
  114759. procedure TCAN2_C2FIFOCON18.setw(thebits : TBits_32); inline;
  114760. begin
  114761. pTDefRegMap(@Self)^.val := thebits;
  114762. end;
  114763. function TCAN2_C2FIFOCON18.getw : TBits_32; inline;
  114764. begin
  114765. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114766. end;
  114767. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIF; inline;
  114768. begin
  114769. pTDefRegMap(@Self)^.&set := $00000001;
  114770. end;
  114771. procedure TCAN2_C2FIFOINT18.clearRXNEMPTYIF; inline;
  114772. begin
  114773. pTDefRegMap(@Self)^.clr := $00000001;
  114774. end;
  114775. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  114776. begin
  114777. if thebits = 0 then
  114778. pTDefRegMap(@Self)^.clr := $00000001
  114779. else
  114780. pTDefRegMap(@Self)^.&set := $00000001;
  114781. end;
  114782. function TCAN2_C2FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  114783. begin
  114784. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  114785. end;
  114786. procedure TCAN2_C2FIFOINT18.setRXHALFIF; inline;
  114787. begin
  114788. pTDefRegMap(@Self)^.&set := $00000002;
  114789. end;
  114790. procedure TCAN2_C2FIFOINT18.clearRXHALFIF; inline;
  114791. begin
  114792. pTDefRegMap(@Self)^.clr := $00000002;
  114793. end;
  114794. procedure TCAN2_C2FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  114795. begin
  114796. if thebits = 0 then
  114797. pTDefRegMap(@Self)^.clr := $00000002
  114798. else
  114799. pTDefRegMap(@Self)^.&set := $00000002;
  114800. end;
  114801. function TCAN2_C2FIFOINT18.getRXHALFIF : TBits_1; inline;
  114802. begin
  114803. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  114804. end;
  114805. procedure TCAN2_C2FIFOINT18.setRXFULLIF; inline;
  114806. begin
  114807. pTDefRegMap(@Self)^.&set := $00000004;
  114808. end;
  114809. procedure TCAN2_C2FIFOINT18.clearRXFULLIF; inline;
  114810. begin
  114811. pTDefRegMap(@Self)^.clr := $00000004;
  114812. end;
  114813. procedure TCAN2_C2FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  114814. begin
  114815. if thebits = 0 then
  114816. pTDefRegMap(@Self)^.clr := $00000004
  114817. else
  114818. pTDefRegMap(@Self)^.&set := $00000004;
  114819. end;
  114820. function TCAN2_C2FIFOINT18.getRXFULLIF : TBits_1; inline;
  114821. begin
  114822. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114823. end;
  114824. procedure TCAN2_C2FIFOINT18.setRXOVFLIF; inline;
  114825. begin
  114826. pTDefRegMap(@Self)^.&set := $00000008;
  114827. end;
  114828. procedure TCAN2_C2FIFOINT18.clearRXOVFLIF; inline;
  114829. begin
  114830. pTDefRegMap(@Self)^.clr := $00000008;
  114831. end;
  114832. procedure TCAN2_C2FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  114833. begin
  114834. if thebits = 0 then
  114835. pTDefRegMap(@Self)^.clr := $00000008
  114836. else
  114837. pTDefRegMap(@Self)^.&set := $00000008;
  114838. end;
  114839. function TCAN2_C2FIFOINT18.getRXOVFLIF : TBits_1; inline;
  114840. begin
  114841. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114842. end;
  114843. procedure TCAN2_C2FIFOINT18.setTXEMPTYIF; inline;
  114844. begin
  114845. pTDefRegMap(@Self)^.&set := $00000100;
  114846. end;
  114847. procedure TCAN2_C2FIFOINT18.clearTXEMPTYIF; inline;
  114848. begin
  114849. pTDefRegMap(@Self)^.clr := $00000100;
  114850. end;
  114851. procedure TCAN2_C2FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  114852. begin
  114853. if thebits = 0 then
  114854. pTDefRegMap(@Self)^.clr := $00000100
  114855. else
  114856. pTDefRegMap(@Self)^.&set := $00000100;
  114857. end;
  114858. function TCAN2_C2FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  114859. begin
  114860. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  114861. end;
  114862. procedure TCAN2_C2FIFOINT18.setTXHALFIF; inline;
  114863. begin
  114864. pTDefRegMap(@Self)^.&set := $00000200;
  114865. end;
  114866. procedure TCAN2_C2FIFOINT18.clearTXHALFIF; inline;
  114867. begin
  114868. pTDefRegMap(@Self)^.clr := $00000200;
  114869. end;
  114870. procedure TCAN2_C2FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  114871. begin
  114872. if thebits = 0 then
  114873. pTDefRegMap(@Self)^.clr := $00000200
  114874. else
  114875. pTDefRegMap(@Self)^.&set := $00000200;
  114876. end;
  114877. function TCAN2_C2FIFOINT18.getTXHALFIF : TBits_1; inline;
  114878. begin
  114879. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  114880. end;
  114881. procedure TCAN2_C2FIFOINT18.setTXNFULLIF; inline;
  114882. begin
  114883. pTDefRegMap(@Self)^.&set := $00000400;
  114884. end;
  114885. procedure TCAN2_C2FIFOINT18.clearTXNFULLIF; inline;
  114886. begin
  114887. pTDefRegMap(@Self)^.clr := $00000400;
  114888. end;
  114889. procedure TCAN2_C2FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  114890. begin
  114891. if thebits = 0 then
  114892. pTDefRegMap(@Self)^.clr := $00000400
  114893. else
  114894. pTDefRegMap(@Self)^.&set := $00000400;
  114895. end;
  114896. function TCAN2_C2FIFOINT18.getTXNFULLIF : TBits_1; inline;
  114897. begin
  114898. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  114899. end;
  114900. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIE; inline;
  114901. begin
  114902. pTDefRegMap(@Self)^.&set := $00010000;
  114903. end;
  114904. procedure TCAN2_C2FIFOINT18.clearRXNEMPTYIE; inline;
  114905. begin
  114906. pTDefRegMap(@Self)^.clr := $00010000;
  114907. end;
  114908. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  114909. begin
  114910. if thebits = 0 then
  114911. pTDefRegMap(@Self)^.clr := $00010000
  114912. else
  114913. pTDefRegMap(@Self)^.&set := $00010000;
  114914. end;
  114915. function TCAN2_C2FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  114916. begin
  114917. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  114918. end;
  114919. procedure TCAN2_C2FIFOINT18.setRXHALFIE; inline;
  114920. begin
  114921. pTDefRegMap(@Self)^.&set := $00020000;
  114922. end;
  114923. procedure TCAN2_C2FIFOINT18.clearRXHALFIE; inline;
  114924. begin
  114925. pTDefRegMap(@Self)^.clr := $00020000;
  114926. end;
  114927. procedure TCAN2_C2FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  114928. begin
  114929. if thebits = 0 then
  114930. pTDefRegMap(@Self)^.clr := $00020000
  114931. else
  114932. pTDefRegMap(@Self)^.&set := $00020000;
  114933. end;
  114934. function TCAN2_C2FIFOINT18.getRXHALFIE : TBits_1; inline;
  114935. begin
  114936. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  114937. end;
  114938. procedure TCAN2_C2FIFOINT18.setRXFULLIE; inline;
  114939. begin
  114940. pTDefRegMap(@Self)^.&set := $00040000;
  114941. end;
  114942. procedure TCAN2_C2FIFOINT18.clearRXFULLIE; inline;
  114943. begin
  114944. pTDefRegMap(@Self)^.clr := $00040000;
  114945. end;
  114946. procedure TCAN2_C2FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  114947. begin
  114948. if thebits = 0 then
  114949. pTDefRegMap(@Self)^.clr := $00040000
  114950. else
  114951. pTDefRegMap(@Self)^.&set := $00040000;
  114952. end;
  114953. function TCAN2_C2FIFOINT18.getRXFULLIE : TBits_1; inline;
  114954. begin
  114955. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  114956. end;
  114957. procedure TCAN2_C2FIFOINT18.setRXOVFLIE; inline;
  114958. begin
  114959. pTDefRegMap(@Self)^.&set := $00080000;
  114960. end;
  114961. procedure TCAN2_C2FIFOINT18.clearRXOVFLIE; inline;
  114962. begin
  114963. pTDefRegMap(@Self)^.clr := $00080000;
  114964. end;
  114965. procedure TCAN2_C2FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  114966. begin
  114967. if thebits = 0 then
  114968. pTDefRegMap(@Self)^.clr := $00080000
  114969. else
  114970. pTDefRegMap(@Self)^.&set := $00080000;
  114971. end;
  114972. function TCAN2_C2FIFOINT18.getRXOVFLIE : TBits_1; inline;
  114973. begin
  114974. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  114975. end;
  114976. procedure TCAN2_C2FIFOINT18.setTXEMPTYIE; inline;
  114977. begin
  114978. pTDefRegMap(@Self)^.&set := $01000000;
  114979. end;
  114980. procedure TCAN2_C2FIFOINT18.clearTXEMPTYIE; inline;
  114981. begin
  114982. pTDefRegMap(@Self)^.clr := $01000000;
  114983. end;
  114984. procedure TCAN2_C2FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  114985. begin
  114986. if thebits = 0 then
  114987. pTDefRegMap(@Self)^.clr := $01000000
  114988. else
  114989. pTDefRegMap(@Self)^.&set := $01000000;
  114990. end;
  114991. function TCAN2_C2FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  114992. begin
  114993. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  114994. end;
  114995. procedure TCAN2_C2FIFOINT18.setTXHALFIE; inline;
  114996. begin
  114997. pTDefRegMap(@Self)^.&set := $02000000;
  114998. end;
  114999. procedure TCAN2_C2FIFOINT18.clearTXHALFIE; inline;
  115000. begin
  115001. pTDefRegMap(@Self)^.clr := $02000000;
  115002. end;
  115003. procedure TCAN2_C2FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  115004. begin
  115005. if thebits = 0 then
  115006. pTDefRegMap(@Self)^.clr := $02000000
  115007. else
  115008. pTDefRegMap(@Self)^.&set := $02000000;
  115009. end;
  115010. function TCAN2_C2FIFOINT18.getTXHALFIE : TBits_1; inline;
  115011. begin
  115012. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  115013. end;
  115014. procedure TCAN2_C2FIFOINT18.setTXNFULLIE; inline;
  115015. begin
  115016. pTDefRegMap(@Self)^.&set := $04000000;
  115017. end;
  115018. procedure TCAN2_C2FIFOINT18.clearTXNFULLIE; inline;
  115019. begin
  115020. pTDefRegMap(@Self)^.clr := $04000000;
  115021. end;
  115022. procedure TCAN2_C2FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  115023. begin
  115024. if thebits = 0 then
  115025. pTDefRegMap(@Self)^.clr := $04000000
  115026. else
  115027. pTDefRegMap(@Self)^.&set := $04000000;
  115028. end;
  115029. function TCAN2_C2FIFOINT18.getTXNFULLIE : TBits_1; inline;
  115030. begin
  115031. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  115032. end;
  115033. procedure TCAN2_C2FIFOINT18.setw(thebits : TBits_32); inline;
  115034. begin
  115035. pTDefRegMap(@Self)^.val := thebits;
  115036. end;
  115037. function TCAN2_C2FIFOINT18.getw : TBits_32; inline;
  115038. begin
  115039. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115040. end;
  115041. procedure TCAN2_C2FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  115042. begin
  115043. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  115044. end;
  115045. function TCAN2_C2FIFOCI18.getCFIFOCI : TBits_5; inline;
  115046. begin
  115047. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  115048. end;
  115049. procedure TCAN2_C2FIFOCI18.setw(thebits : TBits_32); inline;
  115050. begin
  115051. pTDefRegMap(@Self)^.val := thebits;
  115052. end;
  115053. function TCAN2_C2FIFOCI18.getw : TBits_32; inline;
  115054. begin
  115055. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115056. end;
  115057. procedure TCAN2_C2FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  115058. begin
  115059. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  115060. end;
  115061. function TCAN2_C2FIFOCON19.getTXPRI : TBits_2; inline;
  115062. begin
  115063. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  115064. end;
  115065. procedure TCAN2_C2FIFOCON19.setRTREN; inline;
  115066. begin
  115067. pTDefRegMap(@Self)^.&set := $00000004;
  115068. end;
  115069. procedure TCAN2_C2FIFOCON19.clearRTREN; inline;
  115070. begin
  115071. pTDefRegMap(@Self)^.clr := $00000004;
  115072. end;
  115073. procedure TCAN2_C2FIFOCON19.setRTREN(thebits : TBits_1); inline;
  115074. begin
  115075. if thebits = 0 then
  115076. pTDefRegMap(@Self)^.clr := $00000004
  115077. else
  115078. pTDefRegMap(@Self)^.&set := $00000004;
  115079. end;
  115080. function TCAN2_C2FIFOCON19.getRTREN : TBits_1; inline;
  115081. begin
  115082. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115083. end;
  115084. procedure TCAN2_C2FIFOCON19.setTXREQ; inline;
  115085. begin
  115086. pTDefRegMap(@Self)^.&set := $00000008;
  115087. end;
  115088. procedure TCAN2_C2FIFOCON19.clearTXREQ; inline;
  115089. begin
  115090. pTDefRegMap(@Self)^.clr := $00000008;
  115091. end;
  115092. procedure TCAN2_C2FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  115093. begin
  115094. if thebits = 0 then
  115095. pTDefRegMap(@Self)^.clr := $00000008
  115096. else
  115097. pTDefRegMap(@Self)^.&set := $00000008;
  115098. end;
  115099. function TCAN2_C2FIFOCON19.getTXREQ : TBits_1; inline;
  115100. begin
  115101. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115102. end;
  115103. procedure TCAN2_C2FIFOCON19.setTXERR; inline;
  115104. begin
  115105. pTDefRegMap(@Self)^.&set := $00000010;
  115106. end;
  115107. procedure TCAN2_C2FIFOCON19.clearTXERR; inline;
  115108. begin
  115109. pTDefRegMap(@Self)^.clr := $00000010;
  115110. end;
  115111. procedure TCAN2_C2FIFOCON19.setTXERR(thebits : TBits_1); inline;
  115112. begin
  115113. if thebits = 0 then
  115114. pTDefRegMap(@Self)^.clr := $00000010
  115115. else
  115116. pTDefRegMap(@Self)^.&set := $00000010;
  115117. end;
  115118. function TCAN2_C2FIFOCON19.getTXERR : TBits_1; inline;
  115119. begin
  115120. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  115121. end;
  115122. procedure TCAN2_C2FIFOCON19.setTXLARB; inline;
  115123. begin
  115124. pTDefRegMap(@Self)^.&set := $00000020;
  115125. end;
  115126. procedure TCAN2_C2FIFOCON19.clearTXLARB; inline;
  115127. begin
  115128. pTDefRegMap(@Self)^.clr := $00000020;
  115129. end;
  115130. procedure TCAN2_C2FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  115131. begin
  115132. if thebits = 0 then
  115133. pTDefRegMap(@Self)^.clr := $00000020
  115134. else
  115135. pTDefRegMap(@Self)^.&set := $00000020;
  115136. end;
  115137. function TCAN2_C2FIFOCON19.getTXLARB : TBits_1; inline;
  115138. begin
  115139. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  115140. end;
  115141. procedure TCAN2_C2FIFOCON19.setTXABAT; inline;
  115142. begin
  115143. pTDefRegMap(@Self)^.&set := $00000040;
  115144. end;
  115145. procedure TCAN2_C2FIFOCON19.clearTXABAT; inline;
  115146. begin
  115147. pTDefRegMap(@Self)^.clr := $00000040;
  115148. end;
  115149. procedure TCAN2_C2FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  115150. begin
  115151. if thebits = 0 then
  115152. pTDefRegMap(@Self)^.clr := $00000040
  115153. else
  115154. pTDefRegMap(@Self)^.&set := $00000040;
  115155. end;
  115156. function TCAN2_C2FIFOCON19.getTXABAT : TBits_1; inline;
  115157. begin
  115158. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  115159. end;
  115160. procedure TCAN2_C2FIFOCON19.setTXEN; inline;
  115161. begin
  115162. pTDefRegMap(@Self)^.&set := $00000080;
  115163. end;
  115164. procedure TCAN2_C2FIFOCON19.clearTXEN; inline;
  115165. begin
  115166. pTDefRegMap(@Self)^.clr := $00000080;
  115167. end;
  115168. procedure TCAN2_C2FIFOCON19.setTXEN(thebits : TBits_1); inline;
  115169. begin
  115170. if thebits = 0 then
  115171. pTDefRegMap(@Self)^.clr := $00000080
  115172. else
  115173. pTDefRegMap(@Self)^.&set := $00000080;
  115174. end;
  115175. function TCAN2_C2FIFOCON19.getTXEN : TBits_1; inline;
  115176. begin
  115177. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  115178. end;
  115179. procedure TCAN2_C2FIFOCON19.setDONLY; inline;
  115180. begin
  115181. pTDefRegMap(@Self)^.&set := $00001000;
  115182. end;
  115183. procedure TCAN2_C2FIFOCON19.clearDONLY; inline;
  115184. begin
  115185. pTDefRegMap(@Self)^.clr := $00001000;
  115186. end;
  115187. procedure TCAN2_C2FIFOCON19.setDONLY(thebits : TBits_1); inline;
  115188. begin
  115189. if thebits = 0 then
  115190. pTDefRegMap(@Self)^.clr := $00001000
  115191. else
  115192. pTDefRegMap(@Self)^.&set := $00001000;
  115193. end;
  115194. function TCAN2_C2FIFOCON19.getDONLY : TBits_1; inline;
  115195. begin
  115196. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  115197. end;
  115198. procedure TCAN2_C2FIFOCON19.setUINC; inline;
  115199. begin
  115200. pTDefRegMap(@Self)^.&set := $00002000;
  115201. end;
  115202. procedure TCAN2_C2FIFOCON19.clearUINC; inline;
  115203. begin
  115204. pTDefRegMap(@Self)^.clr := $00002000;
  115205. end;
  115206. procedure TCAN2_C2FIFOCON19.setUINC(thebits : TBits_1); inline;
  115207. begin
  115208. if thebits = 0 then
  115209. pTDefRegMap(@Self)^.clr := $00002000
  115210. else
  115211. pTDefRegMap(@Self)^.&set := $00002000;
  115212. end;
  115213. function TCAN2_C2FIFOCON19.getUINC : TBits_1; inline;
  115214. begin
  115215. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  115216. end;
  115217. procedure TCAN2_C2FIFOCON19.setFRESET; inline;
  115218. begin
  115219. pTDefRegMap(@Self)^.&set := $00004000;
  115220. end;
  115221. procedure TCAN2_C2FIFOCON19.clearFRESET; inline;
  115222. begin
  115223. pTDefRegMap(@Self)^.clr := $00004000;
  115224. end;
  115225. procedure TCAN2_C2FIFOCON19.setFRESET(thebits : TBits_1); inline;
  115226. begin
  115227. if thebits = 0 then
  115228. pTDefRegMap(@Self)^.clr := $00004000
  115229. else
  115230. pTDefRegMap(@Self)^.&set := $00004000;
  115231. end;
  115232. function TCAN2_C2FIFOCON19.getFRESET : TBits_1; inline;
  115233. begin
  115234. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  115235. end;
  115236. procedure TCAN2_C2FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  115237. begin
  115238. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  115239. end;
  115240. function TCAN2_C2FIFOCON19.getFSIZE : TBits_5; inline;
  115241. begin
  115242. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  115243. end;
  115244. procedure TCAN2_C2FIFOCON19.setw(thebits : TBits_32); inline;
  115245. begin
  115246. pTDefRegMap(@Self)^.val := thebits;
  115247. end;
  115248. function TCAN2_C2FIFOCON19.getw : TBits_32; inline;
  115249. begin
  115250. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115251. end;
  115252. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIF; inline;
  115253. begin
  115254. pTDefRegMap(@Self)^.&set := $00000001;
  115255. end;
  115256. procedure TCAN2_C2FIFOINT19.clearRXNEMPTYIF; inline;
  115257. begin
  115258. pTDefRegMap(@Self)^.clr := $00000001;
  115259. end;
  115260. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  115261. begin
  115262. if thebits = 0 then
  115263. pTDefRegMap(@Self)^.clr := $00000001
  115264. else
  115265. pTDefRegMap(@Self)^.&set := $00000001;
  115266. end;
  115267. function TCAN2_C2FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  115268. begin
  115269. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  115270. end;
  115271. procedure TCAN2_C2FIFOINT19.setRXHALFIF; inline;
  115272. begin
  115273. pTDefRegMap(@Self)^.&set := $00000002;
  115274. end;
  115275. procedure TCAN2_C2FIFOINT19.clearRXHALFIF; inline;
  115276. begin
  115277. pTDefRegMap(@Self)^.clr := $00000002;
  115278. end;
  115279. procedure TCAN2_C2FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  115280. begin
  115281. if thebits = 0 then
  115282. pTDefRegMap(@Self)^.clr := $00000002
  115283. else
  115284. pTDefRegMap(@Self)^.&set := $00000002;
  115285. end;
  115286. function TCAN2_C2FIFOINT19.getRXHALFIF : TBits_1; inline;
  115287. begin
  115288. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  115289. end;
  115290. procedure TCAN2_C2FIFOINT19.setRXFULLIF; inline;
  115291. begin
  115292. pTDefRegMap(@Self)^.&set := $00000004;
  115293. end;
  115294. procedure TCAN2_C2FIFOINT19.clearRXFULLIF; inline;
  115295. begin
  115296. pTDefRegMap(@Self)^.clr := $00000004;
  115297. end;
  115298. procedure TCAN2_C2FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  115299. begin
  115300. if thebits = 0 then
  115301. pTDefRegMap(@Self)^.clr := $00000004
  115302. else
  115303. pTDefRegMap(@Self)^.&set := $00000004;
  115304. end;
  115305. function TCAN2_C2FIFOINT19.getRXFULLIF : TBits_1; inline;
  115306. begin
  115307. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115308. end;
  115309. procedure TCAN2_C2FIFOINT19.setRXOVFLIF; inline;
  115310. begin
  115311. pTDefRegMap(@Self)^.&set := $00000008;
  115312. end;
  115313. procedure TCAN2_C2FIFOINT19.clearRXOVFLIF; inline;
  115314. begin
  115315. pTDefRegMap(@Self)^.clr := $00000008;
  115316. end;
  115317. procedure TCAN2_C2FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  115318. begin
  115319. if thebits = 0 then
  115320. pTDefRegMap(@Self)^.clr := $00000008
  115321. else
  115322. pTDefRegMap(@Self)^.&set := $00000008;
  115323. end;
  115324. function TCAN2_C2FIFOINT19.getRXOVFLIF : TBits_1; inline;
  115325. begin
  115326. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115327. end;
  115328. procedure TCAN2_C2FIFOINT19.setTXEMPTYIF; inline;
  115329. begin
  115330. pTDefRegMap(@Self)^.&set := $00000100;
  115331. end;
  115332. procedure TCAN2_C2FIFOINT19.clearTXEMPTYIF; inline;
  115333. begin
  115334. pTDefRegMap(@Self)^.clr := $00000100;
  115335. end;
  115336. procedure TCAN2_C2FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  115337. begin
  115338. if thebits = 0 then
  115339. pTDefRegMap(@Self)^.clr := $00000100
  115340. else
  115341. pTDefRegMap(@Self)^.&set := $00000100;
  115342. end;
  115343. function TCAN2_C2FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  115344. begin
  115345. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  115346. end;
  115347. procedure TCAN2_C2FIFOINT19.setTXHALFIF; inline;
  115348. begin
  115349. pTDefRegMap(@Self)^.&set := $00000200;
  115350. end;
  115351. procedure TCAN2_C2FIFOINT19.clearTXHALFIF; inline;
  115352. begin
  115353. pTDefRegMap(@Self)^.clr := $00000200;
  115354. end;
  115355. procedure TCAN2_C2FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  115356. begin
  115357. if thebits = 0 then
  115358. pTDefRegMap(@Self)^.clr := $00000200
  115359. else
  115360. pTDefRegMap(@Self)^.&set := $00000200;
  115361. end;
  115362. function TCAN2_C2FIFOINT19.getTXHALFIF : TBits_1; inline;
  115363. begin
  115364. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  115365. end;
  115366. procedure TCAN2_C2FIFOINT19.setTXNFULLIF; inline;
  115367. begin
  115368. pTDefRegMap(@Self)^.&set := $00000400;
  115369. end;
  115370. procedure TCAN2_C2FIFOINT19.clearTXNFULLIF; inline;
  115371. begin
  115372. pTDefRegMap(@Self)^.clr := $00000400;
  115373. end;
  115374. procedure TCAN2_C2FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  115375. begin
  115376. if thebits = 0 then
  115377. pTDefRegMap(@Self)^.clr := $00000400
  115378. else
  115379. pTDefRegMap(@Self)^.&set := $00000400;
  115380. end;
  115381. function TCAN2_C2FIFOINT19.getTXNFULLIF : TBits_1; inline;
  115382. begin
  115383. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  115384. end;
  115385. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIE; inline;
  115386. begin
  115387. pTDefRegMap(@Self)^.&set := $00010000;
  115388. end;
  115389. procedure TCAN2_C2FIFOINT19.clearRXNEMPTYIE; inline;
  115390. begin
  115391. pTDefRegMap(@Self)^.clr := $00010000;
  115392. end;
  115393. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  115394. begin
  115395. if thebits = 0 then
  115396. pTDefRegMap(@Self)^.clr := $00010000
  115397. else
  115398. pTDefRegMap(@Self)^.&set := $00010000;
  115399. end;
  115400. function TCAN2_C2FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  115401. begin
  115402. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  115403. end;
  115404. procedure TCAN2_C2FIFOINT19.setRXHALFIE; inline;
  115405. begin
  115406. pTDefRegMap(@Self)^.&set := $00020000;
  115407. end;
  115408. procedure TCAN2_C2FIFOINT19.clearRXHALFIE; inline;
  115409. begin
  115410. pTDefRegMap(@Self)^.clr := $00020000;
  115411. end;
  115412. procedure TCAN2_C2FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  115413. begin
  115414. if thebits = 0 then
  115415. pTDefRegMap(@Self)^.clr := $00020000
  115416. else
  115417. pTDefRegMap(@Self)^.&set := $00020000;
  115418. end;
  115419. function TCAN2_C2FIFOINT19.getRXHALFIE : TBits_1; inline;
  115420. begin
  115421. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  115422. end;
  115423. procedure TCAN2_C2FIFOINT19.setRXFULLIE; inline;
  115424. begin
  115425. pTDefRegMap(@Self)^.&set := $00040000;
  115426. end;
  115427. procedure TCAN2_C2FIFOINT19.clearRXFULLIE; inline;
  115428. begin
  115429. pTDefRegMap(@Self)^.clr := $00040000;
  115430. end;
  115431. procedure TCAN2_C2FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  115432. begin
  115433. if thebits = 0 then
  115434. pTDefRegMap(@Self)^.clr := $00040000
  115435. else
  115436. pTDefRegMap(@Self)^.&set := $00040000;
  115437. end;
  115438. function TCAN2_C2FIFOINT19.getRXFULLIE : TBits_1; inline;
  115439. begin
  115440. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  115441. end;
  115442. procedure TCAN2_C2FIFOINT19.setRXOVFLIE; inline;
  115443. begin
  115444. pTDefRegMap(@Self)^.&set := $00080000;
  115445. end;
  115446. procedure TCAN2_C2FIFOINT19.clearRXOVFLIE; inline;
  115447. begin
  115448. pTDefRegMap(@Self)^.clr := $00080000;
  115449. end;
  115450. procedure TCAN2_C2FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  115451. begin
  115452. if thebits = 0 then
  115453. pTDefRegMap(@Self)^.clr := $00080000
  115454. else
  115455. pTDefRegMap(@Self)^.&set := $00080000;
  115456. end;
  115457. function TCAN2_C2FIFOINT19.getRXOVFLIE : TBits_1; inline;
  115458. begin
  115459. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  115460. end;
  115461. procedure TCAN2_C2FIFOINT19.setTXEMPTYIE; inline;
  115462. begin
  115463. pTDefRegMap(@Self)^.&set := $01000000;
  115464. end;
  115465. procedure TCAN2_C2FIFOINT19.clearTXEMPTYIE; inline;
  115466. begin
  115467. pTDefRegMap(@Self)^.clr := $01000000;
  115468. end;
  115469. procedure TCAN2_C2FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  115470. begin
  115471. if thebits = 0 then
  115472. pTDefRegMap(@Self)^.clr := $01000000
  115473. else
  115474. pTDefRegMap(@Self)^.&set := $01000000;
  115475. end;
  115476. function TCAN2_C2FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  115477. begin
  115478. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  115479. end;
  115480. procedure TCAN2_C2FIFOINT19.setTXHALFIE; inline;
  115481. begin
  115482. pTDefRegMap(@Self)^.&set := $02000000;
  115483. end;
  115484. procedure TCAN2_C2FIFOINT19.clearTXHALFIE; inline;
  115485. begin
  115486. pTDefRegMap(@Self)^.clr := $02000000;
  115487. end;
  115488. procedure TCAN2_C2FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  115489. begin
  115490. if thebits = 0 then
  115491. pTDefRegMap(@Self)^.clr := $02000000
  115492. else
  115493. pTDefRegMap(@Self)^.&set := $02000000;
  115494. end;
  115495. function TCAN2_C2FIFOINT19.getTXHALFIE : TBits_1; inline;
  115496. begin
  115497. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  115498. end;
  115499. procedure TCAN2_C2FIFOINT19.setTXNFULLIE; inline;
  115500. begin
  115501. pTDefRegMap(@Self)^.&set := $04000000;
  115502. end;
  115503. procedure TCAN2_C2FIFOINT19.clearTXNFULLIE; inline;
  115504. begin
  115505. pTDefRegMap(@Self)^.clr := $04000000;
  115506. end;
  115507. procedure TCAN2_C2FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  115508. begin
  115509. if thebits = 0 then
  115510. pTDefRegMap(@Self)^.clr := $04000000
  115511. else
  115512. pTDefRegMap(@Self)^.&set := $04000000;
  115513. end;
  115514. function TCAN2_C2FIFOINT19.getTXNFULLIE : TBits_1; inline;
  115515. begin
  115516. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  115517. end;
  115518. procedure TCAN2_C2FIFOINT19.setw(thebits : TBits_32); inline;
  115519. begin
  115520. pTDefRegMap(@Self)^.val := thebits;
  115521. end;
  115522. function TCAN2_C2FIFOINT19.getw : TBits_32; inline;
  115523. begin
  115524. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115525. end;
  115526. procedure TCAN2_C2FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  115527. begin
  115528. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  115529. end;
  115530. function TCAN2_C2FIFOCI19.getCFIFOCI : TBits_5; inline;
  115531. begin
  115532. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  115533. end;
  115534. procedure TCAN2_C2FIFOCI19.setw(thebits : TBits_32); inline;
  115535. begin
  115536. pTDefRegMap(@Self)^.val := thebits;
  115537. end;
  115538. function TCAN2_C2FIFOCI19.getw : TBits_32; inline;
  115539. begin
  115540. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115541. end;
  115542. procedure TCAN2_C2FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  115543. begin
  115544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  115545. end;
  115546. function TCAN2_C2FIFOCON20.getTXPRI : TBits_2; inline;
  115547. begin
  115548. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  115549. end;
  115550. procedure TCAN2_C2FIFOCON20.setRTREN; inline;
  115551. begin
  115552. pTDefRegMap(@Self)^.&set := $00000004;
  115553. end;
  115554. procedure TCAN2_C2FIFOCON20.clearRTREN; inline;
  115555. begin
  115556. pTDefRegMap(@Self)^.clr := $00000004;
  115557. end;
  115558. procedure TCAN2_C2FIFOCON20.setRTREN(thebits : TBits_1); inline;
  115559. begin
  115560. if thebits = 0 then
  115561. pTDefRegMap(@Self)^.clr := $00000004
  115562. else
  115563. pTDefRegMap(@Self)^.&set := $00000004;
  115564. end;
  115565. function TCAN2_C2FIFOCON20.getRTREN : TBits_1; inline;
  115566. begin
  115567. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115568. end;
  115569. procedure TCAN2_C2FIFOCON20.setTXREQ; inline;
  115570. begin
  115571. pTDefRegMap(@Self)^.&set := $00000008;
  115572. end;
  115573. procedure TCAN2_C2FIFOCON20.clearTXREQ; inline;
  115574. begin
  115575. pTDefRegMap(@Self)^.clr := $00000008;
  115576. end;
  115577. procedure TCAN2_C2FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  115578. begin
  115579. if thebits = 0 then
  115580. pTDefRegMap(@Self)^.clr := $00000008
  115581. else
  115582. pTDefRegMap(@Self)^.&set := $00000008;
  115583. end;
  115584. function TCAN2_C2FIFOCON20.getTXREQ : TBits_1; inline;
  115585. begin
  115586. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115587. end;
  115588. procedure TCAN2_C2FIFOCON20.setTXERR; inline;
  115589. begin
  115590. pTDefRegMap(@Self)^.&set := $00000010;
  115591. end;
  115592. procedure TCAN2_C2FIFOCON20.clearTXERR; inline;
  115593. begin
  115594. pTDefRegMap(@Self)^.clr := $00000010;
  115595. end;
  115596. procedure TCAN2_C2FIFOCON20.setTXERR(thebits : TBits_1); inline;
  115597. begin
  115598. if thebits = 0 then
  115599. pTDefRegMap(@Self)^.clr := $00000010
  115600. else
  115601. pTDefRegMap(@Self)^.&set := $00000010;
  115602. end;
  115603. function TCAN2_C2FIFOCON20.getTXERR : TBits_1; inline;
  115604. begin
  115605. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  115606. end;
  115607. procedure TCAN2_C2FIFOCON20.setTXLARB; inline;
  115608. begin
  115609. pTDefRegMap(@Self)^.&set := $00000020;
  115610. end;
  115611. procedure TCAN2_C2FIFOCON20.clearTXLARB; inline;
  115612. begin
  115613. pTDefRegMap(@Self)^.clr := $00000020;
  115614. end;
  115615. procedure TCAN2_C2FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  115616. begin
  115617. if thebits = 0 then
  115618. pTDefRegMap(@Self)^.clr := $00000020
  115619. else
  115620. pTDefRegMap(@Self)^.&set := $00000020;
  115621. end;
  115622. function TCAN2_C2FIFOCON20.getTXLARB : TBits_1; inline;
  115623. begin
  115624. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  115625. end;
  115626. procedure TCAN2_C2FIFOCON20.setTXABAT; inline;
  115627. begin
  115628. pTDefRegMap(@Self)^.&set := $00000040;
  115629. end;
  115630. procedure TCAN2_C2FIFOCON20.clearTXABAT; inline;
  115631. begin
  115632. pTDefRegMap(@Self)^.clr := $00000040;
  115633. end;
  115634. procedure TCAN2_C2FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  115635. begin
  115636. if thebits = 0 then
  115637. pTDefRegMap(@Self)^.clr := $00000040
  115638. else
  115639. pTDefRegMap(@Self)^.&set := $00000040;
  115640. end;
  115641. function TCAN2_C2FIFOCON20.getTXABAT : TBits_1; inline;
  115642. begin
  115643. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  115644. end;
  115645. procedure TCAN2_C2FIFOCON20.setTXEN; inline;
  115646. begin
  115647. pTDefRegMap(@Self)^.&set := $00000080;
  115648. end;
  115649. procedure TCAN2_C2FIFOCON20.clearTXEN; inline;
  115650. begin
  115651. pTDefRegMap(@Self)^.clr := $00000080;
  115652. end;
  115653. procedure TCAN2_C2FIFOCON20.setTXEN(thebits : TBits_1); inline;
  115654. begin
  115655. if thebits = 0 then
  115656. pTDefRegMap(@Self)^.clr := $00000080
  115657. else
  115658. pTDefRegMap(@Self)^.&set := $00000080;
  115659. end;
  115660. function TCAN2_C2FIFOCON20.getTXEN : TBits_1; inline;
  115661. begin
  115662. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  115663. end;
  115664. procedure TCAN2_C2FIFOCON20.setDONLY; inline;
  115665. begin
  115666. pTDefRegMap(@Self)^.&set := $00001000;
  115667. end;
  115668. procedure TCAN2_C2FIFOCON20.clearDONLY; inline;
  115669. begin
  115670. pTDefRegMap(@Self)^.clr := $00001000;
  115671. end;
  115672. procedure TCAN2_C2FIFOCON20.setDONLY(thebits : TBits_1); inline;
  115673. begin
  115674. if thebits = 0 then
  115675. pTDefRegMap(@Self)^.clr := $00001000
  115676. else
  115677. pTDefRegMap(@Self)^.&set := $00001000;
  115678. end;
  115679. function TCAN2_C2FIFOCON20.getDONLY : TBits_1; inline;
  115680. begin
  115681. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  115682. end;
  115683. procedure TCAN2_C2FIFOCON20.setUINC; inline;
  115684. begin
  115685. pTDefRegMap(@Self)^.&set := $00002000;
  115686. end;
  115687. procedure TCAN2_C2FIFOCON20.clearUINC; inline;
  115688. begin
  115689. pTDefRegMap(@Self)^.clr := $00002000;
  115690. end;
  115691. procedure TCAN2_C2FIFOCON20.setUINC(thebits : TBits_1); inline;
  115692. begin
  115693. if thebits = 0 then
  115694. pTDefRegMap(@Self)^.clr := $00002000
  115695. else
  115696. pTDefRegMap(@Self)^.&set := $00002000;
  115697. end;
  115698. function TCAN2_C2FIFOCON20.getUINC : TBits_1; inline;
  115699. begin
  115700. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  115701. end;
  115702. procedure TCAN2_C2FIFOCON20.setFRESET; inline;
  115703. begin
  115704. pTDefRegMap(@Self)^.&set := $00004000;
  115705. end;
  115706. procedure TCAN2_C2FIFOCON20.clearFRESET; inline;
  115707. begin
  115708. pTDefRegMap(@Self)^.clr := $00004000;
  115709. end;
  115710. procedure TCAN2_C2FIFOCON20.setFRESET(thebits : TBits_1); inline;
  115711. begin
  115712. if thebits = 0 then
  115713. pTDefRegMap(@Self)^.clr := $00004000
  115714. else
  115715. pTDefRegMap(@Self)^.&set := $00004000;
  115716. end;
  115717. function TCAN2_C2FIFOCON20.getFRESET : TBits_1; inline;
  115718. begin
  115719. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  115720. end;
  115721. procedure TCAN2_C2FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  115722. begin
  115723. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  115724. end;
  115725. function TCAN2_C2FIFOCON20.getFSIZE : TBits_5; inline;
  115726. begin
  115727. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  115728. end;
  115729. procedure TCAN2_C2FIFOCON20.setw(thebits : TBits_32); inline;
  115730. begin
  115731. pTDefRegMap(@Self)^.val := thebits;
  115732. end;
  115733. function TCAN2_C2FIFOCON20.getw : TBits_32; inline;
  115734. begin
  115735. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115736. end;
  115737. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIF; inline;
  115738. begin
  115739. pTDefRegMap(@Self)^.&set := $00000001;
  115740. end;
  115741. procedure TCAN2_C2FIFOINT20.clearRXNEMPTYIF; inline;
  115742. begin
  115743. pTDefRegMap(@Self)^.clr := $00000001;
  115744. end;
  115745. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  115746. begin
  115747. if thebits = 0 then
  115748. pTDefRegMap(@Self)^.clr := $00000001
  115749. else
  115750. pTDefRegMap(@Self)^.&set := $00000001;
  115751. end;
  115752. function TCAN2_C2FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  115753. begin
  115754. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  115755. end;
  115756. procedure TCAN2_C2FIFOINT20.setRXHALFIF; inline;
  115757. begin
  115758. pTDefRegMap(@Self)^.&set := $00000002;
  115759. end;
  115760. procedure TCAN2_C2FIFOINT20.clearRXHALFIF; inline;
  115761. begin
  115762. pTDefRegMap(@Self)^.clr := $00000002;
  115763. end;
  115764. procedure TCAN2_C2FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  115765. begin
  115766. if thebits = 0 then
  115767. pTDefRegMap(@Self)^.clr := $00000002
  115768. else
  115769. pTDefRegMap(@Self)^.&set := $00000002;
  115770. end;
  115771. function TCAN2_C2FIFOINT20.getRXHALFIF : TBits_1; inline;
  115772. begin
  115773. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  115774. end;
  115775. procedure TCAN2_C2FIFOINT20.setRXFULLIF; inline;
  115776. begin
  115777. pTDefRegMap(@Self)^.&set := $00000004;
  115778. end;
  115779. procedure TCAN2_C2FIFOINT20.clearRXFULLIF; inline;
  115780. begin
  115781. pTDefRegMap(@Self)^.clr := $00000004;
  115782. end;
  115783. procedure TCAN2_C2FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  115784. begin
  115785. if thebits = 0 then
  115786. pTDefRegMap(@Self)^.clr := $00000004
  115787. else
  115788. pTDefRegMap(@Self)^.&set := $00000004;
  115789. end;
  115790. function TCAN2_C2FIFOINT20.getRXFULLIF : TBits_1; inline;
  115791. begin
  115792. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115793. end;
  115794. procedure TCAN2_C2FIFOINT20.setRXOVFLIF; inline;
  115795. begin
  115796. pTDefRegMap(@Self)^.&set := $00000008;
  115797. end;
  115798. procedure TCAN2_C2FIFOINT20.clearRXOVFLIF; inline;
  115799. begin
  115800. pTDefRegMap(@Self)^.clr := $00000008;
  115801. end;
  115802. procedure TCAN2_C2FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  115803. begin
  115804. if thebits = 0 then
  115805. pTDefRegMap(@Self)^.clr := $00000008
  115806. else
  115807. pTDefRegMap(@Self)^.&set := $00000008;
  115808. end;
  115809. function TCAN2_C2FIFOINT20.getRXOVFLIF : TBits_1; inline;
  115810. begin
  115811. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115812. end;
  115813. procedure TCAN2_C2FIFOINT20.setTXEMPTYIF; inline;
  115814. begin
  115815. pTDefRegMap(@Self)^.&set := $00000100;
  115816. end;
  115817. procedure TCAN2_C2FIFOINT20.clearTXEMPTYIF; inline;
  115818. begin
  115819. pTDefRegMap(@Self)^.clr := $00000100;
  115820. end;
  115821. procedure TCAN2_C2FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  115822. begin
  115823. if thebits = 0 then
  115824. pTDefRegMap(@Self)^.clr := $00000100
  115825. else
  115826. pTDefRegMap(@Self)^.&set := $00000100;
  115827. end;
  115828. function TCAN2_C2FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  115829. begin
  115830. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  115831. end;
  115832. procedure TCAN2_C2FIFOINT20.setTXHALFIF; inline;
  115833. begin
  115834. pTDefRegMap(@Self)^.&set := $00000200;
  115835. end;
  115836. procedure TCAN2_C2FIFOINT20.clearTXHALFIF; inline;
  115837. begin
  115838. pTDefRegMap(@Self)^.clr := $00000200;
  115839. end;
  115840. procedure TCAN2_C2FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  115841. begin
  115842. if thebits = 0 then
  115843. pTDefRegMap(@Self)^.clr := $00000200
  115844. else
  115845. pTDefRegMap(@Self)^.&set := $00000200;
  115846. end;
  115847. function TCAN2_C2FIFOINT20.getTXHALFIF : TBits_1; inline;
  115848. begin
  115849. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  115850. end;
  115851. procedure TCAN2_C2FIFOINT20.setTXNFULLIF; inline;
  115852. begin
  115853. pTDefRegMap(@Self)^.&set := $00000400;
  115854. end;
  115855. procedure TCAN2_C2FIFOINT20.clearTXNFULLIF; inline;
  115856. begin
  115857. pTDefRegMap(@Self)^.clr := $00000400;
  115858. end;
  115859. procedure TCAN2_C2FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  115860. begin
  115861. if thebits = 0 then
  115862. pTDefRegMap(@Self)^.clr := $00000400
  115863. else
  115864. pTDefRegMap(@Self)^.&set := $00000400;
  115865. end;
  115866. function TCAN2_C2FIFOINT20.getTXNFULLIF : TBits_1; inline;
  115867. begin
  115868. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  115869. end;
  115870. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIE; inline;
  115871. begin
  115872. pTDefRegMap(@Self)^.&set := $00010000;
  115873. end;
  115874. procedure TCAN2_C2FIFOINT20.clearRXNEMPTYIE; inline;
  115875. begin
  115876. pTDefRegMap(@Self)^.clr := $00010000;
  115877. end;
  115878. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  115879. begin
  115880. if thebits = 0 then
  115881. pTDefRegMap(@Self)^.clr := $00010000
  115882. else
  115883. pTDefRegMap(@Self)^.&set := $00010000;
  115884. end;
  115885. function TCAN2_C2FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  115886. begin
  115887. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  115888. end;
  115889. procedure TCAN2_C2FIFOINT20.setRXHALFIE; inline;
  115890. begin
  115891. pTDefRegMap(@Self)^.&set := $00020000;
  115892. end;
  115893. procedure TCAN2_C2FIFOINT20.clearRXHALFIE; inline;
  115894. begin
  115895. pTDefRegMap(@Self)^.clr := $00020000;
  115896. end;
  115897. procedure TCAN2_C2FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  115898. begin
  115899. if thebits = 0 then
  115900. pTDefRegMap(@Self)^.clr := $00020000
  115901. else
  115902. pTDefRegMap(@Self)^.&set := $00020000;
  115903. end;
  115904. function TCAN2_C2FIFOINT20.getRXHALFIE : TBits_1; inline;
  115905. begin
  115906. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  115907. end;
  115908. procedure TCAN2_C2FIFOINT20.setRXFULLIE; inline;
  115909. begin
  115910. pTDefRegMap(@Self)^.&set := $00040000;
  115911. end;
  115912. procedure TCAN2_C2FIFOINT20.clearRXFULLIE; inline;
  115913. begin
  115914. pTDefRegMap(@Self)^.clr := $00040000;
  115915. end;
  115916. procedure TCAN2_C2FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  115917. begin
  115918. if thebits = 0 then
  115919. pTDefRegMap(@Self)^.clr := $00040000
  115920. else
  115921. pTDefRegMap(@Self)^.&set := $00040000;
  115922. end;
  115923. function TCAN2_C2FIFOINT20.getRXFULLIE : TBits_1; inline;
  115924. begin
  115925. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  115926. end;
  115927. procedure TCAN2_C2FIFOINT20.setRXOVFLIE; inline;
  115928. begin
  115929. pTDefRegMap(@Self)^.&set := $00080000;
  115930. end;
  115931. procedure TCAN2_C2FIFOINT20.clearRXOVFLIE; inline;
  115932. begin
  115933. pTDefRegMap(@Self)^.clr := $00080000;
  115934. end;
  115935. procedure TCAN2_C2FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  115936. begin
  115937. if thebits = 0 then
  115938. pTDefRegMap(@Self)^.clr := $00080000
  115939. else
  115940. pTDefRegMap(@Self)^.&set := $00080000;
  115941. end;
  115942. function TCAN2_C2FIFOINT20.getRXOVFLIE : TBits_1; inline;
  115943. begin
  115944. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  115945. end;
  115946. procedure TCAN2_C2FIFOINT20.setTXEMPTYIE; inline;
  115947. begin
  115948. pTDefRegMap(@Self)^.&set := $01000000;
  115949. end;
  115950. procedure TCAN2_C2FIFOINT20.clearTXEMPTYIE; inline;
  115951. begin
  115952. pTDefRegMap(@Self)^.clr := $01000000;
  115953. end;
  115954. procedure TCAN2_C2FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  115955. begin
  115956. if thebits = 0 then
  115957. pTDefRegMap(@Self)^.clr := $01000000
  115958. else
  115959. pTDefRegMap(@Self)^.&set := $01000000;
  115960. end;
  115961. function TCAN2_C2FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  115962. begin
  115963. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  115964. end;
  115965. procedure TCAN2_C2FIFOINT20.setTXHALFIE; inline;
  115966. begin
  115967. pTDefRegMap(@Self)^.&set := $02000000;
  115968. end;
  115969. procedure TCAN2_C2FIFOINT20.clearTXHALFIE; inline;
  115970. begin
  115971. pTDefRegMap(@Self)^.clr := $02000000;
  115972. end;
  115973. procedure TCAN2_C2FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  115974. begin
  115975. if thebits = 0 then
  115976. pTDefRegMap(@Self)^.clr := $02000000
  115977. else
  115978. pTDefRegMap(@Self)^.&set := $02000000;
  115979. end;
  115980. function TCAN2_C2FIFOINT20.getTXHALFIE : TBits_1; inline;
  115981. begin
  115982. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  115983. end;
  115984. procedure TCAN2_C2FIFOINT20.setTXNFULLIE; inline;
  115985. begin
  115986. pTDefRegMap(@Self)^.&set := $04000000;
  115987. end;
  115988. procedure TCAN2_C2FIFOINT20.clearTXNFULLIE; inline;
  115989. begin
  115990. pTDefRegMap(@Self)^.clr := $04000000;
  115991. end;
  115992. procedure TCAN2_C2FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  115993. begin
  115994. if thebits = 0 then
  115995. pTDefRegMap(@Self)^.clr := $04000000
  115996. else
  115997. pTDefRegMap(@Self)^.&set := $04000000;
  115998. end;
  115999. function TCAN2_C2FIFOINT20.getTXNFULLIE : TBits_1; inline;
  116000. begin
  116001. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  116002. end;
  116003. procedure TCAN2_C2FIFOINT20.setw(thebits : TBits_32); inline;
  116004. begin
  116005. pTDefRegMap(@Self)^.val := thebits;
  116006. end;
  116007. function TCAN2_C2FIFOINT20.getw : TBits_32; inline;
  116008. begin
  116009. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116010. end;
  116011. procedure TCAN2_C2FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  116012. begin
  116013. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  116014. end;
  116015. function TCAN2_C2FIFOCI20.getCFIFOCI : TBits_5; inline;
  116016. begin
  116017. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  116018. end;
  116019. procedure TCAN2_C2FIFOCI20.setw(thebits : TBits_32); inline;
  116020. begin
  116021. pTDefRegMap(@Self)^.val := thebits;
  116022. end;
  116023. function TCAN2_C2FIFOCI20.getw : TBits_32; inline;
  116024. begin
  116025. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116026. end;
  116027. procedure TCAN2_C2FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  116028. begin
  116029. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  116030. end;
  116031. function TCAN2_C2FIFOCON21.getTXPRI : TBits_2; inline;
  116032. begin
  116033. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  116034. end;
  116035. procedure TCAN2_C2FIFOCON21.setRTREN; inline;
  116036. begin
  116037. pTDefRegMap(@Self)^.&set := $00000004;
  116038. end;
  116039. procedure TCAN2_C2FIFOCON21.clearRTREN; inline;
  116040. begin
  116041. pTDefRegMap(@Self)^.clr := $00000004;
  116042. end;
  116043. procedure TCAN2_C2FIFOCON21.setRTREN(thebits : TBits_1); inline;
  116044. begin
  116045. if thebits = 0 then
  116046. pTDefRegMap(@Self)^.clr := $00000004
  116047. else
  116048. pTDefRegMap(@Self)^.&set := $00000004;
  116049. end;
  116050. function TCAN2_C2FIFOCON21.getRTREN : TBits_1; inline;
  116051. begin
  116052. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  116053. end;
  116054. procedure TCAN2_C2FIFOCON21.setTXREQ; inline;
  116055. begin
  116056. pTDefRegMap(@Self)^.&set := $00000008;
  116057. end;
  116058. procedure TCAN2_C2FIFOCON21.clearTXREQ; inline;
  116059. begin
  116060. pTDefRegMap(@Self)^.clr := $00000008;
  116061. end;
  116062. procedure TCAN2_C2FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  116063. begin
  116064. if thebits = 0 then
  116065. pTDefRegMap(@Self)^.clr := $00000008
  116066. else
  116067. pTDefRegMap(@Self)^.&set := $00000008;
  116068. end;
  116069. function TCAN2_C2FIFOCON21.getTXREQ : TBits_1; inline;
  116070. begin
  116071. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  116072. end;
  116073. procedure TCAN2_C2FIFOCON21.setTXERR; inline;
  116074. begin
  116075. pTDefRegMap(@Self)^.&set := $00000010;
  116076. end;
  116077. procedure TCAN2_C2FIFOCON21.clearTXERR; inline;
  116078. begin
  116079. pTDefRegMap(@Self)^.clr := $00000010;
  116080. end;
  116081. procedure TCAN2_C2FIFOCON21.setTXERR(thebits : TBits_1); inline;
  116082. begin
  116083. if thebits = 0 then
  116084. pTDefRegMap(@Self)^.clr := $00000010
  116085. else
  116086. pTDefRegMap(@Self)^.&set := $00000010;
  116087. end;
  116088. function TCAN2_C2FIFOCON21.getTXERR : TBits_1; inline;
  116089. begin
  116090. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  116091. end;
  116092. procedure TCAN2_C2FIFOCON21.setTXLARB; inline;
  116093. begin
  116094. pTDefRegMap(@Self)^.&set := $00000020;
  116095. end;
  116096. procedure TCAN2_C2FIFOCON21.clearTXLARB; inline;
  116097. begin
  116098. pTDefRegMap(@Self)^.clr := $00000020;
  116099. end;
  116100. procedure TCAN2_C2FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  116101. begin
  116102. if thebits = 0 then
  116103. pTDefRegMap(@Self)^.clr := $00000020
  116104. else
  116105. pTDefRegMap(@Self)^.&set := $00000020;
  116106. end;
  116107. function TCAN2_C2FIFOCON21.getTXLARB : TBits_1; inline;
  116108. begin
  116109. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  116110. end;
  116111. procedure TCAN2_C2FIFOCON21.setTXABAT; inline;
  116112. begin
  116113. pTDefRegMap(@Self)^.&set := $00000040;
  116114. end;
  116115. procedure TCAN2_C2FIFOCON21.clearTXABAT; inline;
  116116. begin
  116117. pTDefRegMap(@Self)^.clr := $00000040;
  116118. end;
  116119. procedure TCAN2_C2FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  116120. begin
  116121. if thebits = 0 then
  116122. pTDefRegMap(@Self)^.clr := $00000040
  116123. else
  116124. pTDefRegMap(@Self)^.&set := $00000040;
  116125. end;
  116126. function TCAN2_C2FIFOCON21.getTXABAT : TBits_1; inline;
  116127. begin
  116128. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  116129. end;
  116130. procedure TCAN2_C2FIFOCON21.setTXEN; inline;
  116131. begin
  116132. pTDefRegMap(@Self)^.&set := $00000080;
  116133. end;
  116134. procedure TCAN2_C2FIFOCON21.clearTXEN; inline;
  116135. begin
  116136. pTDefRegMap(@Self)^.clr := $00000080;
  116137. end;
  116138. procedure TCAN2_C2FIFOCON21.setTXEN(thebits : TBits_1); inline;
  116139. begin
  116140. if thebits = 0 then
  116141. pTDefRegMap(@Self)^.clr := $00000080
  116142. else
  116143. pTDefRegMap(@Self)^.&set := $00000080;
  116144. end;
  116145. function TCAN2_C2FIFOCON21.getTXEN : TBits_1; inline;
  116146. begin
  116147. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  116148. end;
  116149. procedure TCAN2_C2FIFOCON21.setDONLY; inline;
  116150. begin
  116151. pTDefRegMap(@Self)^.&set := $00001000;
  116152. end;
  116153. procedure TCAN2_C2FIFOCON21.clearDONLY; inline;
  116154. begin
  116155. pTDefRegMap(@Self)^.clr := $00001000;
  116156. end;
  116157. procedure TCAN2_C2FIFOCON21.setDONLY(thebits : TBits_1); inline;
  116158. begin
  116159. if thebits = 0 then
  116160. pTDefRegMap(@Self)^.clr := $00001000
  116161. else
  116162. pTDefRegMap(@Self)^.&set := $00001000;
  116163. end;
  116164. function TCAN2_C2FIFOCON21.getDONLY : TBits_1; inline;
  116165. begin
  116166. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  116167. end;
  116168. procedure TCAN2_C2FIFOCON21.setUINC; inline;
  116169. begin
  116170. pTDefRegMap(@Self)^.&set := $00002000;
  116171. end;
  116172. procedure TCAN2_C2FIFOCON21.clearUINC; inline;
  116173. begin
  116174. pTDefRegMap(@Self)^.clr := $00002000;
  116175. end;
  116176. procedure TCAN2_C2FIFOCON21.setUINC(thebits : TBits_1); inline;
  116177. begin
  116178. if thebits = 0 then
  116179. pTDefRegMap(@Self)^.clr := $00002000
  116180. else
  116181. pTDefRegMap(@Self)^.&set := $00002000;
  116182. end;
  116183. function TCAN2_C2FIFOCON21.getUINC : TBits_1; inline;
  116184. begin
  116185. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  116186. end;
  116187. procedure TCAN2_C2FIFOCON21.setFRESET; inline;
  116188. begin
  116189. pTDefRegMap(@Self)^.&set := $00004000;
  116190. end;
  116191. procedure TCAN2_C2FIFOCON21.clearFRESET; inline;
  116192. begin
  116193. pTDefRegMap(@Self)^.clr := $00004000;
  116194. end;
  116195. procedure TCAN2_C2FIFOCON21.setFRESET(thebits : TBits_1); inline;
  116196. begin
  116197. if thebits = 0 then
  116198. pTDefRegMap(@Self)^.clr := $00004000
  116199. else
  116200. pTDefRegMap(@Self)^.&set := $00004000;
  116201. end;
  116202. function TCAN2_C2FIFOCON21.getFRESET : TBits_1; inline;
  116203. begin
  116204. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  116205. end;
  116206. procedure TCAN2_C2FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  116207. begin
  116208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  116209. end;
  116210. function TCAN2_C2FIFOCON21.getFSIZE : TBits_5; inline;
  116211. begin
  116212. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  116213. end;
  116214. procedure TCAN2_C2FIFOCON21.setw(thebits : TBits_32); inline;
  116215. begin
  116216. pTDefRegMap(@Self)^.val := thebits;
  116217. end;
  116218. function TCAN2_C2FIFOCON21.getw : TBits_32; inline;
  116219. begin
  116220. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116221. end;
  116222. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIF; inline;
  116223. begin
  116224. pTDefRegMap(@Self)^.&set := $00000001;
  116225. end;
  116226. procedure TCAN2_C2FIFOINT21.clearRXNEMPTYIF; inline;
  116227. begin
  116228. pTDefRegMap(@Self)^.clr := $00000001;
  116229. end;
  116230. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  116231. begin
  116232. if thebits = 0 then
  116233. pTDefRegMap(@Self)^.clr := $00000001
  116234. else
  116235. pTDefRegMap(@Self)^.&set := $00000001;
  116236. end;
  116237. function TCAN2_C2FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  116238. begin
  116239. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  116240. end;
  116241. procedure TCAN2_C2FIFOINT21.setRXHALFIF; inline;
  116242. begin
  116243. pTDefRegMap(@Self)^.&set := $00000002;
  116244. end;
  116245. procedure TCAN2_C2FIFOINT21.clearRXHALFIF; inline;
  116246. begin
  116247. pTDefRegMap(@Self)^.clr := $00000002;
  116248. end;
  116249. procedure TCAN2_C2FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  116250. begin
  116251. if thebits = 0 then
  116252. pTDefRegMap(@Self)^.clr := $00000002
  116253. else
  116254. pTDefRegMap(@Self)^.&set := $00000002;
  116255. end;
  116256. function TCAN2_C2FIFOINT21.getRXHALFIF : TBits_1; inline;
  116257. begin
  116258. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  116259. end;
  116260. procedure TCAN2_C2FIFOINT21.setRXFULLIF; inline;
  116261. begin
  116262. pTDefRegMap(@Self)^.&set := $00000004;
  116263. end;
  116264. procedure TCAN2_C2FIFOINT21.clearRXFULLIF; inline;
  116265. begin
  116266. pTDefRegMap(@Self)^.clr := $00000004;
  116267. end;
  116268. procedure TCAN2_C2FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  116269. begin
  116270. if thebits = 0 then
  116271. pTDefRegMap(@Self)^.clr := $00000004
  116272. else
  116273. pTDefRegMap(@Self)^.&set := $00000004;
  116274. end;
  116275. function TCAN2_C2FIFOINT21.getRXFULLIF : TBits_1; inline;
  116276. begin
  116277. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  116278. end;
  116279. procedure TCAN2_C2FIFOINT21.setRXOVFLIF; inline;
  116280. begin
  116281. pTDefRegMap(@Self)^.&set := $00000008;
  116282. end;
  116283. procedure TCAN2_C2FIFOINT21.clearRXOVFLIF; inline;
  116284. begin
  116285. pTDefRegMap(@Self)^.clr := $00000008;
  116286. end;
  116287. procedure TCAN2_C2FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  116288. begin
  116289. if thebits = 0 then
  116290. pTDefRegMap(@Self)^.clr := $00000008
  116291. else
  116292. pTDefRegMap(@Self)^.&set := $00000008;
  116293. end;
  116294. function TCAN2_C2FIFOINT21.getRXOVFLIF : TBits_1; inline;
  116295. begin
  116296. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  116297. end;
  116298. procedure TCAN2_C2FIFOINT21.setTXEMPTYIF; inline;
  116299. begin
  116300. pTDefRegMap(@Self)^.&set := $00000100;
  116301. end;
  116302. procedure TCAN2_C2FIFOINT21.clearTXEMPTYIF; inline;
  116303. begin
  116304. pTDefRegMap(@Self)^.clr := $00000100;
  116305. end;
  116306. procedure TCAN2_C2FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  116307. begin
  116308. if thebits = 0 then
  116309. pTDefRegMap(@Self)^.clr := $00000100
  116310. else
  116311. pTDefRegMap(@Self)^.&set := $00000100;
  116312. end;
  116313. function TCAN2_C2FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  116314. begin
  116315. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  116316. end;
  116317. procedure TCAN2_C2FIFOINT21.setTXHALFIF; inline;
  116318. begin
  116319. pTDefRegMap(@Self)^.&set := $00000200;
  116320. end;
  116321. procedure TCAN2_C2FIFOINT21.clearTXHALFIF; inline;
  116322. begin
  116323. pTDefRegMap(@Self)^.clr := $00000200;
  116324. end;
  116325. procedure TCAN2_C2FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  116326. begin
  116327. if thebits = 0 then
  116328. pTDefRegMap(@Self)^.clr := $00000200
  116329. else
  116330. pTDefRegMap(@Self)^.&set := $00000200;
  116331. end;
  116332. function TCAN2_C2FIFOINT21.getTXHALFIF : TBits_1; inline;
  116333. begin
  116334. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  116335. end;
  116336. procedure TCAN2_C2FIFOINT21.setTXNFULLIF; inline;
  116337. begin
  116338. pTDefRegMap(@Self)^.&set := $00000400;
  116339. end;
  116340. procedure TCAN2_C2FIFOINT21.clearTXNFULLIF; inline;
  116341. begin
  116342. pTDefRegMap(@Self)^.clr := $00000400;
  116343. end;
  116344. procedure TCAN2_C2FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  116345. begin
  116346. if thebits = 0 then
  116347. pTDefRegMap(@Self)^.clr := $00000400
  116348. else
  116349. pTDefRegMap(@Self)^.&set := $00000400;
  116350. end;
  116351. function TCAN2_C2FIFOINT21.getTXNFULLIF : TBits_1; inline;
  116352. begin
  116353. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  116354. end;
  116355. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIE; inline;
  116356. begin
  116357. pTDefRegMap(@Self)^.&set := $00010000;
  116358. end;
  116359. procedure TCAN2_C2FIFOINT21.clearRXNEMPTYIE; inline;
  116360. begin
  116361. pTDefRegMap(@Self)^.clr := $00010000;
  116362. end;
  116363. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  116364. begin
  116365. if thebits = 0 then
  116366. pTDefRegMap(@Self)^.clr := $00010000
  116367. else
  116368. pTDefRegMap(@Self)^.&set := $00010000;
  116369. end;
  116370. function TCAN2_C2FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  116371. begin
  116372. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  116373. end;
  116374. procedure TCAN2_C2FIFOINT21.setRXHALFIE; inline;
  116375. begin
  116376. pTDefRegMap(@Self)^.&set := $00020000;
  116377. end;
  116378. procedure TCAN2_C2FIFOINT21.clearRXHALFIE; inline;
  116379. begin
  116380. pTDefRegMap(@Self)^.clr := $00020000;
  116381. end;
  116382. procedure TCAN2_C2FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  116383. begin
  116384. if thebits = 0 then
  116385. pTDefRegMap(@Self)^.clr := $00020000
  116386. else
  116387. pTDefRegMap(@Self)^.&set := $00020000;
  116388. end;
  116389. function TCAN2_C2FIFOINT21.getRXHALFIE : TBits_1; inline;
  116390. begin
  116391. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  116392. end;
  116393. procedure TCAN2_C2FIFOINT21.setRXFULLIE; inline;
  116394. begin
  116395. pTDefRegMap(@Self)^.&set := $00040000;
  116396. end;
  116397. procedure TCAN2_C2FIFOINT21.clearRXFULLIE; inline;
  116398. begin
  116399. pTDefRegMap(@Self)^.clr := $00040000;
  116400. end;
  116401. procedure TCAN2_C2FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  116402. begin
  116403. if thebits = 0 then
  116404. pTDefRegMap(@Self)^.clr := $00040000
  116405. else
  116406. pTDefRegMap(@Self)^.&set := $00040000;
  116407. end;
  116408. function TCAN2_C2FIFOINT21.getRXFULLIE : TBits_1; inline;
  116409. begin
  116410. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  116411. end;
  116412. procedure TCAN2_C2FIFOINT21.setRXOVFLIE; inline;
  116413. begin
  116414. pTDefRegMap(@Self)^.&set := $00080000;
  116415. end;
  116416. procedure TCAN2_C2FIFOINT21.clearRXOVFLIE; inline;
  116417. begin
  116418. pTDefRegMap(@Self)^.clr := $00080000;
  116419. end;
  116420. procedure TCAN2_C2FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  116421. begin
  116422. if thebits = 0 then
  116423. pTDefRegMap(@Self)^.clr := $00080000
  116424. else
  116425. pTDefRegMap(@Self)^.&set := $00080000;
  116426. end;
  116427. function TCAN2_C2FIFOINT21.getRXOVFLIE : TBits_1; inline;
  116428. begin
  116429. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  116430. end;
  116431. procedure TCAN2_C2FIFOINT21.setTXEMPTYIE; inline;
  116432. begin
  116433. pTDefRegMap(@Self)^.&set := $01000000;
  116434. end;
  116435. procedure TCAN2_C2FIFOINT21.clearTXEMPTYIE; inline;
  116436. begin
  116437. pTDefRegMap(@Self)^.clr := $01000000;
  116438. end;
  116439. procedure TCAN2_C2FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  116440. begin
  116441. if thebits = 0 then
  116442. pTDefRegMap(@Self)^.clr := $01000000
  116443. else
  116444. pTDefRegMap(@Self)^.&set := $01000000;
  116445. end;
  116446. function TCAN2_C2FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  116447. begin
  116448. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  116449. end;
  116450. procedure TCAN2_C2FIFOINT21.setTXHALFIE; inline;
  116451. begin
  116452. pTDefRegMap(@Self)^.&set := $02000000;
  116453. end;
  116454. procedure TCAN2_C2FIFOINT21.clearTXHALFIE; inline;
  116455. begin
  116456. pTDefRegMap(@Self)^.clr := $02000000;
  116457. end;
  116458. procedure TCAN2_C2FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  116459. begin
  116460. if thebits = 0 then
  116461. pTDefRegMap(@Self)^.clr := $02000000
  116462. else
  116463. pTDefRegMap(@Self)^.&set := $02000000;
  116464. end;
  116465. function TCAN2_C2FIFOINT21.getTXHALFIE : TBits_1; inline;
  116466. begin
  116467. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  116468. end;
  116469. procedure TCAN2_C2FIFOINT21.setTXNFULLIE; inline;
  116470. begin
  116471. pTDefRegMap(@Self)^.&set := $04000000;
  116472. end;
  116473. procedure TCAN2_C2FIFOINT21.clearTXNFULLIE; inline;
  116474. begin
  116475. pTDefRegMap(@Self)^.clr := $04000000;
  116476. end;
  116477. procedure TCAN2_C2FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  116478. begin
  116479. if thebits = 0 then
  116480. pTDefRegMap(@Self)^.clr := $04000000
  116481. else
  116482. pTDefRegMap(@Self)^.&set := $04000000;
  116483. end;
  116484. function TCAN2_C2FIFOINT21.getTXNFULLIE : TBits_1; inline;
  116485. begin
  116486. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  116487. end;
  116488. procedure TCAN2_C2FIFOINT21.setw(thebits : TBits_32); inline;
  116489. begin
  116490. pTDefRegMap(@Self)^.val := thebits;
  116491. end;
  116492. function TCAN2_C2FIFOINT21.getw : TBits_32; inline;
  116493. begin
  116494. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116495. end;
  116496. procedure TCAN2_C2FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  116497. begin
  116498. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  116499. end;
  116500. function TCAN2_C2FIFOCI21.getCFIFOCI : TBits_5; inline;
  116501. begin
  116502. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  116503. end;
  116504. procedure TCAN2_C2FIFOCI21.setw(thebits : TBits_32); inline;
  116505. begin
  116506. pTDefRegMap(@Self)^.val := thebits;
  116507. end;
  116508. function TCAN2_C2FIFOCI21.getw : TBits_32; inline;
  116509. begin
  116510. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116511. end;
  116512. procedure TCAN2_C2FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  116513. begin
  116514. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  116515. end;
  116516. function TCAN2_C2FIFOCON22.getTXPRI : TBits_2; inline;
  116517. begin
  116518. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  116519. end;
  116520. procedure TCAN2_C2FIFOCON22.setRTREN; inline;
  116521. begin
  116522. pTDefRegMap(@Self)^.&set := $00000004;
  116523. end;
  116524. procedure TCAN2_C2FIFOCON22.clearRTREN; inline;
  116525. begin
  116526. pTDefRegMap(@Self)^.clr := $00000004;
  116527. end;
  116528. procedure TCAN2_C2FIFOCON22.setRTREN(thebits : TBits_1); inline;
  116529. begin
  116530. if thebits = 0 then
  116531. pTDefRegMap(@Self)^.clr := $00000004
  116532. else
  116533. pTDefRegMap(@Self)^.&set := $00000004;
  116534. end;
  116535. function TCAN2_C2FIFOCON22.getRTREN : TBits_1; inline;
  116536. begin
  116537. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  116538. end;
  116539. procedure TCAN2_C2FIFOCON22.setTXREQ; inline;
  116540. begin
  116541. pTDefRegMap(@Self)^.&set := $00000008;
  116542. end;
  116543. procedure TCAN2_C2FIFOCON22.clearTXREQ; inline;
  116544. begin
  116545. pTDefRegMap(@Self)^.clr := $00000008;
  116546. end;
  116547. procedure TCAN2_C2FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  116548. begin
  116549. if thebits = 0 then
  116550. pTDefRegMap(@Self)^.clr := $00000008
  116551. else
  116552. pTDefRegMap(@Self)^.&set := $00000008;
  116553. end;
  116554. function TCAN2_C2FIFOCON22.getTXREQ : TBits_1; inline;
  116555. begin
  116556. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  116557. end;
  116558. procedure TCAN2_C2FIFOCON22.setTXERR; inline;
  116559. begin
  116560. pTDefRegMap(@Self)^.&set := $00000010;
  116561. end;
  116562. procedure TCAN2_C2FIFOCON22.clearTXERR; inline;
  116563. begin
  116564. pTDefRegMap(@Self)^.clr := $00000010;
  116565. end;
  116566. procedure TCAN2_C2FIFOCON22.setTXERR(thebits : TBits_1); inline;
  116567. begin
  116568. if thebits = 0 then
  116569. pTDefRegMap(@Self)^.clr := $00000010
  116570. else
  116571. pTDefRegMap(@Self)^.&set := $00000010;
  116572. end;
  116573. function TCAN2_C2FIFOCON22.getTXERR : TBits_1; inline;
  116574. begin
  116575. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  116576. end;
  116577. procedure TCAN2_C2FIFOCON22.setTXLARB; inline;
  116578. begin
  116579. pTDefRegMap(@Self)^.&set := $00000020;
  116580. end;
  116581. procedure TCAN2_C2FIFOCON22.clearTXLARB; inline;
  116582. begin
  116583. pTDefRegMap(@Self)^.clr := $00000020;
  116584. end;
  116585. procedure TCAN2_C2FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  116586. begin
  116587. if thebits = 0 then
  116588. pTDefRegMap(@Self)^.clr := $00000020
  116589. else
  116590. pTDefRegMap(@Self)^.&set := $00000020;
  116591. end;
  116592. function TCAN2_C2FIFOCON22.getTXLARB : TBits_1; inline;
  116593. begin
  116594. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  116595. end;
  116596. procedure TCAN2_C2FIFOCON22.setTXABAT; inline;
  116597. begin
  116598. pTDefRegMap(@Self)^.&set := $00000040;
  116599. end;
  116600. procedure TCAN2_C2FIFOCON22.clearTXABAT; inline;
  116601. begin
  116602. pTDefRegMap(@Self)^.clr := $00000040;
  116603. end;
  116604. procedure TCAN2_C2FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  116605. begin
  116606. if thebits = 0 then
  116607. pTDefRegMap(@Self)^.clr := $00000040
  116608. else
  116609. pTDefRegMap(@Self)^.&set := $00000040;
  116610. end;
  116611. function TCAN2_C2FIFOCON22.getTXABAT : TBits_1; inline;
  116612. begin
  116613. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  116614. end;
  116615. procedure TCAN2_C2FIFOCON22.setTXEN; inline;
  116616. begin
  116617. pTDefRegMap(@Self)^.&set := $00000080;
  116618. end;
  116619. procedure TCAN2_C2FIFOCON22.clearTXEN; inline;
  116620. begin
  116621. pTDefRegMap(@Self)^.clr := $00000080;
  116622. end;
  116623. procedure TCAN2_C2FIFOCON22.setTXEN(thebits : TBits_1); inline;
  116624. begin
  116625. if thebits = 0 then
  116626. pTDefRegMap(@Self)^.clr := $00000080
  116627. else
  116628. pTDefRegMap(@Self)^.&set := $00000080;
  116629. end;
  116630. function TCAN2_C2FIFOCON22.getTXEN : TBits_1; inline;
  116631. begin
  116632. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  116633. end;
  116634. procedure TCAN2_C2FIFOCON22.setDONLY; inline;
  116635. begin
  116636. pTDefRegMap(@Self)^.&set := $00001000;
  116637. end;
  116638. procedure TCAN2_C2FIFOCON22.clearDONLY; inline;
  116639. begin
  116640. pTDefRegMap(@Self)^.clr := $00001000;
  116641. end;
  116642. procedure TCAN2_C2FIFOCON22.setDONLY(thebits : TBits_1); inline;
  116643. begin
  116644. if thebits = 0 then
  116645. pTDefRegMap(@Self)^.clr := $00001000
  116646. else
  116647. pTDefRegMap(@Self)^.&set := $00001000;
  116648. end;
  116649. function TCAN2_C2FIFOCON22.getDONLY : TBits_1; inline;
  116650. begin
  116651. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  116652. end;
  116653. procedure TCAN2_C2FIFOCON22.setUINC; inline;
  116654. begin
  116655. pTDefRegMap(@Self)^.&set := $00002000;
  116656. end;
  116657. procedure TCAN2_C2FIFOCON22.clearUINC; inline;
  116658. begin
  116659. pTDefRegMap(@Self)^.clr := $00002000;
  116660. end;
  116661. procedure TCAN2_C2FIFOCON22.setUINC(thebits : TBits_1); inline;
  116662. begin
  116663. if thebits = 0 then
  116664. pTDefRegMap(@Self)^.clr := $00002000
  116665. else
  116666. pTDefRegMap(@Self)^.&set := $00002000;
  116667. end;
  116668. function TCAN2_C2FIFOCON22.getUINC : TBits_1; inline;
  116669. begin
  116670. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  116671. end;
  116672. procedure TCAN2_C2FIFOCON22.setFRESET; inline;
  116673. begin
  116674. pTDefRegMap(@Self)^.&set := $00004000;
  116675. end;
  116676. procedure TCAN2_C2FIFOCON22.clearFRESET; inline;
  116677. begin
  116678. pTDefRegMap(@Self)^.clr := $00004000;
  116679. end;
  116680. procedure TCAN2_C2FIFOCON22.setFRESET(thebits : TBits_1); inline;
  116681. begin
  116682. if thebits = 0 then
  116683. pTDefRegMap(@Self)^.clr := $00004000
  116684. else
  116685. pTDefRegMap(@Self)^.&set := $00004000;
  116686. end;
  116687. function TCAN2_C2FIFOCON22.getFRESET : TBits_1; inline;
  116688. begin
  116689. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  116690. end;
  116691. procedure TCAN2_C2FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  116692. begin
  116693. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  116694. end;
  116695. function TCAN2_C2FIFOCON22.getFSIZE : TBits_5; inline;
  116696. begin
  116697. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  116698. end;
  116699. procedure TCAN2_C2FIFOCON22.setw(thebits : TBits_32); inline;
  116700. begin
  116701. pTDefRegMap(@Self)^.val := thebits;
  116702. end;
  116703. function TCAN2_C2FIFOCON22.getw : TBits_32; inline;
  116704. begin
  116705. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116706. end;
  116707. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIF; inline;
  116708. begin
  116709. pTDefRegMap(@Self)^.&set := $00000001;
  116710. end;
  116711. procedure TCAN2_C2FIFOINT22.clearRXNEMPTYIF; inline;
  116712. begin
  116713. pTDefRegMap(@Self)^.clr := $00000001;
  116714. end;
  116715. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  116716. begin
  116717. if thebits = 0 then
  116718. pTDefRegMap(@Self)^.clr := $00000001
  116719. else
  116720. pTDefRegMap(@Self)^.&set := $00000001;
  116721. end;
  116722. function TCAN2_C2FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  116723. begin
  116724. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  116725. end;
  116726. procedure TCAN2_C2FIFOINT22.setRXHALFIF; inline;
  116727. begin
  116728. pTDefRegMap(@Self)^.&set := $00000002;
  116729. end;
  116730. procedure TCAN2_C2FIFOINT22.clearRXHALFIF; inline;
  116731. begin
  116732. pTDefRegMap(@Self)^.clr := $00000002;
  116733. end;
  116734. procedure TCAN2_C2FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  116735. begin
  116736. if thebits = 0 then
  116737. pTDefRegMap(@Self)^.clr := $00000002
  116738. else
  116739. pTDefRegMap(@Self)^.&set := $00000002;
  116740. end;
  116741. function TCAN2_C2FIFOINT22.getRXHALFIF : TBits_1; inline;
  116742. begin
  116743. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  116744. end;
  116745. procedure TCAN2_C2FIFOINT22.setRXFULLIF; inline;
  116746. begin
  116747. pTDefRegMap(@Self)^.&set := $00000004;
  116748. end;
  116749. procedure TCAN2_C2FIFOINT22.clearRXFULLIF; inline;
  116750. begin
  116751. pTDefRegMap(@Self)^.clr := $00000004;
  116752. end;
  116753. procedure TCAN2_C2FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  116754. begin
  116755. if thebits = 0 then
  116756. pTDefRegMap(@Self)^.clr := $00000004
  116757. else
  116758. pTDefRegMap(@Self)^.&set := $00000004;
  116759. end;
  116760. function TCAN2_C2FIFOINT22.getRXFULLIF : TBits_1; inline;
  116761. begin
  116762. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  116763. end;
  116764. procedure TCAN2_C2FIFOINT22.setRXOVFLIF; inline;
  116765. begin
  116766. pTDefRegMap(@Self)^.&set := $00000008;
  116767. end;
  116768. procedure TCAN2_C2FIFOINT22.clearRXOVFLIF; inline;
  116769. begin
  116770. pTDefRegMap(@Self)^.clr := $00000008;
  116771. end;
  116772. procedure TCAN2_C2FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  116773. begin
  116774. if thebits = 0 then
  116775. pTDefRegMap(@Self)^.clr := $00000008
  116776. else
  116777. pTDefRegMap(@Self)^.&set := $00000008;
  116778. end;
  116779. function TCAN2_C2FIFOINT22.getRXOVFLIF : TBits_1; inline;
  116780. begin
  116781. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  116782. end;
  116783. procedure TCAN2_C2FIFOINT22.setTXEMPTYIF; inline;
  116784. begin
  116785. pTDefRegMap(@Self)^.&set := $00000100;
  116786. end;
  116787. procedure TCAN2_C2FIFOINT22.clearTXEMPTYIF; inline;
  116788. begin
  116789. pTDefRegMap(@Self)^.clr := $00000100;
  116790. end;
  116791. procedure TCAN2_C2FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  116792. begin
  116793. if thebits = 0 then
  116794. pTDefRegMap(@Self)^.clr := $00000100
  116795. else
  116796. pTDefRegMap(@Self)^.&set := $00000100;
  116797. end;
  116798. function TCAN2_C2FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  116799. begin
  116800. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  116801. end;
  116802. procedure TCAN2_C2FIFOINT22.setTXHALFIF; inline;
  116803. begin
  116804. pTDefRegMap(@Self)^.&set := $00000200;
  116805. end;
  116806. procedure TCAN2_C2FIFOINT22.clearTXHALFIF; inline;
  116807. begin
  116808. pTDefRegMap(@Self)^.clr := $00000200;
  116809. end;
  116810. procedure TCAN2_C2FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  116811. begin
  116812. if thebits = 0 then
  116813. pTDefRegMap(@Self)^.clr := $00000200
  116814. else
  116815. pTDefRegMap(@Self)^.&set := $00000200;
  116816. end;
  116817. function TCAN2_C2FIFOINT22.getTXHALFIF : TBits_1; inline;
  116818. begin
  116819. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  116820. end;
  116821. procedure TCAN2_C2FIFOINT22.setTXNFULLIF; inline;
  116822. begin
  116823. pTDefRegMap(@Self)^.&set := $00000400;
  116824. end;
  116825. procedure TCAN2_C2FIFOINT22.clearTXNFULLIF; inline;
  116826. begin
  116827. pTDefRegMap(@Self)^.clr := $00000400;
  116828. end;
  116829. procedure TCAN2_C2FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  116830. begin
  116831. if thebits = 0 then
  116832. pTDefRegMap(@Self)^.clr := $00000400
  116833. else
  116834. pTDefRegMap(@Self)^.&set := $00000400;
  116835. end;
  116836. function TCAN2_C2FIFOINT22.getTXNFULLIF : TBits_1; inline;
  116837. begin
  116838. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  116839. end;
  116840. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIE; inline;
  116841. begin
  116842. pTDefRegMap(@Self)^.&set := $00010000;
  116843. end;
  116844. procedure TCAN2_C2FIFOINT22.clearRXNEMPTYIE; inline;
  116845. begin
  116846. pTDefRegMap(@Self)^.clr := $00010000;
  116847. end;
  116848. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  116849. begin
  116850. if thebits = 0 then
  116851. pTDefRegMap(@Self)^.clr := $00010000
  116852. else
  116853. pTDefRegMap(@Self)^.&set := $00010000;
  116854. end;
  116855. function TCAN2_C2FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  116856. begin
  116857. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  116858. end;
  116859. procedure TCAN2_C2FIFOINT22.setRXHALFIE; inline;
  116860. begin
  116861. pTDefRegMap(@Self)^.&set := $00020000;
  116862. end;
  116863. procedure TCAN2_C2FIFOINT22.clearRXHALFIE; inline;
  116864. begin
  116865. pTDefRegMap(@Self)^.clr := $00020000;
  116866. end;
  116867. procedure TCAN2_C2FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  116868. begin
  116869. if thebits = 0 then
  116870. pTDefRegMap(@Self)^.clr := $00020000
  116871. else
  116872. pTDefRegMap(@Self)^.&set := $00020000;
  116873. end;
  116874. function TCAN2_C2FIFOINT22.getRXHALFIE : TBits_1; inline;
  116875. begin
  116876. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  116877. end;
  116878. procedure TCAN2_C2FIFOINT22.setRXFULLIE; inline;
  116879. begin
  116880. pTDefRegMap(@Self)^.&set := $00040000;
  116881. end;
  116882. procedure TCAN2_C2FIFOINT22.clearRXFULLIE; inline;
  116883. begin
  116884. pTDefRegMap(@Self)^.clr := $00040000;
  116885. end;
  116886. procedure TCAN2_C2FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  116887. begin
  116888. if thebits = 0 then
  116889. pTDefRegMap(@Self)^.clr := $00040000
  116890. else
  116891. pTDefRegMap(@Self)^.&set := $00040000;
  116892. end;
  116893. function TCAN2_C2FIFOINT22.getRXFULLIE : TBits_1; inline;
  116894. begin
  116895. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  116896. end;
  116897. procedure TCAN2_C2FIFOINT22.setRXOVFLIE; inline;
  116898. begin
  116899. pTDefRegMap(@Self)^.&set := $00080000;
  116900. end;
  116901. procedure TCAN2_C2FIFOINT22.clearRXOVFLIE; inline;
  116902. begin
  116903. pTDefRegMap(@Self)^.clr := $00080000;
  116904. end;
  116905. procedure TCAN2_C2FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  116906. begin
  116907. if thebits = 0 then
  116908. pTDefRegMap(@Self)^.clr := $00080000
  116909. else
  116910. pTDefRegMap(@Self)^.&set := $00080000;
  116911. end;
  116912. function TCAN2_C2FIFOINT22.getRXOVFLIE : TBits_1; inline;
  116913. begin
  116914. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  116915. end;
  116916. procedure TCAN2_C2FIFOINT22.setTXEMPTYIE; inline;
  116917. begin
  116918. pTDefRegMap(@Self)^.&set := $01000000;
  116919. end;
  116920. procedure TCAN2_C2FIFOINT22.clearTXEMPTYIE; inline;
  116921. begin
  116922. pTDefRegMap(@Self)^.clr := $01000000;
  116923. end;
  116924. procedure TCAN2_C2FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  116925. begin
  116926. if thebits = 0 then
  116927. pTDefRegMap(@Self)^.clr := $01000000
  116928. else
  116929. pTDefRegMap(@Self)^.&set := $01000000;
  116930. end;
  116931. function TCAN2_C2FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  116932. begin
  116933. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  116934. end;
  116935. procedure TCAN2_C2FIFOINT22.setTXHALFIE; inline;
  116936. begin
  116937. pTDefRegMap(@Self)^.&set := $02000000;
  116938. end;
  116939. procedure TCAN2_C2FIFOINT22.clearTXHALFIE; inline;
  116940. begin
  116941. pTDefRegMap(@Self)^.clr := $02000000;
  116942. end;
  116943. procedure TCAN2_C2FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  116944. begin
  116945. if thebits = 0 then
  116946. pTDefRegMap(@Self)^.clr := $02000000
  116947. else
  116948. pTDefRegMap(@Self)^.&set := $02000000;
  116949. end;
  116950. function TCAN2_C2FIFOINT22.getTXHALFIE : TBits_1; inline;
  116951. begin
  116952. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  116953. end;
  116954. procedure TCAN2_C2FIFOINT22.setTXNFULLIE; inline;
  116955. begin
  116956. pTDefRegMap(@Self)^.&set := $04000000;
  116957. end;
  116958. procedure TCAN2_C2FIFOINT22.clearTXNFULLIE; inline;
  116959. begin
  116960. pTDefRegMap(@Self)^.clr := $04000000;
  116961. end;
  116962. procedure TCAN2_C2FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  116963. begin
  116964. if thebits = 0 then
  116965. pTDefRegMap(@Self)^.clr := $04000000
  116966. else
  116967. pTDefRegMap(@Self)^.&set := $04000000;
  116968. end;
  116969. function TCAN2_C2FIFOINT22.getTXNFULLIE : TBits_1; inline;
  116970. begin
  116971. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  116972. end;
  116973. procedure TCAN2_C2FIFOINT22.setw(thebits : TBits_32); inline;
  116974. begin
  116975. pTDefRegMap(@Self)^.val := thebits;
  116976. end;
  116977. function TCAN2_C2FIFOINT22.getw : TBits_32; inline;
  116978. begin
  116979. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116980. end;
  116981. procedure TCAN2_C2FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  116982. begin
  116983. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  116984. end;
  116985. function TCAN2_C2FIFOCI22.getCFIFOCI : TBits_5; inline;
  116986. begin
  116987. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  116988. end;
  116989. procedure TCAN2_C2FIFOCI22.setw(thebits : TBits_32); inline;
  116990. begin
  116991. pTDefRegMap(@Self)^.val := thebits;
  116992. end;
  116993. function TCAN2_C2FIFOCI22.getw : TBits_32; inline;
  116994. begin
  116995. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116996. end;
  116997. procedure TCAN2_C2FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  116998. begin
  116999. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  117000. end;
  117001. function TCAN2_C2FIFOCON23.getTXPRI : TBits_2; inline;
  117002. begin
  117003. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  117004. end;
  117005. procedure TCAN2_C2FIFOCON23.setRTREN; inline;
  117006. begin
  117007. pTDefRegMap(@Self)^.&set := $00000004;
  117008. end;
  117009. procedure TCAN2_C2FIFOCON23.clearRTREN; inline;
  117010. begin
  117011. pTDefRegMap(@Self)^.clr := $00000004;
  117012. end;
  117013. procedure TCAN2_C2FIFOCON23.setRTREN(thebits : TBits_1); inline;
  117014. begin
  117015. if thebits = 0 then
  117016. pTDefRegMap(@Self)^.clr := $00000004
  117017. else
  117018. pTDefRegMap(@Self)^.&set := $00000004;
  117019. end;
  117020. function TCAN2_C2FIFOCON23.getRTREN : TBits_1; inline;
  117021. begin
  117022. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  117023. end;
  117024. procedure TCAN2_C2FIFOCON23.setTXREQ; inline;
  117025. begin
  117026. pTDefRegMap(@Self)^.&set := $00000008;
  117027. end;
  117028. procedure TCAN2_C2FIFOCON23.clearTXREQ; inline;
  117029. begin
  117030. pTDefRegMap(@Self)^.clr := $00000008;
  117031. end;
  117032. procedure TCAN2_C2FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  117033. begin
  117034. if thebits = 0 then
  117035. pTDefRegMap(@Self)^.clr := $00000008
  117036. else
  117037. pTDefRegMap(@Self)^.&set := $00000008;
  117038. end;
  117039. function TCAN2_C2FIFOCON23.getTXREQ : TBits_1; inline;
  117040. begin
  117041. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  117042. end;
  117043. procedure TCAN2_C2FIFOCON23.setTXERR; inline;
  117044. begin
  117045. pTDefRegMap(@Self)^.&set := $00000010;
  117046. end;
  117047. procedure TCAN2_C2FIFOCON23.clearTXERR; inline;
  117048. begin
  117049. pTDefRegMap(@Self)^.clr := $00000010;
  117050. end;
  117051. procedure TCAN2_C2FIFOCON23.setTXERR(thebits : TBits_1); inline;
  117052. begin
  117053. if thebits = 0 then
  117054. pTDefRegMap(@Self)^.clr := $00000010
  117055. else
  117056. pTDefRegMap(@Self)^.&set := $00000010;
  117057. end;
  117058. function TCAN2_C2FIFOCON23.getTXERR : TBits_1; inline;
  117059. begin
  117060. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  117061. end;
  117062. procedure TCAN2_C2FIFOCON23.setTXLARB; inline;
  117063. begin
  117064. pTDefRegMap(@Self)^.&set := $00000020;
  117065. end;
  117066. procedure TCAN2_C2FIFOCON23.clearTXLARB; inline;
  117067. begin
  117068. pTDefRegMap(@Self)^.clr := $00000020;
  117069. end;
  117070. procedure TCAN2_C2FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  117071. begin
  117072. if thebits = 0 then
  117073. pTDefRegMap(@Self)^.clr := $00000020
  117074. else
  117075. pTDefRegMap(@Self)^.&set := $00000020;
  117076. end;
  117077. function TCAN2_C2FIFOCON23.getTXLARB : TBits_1; inline;
  117078. begin
  117079. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  117080. end;
  117081. procedure TCAN2_C2FIFOCON23.setTXABAT; inline;
  117082. begin
  117083. pTDefRegMap(@Self)^.&set := $00000040;
  117084. end;
  117085. procedure TCAN2_C2FIFOCON23.clearTXABAT; inline;
  117086. begin
  117087. pTDefRegMap(@Self)^.clr := $00000040;
  117088. end;
  117089. procedure TCAN2_C2FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  117090. begin
  117091. if thebits = 0 then
  117092. pTDefRegMap(@Self)^.clr := $00000040
  117093. else
  117094. pTDefRegMap(@Self)^.&set := $00000040;
  117095. end;
  117096. function TCAN2_C2FIFOCON23.getTXABAT : TBits_1; inline;
  117097. begin
  117098. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  117099. end;
  117100. procedure TCAN2_C2FIFOCON23.setTXEN; inline;
  117101. begin
  117102. pTDefRegMap(@Self)^.&set := $00000080;
  117103. end;
  117104. procedure TCAN2_C2FIFOCON23.clearTXEN; inline;
  117105. begin
  117106. pTDefRegMap(@Self)^.clr := $00000080;
  117107. end;
  117108. procedure TCAN2_C2FIFOCON23.setTXEN(thebits : TBits_1); inline;
  117109. begin
  117110. if thebits = 0 then
  117111. pTDefRegMap(@Self)^.clr := $00000080
  117112. else
  117113. pTDefRegMap(@Self)^.&set := $00000080;
  117114. end;
  117115. function TCAN2_C2FIFOCON23.getTXEN : TBits_1; inline;
  117116. begin
  117117. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  117118. end;
  117119. procedure TCAN2_C2FIFOCON23.setDONLY; inline;
  117120. begin
  117121. pTDefRegMap(@Self)^.&set := $00001000;
  117122. end;
  117123. procedure TCAN2_C2FIFOCON23.clearDONLY; inline;
  117124. begin
  117125. pTDefRegMap(@Self)^.clr := $00001000;
  117126. end;
  117127. procedure TCAN2_C2FIFOCON23.setDONLY(thebits : TBits_1); inline;
  117128. begin
  117129. if thebits = 0 then
  117130. pTDefRegMap(@Self)^.clr := $00001000
  117131. else
  117132. pTDefRegMap(@Self)^.&set := $00001000;
  117133. end;
  117134. function TCAN2_C2FIFOCON23.getDONLY : TBits_1; inline;
  117135. begin
  117136. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  117137. end;
  117138. procedure TCAN2_C2FIFOCON23.setUINC; inline;
  117139. begin
  117140. pTDefRegMap(@Self)^.&set := $00002000;
  117141. end;
  117142. procedure TCAN2_C2FIFOCON23.clearUINC; inline;
  117143. begin
  117144. pTDefRegMap(@Self)^.clr := $00002000;
  117145. end;
  117146. procedure TCAN2_C2FIFOCON23.setUINC(thebits : TBits_1); inline;
  117147. begin
  117148. if thebits = 0 then
  117149. pTDefRegMap(@Self)^.clr := $00002000
  117150. else
  117151. pTDefRegMap(@Self)^.&set := $00002000;
  117152. end;
  117153. function TCAN2_C2FIFOCON23.getUINC : TBits_1; inline;
  117154. begin
  117155. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  117156. end;
  117157. procedure TCAN2_C2FIFOCON23.setFRESET; inline;
  117158. begin
  117159. pTDefRegMap(@Self)^.&set := $00004000;
  117160. end;
  117161. procedure TCAN2_C2FIFOCON23.clearFRESET; inline;
  117162. begin
  117163. pTDefRegMap(@Self)^.clr := $00004000;
  117164. end;
  117165. procedure TCAN2_C2FIFOCON23.setFRESET(thebits : TBits_1); inline;
  117166. begin
  117167. if thebits = 0 then
  117168. pTDefRegMap(@Self)^.clr := $00004000
  117169. else
  117170. pTDefRegMap(@Self)^.&set := $00004000;
  117171. end;
  117172. function TCAN2_C2FIFOCON23.getFRESET : TBits_1; inline;
  117173. begin
  117174. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  117175. end;
  117176. procedure TCAN2_C2FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  117177. begin
  117178. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  117179. end;
  117180. function TCAN2_C2FIFOCON23.getFSIZE : TBits_5; inline;
  117181. begin
  117182. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  117183. end;
  117184. procedure TCAN2_C2FIFOCON23.setw(thebits : TBits_32); inline;
  117185. begin
  117186. pTDefRegMap(@Self)^.val := thebits;
  117187. end;
  117188. function TCAN2_C2FIFOCON23.getw : TBits_32; inline;
  117189. begin
  117190. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  117191. end;
  117192. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIF; inline;
  117193. begin
  117194. pTDefRegMap(@Self)^.&set := $00000001;
  117195. end;
  117196. procedure TCAN2_C2FIFOINT23.clearRXNEMPTYIF; inline;
  117197. begin
  117198. pTDefRegMap(@Self)^.clr := $00000001;
  117199. end;
  117200. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  117201. begin
  117202. if thebits = 0 then
  117203. pTDefRegMap(@Self)^.clr := $00000001
  117204. else
  117205. pTDefRegMap(@Self)^.&set := $00000001;
  117206. end;
  117207. function TCAN2_C2FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  117208. begin
  117209. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  117210. end;
  117211. procedure TCAN2_C2FIFOINT23.setRXHALFIF; inline;
  117212. begin
  117213. pTDefRegMap(@Self)^.&set := $00000002;
  117214. end;
  117215. procedure TCAN2_C2FIFOINT23.clearRXHALFIF; inline;
  117216. begin
  117217. pTDefRegMap(@Self)^.clr := $00000002;
  117218. end;
  117219. procedure TCAN2_C2FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  117220. begin
  117221. if thebits = 0 then
  117222. pTDefRegMap(@Self)^.clr := $00000002
  117223. else
  117224. pTDefRegMap(@Self)^.&set := $00000002;
  117225. end;
  117226. function TCAN2_C2FIFOINT23.getRXHALFIF : TBits_1; inline;
  117227. begin
  117228. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  117229. end;
  117230. procedure TCAN2_C2FIFOINT23.setRXFULLIF; inline;
  117231. begin
  117232. pTDefRegMap(@Self)^.&set := $00000004;
  117233. end;
  117234. procedure TCAN2_C2FIFOINT23.clearRXFULLIF; inline;
  117235. begin
  117236. pTDefRegMap(@Self)^.clr := $00000004;
  117237. end;
  117238. procedure TCAN2_C2FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  117239. begin
  117240. if thebits = 0 then
  117241. pTDefRegMap(@Self)^.clr := $00000004
  117242. else
  117243. pTDefRegMap(@Self)^.&set := $00000004;
  117244. end;
  117245. function TCAN2_C2FIFOINT23.getRXFULLIF : TBits_1; inline;
  117246. begin
  117247. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  117248. end;
  117249. procedure TCAN2_C2FIFOINT23.setRXOVFLIF; inline;
  117250. begin
  117251. pTDefRegMap(@Self)^.&set := $00000008;
  117252. end;
  117253. procedure TCAN2_C2FIFOINT23.clearRXOVFLIF; inline;
  117254. begin
  117255. pTDefRegMap(@Self)^.clr := $00000008;
  117256. end;
  117257. procedure TCAN2_C2FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  117258. begin
  117259. if thebits = 0 then
  117260. pTDefRegMap(@Self)^.clr := $00000008
  117261. else
  117262. pTDefRegMap(@Self)^.&set := $00000008;
  117263. end;
  117264. function TCAN2_C2FIFOINT23.getRXOVFLIF : TBits_1; inline;
  117265. begin
  117266. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  117267. end;
  117268. procedure TCAN2_C2FIFOINT23.setTXEMPTYIF; inline;
  117269. begin
  117270. pTDefRegMap(@Self)^.&set := $00000100;
  117271. end;
  117272. procedure TCAN2_C2FIFOINT23.clearTXEMPTYIF; inline;
  117273. begin
  117274. pTDefRegMap(@Self)^.clr := $00000100;
  117275. end;
  117276. procedure TCAN2_C2FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  117277. begin
  117278. if thebits = 0 then
  117279. pTDefRegMap(@Self)^.clr := $00000100
  117280. else
  117281. pTDefRegMap(@Self)^.&set := $00000100;
  117282. end;
  117283. function TCAN2_C2FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  117284. begin
  117285. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  117286. end;
  117287. procedure TCAN2_C2FIFOINT23.setTXHALFIF; inline;
  117288. begin
  117289. pTDefRegMap(@Self)^.&set := $00000200;
  117290. end;
  117291. procedure TCAN2_C2FIFOINT23.clearTXHALFIF; inline;
  117292. begin
  117293. pTDefRegMap(@Self)^.clr := $00000200;
  117294. end;
  117295. procedure TCAN2_C2FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  117296. begin
  117297. if thebits = 0 then
  117298. pTDefRegMap(@Self)^.clr := $00000200
  117299. else
  117300. pTDefRegMap(@Self)^.&set := $00000200;
  117301. end;
  117302. function TCAN2_C2FIFOINT23.getTXHALFIF : TBits_1; inline;
  117303. begin
  117304. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  117305. end;
  117306. procedure TCAN2_C2FIFOINT23.setTXNFULLIF; inline;
  117307. begin
  117308. pTDefRegMap(@Self)^.&set := $00000400;
  117309. end;
  117310. procedure TCAN2_C2FIFOINT23.clearTXNFULLIF; inline;
  117311. begin
  117312. pTDefRegMap(@Self)^.clr := $00000400;
  117313. end;
  117314. procedure TCAN2_C2FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  117315. begin
  117316. if thebits = 0 then
  117317. pTDefRegMap(@Self)^.clr := $00000400
  117318. else
  117319. pTDefRegMap(@Self)^.&set := $00000400;
  117320. end;
  117321. function TCAN2_C2FIFOINT23.getTXNFULLIF : TBits_1; inline;
  117322. begin
  117323. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  117324. end;
  117325. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIE; inline;
  117326. begin
  117327. pTDefRegMap(@Self)^.&set := $00010000;
  117328. end;
  117329. procedure TCAN2_C2FIFOINT23.clearRXNEMPTYIE; inline;
  117330. begin
  117331. pTDefRegMap(@Self)^.clr := $00010000;
  117332. end;
  117333. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  117334. begin
  117335. if thebits = 0 then
  117336. pTDefRegMap(@Self)^.clr := $00010000
  117337. else
  117338. pTDefRegMap(@Self)^.&set := $00010000;
  117339. end;
  117340. function TCAN2_C2FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  117341. begin
  117342. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  117343. end;
  117344. procedure TCAN2_C2FIFOINT23.setRXHALFIE; inline;
  117345. begin
  117346. pTDefRegMap(@Self)^.&set := $00020000;
  117347. end;
  117348. procedure TCAN2_C2FIFOINT23.clearRXHALFIE; inline;
  117349. begin
  117350. pTDefRegMap(@Self)^.clr := $00020000;
  117351. end;
  117352. procedure TCAN2_C2FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  117353. begin
  117354. if thebits = 0 then
  117355. pTDefRegMap(@Self)^.clr := $00020000
  117356. else
  117357. pTDefRegMap(@Self)^.&set := $00020000;
  117358. end;
  117359. function TCAN2_C2FIFOINT23.getRXHALFIE : TBits_1; inline;
  117360. begin
  117361. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  117362. end;
  117363. procedure TCAN2_C2FIFOINT23.setRXFULLIE; inline;
  117364. begin
  117365. pTDefRegMap(@Self)^.&set := $00040000;
  117366. end;
  117367. procedure TCAN2_C2FIFOINT23.clearRXFULLIE; inline;
  117368. begin
  117369. pTDefRegMap(@Self)^.clr := $00040000;
  117370. end;
  117371. procedure TCAN2_C2FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  117372. begin
  117373. if thebits = 0 then
  117374. pTDefRegMap(@Self)^.clr := $00040000
  117375. else
  117376. pTDefRegMap(@Self)^.&set := $00040000;
  117377. end;
  117378. function TCAN2_C2FIFOINT23.getRXFULLIE : TBits_1; inline;
  117379. begin
  117380. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  117381. end;
  117382. procedure TCAN2_C2FIFOINT23.setRXOVFLIE; inline;
  117383. begin
  117384. pTDefRegMap(@Self)^.&set := $00080000;
  117385. end;
  117386. procedure TCAN2_C2FIFOINT23.clearRXOVFLIE; inline;
  117387. begin
  117388. pTDefRegMap(@Self)^.clr := $00080000;
  117389. end;
  117390. procedure TCAN2_C2FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  117391. begin
  117392. if thebits = 0 then
  117393. pTDefRegMap(@Self)^.clr := $00080000
  117394. else
  117395. pTDefRegMap(@Self)^.&set := $00080000;
  117396. end;
  117397. function TCAN2_C2FIFOINT23.getRXOVFLIE : TBits_1; inline;
  117398. begin
  117399. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  117400. end;
  117401. procedure TCAN2_C2FIFOINT23.setTXEMPTYIE; inline;
  117402. begin
  117403. pTDefRegMap(@Self)^.&set := $01000000;
  117404. end;
  117405. procedure TCAN2_C2FIFOINT23.clearTXEMPTYIE; inline;
  117406. begin
  117407. pTDefRegMap(@Self)^.clr := $01000000;
  117408. end;
  117409. procedure TCAN2_C2FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  117410. begin
  117411. if thebits = 0 then
  117412. pTDefRegMap(@Self)^.clr := $01000000
  117413. else
  117414. pTDefRegMap(@Self)^.&set := $01000000;
  117415. end;
  117416. function TCAN2_C2FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  117417. begin
  117418. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  117419. end;
  117420. procedure TCAN2_C2FIFOINT23.setTXHALFIE; inline;
  117421. begin
  117422. pTDefRegMap(@Self)^.&set := $02000000;
  117423. end;
  117424. procedure TCAN2_C2FIFOINT23.clearTXHALFIE; inline;
  117425. begin
  117426. pTDefRegMap(@Self)^.clr := $02000000;
  117427. end;
  117428. procedure TCAN2_C2FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  117429. begin
  117430. if thebits = 0 then
  117431. pTDefRegMap(@Self)^.clr := $02000000
  117432. else
  117433. pTDefRegMap(@Self)^.&set := $02000000;
  117434. end;
  117435. function TCAN2_C2FIFOINT23.getTXHALFIE : TBits_1; inline;
  117436. begin
  117437. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  117438. end;
  117439. procedure TCAN2_C2FIFOINT23.setTXNFULLIE; inline;
  117440. begin
  117441. pTDefRegMap(@Self)^.&set := $04000000;
  117442. end;
  117443. procedure TCAN2_C2FIFOINT23.clearTXNFULLIE; inline;
  117444. begin
  117445. pTDefRegMap(@Self)^.clr := $04000000;
  117446. end;
  117447. procedure TCAN2_C2FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  117448. begin
  117449. if thebits = 0 then
  117450. pTDefRegMap(@Self)^.clr := $04000000
  117451. else
  117452. pTDefRegMap(@Self)^.&set := $04000000;
  117453. end;
  117454. function TCAN2_C2FIFOINT23.getTXNFULLIE : TBits_1; inline;
  117455. begin
  117456. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  117457. end;
  117458. procedure TCAN2_C2FIFOINT23.setw(thebits : TBits_32); inline;
  117459. begin
  117460. pTDefRegMap(@Self)^.val := thebits;
  117461. end;
  117462. function TCAN2_C2FIFOINT23.getw : TBits_32; inline;
  117463. begin
  117464. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  117465. end;
  117466. procedure TCAN2_C2FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  117467. begin
  117468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  117469. end;
  117470. function TCAN2_C2FIFOCI23.getCFIFOCI : TBits_5; inline;
  117471. begin
  117472. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  117473. end;
  117474. procedure TCAN2_C2FIFOCI23.setw(thebits : TBits_32); inline;
  117475. begin
  117476. pTDefRegMap(@Self)^.val := thebits;
  117477. end;
  117478. function TCAN2_C2FIFOCI23.getw : TBits_32; inline;
  117479. begin
  117480. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  117481. end;
  117482. procedure TCAN2_C2FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  117483. begin
  117484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  117485. end;
  117486. function TCAN2_C2FIFOCON24.getTXPRI : TBits_2; inline;
  117487. begin
  117488. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  117489. end;
  117490. procedure TCAN2_C2FIFOCON24.setRTREN; inline;
  117491. begin
  117492. pTDefRegMap(@Self)^.&set := $00000004;
  117493. end;
  117494. procedure TCAN2_C2FIFOCON24.clearRTREN; inline;
  117495. begin
  117496. pTDefRegMap(@Self)^.clr := $00000004;
  117497. end;
  117498. procedure TCAN2_C2FIFOCON24.setRTREN(thebits : TBits_1); inline;
  117499. begin
  117500. if thebits = 0 then
  117501. pTDefRegMap(@Self)^.clr := $00000004
  117502. else
  117503. pTDefRegMap(@Self)^.&set := $00000004;
  117504. end;
  117505. function TCAN2_C2FIFOCON24.getRTREN : TBits_1; inline;
  117506. begin
  117507. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  117508. end;
  117509. procedure TCAN2_C2FIFOCON24.setTXREQ; inline;
  117510. begin
  117511. pTDefRegMap(@Self)^.&set := $00000008;
  117512. end;
  117513. procedure TCAN2_C2FIFOCON24.clearTXREQ; inline;
  117514. begin
  117515. pTDefRegMap(@Self)^.clr := $00000008;
  117516. end;
  117517. procedure TCAN2_C2FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  117518. begin
  117519. if thebits = 0 then
  117520. pTDefRegMap(@Self)^.clr := $00000008
  117521. else
  117522. pTDefRegMap(@Self)^.&set := $00000008;
  117523. end;
  117524. function TCAN2_C2FIFOCON24.getTXREQ : TBits_1; inline;
  117525. begin
  117526. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  117527. end;
  117528. procedure TCAN2_C2FIFOCON24.setTXERR; inline;
  117529. begin
  117530. pTDefRegMap(@Self)^.&set := $00000010;
  117531. end;
  117532. procedure TCAN2_C2FIFOCON24.clearTXERR; inline;
  117533. begin
  117534. pTDefRegMap(@Self)^.clr := $00000010;
  117535. end;
  117536. procedure TCAN2_C2FIFOCON24.setTXERR(thebits : TBits_1); inline;
  117537. begin
  117538. if thebits = 0 then
  117539. pTDefRegMap(@Self)^.clr := $00000010
  117540. else
  117541. pTDefRegMap(@Self)^.&set := $00000010;
  117542. end;
  117543. function TCAN2_C2FIFOCON24.getTXERR : TBits_1; inline;
  117544. begin
  117545. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  117546. end;
  117547. procedure TCAN2_C2FIFOCON24.setTXLARB; inline;
  117548. begin
  117549. pTDefRegMap(@Self)^.&set := $00000020;
  117550. end;
  117551. procedure TCAN2_C2FIFOCON24.clearTXLARB; inline;
  117552. begin
  117553. pTDefRegMap(@Self)^.clr := $00000020;
  117554. end;
  117555. procedure TCAN2_C2FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  117556. begin
  117557. if thebits = 0 then
  117558. pTDefRegMap(@Self)^.clr := $00000020
  117559. else
  117560. pTDefRegMap(@Self)^.&set := $00000020;
  117561. end;
  117562. function TCAN2_C2FIFOCON24.getTXLARB : TBits_1; inline;
  117563. begin
  117564. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  117565. end;
  117566. procedure TCAN2_C2FIFOCON24.setTXABAT; inline;
  117567. begin
  117568. pTDefRegMap(@Self)^.&set := $00000040;
  117569. end;
  117570. procedure TCAN2_C2FIFOCON24.clearTXABAT; inline;
  117571. begin
  117572. pTDefRegMap(@Self)^.clr := $00000040;
  117573. end;
  117574. procedure TCAN2_C2FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  117575. begin
  117576. if thebits = 0 then
  117577. pTDefRegMap(@Self)^.clr := $00000040
  117578. else
  117579. pTDefRegMap(@Self)^.&set := $00000040;
  117580. end;
  117581. function TCAN2_C2FIFOCON24.getTXABAT : TBits_1; inline;
  117582. begin
  117583. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  117584. end;
  117585. procedure TCAN2_C2FIFOCON24.setTXEN; inline;
  117586. begin
  117587. pTDefRegMap(@Self)^.&set := $00000080;
  117588. end;
  117589. procedure TCAN2_C2FIFOCON24.clearTXEN; inline;
  117590. begin
  117591. pTDefRegMap(@Self)^.clr := $00000080;
  117592. end;
  117593. procedure TCAN2_C2FIFOCON24.setTXEN(thebits : TBits_1); inline;
  117594. begin
  117595. if thebits = 0 then
  117596. pTDefRegMap(@Self)^.clr := $00000080
  117597. else
  117598. pTDefRegMap(@Self)^.&set := $00000080;
  117599. end;
  117600. function TCAN2_C2FIFOCON24.getTXEN : TBits_1; inline;
  117601. begin
  117602. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  117603. end;
  117604. procedure TCAN2_C2FIFOCON24.setDONLY; inline;
  117605. begin
  117606. pTDefRegMap(@Self)^.&set := $00001000;
  117607. end;
  117608. procedure TCAN2_C2FIFOCON24.clearDONLY; inline;
  117609. begin
  117610. pTDefRegMap(@Self)^.clr := $00001000;
  117611. end;
  117612. procedure TCAN2_C2FIFOCON24.setDONLY(thebits : TBits_1); inline;
  117613. begin
  117614. if thebits = 0 then
  117615. pTDefRegMap(@Self)^.clr := $00001000
  117616. else
  117617. pTDefRegMap(@Self)^.&set := $00001000;
  117618. end;
  117619. function TCAN2_C2FIFOCON24.getDONLY : TBits_1; inline;
  117620. begin
  117621. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  117622. end;
  117623. procedure TCAN2_C2FIFOCON24.setUINC; inline;
  117624. begin
  117625. pTDefRegMap(@Self)^.&set := $00002000;
  117626. end;
  117627. procedure TCAN2_C2FIFOCON24.clearUINC; inline;
  117628. begin
  117629. pTDefRegMap(@Self)^.clr := $00002000;
  117630. end;
  117631. procedure TCAN2_C2FIFOCON24.setUINC(thebits : TBits_1); inline;
  117632. begin
  117633. if thebits = 0 then
  117634. pTDefRegMap(@Self)^.clr := $00002000
  117635. else
  117636. pTDefRegMap(@Self)^.&set := $00002000;
  117637. end;
  117638. function TCAN2_C2FIFOCON24.getUINC : TBits_1; inline;
  117639. begin
  117640. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  117641. end;
  117642. procedure TCAN2_C2FIFOCON24.setFRESET; inline;
  117643. begin
  117644. pTDefRegMap(@Self)^.&set := $00004000;
  117645. end;
  117646. procedure TCAN2_C2FIFOCON24.clearFRESET; inline;
  117647. begin
  117648. pTDefRegMap(@Self)^.clr := $00004000;
  117649. end;
  117650. procedure TCAN2_C2FIFOCON24.setFRESET(thebits : TBits_1); inline;
  117651. begin
  117652. if thebits = 0 then
  117653. pTDefRegMap(@Self)^.clr := $00004000
  117654. else
  117655. pTDefRegMap(@Self)^.&set := $00004000;
  117656. end;
  117657. function TCAN2_C2FIFOCON24.getFRESET : TBits_1; inline;
  117658. begin
  117659. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  117660. end;
  117661. procedure TCAN2_C2FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  117662. begin
  117663. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  117664. end;
  117665. function TCAN2_C2FIFOCON24.getFSIZE : TBits_5; inline;
  117666. begin
  117667. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  117668. end;
  117669. procedure TCAN2_C2FIFOCON24.setw(thebits : TBits_32); inline;
  117670. begin
  117671. pTDefRegMap(@Self)^.val := thebits;
  117672. end;
  117673. function TCAN2_C2FIFOCON24.getw : TBits_32; inline;
  117674. begin
  117675. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  117676. end;
  117677. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIF; inline;
  117678. begin
  117679. pTDefRegMap(@Self)^.&set := $00000001;
  117680. end;
  117681. procedure TCAN2_C2FIFOINT24.clearRXNEMPTYIF; inline;
  117682. begin
  117683. pTDefRegMap(@Self)^.clr := $00000001;
  117684. end;
  117685. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  117686. begin
  117687. if thebits = 0 then
  117688. pTDefRegMap(@Self)^.clr := $00000001
  117689. else
  117690. pTDefRegMap(@Self)^.&set := $00000001;
  117691. end;
  117692. function TCAN2_C2FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  117693. begin
  117694. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  117695. end;
  117696. procedure TCAN2_C2FIFOINT24.setRXHALFIF; inline;
  117697. begin
  117698. pTDefRegMap(@Self)^.&set := $00000002;
  117699. end;
  117700. procedure TCAN2_C2FIFOINT24.clearRXHALFIF; inline;
  117701. begin
  117702. pTDefRegMap(@Self)^.clr := $00000002;
  117703. end;
  117704. procedure TCAN2_C2FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  117705. begin
  117706. if thebits = 0 then
  117707. pTDefRegMap(@Self)^.clr := $00000002
  117708. else
  117709. pTDefRegMap(@Self)^.&set := $00000002;
  117710. end;
  117711. function TCAN2_C2FIFOINT24.getRXHALFIF : TBits_1; inline;
  117712. begin
  117713. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  117714. end;
  117715. procedure TCAN2_C2FIFOINT24.setRXFULLIF; inline;
  117716. begin
  117717. pTDefRegMap(@Self)^.&set := $00000004;
  117718. end;
  117719. procedure TCAN2_C2FIFOINT24.clearRXFULLIF; inline;
  117720. begin
  117721. pTDefRegMap(@Self)^.clr := $00000004;
  117722. end;
  117723. procedure TCAN2_C2FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  117724. begin
  117725. if thebits = 0 then
  117726. pTDefRegMap(@Self)^.clr := $00000004
  117727. else
  117728. pTDefRegMap(@Self)^.&set := $00000004;
  117729. end;
  117730. function TCAN2_C2FIFOINT24.getRXFULLIF : TBits_1; inline;
  117731. begin
  117732. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  117733. end;
  117734. procedure TCAN2_C2FIFOINT24.setRXOVFLIF; inline;
  117735. begin
  117736. pTDefRegMap(@Self)^.&set := $00000008;
  117737. end;
  117738. procedure TCAN2_C2FIFOINT24.clearRXOVFLIF; inline;
  117739. begin
  117740. pTDefRegMap(@Self)^.clr := $00000008;
  117741. end;
  117742. procedure TCAN2_C2FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  117743. begin
  117744. if thebits = 0 then
  117745. pTDefRegMap(@Self)^.clr := $00000008
  117746. else
  117747. pTDefRegMap(@Self)^.&set := $00000008;
  117748. end;
  117749. function TCAN2_C2FIFOINT24.getRXOVFLIF : TBits_1; inline;
  117750. begin
  117751. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  117752. end;
  117753. procedure TCAN2_C2FIFOINT24.setTXEMPTYIF; inline;
  117754. begin
  117755. pTDefRegMap(@Self)^.&set := $00000100;
  117756. end;
  117757. procedure TCAN2_C2FIFOINT24.clearTXEMPTYIF; inline;
  117758. begin
  117759. pTDefRegMap(@Self)^.clr := $00000100;
  117760. end;
  117761. procedure TCAN2_C2FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  117762. begin
  117763. if thebits = 0 then
  117764. pTDefRegMap(@Self)^.clr := $00000100
  117765. else
  117766. pTDefRegMap(@Self)^.&set := $00000100;
  117767. end;
  117768. function TCAN2_C2FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  117769. begin
  117770. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  117771. end;
  117772. procedure TCAN2_C2FIFOINT24.setTXHALFIF; inline;
  117773. begin
  117774. pTDefRegMap(@Self)^.&set := $00000200;
  117775. end;
  117776. procedure TCAN2_C2FIFOINT24.clearTXHALFIF; inline;
  117777. begin
  117778. pTDefRegMap(@Self)^.clr := $00000200;
  117779. end;
  117780. procedure TCAN2_C2FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  117781. begin
  117782. if thebits = 0 then
  117783. pTDefRegMap(@Self)^.clr := $00000200
  117784. else
  117785. pTDefRegMap(@Self)^.&set := $00000200;
  117786. end;
  117787. function TCAN2_C2FIFOINT24.getTXHALFIF : TBits_1; inline;
  117788. begin
  117789. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  117790. end;
  117791. procedure TCAN2_C2FIFOINT24.setTXNFULLIF; inline;
  117792. begin
  117793. pTDefRegMap(@Self)^.&set := $00000400;
  117794. end;
  117795. procedure TCAN2_C2FIFOINT24.clearTXNFULLIF; inline;
  117796. begin
  117797. pTDefRegMap(@Self)^.clr := $00000400;
  117798. end;
  117799. procedure TCAN2_C2FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  117800. begin
  117801. if thebits = 0 then
  117802. pTDefRegMap(@Self)^.clr := $00000400
  117803. else
  117804. pTDefRegMap(@Self)^.&set := $00000400;
  117805. end;
  117806. function TCAN2_C2FIFOINT24.getTXNFULLIF : TBits_1; inline;
  117807. begin
  117808. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  117809. end;
  117810. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIE; inline;
  117811. begin
  117812. pTDefRegMap(@Self)^.&set := $00010000;
  117813. end;
  117814. procedure TCAN2_C2FIFOINT24.clearRXNEMPTYIE; inline;
  117815. begin
  117816. pTDefRegMap(@Self)^.clr := $00010000;
  117817. end;
  117818. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  117819. begin
  117820. if thebits = 0 then
  117821. pTDefRegMap(@Self)^.clr := $00010000
  117822. else
  117823. pTDefRegMap(@Self)^.&set := $00010000;
  117824. end;
  117825. function TCAN2_C2FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  117826. begin
  117827. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  117828. end;
  117829. procedure TCAN2_C2FIFOINT24.setRXHALFIE; inline;
  117830. begin
  117831. pTDefRegMap(@Self)^.&set := $00020000;
  117832. end;
  117833. procedure TCAN2_C2FIFOINT24.clearRXHALFIE; inline;
  117834. begin
  117835. pTDefRegMap(@Self)^.clr := $00020000;
  117836. end;
  117837. procedure TCAN2_C2FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  117838. begin
  117839. if thebits = 0 then
  117840. pTDefRegMap(@Self)^.clr := $00020000
  117841. else
  117842. pTDefRegMap(@Self)^.&set := $00020000;
  117843. end;
  117844. function TCAN2_C2FIFOINT24.getRXHALFIE : TBits_1; inline;
  117845. begin
  117846. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  117847. end;
  117848. procedure TCAN2_C2FIFOINT24.setRXFULLIE; inline;
  117849. begin
  117850. pTDefRegMap(@Self)^.&set := $00040000;
  117851. end;
  117852. procedure TCAN2_C2FIFOINT24.clearRXFULLIE; inline;
  117853. begin
  117854. pTDefRegMap(@Self)^.clr := $00040000;
  117855. end;
  117856. procedure TCAN2_C2FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  117857. begin
  117858. if thebits = 0 then
  117859. pTDefRegMap(@Self)^.clr := $00040000
  117860. else
  117861. pTDefRegMap(@Self)^.&set := $00040000;
  117862. end;
  117863. function TCAN2_C2FIFOINT24.getRXFULLIE : TBits_1; inline;
  117864. begin
  117865. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  117866. end;
  117867. procedure TCAN2_C2FIFOINT24.setRXOVFLIE; inline;
  117868. begin
  117869. pTDefRegMap(@Self)^.&set := $00080000;
  117870. end;
  117871. procedure TCAN2_C2FIFOINT24.clearRXOVFLIE; inline;
  117872. begin
  117873. pTDefRegMap(@Self)^.clr := $00080000;
  117874. end;
  117875. procedure TCAN2_C2FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  117876. begin
  117877. if thebits = 0 then
  117878. pTDefRegMap(@Self)^.clr := $00080000
  117879. else
  117880. pTDefRegMap(@Self)^.&set := $00080000;
  117881. end;
  117882. function TCAN2_C2FIFOINT24.getRXOVFLIE : TBits_1; inline;
  117883. begin
  117884. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  117885. end;
  117886. procedure TCAN2_C2FIFOINT24.setTXEMPTYIE; inline;
  117887. begin
  117888. pTDefRegMap(@Self)^.&set := $01000000;
  117889. end;
  117890. procedure TCAN2_C2FIFOINT24.clearTXEMPTYIE; inline;
  117891. begin
  117892. pTDefRegMap(@Self)^.clr := $01000000;
  117893. end;
  117894. procedure TCAN2_C2FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  117895. begin
  117896. if thebits = 0 then
  117897. pTDefRegMap(@Self)^.clr := $01000000
  117898. else
  117899. pTDefRegMap(@Self)^.&set := $01000000;
  117900. end;
  117901. function TCAN2_C2FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  117902. begin
  117903. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  117904. end;
  117905. procedure TCAN2_C2FIFOINT24.setTXHALFIE; inline;
  117906. begin
  117907. pTDefRegMap(@Self)^.&set := $02000000;
  117908. end;
  117909. procedure TCAN2_C2FIFOINT24.clearTXHALFIE; inline;
  117910. begin
  117911. pTDefRegMap(@Self)^.clr := $02000000;
  117912. end;
  117913. procedure TCAN2_C2FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  117914. begin
  117915. if thebits = 0 then
  117916. pTDefRegMap(@Self)^.clr := $02000000
  117917. else
  117918. pTDefRegMap(@Self)^.&set := $02000000;
  117919. end;
  117920. function TCAN2_C2FIFOINT24.getTXHALFIE : TBits_1; inline;
  117921. begin
  117922. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  117923. end;
  117924. procedure TCAN2_C2FIFOINT24.setTXNFULLIE; inline;
  117925. begin
  117926. pTDefRegMap(@Self)^.&set := $04000000;
  117927. end;
  117928. procedure TCAN2_C2FIFOINT24.clearTXNFULLIE; inline;
  117929. begin
  117930. pTDefRegMap(@Self)^.clr := $04000000;
  117931. end;
  117932. procedure TCAN2_C2FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  117933. begin
  117934. if thebits = 0 then
  117935. pTDefRegMap(@Self)^.clr := $04000000
  117936. else
  117937. pTDefRegMap(@Self)^.&set := $04000000;
  117938. end;
  117939. function TCAN2_C2FIFOINT24.getTXNFULLIE : TBits_1; inline;
  117940. begin
  117941. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  117942. end;
  117943. procedure TCAN2_C2FIFOINT24.setw(thebits : TBits_32); inline;
  117944. begin
  117945. pTDefRegMap(@Self)^.val := thebits;
  117946. end;
  117947. function TCAN2_C2FIFOINT24.getw : TBits_32; inline;
  117948. begin
  117949. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  117950. end;
  117951. procedure TCAN2_C2FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  117952. begin
  117953. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  117954. end;
  117955. function TCAN2_C2FIFOCI24.getCFIFOCI : TBits_5; inline;
  117956. begin
  117957. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  117958. end;
  117959. procedure TCAN2_C2FIFOCI24.setw(thebits : TBits_32); inline;
  117960. begin
  117961. pTDefRegMap(@Self)^.val := thebits;
  117962. end;
  117963. function TCAN2_C2FIFOCI24.getw : TBits_32; inline;
  117964. begin
  117965. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  117966. end;
  117967. procedure TCAN2_C2FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  117968. begin
  117969. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  117970. end;
  117971. function TCAN2_C2FIFOCON25.getTXPRI : TBits_2; inline;
  117972. begin
  117973. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  117974. end;
  117975. procedure TCAN2_C2FIFOCON25.setRTREN; inline;
  117976. begin
  117977. pTDefRegMap(@Self)^.&set := $00000004;
  117978. end;
  117979. procedure TCAN2_C2FIFOCON25.clearRTREN; inline;
  117980. begin
  117981. pTDefRegMap(@Self)^.clr := $00000004;
  117982. end;
  117983. procedure TCAN2_C2FIFOCON25.setRTREN(thebits : TBits_1); inline;
  117984. begin
  117985. if thebits = 0 then
  117986. pTDefRegMap(@Self)^.clr := $00000004
  117987. else
  117988. pTDefRegMap(@Self)^.&set := $00000004;
  117989. end;
  117990. function TCAN2_C2FIFOCON25.getRTREN : TBits_1; inline;
  117991. begin
  117992. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  117993. end;
  117994. procedure TCAN2_C2FIFOCON25.setTXREQ; inline;
  117995. begin
  117996. pTDefRegMap(@Self)^.&set := $00000008;
  117997. end;
  117998. procedure TCAN2_C2FIFOCON25.clearTXREQ; inline;
  117999. begin
  118000. pTDefRegMap(@Self)^.clr := $00000008;
  118001. end;
  118002. procedure TCAN2_C2FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  118003. begin
  118004. if thebits = 0 then
  118005. pTDefRegMap(@Self)^.clr := $00000008
  118006. else
  118007. pTDefRegMap(@Self)^.&set := $00000008;
  118008. end;
  118009. function TCAN2_C2FIFOCON25.getTXREQ : TBits_1; inline;
  118010. begin
  118011. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  118012. end;
  118013. procedure TCAN2_C2FIFOCON25.setTXERR; inline;
  118014. begin
  118015. pTDefRegMap(@Self)^.&set := $00000010;
  118016. end;
  118017. procedure TCAN2_C2FIFOCON25.clearTXERR; inline;
  118018. begin
  118019. pTDefRegMap(@Self)^.clr := $00000010;
  118020. end;
  118021. procedure TCAN2_C2FIFOCON25.setTXERR(thebits : TBits_1); inline;
  118022. begin
  118023. if thebits = 0 then
  118024. pTDefRegMap(@Self)^.clr := $00000010
  118025. else
  118026. pTDefRegMap(@Self)^.&set := $00000010;
  118027. end;
  118028. function TCAN2_C2FIFOCON25.getTXERR : TBits_1; inline;
  118029. begin
  118030. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  118031. end;
  118032. procedure TCAN2_C2FIFOCON25.setTXLARB; inline;
  118033. begin
  118034. pTDefRegMap(@Self)^.&set := $00000020;
  118035. end;
  118036. procedure TCAN2_C2FIFOCON25.clearTXLARB; inline;
  118037. begin
  118038. pTDefRegMap(@Self)^.clr := $00000020;
  118039. end;
  118040. procedure TCAN2_C2FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  118041. begin
  118042. if thebits = 0 then
  118043. pTDefRegMap(@Self)^.clr := $00000020
  118044. else
  118045. pTDefRegMap(@Self)^.&set := $00000020;
  118046. end;
  118047. function TCAN2_C2FIFOCON25.getTXLARB : TBits_1; inline;
  118048. begin
  118049. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  118050. end;
  118051. procedure TCAN2_C2FIFOCON25.setTXABAT; inline;
  118052. begin
  118053. pTDefRegMap(@Self)^.&set := $00000040;
  118054. end;
  118055. procedure TCAN2_C2FIFOCON25.clearTXABAT; inline;
  118056. begin
  118057. pTDefRegMap(@Self)^.clr := $00000040;
  118058. end;
  118059. procedure TCAN2_C2FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  118060. begin
  118061. if thebits = 0 then
  118062. pTDefRegMap(@Self)^.clr := $00000040
  118063. else
  118064. pTDefRegMap(@Self)^.&set := $00000040;
  118065. end;
  118066. function TCAN2_C2FIFOCON25.getTXABAT : TBits_1; inline;
  118067. begin
  118068. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  118069. end;
  118070. procedure TCAN2_C2FIFOCON25.setTXEN; inline;
  118071. begin
  118072. pTDefRegMap(@Self)^.&set := $00000080;
  118073. end;
  118074. procedure TCAN2_C2FIFOCON25.clearTXEN; inline;
  118075. begin
  118076. pTDefRegMap(@Self)^.clr := $00000080;
  118077. end;
  118078. procedure TCAN2_C2FIFOCON25.setTXEN(thebits : TBits_1); inline;
  118079. begin
  118080. if thebits = 0 then
  118081. pTDefRegMap(@Self)^.clr := $00000080
  118082. else
  118083. pTDefRegMap(@Self)^.&set := $00000080;
  118084. end;
  118085. function TCAN2_C2FIFOCON25.getTXEN : TBits_1; inline;
  118086. begin
  118087. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  118088. end;
  118089. procedure TCAN2_C2FIFOCON25.setDONLY; inline;
  118090. begin
  118091. pTDefRegMap(@Self)^.&set := $00001000;
  118092. end;
  118093. procedure TCAN2_C2FIFOCON25.clearDONLY; inline;
  118094. begin
  118095. pTDefRegMap(@Self)^.clr := $00001000;
  118096. end;
  118097. procedure TCAN2_C2FIFOCON25.setDONLY(thebits : TBits_1); inline;
  118098. begin
  118099. if thebits = 0 then
  118100. pTDefRegMap(@Self)^.clr := $00001000
  118101. else
  118102. pTDefRegMap(@Self)^.&set := $00001000;
  118103. end;
  118104. function TCAN2_C2FIFOCON25.getDONLY : TBits_1; inline;
  118105. begin
  118106. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  118107. end;
  118108. procedure TCAN2_C2FIFOCON25.setUINC; inline;
  118109. begin
  118110. pTDefRegMap(@Self)^.&set := $00002000;
  118111. end;
  118112. procedure TCAN2_C2FIFOCON25.clearUINC; inline;
  118113. begin
  118114. pTDefRegMap(@Self)^.clr := $00002000;
  118115. end;
  118116. procedure TCAN2_C2FIFOCON25.setUINC(thebits : TBits_1); inline;
  118117. begin
  118118. if thebits = 0 then
  118119. pTDefRegMap(@Self)^.clr := $00002000
  118120. else
  118121. pTDefRegMap(@Self)^.&set := $00002000;
  118122. end;
  118123. function TCAN2_C2FIFOCON25.getUINC : TBits_1; inline;
  118124. begin
  118125. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  118126. end;
  118127. procedure TCAN2_C2FIFOCON25.setFRESET; inline;
  118128. begin
  118129. pTDefRegMap(@Self)^.&set := $00004000;
  118130. end;
  118131. procedure TCAN2_C2FIFOCON25.clearFRESET; inline;
  118132. begin
  118133. pTDefRegMap(@Self)^.clr := $00004000;
  118134. end;
  118135. procedure TCAN2_C2FIFOCON25.setFRESET(thebits : TBits_1); inline;
  118136. begin
  118137. if thebits = 0 then
  118138. pTDefRegMap(@Self)^.clr := $00004000
  118139. else
  118140. pTDefRegMap(@Self)^.&set := $00004000;
  118141. end;
  118142. function TCAN2_C2FIFOCON25.getFRESET : TBits_1; inline;
  118143. begin
  118144. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  118145. end;
  118146. procedure TCAN2_C2FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  118147. begin
  118148. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  118149. end;
  118150. function TCAN2_C2FIFOCON25.getFSIZE : TBits_5; inline;
  118151. begin
  118152. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  118153. end;
  118154. procedure TCAN2_C2FIFOCON25.setw(thebits : TBits_32); inline;
  118155. begin
  118156. pTDefRegMap(@Self)^.val := thebits;
  118157. end;
  118158. function TCAN2_C2FIFOCON25.getw : TBits_32; inline;
  118159. begin
  118160. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  118161. end;
  118162. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIF; inline;
  118163. begin
  118164. pTDefRegMap(@Self)^.&set := $00000001;
  118165. end;
  118166. procedure TCAN2_C2FIFOINT25.clearRXNEMPTYIF; inline;
  118167. begin
  118168. pTDefRegMap(@Self)^.clr := $00000001;
  118169. end;
  118170. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  118171. begin
  118172. if thebits = 0 then
  118173. pTDefRegMap(@Self)^.clr := $00000001
  118174. else
  118175. pTDefRegMap(@Self)^.&set := $00000001;
  118176. end;
  118177. function TCAN2_C2FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  118178. begin
  118179. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  118180. end;
  118181. procedure TCAN2_C2FIFOINT25.setRXHALFIF; inline;
  118182. begin
  118183. pTDefRegMap(@Self)^.&set := $00000002;
  118184. end;
  118185. procedure TCAN2_C2FIFOINT25.clearRXHALFIF; inline;
  118186. begin
  118187. pTDefRegMap(@Self)^.clr := $00000002;
  118188. end;
  118189. procedure TCAN2_C2FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  118190. begin
  118191. if thebits = 0 then
  118192. pTDefRegMap(@Self)^.clr := $00000002
  118193. else
  118194. pTDefRegMap(@Self)^.&set := $00000002;
  118195. end;
  118196. function TCAN2_C2FIFOINT25.getRXHALFIF : TBits_1; inline;
  118197. begin
  118198. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  118199. end;
  118200. procedure TCAN2_C2FIFOINT25.setRXFULLIF; inline;
  118201. begin
  118202. pTDefRegMap(@Self)^.&set := $00000004;
  118203. end;
  118204. procedure TCAN2_C2FIFOINT25.clearRXFULLIF; inline;
  118205. begin
  118206. pTDefRegMap(@Self)^.clr := $00000004;
  118207. end;
  118208. procedure TCAN2_C2FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  118209. begin
  118210. if thebits = 0 then
  118211. pTDefRegMap(@Self)^.clr := $00000004
  118212. else
  118213. pTDefRegMap(@Self)^.&set := $00000004;
  118214. end;
  118215. function TCAN2_C2FIFOINT25.getRXFULLIF : TBits_1; inline;
  118216. begin
  118217. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  118218. end;
  118219. procedure TCAN2_C2FIFOINT25.setRXOVFLIF; inline;
  118220. begin
  118221. pTDefRegMap(@Self)^.&set := $00000008;
  118222. end;
  118223. procedure TCAN2_C2FIFOINT25.clearRXOVFLIF; inline;
  118224. begin
  118225. pTDefRegMap(@Self)^.clr := $00000008;
  118226. end;
  118227. procedure TCAN2_C2FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  118228. begin
  118229. if thebits = 0 then
  118230. pTDefRegMap(@Self)^.clr := $00000008
  118231. else
  118232. pTDefRegMap(@Self)^.&set := $00000008;
  118233. end;
  118234. function TCAN2_C2FIFOINT25.getRXOVFLIF : TBits_1; inline;
  118235. begin
  118236. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  118237. end;
  118238. procedure TCAN2_C2FIFOINT25.setTXEMPTYIF; inline;
  118239. begin
  118240. pTDefRegMap(@Self)^.&set := $00000100;
  118241. end;
  118242. procedure TCAN2_C2FIFOINT25.clearTXEMPTYIF; inline;
  118243. begin
  118244. pTDefRegMap(@Self)^.clr := $00000100;
  118245. end;
  118246. procedure TCAN2_C2FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  118247. begin
  118248. if thebits = 0 then
  118249. pTDefRegMap(@Self)^.clr := $00000100
  118250. else
  118251. pTDefRegMap(@Self)^.&set := $00000100;
  118252. end;
  118253. function TCAN2_C2FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  118254. begin
  118255. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  118256. end;
  118257. procedure TCAN2_C2FIFOINT25.setTXHALFIF; inline;
  118258. begin
  118259. pTDefRegMap(@Self)^.&set := $00000200;
  118260. end;
  118261. procedure TCAN2_C2FIFOINT25.clearTXHALFIF; inline;
  118262. begin
  118263. pTDefRegMap(@Self)^.clr := $00000200;
  118264. end;
  118265. procedure TCAN2_C2FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  118266. begin
  118267. if thebits = 0 then
  118268. pTDefRegMap(@Self)^.clr := $00000200
  118269. else
  118270. pTDefRegMap(@Self)^.&set := $00000200;
  118271. end;
  118272. function TCAN2_C2FIFOINT25.getTXHALFIF : TBits_1; inline;
  118273. begin
  118274. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  118275. end;
  118276. procedure TCAN2_C2FIFOINT25.setTXNFULLIF; inline;
  118277. begin
  118278. pTDefRegMap(@Self)^.&set := $00000400;
  118279. end;
  118280. procedure TCAN2_C2FIFOINT25.clearTXNFULLIF; inline;
  118281. begin
  118282. pTDefRegMap(@Self)^.clr := $00000400;
  118283. end;
  118284. procedure TCAN2_C2FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  118285. begin
  118286. if thebits = 0 then
  118287. pTDefRegMap(@Self)^.clr := $00000400
  118288. else
  118289. pTDefRegMap(@Self)^.&set := $00000400;
  118290. end;
  118291. function TCAN2_C2FIFOINT25.getTXNFULLIF : TBits_1; inline;
  118292. begin
  118293. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  118294. end;
  118295. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIE; inline;
  118296. begin
  118297. pTDefRegMap(@Self)^.&set := $00010000;
  118298. end;
  118299. procedure TCAN2_C2FIFOINT25.clearRXNEMPTYIE; inline;
  118300. begin
  118301. pTDefRegMap(@Self)^.clr := $00010000;
  118302. end;
  118303. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  118304. begin
  118305. if thebits = 0 then
  118306. pTDefRegMap(@Self)^.clr := $00010000
  118307. else
  118308. pTDefRegMap(@Self)^.&set := $00010000;
  118309. end;
  118310. function TCAN2_C2FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  118311. begin
  118312. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  118313. end;
  118314. procedure TCAN2_C2FIFOINT25.setRXHALFIE; inline;
  118315. begin
  118316. pTDefRegMap(@Self)^.&set := $00020000;
  118317. end;
  118318. procedure TCAN2_C2FIFOINT25.clearRXHALFIE; inline;
  118319. begin
  118320. pTDefRegMap(@Self)^.clr := $00020000;
  118321. end;
  118322. procedure TCAN2_C2FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  118323. begin
  118324. if thebits = 0 then
  118325. pTDefRegMap(@Self)^.clr := $00020000
  118326. else
  118327. pTDefRegMap(@Self)^.&set := $00020000;
  118328. end;
  118329. function TCAN2_C2FIFOINT25.getRXHALFIE : TBits_1; inline;
  118330. begin
  118331. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  118332. end;
  118333. procedure TCAN2_C2FIFOINT25.setRXFULLIE; inline;
  118334. begin
  118335. pTDefRegMap(@Self)^.&set := $00040000;
  118336. end;
  118337. procedure TCAN2_C2FIFOINT25.clearRXFULLIE; inline;
  118338. begin
  118339. pTDefRegMap(@Self)^.clr := $00040000;
  118340. end;
  118341. procedure TCAN2_C2FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  118342. begin
  118343. if thebits = 0 then
  118344. pTDefRegMap(@Self)^.clr := $00040000
  118345. else
  118346. pTDefRegMap(@Self)^.&set := $00040000;
  118347. end;
  118348. function TCAN2_C2FIFOINT25.getRXFULLIE : TBits_1; inline;
  118349. begin
  118350. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  118351. end;
  118352. procedure TCAN2_C2FIFOINT25.setRXOVFLIE; inline;
  118353. begin
  118354. pTDefRegMap(@Self)^.&set := $00080000;
  118355. end;
  118356. procedure TCAN2_C2FIFOINT25.clearRXOVFLIE; inline;
  118357. begin
  118358. pTDefRegMap(@Self)^.clr := $00080000;
  118359. end;
  118360. procedure TCAN2_C2FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  118361. begin
  118362. if thebits = 0 then
  118363. pTDefRegMap(@Self)^.clr := $00080000
  118364. else
  118365. pTDefRegMap(@Self)^.&set := $00080000;
  118366. end;
  118367. function TCAN2_C2FIFOINT25.getRXOVFLIE : TBits_1; inline;
  118368. begin
  118369. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  118370. end;
  118371. procedure TCAN2_C2FIFOINT25.setTXEMPTYIE; inline;
  118372. begin
  118373. pTDefRegMap(@Self)^.&set := $01000000;
  118374. end;
  118375. procedure TCAN2_C2FIFOINT25.clearTXEMPTYIE; inline;
  118376. begin
  118377. pTDefRegMap(@Self)^.clr := $01000000;
  118378. end;
  118379. procedure TCAN2_C2FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  118380. begin
  118381. if thebits = 0 then
  118382. pTDefRegMap(@Self)^.clr := $01000000
  118383. else
  118384. pTDefRegMap(@Self)^.&set := $01000000;
  118385. end;
  118386. function TCAN2_C2FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  118387. begin
  118388. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  118389. end;
  118390. procedure TCAN2_C2FIFOINT25.setTXHALFIE; inline;
  118391. begin
  118392. pTDefRegMap(@Self)^.&set := $02000000;
  118393. end;
  118394. procedure TCAN2_C2FIFOINT25.clearTXHALFIE; inline;
  118395. begin
  118396. pTDefRegMap(@Self)^.clr := $02000000;
  118397. end;
  118398. procedure TCAN2_C2FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  118399. begin
  118400. if thebits = 0 then
  118401. pTDefRegMap(@Self)^.clr := $02000000
  118402. else
  118403. pTDefRegMap(@Self)^.&set := $02000000;
  118404. end;
  118405. function TCAN2_C2FIFOINT25.getTXHALFIE : TBits_1; inline;
  118406. begin
  118407. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  118408. end;
  118409. procedure TCAN2_C2FIFOINT25.setTXNFULLIE; inline;
  118410. begin
  118411. pTDefRegMap(@Self)^.&set := $04000000;
  118412. end;
  118413. procedure TCAN2_C2FIFOINT25.clearTXNFULLIE; inline;
  118414. begin
  118415. pTDefRegMap(@Self)^.clr := $04000000;
  118416. end;
  118417. procedure TCAN2_C2FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  118418. begin
  118419. if thebits = 0 then
  118420. pTDefRegMap(@Self)^.clr := $04000000
  118421. else
  118422. pTDefRegMap(@Self)^.&set := $04000000;
  118423. end;
  118424. function TCAN2_C2FIFOINT25.getTXNFULLIE : TBits_1; inline;
  118425. begin
  118426. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  118427. end;
  118428. procedure TCAN2_C2FIFOINT25.setw(thebits : TBits_32); inline;
  118429. begin
  118430. pTDefRegMap(@Self)^.val := thebits;
  118431. end;
  118432. function TCAN2_C2FIFOINT25.getw : TBits_32; inline;
  118433. begin
  118434. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  118435. end;
  118436. procedure TCAN2_C2FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  118437. begin
  118438. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  118439. end;
  118440. function TCAN2_C2FIFOCI25.getCFIFOCI : TBits_5; inline;
  118441. begin
  118442. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  118443. end;
  118444. procedure TCAN2_C2FIFOCI25.setw(thebits : TBits_32); inline;
  118445. begin
  118446. pTDefRegMap(@Self)^.val := thebits;
  118447. end;
  118448. function TCAN2_C2FIFOCI25.getw : TBits_32; inline;
  118449. begin
  118450. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  118451. end;
  118452. procedure TCAN2_C2FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  118453. begin
  118454. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  118455. end;
  118456. function TCAN2_C2FIFOCON26.getTXPRI : TBits_2; inline;
  118457. begin
  118458. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  118459. end;
  118460. procedure TCAN2_C2FIFOCON26.setRTREN; inline;
  118461. begin
  118462. pTDefRegMap(@Self)^.&set := $00000004;
  118463. end;
  118464. procedure TCAN2_C2FIFOCON26.clearRTREN; inline;
  118465. begin
  118466. pTDefRegMap(@Self)^.clr := $00000004;
  118467. end;
  118468. procedure TCAN2_C2FIFOCON26.setRTREN(thebits : TBits_1); inline;
  118469. begin
  118470. if thebits = 0 then
  118471. pTDefRegMap(@Self)^.clr := $00000004
  118472. else
  118473. pTDefRegMap(@Self)^.&set := $00000004;
  118474. end;
  118475. function TCAN2_C2FIFOCON26.getRTREN : TBits_1; inline;
  118476. begin
  118477. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  118478. end;
  118479. procedure TCAN2_C2FIFOCON26.setTXREQ; inline;
  118480. begin
  118481. pTDefRegMap(@Self)^.&set := $00000008;
  118482. end;
  118483. procedure TCAN2_C2FIFOCON26.clearTXREQ; inline;
  118484. begin
  118485. pTDefRegMap(@Self)^.clr := $00000008;
  118486. end;
  118487. procedure TCAN2_C2FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  118488. begin
  118489. if thebits = 0 then
  118490. pTDefRegMap(@Self)^.clr := $00000008
  118491. else
  118492. pTDefRegMap(@Self)^.&set := $00000008;
  118493. end;
  118494. function TCAN2_C2FIFOCON26.getTXREQ : TBits_1; inline;
  118495. begin
  118496. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  118497. end;
  118498. procedure TCAN2_C2FIFOCON26.setTXERR; inline;
  118499. begin
  118500. pTDefRegMap(@Self)^.&set := $00000010;
  118501. end;
  118502. procedure TCAN2_C2FIFOCON26.clearTXERR; inline;
  118503. begin
  118504. pTDefRegMap(@Self)^.clr := $00000010;
  118505. end;
  118506. procedure TCAN2_C2FIFOCON26.setTXERR(thebits : TBits_1); inline;
  118507. begin
  118508. if thebits = 0 then
  118509. pTDefRegMap(@Self)^.clr := $00000010
  118510. else
  118511. pTDefRegMap(@Self)^.&set := $00000010;
  118512. end;
  118513. function TCAN2_C2FIFOCON26.getTXERR : TBits_1; inline;
  118514. begin
  118515. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  118516. end;
  118517. procedure TCAN2_C2FIFOCON26.setTXLARB; inline;
  118518. begin
  118519. pTDefRegMap(@Self)^.&set := $00000020;
  118520. end;
  118521. procedure TCAN2_C2FIFOCON26.clearTXLARB; inline;
  118522. begin
  118523. pTDefRegMap(@Self)^.clr := $00000020;
  118524. end;
  118525. procedure TCAN2_C2FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  118526. begin
  118527. if thebits = 0 then
  118528. pTDefRegMap(@Self)^.clr := $00000020
  118529. else
  118530. pTDefRegMap(@Self)^.&set := $00000020;
  118531. end;
  118532. function TCAN2_C2FIFOCON26.getTXLARB : TBits_1; inline;
  118533. begin
  118534. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  118535. end;
  118536. procedure TCAN2_C2FIFOCON26.setTXABAT; inline;
  118537. begin
  118538. pTDefRegMap(@Self)^.&set := $00000040;
  118539. end;
  118540. procedure TCAN2_C2FIFOCON26.clearTXABAT; inline;
  118541. begin
  118542. pTDefRegMap(@Self)^.clr := $00000040;
  118543. end;
  118544. procedure TCAN2_C2FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  118545. begin
  118546. if thebits = 0 then
  118547. pTDefRegMap(@Self)^.clr := $00000040
  118548. else
  118549. pTDefRegMap(@Self)^.&set := $00000040;
  118550. end;
  118551. function TCAN2_C2FIFOCON26.getTXABAT : TBits_1; inline;
  118552. begin
  118553. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  118554. end;
  118555. procedure TCAN2_C2FIFOCON26.setTXEN; inline;
  118556. begin
  118557. pTDefRegMap(@Self)^.&set := $00000080;
  118558. end;
  118559. procedure TCAN2_C2FIFOCON26.clearTXEN; inline;
  118560. begin
  118561. pTDefRegMap(@Self)^.clr := $00000080;
  118562. end;
  118563. procedure TCAN2_C2FIFOCON26.setTXEN(thebits : TBits_1); inline;
  118564. begin
  118565. if thebits = 0 then
  118566. pTDefRegMap(@Self)^.clr := $00000080
  118567. else
  118568. pTDefRegMap(@Self)^.&set := $00000080;
  118569. end;
  118570. function TCAN2_C2FIFOCON26.getTXEN : TBits_1; inline;
  118571. begin
  118572. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  118573. end;
  118574. procedure TCAN2_C2FIFOCON26.setDONLY; inline;
  118575. begin
  118576. pTDefRegMap(@Self)^.&set := $00001000;
  118577. end;
  118578. procedure TCAN2_C2FIFOCON26.clearDONLY; inline;
  118579. begin
  118580. pTDefRegMap(@Self)^.clr := $00001000;
  118581. end;
  118582. procedure TCAN2_C2FIFOCON26.setDONLY(thebits : TBits_1); inline;
  118583. begin
  118584. if thebits = 0 then
  118585. pTDefRegMap(@Self)^.clr := $00001000
  118586. else
  118587. pTDefRegMap(@Self)^.&set := $00001000;
  118588. end;
  118589. function TCAN2_C2FIFOCON26.getDONLY : TBits_1; inline;
  118590. begin
  118591. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  118592. end;
  118593. procedure TCAN2_C2FIFOCON26.setUINC; inline;
  118594. begin
  118595. pTDefRegMap(@Self)^.&set := $00002000;
  118596. end;
  118597. procedure TCAN2_C2FIFOCON26.clearUINC; inline;
  118598. begin
  118599. pTDefRegMap(@Self)^.clr := $00002000;
  118600. end;
  118601. procedure TCAN2_C2FIFOCON26.setUINC(thebits : TBits_1); inline;
  118602. begin
  118603. if thebits = 0 then
  118604. pTDefRegMap(@Self)^.clr := $00002000
  118605. else
  118606. pTDefRegMap(@Self)^.&set := $00002000;
  118607. end;
  118608. function TCAN2_C2FIFOCON26.getUINC : TBits_1; inline;
  118609. begin
  118610. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  118611. end;
  118612. procedure TCAN2_C2FIFOCON26.setFRESET; inline;
  118613. begin
  118614. pTDefRegMap(@Self)^.&set := $00004000;
  118615. end;
  118616. procedure TCAN2_C2FIFOCON26.clearFRESET; inline;
  118617. begin
  118618. pTDefRegMap(@Self)^.clr := $00004000;
  118619. end;
  118620. procedure TCAN2_C2FIFOCON26.setFRESET(thebits : TBits_1); inline;
  118621. begin
  118622. if thebits = 0 then
  118623. pTDefRegMap(@Self)^.clr := $00004000
  118624. else
  118625. pTDefRegMap(@Self)^.&set := $00004000;
  118626. end;
  118627. function TCAN2_C2FIFOCON26.getFRESET : TBits_1; inline;
  118628. begin
  118629. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  118630. end;
  118631. procedure TCAN2_C2FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  118632. begin
  118633. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  118634. end;
  118635. function TCAN2_C2FIFOCON26.getFSIZE : TBits_5; inline;
  118636. begin
  118637. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  118638. end;
  118639. procedure TCAN2_C2FIFOCON26.setw(thebits : TBits_32); inline;
  118640. begin
  118641. pTDefRegMap(@Self)^.val := thebits;
  118642. end;
  118643. function TCAN2_C2FIFOCON26.getw : TBits_32; inline;
  118644. begin
  118645. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  118646. end;
  118647. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIF; inline;
  118648. begin
  118649. pTDefRegMap(@Self)^.&set := $00000001;
  118650. end;
  118651. procedure TCAN2_C2FIFOINT26.clearRXNEMPTYIF; inline;
  118652. begin
  118653. pTDefRegMap(@Self)^.clr := $00000001;
  118654. end;
  118655. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  118656. begin
  118657. if thebits = 0 then
  118658. pTDefRegMap(@Self)^.clr := $00000001
  118659. else
  118660. pTDefRegMap(@Self)^.&set := $00000001;
  118661. end;
  118662. function TCAN2_C2FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  118663. begin
  118664. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  118665. end;
  118666. procedure TCAN2_C2FIFOINT26.setRXHALFIF; inline;
  118667. begin
  118668. pTDefRegMap(@Self)^.&set := $00000002;
  118669. end;
  118670. procedure TCAN2_C2FIFOINT26.clearRXHALFIF; inline;
  118671. begin
  118672. pTDefRegMap(@Self)^.clr := $00000002;
  118673. end;
  118674. procedure TCAN2_C2FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  118675. begin
  118676. if thebits = 0 then
  118677. pTDefRegMap(@Self)^.clr := $00000002
  118678. else
  118679. pTDefRegMap(@Self)^.&set := $00000002;
  118680. end;
  118681. function TCAN2_C2FIFOINT26.getRXHALFIF : TBits_1; inline;
  118682. begin
  118683. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  118684. end;
  118685. procedure TCAN2_C2FIFOINT26.setRXFULLIF; inline;
  118686. begin
  118687. pTDefRegMap(@Self)^.&set := $00000004;
  118688. end;
  118689. procedure TCAN2_C2FIFOINT26.clearRXFULLIF; inline;
  118690. begin
  118691. pTDefRegMap(@Self)^.clr := $00000004;
  118692. end;
  118693. procedure TCAN2_C2FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  118694. begin
  118695. if thebits = 0 then
  118696. pTDefRegMap(@Self)^.clr := $00000004
  118697. else
  118698. pTDefRegMap(@Self)^.&set := $00000004;
  118699. end;
  118700. function TCAN2_C2FIFOINT26.getRXFULLIF : TBits_1; inline;
  118701. begin
  118702. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  118703. end;
  118704. procedure TCAN2_C2FIFOINT26.setRXOVFLIF; inline;
  118705. begin
  118706. pTDefRegMap(@Self)^.&set := $00000008;
  118707. end;
  118708. procedure TCAN2_C2FIFOINT26.clearRXOVFLIF; inline;
  118709. begin
  118710. pTDefRegMap(@Self)^.clr := $00000008;
  118711. end;
  118712. procedure TCAN2_C2FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  118713. begin
  118714. if thebits = 0 then
  118715. pTDefRegMap(@Self)^.clr := $00000008
  118716. else
  118717. pTDefRegMap(@Self)^.&set := $00000008;
  118718. end;
  118719. function TCAN2_C2FIFOINT26.getRXOVFLIF : TBits_1; inline;
  118720. begin
  118721. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  118722. end;
  118723. procedure TCAN2_C2FIFOINT26.setTXEMPTYIF; inline;
  118724. begin
  118725. pTDefRegMap(@Self)^.&set := $00000100;
  118726. end;
  118727. procedure TCAN2_C2FIFOINT26.clearTXEMPTYIF; inline;
  118728. begin
  118729. pTDefRegMap(@Self)^.clr := $00000100;
  118730. end;
  118731. procedure TCAN2_C2FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  118732. begin
  118733. if thebits = 0 then
  118734. pTDefRegMap(@Self)^.clr := $00000100
  118735. else
  118736. pTDefRegMap(@Self)^.&set := $00000100;
  118737. end;
  118738. function TCAN2_C2FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  118739. begin
  118740. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  118741. end;
  118742. procedure TCAN2_C2FIFOINT26.setTXHALFIF; inline;
  118743. begin
  118744. pTDefRegMap(@Self)^.&set := $00000200;
  118745. end;
  118746. procedure TCAN2_C2FIFOINT26.clearTXHALFIF; inline;
  118747. begin
  118748. pTDefRegMap(@Self)^.clr := $00000200;
  118749. end;
  118750. procedure TCAN2_C2FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  118751. begin
  118752. if thebits = 0 then
  118753. pTDefRegMap(@Self)^.clr := $00000200
  118754. else
  118755. pTDefRegMap(@Self)^.&set := $00000200;
  118756. end;
  118757. function TCAN2_C2FIFOINT26.getTXHALFIF : TBits_1; inline;
  118758. begin
  118759. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  118760. end;
  118761. procedure TCAN2_C2FIFOINT26.setTXNFULLIF; inline;
  118762. begin
  118763. pTDefRegMap(@Self)^.&set := $00000400;
  118764. end;
  118765. procedure TCAN2_C2FIFOINT26.clearTXNFULLIF; inline;
  118766. begin
  118767. pTDefRegMap(@Self)^.clr := $00000400;
  118768. end;
  118769. procedure TCAN2_C2FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  118770. begin
  118771. if thebits = 0 then
  118772. pTDefRegMap(@Self)^.clr := $00000400
  118773. else
  118774. pTDefRegMap(@Self)^.&set := $00000400;
  118775. end;
  118776. function TCAN2_C2FIFOINT26.getTXNFULLIF : TBits_1; inline;
  118777. begin
  118778. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  118779. end;
  118780. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIE; inline;
  118781. begin
  118782. pTDefRegMap(@Self)^.&set := $00010000;
  118783. end;
  118784. procedure TCAN2_C2FIFOINT26.clearRXNEMPTYIE; inline;
  118785. begin
  118786. pTDefRegMap(@Self)^.clr := $00010000;
  118787. end;
  118788. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  118789. begin
  118790. if thebits = 0 then
  118791. pTDefRegMap(@Self)^.clr := $00010000
  118792. else
  118793. pTDefRegMap(@Self)^.&set := $00010000;
  118794. end;
  118795. function TCAN2_C2FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  118796. begin
  118797. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  118798. end;
  118799. procedure TCAN2_C2FIFOINT26.setRXHALFIE; inline;
  118800. begin
  118801. pTDefRegMap(@Self)^.&set := $00020000;
  118802. end;
  118803. procedure TCAN2_C2FIFOINT26.clearRXHALFIE; inline;
  118804. begin
  118805. pTDefRegMap(@Self)^.clr := $00020000;
  118806. end;
  118807. procedure TCAN2_C2FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  118808. begin
  118809. if thebits = 0 then
  118810. pTDefRegMap(@Self)^.clr := $00020000
  118811. else
  118812. pTDefRegMap(@Self)^.&set := $00020000;
  118813. end;
  118814. function TCAN2_C2FIFOINT26.getRXHALFIE : TBits_1; inline;
  118815. begin
  118816. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  118817. end;
  118818. procedure TCAN2_C2FIFOINT26.setRXFULLIE; inline;
  118819. begin
  118820. pTDefRegMap(@Self)^.&set := $00040000;
  118821. end;
  118822. procedure TCAN2_C2FIFOINT26.clearRXFULLIE; inline;
  118823. begin
  118824. pTDefRegMap(@Self)^.clr := $00040000;
  118825. end;
  118826. procedure TCAN2_C2FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  118827. begin
  118828. if thebits = 0 then
  118829. pTDefRegMap(@Self)^.clr := $00040000
  118830. else
  118831. pTDefRegMap(@Self)^.&set := $00040000;
  118832. end;
  118833. function TCAN2_C2FIFOINT26.getRXFULLIE : TBits_1; inline;
  118834. begin
  118835. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  118836. end;
  118837. procedure TCAN2_C2FIFOINT26.setRXOVFLIE; inline;
  118838. begin
  118839. pTDefRegMap(@Self)^.&set := $00080000;
  118840. end;
  118841. procedure TCAN2_C2FIFOINT26.clearRXOVFLIE; inline;
  118842. begin
  118843. pTDefRegMap(@Self)^.clr := $00080000;
  118844. end;
  118845. procedure TCAN2_C2FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  118846. begin
  118847. if thebits = 0 then
  118848. pTDefRegMap(@Self)^.clr := $00080000
  118849. else
  118850. pTDefRegMap(@Self)^.&set := $00080000;
  118851. end;
  118852. function TCAN2_C2FIFOINT26.getRXOVFLIE : TBits_1; inline;
  118853. begin
  118854. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  118855. end;
  118856. procedure TCAN2_C2FIFOINT26.setTXEMPTYIE; inline;
  118857. begin
  118858. pTDefRegMap(@Self)^.&set := $01000000;
  118859. end;
  118860. procedure TCAN2_C2FIFOINT26.clearTXEMPTYIE; inline;
  118861. begin
  118862. pTDefRegMap(@Self)^.clr := $01000000;
  118863. end;
  118864. procedure TCAN2_C2FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  118865. begin
  118866. if thebits = 0 then
  118867. pTDefRegMap(@Self)^.clr := $01000000
  118868. else
  118869. pTDefRegMap(@Self)^.&set := $01000000;
  118870. end;
  118871. function TCAN2_C2FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  118872. begin
  118873. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  118874. end;
  118875. procedure TCAN2_C2FIFOINT26.setTXHALFIE; inline;
  118876. begin
  118877. pTDefRegMap(@Self)^.&set := $02000000;
  118878. end;
  118879. procedure TCAN2_C2FIFOINT26.clearTXHALFIE; inline;
  118880. begin
  118881. pTDefRegMap(@Self)^.clr := $02000000;
  118882. end;
  118883. procedure TCAN2_C2FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  118884. begin
  118885. if thebits = 0 then
  118886. pTDefRegMap(@Self)^.clr := $02000000
  118887. else
  118888. pTDefRegMap(@Self)^.&set := $02000000;
  118889. end;
  118890. function TCAN2_C2FIFOINT26.getTXHALFIE : TBits_1; inline;
  118891. begin
  118892. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  118893. end;
  118894. procedure TCAN2_C2FIFOINT26.setTXNFULLIE; inline;
  118895. begin
  118896. pTDefRegMap(@Self)^.&set := $04000000;
  118897. end;
  118898. procedure TCAN2_C2FIFOINT26.clearTXNFULLIE; inline;
  118899. begin
  118900. pTDefRegMap(@Self)^.clr := $04000000;
  118901. end;
  118902. procedure TCAN2_C2FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  118903. begin
  118904. if thebits = 0 then
  118905. pTDefRegMap(@Self)^.clr := $04000000
  118906. else
  118907. pTDefRegMap(@Self)^.&set := $04000000;
  118908. end;
  118909. function TCAN2_C2FIFOINT26.getTXNFULLIE : TBits_1; inline;
  118910. begin
  118911. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  118912. end;
  118913. procedure TCAN2_C2FIFOINT26.setw(thebits : TBits_32); inline;
  118914. begin
  118915. pTDefRegMap(@Self)^.val := thebits;
  118916. end;
  118917. function TCAN2_C2FIFOINT26.getw : TBits_32; inline;
  118918. begin
  118919. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  118920. end;
  118921. procedure TCAN2_C2FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  118922. begin
  118923. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  118924. end;
  118925. function TCAN2_C2FIFOCI26.getCFIFOCI : TBits_5; inline;
  118926. begin
  118927. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  118928. end;
  118929. procedure TCAN2_C2FIFOCI26.setw(thebits : TBits_32); inline;
  118930. begin
  118931. pTDefRegMap(@Self)^.val := thebits;
  118932. end;
  118933. function TCAN2_C2FIFOCI26.getw : TBits_32; inline;
  118934. begin
  118935. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  118936. end;
  118937. procedure TCAN2_C2FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  118938. begin
  118939. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  118940. end;
  118941. function TCAN2_C2FIFOCON27.getTXPRI : TBits_2; inline;
  118942. begin
  118943. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  118944. end;
  118945. procedure TCAN2_C2FIFOCON27.setRTREN; inline;
  118946. begin
  118947. pTDefRegMap(@Self)^.&set := $00000004;
  118948. end;
  118949. procedure TCAN2_C2FIFOCON27.clearRTREN; inline;
  118950. begin
  118951. pTDefRegMap(@Self)^.clr := $00000004;
  118952. end;
  118953. procedure TCAN2_C2FIFOCON27.setRTREN(thebits : TBits_1); inline;
  118954. begin
  118955. if thebits = 0 then
  118956. pTDefRegMap(@Self)^.clr := $00000004
  118957. else
  118958. pTDefRegMap(@Self)^.&set := $00000004;
  118959. end;
  118960. function TCAN2_C2FIFOCON27.getRTREN : TBits_1; inline;
  118961. begin
  118962. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  118963. end;
  118964. procedure TCAN2_C2FIFOCON27.setTXREQ; inline;
  118965. begin
  118966. pTDefRegMap(@Self)^.&set := $00000008;
  118967. end;
  118968. procedure TCAN2_C2FIFOCON27.clearTXREQ; inline;
  118969. begin
  118970. pTDefRegMap(@Self)^.clr := $00000008;
  118971. end;
  118972. procedure TCAN2_C2FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  118973. begin
  118974. if thebits = 0 then
  118975. pTDefRegMap(@Self)^.clr := $00000008
  118976. else
  118977. pTDefRegMap(@Self)^.&set := $00000008;
  118978. end;
  118979. function TCAN2_C2FIFOCON27.getTXREQ : TBits_1; inline;
  118980. begin
  118981. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  118982. end;
  118983. procedure TCAN2_C2FIFOCON27.setTXERR; inline;
  118984. begin
  118985. pTDefRegMap(@Self)^.&set := $00000010;
  118986. end;
  118987. procedure TCAN2_C2FIFOCON27.clearTXERR; inline;
  118988. begin
  118989. pTDefRegMap(@Self)^.clr := $00000010;
  118990. end;
  118991. procedure TCAN2_C2FIFOCON27.setTXERR(thebits : TBits_1); inline;
  118992. begin
  118993. if thebits = 0 then
  118994. pTDefRegMap(@Self)^.clr := $00000010
  118995. else
  118996. pTDefRegMap(@Self)^.&set := $00000010;
  118997. end;
  118998. function TCAN2_C2FIFOCON27.getTXERR : TBits_1; inline;
  118999. begin
  119000. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  119001. end;
  119002. procedure TCAN2_C2FIFOCON27.setTXLARB; inline;
  119003. begin
  119004. pTDefRegMap(@Self)^.&set := $00000020;
  119005. end;
  119006. procedure TCAN2_C2FIFOCON27.clearTXLARB; inline;
  119007. begin
  119008. pTDefRegMap(@Self)^.clr := $00000020;
  119009. end;
  119010. procedure TCAN2_C2FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  119011. begin
  119012. if thebits = 0 then
  119013. pTDefRegMap(@Self)^.clr := $00000020
  119014. else
  119015. pTDefRegMap(@Self)^.&set := $00000020;
  119016. end;
  119017. function TCAN2_C2FIFOCON27.getTXLARB : TBits_1; inline;
  119018. begin
  119019. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  119020. end;
  119021. procedure TCAN2_C2FIFOCON27.setTXABAT; inline;
  119022. begin
  119023. pTDefRegMap(@Self)^.&set := $00000040;
  119024. end;
  119025. procedure TCAN2_C2FIFOCON27.clearTXABAT; inline;
  119026. begin
  119027. pTDefRegMap(@Self)^.clr := $00000040;
  119028. end;
  119029. procedure TCAN2_C2FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  119030. begin
  119031. if thebits = 0 then
  119032. pTDefRegMap(@Self)^.clr := $00000040
  119033. else
  119034. pTDefRegMap(@Self)^.&set := $00000040;
  119035. end;
  119036. function TCAN2_C2FIFOCON27.getTXABAT : TBits_1; inline;
  119037. begin
  119038. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  119039. end;
  119040. procedure TCAN2_C2FIFOCON27.setTXEN; inline;
  119041. begin
  119042. pTDefRegMap(@Self)^.&set := $00000080;
  119043. end;
  119044. procedure TCAN2_C2FIFOCON27.clearTXEN; inline;
  119045. begin
  119046. pTDefRegMap(@Self)^.clr := $00000080;
  119047. end;
  119048. procedure TCAN2_C2FIFOCON27.setTXEN(thebits : TBits_1); inline;
  119049. begin
  119050. if thebits = 0 then
  119051. pTDefRegMap(@Self)^.clr := $00000080
  119052. else
  119053. pTDefRegMap(@Self)^.&set := $00000080;
  119054. end;
  119055. function TCAN2_C2FIFOCON27.getTXEN : TBits_1; inline;
  119056. begin
  119057. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  119058. end;
  119059. procedure TCAN2_C2FIFOCON27.setDONLY; inline;
  119060. begin
  119061. pTDefRegMap(@Self)^.&set := $00001000;
  119062. end;
  119063. procedure TCAN2_C2FIFOCON27.clearDONLY; inline;
  119064. begin
  119065. pTDefRegMap(@Self)^.clr := $00001000;
  119066. end;
  119067. procedure TCAN2_C2FIFOCON27.setDONLY(thebits : TBits_1); inline;
  119068. begin
  119069. if thebits = 0 then
  119070. pTDefRegMap(@Self)^.clr := $00001000
  119071. else
  119072. pTDefRegMap(@Self)^.&set := $00001000;
  119073. end;
  119074. function TCAN2_C2FIFOCON27.getDONLY : TBits_1; inline;
  119075. begin
  119076. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  119077. end;
  119078. procedure TCAN2_C2FIFOCON27.setUINC; inline;
  119079. begin
  119080. pTDefRegMap(@Self)^.&set := $00002000;
  119081. end;
  119082. procedure TCAN2_C2FIFOCON27.clearUINC; inline;
  119083. begin
  119084. pTDefRegMap(@Self)^.clr := $00002000;
  119085. end;
  119086. procedure TCAN2_C2FIFOCON27.setUINC(thebits : TBits_1); inline;
  119087. begin
  119088. if thebits = 0 then
  119089. pTDefRegMap(@Self)^.clr := $00002000
  119090. else
  119091. pTDefRegMap(@Self)^.&set := $00002000;
  119092. end;
  119093. function TCAN2_C2FIFOCON27.getUINC : TBits_1; inline;
  119094. begin
  119095. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  119096. end;
  119097. procedure TCAN2_C2FIFOCON27.setFRESET; inline;
  119098. begin
  119099. pTDefRegMap(@Self)^.&set := $00004000;
  119100. end;
  119101. procedure TCAN2_C2FIFOCON27.clearFRESET; inline;
  119102. begin
  119103. pTDefRegMap(@Self)^.clr := $00004000;
  119104. end;
  119105. procedure TCAN2_C2FIFOCON27.setFRESET(thebits : TBits_1); inline;
  119106. begin
  119107. if thebits = 0 then
  119108. pTDefRegMap(@Self)^.clr := $00004000
  119109. else
  119110. pTDefRegMap(@Self)^.&set := $00004000;
  119111. end;
  119112. function TCAN2_C2FIFOCON27.getFRESET : TBits_1; inline;
  119113. begin
  119114. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  119115. end;
  119116. procedure TCAN2_C2FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  119117. begin
  119118. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  119119. end;
  119120. function TCAN2_C2FIFOCON27.getFSIZE : TBits_5; inline;
  119121. begin
  119122. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  119123. end;
  119124. procedure TCAN2_C2FIFOCON27.setw(thebits : TBits_32); inline;
  119125. begin
  119126. pTDefRegMap(@Self)^.val := thebits;
  119127. end;
  119128. function TCAN2_C2FIFOCON27.getw : TBits_32; inline;
  119129. begin
  119130. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  119131. end;
  119132. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIF; inline;
  119133. begin
  119134. pTDefRegMap(@Self)^.&set := $00000001;
  119135. end;
  119136. procedure TCAN2_C2FIFOINT27.clearRXNEMPTYIF; inline;
  119137. begin
  119138. pTDefRegMap(@Self)^.clr := $00000001;
  119139. end;
  119140. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  119141. begin
  119142. if thebits = 0 then
  119143. pTDefRegMap(@Self)^.clr := $00000001
  119144. else
  119145. pTDefRegMap(@Self)^.&set := $00000001;
  119146. end;
  119147. function TCAN2_C2FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  119148. begin
  119149. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  119150. end;
  119151. procedure TCAN2_C2FIFOINT27.setRXHALFIF; inline;
  119152. begin
  119153. pTDefRegMap(@Self)^.&set := $00000002;
  119154. end;
  119155. procedure TCAN2_C2FIFOINT27.clearRXHALFIF; inline;
  119156. begin
  119157. pTDefRegMap(@Self)^.clr := $00000002;
  119158. end;
  119159. procedure TCAN2_C2FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  119160. begin
  119161. if thebits = 0 then
  119162. pTDefRegMap(@Self)^.clr := $00000002
  119163. else
  119164. pTDefRegMap(@Self)^.&set := $00000002;
  119165. end;
  119166. function TCAN2_C2FIFOINT27.getRXHALFIF : TBits_1; inline;
  119167. begin
  119168. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  119169. end;
  119170. procedure TCAN2_C2FIFOINT27.setRXFULLIF; inline;
  119171. begin
  119172. pTDefRegMap(@Self)^.&set := $00000004;
  119173. end;
  119174. procedure TCAN2_C2FIFOINT27.clearRXFULLIF; inline;
  119175. begin
  119176. pTDefRegMap(@Self)^.clr := $00000004;
  119177. end;
  119178. procedure TCAN2_C2FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  119179. begin
  119180. if thebits = 0 then
  119181. pTDefRegMap(@Self)^.clr := $00000004
  119182. else
  119183. pTDefRegMap(@Self)^.&set := $00000004;
  119184. end;
  119185. function TCAN2_C2FIFOINT27.getRXFULLIF : TBits_1; inline;
  119186. begin
  119187. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  119188. end;
  119189. procedure TCAN2_C2FIFOINT27.setRXOVFLIF; inline;
  119190. begin
  119191. pTDefRegMap(@Self)^.&set := $00000008;
  119192. end;
  119193. procedure TCAN2_C2FIFOINT27.clearRXOVFLIF; inline;
  119194. begin
  119195. pTDefRegMap(@Self)^.clr := $00000008;
  119196. end;
  119197. procedure TCAN2_C2FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  119198. begin
  119199. if thebits = 0 then
  119200. pTDefRegMap(@Self)^.clr := $00000008
  119201. else
  119202. pTDefRegMap(@Self)^.&set := $00000008;
  119203. end;
  119204. function TCAN2_C2FIFOINT27.getRXOVFLIF : TBits_1; inline;
  119205. begin
  119206. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  119207. end;
  119208. procedure TCAN2_C2FIFOINT27.setTXEMPTYIF; inline;
  119209. begin
  119210. pTDefRegMap(@Self)^.&set := $00000100;
  119211. end;
  119212. procedure TCAN2_C2FIFOINT27.clearTXEMPTYIF; inline;
  119213. begin
  119214. pTDefRegMap(@Self)^.clr := $00000100;
  119215. end;
  119216. procedure TCAN2_C2FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  119217. begin
  119218. if thebits = 0 then
  119219. pTDefRegMap(@Self)^.clr := $00000100
  119220. else
  119221. pTDefRegMap(@Self)^.&set := $00000100;
  119222. end;
  119223. function TCAN2_C2FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  119224. begin
  119225. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  119226. end;
  119227. procedure TCAN2_C2FIFOINT27.setTXHALFIF; inline;
  119228. begin
  119229. pTDefRegMap(@Self)^.&set := $00000200;
  119230. end;
  119231. procedure TCAN2_C2FIFOINT27.clearTXHALFIF; inline;
  119232. begin
  119233. pTDefRegMap(@Self)^.clr := $00000200;
  119234. end;
  119235. procedure TCAN2_C2FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  119236. begin
  119237. if thebits = 0 then
  119238. pTDefRegMap(@Self)^.clr := $00000200
  119239. else
  119240. pTDefRegMap(@Self)^.&set := $00000200;
  119241. end;
  119242. function TCAN2_C2FIFOINT27.getTXHALFIF : TBits_1; inline;
  119243. begin
  119244. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  119245. end;
  119246. procedure TCAN2_C2FIFOINT27.setTXNFULLIF; inline;
  119247. begin
  119248. pTDefRegMap(@Self)^.&set := $00000400;
  119249. end;
  119250. procedure TCAN2_C2FIFOINT27.clearTXNFULLIF; inline;
  119251. begin
  119252. pTDefRegMap(@Self)^.clr := $00000400;
  119253. end;
  119254. procedure TCAN2_C2FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  119255. begin
  119256. if thebits = 0 then
  119257. pTDefRegMap(@Self)^.clr := $00000400
  119258. else
  119259. pTDefRegMap(@Self)^.&set := $00000400;
  119260. end;
  119261. function TCAN2_C2FIFOINT27.getTXNFULLIF : TBits_1; inline;
  119262. begin
  119263. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  119264. end;
  119265. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIE; inline;
  119266. begin
  119267. pTDefRegMap(@Self)^.&set := $00010000;
  119268. end;
  119269. procedure TCAN2_C2FIFOINT27.clearRXNEMPTYIE; inline;
  119270. begin
  119271. pTDefRegMap(@Self)^.clr := $00010000;
  119272. end;
  119273. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  119274. begin
  119275. if thebits = 0 then
  119276. pTDefRegMap(@Self)^.clr := $00010000
  119277. else
  119278. pTDefRegMap(@Self)^.&set := $00010000;
  119279. end;
  119280. function TCAN2_C2FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  119281. begin
  119282. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  119283. end;
  119284. procedure TCAN2_C2FIFOINT27.setRXHALFIE; inline;
  119285. begin
  119286. pTDefRegMap(@Self)^.&set := $00020000;
  119287. end;
  119288. procedure TCAN2_C2FIFOINT27.clearRXHALFIE; inline;
  119289. begin
  119290. pTDefRegMap(@Self)^.clr := $00020000;
  119291. end;
  119292. procedure TCAN2_C2FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  119293. begin
  119294. if thebits = 0 then
  119295. pTDefRegMap(@Self)^.clr := $00020000
  119296. else
  119297. pTDefRegMap(@Self)^.&set := $00020000;
  119298. end;
  119299. function TCAN2_C2FIFOINT27.getRXHALFIE : TBits_1; inline;
  119300. begin
  119301. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  119302. end;
  119303. procedure TCAN2_C2FIFOINT27.setRXFULLIE; inline;
  119304. begin
  119305. pTDefRegMap(@Self)^.&set := $00040000;
  119306. end;
  119307. procedure TCAN2_C2FIFOINT27.clearRXFULLIE; inline;
  119308. begin
  119309. pTDefRegMap(@Self)^.clr := $00040000;
  119310. end;
  119311. procedure TCAN2_C2FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  119312. begin
  119313. if thebits = 0 then
  119314. pTDefRegMap(@Self)^.clr := $00040000
  119315. else
  119316. pTDefRegMap(@Self)^.&set := $00040000;
  119317. end;
  119318. function TCAN2_C2FIFOINT27.getRXFULLIE : TBits_1; inline;
  119319. begin
  119320. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  119321. end;
  119322. procedure TCAN2_C2FIFOINT27.setRXOVFLIE; inline;
  119323. begin
  119324. pTDefRegMap(@Self)^.&set := $00080000;
  119325. end;
  119326. procedure TCAN2_C2FIFOINT27.clearRXOVFLIE; inline;
  119327. begin
  119328. pTDefRegMap(@Self)^.clr := $00080000;
  119329. end;
  119330. procedure TCAN2_C2FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  119331. begin
  119332. if thebits = 0 then
  119333. pTDefRegMap(@Self)^.clr := $00080000
  119334. else
  119335. pTDefRegMap(@Self)^.&set := $00080000;
  119336. end;
  119337. function TCAN2_C2FIFOINT27.getRXOVFLIE : TBits_1; inline;
  119338. begin
  119339. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  119340. end;
  119341. procedure TCAN2_C2FIFOINT27.setTXEMPTYIE; inline;
  119342. begin
  119343. pTDefRegMap(@Self)^.&set := $01000000;
  119344. end;
  119345. procedure TCAN2_C2FIFOINT27.clearTXEMPTYIE; inline;
  119346. begin
  119347. pTDefRegMap(@Self)^.clr := $01000000;
  119348. end;
  119349. procedure TCAN2_C2FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  119350. begin
  119351. if thebits = 0 then
  119352. pTDefRegMap(@Self)^.clr := $01000000
  119353. else
  119354. pTDefRegMap(@Self)^.&set := $01000000;
  119355. end;
  119356. function TCAN2_C2FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  119357. begin
  119358. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  119359. end;
  119360. procedure TCAN2_C2FIFOINT27.setTXHALFIE; inline;
  119361. begin
  119362. pTDefRegMap(@Self)^.&set := $02000000;
  119363. end;
  119364. procedure TCAN2_C2FIFOINT27.clearTXHALFIE; inline;
  119365. begin
  119366. pTDefRegMap(@Self)^.clr := $02000000;
  119367. end;
  119368. procedure TCAN2_C2FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  119369. begin
  119370. if thebits = 0 then
  119371. pTDefRegMap(@Self)^.clr := $02000000
  119372. else
  119373. pTDefRegMap(@Self)^.&set := $02000000;
  119374. end;
  119375. function TCAN2_C2FIFOINT27.getTXHALFIE : TBits_1; inline;
  119376. begin
  119377. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  119378. end;
  119379. procedure TCAN2_C2FIFOINT27.setTXNFULLIE; inline;
  119380. begin
  119381. pTDefRegMap(@Self)^.&set := $04000000;
  119382. end;
  119383. procedure TCAN2_C2FIFOINT27.clearTXNFULLIE; inline;
  119384. begin
  119385. pTDefRegMap(@Self)^.clr := $04000000;
  119386. end;
  119387. procedure TCAN2_C2FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  119388. begin
  119389. if thebits = 0 then
  119390. pTDefRegMap(@Self)^.clr := $04000000
  119391. else
  119392. pTDefRegMap(@Self)^.&set := $04000000;
  119393. end;
  119394. function TCAN2_C2FIFOINT27.getTXNFULLIE : TBits_1; inline;
  119395. begin
  119396. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  119397. end;
  119398. procedure TCAN2_C2FIFOINT27.setw(thebits : TBits_32); inline;
  119399. begin
  119400. pTDefRegMap(@Self)^.val := thebits;
  119401. end;
  119402. function TCAN2_C2FIFOINT27.getw : TBits_32; inline;
  119403. begin
  119404. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  119405. end;
  119406. procedure TCAN2_C2FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  119407. begin
  119408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  119409. end;
  119410. function TCAN2_C2FIFOCI27.getCFIFOCI : TBits_5; inline;
  119411. begin
  119412. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  119413. end;
  119414. procedure TCAN2_C2FIFOCI27.setw(thebits : TBits_32); inline;
  119415. begin
  119416. pTDefRegMap(@Self)^.val := thebits;
  119417. end;
  119418. function TCAN2_C2FIFOCI27.getw : TBits_32; inline;
  119419. begin
  119420. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  119421. end;
  119422. procedure TCAN2_C2FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  119423. begin
  119424. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  119425. end;
  119426. function TCAN2_C2FIFOCON28.getTXPRI : TBits_2; inline;
  119427. begin
  119428. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  119429. end;
  119430. procedure TCAN2_C2FIFOCON28.setRTREN; inline;
  119431. begin
  119432. pTDefRegMap(@Self)^.&set := $00000004;
  119433. end;
  119434. procedure TCAN2_C2FIFOCON28.clearRTREN; inline;
  119435. begin
  119436. pTDefRegMap(@Self)^.clr := $00000004;
  119437. end;
  119438. procedure TCAN2_C2FIFOCON28.setRTREN(thebits : TBits_1); inline;
  119439. begin
  119440. if thebits = 0 then
  119441. pTDefRegMap(@Self)^.clr := $00000004
  119442. else
  119443. pTDefRegMap(@Self)^.&set := $00000004;
  119444. end;
  119445. function TCAN2_C2FIFOCON28.getRTREN : TBits_1; inline;
  119446. begin
  119447. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  119448. end;
  119449. procedure TCAN2_C2FIFOCON28.setTXREQ; inline;
  119450. begin
  119451. pTDefRegMap(@Self)^.&set := $00000008;
  119452. end;
  119453. procedure TCAN2_C2FIFOCON28.clearTXREQ; inline;
  119454. begin
  119455. pTDefRegMap(@Self)^.clr := $00000008;
  119456. end;
  119457. procedure TCAN2_C2FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  119458. begin
  119459. if thebits = 0 then
  119460. pTDefRegMap(@Self)^.clr := $00000008
  119461. else
  119462. pTDefRegMap(@Self)^.&set := $00000008;
  119463. end;
  119464. function TCAN2_C2FIFOCON28.getTXREQ : TBits_1; inline;
  119465. begin
  119466. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  119467. end;
  119468. procedure TCAN2_C2FIFOCON28.setTXERR; inline;
  119469. begin
  119470. pTDefRegMap(@Self)^.&set := $00000010;
  119471. end;
  119472. procedure TCAN2_C2FIFOCON28.clearTXERR; inline;
  119473. begin
  119474. pTDefRegMap(@Self)^.clr := $00000010;
  119475. end;
  119476. procedure TCAN2_C2FIFOCON28.setTXERR(thebits : TBits_1); inline;
  119477. begin
  119478. if thebits = 0 then
  119479. pTDefRegMap(@Self)^.clr := $00000010
  119480. else
  119481. pTDefRegMap(@Self)^.&set := $00000010;
  119482. end;
  119483. function TCAN2_C2FIFOCON28.getTXERR : TBits_1; inline;
  119484. begin
  119485. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  119486. end;
  119487. procedure TCAN2_C2FIFOCON28.setTXLARB; inline;
  119488. begin
  119489. pTDefRegMap(@Self)^.&set := $00000020;
  119490. end;
  119491. procedure TCAN2_C2FIFOCON28.clearTXLARB; inline;
  119492. begin
  119493. pTDefRegMap(@Self)^.clr := $00000020;
  119494. end;
  119495. procedure TCAN2_C2FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  119496. begin
  119497. if thebits = 0 then
  119498. pTDefRegMap(@Self)^.clr := $00000020
  119499. else
  119500. pTDefRegMap(@Self)^.&set := $00000020;
  119501. end;
  119502. function TCAN2_C2FIFOCON28.getTXLARB : TBits_1; inline;
  119503. begin
  119504. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  119505. end;
  119506. procedure TCAN2_C2FIFOCON28.setTXABAT; inline;
  119507. begin
  119508. pTDefRegMap(@Self)^.&set := $00000040;
  119509. end;
  119510. procedure TCAN2_C2FIFOCON28.clearTXABAT; inline;
  119511. begin
  119512. pTDefRegMap(@Self)^.clr := $00000040;
  119513. end;
  119514. procedure TCAN2_C2FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  119515. begin
  119516. if thebits = 0 then
  119517. pTDefRegMap(@Self)^.clr := $00000040
  119518. else
  119519. pTDefRegMap(@Self)^.&set := $00000040;
  119520. end;
  119521. function TCAN2_C2FIFOCON28.getTXABAT : TBits_1; inline;
  119522. begin
  119523. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  119524. end;
  119525. procedure TCAN2_C2FIFOCON28.setTXEN; inline;
  119526. begin
  119527. pTDefRegMap(@Self)^.&set := $00000080;
  119528. end;
  119529. procedure TCAN2_C2FIFOCON28.clearTXEN; inline;
  119530. begin
  119531. pTDefRegMap(@Self)^.clr := $00000080;
  119532. end;
  119533. procedure TCAN2_C2FIFOCON28.setTXEN(thebits : TBits_1); inline;
  119534. begin
  119535. if thebits = 0 then
  119536. pTDefRegMap(@Self)^.clr := $00000080
  119537. else
  119538. pTDefRegMap(@Self)^.&set := $00000080;
  119539. end;
  119540. function TCAN2_C2FIFOCON28.getTXEN : TBits_1; inline;
  119541. begin
  119542. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  119543. end;
  119544. procedure TCAN2_C2FIFOCON28.setDONLY; inline;
  119545. begin
  119546. pTDefRegMap(@Self)^.&set := $00001000;
  119547. end;
  119548. procedure TCAN2_C2FIFOCON28.clearDONLY; inline;
  119549. begin
  119550. pTDefRegMap(@Self)^.clr := $00001000;
  119551. end;
  119552. procedure TCAN2_C2FIFOCON28.setDONLY(thebits : TBits_1); inline;
  119553. begin
  119554. if thebits = 0 then
  119555. pTDefRegMap(@Self)^.clr := $00001000
  119556. else
  119557. pTDefRegMap(@Self)^.&set := $00001000;
  119558. end;
  119559. function TCAN2_C2FIFOCON28.getDONLY : TBits_1; inline;
  119560. begin
  119561. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  119562. end;
  119563. procedure TCAN2_C2FIFOCON28.setUINC; inline;
  119564. begin
  119565. pTDefRegMap(@Self)^.&set := $00002000;
  119566. end;
  119567. procedure TCAN2_C2FIFOCON28.clearUINC; inline;
  119568. begin
  119569. pTDefRegMap(@Self)^.clr := $00002000;
  119570. end;
  119571. procedure TCAN2_C2FIFOCON28.setUINC(thebits : TBits_1); inline;
  119572. begin
  119573. if thebits = 0 then
  119574. pTDefRegMap(@Self)^.clr := $00002000
  119575. else
  119576. pTDefRegMap(@Self)^.&set := $00002000;
  119577. end;
  119578. function TCAN2_C2FIFOCON28.getUINC : TBits_1; inline;
  119579. begin
  119580. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  119581. end;
  119582. procedure TCAN2_C2FIFOCON28.setFRESET; inline;
  119583. begin
  119584. pTDefRegMap(@Self)^.&set := $00004000;
  119585. end;
  119586. procedure TCAN2_C2FIFOCON28.clearFRESET; inline;
  119587. begin
  119588. pTDefRegMap(@Self)^.clr := $00004000;
  119589. end;
  119590. procedure TCAN2_C2FIFOCON28.setFRESET(thebits : TBits_1); inline;
  119591. begin
  119592. if thebits = 0 then
  119593. pTDefRegMap(@Self)^.clr := $00004000
  119594. else
  119595. pTDefRegMap(@Self)^.&set := $00004000;
  119596. end;
  119597. function TCAN2_C2FIFOCON28.getFRESET : TBits_1; inline;
  119598. begin
  119599. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  119600. end;
  119601. procedure TCAN2_C2FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  119602. begin
  119603. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  119604. end;
  119605. function TCAN2_C2FIFOCON28.getFSIZE : TBits_5; inline;
  119606. begin
  119607. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  119608. end;
  119609. procedure TCAN2_C2FIFOCON28.setw(thebits : TBits_32); inline;
  119610. begin
  119611. pTDefRegMap(@Self)^.val := thebits;
  119612. end;
  119613. function TCAN2_C2FIFOCON28.getw : TBits_32; inline;
  119614. begin
  119615. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  119616. end;
  119617. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIF; inline;
  119618. begin
  119619. pTDefRegMap(@Self)^.&set := $00000001;
  119620. end;
  119621. procedure TCAN2_C2FIFOINT28.clearRXNEMPTYIF; inline;
  119622. begin
  119623. pTDefRegMap(@Self)^.clr := $00000001;
  119624. end;
  119625. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  119626. begin
  119627. if thebits = 0 then
  119628. pTDefRegMap(@Self)^.clr := $00000001
  119629. else
  119630. pTDefRegMap(@Self)^.&set := $00000001;
  119631. end;
  119632. function TCAN2_C2FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  119633. begin
  119634. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  119635. end;
  119636. procedure TCAN2_C2FIFOINT28.setRXHALFIF; inline;
  119637. begin
  119638. pTDefRegMap(@Self)^.&set := $00000002;
  119639. end;
  119640. procedure TCAN2_C2FIFOINT28.clearRXHALFIF; inline;
  119641. begin
  119642. pTDefRegMap(@Self)^.clr := $00000002;
  119643. end;
  119644. procedure TCAN2_C2FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  119645. begin
  119646. if thebits = 0 then
  119647. pTDefRegMap(@Self)^.clr := $00000002
  119648. else
  119649. pTDefRegMap(@Self)^.&set := $00000002;
  119650. end;
  119651. function TCAN2_C2FIFOINT28.getRXHALFIF : TBits_1; inline;
  119652. begin
  119653. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  119654. end;
  119655. procedure TCAN2_C2FIFOINT28.setRXFULLIF; inline;
  119656. begin
  119657. pTDefRegMap(@Self)^.&set := $00000004;
  119658. end;
  119659. procedure TCAN2_C2FIFOINT28.clearRXFULLIF; inline;
  119660. begin
  119661. pTDefRegMap(@Self)^.clr := $00000004;
  119662. end;
  119663. procedure TCAN2_C2FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  119664. begin
  119665. if thebits = 0 then
  119666. pTDefRegMap(@Self)^.clr := $00000004
  119667. else
  119668. pTDefRegMap(@Self)^.&set := $00000004;
  119669. end;
  119670. function TCAN2_C2FIFOINT28.getRXFULLIF : TBits_1; inline;
  119671. begin
  119672. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  119673. end;
  119674. procedure TCAN2_C2FIFOINT28.setRXOVFLIF; inline;
  119675. begin
  119676. pTDefRegMap(@Self)^.&set := $00000008;
  119677. end;
  119678. procedure TCAN2_C2FIFOINT28.clearRXOVFLIF; inline;
  119679. begin
  119680. pTDefRegMap(@Self)^.clr := $00000008;
  119681. end;
  119682. procedure TCAN2_C2FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  119683. begin
  119684. if thebits = 0 then
  119685. pTDefRegMap(@Self)^.clr := $00000008
  119686. else
  119687. pTDefRegMap(@Self)^.&set := $00000008;
  119688. end;
  119689. function TCAN2_C2FIFOINT28.getRXOVFLIF : TBits_1; inline;
  119690. begin
  119691. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  119692. end;
  119693. procedure TCAN2_C2FIFOINT28.setTXEMPTYIF; inline;
  119694. begin
  119695. pTDefRegMap(@Self)^.&set := $00000100;
  119696. end;
  119697. procedure TCAN2_C2FIFOINT28.clearTXEMPTYIF; inline;
  119698. begin
  119699. pTDefRegMap(@Self)^.clr := $00000100;
  119700. end;
  119701. procedure TCAN2_C2FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  119702. begin
  119703. if thebits = 0 then
  119704. pTDefRegMap(@Self)^.clr := $00000100
  119705. else
  119706. pTDefRegMap(@Self)^.&set := $00000100;
  119707. end;
  119708. function TCAN2_C2FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  119709. begin
  119710. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  119711. end;
  119712. procedure TCAN2_C2FIFOINT28.setTXHALFIF; inline;
  119713. begin
  119714. pTDefRegMap(@Self)^.&set := $00000200;
  119715. end;
  119716. procedure TCAN2_C2FIFOINT28.clearTXHALFIF; inline;
  119717. begin
  119718. pTDefRegMap(@Self)^.clr := $00000200;
  119719. end;
  119720. procedure TCAN2_C2FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  119721. begin
  119722. if thebits = 0 then
  119723. pTDefRegMap(@Self)^.clr := $00000200
  119724. else
  119725. pTDefRegMap(@Self)^.&set := $00000200;
  119726. end;
  119727. function TCAN2_C2FIFOINT28.getTXHALFIF : TBits_1; inline;
  119728. begin
  119729. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  119730. end;
  119731. procedure TCAN2_C2FIFOINT28.setTXNFULLIF; inline;
  119732. begin
  119733. pTDefRegMap(@Self)^.&set := $00000400;
  119734. end;
  119735. procedure TCAN2_C2FIFOINT28.clearTXNFULLIF; inline;
  119736. begin
  119737. pTDefRegMap(@Self)^.clr := $00000400;
  119738. end;
  119739. procedure TCAN2_C2FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  119740. begin
  119741. if thebits = 0 then
  119742. pTDefRegMap(@Self)^.clr := $00000400
  119743. else
  119744. pTDefRegMap(@Self)^.&set := $00000400;
  119745. end;
  119746. function TCAN2_C2FIFOINT28.getTXNFULLIF : TBits_1; inline;
  119747. begin
  119748. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  119749. end;
  119750. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIE; inline;
  119751. begin
  119752. pTDefRegMap(@Self)^.&set := $00010000;
  119753. end;
  119754. procedure TCAN2_C2FIFOINT28.clearRXNEMPTYIE; inline;
  119755. begin
  119756. pTDefRegMap(@Self)^.clr := $00010000;
  119757. end;
  119758. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  119759. begin
  119760. if thebits = 0 then
  119761. pTDefRegMap(@Self)^.clr := $00010000
  119762. else
  119763. pTDefRegMap(@Self)^.&set := $00010000;
  119764. end;
  119765. function TCAN2_C2FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  119766. begin
  119767. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  119768. end;
  119769. procedure TCAN2_C2FIFOINT28.setRXHALFIE; inline;
  119770. begin
  119771. pTDefRegMap(@Self)^.&set := $00020000;
  119772. end;
  119773. procedure TCAN2_C2FIFOINT28.clearRXHALFIE; inline;
  119774. begin
  119775. pTDefRegMap(@Self)^.clr := $00020000;
  119776. end;
  119777. procedure TCAN2_C2FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  119778. begin
  119779. if thebits = 0 then
  119780. pTDefRegMap(@Self)^.clr := $00020000
  119781. else
  119782. pTDefRegMap(@Self)^.&set := $00020000;
  119783. end;
  119784. function TCAN2_C2FIFOINT28.getRXHALFIE : TBits_1; inline;
  119785. begin
  119786. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  119787. end;
  119788. procedure TCAN2_C2FIFOINT28.setRXFULLIE; inline;
  119789. begin
  119790. pTDefRegMap(@Self)^.&set := $00040000;
  119791. end;
  119792. procedure TCAN2_C2FIFOINT28.clearRXFULLIE; inline;
  119793. begin
  119794. pTDefRegMap(@Self)^.clr := $00040000;
  119795. end;
  119796. procedure TCAN2_C2FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  119797. begin
  119798. if thebits = 0 then
  119799. pTDefRegMap(@Self)^.clr := $00040000
  119800. else
  119801. pTDefRegMap(@Self)^.&set := $00040000;
  119802. end;
  119803. function TCAN2_C2FIFOINT28.getRXFULLIE : TBits_1; inline;
  119804. begin
  119805. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  119806. end;
  119807. procedure TCAN2_C2FIFOINT28.setRXOVFLIE; inline;
  119808. begin
  119809. pTDefRegMap(@Self)^.&set := $00080000;
  119810. end;
  119811. procedure TCAN2_C2FIFOINT28.clearRXOVFLIE; inline;
  119812. begin
  119813. pTDefRegMap(@Self)^.clr := $00080000;
  119814. end;
  119815. procedure TCAN2_C2FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  119816. begin
  119817. if thebits = 0 then
  119818. pTDefRegMap(@Self)^.clr := $00080000
  119819. else
  119820. pTDefRegMap(@Self)^.&set := $00080000;
  119821. end;
  119822. function TCAN2_C2FIFOINT28.getRXOVFLIE : TBits_1; inline;
  119823. begin
  119824. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  119825. end;
  119826. procedure TCAN2_C2FIFOINT28.setTXEMPTYIE; inline;
  119827. begin
  119828. pTDefRegMap(@Self)^.&set := $01000000;
  119829. end;
  119830. procedure TCAN2_C2FIFOINT28.clearTXEMPTYIE; inline;
  119831. begin
  119832. pTDefRegMap(@Self)^.clr := $01000000;
  119833. end;
  119834. procedure TCAN2_C2FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  119835. begin
  119836. if thebits = 0 then
  119837. pTDefRegMap(@Self)^.clr := $01000000
  119838. else
  119839. pTDefRegMap(@Self)^.&set := $01000000;
  119840. end;
  119841. function TCAN2_C2FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  119842. begin
  119843. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  119844. end;
  119845. procedure TCAN2_C2FIFOINT28.setTXHALFIE; inline;
  119846. begin
  119847. pTDefRegMap(@Self)^.&set := $02000000;
  119848. end;
  119849. procedure TCAN2_C2FIFOINT28.clearTXHALFIE; inline;
  119850. begin
  119851. pTDefRegMap(@Self)^.clr := $02000000;
  119852. end;
  119853. procedure TCAN2_C2FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  119854. begin
  119855. if thebits = 0 then
  119856. pTDefRegMap(@Self)^.clr := $02000000
  119857. else
  119858. pTDefRegMap(@Self)^.&set := $02000000;
  119859. end;
  119860. function TCAN2_C2FIFOINT28.getTXHALFIE : TBits_1; inline;
  119861. begin
  119862. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  119863. end;
  119864. procedure TCAN2_C2FIFOINT28.setTXNFULLIE; inline;
  119865. begin
  119866. pTDefRegMap(@Self)^.&set := $04000000;
  119867. end;
  119868. procedure TCAN2_C2FIFOINT28.clearTXNFULLIE; inline;
  119869. begin
  119870. pTDefRegMap(@Self)^.clr := $04000000;
  119871. end;
  119872. procedure TCAN2_C2FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  119873. begin
  119874. if thebits = 0 then
  119875. pTDefRegMap(@Self)^.clr := $04000000
  119876. else
  119877. pTDefRegMap(@Self)^.&set := $04000000;
  119878. end;
  119879. function TCAN2_C2FIFOINT28.getTXNFULLIE : TBits_1; inline;
  119880. begin
  119881. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  119882. end;
  119883. procedure TCAN2_C2FIFOINT28.setw(thebits : TBits_32); inline;
  119884. begin
  119885. pTDefRegMap(@Self)^.val := thebits;
  119886. end;
  119887. function TCAN2_C2FIFOINT28.getw : TBits_32; inline;
  119888. begin
  119889. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  119890. end;
  119891. procedure TCAN2_C2FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  119892. begin
  119893. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  119894. end;
  119895. function TCAN2_C2FIFOCI28.getCFIFOCI : TBits_5; inline;
  119896. begin
  119897. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  119898. end;
  119899. procedure TCAN2_C2FIFOCI28.setw(thebits : TBits_32); inline;
  119900. begin
  119901. pTDefRegMap(@Self)^.val := thebits;
  119902. end;
  119903. function TCAN2_C2FIFOCI28.getw : TBits_32; inline;
  119904. begin
  119905. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  119906. end;
  119907. procedure TCAN2_C2FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  119908. begin
  119909. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  119910. end;
  119911. function TCAN2_C2FIFOCON29.getTXPRI : TBits_2; inline;
  119912. begin
  119913. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  119914. end;
  119915. procedure TCAN2_C2FIFOCON29.setRTREN; inline;
  119916. begin
  119917. pTDefRegMap(@Self)^.&set := $00000004;
  119918. end;
  119919. procedure TCAN2_C2FIFOCON29.clearRTREN; inline;
  119920. begin
  119921. pTDefRegMap(@Self)^.clr := $00000004;
  119922. end;
  119923. procedure TCAN2_C2FIFOCON29.setRTREN(thebits : TBits_1); inline;
  119924. begin
  119925. if thebits = 0 then
  119926. pTDefRegMap(@Self)^.clr := $00000004
  119927. else
  119928. pTDefRegMap(@Self)^.&set := $00000004;
  119929. end;
  119930. function TCAN2_C2FIFOCON29.getRTREN : TBits_1; inline;
  119931. begin
  119932. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  119933. end;
  119934. procedure TCAN2_C2FIFOCON29.setTXREQ; inline;
  119935. begin
  119936. pTDefRegMap(@Self)^.&set := $00000008;
  119937. end;
  119938. procedure TCAN2_C2FIFOCON29.clearTXREQ; inline;
  119939. begin
  119940. pTDefRegMap(@Self)^.clr := $00000008;
  119941. end;
  119942. procedure TCAN2_C2FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  119943. begin
  119944. if thebits = 0 then
  119945. pTDefRegMap(@Self)^.clr := $00000008
  119946. else
  119947. pTDefRegMap(@Self)^.&set := $00000008;
  119948. end;
  119949. function TCAN2_C2FIFOCON29.getTXREQ : TBits_1; inline;
  119950. begin
  119951. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  119952. end;
  119953. procedure TCAN2_C2FIFOCON29.setTXERR; inline;
  119954. begin
  119955. pTDefRegMap(@Self)^.&set := $00000010;
  119956. end;
  119957. procedure TCAN2_C2FIFOCON29.clearTXERR; inline;
  119958. begin
  119959. pTDefRegMap(@Self)^.clr := $00000010;
  119960. end;
  119961. procedure TCAN2_C2FIFOCON29.setTXERR(thebits : TBits_1); inline;
  119962. begin
  119963. if thebits = 0 then
  119964. pTDefRegMap(@Self)^.clr := $00000010
  119965. else
  119966. pTDefRegMap(@Self)^.&set := $00000010;
  119967. end;
  119968. function TCAN2_C2FIFOCON29.getTXERR : TBits_1; inline;
  119969. begin
  119970. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  119971. end;
  119972. procedure TCAN2_C2FIFOCON29.setTXLARB; inline;
  119973. begin
  119974. pTDefRegMap(@Self)^.&set := $00000020;
  119975. end;
  119976. procedure TCAN2_C2FIFOCON29.clearTXLARB; inline;
  119977. begin
  119978. pTDefRegMap(@Self)^.clr := $00000020;
  119979. end;
  119980. procedure TCAN2_C2FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  119981. begin
  119982. if thebits = 0 then
  119983. pTDefRegMap(@Self)^.clr := $00000020
  119984. else
  119985. pTDefRegMap(@Self)^.&set := $00000020;
  119986. end;
  119987. function TCAN2_C2FIFOCON29.getTXLARB : TBits_1; inline;
  119988. begin
  119989. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  119990. end;
  119991. procedure TCAN2_C2FIFOCON29.setTXABAT; inline;
  119992. begin
  119993. pTDefRegMap(@Self)^.&set := $00000040;
  119994. end;
  119995. procedure TCAN2_C2FIFOCON29.clearTXABAT; inline;
  119996. begin
  119997. pTDefRegMap(@Self)^.clr := $00000040;
  119998. end;
  119999. procedure TCAN2_C2FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  120000. begin
  120001. if thebits = 0 then
  120002. pTDefRegMap(@Self)^.clr := $00000040
  120003. else
  120004. pTDefRegMap(@Self)^.&set := $00000040;
  120005. end;
  120006. function TCAN2_C2FIFOCON29.getTXABAT : TBits_1; inline;
  120007. begin
  120008. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  120009. end;
  120010. procedure TCAN2_C2FIFOCON29.setTXEN; inline;
  120011. begin
  120012. pTDefRegMap(@Self)^.&set := $00000080;
  120013. end;
  120014. procedure TCAN2_C2FIFOCON29.clearTXEN; inline;
  120015. begin
  120016. pTDefRegMap(@Self)^.clr := $00000080;
  120017. end;
  120018. procedure TCAN2_C2FIFOCON29.setTXEN(thebits : TBits_1); inline;
  120019. begin
  120020. if thebits = 0 then
  120021. pTDefRegMap(@Self)^.clr := $00000080
  120022. else
  120023. pTDefRegMap(@Self)^.&set := $00000080;
  120024. end;
  120025. function TCAN2_C2FIFOCON29.getTXEN : TBits_1; inline;
  120026. begin
  120027. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  120028. end;
  120029. procedure TCAN2_C2FIFOCON29.setDONLY; inline;
  120030. begin
  120031. pTDefRegMap(@Self)^.&set := $00001000;
  120032. end;
  120033. procedure TCAN2_C2FIFOCON29.clearDONLY; inline;
  120034. begin
  120035. pTDefRegMap(@Self)^.clr := $00001000;
  120036. end;
  120037. procedure TCAN2_C2FIFOCON29.setDONLY(thebits : TBits_1); inline;
  120038. begin
  120039. if thebits = 0 then
  120040. pTDefRegMap(@Self)^.clr := $00001000
  120041. else
  120042. pTDefRegMap(@Self)^.&set := $00001000;
  120043. end;
  120044. function TCAN2_C2FIFOCON29.getDONLY : TBits_1; inline;
  120045. begin
  120046. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  120047. end;
  120048. procedure TCAN2_C2FIFOCON29.setUINC; inline;
  120049. begin
  120050. pTDefRegMap(@Self)^.&set := $00002000;
  120051. end;
  120052. procedure TCAN2_C2FIFOCON29.clearUINC; inline;
  120053. begin
  120054. pTDefRegMap(@Self)^.clr := $00002000;
  120055. end;
  120056. procedure TCAN2_C2FIFOCON29.setUINC(thebits : TBits_1); inline;
  120057. begin
  120058. if thebits = 0 then
  120059. pTDefRegMap(@Self)^.clr := $00002000
  120060. else
  120061. pTDefRegMap(@Self)^.&set := $00002000;
  120062. end;
  120063. function TCAN2_C2FIFOCON29.getUINC : TBits_1; inline;
  120064. begin
  120065. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  120066. end;
  120067. procedure TCAN2_C2FIFOCON29.setFRESET; inline;
  120068. begin
  120069. pTDefRegMap(@Self)^.&set := $00004000;
  120070. end;
  120071. procedure TCAN2_C2FIFOCON29.clearFRESET; inline;
  120072. begin
  120073. pTDefRegMap(@Self)^.clr := $00004000;
  120074. end;
  120075. procedure TCAN2_C2FIFOCON29.setFRESET(thebits : TBits_1); inline;
  120076. begin
  120077. if thebits = 0 then
  120078. pTDefRegMap(@Self)^.clr := $00004000
  120079. else
  120080. pTDefRegMap(@Self)^.&set := $00004000;
  120081. end;
  120082. function TCAN2_C2FIFOCON29.getFRESET : TBits_1; inline;
  120083. begin
  120084. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  120085. end;
  120086. procedure TCAN2_C2FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  120087. begin
  120088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  120089. end;
  120090. function TCAN2_C2FIFOCON29.getFSIZE : TBits_5; inline;
  120091. begin
  120092. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  120093. end;
  120094. procedure TCAN2_C2FIFOCON29.setw(thebits : TBits_32); inline;
  120095. begin
  120096. pTDefRegMap(@Self)^.val := thebits;
  120097. end;
  120098. function TCAN2_C2FIFOCON29.getw : TBits_32; inline;
  120099. begin
  120100. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  120101. end;
  120102. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIF; inline;
  120103. begin
  120104. pTDefRegMap(@Self)^.&set := $00000001;
  120105. end;
  120106. procedure TCAN2_C2FIFOINT29.clearRXNEMPTYIF; inline;
  120107. begin
  120108. pTDefRegMap(@Self)^.clr := $00000001;
  120109. end;
  120110. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  120111. begin
  120112. if thebits = 0 then
  120113. pTDefRegMap(@Self)^.clr := $00000001
  120114. else
  120115. pTDefRegMap(@Self)^.&set := $00000001;
  120116. end;
  120117. function TCAN2_C2FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  120118. begin
  120119. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  120120. end;
  120121. procedure TCAN2_C2FIFOINT29.setRXHALFIF; inline;
  120122. begin
  120123. pTDefRegMap(@Self)^.&set := $00000002;
  120124. end;
  120125. procedure TCAN2_C2FIFOINT29.clearRXHALFIF; inline;
  120126. begin
  120127. pTDefRegMap(@Self)^.clr := $00000002;
  120128. end;
  120129. procedure TCAN2_C2FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  120130. begin
  120131. if thebits = 0 then
  120132. pTDefRegMap(@Self)^.clr := $00000002
  120133. else
  120134. pTDefRegMap(@Self)^.&set := $00000002;
  120135. end;
  120136. function TCAN2_C2FIFOINT29.getRXHALFIF : TBits_1; inline;
  120137. begin
  120138. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  120139. end;
  120140. procedure TCAN2_C2FIFOINT29.setRXFULLIF; inline;
  120141. begin
  120142. pTDefRegMap(@Self)^.&set := $00000004;
  120143. end;
  120144. procedure TCAN2_C2FIFOINT29.clearRXFULLIF; inline;
  120145. begin
  120146. pTDefRegMap(@Self)^.clr := $00000004;
  120147. end;
  120148. procedure TCAN2_C2FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  120149. begin
  120150. if thebits = 0 then
  120151. pTDefRegMap(@Self)^.clr := $00000004
  120152. else
  120153. pTDefRegMap(@Self)^.&set := $00000004;
  120154. end;
  120155. function TCAN2_C2FIFOINT29.getRXFULLIF : TBits_1; inline;
  120156. begin
  120157. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  120158. end;
  120159. procedure TCAN2_C2FIFOINT29.setRXOVFLIF; inline;
  120160. begin
  120161. pTDefRegMap(@Self)^.&set := $00000008;
  120162. end;
  120163. procedure TCAN2_C2FIFOINT29.clearRXOVFLIF; inline;
  120164. begin
  120165. pTDefRegMap(@Self)^.clr := $00000008;
  120166. end;
  120167. procedure TCAN2_C2FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  120168. begin
  120169. if thebits = 0 then
  120170. pTDefRegMap(@Self)^.clr := $00000008
  120171. else
  120172. pTDefRegMap(@Self)^.&set := $00000008;
  120173. end;
  120174. function TCAN2_C2FIFOINT29.getRXOVFLIF : TBits_1; inline;
  120175. begin
  120176. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  120177. end;
  120178. procedure TCAN2_C2FIFOINT29.setTXEMPTYIF; inline;
  120179. begin
  120180. pTDefRegMap(@Self)^.&set := $00000100;
  120181. end;
  120182. procedure TCAN2_C2FIFOINT29.clearTXEMPTYIF; inline;
  120183. begin
  120184. pTDefRegMap(@Self)^.clr := $00000100;
  120185. end;
  120186. procedure TCAN2_C2FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  120187. begin
  120188. if thebits = 0 then
  120189. pTDefRegMap(@Self)^.clr := $00000100
  120190. else
  120191. pTDefRegMap(@Self)^.&set := $00000100;
  120192. end;
  120193. function TCAN2_C2FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  120194. begin
  120195. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  120196. end;
  120197. procedure TCAN2_C2FIFOINT29.setTXHALFIF; inline;
  120198. begin
  120199. pTDefRegMap(@Self)^.&set := $00000200;
  120200. end;
  120201. procedure TCAN2_C2FIFOINT29.clearTXHALFIF; inline;
  120202. begin
  120203. pTDefRegMap(@Self)^.clr := $00000200;
  120204. end;
  120205. procedure TCAN2_C2FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  120206. begin
  120207. if thebits = 0 then
  120208. pTDefRegMap(@Self)^.clr := $00000200
  120209. else
  120210. pTDefRegMap(@Self)^.&set := $00000200;
  120211. end;
  120212. function TCAN2_C2FIFOINT29.getTXHALFIF : TBits_1; inline;
  120213. begin
  120214. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  120215. end;
  120216. procedure TCAN2_C2FIFOINT29.setTXNFULLIF; inline;
  120217. begin
  120218. pTDefRegMap(@Self)^.&set := $00000400;
  120219. end;
  120220. procedure TCAN2_C2FIFOINT29.clearTXNFULLIF; inline;
  120221. begin
  120222. pTDefRegMap(@Self)^.clr := $00000400;
  120223. end;
  120224. procedure TCAN2_C2FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  120225. begin
  120226. if thebits = 0 then
  120227. pTDefRegMap(@Self)^.clr := $00000400
  120228. else
  120229. pTDefRegMap(@Self)^.&set := $00000400;
  120230. end;
  120231. function TCAN2_C2FIFOINT29.getTXNFULLIF : TBits_1; inline;
  120232. begin
  120233. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  120234. end;
  120235. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIE; inline;
  120236. begin
  120237. pTDefRegMap(@Self)^.&set := $00010000;
  120238. end;
  120239. procedure TCAN2_C2FIFOINT29.clearRXNEMPTYIE; inline;
  120240. begin
  120241. pTDefRegMap(@Self)^.clr := $00010000;
  120242. end;
  120243. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  120244. begin
  120245. if thebits = 0 then
  120246. pTDefRegMap(@Self)^.clr := $00010000
  120247. else
  120248. pTDefRegMap(@Self)^.&set := $00010000;
  120249. end;
  120250. function TCAN2_C2FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  120251. begin
  120252. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  120253. end;
  120254. procedure TCAN2_C2FIFOINT29.setRXHALFIE; inline;
  120255. begin
  120256. pTDefRegMap(@Self)^.&set := $00020000;
  120257. end;
  120258. procedure TCAN2_C2FIFOINT29.clearRXHALFIE; inline;
  120259. begin
  120260. pTDefRegMap(@Self)^.clr := $00020000;
  120261. end;
  120262. procedure TCAN2_C2FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  120263. begin
  120264. if thebits = 0 then
  120265. pTDefRegMap(@Self)^.clr := $00020000
  120266. else
  120267. pTDefRegMap(@Self)^.&set := $00020000;
  120268. end;
  120269. function TCAN2_C2FIFOINT29.getRXHALFIE : TBits_1; inline;
  120270. begin
  120271. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  120272. end;
  120273. procedure TCAN2_C2FIFOINT29.setRXFULLIE; inline;
  120274. begin
  120275. pTDefRegMap(@Self)^.&set := $00040000;
  120276. end;
  120277. procedure TCAN2_C2FIFOINT29.clearRXFULLIE; inline;
  120278. begin
  120279. pTDefRegMap(@Self)^.clr := $00040000;
  120280. end;
  120281. procedure TCAN2_C2FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  120282. begin
  120283. if thebits = 0 then
  120284. pTDefRegMap(@Self)^.clr := $00040000
  120285. else
  120286. pTDefRegMap(@Self)^.&set := $00040000;
  120287. end;
  120288. function TCAN2_C2FIFOINT29.getRXFULLIE : TBits_1; inline;
  120289. begin
  120290. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  120291. end;
  120292. procedure TCAN2_C2FIFOINT29.setRXOVFLIE; inline;
  120293. begin
  120294. pTDefRegMap(@Self)^.&set := $00080000;
  120295. end;
  120296. procedure TCAN2_C2FIFOINT29.clearRXOVFLIE; inline;
  120297. begin
  120298. pTDefRegMap(@Self)^.clr := $00080000;
  120299. end;
  120300. procedure TCAN2_C2FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  120301. begin
  120302. if thebits = 0 then
  120303. pTDefRegMap(@Self)^.clr := $00080000
  120304. else
  120305. pTDefRegMap(@Self)^.&set := $00080000;
  120306. end;
  120307. function TCAN2_C2FIFOINT29.getRXOVFLIE : TBits_1; inline;
  120308. begin
  120309. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  120310. end;
  120311. procedure TCAN2_C2FIFOINT29.setTXEMPTYIE; inline;
  120312. begin
  120313. pTDefRegMap(@Self)^.&set := $01000000;
  120314. end;
  120315. procedure TCAN2_C2FIFOINT29.clearTXEMPTYIE; inline;
  120316. begin
  120317. pTDefRegMap(@Self)^.clr := $01000000;
  120318. end;
  120319. procedure TCAN2_C2FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  120320. begin
  120321. if thebits = 0 then
  120322. pTDefRegMap(@Self)^.clr := $01000000
  120323. else
  120324. pTDefRegMap(@Self)^.&set := $01000000;
  120325. end;
  120326. function TCAN2_C2FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  120327. begin
  120328. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  120329. end;
  120330. procedure TCAN2_C2FIFOINT29.setTXHALFIE; inline;
  120331. begin
  120332. pTDefRegMap(@Self)^.&set := $02000000;
  120333. end;
  120334. procedure TCAN2_C2FIFOINT29.clearTXHALFIE; inline;
  120335. begin
  120336. pTDefRegMap(@Self)^.clr := $02000000;
  120337. end;
  120338. procedure TCAN2_C2FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  120339. begin
  120340. if thebits = 0 then
  120341. pTDefRegMap(@Self)^.clr := $02000000
  120342. else
  120343. pTDefRegMap(@Self)^.&set := $02000000;
  120344. end;
  120345. function TCAN2_C2FIFOINT29.getTXHALFIE : TBits_1; inline;
  120346. begin
  120347. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  120348. end;
  120349. procedure TCAN2_C2FIFOINT29.setTXNFULLIE; inline;
  120350. begin
  120351. pTDefRegMap(@Self)^.&set := $04000000;
  120352. end;
  120353. procedure TCAN2_C2FIFOINT29.clearTXNFULLIE; inline;
  120354. begin
  120355. pTDefRegMap(@Self)^.clr := $04000000;
  120356. end;
  120357. procedure TCAN2_C2FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  120358. begin
  120359. if thebits = 0 then
  120360. pTDefRegMap(@Self)^.clr := $04000000
  120361. else
  120362. pTDefRegMap(@Self)^.&set := $04000000;
  120363. end;
  120364. function TCAN2_C2FIFOINT29.getTXNFULLIE : TBits_1; inline;
  120365. begin
  120366. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  120367. end;
  120368. procedure TCAN2_C2FIFOINT29.setw(thebits : TBits_32); inline;
  120369. begin
  120370. pTDefRegMap(@Self)^.val := thebits;
  120371. end;
  120372. function TCAN2_C2FIFOINT29.getw : TBits_32; inline;
  120373. begin
  120374. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  120375. end;
  120376. procedure TCAN2_C2FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  120377. begin
  120378. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  120379. end;
  120380. function TCAN2_C2FIFOCI29.getCFIFOCI : TBits_5; inline;
  120381. begin
  120382. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  120383. end;
  120384. procedure TCAN2_C2FIFOCI29.setw(thebits : TBits_32); inline;
  120385. begin
  120386. pTDefRegMap(@Self)^.val := thebits;
  120387. end;
  120388. function TCAN2_C2FIFOCI29.getw : TBits_32; inline;
  120389. begin
  120390. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  120391. end;
  120392. procedure TCAN2_C2FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  120393. begin
  120394. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  120395. end;
  120396. function TCAN2_C2FIFOCON30.getTXPRI : TBits_2; inline;
  120397. begin
  120398. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  120399. end;
  120400. procedure TCAN2_C2FIFOCON30.setRTREN; inline;
  120401. begin
  120402. pTDefRegMap(@Self)^.&set := $00000004;
  120403. end;
  120404. procedure TCAN2_C2FIFOCON30.clearRTREN; inline;
  120405. begin
  120406. pTDefRegMap(@Self)^.clr := $00000004;
  120407. end;
  120408. procedure TCAN2_C2FIFOCON30.setRTREN(thebits : TBits_1); inline;
  120409. begin
  120410. if thebits = 0 then
  120411. pTDefRegMap(@Self)^.clr := $00000004
  120412. else
  120413. pTDefRegMap(@Self)^.&set := $00000004;
  120414. end;
  120415. function TCAN2_C2FIFOCON30.getRTREN : TBits_1; inline;
  120416. begin
  120417. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  120418. end;
  120419. procedure TCAN2_C2FIFOCON30.setTXREQ; inline;
  120420. begin
  120421. pTDefRegMap(@Self)^.&set := $00000008;
  120422. end;
  120423. procedure TCAN2_C2FIFOCON30.clearTXREQ; inline;
  120424. begin
  120425. pTDefRegMap(@Self)^.clr := $00000008;
  120426. end;
  120427. procedure TCAN2_C2FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  120428. begin
  120429. if thebits = 0 then
  120430. pTDefRegMap(@Self)^.clr := $00000008
  120431. else
  120432. pTDefRegMap(@Self)^.&set := $00000008;
  120433. end;
  120434. function TCAN2_C2FIFOCON30.getTXREQ : TBits_1; inline;
  120435. begin
  120436. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  120437. end;
  120438. procedure TCAN2_C2FIFOCON30.setTXERR; inline;
  120439. begin
  120440. pTDefRegMap(@Self)^.&set := $00000010;
  120441. end;
  120442. procedure TCAN2_C2FIFOCON30.clearTXERR; inline;
  120443. begin
  120444. pTDefRegMap(@Self)^.clr := $00000010;
  120445. end;
  120446. procedure TCAN2_C2FIFOCON30.setTXERR(thebits : TBits_1); inline;
  120447. begin
  120448. if thebits = 0 then
  120449. pTDefRegMap(@Self)^.clr := $00000010
  120450. else
  120451. pTDefRegMap(@Self)^.&set := $00000010;
  120452. end;
  120453. function TCAN2_C2FIFOCON30.getTXERR : TBits_1; inline;
  120454. begin
  120455. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  120456. end;
  120457. procedure TCAN2_C2FIFOCON30.setTXLARB; inline;
  120458. begin
  120459. pTDefRegMap(@Self)^.&set := $00000020;
  120460. end;
  120461. procedure TCAN2_C2FIFOCON30.clearTXLARB; inline;
  120462. begin
  120463. pTDefRegMap(@Self)^.clr := $00000020;
  120464. end;
  120465. procedure TCAN2_C2FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  120466. begin
  120467. if thebits = 0 then
  120468. pTDefRegMap(@Self)^.clr := $00000020
  120469. else
  120470. pTDefRegMap(@Self)^.&set := $00000020;
  120471. end;
  120472. function TCAN2_C2FIFOCON30.getTXLARB : TBits_1; inline;
  120473. begin
  120474. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  120475. end;
  120476. procedure TCAN2_C2FIFOCON30.setTXABAT; inline;
  120477. begin
  120478. pTDefRegMap(@Self)^.&set := $00000040;
  120479. end;
  120480. procedure TCAN2_C2FIFOCON30.clearTXABAT; inline;
  120481. begin
  120482. pTDefRegMap(@Self)^.clr := $00000040;
  120483. end;
  120484. procedure TCAN2_C2FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  120485. begin
  120486. if thebits = 0 then
  120487. pTDefRegMap(@Self)^.clr := $00000040
  120488. else
  120489. pTDefRegMap(@Self)^.&set := $00000040;
  120490. end;
  120491. function TCAN2_C2FIFOCON30.getTXABAT : TBits_1; inline;
  120492. begin
  120493. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  120494. end;
  120495. procedure TCAN2_C2FIFOCON30.setTXEN; inline;
  120496. begin
  120497. pTDefRegMap(@Self)^.&set := $00000080;
  120498. end;
  120499. procedure TCAN2_C2FIFOCON30.clearTXEN; inline;
  120500. begin
  120501. pTDefRegMap(@Self)^.clr := $00000080;
  120502. end;
  120503. procedure TCAN2_C2FIFOCON30.setTXEN(thebits : TBits_1); inline;
  120504. begin
  120505. if thebits = 0 then
  120506. pTDefRegMap(@Self)^.clr := $00000080
  120507. else
  120508. pTDefRegMap(@Self)^.&set := $00000080;
  120509. end;
  120510. function TCAN2_C2FIFOCON30.getTXEN : TBits_1; inline;
  120511. begin
  120512. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  120513. end;
  120514. procedure TCAN2_C2FIFOCON30.setDONLY; inline;
  120515. begin
  120516. pTDefRegMap(@Self)^.&set := $00001000;
  120517. end;
  120518. procedure TCAN2_C2FIFOCON30.clearDONLY; inline;
  120519. begin
  120520. pTDefRegMap(@Self)^.clr := $00001000;
  120521. end;
  120522. procedure TCAN2_C2FIFOCON30.setDONLY(thebits : TBits_1); inline;
  120523. begin
  120524. if thebits = 0 then
  120525. pTDefRegMap(@Self)^.clr := $00001000
  120526. else
  120527. pTDefRegMap(@Self)^.&set := $00001000;
  120528. end;
  120529. function TCAN2_C2FIFOCON30.getDONLY : TBits_1; inline;
  120530. begin
  120531. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  120532. end;
  120533. procedure TCAN2_C2FIFOCON30.setUINC; inline;
  120534. begin
  120535. pTDefRegMap(@Self)^.&set := $00002000;
  120536. end;
  120537. procedure TCAN2_C2FIFOCON30.clearUINC; inline;
  120538. begin
  120539. pTDefRegMap(@Self)^.clr := $00002000;
  120540. end;
  120541. procedure TCAN2_C2FIFOCON30.setUINC(thebits : TBits_1); inline;
  120542. begin
  120543. if thebits = 0 then
  120544. pTDefRegMap(@Self)^.clr := $00002000
  120545. else
  120546. pTDefRegMap(@Self)^.&set := $00002000;
  120547. end;
  120548. function TCAN2_C2FIFOCON30.getUINC : TBits_1; inline;
  120549. begin
  120550. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  120551. end;
  120552. procedure TCAN2_C2FIFOCON30.setFRESET; inline;
  120553. begin
  120554. pTDefRegMap(@Self)^.&set := $00004000;
  120555. end;
  120556. procedure TCAN2_C2FIFOCON30.clearFRESET; inline;
  120557. begin
  120558. pTDefRegMap(@Self)^.clr := $00004000;
  120559. end;
  120560. procedure TCAN2_C2FIFOCON30.setFRESET(thebits : TBits_1); inline;
  120561. begin
  120562. if thebits = 0 then
  120563. pTDefRegMap(@Self)^.clr := $00004000
  120564. else
  120565. pTDefRegMap(@Self)^.&set := $00004000;
  120566. end;
  120567. function TCAN2_C2FIFOCON30.getFRESET : TBits_1; inline;
  120568. begin
  120569. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  120570. end;
  120571. procedure TCAN2_C2FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  120572. begin
  120573. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  120574. end;
  120575. function TCAN2_C2FIFOCON30.getFSIZE : TBits_5; inline;
  120576. begin
  120577. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  120578. end;
  120579. procedure TCAN2_C2FIFOCON30.setw(thebits : TBits_32); inline;
  120580. begin
  120581. pTDefRegMap(@Self)^.val := thebits;
  120582. end;
  120583. function TCAN2_C2FIFOCON30.getw : TBits_32; inline;
  120584. begin
  120585. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  120586. end;
  120587. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIF; inline;
  120588. begin
  120589. pTDefRegMap(@Self)^.&set := $00000001;
  120590. end;
  120591. procedure TCAN2_C2FIFOINT30.clearRXNEMPTYIF; inline;
  120592. begin
  120593. pTDefRegMap(@Self)^.clr := $00000001;
  120594. end;
  120595. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  120596. begin
  120597. if thebits = 0 then
  120598. pTDefRegMap(@Self)^.clr := $00000001
  120599. else
  120600. pTDefRegMap(@Self)^.&set := $00000001;
  120601. end;
  120602. function TCAN2_C2FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  120603. begin
  120604. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  120605. end;
  120606. procedure TCAN2_C2FIFOINT30.setRXHALFIF; inline;
  120607. begin
  120608. pTDefRegMap(@Self)^.&set := $00000002;
  120609. end;
  120610. procedure TCAN2_C2FIFOINT30.clearRXHALFIF; inline;
  120611. begin
  120612. pTDefRegMap(@Self)^.clr := $00000002;
  120613. end;
  120614. procedure TCAN2_C2FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  120615. begin
  120616. if thebits = 0 then
  120617. pTDefRegMap(@Self)^.clr := $00000002
  120618. else
  120619. pTDefRegMap(@Self)^.&set := $00000002;
  120620. end;
  120621. function TCAN2_C2FIFOINT30.getRXHALFIF : TBits_1; inline;
  120622. begin
  120623. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  120624. end;
  120625. procedure TCAN2_C2FIFOINT30.setRXFULLIF; inline;
  120626. begin
  120627. pTDefRegMap(@Self)^.&set := $00000004;
  120628. end;
  120629. procedure TCAN2_C2FIFOINT30.clearRXFULLIF; inline;
  120630. begin
  120631. pTDefRegMap(@Self)^.clr := $00000004;
  120632. end;
  120633. procedure TCAN2_C2FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  120634. begin
  120635. if thebits = 0 then
  120636. pTDefRegMap(@Self)^.clr := $00000004
  120637. else
  120638. pTDefRegMap(@Self)^.&set := $00000004;
  120639. end;
  120640. function TCAN2_C2FIFOINT30.getRXFULLIF : TBits_1; inline;
  120641. begin
  120642. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  120643. end;
  120644. procedure TCAN2_C2FIFOINT30.setRXOVFLIF; inline;
  120645. begin
  120646. pTDefRegMap(@Self)^.&set := $00000008;
  120647. end;
  120648. procedure TCAN2_C2FIFOINT30.clearRXOVFLIF; inline;
  120649. begin
  120650. pTDefRegMap(@Self)^.clr := $00000008;
  120651. end;
  120652. procedure TCAN2_C2FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  120653. begin
  120654. if thebits = 0 then
  120655. pTDefRegMap(@Self)^.clr := $00000008
  120656. else
  120657. pTDefRegMap(@Self)^.&set := $00000008;
  120658. end;
  120659. function TCAN2_C2FIFOINT30.getRXOVFLIF : TBits_1; inline;
  120660. begin
  120661. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  120662. end;
  120663. procedure TCAN2_C2FIFOINT30.setTXEMPTYIF; inline;
  120664. begin
  120665. pTDefRegMap(@Self)^.&set := $00000100;
  120666. end;
  120667. procedure TCAN2_C2FIFOINT30.clearTXEMPTYIF; inline;
  120668. begin
  120669. pTDefRegMap(@Self)^.clr := $00000100;
  120670. end;
  120671. procedure TCAN2_C2FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  120672. begin
  120673. if thebits = 0 then
  120674. pTDefRegMap(@Self)^.clr := $00000100
  120675. else
  120676. pTDefRegMap(@Self)^.&set := $00000100;
  120677. end;
  120678. function TCAN2_C2FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  120679. begin
  120680. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  120681. end;
  120682. procedure TCAN2_C2FIFOINT30.setTXHALFIF; inline;
  120683. begin
  120684. pTDefRegMap(@Self)^.&set := $00000200;
  120685. end;
  120686. procedure TCAN2_C2FIFOINT30.clearTXHALFIF; inline;
  120687. begin
  120688. pTDefRegMap(@Self)^.clr := $00000200;
  120689. end;
  120690. procedure TCAN2_C2FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  120691. begin
  120692. if thebits = 0 then
  120693. pTDefRegMap(@Self)^.clr := $00000200
  120694. else
  120695. pTDefRegMap(@Self)^.&set := $00000200;
  120696. end;
  120697. function TCAN2_C2FIFOINT30.getTXHALFIF : TBits_1; inline;
  120698. begin
  120699. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  120700. end;
  120701. procedure TCAN2_C2FIFOINT30.setTXNFULLIF; inline;
  120702. begin
  120703. pTDefRegMap(@Self)^.&set := $00000400;
  120704. end;
  120705. procedure TCAN2_C2FIFOINT30.clearTXNFULLIF; inline;
  120706. begin
  120707. pTDefRegMap(@Self)^.clr := $00000400;
  120708. end;
  120709. procedure TCAN2_C2FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  120710. begin
  120711. if thebits = 0 then
  120712. pTDefRegMap(@Self)^.clr := $00000400
  120713. else
  120714. pTDefRegMap(@Self)^.&set := $00000400;
  120715. end;
  120716. function TCAN2_C2FIFOINT30.getTXNFULLIF : TBits_1; inline;
  120717. begin
  120718. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  120719. end;
  120720. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIE; inline;
  120721. begin
  120722. pTDefRegMap(@Self)^.&set := $00010000;
  120723. end;
  120724. procedure TCAN2_C2FIFOINT30.clearRXNEMPTYIE; inline;
  120725. begin
  120726. pTDefRegMap(@Self)^.clr := $00010000;
  120727. end;
  120728. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  120729. begin
  120730. if thebits = 0 then
  120731. pTDefRegMap(@Self)^.clr := $00010000
  120732. else
  120733. pTDefRegMap(@Self)^.&set := $00010000;
  120734. end;
  120735. function TCAN2_C2FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  120736. begin
  120737. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  120738. end;
  120739. procedure TCAN2_C2FIFOINT30.setRXHALFIE; inline;
  120740. begin
  120741. pTDefRegMap(@Self)^.&set := $00020000;
  120742. end;
  120743. procedure TCAN2_C2FIFOINT30.clearRXHALFIE; inline;
  120744. begin
  120745. pTDefRegMap(@Self)^.clr := $00020000;
  120746. end;
  120747. procedure TCAN2_C2FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  120748. begin
  120749. if thebits = 0 then
  120750. pTDefRegMap(@Self)^.clr := $00020000
  120751. else
  120752. pTDefRegMap(@Self)^.&set := $00020000;
  120753. end;
  120754. function TCAN2_C2FIFOINT30.getRXHALFIE : TBits_1; inline;
  120755. begin
  120756. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  120757. end;
  120758. procedure TCAN2_C2FIFOINT30.setRXFULLIE; inline;
  120759. begin
  120760. pTDefRegMap(@Self)^.&set := $00040000;
  120761. end;
  120762. procedure TCAN2_C2FIFOINT30.clearRXFULLIE; inline;
  120763. begin
  120764. pTDefRegMap(@Self)^.clr := $00040000;
  120765. end;
  120766. procedure TCAN2_C2FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  120767. begin
  120768. if thebits = 0 then
  120769. pTDefRegMap(@Self)^.clr := $00040000
  120770. else
  120771. pTDefRegMap(@Self)^.&set := $00040000;
  120772. end;
  120773. function TCAN2_C2FIFOINT30.getRXFULLIE : TBits_1; inline;
  120774. begin
  120775. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  120776. end;
  120777. procedure TCAN2_C2FIFOINT30.setRXOVFLIE; inline;
  120778. begin
  120779. pTDefRegMap(@Self)^.&set := $00080000;
  120780. end;
  120781. procedure TCAN2_C2FIFOINT30.clearRXOVFLIE; inline;
  120782. begin
  120783. pTDefRegMap(@Self)^.clr := $00080000;
  120784. end;
  120785. procedure TCAN2_C2FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  120786. begin
  120787. if thebits = 0 then
  120788. pTDefRegMap(@Self)^.clr := $00080000
  120789. else
  120790. pTDefRegMap(@Self)^.&set := $00080000;
  120791. end;
  120792. function TCAN2_C2FIFOINT30.getRXOVFLIE : TBits_1; inline;
  120793. begin
  120794. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  120795. end;
  120796. procedure TCAN2_C2FIFOINT30.setTXEMPTYIE; inline;
  120797. begin
  120798. pTDefRegMap(@Self)^.&set := $01000000;
  120799. end;
  120800. procedure TCAN2_C2FIFOINT30.clearTXEMPTYIE; inline;
  120801. begin
  120802. pTDefRegMap(@Self)^.clr := $01000000;
  120803. end;
  120804. procedure TCAN2_C2FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  120805. begin
  120806. if thebits = 0 then
  120807. pTDefRegMap(@Self)^.clr := $01000000
  120808. else
  120809. pTDefRegMap(@Self)^.&set := $01000000;
  120810. end;
  120811. function TCAN2_C2FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  120812. begin
  120813. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  120814. end;
  120815. procedure TCAN2_C2FIFOINT30.setTXHALFIE; inline;
  120816. begin
  120817. pTDefRegMap(@Self)^.&set := $02000000;
  120818. end;
  120819. procedure TCAN2_C2FIFOINT30.clearTXHALFIE; inline;
  120820. begin
  120821. pTDefRegMap(@Self)^.clr := $02000000;
  120822. end;
  120823. procedure TCAN2_C2FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  120824. begin
  120825. if thebits = 0 then
  120826. pTDefRegMap(@Self)^.clr := $02000000
  120827. else
  120828. pTDefRegMap(@Self)^.&set := $02000000;
  120829. end;
  120830. function TCAN2_C2FIFOINT30.getTXHALFIE : TBits_1; inline;
  120831. begin
  120832. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  120833. end;
  120834. procedure TCAN2_C2FIFOINT30.setTXNFULLIE; inline;
  120835. begin
  120836. pTDefRegMap(@Self)^.&set := $04000000;
  120837. end;
  120838. procedure TCAN2_C2FIFOINT30.clearTXNFULLIE; inline;
  120839. begin
  120840. pTDefRegMap(@Self)^.clr := $04000000;
  120841. end;
  120842. procedure TCAN2_C2FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  120843. begin
  120844. if thebits = 0 then
  120845. pTDefRegMap(@Self)^.clr := $04000000
  120846. else
  120847. pTDefRegMap(@Self)^.&set := $04000000;
  120848. end;
  120849. function TCAN2_C2FIFOINT30.getTXNFULLIE : TBits_1; inline;
  120850. begin
  120851. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  120852. end;
  120853. procedure TCAN2_C2FIFOINT30.setw(thebits : TBits_32); inline;
  120854. begin
  120855. pTDefRegMap(@Self)^.val := thebits;
  120856. end;
  120857. function TCAN2_C2FIFOINT30.getw : TBits_32; inline;
  120858. begin
  120859. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  120860. end;
  120861. procedure TCAN2_C2FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  120862. begin
  120863. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  120864. end;
  120865. function TCAN2_C2FIFOCI30.getCFIFOCI : TBits_5; inline;
  120866. begin
  120867. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  120868. end;
  120869. procedure TCAN2_C2FIFOCI30.setw(thebits : TBits_32); inline;
  120870. begin
  120871. pTDefRegMap(@Self)^.val := thebits;
  120872. end;
  120873. function TCAN2_C2FIFOCI30.getw : TBits_32; inline;
  120874. begin
  120875. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  120876. end;
  120877. procedure TCAN2_C2FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  120878. begin
  120879. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  120880. end;
  120881. function TCAN2_C2FIFOCON31.getTXPRI : TBits_2; inline;
  120882. begin
  120883. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  120884. end;
  120885. procedure TCAN2_C2FIFOCON31.setRTREN; inline;
  120886. begin
  120887. pTDefRegMap(@Self)^.&set := $00000004;
  120888. end;
  120889. procedure TCAN2_C2FIFOCON31.clearRTREN; inline;
  120890. begin
  120891. pTDefRegMap(@Self)^.clr := $00000004;
  120892. end;
  120893. procedure TCAN2_C2FIFOCON31.setRTREN(thebits : TBits_1); inline;
  120894. begin
  120895. if thebits = 0 then
  120896. pTDefRegMap(@Self)^.clr := $00000004
  120897. else
  120898. pTDefRegMap(@Self)^.&set := $00000004;
  120899. end;
  120900. function TCAN2_C2FIFOCON31.getRTREN : TBits_1; inline;
  120901. begin
  120902. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  120903. end;
  120904. procedure TCAN2_C2FIFOCON31.setTXREQ; inline;
  120905. begin
  120906. pTDefRegMap(@Self)^.&set := $00000008;
  120907. end;
  120908. procedure TCAN2_C2FIFOCON31.clearTXREQ; inline;
  120909. begin
  120910. pTDefRegMap(@Self)^.clr := $00000008;
  120911. end;
  120912. procedure TCAN2_C2FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  120913. begin
  120914. if thebits = 0 then
  120915. pTDefRegMap(@Self)^.clr := $00000008
  120916. else
  120917. pTDefRegMap(@Self)^.&set := $00000008;
  120918. end;
  120919. function TCAN2_C2FIFOCON31.getTXREQ : TBits_1; inline;
  120920. begin
  120921. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  120922. end;
  120923. procedure TCAN2_C2FIFOCON31.setTXERR; inline;
  120924. begin
  120925. pTDefRegMap(@Self)^.&set := $00000010;
  120926. end;
  120927. procedure TCAN2_C2FIFOCON31.clearTXERR; inline;
  120928. begin
  120929. pTDefRegMap(@Self)^.clr := $00000010;
  120930. end;
  120931. procedure TCAN2_C2FIFOCON31.setTXERR(thebits : TBits_1); inline;
  120932. begin
  120933. if thebits = 0 then
  120934. pTDefRegMap(@Self)^.clr := $00000010
  120935. else
  120936. pTDefRegMap(@Self)^.&set := $00000010;
  120937. end;
  120938. function TCAN2_C2FIFOCON31.getTXERR : TBits_1; inline;
  120939. begin
  120940. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  120941. end;
  120942. procedure TCAN2_C2FIFOCON31.setTXLARB; inline;
  120943. begin
  120944. pTDefRegMap(@Self)^.&set := $00000020;
  120945. end;
  120946. procedure TCAN2_C2FIFOCON31.clearTXLARB; inline;
  120947. begin
  120948. pTDefRegMap(@Self)^.clr := $00000020;
  120949. end;
  120950. procedure TCAN2_C2FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  120951. begin
  120952. if thebits = 0 then
  120953. pTDefRegMap(@Self)^.clr := $00000020
  120954. else
  120955. pTDefRegMap(@Self)^.&set := $00000020;
  120956. end;
  120957. function TCAN2_C2FIFOCON31.getTXLARB : TBits_1; inline;
  120958. begin
  120959. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  120960. end;
  120961. procedure TCAN2_C2FIFOCON31.setTXABAT; inline;
  120962. begin
  120963. pTDefRegMap(@Self)^.&set := $00000040;
  120964. end;
  120965. procedure TCAN2_C2FIFOCON31.clearTXABAT; inline;
  120966. begin
  120967. pTDefRegMap(@Self)^.clr := $00000040;
  120968. end;
  120969. procedure TCAN2_C2FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  120970. begin
  120971. if thebits = 0 then
  120972. pTDefRegMap(@Self)^.clr := $00000040
  120973. else
  120974. pTDefRegMap(@Self)^.&set := $00000040;
  120975. end;
  120976. function TCAN2_C2FIFOCON31.getTXABAT : TBits_1; inline;
  120977. begin
  120978. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  120979. end;
  120980. procedure TCAN2_C2FIFOCON31.setTXEN; inline;
  120981. begin
  120982. pTDefRegMap(@Self)^.&set := $00000080;
  120983. end;
  120984. procedure TCAN2_C2FIFOCON31.clearTXEN; inline;
  120985. begin
  120986. pTDefRegMap(@Self)^.clr := $00000080;
  120987. end;
  120988. procedure TCAN2_C2FIFOCON31.setTXEN(thebits : TBits_1); inline;
  120989. begin
  120990. if thebits = 0 then
  120991. pTDefRegMap(@Self)^.clr := $00000080
  120992. else
  120993. pTDefRegMap(@Self)^.&set := $00000080;
  120994. end;
  120995. function TCAN2_C2FIFOCON31.getTXEN : TBits_1; inline;
  120996. begin
  120997. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  120998. end;
  120999. procedure TCAN2_C2FIFOCON31.setDONLY; inline;
  121000. begin
  121001. pTDefRegMap(@Self)^.&set := $00001000;
  121002. end;
  121003. procedure TCAN2_C2FIFOCON31.clearDONLY; inline;
  121004. begin
  121005. pTDefRegMap(@Self)^.clr := $00001000;
  121006. end;
  121007. procedure TCAN2_C2FIFOCON31.setDONLY(thebits : TBits_1); inline;
  121008. begin
  121009. if thebits = 0 then
  121010. pTDefRegMap(@Self)^.clr := $00001000
  121011. else
  121012. pTDefRegMap(@Self)^.&set := $00001000;
  121013. end;
  121014. function TCAN2_C2FIFOCON31.getDONLY : TBits_1; inline;
  121015. begin
  121016. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  121017. end;
  121018. procedure TCAN2_C2FIFOCON31.setUINC; inline;
  121019. begin
  121020. pTDefRegMap(@Self)^.&set := $00002000;
  121021. end;
  121022. procedure TCAN2_C2FIFOCON31.clearUINC; inline;
  121023. begin
  121024. pTDefRegMap(@Self)^.clr := $00002000;
  121025. end;
  121026. procedure TCAN2_C2FIFOCON31.setUINC(thebits : TBits_1); inline;
  121027. begin
  121028. if thebits = 0 then
  121029. pTDefRegMap(@Self)^.clr := $00002000
  121030. else
  121031. pTDefRegMap(@Self)^.&set := $00002000;
  121032. end;
  121033. function TCAN2_C2FIFOCON31.getUINC : TBits_1; inline;
  121034. begin
  121035. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  121036. end;
  121037. procedure TCAN2_C2FIFOCON31.setFRESET; inline;
  121038. begin
  121039. pTDefRegMap(@Self)^.&set := $00004000;
  121040. end;
  121041. procedure TCAN2_C2FIFOCON31.clearFRESET; inline;
  121042. begin
  121043. pTDefRegMap(@Self)^.clr := $00004000;
  121044. end;
  121045. procedure TCAN2_C2FIFOCON31.setFRESET(thebits : TBits_1); inline;
  121046. begin
  121047. if thebits = 0 then
  121048. pTDefRegMap(@Self)^.clr := $00004000
  121049. else
  121050. pTDefRegMap(@Self)^.&set := $00004000;
  121051. end;
  121052. function TCAN2_C2FIFOCON31.getFRESET : TBits_1; inline;
  121053. begin
  121054. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  121055. end;
  121056. procedure TCAN2_C2FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  121057. begin
  121058. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  121059. end;
  121060. function TCAN2_C2FIFOCON31.getFSIZE : TBits_5; inline;
  121061. begin
  121062. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  121063. end;
  121064. procedure TCAN2_C2FIFOCON31.setw(thebits : TBits_32); inline;
  121065. begin
  121066. pTDefRegMap(@Self)^.val := thebits;
  121067. end;
  121068. function TCAN2_C2FIFOCON31.getw : TBits_32; inline;
  121069. begin
  121070. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121071. end;
  121072. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIF; inline;
  121073. begin
  121074. pTDefRegMap(@Self)^.&set := $00000001;
  121075. end;
  121076. procedure TCAN2_C2FIFOINT31.clearRXNEMPTYIF; inline;
  121077. begin
  121078. pTDefRegMap(@Self)^.clr := $00000001;
  121079. end;
  121080. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  121081. begin
  121082. if thebits = 0 then
  121083. pTDefRegMap(@Self)^.clr := $00000001
  121084. else
  121085. pTDefRegMap(@Self)^.&set := $00000001;
  121086. end;
  121087. function TCAN2_C2FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  121088. begin
  121089. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  121090. end;
  121091. procedure TCAN2_C2FIFOINT31.setRXHALFIF; inline;
  121092. begin
  121093. pTDefRegMap(@Self)^.&set := $00000002;
  121094. end;
  121095. procedure TCAN2_C2FIFOINT31.clearRXHALFIF; inline;
  121096. begin
  121097. pTDefRegMap(@Self)^.clr := $00000002;
  121098. end;
  121099. procedure TCAN2_C2FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  121100. begin
  121101. if thebits = 0 then
  121102. pTDefRegMap(@Self)^.clr := $00000002
  121103. else
  121104. pTDefRegMap(@Self)^.&set := $00000002;
  121105. end;
  121106. function TCAN2_C2FIFOINT31.getRXHALFIF : TBits_1; inline;
  121107. begin
  121108. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  121109. end;
  121110. procedure TCAN2_C2FIFOINT31.setRXFULLIF; inline;
  121111. begin
  121112. pTDefRegMap(@Self)^.&set := $00000004;
  121113. end;
  121114. procedure TCAN2_C2FIFOINT31.clearRXFULLIF; inline;
  121115. begin
  121116. pTDefRegMap(@Self)^.clr := $00000004;
  121117. end;
  121118. procedure TCAN2_C2FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  121119. begin
  121120. if thebits = 0 then
  121121. pTDefRegMap(@Self)^.clr := $00000004
  121122. else
  121123. pTDefRegMap(@Self)^.&set := $00000004;
  121124. end;
  121125. function TCAN2_C2FIFOINT31.getRXFULLIF : TBits_1; inline;
  121126. begin
  121127. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  121128. end;
  121129. procedure TCAN2_C2FIFOINT31.setRXOVFLIF; inline;
  121130. begin
  121131. pTDefRegMap(@Self)^.&set := $00000008;
  121132. end;
  121133. procedure TCAN2_C2FIFOINT31.clearRXOVFLIF; inline;
  121134. begin
  121135. pTDefRegMap(@Self)^.clr := $00000008;
  121136. end;
  121137. procedure TCAN2_C2FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  121138. begin
  121139. if thebits = 0 then
  121140. pTDefRegMap(@Self)^.clr := $00000008
  121141. else
  121142. pTDefRegMap(@Self)^.&set := $00000008;
  121143. end;
  121144. function TCAN2_C2FIFOINT31.getRXOVFLIF : TBits_1; inline;
  121145. begin
  121146. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  121147. end;
  121148. procedure TCAN2_C2FIFOINT31.setTXEMPTYIF; inline;
  121149. begin
  121150. pTDefRegMap(@Self)^.&set := $00000100;
  121151. end;
  121152. procedure TCAN2_C2FIFOINT31.clearTXEMPTYIF; inline;
  121153. begin
  121154. pTDefRegMap(@Self)^.clr := $00000100;
  121155. end;
  121156. procedure TCAN2_C2FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  121157. begin
  121158. if thebits = 0 then
  121159. pTDefRegMap(@Self)^.clr := $00000100
  121160. else
  121161. pTDefRegMap(@Self)^.&set := $00000100;
  121162. end;
  121163. function TCAN2_C2FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  121164. begin
  121165. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  121166. end;
  121167. procedure TCAN2_C2FIFOINT31.setTXHALFIF; inline;
  121168. begin
  121169. pTDefRegMap(@Self)^.&set := $00000200;
  121170. end;
  121171. procedure TCAN2_C2FIFOINT31.clearTXHALFIF; inline;
  121172. begin
  121173. pTDefRegMap(@Self)^.clr := $00000200;
  121174. end;
  121175. procedure TCAN2_C2FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  121176. begin
  121177. if thebits = 0 then
  121178. pTDefRegMap(@Self)^.clr := $00000200
  121179. else
  121180. pTDefRegMap(@Self)^.&set := $00000200;
  121181. end;
  121182. function TCAN2_C2FIFOINT31.getTXHALFIF : TBits_1; inline;
  121183. begin
  121184. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  121185. end;
  121186. procedure TCAN2_C2FIFOINT31.setTXNFULLIF; inline;
  121187. begin
  121188. pTDefRegMap(@Self)^.&set := $00000400;
  121189. end;
  121190. procedure TCAN2_C2FIFOINT31.clearTXNFULLIF; inline;
  121191. begin
  121192. pTDefRegMap(@Self)^.clr := $00000400;
  121193. end;
  121194. procedure TCAN2_C2FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  121195. begin
  121196. if thebits = 0 then
  121197. pTDefRegMap(@Self)^.clr := $00000400
  121198. else
  121199. pTDefRegMap(@Self)^.&set := $00000400;
  121200. end;
  121201. function TCAN2_C2FIFOINT31.getTXNFULLIF : TBits_1; inline;
  121202. begin
  121203. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  121204. end;
  121205. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIE; inline;
  121206. begin
  121207. pTDefRegMap(@Self)^.&set := $00010000;
  121208. end;
  121209. procedure TCAN2_C2FIFOINT31.clearRXNEMPTYIE; inline;
  121210. begin
  121211. pTDefRegMap(@Self)^.clr := $00010000;
  121212. end;
  121213. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  121214. begin
  121215. if thebits = 0 then
  121216. pTDefRegMap(@Self)^.clr := $00010000
  121217. else
  121218. pTDefRegMap(@Self)^.&set := $00010000;
  121219. end;
  121220. function TCAN2_C2FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  121221. begin
  121222. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  121223. end;
  121224. procedure TCAN2_C2FIFOINT31.setRXHALFIE; inline;
  121225. begin
  121226. pTDefRegMap(@Self)^.&set := $00020000;
  121227. end;
  121228. procedure TCAN2_C2FIFOINT31.clearRXHALFIE; inline;
  121229. begin
  121230. pTDefRegMap(@Self)^.clr := $00020000;
  121231. end;
  121232. procedure TCAN2_C2FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  121233. begin
  121234. if thebits = 0 then
  121235. pTDefRegMap(@Self)^.clr := $00020000
  121236. else
  121237. pTDefRegMap(@Self)^.&set := $00020000;
  121238. end;
  121239. function TCAN2_C2FIFOINT31.getRXHALFIE : TBits_1; inline;
  121240. begin
  121241. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  121242. end;
  121243. procedure TCAN2_C2FIFOINT31.setRXFULLIE; inline;
  121244. begin
  121245. pTDefRegMap(@Self)^.&set := $00040000;
  121246. end;
  121247. procedure TCAN2_C2FIFOINT31.clearRXFULLIE; inline;
  121248. begin
  121249. pTDefRegMap(@Self)^.clr := $00040000;
  121250. end;
  121251. procedure TCAN2_C2FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  121252. begin
  121253. if thebits = 0 then
  121254. pTDefRegMap(@Self)^.clr := $00040000
  121255. else
  121256. pTDefRegMap(@Self)^.&set := $00040000;
  121257. end;
  121258. function TCAN2_C2FIFOINT31.getRXFULLIE : TBits_1; inline;
  121259. begin
  121260. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  121261. end;
  121262. procedure TCAN2_C2FIFOINT31.setRXOVFLIE; inline;
  121263. begin
  121264. pTDefRegMap(@Self)^.&set := $00080000;
  121265. end;
  121266. procedure TCAN2_C2FIFOINT31.clearRXOVFLIE; inline;
  121267. begin
  121268. pTDefRegMap(@Self)^.clr := $00080000;
  121269. end;
  121270. procedure TCAN2_C2FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  121271. begin
  121272. if thebits = 0 then
  121273. pTDefRegMap(@Self)^.clr := $00080000
  121274. else
  121275. pTDefRegMap(@Self)^.&set := $00080000;
  121276. end;
  121277. function TCAN2_C2FIFOINT31.getRXOVFLIE : TBits_1; inline;
  121278. begin
  121279. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  121280. end;
  121281. procedure TCAN2_C2FIFOINT31.setTXEMPTYIE; inline;
  121282. begin
  121283. pTDefRegMap(@Self)^.&set := $01000000;
  121284. end;
  121285. procedure TCAN2_C2FIFOINT31.clearTXEMPTYIE; inline;
  121286. begin
  121287. pTDefRegMap(@Self)^.clr := $01000000;
  121288. end;
  121289. procedure TCAN2_C2FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  121290. begin
  121291. if thebits = 0 then
  121292. pTDefRegMap(@Self)^.clr := $01000000
  121293. else
  121294. pTDefRegMap(@Self)^.&set := $01000000;
  121295. end;
  121296. function TCAN2_C2FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  121297. begin
  121298. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  121299. end;
  121300. procedure TCAN2_C2FIFOINT31.setTXHALFIE; inline;
  121301. begin
  121302. pTDefRegMap(@Self)^.&set := $02000000;
  121303. end;
  121304. procedure TCAN2_C2FIFOINT31.clearTXHALFIE; inline;
  121305. begin
  121306. pTDefRegMap(@Self)^.clr := $02000000;
  121307. end;
  121308. procedure TCAN2_C2FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  121309. begin
  121310. if thebits = 0 then
  121311. pTDefRegMap(@Self)^.clr := $02000000
  121312. else
  121313. pTDefRegMap(@Self)^.&set := $02000000;
  121314. end;
  121315. function TCAN2_C2FIFOINT31.getTXHALFIE : TBits_1; inline;
  121316. begin
  121317. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  121318. end;
  121319. procedure TCAN2_C2FIFOINT31.setTXNFULLIE; inline;
  121320. begin
  121321. pTDefRegMap(@Self)^.&set := $04000000;
  121322. end;
  121323. procedure TCAN2_C2FIFOINT31.clearTXNFULLIE; inline;
  121324. begin
  121325. pTDefRegMap(@Self)^.clr := $04000000;
  121326. end;
  121327. procedure TCAN2_C2FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  121328. begin
  121329. if thebits = 0 then
  121330. pTDefRegMap(@Self)^.clr := $04000000
  121331. else
  121332. pTDefRegMap(@Self)^.&set := $04000000;
  121333. end;
  121334. function TCAN2_C2FIFOINT31.getTXNFULLIE : TBits_1; inline;
  121335. begin
  121336. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  121337. end;
  121338. procedure TCAN2_C2FIFOINT31.setw(thebits : TBits_32); inline;
  121339. begin
  121340. pTDefRegMap(@Self)^.val := thebits;
  121341. end;
  121342. function TCAN2_C2FIFOINT31.getw : TBits_32; inline;
  121343. begin
  121344. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121345. end;
  121346. procedure TCAN2_C2FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  121347. begin
  121348. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  121349. end;
  121350. function TCAN2_C2FIFOCI31.getCFIFOCI : TBits_5; inline;
  121351. begin
  121352. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  121353. end;
  121354. procedure TCAN2_C2FIFOCI31.setw(thebits : TBits_32); inline;
  121355. begin
  121356. pTDefRegMap(@Self)^.val := thebits;
  121357. end;
  121358. function TCAN2_C2FIFOCI31.getw : TBits_32; inline;
  121359. begin
  121360. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121361. end;
  121362. procedure TDEVCFG_DEVCFG3.setUSERID(thebits : TBits_16); inline;
  121363. begin
  121364. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  121365. end;
  121366. function TDEVCFG_DEVCFG3.getUSERID : TBits_16; inline;
  121367. begin
  121368. getUSERID := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  121369. end;
  121370. procedure TDEVCFG_DEVCFG3.setFSRSSEL(thebits : TBits_3); inline;
  121371. begin
  121372. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  121373. end;
  121374. function TDEVCFG_DEVCFG3.getFSRSSEL : TBits_3; inline;
  121375. begin
  121376. getFSRSSEL := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  121377. end;
  121378. procedure TDEVCFG_DEVCFG3.setFMIIEN; inline;
  121379. begin
  121380. pTDefRegMap(@Self)^.&set := $01000000;
  121381. end;
  121382. procedure TDEVCFG_DEVCFG3.clearFMIIEN; inline;
  121383. begin
  121384. pTDefRegMap(@Self)^.clr := $01000000;
  121385. end;
  121386. procedure TDEVCFG_DEVCFG3.setFMIIEN(thebits : TBits_1); inline;
  121387. begin
  121388. if thebits = 0 then
  121389. pTDefRegMap(@Self)^.clr := $01000000
  121390. else
  121391. pTDefRegMap(@Self)^.&set := $01000000;
  121392. end;
  121393. function TDEVCFG_DEVCFG3.getFMIIEN : TBits_1; inline;
  121394. begin
  121395. getFMIIEN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  121396. end;
  121397. procedure TDEVCFG_DEVCFG3.setFETHIO; inline;
  121398. begin
  121399. pTDefRegMap(@Self)^.&set := $02000000;
  121400. end;
  121401. procedure TDEVCFG_DEVCFG3.clearFETHIO; inline;
  121402. begin
  121403. pTDefRegMap(@Self)^.clr := $02000000;
  121404. end;
  121405. procedure TDEVCFG_DEVCFG3.setFETHIO(thebits : TBits_1); inline;
  121406. begin
  121407. if thebits = 0 then
  121408. pTDefRegMap(@Self)^.clr := $02000000
  121409. else
  121410. pTDefRegMap(@Self)^.&set := $02000000;
  121411. end;
  121412. function TDEVCFG_DEVCFG3.getFETHIO : TBits_1; inline;
  121413. begin
  121414. getFETHIO := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  121415. end;
  121416. procedure TDEVCFG_DEVCFG3.setFCANIO; inline;
  121417. begin
  121418. pTDefRegMap(@Self)^.&set := $04000000;
  121419. end;
  121420. procedure TDEVCFG_DEVCFG3.clearFCANIO; inline;
  121421. begin
  121422. pTDefRegMap(@Self)^.clr := $04000000;
  121423. end;
  121424. procedure TDEVCFG_DEVCFG3.setFCANIO(thebits : TBits_1); inline;
  121425. begin
  121426. if thebits = 0 then
  121427. pTDefRegMap(@Self)^.clr := $04000000
  121428. else
  121429. pTDefRegMap(@Self)^.&set := $04000000;
  121430. end;
  121431. function TDEVCFG_DEVCFG3.getFCANIO : TBits_1; inline;
  121432. begin
  121433. getFCANIO := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  121434. end;
  121435. procedure TDEVCFG_DEVCFG3.setFUSBIDIO; inline;
  121436. begin
  121437. pTDefRegMap(@Self)^.&set := $40000000;
  121438. end;
  121439. procedure TDEVCFG_DEVCFG3.clearFUSBIDIO; inline;
  121440. begin
  121441. pTDefRegMap(@Self)^.clr := $40000000;
  121442. end;
  121443. procedure TDEVCFG_DEVCFG3.setFUSBIDIO(thebits : TBits_1); inline;
  121444. begin
  121445. if thebits = 0 then
  121446. pTDefRegMap(@Self)^.clr := $40000000
  121447. else
  121448. pTDefRegMap(@Self)^.&set := $40000000;
  121449. end;
  121450. function TDEVCFG_DEVCFG3.getFUSBIDIO : TBits_1; inline;
  121451. begin
  121452. getFUSBIDIO := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  121453. end;
  121454. procedure TDEVCFG_DEVCFG3.setFVBUSONIO; inline;
  121455. begin
  121456. pTDefRegMap(@Self)^.&set := $80000000;
  121457. end;
  121458. procedure TDEVCFG_DEVCFG3.clearFVBUSONIO; inline;
  121459. begin
  121460. pTDefRegMap(@Self)^.clr := $80000000;
  121461. end;
  121462. procedure TDEVCFG_DEVCFG3.setFVBUSONIO(thebits : TBits_1); inline;
  121463. begin
  121464. if thebits = 0 then
  121465. pTDefRegMap(@Self)^.clr := $80000000
  121466. else
  121467. pTDefRegMap(@Self)^.&set := $80000000;
  121468. end;
  121469. function TDEVCFG_DEVCFG3.getFVBUSONIO : TBits_1; inline;
  121470. begin
  121471. getFVBUSONIO := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  121472. end;
  121473. procedure TDEVCFG_DEVCFG3.setw(thebits : TBits_32); inline;
  121474. begin
  121475. pTDefRegMap(@Self)^.val := thebits;
  121476. end;
  121477. function TDEVCFG_DEVCFG3.getw : TBits_32; inline;
  121478. begin
  121479. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121480. end;
  121481. procedure TDEVCFG_DEVCFG2.setFPLLIDIV(thebits : TBits_3); inline;
  121482. begin
  121483. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  121484. end;
  121485. function TDEVCFG_DEVCFG2.getFPLLIDIV : TBits_3; inline;
  121486. begin
  121487. getFPLLIDIV := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  121488. end;
  121489. procedure TDEVCFG_DEVCFG2.setFPLLMUL(thebits : TBits_3); inline;
  121490. begin
  121491. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  121492. end;
  121493. function TDEVCFG_DEVCFG2.getFPLLMUL : TBits_3; inline;
  121494. begin
  121495. getFPLLMUL := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  121496. end;
  121497. procedure TDEVCFG_DEVCFG2.setUPLLIDIV(thebits : TBits_3); inline;
  121498. begin
  121499. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  121500. end;
  121501. function TDEVCFG_DEVCFG2.getUPLLIDIV : TBits_3; inline;
  121502. begin
  121503. getUPLLIDIV := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  121504. end;
  121505. procedure TDEVCFG_DEVCFG2.setUPLLEN; inline;
  121506. begin
  121507. pTDefRegMap(@Self)^.&set := $00008000;
  121508. end;
  121509. procedure TDEVCFG_DEVCFG2.clearUPLLEN; inline;
  121510. begin
  121511. pTDefRegMap(@Self)^.clr := $00008000;
  121512. end;
  121513. procedure TDEVCFG_DEVCFG2.setUPLLEN(thebits : TBits_1); inline;
  121514. begin
  121515. if thebits = 0 then
  121516. pTDefRegMap(@Self)^.clr := $00008000
  121517. else
  121518. pTDefRegMap(@Self)^.&set := $00008000;
  121519. end;
  121520. function TDEVCFG_DEVCFG2.getUPLLEN : TBits_1; inline;
  121521. begin
  121522. getUPLLEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  121523. end;
  121524. procedure TDEVCFG_DEVCFG2.setFPLLODIV(thebits : TBits_3); inline;
  121525. begin
  121526. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  121527. end;
  121528. function TDEVCFG_DEVCFG2.getFPLLODIV : TBits_3; inline;
  121529. begin
  121530. getFPLLODIV := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  121531. end;
  121532. procedure TDEVCFG_DEVCFG2.setw(thebits : TBits_32); inline;
  121533. begin
  121534. pTDefRegMap(@Self)^.val := thebits;
  121535. end;
  121536. function TDEVCFG_DEVCFG2.getw : TBits_32; inline;
  121537. begin
  121538. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121539. end;
  121540. procedure TDEVCFG_DEVCFG1.setFNOSC(thebits : TBits_3); inline;
  121541. begin
  121542. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  121543. end;
  121544. function TDEVCFG_DEVCFG1.getFNOSC : TBits_3; inline;
  121545. begin
  121546. getFNOSC := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  121547. end;
  121548. procedure TDEVCFG_DEVCFG1.setFSOSCEN; inline;
  121549. begin
  121550. pTDefRegMap(@Self)^.&set := $00000020;
  121551. end;
  121552. procedure TDEVCFG_DEVCFG1.clearFSOSCEN; inline;
  121553. begin
  121554. pTDefRegMap(@Self)^.clr := $00000020;
  121555. end;
  121556. procedure TDEVCFG_DEVCFG1.setFSOSCEN(thebits : TBits_1); inline;
  121557. begin
  121558. if thebits = 0 then
  121559. pTDefRegMap(@Self)^.clr := $00000020
  121560. else
  121561. pTDefRegMap(@Self)^.&set := $00000020;
  121562. end;
  121563. function TDEVCFG_DEVCFG1.getFSOSCEN : TBits_1; inline;
  121564. begin
  121565. getFSOSCEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  121566. end;
  121567. procedure TDEVCFG_DEVCFG1.setIESO; inline;
  121568. begin
  121569. pTDefRegMap(@Self)^.&set := $00000080;
  121570. end;
  121571. procedure TDEVCFG_DEVCFG1.clearIESO; inline;
  121572. begin
  121573. pTDefRegMap(@Self)^.clr := $00000080;
  121574. end;
  121575. procedure TDEVCFG_DEVCFG1.setIESO(thebits : TBits_1); inline;
  121576. begin
  121577. if thebits = 0 then
  121578. pTDefRegMap(@Self)^.clr := $00000080
  121579. else
  121580. pTDefRegMap(@Self)^.&set := $00000080;
  121581. end;
  121582. function TDEVCFG_DEVCFG1.getIESO : TBits_1; inline;
  121583. begin
  121584. getIESO := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  121585. end;
  121586. procedure TDEVCFG_DEVCFG1.setPOSCMOD(thebits : TBits_2); inline;
  121587. begin
  121588. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  121589. end;
  121590. function TDEVCFG_DEVCFG1.getPOSCMOD : TBits_2; inline;
  121591. begin
  121592. getPOSCMOD := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  121593. end;
  121594. procedure TDEVCFG_DEVCFG1.setOSCIOFNC; inline;
  121595. begin
  121596. pTDefRegMap(@Self)^.&set := $00000400;
  121597. end;
  121598. procedure TDEVCFG_DEVCFG1.clearOSCIOFNC; inline;
  121599. begin
  121600. pTDefRegMap(@Self)^.clr := $00000400;
  121601. end;
  121602. procedure TDEVCFG_DEVCFG1.setOSCIOFNC(thebits : TBits_1); inline;
  121603. begin
  121604. if thebits = 0 then
  121605. pTDefRegMap(@Self)^.clr := $00000400
  121606. else
  121607. pTDefRegMap(@Self)^.&set := $00000400;
  121608. end;
  121609. function TDEVCFG_DEVCFG1.getOSCIOFNC : TBits_1; inline;
  121610. begin
  121611. getOSCIOFNC := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  121612. end;
  121613. procedure TDEVCFG_DEVCFG1.setFPBDIV(thebits : TBits_2); inline;
  121614. begin
  121615. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFCFFF or ( thebits shl 12 );
  121616. end;
  121617. function TDEVCFG_DEVCFG1.getFPBDIV : TBits_2; inline;
  121618. begin
  121619. getFPBDIV := (pTDefRegMap(@Self)^.val and $00003000) shr 12;
  121620. end;
  121621. procedure TDEVCFG_DEVCFG1.setFCKSM(thebits : TBits_2); inline;
  121622. begin
  121623. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  121624. end;
  121625. function TDEVCFG_DEVCFG1.getFCKSM : TBits_2; inline;
  121626. begin
  121627. getFCKSM := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  121628. end;
  121629. procedure TDEVCFG_DEVCFG1.setWDTPS(thebits : TBits_5); inline;
  121630. begin
  121631. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  121632. end;
  121633. function TDEVCFG_DEVCFG1.getWDTPS : TBits_5; inline;
  121634. begin
  121635. getWDTPS := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  121636. end;
  121637. procedure TDEVCFG_DEVCFG1.setFWDTEN; inline;
  121638. begin
  121639. pTDefRegMap(@Self)^.&set := $00800000;
  121640. end;
  121641. procedure TDEVCFG_DEVCFG1.clearFWDTEN; inline;
  121642. begin
  121643. pTDefRegMap(@Self)^.clr := $00800000;
  121644. end;
  121645. procedure TDEVCFG_DEVCFG1.setFWDTEN(thebits : TBits_1); inline;
  121646. begin
  121647. if thebits = 0 then
  121648. pTDefRegMap(@Self)^.clr := $00800000
  121649. else
  121650. pTDefRegMap(@Self)^.&set := $00800000;
  121651. end;
  121652. function TDEVCFG_DEVCFG1.getFWDTEN : TBits_1; inline;
  121653. begin
  121654. getFWDTEN := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  121655. end;
  121656. procedure TDEVCFG_DEVCFG1.setw(thebits : TBits_32); inline;
  121657. begin
  121658. pTDefRegMap(@Self)^.val := thebits;
  121659. end;
  121660. function TDEVCFG_DEVCFG1.getw : TBits_32; inline;
  121661. begin
  121662. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121663. end;
  121664. procedure TDEVCFG_DEVCFG0.setDEBUG(thebits : TBits_2); inline;
  121665. begin
  121666. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  121667. end;
  121668. function TDEVCFG_DEVCFG0.getDEBUG : TBits_2; inline;
  121669. begin
  121670. getDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  121671. end;
  121672. procedure TDEVCFG_DEVCFG0.setICESEL; inline;
  121673. begin
  121674. pTDefRegMap(@Self)^.&set := $00000008;
  121675. end;
  121676. procedure TDEVCFG_DEVCFG0.clearICESEL; inline;
  121677. begin
  121678. pTDefRegMap(@Self)^.clr := $00000008;
  121679. end;
  121680. procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_1); inline;
  121681. begin
  121682. if thebits = 0 then
  121683. pTDefRegMap(@Self)^.clr := $00000008
  121684. else
  121685. pTDefRegMap(@Self)^.&set := $00000008;
  121686. end;
  121687. function TDEVCFG_DEVCFG0.getICESEL : TBits_1; inline;
  121688. begin
  121689. getICESEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  121690. end;
  121691. procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_8); inline;
  121692. begin
  121693. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF00FFF or ( thebits shl 12 );
  121694. end;
  121695. function TDEVCFG_DEVCFG0.getPWP : TBits_8; inline;
  121696. begin
  121697. getPWP := (pTDefRegMap(@Self)^.val and $000FF000) shr 12;
  121698. end;
  121699. procedure TDEVCFG_DEVCFG0.setBWP; inline;
  121700. begin
  121701. pTDefRegMap(@Self)^.&set := $01000000;
  121702. end;
  121703. procedure TDEVCFG_DEVCFG0.clearBWP; inline;
  121704. begin
  121705. pTDefRegMap(@Self)^.clr := $01000000;
  121706. end;
  121707. procedure TDEVCFG_DEVCFG0.setBWP(thebits : TBits_1); inline;
  121708. begin
  121709. if thebits = 0 then
  121710. pTDefRegMap(@Self)^.clr := $01000000
  121711. else
  121712. pTDefRegMap(@Self)^.&set := $01000000;
  121713. end;
  121714. function TDEVCFG_DEVCFG0.getBWP : TBits_1; inline;
  121715. begin
  121716. getBWP := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  121717. end;
  121718. procedure TDEVCFG_DEVCFG0.setCP; inline;
  121719. begin
  121720. pTDefRegMap(@Self)^.&set := $10000000;
  121721. end;
  121722. procedure TDEVCFG_DEVCFG0.clearCP; inline;
  121723. begin
  121724. pTDefRegMap(@Self)^.clr := $10000000;
  121725. end;
  121726. procedure TDEVCFG_DEVCFG0.setCP(thebits : TBits_1); inline;
  121727. begin
  121728. if thebits = 0 then
  121729. pTDefRegMap(@Self)^.clr := $10000000
  121730. else
  121731. pTDefRegMap(@Self)^.&set := $10000000;
  121732. end;
  121733. function TDEVCFG_DEVCFG0.getCP : TBits_1; inline;
  121734. begin
  121735. getCP := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  121736. end;
  121737. procedure TDEVCFG_DEVCFG0.setFDEBUG(thebits : TBits_2); inline;
  121738. begin
  121739. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  121740. end;
  121741. function TDEVCFG_DEVCFG0.getFDEBUG : TBits_2; inline;
  121742. begin
  121743. getFDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  121744. end;
  121745. procedure TDEVCFG_DEVCFG0.setw(thebits : TBits_32); inline;
  121746. begin
  121747. pTDefRegMap(@Self)^.val := thebits;
  121748. end;
  121749. function TDEVCFG_DEVCFG0.getw : TBits_32; inline;
  121750. begin
  121751. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  121752. end;
  121753. procedure _CORE_TIMER_VECTOR_interrupt; external name '_CORE_TIMER_VECTOR_interrupt';
  121754. procedure _CORE_SOFTWARE_0_VECTOR_interrupt; external name '_CORE_SOFTWARE_0_VECTOR_interrupt';
  121755. procedure _CORE_SOFTWARE_1_VECTOR_interrupt; external name '_CORE_SOFTWARE_1_VECTOR_interrupt';
  121756. procedure _EXTERNAL_0_VECTOR_interrupt; external name '_EXTERNAL_0_VECTOR_interrupt';
  121757. procedure _TIMER_1_VECTOR_interrupt; external name '_TIMER_1_VECTOR_interrupt';
  121758. procedure _INPUT_CAPTURE_1_VECTOR_interrupt; external name '_INPUT_CAPTURE_1_VECTOR_interrupt';
  121759. procedure _OUTPUT_COMPARE_1_VECTOR_interrupt; external name '_OUTPUT_COMPARE_1_VECTOR_interrupt';
  121760. procedure _EXTERNAL_1_VECTOR_interrupt; external name '_EXTERNAL_1_VECTOR_interrupt';
  121761. procedure _TIMER_2_VECTOR_interrupt; external name '_TIMER_2_VECTOR_interrupt';
  121762. procedure _INPUT_CAPTURE_2_VECTOR_interrupt; external name '_INPUT_CAPTURE_2_VECTOR_interrupt';
  121763. procedure _OUTPUT_COMPARE_2_VECTOR_interrupt; external name '_OUTPUT_COMPARE_2_VECTOR_interrupt';
  121764. procedure _EXTERNAL_2_VECTOR_interrupt; external name '_EXTERNAL_2_VECTOR_interrupt';
  121765. procedure _TIMER_3_VECTOR_interrupt; external name '_TIMER_3_VECTOR_interrupt';
  121766. procedure _INPUT_CAPTURE_3_VECTOR_interrupt; external name '_INPUT_CAPTURE_3_VECTOR_interrupt';
  121767. procedure _OUTPUT_COMPARE_3_VECTOR_interrupt; external name '_OUTPUT_COMPARE_3_VECTOR_interrupt';
  121768. procedure _EXTERNAL_3_VECTOR_interrupt; external name '_EXTERNAL_3_VECTOR_interrupt';
  121769. procedure _TIMER_4_VECTOR_interrupt; external name '_TIMER_4_VECTOR_interrupt';
  121770. procedure _INPUT_CAPTURE_4_VECTOR_interrupt; external name '_INPUT_CAPTURE_4_VECTOR_interrupt';
  121771. procedure _OUTPUT_COMPARE_4_VECTOR_interrupt; external name '_OUTPUT_COMPARE_4_VECTOR_interrupt';
  121772. procedure _EXTERNAL_4_VECTOR_interrupt; external name '_EXTERNAL_4_VECTOR_interrupt';
  121773. procedure _TIMER_5_VECTOR_interrupt; external name '_TIMER_5_VECTOR_interrupt';
  121774. procedure _INPUT_CAPTURE_5_VECTOR_interrupt; external name '_INPUT_CAPTURE_5_VECTOR_interrupt';
  121775. procedure _OUTPUT_COMPARE_5_VECTOR_interrupt; external name '_OUTPUT_COMPARE_5_VECTOR_interrupt';
  121776. procedure _SPI_1_VECTOR_interrupt; external name '_SPI_1_VECTOR_interrupt';
  121777. procedure _SPI_1A_VECTOR_interrupt; external name '_SPI_1A_VECTOR_interrupt';
  121778. procedure _UART_1_VECTOR_interrupt; external name '_UART_1_VECTOR_interrupt';
  121779. procedure _UART_1A_VECTOR_interrupt; external name '_UART_1A_VECTOR_interrupt';
  121780. procedure _I2C_3_VECTOR_interrupt; external name '_I2C_3_VECTOR_interrupt';
  121781. procedure _I2C_1A_VECTOR_interrupt; external name '_I2C_1A_VECTOR_interrupt';
  121782. procedure _SPI_3_VECTOR_interrupt; external name '_SPI_3_VECTOR_interrupt';
  121783. procedure _I2C_1_VECTOR_interrupt; external name '_I2C_1_VECTOR_interrupt';
  121784. procedure _CHANGE_NOTICE_VECTOR_interrupt; external name '_CHANGE_NOTICE_VECTOR_interrupt';
  121785. procedure _ADC_VECTOR_interrupt; external name '_ADC_VECTOR_interrupt';
  121786. procedure _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
  121787. procedure _COMPARATOR_1_VECTOR_interrupt; external name '_COMPARATOR_1_VECTOR_interrupt';
  121788. procedure _COMPARATOR_2_VECTOR_interrupt; external name '_COMPARATOR_2_VECTOR_interrupt';
  121789. procedure _SPI_2A_VECTOR_interrupt; external name '_SPI_2A_VECTOR_interrupt';
  121790. procedure _UART_3_VECTOR_interrupt; external name '_UART_3_VECTOR_interrupt';
  121791. procedure _UART_2A_VECTOR_interrupt; external name '_UART_2A_VECTOR_interrupt';
  121792. procedure _I2C_4_VECTOR_interrupt; external name '_I2C_4_VECTOR_interrupt';
  121793. procedure _I2C_2A_VECTOR_interrupt; external name '_I2C_2A_VECTOR_interrupt';
  121794. procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
  121795. procedure _SPI_3A_VECTOR_interrupt; external name '_SPI_3A_VECTOR_interrupt';
  121796. procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
  121797. procedure _UART_3A_VECTOR_interrupt; external name '_UART_3A_VECTOR_interrupt';
  121798. procedure _I2C_5_VECTOR_interrupt; external name '_I2C_5_VECTOR_interrupt';
  121799. procedure _I2C_3A_VECTOR_interrupt; external name '_I2C_3A_VECTOR_interrupt';
  121800. procedure _SPI_4_VECTOR_interrupt; external name '_SPI_4_VECTOR_interrupt';
  121801. procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
  121802. procedure _FAIL_SAFE_MONITOR_VECTOR_interrupt; external name '_FAIL_SAFE_MONITOR_VECTOR_interrupt';
  121803. procedure _RTCC_VECTOR_interrupt; external name '_RTCC_VECTOR_interrupt';
  121804. procedure _DMA_0_VECTOR_interrupt; external name '_DMA_0_VECTOR_interrupt';
  121805. procedure _DMA_1_VECTOR_interrupt; external name '_DMA_1_VECTOR_interrupt';
  121806. procedure _DMA_2_VECTOR_interrupt; external name '_DMA_2_VECTOR_interrupt';
  121807. procedure _DMA_3_VECTOR_interrupt; external name '_DMA_3_VECTOR_interrupt';
  121808. procedure _DMA_4_VECTOR_interrupt; external name '_DMA_4_VECTOR_interrupt';
  121809. procedure _DMA_5_VECTOR_interrupt; external name '_DMA_5_VECTOR_interrupt';
  121810. procedure _DMA_6_VECTOR_interrupt; external name '_DMA_6_VECTOR_interrupt';
  121811. procedure _DMA_7_VECTOR_interrupt; external name '_DMA_7_VECTOR_interrupt';
  121812. procedure _FCE_VECTOR_interrupt; external name '_FCE_VECTOR_interrupt';
  121813. procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
  121814. procedure _CAN_1_VECTOR_interrupt; external name '_CAN_1_VECTOR_interrupt';
  121815. procedure _CAN_2_VECTOR_interrupt; external name '_CAN_2_VECTOR_interrupt';
  121816. procedure _ETH_VECTOR_interrupt; external name '_ETH_VECTOR_interrupt';
  121817. procedure _UART_1B_VECTOR_interrupt; external name '_UART_1B_VECTOR_interrupt';
  121818. procedure _UART_4_VECTOR_interrupt; external name '_UART_4_VECTOR_interrupt';
  121819. procedure _UART_2B_VECTOR_interrupt; external name '_UART_2B_VECTOR_interrupt';
  121820. procedure _UART_6_VECTOR_interrupt; external name '_UART_6_VECTOR_interrupt';
  121821. procedure _UART_3B_VECTOR_interrupt; external name '_UART_3B_VECTOR_interrupt';
  121822. procedure _UART_5_VECTOR_interrupt; external name '_UART_5_VECTOR_interrupt';
  121823. procedure Vectors; assembler; nostackframe;
  121824. label interrupt_vectors;
  121825. asm
  121826. .section ".init.interrupt_vectors,\"ax\",@progbits"
  121827. interrupt_vectors:
  121828. j _CORE_TIMER_VECTOR_interrupt
  121829. nop
  121830. nop
  121831. nop
  121832. nop
  121833. nop
  121834. nop
  121835. nop
  121836. j _CORE_SOFTWARE_0_VECTOR_interrupt
  121837. nop
  121838. nop
  121839. nop
  121840. nop
  121841. nop
  121842. nop
  121843. nop
  121844. j _CORE_SOFTWARE_1_VECTOR_interrupt
  121845. nop
  121846. nop
  121847. nop
  121848. nop
  121849. nop
  121850. nop
  121851. nop
  121852. j _EXTERNAL_0_VECTOR_interrupt
  121853. nop
  121854. nop
  121855. nop
  121856. nop
  121857. nop
  121858. nop
  121859. nop
  121860. j _TIMER_1_VECTOR_interrupt
  121861. nop
  121862. nop
  121863. nop
  121864. nop
  121865. nop
  121866. nop
  121867. nop
  121868. j _INPUT_CAPTURE_1_VECTOR_interrupt
  121869. nop
  121870. nop
  121871. nop
  121872. nop
  121873. nop
  121874. nop
  121875. nop
  121876. j _OUTPUT_COMPARE_1_VECTOR_interrupt
  121877. nop
  121878. nop
  121879. nop
  121880. nop
  121881. nop
  121882. nop
  121883. nop
  121884. j _EXTERNAL_1_VECTOR_interrupt
  121885. nop
  121886. nop
  121887. nop
  121888. nop
  121889. nop
  121890. nop
  121891. nop
  121892. j _TIMER_2_VECTOR_interrupt
  121893. nop
  121894. nop
  121895. nop
  121896. nop
  121897. nop
  121898. nop
  121899. nop
  121900. j _INPUT_CAPTURE_2_VECTOR_interrupt
  121901. nop
  121902. nop
  121903. nop
  121904. nop
  121905. nop
  121906. nop
  121907. nop
  121908. j _OUTPUT_COMPARE_2_VECTOR_interrupt
  121909. nop
  121910. nop
  121911. nop
  121912. nop
  121913. nop
  121914. nop
  121915. nop
  121916. j _EXTERNAL_2_VECTOR_interrupt
  121917. nop
  121918. nop
  121919. nop
  121920. nop
  121921. nop
  121922. nop
  121923. nop
  121924. j _TIMER_3_VECTOR_interrupt
  121925. nop
  121926. nop
  121927. nop
  121928. nop
  121929. nop
  121930. nop
  121931. nop
  121932. j _INPUT_CAPTURE_3_VECTOR_interrupt
  121933. nop
  121934. nop
  121935. nop
  121936. nop
  121937. nop
  121938. nop
  121939. nop
  121940. j _OUTPUT_COMPARE_3_VECTOR_interrupt
  121941. nop
  121942. nop
  121943. nop
  121944. nop
  121945. nop
  121946. nop
  121947. nop
  121948. j _EXTERNAL_3_VECTOR_interrupt
  121949. nop
  121950. nop
  121951. nop
  121952. nop
  121953. nop
  121954. nop
  121955. nop
  121956. j _TIMER_4_VECTOR_interrupt
  121957. nop
  121958. nop
  121959. nop
  121960. nop
  121961. nop
  121962. nop
  121963. nop
  121964. j _INPUT_CAPTURE_4_VECTOR_interrupt
  121965. nop
  121966. nop
  121967. nop
  121968. nop
  121969. nop
  121970. nop
  121971. nop
  121972. j _OUTPUT_COMPARE_4_VECTOR_interrupt
  121973. nop
  121974. nop
  121975. nop
  121976. nop
  121977. nop
  121978. nop
  121979. nop
  121980. j _EXTERNAL_4_VECTOR_interrupt
  121981. nop
  121982. nop
  121983. nop
  121984. nop
  121985. nop
  121986. nop
  121987. nop
  121988. j _TIMER_5_VECTOR_interrupt
  121989. nop
  121990. nop
  121991. nop
  121992. nop
  121993. nop
  121994. nop
  121995. nop
  121996. j _INPUT_CAPTURE_5_VECTOR_interrupt
  121997. nop
  121998. nop
  121999. nop
  122000. nop
  122001. nop
  122002. nop
  122003. nop
  122004. j _OUTPUT_COMPARE_5_VECTOR_interrupt
  122005. nop
  122006. nop
  122007. nop
  122008. nop
  122009. nop
  122010. nop
  122011. nop
  122012. j _SPI_1_VECTOR_interrupt
  122013. nop
  122014. nop
  122015. nop
  122016. nop
  122017. nop
  122018. nop
  122019. nop
  122020. j _SPI_1A_VECTOR_interrupt
  122021. nop
  122022. nop
  122023. nop
  122024. nop
  122025. nop
  122026. nop
  122027. nop
  122028. j _I2C_1_VECTOR_interrupt
  122029. nop
  122030. nop
  122031. nop
  122032. nop
  122033. nop
  122034. nop
  122035. nop
  122036. j _CHANGE_NOTICE_VECTOR_interrupt
  122037. nop
  122038. nop
  122039. nop
  122040. nop
  122041. nop
  122042. nop
  122043. nop
  122044. j _ADC_VECTOR_interrupt
  122045. nop
  122046. nop
  122047. nop
  122048. nop
  122049. nop
  122050. nop
  122051. nop
  122052. j _PMP_VECTOR_interrupt
  122053. nop
  122054. nop
  122055. nop
  122056. nop
  122057. nop
  122058. nop
  122059. nop
  122060. j _COMPARATOR_1_VECTOR_interrupt
  122061. nop
  122062. nop
  122063. nop
  122064. nop
  122065. nop
  122066. nop
  122067. nop
  122068. j _COMPARATOR_2_VECTOR_interrupt
  122069. nop
  122070. nop
  122071. nop
  122072. nop
  122073. nop
  122074. nop
  122075. nop
  122076. j _SPI_2A_VECTOR_interrupt
  122077. nop
  122078. nop
  122079. nop
  122080. nop
  122081. nop
  122082. nop
  122083. nop
  122084. j _SPI_3A_VECTOR_interrupt
  122085. nop
  122086. nop
  122087. nop
  122088. nop
  122089. nop
  122090. nop
  122091. nop
  122092. j _I2C_2_VECTOR_interrupt
  122093. nop
  122094. nop
  122095. nop
  122096. nop
  122097. nop
  122098. nop
  122099. nop
  122100. j _FAIL_SAFE_MONITOR_VECTOR_interrupt
  122101. nop
  122102. nop
  122103. nop
  122104. nop
  122105. nop
  122106. nop
  122107. nop
  122108. j _RTCC_VECTOR_interrupt
  122109. nop
  122110. nop
  122111. nop
  122112. nop
  122113. nop
  122114. nop
  122115. nop
  122116. j _DMA_0_VECTOR_interrupt
  122117. nop
  122118. nop
  122119. nop
  122120. nop
  122121. nop
  122122. nop
  122123. nop
  122124. j _DMA_1_VECTOR_interrupt
  122125. nop
  122126. nop
  122127. nop
  122128. nop
  122129. nop
  122130. nop
  122131. nop
  122132. j _DMA_2_VECTOR_interrupt
  122133. nop
  122134. nop
  122135. nop
  122136. nop
  122137. nop
  122138. nop
  122139. nop
  122140. j _DMA_3_VECTOR_interrupt
  122141. nop
  122142. nop
  122143. nop
  122144. nop
  122145. nop
  122146. nop
  122147. nop
  122148. j _DMA_4_VECTOR_interrupt
  122149. nop
  122150. nop
  122151. nop
  122152. nop
  122153. nop
  122154. nop
  122155. nop
  122156. j _DMA_5_VECTOR_interrupt
  122157. nop
  122158. nop
  122159. nop
  122160. nop
  122161. nop
  122162. nop
  122163. nop
  122164. j _DMA_6_VECTOR_interrupt
  122165. nop
  122166. nop
  122167. nop
  122168. nop
  122169. nop
  122170. nop
  122171. nop
  122172. j _DMA_7_VECTOR_interrupt
  122173. nop
  122174. nop
  122175. nop
  122176. nop
  122177. nop
  122178. nop
  122179. nop
  122180. j _FCE_VECTOR_interrupt
  122181. nop
  122182. nop
  122183. nop
  122184. nop
  122185. nop
  122186. nop
  122187. nop
  122188. j _USB_1_VECTOR_interrupt
  122189. nop
  122190. nop
  122191. nop
  122192. nop
  122193. nop
  122194. nop
  122195. nop
  122196. j _CAN_1_VECTOR_interrupt
  122197. nop
  122198. nop
  122199. nop
  122200. nop
  122201. nop
  122202. nop
  122203. nop
  122204. j _CAN_2_VECTOR_interrupt
  122205. nop
  122206. nop
  122207. nop
  122208. nop
  122209. nop
  122210. nop
  122211. nop
  122212. j _ETH_VECTOR_interrupt
  122213. nop
  122214. nop
  122215. nop
  122216. nop
  122217. nop
  122218. nop
  122219. nop
  122220. j _UART_1B_VECTOR_interrupt
  122221. nop
  122222. nop
  122223. nop
  122224. nop
  122225. nop
  122226. nop
  122227. nop
  122228. j _UART_2B_VECTOR_interrupt
  122229. nop
  122230. nop
  122231. nop
  122232. nop
  122233. nop
  122234. nop
  122235. nop
  122236. j _UART_3B_VECTOR_interrupt
  122237. nop
  122238. nop
  122239. nop
  122240. nop
  122241. nop
  122242. nop
  122243. nop
  122244. .weak _CORE_TIMER_VECTOR_interrupt
  122245. .weak _CORE_SOFTWARE_0_VECTOR_interrupt
  122246. .weak _CORE_SOFTWARE_1_VECTOR_interrupt
  122247. .weak _EXTERNAL_0_VECTOR_interrupt
  122248. .weak _TIMER_1_VECTOR_interrupt
  122249. .weak _INPUT_CAPTURE_1_VECTOR_interrupt
  122250. .weak _OUTPUT_COMPARE_1_VECTOR_interrupt
  122251. .weak _EXTERNAL_1_VECTOR_interrupt
  122252. .weak _TIMER_2_VECTOR_interrupt
  122253. .weak _INPUT_CAPTURE_2_VECTOR_interrupt
  122254. .weak _OUTPUT_COMPARE_2_VECTOR_interrupt
  122255. .weak _EXTERNAL_2_VECTOR_interrupt
  122256. .weak _TIMER_3_VECTOR_interrupt
  122257. .weak _INPUT_CAPTURE_3_VECTOR_interrupt
  122258. .weak _OUTPUT_COMPARE_3_VECTOR_interrupt
  122259. .weak _EXTERNAL_3_VECTOR_interrupt
  122260. .weak _TIMER_4_VECTOR_interrupt
  122261. .weak _INPUT_CAPTURE_4_VECTOR_interrupt
  122262. .weak _OUTPUT_COMPARE_4_VECTOR_interrupt
  122263. .weak _EXTERNAL_4_VECTOR_interrupt
  122264. .weak _TIMER_5_VECTOR_interrupt
  122265. .weak _INPUT_CAPTURE_5_VECTOR_interrupt
  122266. .weak _OUTPUT_COMPARE_5_VECTOR_interrupt
  122267. .weak _SPI_1_VECTOR_interrupt
  122268. .weak _SPI_1A_VECTOR_interrupt
  122269. .weak _UART_1_VECTOR_interrupt
  122270. .weak _UART_1A_VECTOR_interrupt
  122271. .weak _I2C_3_VECTOR_interrupt
  122272. .weak _I2C_1A_VECTOR_interrupt
  122273. .weak _SPI_3_VECTOR_interrupt
  122274. .weak _I2C_1_VECTOR_interrupt
  122275. .weak _CHANGE_NOTICE_VECTOR_interrupt
  122276. .weak _ADC_VECTOR_interrupt
  122277. .weak _PMP_VECTOR_interrupt
  122278. .weak _COMPARATOR_1_VECTOR_interrupt
  122279. .weak _COMPARATOR_2_VECTOR_interrupt
  122280. .weak _SPI_2A_VECTOR_interrupt
  122281. .weak _UART_3_VECTOR_interrupt
  122282. .weak _UART_2A_VECTOR_interrupt
  122283. .weak _I2C_4_VECTOR_interrupt
  122284. .weak _I2C_2A_VECTOR_interrupt
  122285. .weak _SPI_2_VECTOR_interrupt
  122286. .weak _SPI_3A_VECTOR_interrupt
  122287. .weak _UART_2_VECTOR_interrupt
  122288. .weak _UART_3A_VECTOR_interrupt
  122289. .weak _I2C_5_VECTOR_interrupt
  122290. .weak _I2C_3A_VECTOR_interrupt
  122291. .weak _SPI_4_VECTOR_interrupt
  122292. .weak _I2C_2_VECTOR_interrupt
  122293. .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
  122294. .weak _RTCC_VECTOR_interrupt
  122295. .weak _DMA_0_VECTOR_interrupt
  122296. .weak _DMA_1_VECTOR_interrupt
  122297. .weak _DMA_2_VECTOR_interrupt
  122298. .weak _DMA_3_VECTOR_interrupt
  122299. .weak _DMA_4_VECTOR_interrupt
  122300. .weak _DMA_5_VECTOR_interrupt
  122301. .weak _DMA_6_VECTOR_interrupt
  122302. .weak _DMA_7_VECTOR_interrupt
  122303. .weak _FCE_VECTOR_interrupt
  122304. .weak _USB_1_VECTOR_interrupt
  122305. .weak _CAN_1_VECTOR_interrupt
  122306. .weak _CAN_2_VECTOR_interrupt
  122307. .weak _ETH_VECTOR_interrupt
  122308. .weak _UART_1B_VECTOR_interrupt
  122309. .weak _UART_4_VECTOR_interrupt
  122310. .weak _UART_2B_VECTOR_interrupt
  122311. .weak _UART_6_VECTOR_interrupt
  122312. .weak _UART_3B_VECTOR_interrupt
  122313. .weak _UART_5_VECTOR_interrupt
  122314. .text
  122315. end;
  122316. end.