acme-005.awl 180 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631
  1. DATA_BLOCK DB 1
  2. AUTHOR :
  3. FAMILY : GRP_DB
  4. NAME : Gen_DB
  5. VERSION : 0.0
  6. STRUCT
  7. STAT0 : WORD ;
  8. STAT1 : BYTE ;
  9. STAT2 : BYTE ;
  10. STAT3 : INT ;
  11. STAT4 : INT ;
  12. STAT5 : INT ;
  13. STAT6 : INT ;
  14. STAT7 : INT ;
  15. STAT8 : INT ;
  16. STAT9 : INT ;
  17. STAT10 : INT ;
  18. STAT11 : INT ;
  19. STAT12 : INT ;
  20. STAT13 : INT ;
  21. STAT14 : INT ;
  22. STAT15 : INT ;
  23. STAT16 : INT ;
  24. STAT17 : INT ;
  25. STAT18 : INT ;
  26. STAT19 : INT ;
  27. STAT20 : INT ;
  28. STAT21 : INT ;
  29. STAT22 : INT ;
  30. STAT23 : INT ;
  31. STAT24 : REAL ;
  32. STAT25 : REAL ;
  33. STAT26 : REAL ;
  34. STAT27 : REAL ;
  35. STAT28 : REAL ;
  36. STAT29 : REAL ;
  37. STAT30 : REAL ;
  38. STAT31 : REAL ;
  39. STAT32 : REAL ;
  40. STAT33 : REAL ;
  41. STAT34 : REAL ;
  42. STAT35 : REAL ;
  43. STAT36 : REAL ;
  44. STAT37 : REAL ;
  45. STAT38 : REAL ;
  46. STAT39 : REAL ;
  47. STAT40 : REAL ;
  48. STAT41 : REAL ;
  49. STAT42 : REAL ;
  50. STAT43 : INT ;
  51. STAT44 : INT ;
  52. STAT45 : INT ;
  53. STAT46 : INT ;
  54. STAT47 : INT ;
  55. STAT48 : INT ;
  56. STAT49 : INT ;
  57. STAT50 : INT ;
  58. STAT51 : INT ;
  59. STAT52 : INT ;
  60. STAT53 : WORD ;
  61. STAT54 : WORD ;
  62. STAT55 : WORD ;
  63. STAT56 : REAL ;
  64. STAT57 : REAL ;
  65. STAT58 : REAL ;
  66. STAT59 : REAL ;
  67. STAT60 : REAL ;
  68. STAT61 : REAL ;
  69. STAT62 : REAL ;
  70. STAT63 : REAL ;
  71. STAT64 : REAL ;
  72. STAT65 : REAL ;
  73. STAT66 : REAL ;
  74. STAT67 : REAL ;
  75. STAT68 : REAL ;
  76. STAT69 : REAL ;
  77. STAT70 : REAL ;
  78. STAT71 : REAL ;
  79. STAT72 : REAL ;
  80. STAT73 : REAL ;
  81. STAT74 : REAL ;
  82. STAT75 : REAL ;
  83. END_STRUCT ;
  84. BEGIN
  85. STAT0 := W#16#0;
  86. STAT1 := B#16#0;
  87. STAT2 := B#16#0;
  88. STAT3 := 0;
  89. STAT4 := 2;
  90. STAT5 := 2;
  91. STAT6 := 0;
  92. STAT7 := 2;
  93. STAT8 := 0;
  94. STAT9 := 0;
  95. STAT10 := 0;
  96. STAT11 := 0;
  97. STAT12 := 0;
  98. STAT13 := 0;
  99. STAT14 := 0;
  100. STAT15 := 0;
  101. STAT16 := 0;
  102. STAT17 := 0;
  103. STAT18 := 0;
  104. STAT19 := 0;
  105. STAT20 := 0;
  106. STAT21 := 0;
  107. STAT22 := 0;
  108. STAT23 := 0;
  109. STAT24 := 0.000000e+000;
  110. STAT25 := 0.000000e+000;
  111. STAT26 := 0.000000e+000;
  112. STAT27 := 0.000000e+000;
  113. STAT28 := 0.000000e+000;
  114. STAT29 := 0.000000e+000;
  115. STAT30 := 0.000000e+000;
  116. STAT31 := 0.000000e+000;
  117. STAT32 := 0.000000e+000;
  118. STAT33 := 0.000000e+000;
  119. STAT34 := 0.000000e+000;
  120. STAT35 := 0.000000e+000;
  121. STAT36 := 0.000000e+000;
  122. STAT37 := 0.000000e+000;
  123. STAT38 := 0.000000e+000;
  124. STAT39 := 0.000000e+000;
  125. STAT40 := 0.000000e+000;
  126. STAT41 := 0.000000e+000;
  127. STAT42 := 0.000000e+000;
  128. STAT43 := 0;
  129. STAT44 := 0;
  130. STAT45 := 0;
  131. STAT46 := 0;
  132. STAT47 := 0;
  133. STAT48 := 0;
  134. STAT49 := 0;
  135. STAT50 := 0;
  136. STAT51 := 0;
  137. STAT52 := 0;
  138. STAT53 := W#16#0;
  139. STAT54 := W#16#0;
  140. STAT55 := W#16#0;
  141. STAT56 := 0.000000e+000;
  142. STAT57 := 0.000000e+000;
  143. STAT58 := 0.000000e+000;
  144. STAT59 := 0.000000e+000;
  145. STAT60 := 0.000000e+000;
  146. STAT61 := 0.000000e+000;
  147. STAT62 := 0.000000e+000;
  148. STAT63 := 0.000000e+000;
  149. STAT64 := 0.000000e+000;
  150. STAT65 := 0.000000e+000;
  151. STAT66 := 0.000000e+000;
  152. STAT67 := 0.000000e+000;
  153. STAT68 := 0.000000e+000;
  154. STAT69 := 0.000000e+000;
  155. STAT70 := 0.000000e+000;
  156. STAT71 := 0.000000e+000;
  157. STAT72 := 0.000000e+000;
  158. STAT73 := 0.000000e+000;
  159. STAT74 := 0.000000e+000;
  160. STAT75 := 0.000000e+000;
  161. END_DATA_BLOCK
  162. DATA_BLOCK DB 2
  163. AUTHOR :
  164. FAMILY : General
  165. NAME : Time_Val
  166. VERSION : 0.0
  167. STRUCT
  168. STAT0 : S5TIME ;
  169. STAT1 : S5TIME ;
  170. STAT2 : S5TIME ;
  171. STAT3 : S5TIME ;
  172. STAT4 : S5TIME ;
  173. STAT5 : S5TIME ;
  174. STAT6 : S5TIME ;
  175. STAT7 : S5TIME ;
  176. STAT8 : S5TIME ;
  177. STAT9 : S5TIME ;
  178. STAT10 : S5TIME ;
  179. STAT11 : S5TIME ;
  180. STAT12 : S5TIME ;
  181. STAT13 : S5TIME ;
  182. STAT14 : S5TIME ;
  183. STAT15 : S5TIME ;
  184. STAT16 : S5TIME ;
  185. STAT17 : S5TIME ;
  186. STAT18 : S5TIME ;
  187. STAT19 : S5TIME ;
  188. STAT20 : S5TIME ;
  189. STAT21 : S5TIME ;
  190. STAT22 : S5TIME ;
  191. STAT23 : S5TIME ;
  192. STAT24 : S5TIME ;
  193. STAT25 : S5TIME ;
  194. STAT26 : S5TIME ;
  195. STAT27 : S5TIME ;
  196. STAT28 : S5TIME ;
  197. STAT29 : S5TIME ;
  198. STAT30 : S5TIME ;
  199. STAT31 : S5TIME ;
  200. STAT32 : S5TIME ;
  201. STAT33 : S5TIME ;
  202. STAT34 : S5TIME ;
  203. STAT35 : S5TIME ;
  204. STAT36 : S5TIME ;
  205. STAT37 : S5TIME ;
  206. STAT38 : S5TIME ;
  207. STAT39 : S5TIME ;
  208. STAT40 : S5TIME ;
  209. STAT41 : S5TIME ;
  210. STAT42 : S5TIME ;
  211. STAT43 : S5TIME ;
  212. STAT44 : S5TIME ;
  213. STAT45 : S5TIME ;
  214. STAT46 : S5TIME ;
  215. STAT47 : S5TIME ;
  216. STAT48 : S5TIME ;
  217. STAT49 : S5TIME ;
  218. STAT50 : S5TIME ;
  219. STAT51 : S5TIME ;
  220. STAT52 : S5TIME ;
  221. STAT53 : S5TIME ;
  222. STAT54 : S5TIME ;
  223. STAT55 : S5TIME ;
  224. STAT56 : S5TIME ;
  225. STAT57 : S5TIME ;
  226. STAT58 : S5TIME ;
  227. STAT59 : S5TIME ;
  228. STAT60 : S5TIME ;
  229. STAT61 : S5TIME ;
  230. STAT62 : S5TIME ;
  231. STAT63 : S5TIME ;
  232. STAT64 : S5TIME ;
  233. STAT65 : S5TIME ;
  234. STAT66 : S5TIME ;
  235. STAT67 : S5TIME ;
  236. STAT68 : S5TIME ;
  237. STAT69 : S5TIME ;
  238. STAT70 : S5TIME ;
  239. STAT71 : S5TIME ;
  240. STAT72 : S5TIME ;
  241. STAT73 : S5TIME ;
  242. STAT74 : S5TIME ;
  243. STAT75 : S5TIME ;
  244. STAT76 : S5TIME ;
  245. STAT77 : S5TIME ;
  246. STAT78 : S5TIME ;
  247. STAT79 : S5TIME ;
  248. STAT80 : S5TIME ;
  249. STAT81 : S5TIME ;
  250. STAT82 : S5TIME ;
  251. STAT83 : S5TIME ;
  252. STAT84 : S5TIME ;
  253. STAT85 : S5TIME ;
  254. STAT86 : S5TIME ;
  255. STAT87 : S5TIME ;
  256. STAT88 : S5TIME ;
  257. STAT89 : S5TIME ;
  258. STAT90 : S5TIME ;
  259. STAT91 : S5TIME ;
  260. STAT92 : S5TIME ;
  261. STAT93 : S5TIME ;
  262. STAT94 : S5TIME ;
  263. STAT95 : S5TIME ;
  264. STAT96 : S5TIME ;
  265. STAT97 : S5TIME ;
  266. STAT98 : S5TIME ;
  267. STAT99 : S5TIME ;
  268. STAT100 : S5TIME ;
  269. STAT101 : S5TIME ;
  270. STAT102 : S5TIME ;
  271. STAT103 : S5TIME ;
  272. STAT104 : S5TIME ;
  273. STAT105 : S5TIME ;
  274. STAT106 : S5TIME ;
  275. STAT107 : S5TIME ;
  276. STAT108 : S5TIME ;
  277. STAT109 : S5TIME ;
  278. STAT110 : S5TIME ;
  279. STAT111 : S5TIME ;
  280. STAT112 : S5TIME ;
  281. STAT113 : S5TIME ;
  282. STAT114 : S5TIME ;
  283. STAT115 : S5TIME ;
  284. STAT116 : S5TIME ;
  285. STAT117 : S5TIME ;
  286. STAT118 : S5TIME ;
  287. STAT119 : S5TIME ;
  288. STAT120 : S5TIME ;
  289. STAT121 : S5TIME ;
  290. STAT122 : S5TIME ;
  291. STAT123 : S5TIME ;
  292. STAT124 : S5TIME ;
  293. STAT125 : S5TIME ;
  294. STAT126 : S5TIME ;
  295. STAT127 : S5TIME ;
  296. END_STRUCT ;
  297. BEGIN
  298. STAT0 := S5T#0MS;
  299. STAT1 := S5T#0MS;
  300. STAT2 := S5T#15S;
  301. STAT3 := S5T#1S;
  302. STAT4 := S5T#100MS;
  303. STAT5 := S5T#1M30S;
  304. STAT6 := S5T#0MS;
  305. STAT7 := S5T#0MS;
  306. STAT8 := S5T#50MS;
  307. STAT9 := S5T#50MS;
  308. STAT10 := S5T#2M;
  309. STAT11 := S5T#50MS;
  310. STAT12 := S5T#50MS;
  311. STAT13 := S5T#2S;
  312. STAT14 := S5T#2S;
  313. STAT15 := S5T#3S;
  314. STAT16 := S5T#1S;
  315. STAT17 := S5T#1S;
  316. STAT18 := S5T#20S;
  317. STAT19 := S5T#1S;
  318. STAT20 := S5T#100MS;
  319. STAT21 := S5T#100MS;
  320. STAT22 := S5T#5S;
  321. STAT23 := S5T#5S;
  322. STAT24 := S5T#5M;
  323. STAT25 := S5T#8S;
  324. STAT26 := S5T#7M;
  325. STAT27 := S5T#2H;
  326. STAT28 := S5T#10S;
  327. STAT29 := S5T#10S;
  328. STAT30 := S5T#3S;
  329. STAT31 := S5T#5S;
  330. STAT32 := S5T#10S;
  331. STAT33 := S5T#15S;
  332. STAT34 := S5T#2H;
  333. STAT35 := S5T#30M;
  334. STAT36 := S5T#30M;
  335. STAT37 := S5T#10S;
  336. STAT38 := S5T#10S;
  337. STAT39 := S5T#4M;
  338. STAT40 := S5T#30S;
  339. STAT41 := S5T#30S;
  340. STAT42 := S5T#5S;
  341. STAT43 := S5T#3S;
  342. STAT44 := S5T#1M30S;
  343. STAT45 := S5T#5S;
  344. STAT46 := S5T#0MS;
  345. STAT47 := S5T#0MS;
  346. STAT48 := S5T#0MS;
  347. STAT49 := S5T#0MS;
  348. STAT50 := S5T#0MS;
  349. STAT51 := S5T#0MS;
  350. STAT52 := S5T#0MS;
  351. STAT53 := S5T#0MS;
  352. STAT54 := S5T#0MS;
  353. STAT55 := S5T#0MS;
  354. STAT56 := S5T#0MS;
  355. STAT57 := S5T#0MS;
  356. STAT58 := S5T#0MS;
  357. STAT59 := S5T#0MS;
  358. STAT60 := S5T#0MS;
  359. STAT61 := S5T#0MS;
  360. STAT62 := S5T#0MS;
  361. STAT63 := S5T#0MS;
  362. STAT64 := S5T#0MS;
  363. STAT65 := S5T#0MS;
  364. STAT66 := S5T#0MS;
  365. STAT67 := S5T#0MS;
  366. STAT68 := S5T#0MS;
  367. STAT69 := S5T#0MS;
  368. STAT70 := S5T#0MS;
  369. STAT71 := S5T#0MS;
  370. STAT72 := S5T#0MS;
  371. STAT73 := S5T#0MS;
  372. STAT74 := S5T#0MS;
  373. STAT75 := S5T#0MS;
  374. STAT76 := S5T#0MS;
  375. STAT77 := S5T#0MS;
  376. STAT78 := S5T#0MS;
  377. STAT79 := S5T#0MS;
  378. STAT80 := S5T#0MS;
  379. STAT81 := S5T#0MS;
  380. STAT82 := S5T#0MS;
  381. STAT83 := S5T#0MS;
  382. STAT84 := S5T#0MS;
  383. STAT85 := S5T#0MS;
  384. STAT86 := S5T#0MS;
  385. STAT87 := S5T#0MS;
  386. STAT88 := S5T#0MS;
  387. STAT89 := S5T#0MS;
  388. STAT90 := S5T#0MS;
  389. STAT91 := S5T#0MS;
  390. STAT92 := S5T#0MS;
  391. STAT93 := S5T#0MS;
  392. STAT94 := S5T#0MS;
  393. STAT95 := S5T#0MS;
  394. STAT96 := S5T#0MS;
  395. STAT97 := S5T#0MS;
  396. STAT98 := S5T#0MS;
  397. STAT99 := S5T#0MS;
  398. STAT100 := S5T#0MS;
  399. STAT101 := S5T#0MS;
  400. STAT102 := S5T#0MS;
  401. STAT103 := S5T#0MS;
  402. STAT104 := S5T#0MS;
  403. STAT105 := S5T#0MS;
  404. STAT106 := S5T#0MS;
  405. STAT107 := S5T#0MS;
  406. STAT108 := S5T#0MS;
  407. STAT109 := S5T#0MS;
  408. STAT110 := S5T#0MS;
  409. STAT111 := S5T#0MS;
  410. STAT112 := S5T#0MS;
  411. STAT113 := S5T#0MS;
  412. STAT114 := S5T#0MS;
  413. STAT115 := S5T#0MS;
  414. STAT116 := S5T#0MS;
  415. STAT117 := S5T#0MS;
  416. STAT118 := S5T#0MS;
  417. STAT119 := S5T#0MS;
  418. STAT120 := S5T#0MS;
  419. STAT121 := S5T#0MS;
  420. STAT122 := S5T#0MS;
  421. STAT123 := S5T#0MS;
  422. STAT124 := S5T#0MS;
  423. STAT125 := S5T#0MS;
  424. STAT126 := S5T#0MS;
  425. STAT127 := S5T#0MS;
  426. END_DATA_BLOCK
  427. DATA_BLOCK DB 3
  428. AUTHOR :
  429. VERSION : 0.1
  430. STRUCT
  431. STAT0 : INT ;
  432. STAT1 : INT ;
  433. STAT2 : INT ;
  434. STAT3 : INT ;
  435. END_STRUCT ;
  436. BEGIN
  437. STAT0 := 0;
  438. STAT1 := 0;
  439. STAT2 := 0;
  440. STAT3 := 0;
  441. END_DATA_BLOCK
  442. DATA_BLOCK DB 4
  443. AUTHOR :
  444. NAME : DB_ENCOD
  445. VERSION : 0.1
  446. STRUCT
  447. STAT0 : REAL ;
  448. STAT1 : REAL ;
  449. STAT2 : REAL ;
  450. STAT3 : REAL ;
  451. STAT4 : REAL ;
  452. STAT5 : REAL ;
  453. STAT6 : REAL ;
  454. STAT7 : REAL ;
  455. STAT8 : REAL ;
  456. STAT9 : REAL ;
  457. STAT10 : REAL ;
  458. STAT11 : REAL ;
  459. STAT12 : REAL ;
  460. STAT13 : REAL ;
  461. STAT14 : REAL ;
  462. STAT15 : REAL ;
  463. STAT16 : REAL ;
  464. STAT17 : REAL ;
  465. STAT18 : REAL ;
  466. STAT19 : REAL ;
  467. STAT20 : REAL ;
  468. STAT21 : REAL ;
  469. STAT22 : REAL ;
  470. STAT23 : REAL ;
  471. STAT24 : REAL ;
  472. STAT25 : REAL ;
  473. STAT26 : REAL ;
  474. STAT27 : REAL ;
  475. STAT28 : REAL ;
  476. STAT29 : REAL ;
  477. STAT30 : REAL ;
  478. STAT31 : REAL ;
  479. STAT32 : REAL ;
  480. STAT33 : REAL ;
  481. STAT34 : REAL ;
  482. STAT35 : REAL ;
  483. STAT36 : REAL ;
  484. STAT37 : REAL ;
  485. STAT38 : REAL ;
  486. STAT39 : REAL ;
  487. STAT40 : REAL ;
  488. STAT41 : REAL ;
  489. STAT42 : REAL ;
  490. STAT43 : REAL ;
  491. STAT44 : REAL ;
  492. STAT45 : REAL ;
  493. STAT46 : REAL ;
  494. STAT47 : REAL ;
  495. STAT48 : REAL ;
  496. STAT49 : REAL ;
  497. STAT50 : REAL ;
  498. STAT51 : REAL ;
  499. STAT52 : REAL ;
  500. STAT53 : REAL ;
  501. STAT54 : REAL ;
  502. STAT55 : REAL ;
  503. STAT56 : REAL ;
  504. STAT57 : REAL ;
  505. STAT58 : S5TIME ;
  506. STAT59 : S5TIME ;
  507. STAT60 : S5TIME ;
  508. STAT61 : S5TIME ;
  509. STAT62 : S5TIME ;
  510. STAT63 : S5TIME ;
  511. STAT64 : S5TIME ;
  512. STAT65 : S5TIME ;
  513. STAT66 : S5TIME ;
  514. STAT67 : S5TIME ;
  515. STAT68 : S5TIME ;
  516. STAT69 : S5TIME ;
  517. STAT70 : S5TIME ;
  518. STAT71 : S5TIME ;
  519. STAT72 : S5TIME ;
  520. STAT73 : S5TIME ;
  521. STAT74 : S5TIME ;
  522. STAT75 : S5TIME ;
  523. STAT76 : S5TIME ;
  524. STAT77 : S5TIME ;
  525. END_STRUCT ;
  526. BEGIN
  527. STAT0 := 3.270000e+002;
  528. STAT1 := 4.070000e+002;
  529. STAT2 := 1.500000e+001;
  530. STAT3 := 5.000000e+002;
  531. STAT4 := 0.000000e+000;
  532. STAT5 := 4.500000e+001;
  533. STAT6 := 2.500000e+001;
  534. STAT7 := 2.500000e+001;
  535. STAT8 := 7.000000e+001;
  536. STAT9 := 0.000000e+000;
  537. STAT10 := 0.000000e+000;
  538. STAT11 := 1.400000e+002;
  539. STAT12 := 0.000000e+000;
  540. STAT13 := 0.000000e+000;
  541. STAT14 := 2.000000e+001;
  542. STAT15 := 0.000000e+000;
  543. STAT16 := 0.000000e+000;
  544. STAT17 := 0.000000e+000;
  545. STAT18 := 5.000000e+001;
  546. STAT19 := 1.000000e+002;
  547. STAT20 := 1.500000e+002;
  548. STAT21 := 2.000000e+002;
  549. STAT22 := 2.500000e+002;
  550. STAT23 := 3.000000e+002;
  551. STAT24 := 3.500000e+002;
  552. STAT25 := 4.000000e+002;
  553. STAT26 := 4.500000e+002;
  554. STAT27 := 5.000000e+002;
  555. STAT28 := 5.500000e+002;
  556. STAT29 := 6.000000e+002;
  557. STAT30 := 6.500000e+002;
  558. STAT31 := 7.000000e+002;
  559. STAT32 := 7.500000e+002;
  560. STAT33 := 8.000000e+002;
  561. STAT34 := 8.500000e+002;
  562. STAT35 := 9.000000e+002;
  563. STAT36 := 9.500000e+002;
  564. STAT37 := 1.000000e+003;
  565. STAT38 := 2.000000e+002;
  566. STAT39 := 1.900000e+002;
  567. STAT40 := 1.800000e+002;
  568. STAT41 := 1.700000e+002;
  569. STAT42 := 1.600000e+002;
  570. STAT43 := 1.500000e+002;
  571. STAT44 := 1.400000e+002;
  572. STAT45 := 1.300000e+002;
  573. STAT46 := 1.200000e+002;
  574. STAT47 := 1.100000e+002;
  575. STAT48 := 1.000000e+002;
  576. STAT49 := 9.000000e+001;
  577. STAT50 := 8.000000e+001;
  578. STAT51 := 7.000000e+001;
  579. STAT52 := 6.000000e+001;
  580. STAT53 := 5.000000e+001;
  581. STAT54 := 4.000000e+001;
  582. STAT55 := 3.000000e+001;
  583. STAT56 := 2.000000e+001;
  584. STAT57 := 1.000000e+001;
  585. STAT58 := S5T#5S;
  586. STAT59 := S5T#5S;
  587. STAT60 := S5T#5S;
  588. STAT61 := S5T#5S;
  589. STAT62 := S5T#5S;
  590. STAT63 := S5T#5S;
  591. STAT64 := S5T#5S;
  592. STAT65 := S5T#5S;
  593. STAT66 := S5T#5S;
  594. STAT67 := S5T#5S;
  595. STAT68 := S5T#5S;
  596. STAT69 := S5T#5S;
  597. STAT70 := S5T#5S;
  598. STAT71 := S5T#5S;
  599. STAT72 := S5T#5S;
  600. STAT73 := S5T#5S;
  601. STAT74 := S5T#5S;
  602. STAT75 := S5T#5S;
  603. STAT76 := S5T#5S;
  604. STAT77 := S5T#5S;
  605. END_DATA_BLOCK
  606. DATA_BLOCK DB 10
  607. AUTHOR :
  608. FAMILY : GENERAL
  609. NAME : DB_GRP1
  610. VERSION : 0.0
  611. STRUCT
  612. STAT0 : WORD ;
  613. STAT1 : INT ;
  614. STAT2 : INT ;
  615. STAT3 : INT ;
  616. STAT4 : INT ;
  617. STAT5 : INT ;
  618. STAT6 : INT ;
  619. STAT7 : INT ;
  620. STAT8 : INT ;
  621. STAT9 : INT ;
  622. STAT10 : INT ;
  623. STAT11 : INT ;
  624. STAT12 : INT ;
  625. STAT13 : INT ;
  626. STAT14 : INT ;
  627. STAT15 : INT ;
  628. STAT16 : INT ;
  629. STAT17 : INT ;
  630. STAT18 : INT ;
  631. STAT19 : INT ;
  632. STAT20 : INT ;
  633. STAT21 : INT ;
  634. STAT22 : WORD ;
  635. STAT23 : WORD ;
  636. STAT24 : WORD ;
  637. STAT25 : WORD ;
  638. STAT26 : WORD ;
  639. STAT27 : WORD ;
  640. STAT28 : WORD ;
  641. STAT29 : WORD ;
  642. STAT30 : WORD ;
  643. STAT31 : WORD ;
  644. STAT32 : WORD ;
  645. STAT33 : WORD ;
  646. STAT34 : WORD ;
  647. STAT35 : WORD ;
  648. STAT36 : WORD ;
  649. STAT37 : WORD ;
  650. STAT38 : INT ;
  651. STAT39 : INT ;
  652. STAT40 : INT ;
  653. STAT41 : INT ;
  654. STAT42 : INT ;
  655. STAT43 : INT ;
  656. STAT44 : INT ;
  657. STAT45 : INT ;
  658. STAT46 : INT ;
  659. STAT47 : INT ;
  660. STAT48 : INT ;
  661. STAT49 : INT ;
  662. STAT50 : INT ;
  663. STAT51 : INT ;
  664. STAT52 : INT ;
  665. STAT53 : INT ;
  666. STAT54 : INT ;
  667. STAT55 : INT ;
  668. STAT56 : INT ;
  669. STAT57 : INT ;
  670. STAT58 : REAL ;
  671. STAT59 : REAL ;
  672. STAT60 : REAL ;
  673. STAT61 : REAL ;
  674. STAT62 : REAL ;
  675. STAT63 : REAL ;
  676. STAT64 : INT ;
  677. STAT65 : INT ;
  678. STAT66 : REAL ;
  679. STAT67 : REAL ;
  680. STAT68 : REAL ;
  681. STAT69 : REAL ;
  682. STAT70 : REAL ;
  683. STAT71 : REAL ;
  684. STAT72 : REAL ;
  685. STAT73 : REAL ;
  686. STAT74 : REAL := 3.000000e+001;
  687. STAT75 : REAL := 2.500000e+001;
  688. STAT76 : REAL := 1.500000e+001;
  689. STAT77 : REAL := 2.000000e+001;
  690. STAT78 : INT ;
  691. STAT79 : INT ;
  692. STAT80 : REAL ;
  693. STAT81 : REAL ;
  694. STAT82 : REAL ;
  695. STAT83 : REAL ;
  696. STAT84 : REAL ;
  697. STAT85 : REAL ;
  698. STAT86 : REAL ;
  699. STAT87 : REAL ;
  700. STAT88 : REAL ;
  701. STAT89 : REAL ;
  702. STAT90 : REAL ;
  703. STAT91 : REAL ;
  704. STAT92 : REAL ;
  705. STAT93 : REAL ;
  706. STAT94 : REAL ;
  707. STAT95 : REAL ;
  708. STAT96 : REAL ;
  709. STAT97 : REAL ;
  710. STAT98 : INT ;
  711. STAT99 : INT ;
  712. STAT100 : INT ;
  713. STAT101 : INT ;
  714. STAT102 : INT ;
  715. STAT103 : INT ;
  716. STAT104 : INT ;
  717. STAT105 : INT ;
  718. STAT106 : INT ;
  719. STAT107 : INT ;
  720. STAT108 : INT ;
  721. STAT109 : INT ;
  722. STAT110 : INT ;
  723. STAT111 : INT ;
  724. STAT112 : INT ;
  725. STAT113 : INT ;
  726. STAT114 : INT ;
  727. STAT115 : INT ;
  728. STAT116 : INT ;
  729. STAT117 : INT ;
  730. STAT118 : INT ;
  731. STAT119 : INT ;
  732. STAT120 : INT ;
  733. STAT121 : INT ;
  734. STAT122 : INT ;
  735. STAT123 : INT ;
  736. STAT124 : INT ;
  737. STAT125 : INT ;
  738. STAT126 : INT ;
  739. STAT127 : INT ;
  740. STAT128 : INT ;
  741. STAT129 : INT ;
  742. STAT130 : INT ;
  743. STAT131 : INT ;
  744. STAT132 : INT ;
  745. STAT133 : INT ;
  746. STAT134 : INT ;
  747. STAT135 : INT ;
  748. STAT136 : INT ;
  749. STAT137 : INT ;
  750. STAT138 : INT ;
  751. STAT139 : INT ;
  752. STAT140 : INT ;
  753. STAT141 : INT ;
  754. STAT142 : INT ;
  755. STAT143 : INT ;
  756. STAT144 : INT ;
  757. STAT145 : INT ;
  758. STAT146 : INT ;
  759. STAT147 : INT ;
  760. STAT148 : INT ;
  761. STAT149 : INT ;
  762. STAT150 : INT ;
  763. STAT151 : INT ;
  764. STAT152 : INT ;
  765. END_STRUCT ;
  766. BEGIN
  767. STAT0 := W#16#0;
  768. STAT1 := 0;
  769. STAT2 := 0;
  770. STAT3 := 0;
  771. STAT4 := 0;
  772. STAT5 := 2;
  773. STAT6 := 0;
  774. STAT7 := 0;
  775. STAT8 := 0;
  776. STAT9 := 2;
  777. STAT10 := 2;
  778. STAT11 := 2;
  779. STAT12 := 0;
  780. STAT13 := 2;
  781. STAT14 := 2;
  782. STAT15 := 2;
  783. STAT16 := 0;
  784. STAT17 := 0;
  785. STAT18 := 0;
  786. STAT19 := 0;
  787. STAT20 := 0;
  788. STAT21 := 0;
  789. STAT22 := W#16#0;
  790. STAT23 := W#16#0;
  791. STAT24 := W#16#0;
  792. STAT25 := W#16#0;
  793. STAT26 := W#16#0;
  794. STAT27 := W#16#0;
  795. STAT28 := W#16#0;
  796. STAT29 := W#16#0;
  797. STAT30 := W#16#0;
  798. STAT31 := W#16#0;
  799. STAT32 := W#16#0;
  800. STAT33 := W#16#0;
  801. STAT34 := W#16#0;
  802. STAT35 := W#16#0;
  803. STAT36 := W#16#0;
  804. STAT37 := W#16#0;
  805. STAT38 := 2;
  806. STAT39 := 2;
  807. STAT40 := 2;
  808. STAT41 := 2;
  809. STAT42 := 0;
  810. STAT43 := 0;
  811. STAT44 := 0;
  812. STAT45 := 0;
  813. STAT46 := 0;
  814. STAT47 := 2;
  815. STAT48 := 2;
  816. STAT49 := 2;
  817. STAT50 := 3;
  818. STAT51 := 3;
  819. STAT52 := 2;
  820. STAT53 := 2;
  821. STAT54 := 2;
  822. STAT55 := 2;
  823. STAT56 := 2;
  824. STAT57 := 0;
  825. STAT58 := 0.000000e+000;
  826. STAT59 := 0.000000e+000;
  827. STAT60 := 0.000000e+000;
  828. STAT61 := 0.000000e+000;
  829. STAT62 := 0.000000e+000;
  830. STAT63 := 1.000000e+002;
  831. STAT64 := 12;
  832. STAT65 := 0;
  833. STAT66 := 7.500000e+001;
  834. STAT67 := 2.500000e+001;
  835. STAT68 := 1.800000e+001;
  836. STAT69 := 1.000000e+001;
  837. STAT70 := 0.000000e+000;
  838. STAT71 := 0.000000e+000;
  839. STAT72 := 0.000000e+000;
  840. STAT73 := 0.000000e+000;
  841. STAT74 := 3.000000e+001;
  842. STAT75 := 2.600000e+001;
  843. STAT76 := 1.500000e+001;
  844. STAT77 := 2.500000e+001;
  845. STAT78 := 0;
  846. STAT79 := 0;
  847. STAT80 := 0.000000e+000;
  848. STAT81 := 8.680556e-002;
  849. STAT82 := 8.738426e+001;
  850. STAT83 := 0.000000e+000;
  851. STAT84 := 0.000000e+000;
  852. STAT85 := 0.000000e+000;
  853. STAT86 := 0.000000e+000;
  854. STAT87 := 0.000000e+000;
  855. STAT88 := 0.000000e+000;
  856. STAT89 := 0.000000e+000;
  857. STAT90 := 0.000000e+000;
  858. STAT91 := 0.000000e+000;
  859. STAT92 := 0.000000e+000;
  860. STAT93 := 0.000000e+000;
  861. STAT94 := 0.000000e+000;
  862. STAT95 := 0.000000e+000;
  863. STAT96 := 0.000000e+000;
  864. STAT97 := 0.000000e+000;
  865. STAT98 := 0;
  866. STAT99 := 0;
  867. STAT100 := 0;
  868. STAT101 := 0;
  869. STAT102 := 0;
  870. STAT103 := 0;
  871. STAT104 := 0;
  872. STAT105 := 0;
  873. STAT106 := 0;
  874. STAT107 := 0;
  875. STAT108 := 0;
  876. STAT109 := 0;
  877. STAT110 := 0;
  878. STAT111 := 0;
  879. STAT112 := 0;
  880. STAT113 := 0;
  881. STAT114 := 0;
  882. STAT115 := 0;
  883. STAT116 := 0;
  884. STAT117 := 0;
  885. STAT118 := 0;
  886. STAT119 := 2;
  887. STAT120 := 2;
  888. STAT121 := 2;
  889. STAT122 := 2;
  890. STAT123 := 2;
  891. STAT124 := 2;
  892. STAT125 := 2;
  893. STAT126 := 2;
  894. STAT127 := 2;
  895. STAT128 := 2;
  896. STAT129 := 2;
  897. STAT130 := 2;
  898. STAT131 := 2;
  899. STAT132 := 2;
  900. STAT133 := 2;
  901. STAT134 := 2;
  902. STAT135 := 2;
  903. STAT136 := 0;
  904. STAT137 := 2;
  905. STAT138 := 2;
  906. STAT139 := 2;
  907. STAT140 := 2;
  908. STAT141 := 2;
  909. STAT142 := 2;
  910. STAT143 := 2;
  911. STAT144 := 2;
  912. STAT145 := 2;
  913. STAT146 := 3;
  914. STAT147 := 3;
  915. STAT148 := 2;
  916. STAT149 := 2;
  917. STAT150 := 2;
  918. STAT151 := 2;
  919. STAT152 := 2;
  920. END_DATA_BLOCK
  921. DATA_BLOCK DB 179
  922. AUTHOR :
  923. FAMILY : GENERAL
  924. NAME : STATUS
  925. VERSION : 0.1
  926. STRUCT
  927. STAT0 : REAL ;
  928. STAT1 : REAL ;
  929. STAT2 : REAL ;
  930. STAT3 : REAL ;
  931. STAT4 : REAL ;
  932. STAT5 : REAL ;
  933. STAT6 : REAL ;
  934. STAT7 : REAL ;
  935. STAT8 : REAL ;
  936. STAT9 : REAL ;
  937. STAT10 : REAL ;
  938. STAT11 : REAL ;
  939. STAT12 : REAL ;
  940. STAT13 : REAL ;
  941. STAT14 : REAL ;
  942. STAT15 : REAL ;
  943. STAT16 : REAL ;
  944. STAT17 : REAL ;
  945. STAT18 : REAL ;
  946. STAT19 : REAL ;
  947. STAT20 : REAL ;
  948. STAT21 : REAL ;
  949. STAT22 : REAL ;
  950. STAT23 : REAL ;
  951. STAT24 : REAL ;
  952. STAT25 : REAL ;
  953. STAT26 : REAL ;
  954. STAT27 : REAL ;
  955. STAT28 : REAL ;
  956. STAT29 : REAL ;
  957. STAT30 : REAL ;
  958. STAT31 : REAL ;
  959. STAT32 : REAL ;
  960. STAT33 : REAL ;
  961. STAT34 : REAL ;
  962. STAT35 : REAL ;
  963. STAT36 : REAL ;
  964. STAT37 : REAL ;
  965. STAT38 : REAL ;
  966. STAT39 : REAL ;
  967. STAT40 : REAL ;
  968. STAT41 : REAL ;
  969. STAT42 : REAL ;
  970. STAT43 : REAL ;
  971. STAT44 : REAL ;
  972. STAT45 : REAL ;
  973. STAT46 : REAL ;
  974. STAT47 : REAL ;
  975. STAT48 : REAL ;
  976. STAT49 : REAL ;
  977. STAT50 : WORD ;
  978. STAT51 : WORD ;
  979. STAT52 : WORD ;
  980. STAT53 : WORD ;
  981. STAT54 : WORD ;
  982. STAT55 : WORD ;
  983. STAT56 : WORD ;
  984. STAT57 : WORD ;
  985. STAT58 : WORD ;
  986. STAT59 : WORD ;
  987. STAT60 : WORD ;
  988. STAT61 : WORD ;
  989. STAT62 : WORD ;
  990. STAT63 : WORD ;
  991. STAT64 : WORD ;
  992. STAT65 : WORD ;
  993. STAT66 : WORD ;
  994. STAT67 : WORD ;
  995. STAT68 : WORD ;
  996. STAT69 : WORD ;
  997. STAT70 : WORD ;
  998. STAT71 : WORD ;
  999. STAT72 : WORD ;
  1000. STAT73 : WORD ;
  1001. STAT74 : WORD ;
  1002. STAT75 : WORD ;
  1003. STAT76 : WORD ;
  1004. STAT77 : WORD ;
  1005. STAT78 : WORD ;
  1006. STAT79 : WORD ;
  1007. STAT80 : WORD ;
  1008. STAT81 : WORD ;
  1009. STAT82 : WORD ;
  1010. STAT83 : WORD ;
  1011. STAT84 : WORD ;
  1012. STAT85 : WORD ;
  1013. STAT86 : WORD ;
  1014. STAT87 : WORD ;
  1015. STAT88 : WORD ;
  1016. STAT89 : WORD ;
  1017. STAT90 : WORD ;
  1018. STAT91 : WORD ;
  1019. STAT92 : WORD ;
  1020. STAT93 : WORD ;
  1021. STAT94 : WORD ;
  1022. STAT95 : WORD ;
  1023. STAT96 : WORD ;
  1024. STAT97 : WORD ;
  1025. STAT98 : WORD ;
  1026. STAT99 : WORD ;
  1027. STAT100 : WORD ;
  1028. STAT101 : WORD ;
  1029. STAT102 : WORD ;
  1030. STAT103 : WORD ;
  1031. STAT104 : WORD ;
  1032. STAT105 : WORD ;
  1033. STAT106 : WORD ;
  1034. STAT107 : WORD ;
  1035. STAT108 : WORD ;
  1036. STAT109 : WORD ;
  1037. STAT110 : WORD ;
  1038. STAT111 : WORD ;
  1039. STAT112 : WORD ;
  1040. STAT113 : WORD ;
  1041. STAT114 : WORD ;
  1042. STAT115 : WORD ;
  1043. STAT116 : WORD ;
  1044. STAT117 : WORD ;
  1045. STAT118 : WORD ;
  1046. STAT119 : WORD ;
  1047. STAT120 : WORD ;
  1048. STAT121 : WORD ;
  1049. STAT122 : WORD ;
  1050. STAT123 : WORD ;
  1051. STAT124 : WORD ;
  1052. STAT125 : WORD ;
  1053. STAT126 : WORD ;
  1054. STAT127 : WORD ;
  1055. STAT128 : WORD ;
  1056. STAT129 : WORD ;
  1057. STAT130 : WORD ;
  1058. STAT131 : WORD ;
  1059. STAT132 : WORD ;
  1060. STAT133 : WORD ;
  1061. STAT134 : WORD ;
  1062. STAT135 : WORD ;
  1063. STAT136 : WORD ;
  1064. STAT137 : WORD ;
  1065. STAT138 : WORD ;
  1066. STAT139 : WORD ;
  1067. STAT140 : WORD ;
  1068. STAT141 : WORD ;
  1069. STAT142 : WORD ;
  1070. STAT143 : WORD ;
  1071. STAT144 : WORD ;
  1072. STAT145 : WORD ;
  1073. STAT146 : WORD ;
  1074. STAT147 : WORD ;
  1075. STAT148 : WORD ;
  1076. STAT149 : WORD ;
  1077. STAT150 : WORD ;
  1078. STAT151 : INT ;
  1079. END_STRUCT ;
  1080. BEGIN
  1081. STAT0 := -1.000000e+001;
  1082. STAT1 := 0.000000e+000;
  1083. STAT2 := 8.680556e-002;
  1084. STAT3 := 0.000000e+000;
  1085. STAT4 := 0.000000e+000;
  1086. STAT5 := 8.738426e+001;
  1087. STAT6 := 2.670000e+002;
  1088. STAT7 := 2.670000e+002;
  1089. STAT8 := 2.670000e+002;
  1090. STAT9 := 2.670000e+002;
  1091. STAT10 := 2.670000e+002;
  1092. STAT11 := 0.000000e+000;
  1093. STAT12 := 0.000000e+000;
  1094. STAT13 := 0.000000e+000;
  1095. STAT14 := 0.000000e+000;
  1096. STAT15 := 0.000000e+000;
  1097. STAT16 := 0.000000e+000;
  1098. STAT17 := 0.000000e+000;
  1099. STAT18 := 0.000000e+000;
  1100. STAT19 := 0.000000e+000;
  1101. STAT20 := 0.000000e+000;
  1102. STAT21 := 0.000000e+000;
  1103. STAT22 := 0.000000e+000;
  1104. STAT23 := 0.000000e+000;
  1105. STAT24 := 0.000000e+000;
  1106. STAT25 := 0.000000e+000;
  1107. STAT26 := 0.000000e+000;
  1108. STAT27 := 0.000000e+000;
  1109. STAT28 := 0.000000e+000;
  1110. STAT29 := 0.000000e+000;
  1111. STAT30 := 0.000000e+000;
  1112. STAT31 := 0.000000e+000;
  1113. STAT32 := 0.000000e+000;
  1114. STAT33 := 0.000000e+000;
  1115. STAT34 := 0.000000e+000;
  1116. STAT35 := 0.000000e+000;
  1117. STAT36 := 0.000000e+000;
  1118. STAT37 := 0.000000e+000;
  1119. STAT38 := 0.000000e+000;
  1120. STAT39 := 0.000000e+000;
  1121. STAT40 := 0.000000e+000;
  1122. STAT41 := 0.000000e+000;
  1123. STAT42 := 0.000000e+000;
  1124. STAT43 := 0.000000e+000;
  1125. STAT44 := 0.000000e+000;
  1126. STAT45 := 0.000000e+000;
  1127. STAT46 := 0.000000e+000;
  1128. STAT47 := 0.000000e+000;
  1129. STAT48 := 0.000000e+000;
  1130. STAT49 := 0.000000e+000;
  1131. STAT50 := W#16#0;
  1132. STAT51 := W#16#0;
  1133. STAT52 := W#16#0;
  1134. STAT53 := W#16#0;
  1135. STAT54 := W#16#0;
  1136. STAT55 := W#16#0;
  1137. STAT56 := W#16#0;
  1138. STAT57 := W#16#0;
  1139. STAT58 := W#16#0;
  1140. STAT59 := W#16#0;
  1141. STAT60 := W#16#0;
  1142. STAT61 := W#16#0;
  1143. STAT62 := W#16#0;
  1144. STAT63 := W#16#0;
  1145. STAT64 := W#16#0;
  1146. STAT65 := W#16#0;
  1147. STAT66 := W#16#0;
  1148. STAT67 := W#16#0;
  1149. STAT68 := W#16#0;
  1150. STAT69 := W#16#0;
  1151. STAT70 := W#16#0;
  1152. STAT71 := W#16#0;
  1153. STAT72 := W#16#0;
  1154. STAT73 := W#16#0;
  1155. STAT74 := W#16#0;
  1156. STAT75 := W#16#0;
  1157. STAT76 := W#16#0;
  1158. STAT77 := W#16#0;
  1159. STAT78 := W#16#0;
  1160. STAT79 := W#16#0;
  1161. STAT80 := W#16#0;
  1162. STAT81 := W#16#0;
  1163. STAT82 := W#16#0;
  1164. STAT83 := W#16#0;
  1165. STAT84 := W#16#0;
  1166. STAT85 := W#16#0;
  1167. STAT86 := W#16#0;
  1168. STAT87 := W#16#0;
  1169. STAT88 := W#16#0;
  1170. STAT89 := W#16#0;
  1171. STAT90 := W#16#0;
  1172. STAT91 := W#16#0;
  1173. STAT92 := W#16#0;
  1174. STAT93 := W#16#0;
  1175. STAT94 := W#16#0;
  1176. STAT95 := W#16#0;
  1177. STAT96 := W#16#0;
  1178. STAT97 := W#16#0;
  1179. STAT98 := W#16#0;
  1180. STAT99 := W#16#0;
  1181. STAT100 := W#16#0;
  1182. STAT101 := W#16#0;
  1183. STAT102 := W#16#0;
  1184. STAT103 := W#16#0;
  1185. STAT104 := W#16#0;
  1186. STAT105 := W#16#0;
  1187. STAT106 := W#16#0;
  1188. STAT107 := W#16#0;
  1189. STAT108 := W#16#0;
  1190. STAT109 := W#16#0;
  1191. STAT110 := W#16#0;
  1192. STAT111 := W#16#0;
  1193. STAT112 := W#16#0;
  1194. STAT113 := W#16#0;
  1195. STAT114 := W#16#0;
  1196. STAT115 := W#16#0;
  1197. STAT116 := W#16#0;
  1198. STAT117 := W#16#0;
  1199. STAT118 := W#16#0;
  1200. STAT119 := W#16#0;
  1201. STAT120 := W#16#0;
  1202. STAT121 := W#16#0;
  1203. STAT122 := W#16#0;
  1204. STAT123 := W#16#0;
  1205. STAT124 := W#16#0;
  1206. STAT125 := W#16#0;
  1207. STAT126 := W#16#0;
  1208. STAT127 := W#16#0;
  1209. STAT128 := W#16#0;
  1210. STAT129 := W#16#0;
  1211. STAT130 := W#16#0;
  1212. STAT131 := W#16#0;
  1213. STAT132 := W#16#0;
  1214. STAT133 := W#16#0;
  1215. STAT134 := W#16#0;
  1216. STAT135 := W#16#0;
  1217. STAT136 := W#16#0;
  1218. STAT137 := W#16#0;
  1219. STAT138 := W#16#0;
  1220. STAT139 := W#16#0;
  1221. STAT140 := W#16#0;
  1222. STAT141 := W#16#0;
  1223. STAT142 := W#16#0;
  1224. STAT143 := W#16#0;
  1225. STAT144 := W#16#0;
  1226. STAT145 := W#16#0;
  1227. STAT146 := W#16#0;
  1228. STAT147 := W#16#0;
  1229. STAT148 := W#16#0;
  1230. STAT149 := W#16#0;
  1231. STAT150 := W#16#0;
  1232. STAT151 := 0;
  1233. END_DATA_BLOCK
  1234. DATA_BLOCK DB 181
  1235. AUTHOR :
  1236. FAMILY : GENERAL
  1237. NAME : STATUS
  1238. VERSION : 0.1
  1239. STRUCT
  1240. STAT0 : WORD ;
  1241. STAT1 : WORD ;
  1242. STAT2 : WORD ;
  1243. STAT3 : WORD ;
  1244. STAT4 : WORD ;
  1245. STAT5 : WORD ;
  1246. STAT6 : WORD ;
  1247. STAT7 : WORD ;
  1248. STAT8 : WORD ;
  1249. STAT9 : WORD ;
  1250. STAT10 : WORD ;
  1251. STAT11 : WORD ;
  1252. STAT12 : WORD ;
  1253. STAT13 : WORD ;
  1254. STAT14 : WORD ;
  1255. STAT15 : WORD ;
  1256. STAT16 : WORD ;
  1257. STAT17 : WORD ;
  1258. STAT18 : WORD ;
  1259. STAT19 : WORD ;
  1260. STAT20 : WORD ;
  1261. STAT21 : WORD ;
  1262. STAT22 : WORD ;
  1263. STAT23 : WORD ;
  1264. STAT24 : WORD ;
  1265. STAT25 : WORD ;
  1266. STAT26 : WORD ;
  1267. STAT27 : WORD ;
  1268. STAT28 : WORD ;
  1269. STAT29 : WORD ;
  1270. STAT30 : WORD ;
  1271. STAT31 : WORD ;
  1272. STAT32 : WORD ;
  1273. STAT33 : WORD ;
  1274. STAT34 : WORD ;
  1275. STAT35 : WORD ;
  1276. STAT36 : WORD ;
  1277. STAT37 : WORD ;
  1278. STAT38 : WORD ;
  1279. STAT39 : WORD ;
  1280. STAT40 : WORD ;
  1281. STAT41 : WORD ;
  1282. STAT42 : WORD ;
  1283. STAT43 : WORD ;
  1284. STAT44 : WORD ;
  1285. STAT45 : WORD ;
  1286. STAT46 : WORD ;
  1287. STAT47 : WORD ;
  1288. STAT48 : WORD ;
  1289. STAT49 : WORD ;
  1290. STAT50 : WORD ;
  1291. STAT51 : WORD ;
  1292. STAT52 : WORD ;
  1293. STAT53 : WORD ;
  1294. STAT54 : WORD ;
  1295. STAT55 : WORD ;
  1296. STAT56 : WORD ;
  1297. STAT57 : WORD ;
  1298. STAT58 : WORD ;
  1299. STAT59 : WORD ;
  1300. STAT60 : WORD ;
  1301. STAT61 : WORD ;
  1302. STAT62 : WORD ;
  1303. STAT63 : WORD ;
  1304. STAT64 : WORD ;
  1305. STAT65 : WORD ;
  1306. STAT66 : WORD ;
  1307. STAT67 : WORD ;
  1308. STAT68 : WORD ;
  1309. STAT69 : WORD ;
  1310. STAT70 : WORD ;
  1311. STAT71 : WORD ;
  1312. STAT72 : WORD ;
  1313. STAT73 : WORD ;
  1314. STAT74 : WORD ;
  1315. STAT75 : WORD ;
  1316. STAT76 : WORD ;
  1317. STAT77 : WORD ;
  1318. STAT78 : WORD ;
  1319. STAT79 : WORD ;
  1320. STAT80 : WORD ;
  1321. STAT81 : WORD ;
  1322. STAT82 : WORD ;
  1323. STAT83 : WORD ;
  1324. STAT84 : WORD ;
  1325. STAT85 : WORD ;
  1326. STAT86 : WORD ;
  1327. STAT87 : WORD ;
  1328. STAT88 : WORD ;
  1329. STAT89 : WORD ;
  1330. STAT90 : WORD ;
  1331. STAT91 : WORD ;
  1332. STAT92 : WORD ;
  1333. STAT93 : WORD ;
  1334. STAT94 : WORD ;
  1335. STAT95 : WORD ;
  1336. STAT96 : WORD ;
  1337. STAT97 : WORD ;
  1338. STAT98 : WORD ;
  1339. STAT99 : WORD ;
  1340. STAT100 : WORD ;
  1341. STAT101 : WORD ;
  1342. STAT102 : WORD ;
  1343. STAT103 : WORD ;
  1344. STAT104 : WORD ;
  1345. STAT105 : WORD ;
  1346. STAT106 : WORD ;
  1347. STAT107 : WORD ;
  1348. STAT108 : WORD ;
  1349. STAT109 : WORD ;
  1350. STAT110 : WORD ;
  1351. STAT111 : WORD ;
  1352. STAT112 : WORD ;
  1353. STAT113 : WORD ;
  1354. STAT114 : WORD ;
  1355. STAT115 : WORD ;
  1356. STAT116 : WORD ;
  1357. STAT117 : WORD ;
  1358. STAT118 : WORD ;
  1359. STAT119 : WORD ;
  1360. STAT120 : WORD ;
  1361. STAT121 : WORD ;
  1362. STAT122 : WORD ;
  1363. STAT123 : WORD ;
  1364. STAT124 : WORD ;
  1365. STAT125 : WORD ;
  1366. STAT126 : WORD ;
  1367. STAT127 : WORD ;
  1368. STAT128 : WORD ;
  1369. STAT129 : WORD ;
  1370. END_STRUCT ;
  1371. BEGIN
  1372. STAT0 := W#16#0;
  1373. STAT1 := W#16#0;
  1374. STAT2 := W#16#0;
  1375. STAT3 := W#16#0;
  1376. STAT4 := W#16#0;
  1377. STAT5 := W#16#0;
  1378. STAT6 := W#16#0;
  1379. STAT7 := W#16#0;
  1380. STAT8 := W#16#0;
  1381. STAT9 := W#16#0;
  1382. STAT10 := W#16#0;
  1383. STAT11 := W#16#0;
  1384. STAT12 := W#16#0;
  1385. STAT13 := W#16#0;
  1386. STAT14 := W#16#0;
  1387. STAT15 := W#16#0;
  1388. STAT16 := W#16#0;
  1389. STAT17 := W#16#0;
  1390. STAT18 := W#16#0;
  1391. STAT19 := W#16#0;
  1392. STAT20 := W#16#0;
  1393. STAT21 := W#16#0;
  1394. STAT22 := W#16#0;
  1395. STAT23 := W#16#0;
  1396. STAT24 := W#16#0;
  1397. STAT25 := W#16#0;
  1398. STAT26 := W#16#0;
  1399. STAT27 := W#16#0;
  1400. STAT28 := W#16#0;
  1401. STAT29 := W#16#0;
  1402. STAT30 := W#16#0;
  1403. STAT31 := W#16#0;
  1404. STAT32 := W#16#0;
  1405. STAT33 := W#16#0;
  1406. STAT34 := W#16#0;
  1407. STAT35 := W#16#0;
  1408. STAT36 := W#16#0;
  1409. STAT37 := W#16#0;
  1410. STAT38 := W#16#0;
  1411. STAT39 := W#16#0;
  1412. STAT40 := W#16#0;
  1413. STAT41 := W#16#0;
  1414. STAT42 := W#16#0;
  1415. STAT43 := W#16#0;
  1416. STAT44 := W#16#0;
  1417. STAT45 := W#16#0;
  1418. STAT46 := W#16#0;
  1419. STAT47 := W#16#0;
  1420. STAT48 := W#16#0;
  1421. STAT49 := W#16#0;
  1422. STAT50 := W#16#0;
  1423. STAT51 := W#16#0;
  1424. STAT52 := W#16#0;
  1425. STAT53 := W#16#0;
  1426. STAT54 := W#16#0;
  1427. STAT55 := W#16#0;
  1428. STAT56 := W#16#0;
  1429. STAT57 := W#16#0;
  1430. STAT58 := W#16#0;
  1431. STAT59 := W#16#0;
  1432. STAT60 := W#16#0;
  1433. STAT61 := W#16#0;
  1434. STAT62 := W#16#0;
  1435. STAT63 := W#16#0;
  1436. STAT64 := W#16#0;
  1437. STAT65 := W#16#0;
  1438. STAT66 := W#16#0;
  1439. STAT67 := W#16#0;
  1440. STAT68 := W#16#0;
  1441. STAT69 := W#16#0;
  1442. STAT70 := W#16#0;
  1443. STAT71 := W#16#0;
  1444. STAT72 := W#16#0;
  1445. STAT73 := W#16#0;
  1446. STAT74 := W#16#0;
  1447. STAT75 := W#16#0;
  1448. STAT76 := W#16#0;
  1449. STAT77 := W#16#0;
  1450. STAT78 := W#16#0;
  1451. STAT79 := W#16#0;
  1452. STAT80 := W#16#0;
  1453. STAT81 := W#16#0;
  1454. STAT82 := W#16#0;
  1455. STAT83 := W#16#0;
  1456. STAT84 := W#16#0;
  1457. STAT85 := W#16#0;
  1458. STAT86 := W#16#0;
  1459. STAT87 := W#16#0;
  1460. STAT88 := W#16#0;
  1461. STAT89 := W#16#0;
  1462. STAT90 := W#16#0;
  1463. STAT91 := W#16#0;
  1464. STAT92 := W#16#0;
  1465. STAT93 := W#16#0;
  1466. STAT94 := W#16#0;
  1467. STAT95 := W#16#0;
  1468. STAT96 := W#16#0;
  1469. STAT97 := W#16#0;
  1470. STAT98 := W#16#0;
  1471. STAT99 := W#16#0;
  1472. STAT100 := W#16#0;
  1473. STAT101 := W#16#0;
  1474. STAT102 := W#16#0;
  1475. STAT103 := W#16#0;
  1476. STAT104 := W#16#0;
  1477. STAT105 := W#16#0;
  1478. STAT106 := W#16#0;
  1479. STAT107 := W#16#0;
  1480. STAT108 := W#16#0;
  1481. STAT109 := W#16#0;
  1482. STAT110 := W#16#0;
  1483. STAT111 := W#16#0;
  1484. STAT112 := W#16#0;
  1485. STAT113 := W#16#0;
  1486. STAT114 := W#16#0;
  1487. STAT115 := W#16#0;
  1488. STAT116 := W#16#0;
  1489. STAT117 := W#16#0;
  1490. STAT118 := W#16#0;
  1491. STAT119 := W#16#0;
  1492. STAT120 := W#16#0;
  1493. STAT121 := W#16#0;
  1494. STAT122 := W#16#0;
  1495. STAT123 := W#16#0;
  1496. STAT124 := W#16#0;
  1497. STAT125 := W#16#0;
  1498. STAT126 := W#16#0;
  1499. STAT127 := W#16#0;
  1500. STAT128 := W#16#0;
  1501. STAT129 := W#16#0;
  1502. END_DATA_BLOCK
  1503. DATA_BLOCK DB 182
  1504. AUTHOR :
  1505. FAMILY : GENERAL
  1506. NAME : STATUS
  1507. VERSION : 0.1
  1508. STRUCT
  1509. STAT0 : WORD ;
  1510. STAT1 : WORD ;
  1511. STAT2 : WORD ;
  1512. STAT3 : WORD ;
  1513. STAT4 : WORD ;
  1514. STAT5 : WORD ;
  1515. STAT6 : WORD ;
  1516. STAT7 : WORD ;
  1517. STAT8 : WORD ;
  1518. STAT9 : WORD ;
  1519. STAT10 : WORD ;
  1520. STAT11 : WORD ;
  1521. STAT12 : WORD ;
  1522. STAT13 : WORD ;
  1523. STAT14 : WORD ;
  1524. STAT15 : WORD ;
  1525. STAT16 : WORD ;
  1526. STAT17 : WORD ;
  1527. STAT18 : WORD ;
  1528. STAT19 : WORD ;
  1529. STAT20 : WORD ;
  1530. STAT21 : WORD ;
  1531. STAT22 : WORD ;
  1532. STAT23 : WORD ;
  1533. STAT24 : WORD ;
  1534. STAT25 : WORD ;
  1535. STAT26 : WORD ;
  1536. STAT27 : WORD ;
  1537. STAT28 : WORD ;
  1538. STAT29 : WORD ;
  1539. STAT30 : WORD ;
  1540. STAT31 : WORD ;
  1541. STAT32 : WORD ;
  1542. STAT33 : WORD ;
  1543. STAT34 : WORD ;
  1544. STAT35 : WORD ;
  1545. STAT36 : WORD ;
  1546. STAT37 : WORD ;
  1547. STAT38 : WORD ;
  1548. STAT39 : WORD ;
  1549. STAT40 : WORD ;
  1550. STAT41 : WORD ;
  1551. STAT42 : WORD ;
  1552. STAT43 : WORD ;
  1553. STAT44 : WORD ;
  1554. STAT45 : WORD ;
  1555. STAT46 : WORD ;
  1556. STAT47 : WORD ;
  1557. STAT48 : WORD ;
  1558. STAT49 : WORD ;
  1559. STAT50 : WORD ;
  1560. STAT51 : WORD ;
  1561. STAT52 : WORD ;
  1562. STAT53 : WORD ;
  1563. STAT54 : WORD ;
  1564. STAT55 : WORD ;
  1565. STAT56 : WORD ;
  1566. STAT57 : WORD ;
  1567. STAT58 : WORD ;
  1568. STAT59 : WORD ;
  1569. STAT60 : WORD ;
  1570. STAT61 : WORD ;
  1571. STAT62 : WORD ;
  1572. STAT63 : WORD ;
  1573. STAT64 : WORD ;
  1574. STAT65 : WORD ;
  1575. STAT66 : WORD ;
  1576. STAT67 : WORD ;
  1577. STAT68 : WORD ;
  1578. STAT69 : WORD ;
  1579. STAT70 : WORD ;
  1580. STAT71 : WORD ;
  1581. STAT72 : WORD ;
  1582. STAT73 : WORD ;
  1583. STAT74 : WORD ;
  1584. STAT75 : WORD ;
  1585. STAT76 : WORD ;
  1586. STAT77 : WORD ;
  1587. STAT78 : WORD ;
  1588. STAT79 : WORD ;
  1589. STAT80 : WORD ;
  1590. STAT81 : WORD ;
  1591. STAT82 : WORD ;
  1592. STAT83 : WORD ;
  1593. STAT84 : WORD ;
  1594. STAT85 : WORD ;
  1595. STAT86 : WORD ;
  1596. STAT87 : WORD ;
  1597. STAT88 : WORD ;
  1598. STAT89 : WORD ;
  1599. STAT90 : WORD ;
  1600. STAT91 : WORD ;
  1601. STAT92 : WORD ;
  1602. STAT93 : WORD ;
  1603. STAT94 : WORD ;
  1604. STAT95 : WORD ;
  1605. STAT96 : WORD ;
  1606. STAT97 : WORD ;
  1607. STAT98 : WORD ;
  1608. STAT99 : WORD ;
  1609. STAT100 : WORD ;
  1610. STAT101 : WORD ;
  1611. STAT102 : WORD ;
  1612. STAT103 : WORD ;
  1613. STAT104 : WORD ;
  1614. STAT105 : WORD ;
  1615. STAT106 : WORD ;
  1616. STAT107 : WORD ;
  1617. STAT108 : WORD ;
  1618. STAT109 : WORD ;
  1619. STAT110 : WORD ;
  1620. STAT111 : WORD ;
  1621. STAT112 : WORD ;
  1622. STAT113 : WORD ;
  1623. STAT114 : WORD ;
  1624. STAT115 : WORD ;
  1625. STAT116 : WORD ;
  1626. STAT117 : WORD ;
  1627. STAT118 : WORD ;
  1628. STAT119 : WORD ;
  1629. STAT120 : WORD ;
  1630. STAT121 : WORD ;
  1631. STAT122 : WORD ;
  1632. STAT123 : WORD ;
  1633. STAT124 : WORD ;
  1634. STAT125 : WORD ;
  1635. STAT126 : WORD ;
  1636. STAT127 : WORD ;
  1637. STAT128 : WORD ;
  1638. STAT129 : WORD ;
  1639. STAT130 : WORD ;
  1640. STAT131 : WORD ;
  1641. STAT132 : WORD ;
  1642. STAT133 : WORD ;
  1643. STAT134 : WORD ;
  1644. STAT135 : WORD ;
  1645. STAT136 : WORD ;
  1646. STAT137 : WORD ;
  1647. STAT138 : WORD ;
  1648. STAT139 : WORD ;
  1649. STAT140 : WORD ;
  1650. STAT141 : WORD ;
  1651. STAT142 : WORD ;
  1652. STAT143 : WORD ;
  1653. STAT144 : WORD ;
  1654. STAT145 : WORD ;
  1655. STAT146 : WORD ;
  1656. STAT147 : WORD ;
  1657. STAT148 : WORD ;
  1658. STAT149 : WORD ;
  1659. STAT150 : WORD ;
  1660. STAT151 : WORD ;
  1661. STAT152 : WORD ;
  1662. STAT153 : WORD ;
  1663. STAT154 : WORD ;
  1664. STAT155 : WORD ;
  1665. STAT156 : WORD ;
  1666. STAT157 : WORD ;
  1667. STAT158 : WORD ;
  1668. STAT159 : WORD ;
  1669. STAT160 : WORD ;
  1670. STAT161 : WORD ;
  1671. STAT162 : WORD ;
  1672. STAT163 : WORD ;
  1673. STAT164 : WORD ;
  1674. STAT165 : WORD ;
  1675. STAT166 : WORD ;
  1676. STAT167 : WORD ;
  1677. STAT168 : WORD ;
  1678. STAT169 : WORD ;
  1679. STAT170 : WORD ;
  1680. STAT171 : WORD ;
  1681. STAT172 : WORD ;
  1682. STAT173 : WORD ;
  1683. STAT174 : WORD ;
  1684. STAT175 : WORD ;
  1685. STAT176 : WORD ;
  1686. STAT177 : WORD ;
  1687. STAT178 : WORD ;
  1688. STAT179 : WORD ;
  1689. END_STRUCT ;
  1690. BEGIN
  1691. STAT0 := W#16#0;
  1692. STAT1 := W#16#0;
  1693. STAT2 := W#16#0;
  1694. STAT3 := W#16#0;
  1695. STAT4 := W#16#0;
  1696. STAT5 := W#16#0;
  1697. STAT6 := W#16#0;
  1698. STAT7 := W#16#0;
  1699. STAT8 := W#16#0;
  1700. STAT9 := W#16#0;
  1701. STAT10 := W#16#0;
  1702. STAT11 := W#16#0;
  1703. STAT12 := W#16#0;
  1704. STAT13 := W#16#0;
  1705. STAT14 := W#16#0;
  1706. STAT15 := W#16#0;
  1707. STAT16 := W#16#0;
  1708. STAT17 := W#16#0;
  1709. STAT18 := W#16#0;
  1710. STAT19 := W#16#0;
  1711. STAT20 := W#16#0;
  1712. STAT21 := W#16#0;
  1713. STAT22 := W#16#0;
  1714. STAT23 := W#16#0;
  1715. STAT24 := W#16#0;
  1716. STAT25 := W#16#0;
  1717. STAT26 := W#16#0;
  1718. STAT27 := W#16#300;
  1719. STAT28 := W#16#0;
  1720. STAT29 := W#16#0;
  1721. STAT30 := W#16#0;
  1722. STAT31 := W#16#0;
  1723. STAT32 := W#16#400;
  1724. STAT33 := W#16#0;
  1725. STAT34 := W#16#0;
  1726. STAT35 := W#16#0;
  1727. STAT36 := W#16#0;
  1728. STAT37 := W#16#0;
  1729. STAT38 := W#16#0;
  1730. STAT39 := W#16#0;
  1731. STAT40 := W#16#0;
  1732. STAT41 := W#16#0;
  1733. STAT42 := W#16#0;
  1734. STAT43 := W#16#0;
  1735. STAT44 := W#16#0;
  1736. STAT45 := W#16#0;
  1737. STAT46 := W#16#0;
  1738. STAT47 := W#16#0;
  1739. STAT48 := W#16#0;
  1740. STAT49 := W#16#0;
  1741. STAT50 := W#16#0;
  1742. STAT51 := W#16#0;
  1743. STAT52 := W#16#0;
  1744. STAT53 := W#16#0;
  1745. STAT54 := W#16#0;
  1746. STAT55 := W#16#0;
  1747. STAT56 := W#16#0;
  1748. STAT57 := W#16#0;
  1749. STAT58 := W#16#0;
  1750. STAT59 := W#16#0;
  1751. STAT60 := W#16#0;
  1752. STAT61 := W#16#0;
  1753. STAT62 := W#16#0;
  1754. STAT63 := W#16#0;
  1755. STAT64 := W#16#0;
  1756. STAT65 := W#16#0;
  1757. STAT66 := W#16#0;
  1758. STAT67 := W#16#0;
  1759. STAT68 := W#16#0;
  1760. STAT69 := W#16#0;
  1761. STAT70 := W#16#0;
  1762. STAT71 := W#16#0;
  1763. STAT72 := W#16#0;
  1764. STAT73 := W#16#0;
  1765. STAT74 := W#16#0;
  1766. STAT75 := W#16#0;
  1767. STAT76 := W#16#0;
  1768. STAT77 := W#16#0;
  1769. STAT78 := W#16#0;
  1770. STAT79 := W#16#0;
  1771. STAT80 := W#16#0;
  1772. STAT81 := W#16#0;
  1773. STAT82 := W#16#0;
  1774. STAT83 := W#16#0;
  1775. STAT84 := W#16#0;
  1776. STAT85 := W#16#0;
  1777. STAT86 := W#16#0;
  1778. STAT87 := W#16#0;
  1779. STAT88 := W#16#0;
  1780. STAT89 := W#16#0;
  1781. STAT90 := W#16#0;
  1782. STAT91 := W#16#0;
  1783. STAT92 := W#16#0;
  1784. STAT93 := W#16#0;
  1785. STAT94 := W#16#0;
  1786. STAT95 := W#16#0;
  1787. STAT96 := W#16#0;
  1788. STAT97 := W#16#0;
  1789. STAT98 := W#16#0;
  1790. STAT99 := W#16#0;
  1791. STAT100 := W#16#0;
  1792. STAT101 := W#16#0;
  1793. STAT102 := W#16#0;
  1794. STAT103 := W#16#0;
  1795. STAT104 := W#16#0;
  1796. STAT105 := W#16#0;
  1797. STAT106 := W#16#0;
  1798. STAT107 := W#16#0;
  1799. STAT108 := W#16#0;
  1800. STAT109 := W#16#0;
  1801. STAT110 := W#16#0;
  1802. STAT111 := W#16#0;
  1803. STAT112 := W#16#0;
  1804. STAT113 := W#16#0;
  1805. STAT114 := W#16#0;
  1806. STAT115 := W#16#0;
  1807. STAT116 := W#16#0;
  1808. STAT117 := W#16#0;
  1809. STAT118 := W#16#0;
  1810. STAT119 := W#16#0;
  1811. STAT120 := W#16#0;
  1812. STAT121 := W#16#0;
  1813. STAT122 := W#16#0;
  1814. STAT123 := W#16#0;
  1815. STAT124 := W#16#0;
  1816. STAT125 := W#16#0;
  1817. STAT126 := W#16#0;
  1818. STAT127 := W#16#0;
  1819. STAT128 := W#16#0;
  1820. STAT129 := W#16#0;
  1821. STAT130 := W#16#0;
  1822. STAT131 := W#16#0;
  1823. STAT132 := W#16#0;
  1824. STAT133 := W#16#0;
  1825. STAT134 := W#16#0;
  1826. STAT135 := W#16#0;
  1827. STAT136 := W#16#0;
  1828. STAT137 := W#16#0;
  1829. STAT138 := W#16#0;
  1830. STAT139 := W#16#0;
  1831. STAT140 := W#16#0;
  1832. STAT141 := W#16#0;
  1833. STAT142 := W#16#0;
  1834. STAT143 := W#16#0;
  1835. STAT144 := W#16#0;
  1836. STAT145 := W#16#0;
  1837. STAT146 := W#16#0;
  1838. STAT147 := W#16#0;
  1839. STAT148 := W#16#0;
  1840. STAT149 := W#16#0;
  1841. STAT150 := W#16#0;
  1842. STAT151 := W#16#0;
  1843. STAT152 := W#16#0;
  1844. STAT153 := W#16#0;
  1845. STAT154 := W#16#0;
  1846. STAT155 := W#16#0;
  1847. STAT156 := W#16#0;
  1848. STAT157 := W#16#0;
  1849. STAT158 := W#16#0;
  1850. STAT159 := W#16#0;
  1851. STAT160 := W#16#0;
  1852. STAT161 := W#16#0;
  1853. STAT162 := W#16#0;
  1854. STAT163 := W#16#0;
  1855. STAT164 := W#16#0;
  1856. STAT165 := W#16#0;
  1857. STAT166 := W#16#0;
  1858. STAT167 := W#16#0;
  1859. STAT168 := W#16#0;
  1860. STAT169 := W#16#0;
  1861. STAT170 := W#16#0;
  1862. STAT171 := W#16#0;
  1863. STAT172 := W#16#0;
  1864. STAT173 := W#16#0;
  1865. STAT174 := W#16#0;
  1866. STAT175 := W#16#0;
  1867. STAT176 := W#16#0;
  1868. STAT177 := W#16#0;
  1869. STAT178 := W#16#0;
  1870. STAT179 := W#16#0;
  1871. END_DATA_BLOCK
  1872. DATA_BLOCK DB 191
  1873. AUTHOR :
  1874. FAMILY : GENERAL
  1875. NAME : STATUS
  1876. VERSION : 0.0
  1877. STRUCT
  1878. STAT0 : INT ;
  1879. STAT1 : WORD ;
  1880. STAT2 : WORD ;
  1881. STAT3 : WORD ;
  1882. STAT4 : WORD ;
  1883. STAT5 : WORD ;
  1884. STAT6 : WORD ;
  1885. STAT7 : WORD ;
  1886. STAT8 : WORD ;
  1887. STAT9 : WORD ;
  1888. STAT10 : WORD ;
  1889. STAT11 : WORD ;
  1890. STAT12 : WORD ;
  1891. STAT13 : WORD ;
  1892. STAT14 : WORD ;
  1893. STAT15 : WORD ;
  1894. STAT16 : WORD ;
  1895. STAT17 : WORD ;
  1896. STAT18 : WORD ;
  1897. STAT19 : WORD ;
  1898. STAT20 : WORD ;
  1899. STAT21 : INT ;
  1900. STAT22 : INT ;
  1901. STAT23 : INT ;
  1902. STAT24 : INT ;
  1903. STAT25 : INT ;
  1904. STAT26 : INT ;
  1905. STAT27 : INT ;
  1906. STAT28 : INT ;
  1907. STAT29 : INT ;
  1908. STAT30 : INT ;
  1909. STAT31 : INT ;
  1910. STAT32 : INT ;
  1911. STAT33 : INT ;
  1912. STAT34 : INT ;
  1913. STAT35 : INT ;
  1914. STAT36 : INT ;
  1915. STAT37 : INT ;
  1916. STAT38 : INT ;
  1917. STAT39 : INT ;
  1918. STAT40 : INT ;
  1919. STAT41 : INT ;
  1920. STAT42 : INT ;
  1921. STAT43 : INT ;
  1922. STAT44 : INT ;
  1923. STAT45 : INT ;
  1924. STAT46 : INT ;
  1925. STAT47 : INT ;
  1926. STAT48 : INT ;
  1927. STAT49 : INT ;
  1928. STAT50 : INT ;
  1929. STAT51 : INT ;
  1930. STAT52 : INT ;
  1931. STAT53 : INT ;
  1932. STAT54 : INT ;
  1933. STAT55 : INT ;
  1934. STAT56 : INT ;
  1935. STAT57 : INT ;
  1936. STAT58 : INT ;
  1937. STAT59 : INT ;
  1938. STAT60 : INT ;
  1939. STAT61 : INT ;
  1940. STAT62 : INT ;
  1941. STAT63 : INT ;
  1942. STAT64 : INT ;
  1943. STAT65 : INT ;
  1944. STAT66 : INT ;
  1945. STAT67 : INT ;
  1946. STAT68 : INT ;
  1947. STAT69 : INT ;
  1948. STAT70 : INT ;
  1949. STAT71 : INT ;
  1950. STAT72 : INT ;
  1951. STAT73 : INT ;
  1952. STAT74 : INT ;
  1953. STAT75 : INT ;
  1954. STAT76 : INT ;
  1955. STAT77 : INT ;
  1956. STAT78 : INT ;
  1957. STAT79 : INT ;
  1958. STAT80 : INT ;
  1959. STAT81 : INT ;
  1960. STAT82 : INT ;
  1961. STAT83 : INT ;
  1962. STAT84 : INT ;
  1963. STAT85 : INT ;
  1964. STAT86 : INT ;
  1965. STAT87 : INT ;
  1966. STAT88 : INT ;
  1967. STAT89 : INT ;
  1968. STAT90 : INT ;
  1969. STAT91 : INT ;
  1970. STAT92 : INT ;
  1971. STAT93 : INT ;
  1972. STAT94 : INT ;
  1973. STAT95 : INT ;
  1974. STAT96 : INT ;
  1975. STAT97 : INT ;
  1976. STAT98 : INT ;
  1977. STAT99 : INT ;
  1978. STAT100 : INT ;
  1979. STAT101 : INT ;
  1980. STAT102 : INT ;
  1981. STAT103 : INT ;
  1982. STAT104 : INT ;
  1983. STAT105 : INT ;
  1984. STAT106 : INT ;
  1985. STAT107 : INT ;
  1986. STAT108 : INT ;
  1987. STAT109 : INT ;
  1988. STAT110 : INT ;
  1989. STAT111 : INT ;
  1990. STAT112 : INT ;
  1991. STAT113 : INT ;
  1992. STAT114 : INT ;
  1993. STAT115 : INT ;
  1994. STAT116 : INT ;
  1995. STAT117 : INT ;
  1996. STAT118 : INT ;
  1997. STAT119 : INT ;
  1998. STAT120 : INT ;
  1999. STAT121 : REAL ;
  2000. STAT122 : REAL ;
  2001. STAT123 : REAL ;
  2002. STAT124 : REAL ;
  2003. STAT125 : REAL ;
  2004. STAT126 : REAL ;
  2005. STAT127 : REAL ;
  2006. STAT128 : REAL ;
  2007. STAT129 : REAL ;
  2008. STAT130 : REAL ;
  2009. END_STRUCT ;
  2010. BEGIN
  2011. STAT0 := 0;
  2012. STAT1 := W#16#0;
  2013. STAT2 := W#16#0;
  2014. STAT3 := W#16#0;
  2015. STAT4 := W#16#0;
  2016. STAT5 := W#16#0;
  2017. STAT6 := W#16#0;
  2018. STAT7 := W#16#0;
  2019. STAT8 := W#16#0;
  2020. STAT9 := W#16#0;
  2021. STAT10 := W#16#0;
  2022. STAT11 := W#16#0;
  2023. STAT12 := W#16#0;
  2024. STAT13 := W#16#0;
  2025. STAT14 := W#16#0;
  2026. STAT15 := W#16#0;
  2027. STAT16 := W#16#0;
  2028. STAT17 := W#16#0;
  2029. STAT18 := W#16#0;
  2030. STAT19 := W#16#0;
  2031. STAT20 := W#16#0;
  2032. STAT21 := 0;
  2033. STAT22 := 0;
  2034. STAT23 := 0;
  2035. STAT24 := 0;
  2036. STAT25 := 0;
  2037. STAT26 := 0;
  2038. STAT27 := 0;
  2039. STAT28 := 0;
  2040. STAT29 := 0;
  2041. STAT30 := 0;
  2042. STAT31 := 0;
  2043. STAT32 := 0;
  2044. STAT33 := 0;
  2045. STAT34 := 0;
  2046. STAT35 := 0;
  2047. STAT36 := 0;
  2048. STAT37 := 0;
  2049. STAT38 := 0;
  2050. STAT39 := 0;
  2051. STAT40 := 0;
  2052. STAT41 := 0;
  2053. STAT42 := 0;
  2054. STAT43 := 0;
  2055. STAT44 := 0;
  2056. STAT45 := 0;
  2057. STAT46 := 0;
  2058. STAT47 := 0;
  2059. STAT48 := 0;
  2060. STAT49 := 0;
  2061. STAT50 := 0;
  2062. STAT51 := 0;
  2063. STAT52 := 0;
  2064. STAT53 := 0;
  2065. STAT54 := 0;
  2066. STAT55 := 0;
  2067. STAT56 := 0;
  2068. STAT57 := 0;
  2069. STAT58 := 0;
  2070. STAT59 := 0;
  2071. STAT60 := 0;
  2072. STAT61 := 0;
  2073. STAT62 := 0;
  2074. STAT63 := 0;
  2075. STAT64 := 0;
  2076. STAT65 := 0;
  2077. STAT66 := 0;
  2078. STAT67 := 0;
  2079. STAT68 := 0;
  2080. STAT69 := 0;
  2081. STAT70 := 0;
  2082. STAT71 := 0;
  2083. STAT72 := 0;
  2084. STAT73 := 0;
  2085. STAT74 := 0;
  2086. STAT75 := 0;
  2087. STAT76 := 0;
  2088. STAT77 := 0;
  2089. STAT78 := 0;
  2090. STAT79 := 0;
  2091. STAT80 := 0;
  2092. STAT81 := 0;
  2093. STAT82 := 0;
  2094. STAT83 := 0;
  2095. STAT84 := 0;
  2096. STAT85 := 0;
  2097. STAT86 := 0;
  2098. STAT87 := 0;
  2099. STAT88 := 0;
  2100. STAT89 := 0;
  2101. STAT90 := 0;
  2102. STAT91 := 0;
  2103. STAT92 := 0;
  2104. STAT93 := 0;
  2105. STAT94 := 0;
  2106. STAT95 := 0;
  2107. STAT96 := 0;
  2108. STAT97 := 0;
  2109. STAT98 := 0;
  2110. STAT99 := 0;
  2111. STAT100 := 0;
  2112. STAT101 := 0;
  2113. STAT102 := 0;
  2114. STAT103 := 0;
  2115. STAT104 := 0;
  2116. STAT105 := 0;
  2117. STAT106 := 0;
  2118. STAT107 := 0;
  2119. STAT108 := 0;
  2120. STAT109 := 0;
  2121. STAT110 := 0;
  2122. STAT111 := 0;
  2123. STAT112 := 0;
  2124. STAT113 := 0;
  2125. STAT114 := 0;
  2126. STAT115 := 0;
  2127. STAT116 := 0;
  2128. STAT117 := 0;
  2129. STAT118 := 0;
  2130. STAT119 := 0;
  2131. STAT120 := 0;
  2132. STAT121 := 0.000000e+000;
  2133. STAT122 := 0.000000e+000;
  2134. STAT123 := 0.000000e+000;
  2135. STAT124 := 0.000000e+000;
  2136. STAT125 := 0.000000e+000;
  2137. STAT126 := 0.000000e+000;
  2138. STAT127 := 0.000000e+000;
  2139. STAT128 := 0.000000e+000;
  2140. STAT129 := 0.000000e+000;
  2141. STAT130 := 0.000000e+000;
  2142. END_DATA_BLOCK
  2143. FUNCTION FC 170 : WORD
  2144. AUTHOR :
  2145. FAMILY : CONVERT
  2146. NAME : SCALE
  2147. VERSION : 2.0
  2148. VAR_INPUT
  2149. IN0 : INT ;
  2150. IN1 : REAL ;
  2151. IN2 : REAL ;
  2152. IN3 : BOOL ;
  2153. END_VAR
  2154. VAR_OUTPUT
  2155. OUT4 : REAL ;
  2156. END_VAR
  2157. VAR_TEMP
  2158. TEMP5 : REAL ;
  2159. TEMP6 : REAL ;
  2160. TEMP7 : REAL ;
  2161. TEMP8 : REAL ;
  2162. TEMP9 : REAL ;
  2163. END_VAR
  2164. BEGIN
  2165. NETWORK
  2166. TITLE =
  2167. SET ;
  2168. A #IN3;
  2169. JC M001;
  2170. L 0.000000e+000;
  2171. T #TEMP6;
  2172. JU M002;
  2173. M001: L -2.764800e+004;
  2174. T #TEMP6;
  2175. M002: NOP 0;
  2176. L 2.764800e+004;
  2177. T #TEMP7;
  2178. L #IN0;
  2179. ITD ;
  2180. DTR ;
  2181. T #TEMP5;
  2182. L #IN1;
  2183. L #IN2;
  2184. -R ;
  2185. T #TEMP8;
  2186. L #TEMP5;
  2187. L #TEMP6;
  2188. >=R ;
  2189. JC M003;
  2190. L 8;
  2191. T #RET_VAL;
  2192. L #TEMP8;
  2193. L 0.000000e+000;
  2194. <R ;
  2195. JCN M004;
  2196. L #IN1;
  2197. JU M005;
  2198. M004: L #IN2;
  2199. M005: NOP 0;
  2200. T #OUT4;
  2201. JU M006;
  2202. M003: POP ;
  2203. L #TEMP7;
  2204. <=R ;
  2205. JC M007;
  2206. L 8;
  2207. T #RET_VAL;
  2208. L #TEMP8;
  2209. L 0.000000e+000;
  2210. <R ;
  2211. JCN M008;
  2212. L #IN2;
  2213. JU M009;
  2214. M008: L #IN1;
  2215. M009: NOP 0;
  2216. T #OUT4;
  2217. JU M006;
  2218. M007: NOP 0;
  2219. NOP 0;
  2220. L #TEMP7;
  2221. L #TEMP6;
  2222. -R ;
  2223. T #TEMP9;
  2224. L #TEMP5;
  2225. L #TEMP6;
  2226. -R ;
  2227. L #TEMP9;
  2228. /R ;
  2229. L #TEMP8;
  2230. *R ;
  2231. L #IN2;
  2232. +R ;
  2233. T #OUT4;
  2234. L 0;
  2235. T #RET_VAL;
  2236. SET ;
  2237. JU M00a;
  2238. M006: CLR ;
  2239. M00a: SAVE ;
  2240. END_FUNCTION
  2241. FUNCTION FC 185 : VOID
  2242. AUTHOR :
  2243. FAMILY : MEASURE
  2244. NAME : FILTER
  2245. VERSION : 0.1
  2246. VAR_INPUT
  2247. IN0 : REAL ;
  2248. IN1 : REAL ;
  2249. IN2 : BOOL ;
  2250. END_VAR
  2251. VAR_OUTPUT
  2252. OUT3 : REAL ;
  2253. END_VAR
  2254. VAR_IN_OUT
  2255. IO4 : REAL ;
  2256. END_VAR
  2257. VAR_TEMP
  2258. TEMP5 : REAL ;
  2259. TEMP6 : REAL ;
  2260. TEMP7 : REAL ;
  2261. TEMP8 : REAL ;
  2262. TEMP9 : REAL ;
  2263. TEMP10 : REAL ;
  2264. TEMP11 : REAL ;
  2265. END_VAR
  2266. BEGIN
  2267. NETWORK
  2268. TITLE =
  2269. L #IN0;
  2270. T #TEMP5;
  2271. NOP 0;
  2272. NETWORK
  2273. TITLE =
  2274. AN #IN2;
  2275. JC M001;
  2276. NETWORK
  2277. TITLE =
  2278. M002: L #IN0;
  2279. T #OUT3;
  2280. NOP 0;
  2281. NETWORK
  2282. TITLE =
  2283. L #TEMP5;
  2284. T #IO4;
  2285. NOP 0;
  2286. NETWORK
  2287. TITLE =
  2288. A M 20.1;
  2289. JC M003;
  2290. NETWORK
  2291. TITLE =
  2292. M001: A( ;
  2293. L #TEMP5;
  2294. L #IO4;
  2295. ==R ;
  2296. ) ;
  2297. JNB M004;
  2298. L #TEMP5;
  2299. T #OUT3;
  2300. M004: NOP 0;
  2301. NETWORK
  2302. TITLE =
  2303. L #TEMP5;
  2304. L #IO4;
  2305. ==R ;
  2306. SAVE ;
  2307. BEC ;
  2308. NETWORK
  2309. TITLE =
  2310. L #IN1;
  2311. L 0.000000e+000;
  2312. <R ;
  2313. JC M002;
  2314. NETWORK
  2315. TITLE =
  2316. L #IN1;
  2317. L 1.000000e+002;
  2318. >R ;
  2319. JC M002;
  2320. NETWORK
  2321. TITLE =
  2322. L #TEMP5;
  2323. L #IO4;
  2324. -R ;
  2325. T #TEMP6;
  2326. NOP 0;
  2327. NETWORK
  2328. TITLE =
  2329. L #IN1;
  2330. T #TEMP8;
  2331. NOP 0;
  2332. NETWORK
  2333. TITLE =
  2334. L #TEMP8;
  2335. L #TEMP6;
  2336. *R ;
  2337. T #TEMP9;
  2338. NOP 0;
  2339. NETWORK
  2340. TITLE =
  2341. L #TEMP9;
  2342. L 1.000000e+002;
  2343. /R ;
  2344. T #TEMP10;
  2345. NOP 0;
  2346. NETWORK
  2347. TITLE =
  2348. L #IO4;
  2349. L #TEMP10;
  2350. +R ;
  2351. T #IO4;
  2352. NOP 0;
  2353. NETWORK
  2354. TITLE =
  2355. L #IO4;
  2356. T #OUT3;
  2357. NOP 0;
  2358. NETWORK
  2359. TITLE =
  2360. M003: A M 20.1;
  2361. SAVE ;
  2362. BEC ;
  2363. END_FUNCTION
  2364. FUNCTION FC 171 : WORD
  2365. AUTHOR :
  2366. FAMILY : CONVERT
  2367. NAME : UNSCALE
  2368. VERSION : 2.0
  2369. VAR_INPUT
  2370. IN0 : REAL ;
  2371. IN1 : REAL ;
  2372. IN2 : REAL ;
  2373. IN3 : BOOL ;
  2374. END_VAR
  2375. VAR_OUTPUT
  2376. OUT4 : INT ;
  2377. END_VAR
  2378. VAR_TEMP
  2379. TEMP5 : REAL ;
  2380. TEMP6 : REAL ;
  2381. TEMP7 : REAL ;
  2382. TEMP8 : REAL ;
  2383. END_VAR
  2384. BEGIN
  2385. NETWORK
  2386. TITLE =
  2387. SET ;
  2388. A #IN3;
  2389. JC M001;
  2390. L 0.000000e+000;
  2391. T #TEMP5;
  2392. JU M002;
  2393. M001: L -2.764800e+004;
  2394. T #TEMP5;
  2395. M002: NOP 0;
  2396. L 2.764800e+004;
  2397. T #TEMP6;
  2398. L #IN1;
  2399. L #IN2;
  2400. -R ;
  2401. T #TEMP7;
  2402. L #TEMP7;
  2403. L 0.000000e+000;
  2404. <R ;
  2405. JCN M003;
  2406. L #IN0;
  2407. L #IN1;
  2408. >=R ;
  2409. JC M004;
  2410. L 8;
  2411. T #RET_VAL;
  2412. L #TEMP5;
  2413. JU M005;
  2414. M004: NOP 0;
  2415. POP ;
  2416. L #IN2;
  2417. <=R ;
  2418. JC M006;
  2419. L 8;
  2420. T #RET_VAL;
  2421. L #TEMP6;
  2422. JU M005;
  2423. M006: NOP 0;
  2424. JU M007;
  2425. M003: L #IN0;
  2426. L #IN2;
  2427. >=R ;
  2428. JC M008;
  2429. L 8;
  2430. T #RET_VAL;
  2431. L #TEMP5;
  2432. JU M005;
  2433. M008: NOP 0;
  2434. POP ;
  2435. L #IN1;
  2436. <=R ;
  2437. JC M009;
  2438. L 8;
  2439. T #RET_VAL;
  2440. L #TEMP6;
  2441. JU M005;
  2442. M009: NOP 0;
  2443. M007: NOP 0;
  2444. JU M00a;
  2445. M005: TRUNC ;
  2446. T #OUT4;
  2447. JU M00b;
  2448. M00a: L #TEMP6;
  2449. L #TEMP5;
  2450. -R ;
  2451. T #TEMP8;
  2452. L #IN0;
  2453. L #IN2;
  2454. -R ;
  2455. L #TEMP7;
  2456. /R ;
  2457. L #TEMP8;
  2458. *R ;
  2459. L #TEMP5;
  2460. +R ;
  2461. TRUNC ;
  2462. T #OUT4;
  2463. L 0;
  2464. T #RET_VAL;
  2465. SET ;
  2466. JU M00c;
  2467. M00b: CLR ;
  2468. M00c: SAVE ;
  2469. END_FUNCTION
  2470. FUNCTION FC 179 : VOID
  2471. AUTHOR :
  2472. FAMILY : MEASURE
  2473. NAME : ANALOG
  2474. VERSION : 0.1
  2475. VAR_INPUT
  2476. IN0 : INT ;
  2477. IN1 : REAL ;
  2478. IN2 : REAL ;
  2479. IN3 : REAL ;
  2480. IN4 : REAL ;
  2481. IN5 : REAL ;
  2482. IN6 : REAL ;
  2483. IN7 : REAL ;
  2484. IN8 : REAL ;
  2485. IN9 : BOOL ;
  2486. IN10 : BOOL ;
  2487. IN11 : BOOL ;
  2488. IN12 : BOOL ;
  2489. IN13 : BOOL ;
  2490. IN14 : BOOL ;
  2491. IN15 : BOOL ;
  2492. END_VAR
  2493. VAR_OUTPUT
  2494. OUT16 : REAL ;
  2495. OUT17 : BOOL ;
  2496. OUT18 : BOOL ;
  2497. OUT19 : BOOL ;
  2498. OUT20 : BOOL ;
  2499. OUT21 : BOOL ;
  2500. OUT22 : BOOL ;
  2501. OUT23 : INT ;
  2502. OUT24 : INT ;
  2503. OUT25 : INT ;
  2504. OUT26 : INT ;
  2505. OUT27 : INT ;
  2506. OUT28 : BOOL ;
  2507. OUT29 : BOOL ;
  2508. OUT30 : BOOL ;
  2509. OUT31 : BOOL ;
  2510. OUT32 : BOOL ;
  2511. END_VAR
  2512. VAR_IN_OUT
  2513. IO33 : REAL ;
  2514. IO34 : WORD ;
  2515. IO35 : WORD ;
  2516. END_VAR
  2517. VAR_TEMP
  2518. TEMP36 : WORD ;
  2519. TEMP37 : REAL ;
  2520. TEMP38 : REAL ;
  2521. TEMP39 : REAL ;
  2522. TEMP40 : REAL ;
  2523. TEMP41 : INT ;
  2524. TEMP42 : BOOL ;
  2525. TEMP43 : BOOL ;
  2526. TEMP44 : BOOL ;
  2527. TEMP45 : BOOL ;
  2528. TEMP46 : BOOL ;
  2529. TEMP47 : BOOL ;
  2530. TEMP48 : BOOL ;
  2531. TEMP49 : BOOL ;
  2532. TEMP50 : BOOL ;
  2533. TEMP51 : BOOL ;
  2534. TEMP52 : BOOL ;
  2535. TEMP53 : BOOL ;
  2536. TEMP54 : BOOL ;
  2537. TEMP55 : BOOL ;
  2538. TEMP56 : BOOL ;
  2539. TEMP57 : BOOL ;
  2540. TEMP58 : BOOL ;
  2541. TEMP59 : BOOL ;
  2542. TEMP60 : BOOL ;
  2543. TEMP61 : BOOL ;
  2544. TEMP62 : BOOL ;
  2545. TEMP63 : BOOL ;
  2546. TEMP64 : BOOL ;
  2547. TEMP65 : BOOL ;
  2548. TEMP66 : BOOL ;
  2549. TEMP67 : BOOL ;
  2550. TEMP68 : BOOL ;
  2551. TEMP69 : BOOL ;
  2552. TEMP70 : BOOL ;
  2553. TEMP71 : BOOL ;
  2554. TEMP72 : BOOL ;
  2555. TEMP73 : BOOL ;
  2556. TEMP74 : BOOL ;
  2557. TEMP75 : BOOL ;
  2558. TEMP76 : BOOL ;
  2559. TEMP77 : BOOL ;
  2560. TEMP78 : BOOL ;
  2561. TEMP79 : BOOL ;
  2562. TEMP80 : BOOL ;
  2563. TEMP81 : BOOL ;
  2564. TEMP82 : BOOL ;
  2565. TEMP83 : BOOL ;
  2566. TEMP84 : BOOL ;
  2567. TEMP85 : BOOL ;
  2568. TEMP86 : BOOL ;
  2569. TEMP87 : BOOL ;
  2570. END_VAR
  2571. BEGIN
  2572. NETWORK
  2573. TITLE =
  2574. O( ;
  2575. L #IN0;
  2576. L -2000;
  2577. <I ;
  2578. ) ;
  2579. O( ;
  2580. L #IN0;
  2581. L 29000;
  2582. >I ;
  2583. ) ;
  2584. = L 26.0;
  2585. A L 26.0;
  2586. = #TEMP87;
  2587. A #TEMP87;
  2588. = #OUT21;
  2589. A L 26.0;
  2590. AN #IN14;
  2591. JNB M014;
  2592. L 3;
  2593. T #OUT27;
  2594. M014: NOP 0;
  2595. NETWORK
  2596. TITLE =
  2597. AN #TEMP87;
  2598. JNB M015;
  2599. L #IN0;
  2600. T #TEMP41;
  2601. M015: NOP 0;
  2602. NETWORK
  2603. TITLE =
  2604. A #TEMP87;
  2605. AN #IN9;
  2606. JNB M016;
  2607. L 0;
  2608. T #TEMP41;
  2609. M016: NOP 0;
  2610. NETWORK
  2611. TITLE =
  2612. A #TEMP87;
  2613. A #IN9;
  2614. JNB M001;
  2615. L 27648;
  2616. T #TEMP41;
  2617. M001: NOP 0;
  2618. NETWORK
  2619. TITLE =
  2620. A M 20.0;
  2621. = L 26.0;
  2622. BLD 103;
  2623. CALL FC 170 (
  2624. IN0 := #TEMP41,
  2625. IN1 := #IN1,
  2626. IN2 := #IN2,
  2627. IN3 := L 26.0,
  2628. RET_VAL := #TEMP36,
  2629. OUT4 := #TEMP37);
  2630. NOP 0;
  2631. NETWORK
  2632. TITLE =
  2633. A M 20.5;
  2634. = L 26.0;
  2635. BLD 103;
  2636. CALL FC 185 (
  2637. IN0 := #TEMP37,
  2638. IN1 := #IN8,
  2639. IN2 := L 26.0,
  2640. OUT3 := #TEMP38,
  2641. IO4 := #IO33);
  2642. NOP 0;
  2643. NETWORK
  2644. TITLE =
  2645. A( ;
  2646. A( ;
  2647. A( ;
  2648. A( ;
  2649. L 2;
  2650. T #OUT23;
  2651. SET ;
  2652. SAVE ;
  2653. CLR ;
  2654. A BR;
  2655. ) ;
  2656. JNB M002;
  2657. L 2;
  2658. T #OUT24;
  2659. SET ;
  2660. SAVE ;
  2661. CLR ;
  2662. M002: A BR;
  2663. ) ;
  2664. JNB M003;
  2665. L 2;
  2666. T #OUT25;
  2667. SET ;
  2668. SAVE ;
  2669. CLR ;
  2670. M003: A BR;
  2671. ) ;
  2672. JNB M004;
  2673. L 2;
  2674. T #OUT26;
  2675. SET ;
  2676. SAVE ;
  2677. CLR ;
  2678. M004: A BR;
  2679. ) ;
  2680. JNB M005;
  2681. L 2;
  2682. T #OUT27;
  2683. M005: NOP 0;
  2684. NETWORK
  2685. TITLE =
  2686. L #IN4;
  2687. L #IN3;
  2688. -R ;
  2689. T #TEMP40;
  2690. NOP 0;
  2691. NETWORK
  2692. TITLE =
  2693. A( ;
  2694. A( ;
  2695. L #TEMP38;
  2696. L #IN4;
  2697. >R ;
  2698. ) ;
  2699. S #OUT17;
  2700. A( ;
  2701. L #TEMP38;
  2702. L #TEMP40;
  2703. <R ;
  2704. ) ;
  2705. R #OUT17;
  2706. A #OUT17;
  2707. ) ;
  2708. = #TEMP86;
  2709. A #TEMP86;
  2710. AN #IN10;
  2711. AN #TEMP42;
  2712. JNB M006;
  2713. L 3;
  2714. T #OUT23;
  2715. M006: NOP 0;
  2716. NETWORK
  2717. TITLE =
  2718. L #IN5;
  2719. L #IN3;
  2720. -R ;
  2721. T #TEMP40;
  2722. NOP 0;
  2723. NETWORK
  2724. TITLE =
  2725. A( ;
  2726. A( ;
  2727. L #TEMP38;
  2728. L #IN5;
  2729. >R ;
  2730. ) ;
  2731. S #OUT18;
  2732. A( ;
  2733. L #TEMP38;
  2734. L #TEMP40;
  2735. <R ;
  2736. ) ;
  2737. R #OUT18;
  2738. A #OUT18;
  2739. ) ;
  2740. = #TEMP85;
  2741. A #TEMP85;
  2742. AN #IN11;
  2743. AN #TEMP43;
  2744. JNB M007;
  2745. L 3;
  2746. T #OUT24;
  2747. M007: NOP 0;
  2748. NETWORK
  2749. TITLE =
  2750. L #IN6;
  2751. L #IN3;
  2752. +R ;
  2753. T #TEMP39;
  2754. NOP 0;
  2755. NETWORK
  2756. TITLE =
  2757. A( ;
  2758. A( ;
  2759. L #TEMP38;
  2760. L #IN6;
  2761. <R ;
  2762. ) ;
  2763. S #OUT19;
  2764. A( ;
  2765. L #TEMP38;
  2766. L #TEMP39;
  2767. >R ;
  2768. ) ;
  2769. R #OUT19;
  2770. A #OUT19;
  2771. ) ;
  2772. = #TEMP84;
  2773. A #TEMP84;
  2774. AN #IN12;
  2775. AN #TEMP44;
  2776. JNB M008;
  2777. L 3;
  2778. T #OUT25;
  2779. M008: NOP 0;
  2780. NETWORK
  2781. TITLE =
  2782. L #IN7;
  2783. L #IN3;
  2784. +R ;
  2785. T #TEMP39;
  2786. NOP 0;
  2787. NETWORK
  2788. TITLE =
  2789. A( ;
  2790. A( ;
  2791. L #TEMP38;
  2792. L #IN7;
  2793. <R ;
  2794. ) ;
  2795. S #OUT20;
  2796. A( ;
  2797. L #TEMP38;
  2798. L #TEMP39;
  2799. >R ;
  2800. ) ;
  2801. R #OUT20;
  2802. A #OUT20;
  2803. ) ;
  2804. = #TEMP83;
  2805. A #TEMP83;
  2806. AN #IN13;
  2807. AN #TEMP45;
  2808. JNB M009;
  2809. L 3;
  2810. T #OUT26;
  2811. M009: NOP 0;
  2812. NETWORK
  2813. TITLE =
  2814. L #TEMP38;
  2815. T #OUT16;
  2816. NOP 0;
  2817. NETWORK
  2818. TITLE =
  2819. NETWORK
  2820. TITLE =
  2821. A #IN15;
  2822. = #TEMP82;
  2823. NETWORK
  2824. TITLE =
  2825. L #IO35;
  2826. T LW 22;
  2827. NOP 0;
  2828. NETWORK
  2829. TITLE =
  2830. L #IO34;
  2831. T LW 20;
  2832. NOP 0;
  2833. NETWORK
  2834. TITLE =
  2835. A #IN15;
  2836. R #TEMP42;
  2837. A #TEMP86;
  2838. A #IN10;
  2839. FP #TEMP58;
  2840. S #TEMP42;
  2841. A #TEMP42;
  2842. = L 26.0;
  2843. A L 26.0;
  2844. FP #TEMP66;
  2845. = #TEMP74;
  2846. A L 26.0;
  2847. JNB M00a;
  2848. L 4;
  2849. T #OUT23;
  2850. M00a: NOP 0;
  2851. NETWORK
  2852. TITLE =
  2853. A #IN15;
  2854. R #TEMP43;
  2855. A #TEMP85;
  2856. A #IN11;
  2857. FP #TEMP59;
  2858. S #TEMP43;
  2859. A #TEMP43;
  2860. = L 26.0;
  2861. A L 26.0;
  2862. FP #TEMP67;
  2863. = #TEMP75;
  2864. A L 26.0;
  2865. JNB M00b;
  2866. L 4;
  2867. T #OUT24;
  2868. M00b: NOP 0;
  2869. NETWORK
  2870. TITLE =
  2871. A #IN15;
  2872. R #TEMP44;
  2873. A #TEMP84;
  2874. A #IN12;
  2875. FP #TEMP60;
  2876. S #TEMP44;
  2877. A #TEMP44;
  2878. = L 26.0;
  2879. A L 26.0;
  2880. FP #TEMP68;
  2881. = #TEMP76;
  2882. A L 26.0;
  2883. JNB M00c;
  2884. L 4;
  2885. T #OUT25;
  2886. M00c: NOP 0;
  2887. NETWORK
  2888. TITLE =
  2889. A #IN15;
  2890. R #TEMP45;
  2891. A #TEMP83;
  2892. A #IN13;
  2893. FP #TEMP61;
  2894. S #TEMP45;
  2895. A #TEMP45;
  2896. = L 26.0;
  2897. A L 26.0;
  2898. FP #TEMP69;
  2899. = #TEMP77;
  2900. A L 26.0;
  2901. JNB M00d;
  2902. L 4;
  2903. T #OUT26;
  2904. M00d: NOP 0;
  2905. NETWORK
  2906. TITLE =
  2907. A #IN15;
  2908. R #TEMP46;
  2909. A #TEMP87;
  2910. A #IN14;
  2911. FP #TEMP62;
  2912. S #TEMP46;
  2913. A #TEMP46;
  2914. = L 26.0;
  2915. A L 26.0;
  2916. FP #TEMP70;
  2917. = #TEMP78;
  2918. A L 26.0;
  2919. JNB M00e;
  2920. L 4;
  2921. T #OUT27;
  2922. M00e: NOP 0;
  2923. NETWORK
  2924. TITLE =
  2925. O #TEMP42;
  2926. O ;
  2927. A #TEMP86;
  2928. A #IN10;
  2929. = #OUT28;
  2930. = #TEMP50;
  2931. NETWORK
  2932. TITLE =
  2933. O #TEMP43;
  2934. O ;
  2935. A #TEMP85;
  2936. A #IN11;
  2937. = #OUT29;
  2938. = #TEMP51;
  2939. NETWORK
  2940. TITLE =
  2941. O #TEMP44;
  2942. O ;
  2943. A #TEMP84;
  2944. A #IN12;
  2945. = #OUT30;
  2946. = #TEMP52;
  2947. NETWORK
  2948. TITLE =
  2949. O #TEMP45;
  2950. O ;
  2951. A #TEMP83;
  2952. A #IN13;
  2953. = #OUT31;
  2954. = #TEMP53;
  2955. NETWORK
  2956. TITLE =
  2957. O #TEMP46;
  2958. O ;
  2959. A #TEMP87;
  2960. A #IN14;
  2961. = #OUT32;
  2962. = #TEMP54;
  2963. NETWORK
  2964. TITLE =
  2965. AN #TEMP42;
  2966. A #TEMP86;
  2967. A #IN10;
  2968. JNB M00f;
  2969. L 5;
  2970. T #OUT23;
  2971. M00f: NOP 0;
  2972. NETWORK
  2973. TITLE =
  2974. AN #TEMP43;
  2975. A #TEMP85;
  2976. A #IN11;
  2977. JNB M010;
  2978. L 5;
  2979. T #OUT24;
  2980. M010: NOP 0;
  2981. NETWORK
  2982. TITLE =
  2983. AN #TEMP44;
  2984. A #TEMP84;
  2985. A #IN12;
  2986. JNB M011;
  2987. L 5;
  2988. T #OUT25;
  2989. M011: NOP 0;
  2990. NETWORK
  2991. TITLE =
  2992. AN #TEMP45;
  2993. A #TEMP83;
  2994. A #IN13;
  2995. JNB M012;
  2996. L 5;
  2997. T #OUT26;
  2998. M012: NOP 0;
  2999. NETWORK
  3000. TITLE =
  3001. AN #TEMP46;
  3002. A #TEMP87;
  3003. A #IN14;
  3004. JNB M013;
  3005. L 5;
  3006. T #OUT27;
  3007. M013: NOP 0;
  3008. NETWORK
  3009. TITLE =
  3010. O #TEMP74;
  3011. O #TEMP75;
  3012. O #TEMP76;
  3013. O #TEMP77;
  3014. O #TEMP78;
  3015. = #OUT22;
  3016. NETWORK
  3017. TITLE =
  3018. L LW 20;
  3019. T #IO34;
  3020. NOP 0;
  3021. NETWORK
  3022. TITLE =
  3023. L LW 22;
  3024. T #IO35;
  3025. NOP 0;
  3026. END_FUNCTION
  3027. FUNCTION FC 180 : VOID
  3028. AUTHOR :
  3029. FAMILY : DRIVE
  3030. NAME : S_DRIVE
  3031. VERSION : 0.1
  3032. VAR_INPUT
  3033. IN0 : BOOL ;
  3034. IN1 : BOOL ;
  3035. IN2 : BOOL ;
  3036. IN3 : BOOL ;
  3037. IN4 : BOOL ;
  3038. IN5 : BOOL ;
  3039. IN6 : BOOL ;
  3040. IN7 : BOOL ;
  3041. IN8 : WORD ;
  3042. IN9 : COUNTER ;
  3043. END_VAR
  3044. VAR_OUTPUT
  3045. OUT10 : INT ;
  3046. OUT11 : BOOL ;
  3047. OUT12 : BOOL ;
  3048. OUT13 : BOOL ;
  3049. END_VAR
  3050. VAR_IN_OUT
  3051. IO14 : WORD ;
  3052. IO15 : WORD ;
  3053. END_VAR
  3054. VAR_TEMP
  3055. TEMP16 : BOOL ;
  3056. TEMP17 : BOOL ;
  3057. TEMP18 : BOOL ;
  3058. TEMP19 : BOOL ;
  3059. TEMP20 : BOOL ;
  3060. TEMP21 : BOOL ;
  3061. TEMP22 : BOOL ;
  3062. TEMP23 : BOOL ;
  3063. TEMP24 : BOOL ;
  3064. TEMP25 : BOOL ;
  3065. TEMP26 : BOOL ;
  3066. TEMP27 : BOOL ;
  3067. TEMP28 : BOOL ;
  3068. TEMP29 : BOOL ;
  3069. TEMP30 : BOOL ;
  3070. TEMP31 : BOOL ;
  3071. TEMP32 : BOOL ;
  3072. TEMP33 : BOOL ;
  3073. TEMP34 : BOOL ;
  3074. TEMP35 : BOOL ;
  3075. TEMP36 : BOOL ;
  3076. TEMP37 : BOOL ;
  3077. TEMP38 : BOOL ;
  3078. TEMP39 : BOOL ;
  3079. TEMP40 : BOOL ;
  3080. TEMP41 : BOOL ;
  3081. TEMP42 : BOOL ;
  3082. TEMP43 : BOOL ;
  3083. TEMP44 : BOOL ;
  3084. TEMP45 : BOOL ;
  3085. TEMP46 : BOOL ;
  3086. TEMP47 : BOOL ;
  3087. TEMP48 : BOOL ;
  3088. TEMP49 : BOOL ;
  3089. TEMP50 : BOOL ;
  3090. TEMP51 : BOOL ;
  3091. TEMP52 : BOOL ;
  3092. TEMP53 : BOOL ;
  3093. TEMP54 : BOOL ;
  3094. TEMP55 : BOOL ;
  3095. TEMP56 : BOOL ;
  3096. TEMP57 : BOOL ;
  3097. TEMP58 : BOOL ;
  3098. TEMP59 : BOOL ;
  3099. TEMP60 : BOOL ;
  3100. TEMP61 : BOOL ;
  3101. TEMP62 : BOOL ;
  3102. TEMP63 : BOOL ;
  3103. TEMP64 : BYTE ;
  3104. TEMP65 : BYTE ;
  3105. END_VAR
  3106. BEGIN
  3107. NETWORK
  3108. TITLE =
  3109. L #IO15;
  3110. T LW 2;
  3111. NOP 0;
  3112. NETWORK
  3113. TITLE =
  3114. L #IO14;
  3115. T LW 4;
  3116. NOP 0;
  3117. NETWORK
  3118. TITLE =
  3119. A #IN6;
  3120. = #TEMP58;
  3121. A #TEMP58;
  3122. FP #TEMP48;
  3123. = #TEMP56;
  3124. NETWORK
  3125. TITLE =
  3126. O( ;
  3127. A #IN2;
  3128. A #TEMP57;
  3129. A #IN5;
  3130. S #TEMP50;
  3131. A #IN1;
  3132. R #TEMP50;
  3133. A #TEMP50;
  3134. ) ;
  3135. O ;
  3136. A #IN5;
  3137. A #IN2;
  3138. = #TEMP43;
  3139. NETWORK
  3140. TITLE =
  3141. O( ;
  3142. AN #IN2;
  3143. A #TEMP57;
  3144. S #TEMP53;
  3145. A #IN1;
  3146. R #TEMP53;
  3147. A #TEMP53;
  3148. ) ;
  3149. ON #IN2;
  3150. = #TEMP40;
  3151. NETWORK
  3152. TITLE =
  3153. O( ;
  3154. AN #IN3;
  3155. A #IN2;
  3156. S #TEMP54;
  3157. A #IN1;
  3158. R #TEMP54;
  3159. A #TEMP54;
  3160. ) ;
  3161. ON #IN3;
  3162. = #TEMP41;
  3163. NETWORK
  3164. TITLE =
  3165. AN #IN4;
  3166. A #OUT11;
  3167. A( ;
  3168. A( ;
  3169. A #OUT11;
  3170. A M 10.5;
  3171. CD #IN9;
  3172. BLD 101;
  3173. A #OUT11;
  3174. L #IN8;
  3175. S #IN9;
  3176. AN #OUT11;
  3177. R #IN9;
  3178. NOP 0;
  3179. NOP 0;
  3180. A #IN9;
  3181. ) ;
  3182. NOT ;
  3183. ) ;
  3184. A #TEMP57;
  3185. AN #TEMP50;
  3186. AN #TEMP49;
  3187. A #IN2;
  3188. A #IN3;
  3189. S #TEMP42;
  3190. A #IN1;
  3191. R #TEMP42;
  3192. NOP 0;
  3193. NETWORK
  3194. TITLE =
  3195. O( ;
  3196. A( ;
  3197. O #TEMP42;
  3198. O #TEMP41;
  3199. O #TEMP40;
  3200. O #TEMP43;
  3201. ) ;
  3202. FP #TEMP60;
  3203. S #TEMP59;
  3204. A #IN1;
  3205. R #TEMP59;
  3206. A #TEMP59;
  3207. ) ;
  3208. O #TEMP42;
  3209. O #TEMP40;
  3210. O #TEMP43;
  3211. = #OUT12;
  3212. NETWORK
  3213. TITLE =
  3214. A #TEMP42;
  3215. FP #TEMP61;
  3216. O( ;
  3217. A #TEMP41;
  3218. FP #TEMP62;
  3219. ) ;
  3220. O( ;
  3221. A #TEMP40;
  3222. FP #TEMP63;
  3223. ) ;
  3224. O( ;
  3225. A #TEMP43;
  3226. FP #TEMP55;
  3227. ) ;
  3228. = #OUT13;
  3229. NETWORK
  3230. TITLE =
  3231. A #TEMP56;
  3232. AN #OUT12;
  3233. S #TEMP57;
  3234. A( ;
  3235. ON #IN0;
  3236. O #TEMP59;
  3237. O #IN7;
  3238. ON #IN3;
  3239. ) ;
  3240. R #TEMP57;
  3241. NOP 0;
  3242. NETWORK
  3243. TITLE =
  3244. A( ;
  3245. O #TEMP58;
  3246. O #OUT11;
  3247. ) ;
  3248. A #TEMP57;
  3249. A #IN2;
  3250. A #IN3;
  3251. AN #TEMP59;
  3252. = #OUT11;
  3253. NETWORK
  3254. TITLE =
  3255. L 2;
  3256. T #OUT10;
  3257. NOP 0;
  3258. NETWORK
  3259. TITLE =
  3260. AN #IN4;
  3261. AN #OUT12;
  3262. A #IN3;
  3263. JNB M001;
  3264. L 2;
  3265. T #OUT10;
  3266. M001: NOP 0;
  3267. NETWORK
  3268. TITLE =
  3269. A #TEMP59;
  3270. JNB M002;
  3271. L 4;
  3272. T #OUT10;
  3273. M002: NOP 0;
  3274. NETWORK
  3275. TITLE =
  3276. AN #TEMP59;
  3277. A( ;
  3278. O #TEMP42;
  3279. O #TEMP40;
  3280. O #TEMP43;
  3281. ) ;
  3282. JNB M003;
  3283. L 5;
  3284. T #OUT10;
  3285. M003: NOP 0;
  3286. NETWORK
  3287. TITLE =
  3288. A #IN4;
  3289. A #TEMP57;
  3290. A #IN3;
  3291. JNB M004;
  3292. L 3;
  3293. T #OUT10;
  3294. M004: NOP 0;
  3295. NETWORK
  3296. TITLE =
  3297. AN #TEMP59;
  3298. AN #IN3;
  3299. JNB M005;
  3300. L 6;
  3301. T #OUT10;
  3302. M005: NOP 0;
  3303. NETWORK
  3304. TITLE =
  3305. AN #IN4;
  3306. AN #TEMP59;
  3307. A #OUT11;
  3308. JNB M006;
  3309. L 8;
  3310. T #OUT10;
  3311. M006: NOP 0;
  3312. NETWORK
  3313. TITLE =
  3314. L LW 2;
  3315. T #IO15;
  3316. NOP 0;
  3317. NETWORK
  3318. TITLE =
  3319. L LW 4;
  3320. T #IO14;
  3321. NOP 0;
  3322. END_FUNCTION
  3323. FUNCTION FC 181 : VOID
  3324. AUTHOR :
  3325. FAMILY : DRIVE
  3326. NAME : S_DRIVE
  3327. VERSION : 0.1
  3328. VAR_INPUT
  3329. IN0 : BOOL ;
  3330. IN1 : BOOL ;
  3331. IN2 : BOOL ;
  3332. IN3 : BOOL ;
  3333. IN4 : BOOL ;
  3334. IN5 : BOOL ;
  3335. IN6 : BOOL ;
  3336. IN7 : BOOL ;
  3337. IN8 : BOOL ;
  3338. IN9 : BOOL ;
  3339. IN10 : WORD ;
  3340. IN11 : COUNTER ;
  3341. END_VAR
  3342. VAR_OUTPUT
  3343. OUT12 : INT ;
  3344. OUT13 : BOOL ;
  3345. OUT14 : BOOL ;
  3346. OUT15 : BOOL ;
  3347. OUT16 : BOOL ;
  3348. END_VAR
  3349. VAR_IN_OUT
  3350. IO17 : WORD ;
  3351. IO18 : WORD ;
  3352. END_VAR
  3353. VAR_TEMP
  3354. TEMP19 : BOOL ;
  3355. TEMP20 : BOOL ;
  3356. TEMP21 : BOOL ;
  3357. TEMP22 : BOOL ;
  3358. TEMP23 : BOOL ;
  3359. TEMP24 : BOOL ;
  3360. TEMP25 : BOOL ;
  3361. TEMP26 : BOOL ;
  3362. TEMP27 : BOOL ;
  3363. TEMP28 : BOOL ;
  3364. TEMP29 : BOOL ;
  3365. TEMP30 : BOOL ;
  3366. TEMP31 : BOOL ;
  3367. TEMP32 : BOOL ;
  3368. TEMP33 : BOOL ;
  3369. TEMP34 : BOOL ;
  3370. TEMP35 : BOOL ;
  3371. TEMP36 : BOOL ;
  3372. TEMP37 : BOOL ;
  3373. TEMP38 : BOOL ;
  3374. TEMP39 : BOOL ;
  3375. TEMP40 : BOOL ;
  3376. TEMP41 : BOOL ;
  3377. TEMP42 : BOOL ;
  3378. TEMP43 : BOOL ;
  3379. TEMP44 : BOOL ;
  3380. TEMP45 : BOOL ;
  3381. TEMP46 : BOOL ;
  3382. TEMP47 : BOOL ;
  3383. TEMP48 : BOOL ;
  3384. TEMP49 : BOOL ;
  3385. TEMP50 : BOOL ;
  3386. TEMP51 : BOOL ;
  3387. TEMP52 : BOOL ;
  3388. TEMP53 : BOOL ;
  3389. TEMP54 : BOOL ;
  3390. TEMP55 : BOOL ;
  3391. TEMP56 : BOOL ;
  3392. TEMP57 : BOOL ;
  3393. TEMP58 : BOOL ;
  3394. TEMP59 : BOOL ;
  3395. TEMP60 : BOOL ;
  3396. TEMP61 : BOOL ;
  3397. TEMP62 : BOOL ;
  3398. TEMP63 : BOOL ;
  3399. TEMP64 : BOOL ;
  3400. TEMP65 : BOOL ;
  3401. TEMP66 : BOOL ;
  3402. TEMP67 : BYTE ;
  3403. TEMP68 : BYTE ;
  3404. END_VAR
  3405. BEGIN
  3406. NETWORK
  3407. TITLE =
  3408. L #IO18;
  3409. T LW 2;
  3410. NOP 0;
  3411. NETWORK
  3412. TITLE =
  3413. L #IO17;
  3414. T LW 4;
  3415. NOP 0;
  3416. NETWORK
  3417. TITLE =
  3418. O( ;
  3419. A #IN3;
  3420. A #TEMP60;
  3421. A #IN7;
  3422. S #TEMP53;
  3423. A #IN2;
  3424. R #TEMP53;
  3425. A #TEMP53;
  3426. ) ;
  3427. O ;
  3428. A #IN7;
  3429. A #IN3;
  3430. = #TEMP46;
  3431. NETWORK
  3432. TITLE =
  3433. O( ;
  3434. AN #IN3;
  3435. A #TEMP60;
  3436. S #TEMP56;
  3437. A #IN2;
  3438. R #TEMP56;
  3439. A #TEMP56;
  3440. ) ;
  3441. ON #IN3;
  3442. = #TEMP43;
  3443. NETWORK
  3444. TITLE =
  3445. O( ;
  3446. AN #IN4;
  3447. AN #IN3;
  3448. S #TEMP57;
  3449. A #IN2;
  3450. R #TEMP57;
  3451. A #TEMP57;
  3452. ) ;
  3453. ON #IN4;
  3454. = #TEMP44;
  3455. NETWORK
  3456. TITLE =
  3457. A( ;
  3458. AN #IN5;
  3459. A #OUT13;
  3460. O ;
  3461. AN #IN6;
  3462. A #OUT14;
  3463. ) ;
  3464. A( ;
  3465. A( ;
  3466. A( ;
  3467. O #OUT13;
  3468. O #OUT14;
  3469. ) ;
  3470. A M 10.5;
  3471. CD #IN11;
  3472. BLD 101;
  3473. A( ;
  3474. O #OUT13;
  3475. O #OUT14;
  3476. ) ;
  3477. L #IN10;
  3478. S #IN11;
  3479. AN #OUT13;
  3480. AN #OUT14;
  3481. R #IN11;
  3482. NOP 0;
  3483. NOP 0;
  3484. A #IN11;
  3485. ) ;
  3486. NOT ;
  3487. ) ;
  3488. AN #TEMP53;
  3489. A #IN3;
  3490. A #IN4;
  3491. S #TEMP45;
  3492. A #IN2;
  3493. R #TEMP45;
  3494. NOP 0;
  3495. NETWORK
  3496. TITLE =
  3497. O( ;
  3498. A( ;
  3499. O #TEMP45;
  3500. O #TEMP44;
  3501. O #TEMP43;
  3502. O #TEMP46;
  3503. ) ;
  3504. FP #TEMP63;
  3505. S #TEMP62;
  3506. A #IN2;
  3507. R #TEMP62;
  3508. A #TEMP62;
  3509. ) ;
  3510. O #TEMP45;
  3511. O #TEMP43;
  3512. O #TEMP46;
  3513. = #OUT15;
  3514. NETWORK
  3515. TITLE =
  3516. A #TEMP45;
  3517. FP #TEMP64;
  3518. O( ;
  3519. A #TEMP44;
  3520. FP #TEMP65;
  3521. ) ;
  3522. O( ;
  3523. A #TEMP43;
  3524. FP #TEMP66;
  3525. ) ;
  3526. O( ;
  3527. A #TEMP46;
  3528. FP #TEMP58;
  3529. ) ;
  3530. = #OUT16;
  3531. NETWORK
  3532. TITLE =
  3533. A #IN8;
  3534. AN #IN9;
  3535. A #IN0;
  3536. A #IN3;
  3537. A #IN4;
  3538. AN #OUT15;
  3539. = #OUT13;
  3540. NETWORK
  3541. TITLE =
  3542. A #IN9;
  3543. AN #IN8;
  3544. A #IN1;
  3545. A #IN3;
  3546. A #IN4;
  3547. AN #OUT15;
  3548. = #OUT14;
  3549. NETWORK
  3550. TITLE =
  3551. L 2;
  3552. T #OUT12;
  3553. NOP 0;
  3554. NETWORK
  3555. TITLE =
  3556. AN #IN5;
  3557. AN #IN6;
  3558. AN #OUT15;
  3559. A #IN4;
  3560. JNB M001;
  3561. L 2;
  3562. T #OUT12;
  3563. M001: NOP 0;
  3564. NETWORK
  3565. TITLE =
  3566. A #TEMP62;
  3567. JNB M002;
  3568. L 8;
  3569. T #OUT12;
  3570. M002: NOP 0;
  3571. NETWORK
  3572. TITLE =
  3573. AN #TEMP62;
  3574. A( ;
  3575. O #TEMP45;
  3576. O #TEMP43;
  3577. O #TEMP46;
  3578. ) ;
  3579. JNB M003;
  3580. L 9;
  3581. T #OUT12;
  3582. M003: NOP 0;
  3583. NETWORK
  3584. TITLE =
  3585. A #IN5;
  3586. A #OUT13;
  3587. A #IN4;
  3588. JNB M004;
  3589. L 3;
  3590. T #OUT12;
  3591. M004: NOP 0;
  3592. NETWORK
  3593. TITLE =
  3594. A #IN6;
  3595. A #OUT14;
  3596. A #IN4;
  3597. JNB M006;
  3598. L 5;
  3599. T #OUT12;
  3600. M006: NOP 0;
  3601. NETWORK
  3602. TITLE =
  3603. AN #TEMP62;
  3604. AN #IN4;
  3605. JNB M007;
  3606. L 10;
  3607. T #OUT12;
  3608. M007: NOP 0;
  3609. NETWORK
  3610. TITLE =
  3611. A( ;
  3612. AN #IN5;
  3613. AN #TEMP62;
  3614. A #OUT13;
  3615. O ;
  3616. AN #IN6;
  3617. AN #TEMP62;
  3618. A #OUT14;
  3619. ) ;
  3620. JNB M005;
  3621. L 12;
  3622. T #OUT12;
  3623. M005: NOP 0;
  3624. NETWORK
  3625. TITLE =
  3626. L LW 2;
  3627. T #IO18;
  3628. NOP 0;
  3629. NETWORK
  3630. TITLE =
  3631. L LW 4;
  3632. T #IO17;
  3633. NOP 0;
  3634. END_FUNCTION
  3635. FUNCTION FC 182 : VOID
  3636. AUTHOR :
  3637. FAMILY : MEASURE
  3638. NAME : PROC_FLT
  3639. VERSION : 0.1
  3640. VAR_INPUT
  3641. IN0 : BOOL ;
  3642. IN1 : BOOL ;
  3643. IN2 : BOOL ;
  3644. END_VAR
  3645. VAR_OUTPUT
  3646. OUT3 : BOOL ;
  3647. OUT4 : BOOL ;
  3648. OUT5 : BOOL ;
  3649. OUT6 : INT ;
  3650. END_VAR
  3651. VAR_IN_OUT
  3652. IO7 : WORD ;
  3653. END_VAR
  3654. VAR_TEMP
  3655. TEMP8 : BOOL ;
  3656. TEMP9 : BOOL ;
  3657. TEMP10 : BOOL ;
  3658. TEMP11 : BOOL ;
  3659. TEMP12 : BOOL ;
  3660. TEMP13 : BOOL ;
  3661. TEMP14 : BOOL ;
  3662. TEMP15 : BOOL ;
  3663. TEMP16 : BOOL ;
  3664. TEMP17 : BOOL ;
  3665. TEMP18 : BOOL ;
  3666. TEMP19 : BOOL ;
  3667. TEMP20 : BOOL ;
  3668. TEMP21 : BOOL ;
  3669. TEMP22 : BOOL ;
  3670. TEMP23 : BOOL ;
  3671. TEMP24 : BOOL ;
  3672. TEMP25 : BOOL ;
  3673. TEMP26 : BOOL ;
  3674. TEMP27 : BOOL ;
  3675. TEMP28 : BOOL ;
  3676. TEMP29 : BOOL ;
  3677. TEMP30 : BOOL ;
  3678. TEMP31 : BOOL ;
  3679. TEMP32 : BOOL ;
  3680. TEMP33 : BOOL ;
  3681. TEMP34 : BOOL ;
  3682. TEMP35 : BOOL ;
  3683. TEMP36 : BOOL ;
  3684. TEMP37 : BOOL ;
  3685. TEMP38 : BOOL ;
  3686. TEMP39 : BOOL ;
  3687. TEMP40 : BOOL ;
  3688. END_VAR
  3689. BEGIN
  3690. NETWORK
  3691. TITLE =
  3692. A #IN0;
  3693. = #TEMP21;
  3694. NETWORK
  3695. TITLE =
  3696. L #IO7;
  3697. T LW 2;
  3698. NOP 0;
  3699. NETWORK
  3700. TITLE =
  3701. L 2;
  3702. T #OUT6;
  3703. NOP 0;
  3704. NETWORK
  3705. TITLE =
  3706. A #TEMP21;
  3707. R #TEMP24;
  3708. A #IN1;
  3709. A #IN2;
  3710. FP #TEMP25;
  3711. S #TEMP24;
  3712. A #TEMP24;
  3713. = L 5.0;
  3714. A L 5.0;
  3715. FP #TEMP26;
  3716. = #OUT5;
  3717. A L 5.0;
  3718. JNB M001;
  3719. L 4;
  3720. T #OUT6;
  3721. M001: NOP 0;
  3722. NETWORK
  3723. TITLE =
  3724. O #TEMP24;
  3725. O ;
  3726. A #IN1;
  3727. A #IN2;
  3728. = #OUT3;
  3729. = #TEMP32;
  3730. NETWORK
  3731. TITLE =
  3732. AN #TEMP24;
  3733. A #IN1;
  3734. JNB M002;
  3735. L 5;
  3736. T #OUT6;
  3737. M002: NOP 0;
  3738. NETWORK
  3739. TITLE =
  3740. A #IN1;
  3741. AN #IN2;
  3742. AN #TEMP24;
  3743. JNB M003;
  3744. L 3;
  3745. T #OUT6;
  3746. M003: NOP 0;
  3747. NETWORK
  3748. TITLE =
  3749. A #IN1;
  3750. = #OUT4;
  3751. NETWORK
  3752. TITLE =
  3753. L LW 2;
  3754. T #IO7;
  3755. NOP 0;
  3756. END_FUNCTION
  3757. FUNCTION FC 183 : VOID
  3758. AUTHOR :
  3759. FAMILY : DRIVE
  3760. NAME : S_DRIVE
  3761. VERSION : 0.1
  3762. VAR_INPUT
  3763. IN0 : BOOL ;
  3764. IN1 : BOOL ;
  3765. IN2 : BOOL ;
  3766. IN3 : BOOL ;
  3767. IN4 : BOOL ;
  3768. IN5 : BOOL ;
  3769. IN6 : BOOL ;
  3770. IN7 : BOOL ;
  3771. IN8 : BOOL ;
  3772. IN9 : BOOL ;
  3773. IN10 : BOOL ;
  3774. IN11 : WORD ;
  3775. IN12 : COUNTER ;
  3776. END_VAR
  3777. VAR_OUTPUT
  3778. OUT13 : INT ;
  3779. OUT14 : BOOL ;
  3780. OUT15 : BOOL ;
  3781. OUT16 : BOOL ;
  3782. OUT17 : BOOL ;
  3783. END_VAR
  3784. VAR_IN_OUT
  3785. IO18 : WORD ;
  3786. IO19 : WORD ;
  3787. END_VAR
  3788. VAR_TEMP
  3789. TEMP20 : BOOL ;
  3790. TEMP21 : BOOL ;
  3791. TEMP22 : BOOL ;
  3792. TEMP23 : BOOL ;
  3793. TEMP24 : BOOL ;
  3794. TEMP25 : BOOL ;
  3795. TEMP26 : BOOL ;
  3796. TEMP27 : BOOL ;
  3797. TEMP28 : BOOL ;
  3798. TEMP29 : BOOL ;
  3799. TEMP30 : BOOL ;
  3800. TEMP31 : BOOL ;
  3801. TEMP32 : BOOL ;
  3802. TEMP33 : BOOL ;
  3803. TEMP34 : BOOL ;
  3804. TEMP35 : BOOL ;
  3805. TEMP36 : BOOL ;
  3806. TEMP37 : BOOL ;
  3807. TEMP38 : BOOL ;
  3808. TEMP39 : BOOL ;
  3809. TEMP40 : BOOL ;
  3810. TEMP41 : BOOL ;
  3811. TEMP42 : BOOL ;
  3812. TEMP43 : BOOL ;
  3813. TEMP44 : BOOL ;
  3814. TEMP45 : BOOL ;
  3815. TEMP46 : BOOL ;
  3816. TEMP47 : BOOL ;
  3817. TEMP48 : BOOL ;
  3818. TEMP49 : BOOL ;
  3819. TEMP50 : BOOL ;
  3820. TEMP51 : BOOL ;
  3821. TEMP52 : BOOL ;
  3822. TEMP53 : BOOL ;
  3823. TEMP54 : BOOL ;
  3824. TEMP55 : BOOL ;
  3825. TEMP56 : BOOL ;
  3826. TEMP57 : BOOL ;
  3827. TEMP58 : BOOL ;
  3828. TEMP59 : BOOL ;
  3829. TEMP60 : BOOL ;
  3830. TEMP61 : BOOL ;
  3831. TEMP62 : BOOL ;
  3832. TEMP63 : BOOL ;
  3833. TEMP64 : BOOL ;
  3834. TEMP65 : BOOL ;
  3835. TEMP66 : BOOL ;
  3836. TEMP67 : BOOL ;
  3837. TEMP68 : BYTE ;
  3838. TEMP69 : BYTE ;
  3839. END_VAR
  3840. BEGIN
  3841. NETWORK
  3842. TITLE =
  3843. L #IO19;
  3844. T LW 2;
  3845. NOP 0;
  3846. NETWORK
  3847. TITLE =
  3848. L #IO18;
  3849. T LW 4;
  3850. NOP 0;
  3851. NETWORK
  3852. TITLE =
  3853. A( ;
  3854. O #IN8;
  3855. O #IN10;
  3856. ) ;
  3857. = #TEMP62;
  3858. A #TEMP62;
  3859. FP #TEMP52;
  3860. = #TEMP60;
  3861. NETWORK
  3862. TITLE =
  3863. O( ;
  3864. A #IN3;
  3865. A( ;
  3866. O #TEMP61;
  3867. O #TEMP53;
  3868. ) ;
  3869. A #IN7;
  3870. S #TEMP54;
  3871. A #IN2;
  3872. R #TEMP54;
  3873. A #TEMP54;
  3874. ) ;
  3875. O ;
  3876. A #IN7;
  3877. A #IN3;
  3878. = #TEMP47;
  3879. NETWORK
  3880. TITLE =
  3881. O( ;
  3882. AN #IN3;
  3883. A( ;
  3884. O #TEMP61;
  3885. O #TEMP53;
  3886. ) ;
  3887. S #TEMP57;
  3888. A #IN2;
  3889. R #TEMP57;
  3890. A #TEMP57;
  3891. ) ;
  3892. ON #IN3;
  3893. = #TEMP44;
  3894. NETWORK
  3895. TITLE =
  3896. O( ;
  3897. AN #IN4;
  3898. AN #IN3;
  3899. S #TEMP58;
  3900. A #IN2;
  3901. R #TEMP58;
  3902. A #TEMP58;
  3903. ) ;
  3904. ON #IN4;
  3905. = #TEMP45;
  3906. NETWORK
  3907. TITLE =
  3908. A( ;
  3909. AN #IN5;
  3910. A #OUT14;
  3911. O ;
  3912. AN #IN6;
  3913. A #OUT15;
  3914. ) ;
  3915. A( ;
  3916. A( ;
  3917. A( ;
  3918. O #OUT14;
  3919. O #OUT15;
  3920. ) ;
  3921. A M 10.5;
  3922. CD #IN12;
  3923. BLD 101;
  3924. A( ;
  3925. O #OUT14;
  3926. O #OUT15;
  3927. ) ;
  3928. L #IN11;
  3929. S #IN12;
  3930. AN #OUT14;
  3931. AN #OUT15;
  3932. R #IN12;
  3933. NOP 0;
  3934. NOP 0;
  3935. A #IN12;
  3936. ) ;
  3937. NOT ;
  3938. ) ;
  3939. A( ;
  3940. O #TEMP61;
  3941. O #TEMP53;
  3942. ) ;
  3943. AN #TEMP54;
  3944. A #IN3;
  3945. A #IN4;
  3946. S #TEMP46;
  3947. A #IN2;
  3948. R #TEMP46;
  3949. NOP 0;
  3950. NETWORK
  3951. TITLE =
  3952. O( ;
  3953. A( ;
  3954. O #TEMP46;
  3955. O #TEMP45;
  3956. O #TEMP44;
  3957. O #TEMP47;
  3958. ) ;
  3959. FP #TEMP64;
  3960. S #TEMP63;
  3961. A #IN2;
  3962. R #TEMP63;
  3963. A #TEMP63;
  3964. ) ;
  3965. O #TEMP46;
  3966. O #TEMP44;
  3967. O #TEMP47;
  3968. = #OUT16;
  3969. NETWORK
  3970. TITLE =
  3971. A #TEMP46;
  3972. FP #TEMP65;
  3973. O( ;
  3974. A #TEMP45;
  3975. FP #TEMP66;
  3976. ) ;
  3977. O( ;
  3978. A #TEMP44;
  3979. FP #TEMP67;
  3980. ) ;
  3981. O( ;
  3982. A #TEMP47;
  3983. FP #TEMP59;
  3984. ) ;
  3985. = #OUT17;
  3986. NETWORK
  3987. TITLE =
  3988. A #TEMP60;
  3989. A #IN8;
  3990. AN #OUT16;
  3991. S #TEMP61;
  3992. A( ;
  3993. ON #IN0;
  3994. O #TEMP63;
  3995. O #IN9;
  3996. O #OUT15;
  3997. ON #IN4;
  3998. ) ;
  3999. R #TEMP61;
  4000. NOP 0;
  4001. NETWORK
  4002. TITLE =
  4003. A #TEMP60;
  4004. A #IN10;
  4005. AN #OUT16;
  4006. S #TEMP53;
  4007. A( ;
  4008. ON #IN1;
  4009. O #TEMP63;
  4010. O #IN9;
  4011. O #OUT14;
  4012. ON #IN4;
  4013. ) ;
  4014. R #TEMP53;
  4015. NOP 0;
  4016. NETWORK
  4017. TITLE =
  4018. A( ;
  4019. O #IN8;
  4020. O #OUT14;
  4021. ) ;
  4022. A #TEMP61;
  4023. A #IN3;
  4024. A #IN4;
  4025. AN #TEMP63;
  4026. = #OUT14;
  4027. NETWORK
  4028. TITLE =
  4029. A( ;
  4030. O #IN10;
  4031. O #OUT15;
  4032. ) ;
  4033. A #TEMP53;
  4034. A #IN3;
  4035. A #IN4;
  4036. AN #TEMP63;
  4037. = #OUT15;
  4038. NETWORK
  4039. TITLE =
  4040. L 2;
  4041. T #OUT13;
  4042. NOP 0;
  4043. NETWORK
  4044. TITLE =
  4045. AN #IN5;
  4046. AN #IN6;
  4047. AN #OUT16;
  4048. A #IN4;
  4049. JNB M001;
  4050. L 2;
  4051. T #OUT13;
  4052. M001: NOP 0;
  4053. NETWORK
  4054. TITLE =
  4055. A #TEMP63;
  4056. JNB M002;
  4057. L 8;
  4058. T #OUT13;
  4059. M002: NOP 0;
  4060. NETWORK
  4061. TITLE =
  4062. AN #TEMP63;
  4063. A( ;
  4064. O #TEMP46;
  4065. O #TEMP44;
  4066. O #TEMP47;
  4067. ) ;
  4068. JNB M003;
  4069. L 9;
  4070. T #OUT13;
  4071. M003: NOP 0;
  4072. NETWORK
  4073. TITLE =
  4074. A #IN5;
  4075. A #TEMP61;
  4076. A #IN4;
  4077. JNB M004;
  4078. L 3;
  4079. T #OUT13;
  4080. M004: NOP 0;
  4081. NETWORK
  4082. TITLE =
  4083. A #IN6;
  4084. A #TEMP53;
  4085. A #IN4;
  4086. JNB M006;
  4087. L 5;
  4088. T #OUT13;
  4089. M006: NOP 0;
  4090. NETWORK
  4091. TITLE =
  4092. AN #TEMP63;
  4093. AN #IN4;
  4094. JNB M007;
  4095. L 10;
  4096. T #OUT13;
  4097. M007: NOP 0;
  4098. NETWORK
  4099. TITLE =
  4100. A( ;
  4101. AN #IN5;
  4102. AN #TEMP63;
  4103. A #OUT14;
  4104. O ;
  4105. AN #IN6;
  4106. AN #TEMP63;
  4107. A #OUT15;
  4108. ) ;
  4109. JNB M005;
  4110. L 12;
  4111. T #OUT13;
  4112. M005: NOP 0;
  4113. NETWORK
  4114. TITLE =
  4115. L LW 2;
  4116. T #IO19;
  4117. NOP 0;
  4118. NETWORK
  4119. TITLE =
  4120. L LW 4;
  4121. T #IO18;
  4122. NOP 0;
  4123. END_FUNCTION
  4124. FUNCTION FC 11 : VOID
  4125. AUTHOR :
  4126. FAMILY : DRIVES
  4127. NAME : DRIVES
  4128. VERSION : 0.1
  4129. VAR_TEMP
  4130. TEMP0 : REAL ;
  4131. END_VAR
  4132. BEGIN
  4133. NETWORK
  4134. TITLE =
  4135. O I 3.1;
  4136. O I 1.3;
  4137. = Q 2.4;
  4138. NETWORK
  4139. TITLE =
  4140. O I 3.2;
  4141. O I 1.3;
  4142. = Q 2.5;
  4143. NETWORK
  4144. TITLE =
  4145. O M 116.0;
  4146. O I 1.3;
  4147. = Q 3.2;
  4148. NETWORK
  4149. TITLE =
  4150. A I 7.6;
  4151. AN I 7.3;
  4152. AN I 7.4;
  4153. A I 7.5;
  4154. = M 116.2;
  4155. NETWORK
  4156. TITLE =
  4157. A I 7.6;
  4158. AN I 7.3;
  4159. A I 7.4;
  4160. AN I 7.5;
  4161. = M 116.3;
  4162. NETWORK
  4163. TITLE =
  4164. AN I 7.6;
  4165. A I 7.3;
  4166. AN I 7.4;
  4167. A I 7.5;
  4168. = L 4.0;
  4169. A L 4.0;
  4170. BLD 102;
  4171. = M 116.4;
  4172. O L 4.0;
  4173. O I 1.3;
  4174. = Q 3.0;
  4175. NETWORK
  4176. TITLE =
  4177. A M 116.4;
  4178. A M 151.3;
  4179. FP M 117.0;
  4180. S M 0.1;
  4181. A M 0.2;
  4182. FP M 117.1;
  4183. R M 0.1;
  4184. A M 0.1;
  4185. = L 4.0;
  4186. O L 4.0;
  4187. O I 1.3;
  4188. = Q 1.2;
  4189. A L 4.0;
  4190. BLD 102;
  4191. = Q 4.2;
  4192. NETWORK
  4193. TITLE =
  4194. A M 116.4;
  4195. A M 151.2;
  4196. FP M 117.2;
  4197. S M 0.2;
  4198. A M 0.1;
  4199. FP M 117.3;
  4200. R M 0.2;
  4201. A M 0.2;
  4202. = L 4.0;
  4203. O L 4.0;
  4204. O I 1.3;
  4205. = Q 1.3;
  4206. A L 4.0;
  4207. BLD 102;
  4208. = Q 4.7;
  4209. NETWORK
  4210. TITLE =
  4211. A I 7.6;
  4212. A I 7.3;
  4213. A I 7.4;
  4214. A I 7.5;
  4215. = M 116.5;
  4216. NETWORK
  4217. TITLE =
  4218. A I 7.6;
  4219. A I 7.3;
  4220. AN I 7.4;
  4221. A I 7.5;
  4222. = M 116.6;
  4223. NETWORK
  4224. TITLE =
  4225. A M 151.2;
  4226. AN I 0.5;
  4227. S M 1.0;
  4228. A M 151.3;
  4229. AN I 0.5;
  4230. R M 1.0;
  4231. NOP 0;
  4232. NETWORK
  4233. TITLE =
  4234. A M 151.3;
  4235. AN I 0.5;
  4236. S M 1.1;
  4237. A M 151.2;
  4238. AN I 0.5;
  4239. R M 1.1;
  4240. NOP 0;
  4241. NETWORK
  4242. TITLE =
  4243. A M 29.0;
  4244. A M 27.3;
  4245. A I 3.1;
  4246. AN I 3.2;
  4247. A I 2.6;
  4248. A M 150.5;
  4249. A M 116.0;
  4250. A I 4.5;
  4251. = M 150.0;
  4252. NETWORK
  4253. TITLE =
  4254. A M 29.0;
  4255. A M 27.3;
  4256. A I 3.1;
  4257. AN I 3.2;
  4258. A I 2.7;
  4259. A M 150.6;
  4260. A M 116.0;
  4261. A I 4.5;
  4262. = M 150.1;
  4263. NETWORK
  4264. TITLE =
  4265. A( ;
  4266. A M 29.0;
  4267. A M 27.3;
  4268. AN I 3.1;
  4269. A I 3.2;
  4270. A I 2.6;
  4271. A M 116.0;
  4272. A I 4.5;
  4273. O( ;
  4274. A( ;
  4275. O M 29.2;
  4276. O M 29.1;
  4277. ) ;
  4278. A M 44.1;
  4279. A( ;
  4280. O M 1.0;
  4281. O ;
  4282. A M 0.2;
  4283. AN M 1.1;
  4284. AN M 1.0;
  4285. ) ;
  4286. A( ;
  4287. A I 8.7;
  4288. L DB2.DBW 38;
  4289. SD T 19;
  4290. NOP 0;
  4291. NOP 0;
  4292. NOP 0;
  4293. A T 19;
  4294. ) ;
  4295. A( ;
  4296. O M 27.3;
  4297. O( ;
  4298. A I 8.6;
  4299. FP M 124.1;
  4300. ) ;
  4301. ) ;
  4302. AN M 150.3;
  4303. ) ;
  4304. O( ;
  4305. A( ;
  4306. A( ;
  4307. O( ;
  4308. A( ;
  4309. A M 119.2;
  4310. S M 220.1;
  4311. A T 13;
  4312. R M 220.1;
  4313. A M 220.1;
  4314. ) ;
  4315. L DB2.DBW 62;
  4316. SD T 32;
  4317. NOP 0;
  4318. NOP 0;
  4319. NOP 0;
  4320. A T 32;
  4321. ) ;
  4322. O M 119.0;
  4323. ) ;
  4324. L DB2.DBW 26;
  4325. SE T 13;
  4326. NOP 0;
  4327. NOP 0;
  4328. NOP 0;
  4329. A T 13;
  4330. ) ;
  4331. NOT ;
  4332. FP M 120.0;
  4333. A M 44.1;
  4334. A( ;
  4335. O M 29.2;
  4336. O M 29.1;
  4337. ) ;
  4338. ) ;
  4339. ) ;
  4340. A M 150.5;
  4341. AN M 150.3;
  4342. = M 150.2;
  4343. NETWORK
  4344. TITLE =
  4345. A( ;
  4346. A M 29.0;
  4347. A M 27.3;
  4348. AN I 3.1;
  4349. A I 3.2;
  4350. A I 2.7;
  4351. A M 116.0;
  4352. A I 4.5;
  4353. O( ;
  4354. A( ;
  4355. O M 29.2;
  4356. O M 29.1;
  4357. ) ;
  4358. A M 44.1;
  4359. A( ;
  4360. O M 1.1;
  4361. O ;
  4362. A M 0.1;
  4363. AN M 1.1;
  4364. AN M 1.0;
  4365. ) ;
  4366. A T 19;
  4367. AN M 150.2;
  4368. A( ;
  4369. O M 27.3;
  4370. O( ;
  4371. A I 8.6;
  4372. FP M 124.0;
  4373. ) ;
  4374. ) ;
  4375. ) ;
  4376. O( ;
  4377. A( ;
  4378. A( ;
  4379. O( ;
  4380. A( ;
  4381. A M 119.1;
  4382. S M 220.0;
  4383. A T 14;
  4384. R M 220.0;
  4385. A M 220.0;
  4386. ) ;
  4387. L DB2.DBW 62;
  4388. SD T 31;
  4389. NOP 0;
  4390. NOP 0;
  4391. NOP 0;
  4392. A T 31;
  4393. ) ;
  4394. O M 119.3;
  4395. ) ;
  4396. L DB2.DBW 28;
  4397. SE T 14;
  4398. NOP 0;
  4399. NOP 0;
  4400. NOP 0;
  4401. A T 14;
  4402. ) ;
  4403. NOT ;
  4404. FP M 120.1;
  4405. A M 44.1;
  4406. A( ;
  4407. O M 29.2;
  4408. O M 29.1;
  4409. ) ;
  4410. ) ;
  4411. ) ;
  4412. A M 150.6;
  4413. AN M 150.2;
  4414. = M 150.3;
  4415. NETWORK
  4416. TITLE =
  4417. A( ;
  4418. A( ;
  4419. A M 151.3;
  4420. A M 116.5;
  4421. S M 0.3;
  4422. A M 151.2;
  4423. R M 0.3;
  4424. A M 0.3;
  4425. ) ;
  4426. L DB2.DBW 22;
  4427. SD T 11;
  4428. NOP 0;
  4429. NOP 0;
  4430. NOP 0;
  4431. A T 11;
  4432. ) ;
  4433. = M 119.0;
  4434. A M 119.0;
  4435. O( ;
  4436. A M 151.2;
  4437. A( ;
  4438. A( ;
  4439. A M 151.2;
  4440. A M 116.6;
  4441. S M 0.5;
  4442. A M 151.3;
  4443. R M 0.5;
  4444. A M 0.5;
  4445. ) ;
  4446. L DB2.DBW 16;
  4447. SD T 8;
  4448. NOP 0;
  4449. NOP 0;
  4450. NOP 0;
  4451. A T 8;
  4452. ) ;
  4453. = M 119.1;
  4454. A M 119.1;
  4455. ) ;
  4456. O( ;
  4457. A M 151.3;
  4458. A( ;
  4459. A( ;
  4460. A M 151.3;
  4461. A M 116.2;
  4462. S M 0.6;
  4463. A M 151.2;
  4464. R M 0.6;
  4465. A M 0.6;
  4466. ) ;
  4467. L DB2.DBW 18;
  4468. SD T 9;
  4469. NOP 0;
  4470. NOP 0;
  4471. NOP 0;
  4472. A T 9;
  4473. ) ;
  4474. = M 119.2;
  4475. A M 119.2;
  4476. ) ;
  4477. O( ;
  4478. A M 151.2;
  4479. A( ;
  4480. A( ;
  4481. A M 151.2;
  4482. A M 116.3;
  4483. S M 0.4;
  4484. A M 151.3;
  4485. R M 0.4;
  4486. A M 0.4;
  4487. ) ;
  4488. L DB2.DBW 24;
  4489. SD T 12;
  4490. NOP 0;
  4491. NOP 0;
  4492. NOP 0;
  4493. A T 12;
  4494. ) ;
  4495. = M 119.3;
  4496. A M 119.3;
  4497. ) ;
  4498. = M 118.5;
  4499. NETWORK
  4500. TITLE =
  4501. A M 29.0;
  4502. A( ;
  4503. ON I 3.0;
  4504. O ;
  4505. A M 120.6;
  4506. AN I 1.7;
  4507. ) ;
  4508. O( ;
  4509. A( ;
  4510. O M 29.2;
  4511. O M 29.1;
  4512. ) ;
  4513. AN M 44.1;
  4514. ) ;
  4515. O( ;
  4516. A M 44.1;
  4517. A( ;
  4518. O M 29.2;
  4519. O M 29.1;
  4520. ) ;
  4521. A( ;
  4522. A M 118.5;
  4523. FP M 118.6;
  4524. = M 120.6;
  4525. A M 120.6;
  4526. ) ;
  4527. ) ;
  4528. O ;
  4529. A( ;
  4530. O M 29.2;
  4531. O M 29.1;
  4532. ) ;
  4533. A( ;
  4534. AN I 8.6;
  4535. L DB2.DBW 48;
  4536. SD T 24;
  4537. NOP 0;
  4538. NOP 0;
  4539. NOP 0;
  4540. A T 24;
  4541. ) ;
  4542. O M 11.1;
  4543. O M 20.5;
  4544. = M 150.4;
  4545. NETWORK
  4546. TITLE =
  4547. AN M 204.0;
  4548. A M 121.7;
  4549. AN M 195.0;
  4550. AN M 196.0;
  4551. AN M 197.0;
  4552. AN M 198.0;
  4553. AN M 206.0;
  4554. AN M 207.0;
  4555. AN M 158.0;
  4556. AN M 166.0;
  4557. A( ;
  4558. AN I 1.7;
  4559. A M 116.4;
  4560. NOT ;
  4561. ) ;
  4562. AN M 209.0;
  4563. AN M 210.0;
  4564. AN M 217.0;
  4565. = M 150.5;
  4566. NETWORK
  4567. TITLE =
  4568. AN M 204.0;
  4569. A M 121.7;
  4570. AN M 195.0;
  4571. AN M 196.0;
  4572. AN M 197.0;
  4573. AN M 198.0;
  4574. AN M 206.0;
  4575. AN M 207.0;
  4576. AN M 158.0;
  4577. AN M 166.0;
  4578. AN M 209.0;
  4579. AN M 210.0;
  4580. A( ;
  4581. AN I 1.7;
  4582. A M 116.4;
  4583. NOT ;
  4584. ) ;
  4585. AN M 217.0;
  4586. = M 150.6;
  4587. NETWORK
  4588. TITLE =
  4589. A M 150.5;
  4590. = L 4.0;
  4591. BLD 103;
  4592. A M 150.6;
  4593. = L 4.1;
  4594. BLD 103;
  4595. A M 21.0;
  4596. = L 4.2;
  4597. BLD 103;
  4598. A M 20.1;
  4599. = L 4.3;
  4600. BLD 103;
  4601. A M 20.1;
  4602. = L 4.4;
  4603. BLD 103;
  4604. A I 5.5;
  4605. A Q 6.1;
  4606. = L 4.5;
  4607. BLD 103;
  4608. A I 5.5;
  4609. A Q 6.0;
  4610. = L 4.6;
  4611. BLD 103;
  4612. A M 202.4;
  4613. = L 4.7;
  4614. BLD 103;
  4615. A( ;
  4616. O M 150.0;
  4617. O M 150.2;
  4618. ) ;
  4619. = L 5.0;
  4620. BLD 103;
  4621. A M 150.4;
  4622. = L 5.1;
  4623. BLD 103;
  4624. A( ;
  4625. O M 150.1;
  4626. O M 150.3;
  4627. ) ;
  4628. = L 5.2;
  4629. BLD 103;
  4630. CALL FC 183 (
  4631. IN0 := L 4.0,
  4632. IN1 := L 4.1,
  4633. IN2 := L 4.2,
  4634. IN3 := L 4.3,
  4635. IN4 := L 4.4,
  4636. IN5 := L 4.5,
  4637. IN6 := L 4.6,
  4638. IN7 := L 4.7,
  4639. IN8 := L 5.0,
  4640. IN9 := L 5.1,
  4641. IN10 := L 5.2,
  4642. IN11 := W#16#15,
  4643. IN12 := C 0,
  4644. OUT13 := DB10.DBW 10,
  4645. OUT14 := M 151.2,
  4646. OUT15 := M 151.3,
  4647. OUT16 := M 151.0,
  4648. OUT17 := M 151.1,
  4649. IO18 := DB181.DBW 2,
  4650. IO19 := DB10.DBW 44);
  4651. NOP 0;
  4652. NETWORK
  4653. TITLE =
  4654. A M 151.2;
  4655. A I 5.4;
  4656. = L 4.0;
  4657. A L 4.0;
  4658. BLD 102;
  4659. = Q 6.1;
  4660. O L 4.0;
  4661. O I 1.3;
  4662. = Q 2.2;
  4663. NETWORK
  4664. TITLE =
  4665. A( ;
  4666. O M 151.3;
  4667. O M 151.2;
  4668. ) ;
  4669. A I 5.4;
  4670. = L 4.0;
  4671. A L 4.0;
  4672. BLD 102;
  4673. = Q 6.0;
  4674. A L 4.0;
  4675. A M 151.3;
  4676. O I 1.3;
  4677. = Q 2.3;
  4678. NETWORK
  4679. TITLE =
  4680. O( ;
  4681. A( ;
  4682. O M 151.2;
  4683. O M 151.3;
  4684. ) ;
  4685. L DB2.DBW 20;
  4686. SF T 10;
  4687. NOP 0;
  4688. NOP 0;
  4689. NOP 0;
  4690. A T 10;
  4691. ) ;
  4692. O M 20.1;
  4693. = Q 5.0;
  4694. END_FUNCTION
  4695. FUNCTION FC 13 : VOID
  4696. AUTHOR :
  4697. FAMILY : DRIVES
  4698. NAME : DRIVES
  4699. VERSION : 0.1
  4700. VAR_TEMP
  4701. TEMP0 : REAL ;
  4702. END_VAR
  4703. BEGIN
  4704. NETWORK
  4705. TITLE =
  4706. A( ;
  4707. A M 29.0;
  4708. A I 2.0;
  4709. O ;
  4710. A( ;
  4711. O M 29.2;
  4712. O M 29.1;
  4713. ) ;
  4714. A M 44.1;
  4715. AN M 157.4;
  4716. A M 157.3;
  4717. AN M 174.0;
  4718. ) ;
  4719. FP M 157.0;
  4720. = M 157.1;
  4721. NETWORK
  4722. TITLE =
  4723. A M 29.0;
  4724. AN I 2.1;
  4725. O ;
  4726. A( ;
  4727. O M 29.2;
  4728. O M 29.1;
  4729. ) ;
  4730. AN M 44.1;
  4731. A( ;
  4732. AN I 8.7;
  4733. L DB2.DBW 58;
  4734. SD T 29;
  4735. NOP 0;
  4736. NOP 0;
  4737. NOP 0;
  4738. A T 29;
  4739. ) ;
  4740. O M 11.1;
  4741. O M 20.5;
  4742. = M 157.2;
  4743. NETWORK
  4744. TITLE =
  4745. AN M 167.0;
  4746. AN M 206.0;
  4747. AN M 207.0;
  4748. = M 157.3;
  4749. NETWORK
  4750. TITLE =
  4751. A M 157.3;
  4752. = L 4.0;
  4753. BLD 103;
  4754. A M 21.0;
  4755. = L 4.1;
  4756. BLD 103;
  4757. A M 20.1;
  4758. = L 4.2;
  4759. BLD 103;
  4760. A M 20.1;
  4761. = L 4.3;
  4762. BLD 103;
  4763. A I 8.3;
  4764. = L 4.4;
  4765. BLD 103;
  4766. A M 20.0;
  4767. = L 4.5;
  4768. BLD 103;
  4769. A M 157.1;
  4770. = L 4.6;
  4771. BLD 103;
  4772. A M 157.2;
  4773. = L 4.7;
  4774. BLD 103;
  4775. CALL FC 180 (
  4776. IN0 := L 4.0,
  4777. IN1 := L 4.1,
  4778. IN2 := L 4.2,
  4779. IN3 := L 4.3,
  4780. IN4 := L 4.4,
  4781. IN5 := L 4.5,
  4782. IN6 := L 4.6,
  4783. IN7 := L 4.7,
  4784. IN8 := W#16#2,
  4785. IN9 := C 5,
  4786. OUT10 := DB10.DBW 18,
  4787. OUT11 := Q 6.2,
  4788. OUT12 := M 157.4,
  4789. OUT13 := M 157.5,
  4790. IO14 := DB181.DBW 10,
  4791. IO15 := DB10.DBW 52);
  4792. NOP 0;
  4793. NETWORK
  4794. TITLE =
  4795. O I 8.3;
  4796. O I 1.3;
  4797. = Q 1.7;
  4798. NETWORK
  4799. TITLE =
  4800. A( ;
  4801. A M 29.0;
  4802. A I 2.0;
  4803. O ;
  4804. A( ;
  4805. O M 29.2;
  4806. O M 29.1;
  4807. ) ;
  4808. AN M 161.4;
  4809. A M 161.3;
  4810. AN M 174.0;
  4811. A M 20.0;
  4812. ) ;
  4813. A M 20.0;
  4814. FP M 161.0;
  4815. = M 161.1;
  4816. NETWORK
  4817. TITLE =
  4818. A M 29.0;
  4819. AN I 2.1;
  4820. O ;
  4821. A( ;
  4822. O M 29.2;
  4823. O M 29.1;
  4824. ) ;
  4825. A M 20.1;
  4826. O M 20.1;
  4827. = M 161.2;
  4828. NETWORK
  4829. TITLE =
  4830. AN M 167.0;
  4831. AN M 206.0;
  4832. AN M 207.0;
  4833. A M 20.0;
  4834. = M 161.3;
  4835. NETWORK
  4836. TITLE =
  4837. A M 161.3;
  4838. = L 4.0;
  4839. BLD 103;
  4840. A M 21.0;
  4841. = L 4.1;
  4842. BLD 103;
  4843. A M 20.1;
  4844. = L 4.2;
  4845. BLD 103;
  4846. A M 20.1;
  4847. = L 4.3;
  4848. BLD 103;
  4849. A I 10.6;
  4850. = L 4.4;
  4851. BLD 103;
  4852. A M 20.0;
  4853. = L 4.5;
  4854. BLD 103;
  4855. A M 161.1;
  4856. = L 4.6;
  4857. BLD 103;
  4858. A M 161.2;
  4859. = L 4.7;
  4860. BLD 103;
  4861. CALL FC 180 (
  4862. IN0 := L 4.0,
  4863. IN1 := L 4.1,
  4864. IN2 := L 4.2,
  4865. IN3 := L 4.3,
  4866. IN4 := L 4.4,
  4867. IN5 := L 4.5,
  4868. IN6 := L 4.6,
  4869. IN7 := L 4.7,
  4870. IN8 := W#16#2,
  4871. IN9 := C 12,
  4872. OUT10 := DB10.DBW 22,
  4873. OUT11 := M 20.2,
  4874. OUT12 := M 161.4,
  4875. OUT13 := M 161.5,
  4876. IO14 := DB181.DBW 24,
  4877. IO15 := DB10.DBW 56);
  4878. NOP 0;
  4879. NETWORK
  4880. TITLE =
  4881. A M 29.0;
  4882. A( ;
  4883. O I 2.2;
  4884. O ;
  4885. AN I 8.5;
  4886. A Q 6.0;
  4887. ) ;
  4888. O ;
  4889. A( ;
  4890. A( ;
  4891. O( ;
  4892. A M 116.6;
  4893. BLD 100;
  4894. FN M 223.0;
  4895. ) ;
  4896. O( ;
  4897. A M 116.2;
  4898. BLD 100;
  4899. FN M 223.1;
  4900. ) ;
  4901. ) ;
  4902. L DB4.DBW 248;
  4903. SF T 45;
  4904. NOP 0;
  4905. NOP 0;
  4906. NOP 0;
  4907. A T 45;
  4908. ) ;
  4909. A( ;
  4910. O M 29.2;
  4911. O M 29.1;
  4912. ) ;
  4913. A M 44.1;
  4914. A( ;
  4915. O( ;
  4916. AN I 8.5;
  4917. L DB2.DBW 60;
  4918. SF T 30;
  4919. NOP 0;
  4920. NOP 0;
  4921. NOP 0;
  4922. A T 30;
  4923. ) ;
  4924. O M 20.1;
  4925. ) ;
  4926. = M 159.1;
  4927. NETWORK
  4928. TITLE =
  4929. A M 29.0;
  4930. A I 2.3;
  4931. = M 159.4;
  4932. NETWORK
  4933. TITLE =
  4934. A I 8.3;
  4935. AN M 175.0;
  4936. AN M 116.0;
  4937. = M 159.5;
  4938. NETWORK
  4939. TITLE =
  4940. AN M 116.1;
  4941. A I 8.3;
  4942. AN M 179.0;
  4943. = M 159.0;
  4944. NETWORK
  4945. TITLE =
  4946. A M 159.5;
  4947. = L 4.0;
  4948. BLD 103;
  4949. A M 159.0;
  4950. = L 4.1;
  4951. BLD 103;
  4952. A M 21.0;
  4953. = L 4.2;
  4954. BLD 103;
  4955. A M 20.1;
  4956. = L 4.3;
  4957. BLD 103;
  4958. A M 20.1;
  4959. = L 4.4;
  4960. BLD 103;
  4961. A Q 6.5;
  4962. = L 4.5;
  4963. BLD 103;
  4964. A Q 6.6;
  4965. = L 4.6;
  4966. BLD 103;
  4967. A M 20.0;
  4968. = L 4.7;
  4969. BLD 103;
  4970. A M 159.1;
  4971. = L 5.0;
  4972. BLD 103;
  4973. A M 159.4;
  4974. = L 5.1;
  4975. BLD 103;
  4976. CALL FC 181 (
  4977. IN0 := L 4.0,
  4978. IN1 := L 4.1,
  4979. IN2 := L 4.2,
  4980. IN3 := L 4.3,
  4981. IN4 := L 4.4,
  4982. IN5 := L 4.5,
  4983. IN6 := L 4.6,
  4984. IN7 := L 4.7,
  4985. IN8 := L 5.0,
  4986. IN9 := L 5.1,
  4987. IN10 := W#16#5,
  4988. IN11 := C 6,
  4989. OUT12 := DB10.DBW 20,
  4990. OUT13 := M 121.0,
  4991. OUT14 := M 121.1,
  4992. OUT15 := M 160.0,
  4993. OUT16 := M 160.1,
  4994. IO17 := DB181.DBW 12,
  4995. IO18 := DB10.DBW 54);
  4996. NOP 0;
  4997. NETWORK
  4998. TITLE =
  4999. A( ;
  5000. O M 121.0;
  5001. O M 121.1;
  5002. ) ;
  5003. L DB2.DBW 30;
  5004. SD T 15;
  5005. NOP 0;
  5006. NOP 0;
  5007. NOP 0;
  5008. A T 15;
  5009. = Q 6.4;
  5010. NETWORK
  5011. TITLE =
  5012. O M 121.0;
  5013. O M 121.1;
  5014. = L 4.0;
  5015. A L 4.0;
  5016. JNB M001;
  5017. L DB4.DBD 56;
  5018. T DB4.DBD 60;
  5019. M001: NOP 0;
  5020. AN L 4.0;
  5021. JNB M002;
  5022. L 0.000000e+000;
  5023. T DB4.DBD 60;
  5024. M002: NOP 0;
  5025. NETWORK
  5026. TITLE =
  5027. A M 121.1;
  5028. L DB2.DBW 32;
  5029. SD T 16;
  5030. NOP 0;
  5031. NOP 0;
  5032. NOP 0;
  5033. A T 16;
  5034. = Q 6.6;
  5035. NETWORK
  5036. TITLE =
  5037. A M 121.0;
  5038. L DB2.DBW 34;
  5039. SD T 17;
  5040. NOP 0;
  5041. NOP 0;
  5042. NOP 0;
  5043. A T 17;
  5044. = Q 6.5;
  5045. NETWORK
  5046. TITLE =
  5047. O Q 6.5;
  5048. O I 1.3;
  5049. = Q 2.0;
  5050. NETWORK
  5051. TITLE =
  5052. O Q 6.6;
  5053. O I 1.3;
  5054. = Q 2.1;
  5055. END_FUNCTION
  5056. FUNCTION FC 14 : VOID
  5057. AUTHOR :
  5058. FAMILY : DRIVES
  5059. NAME : DRIVES
  5060. VERSION : 0.1
  5061. VAR_TEMP
  5062. TEMP0 : REAL ;
  5063. END_VAR
  5064. BEGIN
  5065. NETWORK
  5066. TITLE =
  5067. A( ;
  5068. A M 29.0;
  5069. A M 27.3;
  5070. A I 2.4;
  5071. A I 10.3;
  5072. O ;
  5073. AN I 10.3;
  5074. A I 10.5;
  5075. A I 10.4;
  5076. O ;
  5077. A( ;
  5078. O M 29.2;
  5079. O M 29.1;
  5080. ) ;
  5081. A M 44.1;
  5082. A M 27.3;
  5083. A I 10.3;
  5084. ) ;
  5085. FP M 163.0;
  5086. = M 163.1;
  5087. NETWORK
  5088. TITLE =
  5089. A M 29.0;
  5090. AN I 2.5;
  5091. O( ;
  5092. A( ;
  5093. O M 29.2;
  5094. O M 29.1;
  5095. ) ;
  5096. AN M 44.1;
  5097. A( ;
  5098. AN M 151.2;
  5099. AN M 151.3;
  5100. L DB2.DBW 56;
  5101. SD T 28;
  5102. NOP 0;
  5103. NOP 0;
  5104. NOP 0;
  5105. A T 28;
  5106. ) ;
  5107. ) ;
  5108. O( ;
  5109. A( ;
  5110. O M 29.2;
  5111. O M 29.1;
  5112. ) ;
  5113. A M 44.1;
  5114. A I 8.6;
  5115. A( ;
  5116. A( ;
  5117. AN M 151.2;
  5118. AN M 151.3;
  5119. L DB2.DBW 78;
  5120. SD T 39;
  5121. NOP 0;
  5122. NOP 0;
  5123. NOP 0;
  5124. A T 39;
  5125. ) ;
  5126. FP M 221.2;
  5127. ) ;
  5128. ) ;
  5129. O ;
  5130. AN I 10.3;
  5131. AN I 10.5;
  5132. O M 11.1;
  5133. O M 20.5;
  5134. = M 163.2;
  5135. NETWORK
  5136. TITLE =
  5137. AN M 206.0;
  5138. AN M 207.0;
  5139. AN M 182.0;
  5140. AN M 183.0;
  5141. AN M 208.0;
  5142. AN M 212.0;
  5143. AN M 211.0;
  5144. A( ;
  5145. A( ;
  5146. AN Q 6.0;
  5147. A I 8.7;
  5148. A I 8.6;
  5149. L DB2.DBW 52;
  5150. SD T 26;
  5151. NOP 0;
  5152. NOP 0;
  5153. NOP 0;
  5154. A T 26;
  5155. ) ;
  5156. NOT ;
  5157. ) ;
  5158. = M 163.3;
  5159. NETWORK
  5160. TITLE =
  5161. A M 163.3;
  5162. = L 4.0;
  5163. BLD 103;
  5164. A M 21.0;
  5165. = L 4.1;
  5166. BLD 103;
  5167. A M 20.1;
  5168. = L 4.2;
  5169. BLD 103;
  5170. A M 20.1;
  5171. = L 4.3;
  5172. BLD 103;
  5173. A I 8.7;
  5174. = L 4.4;
  5175. BLD 103;
  5176. A M 20.0;
  5177. = L 4.5;
  5178. BLD 103;
  5179. A M 163.1;
  5180. = L 4.6;
  5181. BLD 103;
  5182. A M 163.2;
  5183. = L 4.7;
  5184. BLD 103;
  5185. CALL FC 180 (
  5186. IN0 := L 4.0,
  5187. IN1 := L 4.1,
  5188. IN2 := L 4.2,
  5189. IN3 := L 4.3,
  5190. IN4 := L 4.4,
  5191. IN5 := L 4.5,
  5192. IN6 := L 4.6,
  5193. IN7 := L 4.7,
  5194. IN8 := W#16#2,
  5195. IN9 := C 9,
  5196. OUT10 := DB10.DBW 26,
  5197. OUT11 := Q 6.3,
  5198. OUT12 := M 163.4,
  5199. OUT13 := M 163.5,
  5200. IO14 := DB181.DBW 18,
  5201. IO15 := DB10.DBW 60);
  5202. NOP 0;
  5203. NETWORK
  5204. TITLE =
  5205. A I 8.7;
  5206. = L 4.0;
  5207. A L 4.0;
  5208. BLD 102;
  5209. = Q 3.6;
  5210. O L 4.0;
  5211. O I 1.3;
  5212. = Q 4.5;
  5213. END_FUNCTION
  5214. FUNCTION FC 15 : VOID
  5215. AUTHOR :
  5216. FAMILY : DRIVES
  5217. NAME : DRIVES
  5218. VERSION : 0.1
  5219. VAR_TEMP
  5220. TEMP0 : REAL ;
  5221. END_VAR
  5222. BEGIN
  5223. NETWORK
  5224. TITLE =
  5225. A I 0.2;
  5226. AN M 164.4;
  5227. A( ;
  5228. A( ;
  5229. O Q 0.0;
  5230. O I 1.0;
  5231. O I 2.0;
  5232. O I 2.2;
  5233. O I 2.3;
  5234. O I 2.4;
  5235. O I 2.6;
  5236. O I 2.7;
  5237. O( ;
  5238. A I 4.1;
  5239. FP M 218.1;
  5240. ) ;
  5241. ) ;
  5242. = M 218.0;
  5243. A M 218.0;
  5244. ) ;
  5245. FP M 164.0;
  5246. = M 164.1;
  5247. NETWORK
  5248. TITLE =
  5249. A( ;
  5250. A M 38.0;
  5251. A( ;
  5252. O I 11.4;
  5253. O I 12.5;
  5254. ) ;
  5255. L DB2.DBW 54;
  5256. SD T 27;
  5257. NOP 0;
  5258. NOP 0;
  5259. NOP 0;
  5260. A T 27;
  5261. ) ;
  5262. FP M 218.3;
  5263. = M 164.2;
  5264. NETWORK
  5265. TITLE =
  5266. A M 20.1;
  5267. = M 164.3;
  5268. NETWORK
  5269. TITLE =
  5270. A M 164.3;
  5271. = L 4.0;
  5272. BLD 103;
  5273. A M 21.0;
  5274. = L 4.1;
  5275. BLD 103;
  5276. A M 20.1;
  5277. = L 4.2;
  5278. BLD 103;
  5279. A M 20.1;
  5280. = L 4.3;
  5281. BLD 103;
  5282. A I 11.4;
  5283. = L 4.4;
  5284. BLD 103;
  5285. A M 20.0;
  5286. = L 4.5;
  5287. BLD 103;
  5288. A M 164.1;
  5289. = L 4.6;
  5290. BLD 103;
  5291. A M 164.2;
  5292. = L 4.7;
  5293. BLD 103;
  5294. CALL FC 180 (
  5295. IN0 := L 4.0,
  5296. IN1 := L 4.1,
  5297. IN2 := L 4.2,
  5298. IN3 := L 4.3,
  5299. IN4 := L 4.4,
  5300. IN5 := L 4.5,
  5301. IN6 := L 4.6,
  5302. IN7 := L 4.7,
  5303. IN8 := W#16#2,
  5304. IN9 := C 10,
  5305. OUT10 := DB10.DBW 28,
  5306. OUT11 := Q 5.6,
  5307. OUT12 := M 164.4,
  5308. OUT13 := M 164.5,
  5309. IO14 := DB181.DBW 20,
  5310. IO15 := DB10.DBW 62);
  5311. NOP 0;
  5312. NETWORK
  5313. TITLE =
  5314. A I 0.2;
  5315. AN M 165.4;
  5316. A M 218.0;
  5317. FP M 165.0;
  5318. = M 165.1;
  5319. NETWORK
  5320. TITLE =
  5321. A T 27;
  5322. FP M 218.2;
  5323. = M 165.2;
  5324. NETWORK
  5325. TITLE =
  5326. A M 20.1;
  5327. = M 165.3;
  5328. NETWORK
  5329. TITLE =
  5330. A M 165.3;
  5331. = L 4.0;
  5332. BLD 103;
  5333. A M 21.0;
  5334. = L 4.1;
  5335. BLD 103;
  5336. A M 20.1;
  5337. = L 4.2;
  5338. BLD 103;
  5339. A M 20.1;
  5340. = L 4.3;
  5341. BLD 103;
  5342. A I 12.5;
  5343. = L 4.4;
  5344. BLD 103;
  5345. A M 20.0;
  5346. = L 4.5;
  5347. BLD 103;
  5348. A M 165.1;
  5349. = L 4.6;
  5350. BLD 103;
  5351. A M 165.2;
  5352. = L 4.7;
  5353. BLD 103;
  5354. CALL FC 180 (
  5355. IN0 := L 4.0,
  5356. IN1 := L 4.1,
  5357. IN2 := L 4.2,
  5358. IN3 := L 4.3,
  5359. IN4 := L 4.4,
  5360. IN5 := L 4.5,
  5361. IN6 := L 4.6,
  5362. IN7 := L 4.7,
  5363. IN8 := W#16#2,
  5364. IN9 := C 11,
  5365. OUT10 := DB10.DBW 30,
  5366. OUT11 := Q 5.7,
  5367. OUT12 := M 165.4,
  5368. OUT13 := M 165.5,
  5369. IO14 := DB181.DBW 22,
  5370. IO15 := DB10.DBW 64);
  5371. NOP 0;
  5372. NETWORK
  5373. TITLE =
  5374. AN M 187.0;
  5375. AN M 191.0;
  5376. AN M 188.0;
  5377. AN M 192.0;
  5378. AN M 189.0;
  5379. AN M 193.0;
  5380. AN M 190.0;
  5381. AN M 194.0;
  5382. A I 11.4;
  5383. A I 12.5;
  5384. = M 121.7;
  5385. A M 121.7;
  5386. O I 1.3;
  5387. = Q 2.6;
  5388. END_FUNCTION
  5389. FUNCTION FC 20 : VOID
  5390. AUTHOR :
  5391. FAMILY : ANALOGUE
  5392. NAME : ANALOGUE
  5393. VERSION : 0.1
  5394. VAR_TEMP
  5395. TEMP0 : WORD ;
  5396. TEMP1 : REAL ;
  5397. TEMP2 : REAL ;
  5398. TEMP3 : REAL ;
  5399. END_VAR
  5400. BEGIN
  5401. NETWORK
  5402. TITLE =
  5403. L ID 105;
  5404. DTR ;
  5405. T #TEMP2;
  5406. NOP 0;
  5407. NETWORK
  5408. TITLE =
  5409. L #TEMP2;
  5410. L 1.000000e+000;
  5411. /R ;
  5412. T DB4.DBD 0;
  5413. NOP 0;
  5414. NETWORK
  5415. TITLE =
  5416. A M 21.0;
  5417. = L 14.0;
  5418. BLD 103;
  5419. A( ;
  5420. L DB4.DBD 0;
  5421. L 0.000000e+000;
  5422. ==R ;
  5423. ) ;
  5424. = L 14.1;
  5425. BLD 103;
  5426. A M 20.1;
  5427. = L 14.2;
  5428. BLD 103;
  5429. CALL FC 182 (
  5430. IN0 := L 14.0,
  5431. IN1 := L 14.1,
  5432. IN2 := L 14.2,
  5433. OUT3 := M 123.0,
  5434. OUT4 := M 123.1,
  5435. OUT5 := M 123.2,
  5436. OUT6 := DB10.DBW 374,
  5437. IO7 := DB182.DBW 80);
  5438. NOP 0;
  5439. NETWORK
  5440. TITLE =
  5441. A M 200.6;
  5442. A M 20.1;
  5443. = L 14.0;
  5444. A L 14.0;
  5445. JNB M001;
  5446. L DW#16#80000000;
  5447. T QD 105;
  5448. M001: NOP 0;
  5449. AN L 14.0;
  5450. JNB M002;
  5451. L DW#16#0;
  5452. T QD 105;
  5453. M002: NOP 0;
  5454. NETWORK
  5455. TITLE =
  5456. L DB4.DBD 0;
  5457. L DB4.DBD 4;
  5458. >=R ;
  5459. = M 116.0;
  5460. = Q 4.1;
  5461. NETWORK
  5462. TITLE =
  5463. A( ;
  5464. L DB4.DBD 0;
  5465. L DB4.DBD 12;
  5466. >=R ;
  5467. ) ;
  5468. A( ;
  5469. A( ;
  5470. O M 116.3;
  5471. O M 116.5;
  5472. ) ;
  5473. FP M 122.0;
  5474. ) ;
  5475. S M 122.1;
  5476. A Q 6.6;
  5477. R M 122.1;
  5478. A M 122.1;
  5479. = L 14.0;
  5480. A L 14.0;
  5481. BLD 102;
  5482. = Q 3.7;
  5483. O L 14.0;
  5484. O I 1.3;
  5485. = Q 1.4;
  5486. NETWORK
  5487. TITLE =
  5488. L DB4.DBD 0;
  5489. L DB4.DBD 8;
  5490. <=R ;
  5491. = M 116.1;
  5492. NETWORK
  5493. TITLE =
  5494. A( ;
  5495. O M 150.0;
  5496. O M 150.1;
  5497. ) ;
  5498. FP M 200.1;
  5499. JNB M003;
  5500. L DB4.DBD 20;
  5501. T DB4.DBD 28;
  5502. M003: NOP 0;
  5503. NETWORK
  5504. TITLE =
  5505. A( ;
  5506. O M 150.2;
  5507. O M 150.3;
  5508. ) ;
  5509. FP M 200.2;
  5510. JNB M004;
  5511. L DB4.DBD 24;
  5512. T DB4.DBD 28;
  5513. M004: NOP 0;
  5514. NETWORK
  5515. TITLE =
  5516. A M 20.0;
  5517. = L 14.0;
  5518. BLD 103;
  5519. CALL FC 171 (
  5520. IN0 := DB4.DBD 28,
  5521. IN1 := 1.000000e+002,
  5522. IN2 := 0.000000e+000,
  5523. IN3 := L 14.0,
  5524. RET_VAL := #TEMP0,
  5525. OUT4 := PQW 258);
  5526. NOP 0;
  5527. NETWORK
  5528. TITLE =
  5529. A I 7.7;
  5530. FP M 118.0;
  5531. JNB M005;
  5532. L DB4.DBD 36;
  5533. L 1.000000e+000;
  5534. +R ;
  5535. T DB4.DBD 36;
  5536. M005: NOP 0;
  5537. NETWORK
  5538. TITLE =
  5539. L DB4.DBD 36;
  5540. L 1.000000e+000;
  5541. *R ;
  5542. T DB4.DBD 40;
  5543. NOP 0;
  5544. NETWORK
  5545. TITLE =
  5546. A( ;
  5547. A( ;
  5548. A M 151.3;
  5549. L DB2.DBW 40;
  5550. SF T 20;
  5551. NOP 0;
  5552. NOP 0;
  5553. NOP 0;
  5554. A T 20;
  5555. ) ;
  5556. A( ;
  5557. O M 116.5;
  5558. O M 116.2;
  5559. ) ;
  5560. O ;
  5561. A( ;
  5562. A M 151.2;
  5563. L DB2.DBW 42;
  5564. SF T 21;
  5565. NOP 0;
  5566. NOP 0;
  5567. NOP 0;
  5568. A T 21;
  5569. ) ;
  5570. A( ;
  5571. O M 116.3;
  5572. O M 116.6;
  5573. ) ;
  5574. ) ;
  5575. FP M 118.2;
  5576. JNB M006;
  5577. L 0.000000e+000;
  5578. T DB4.DBD 36;
  5579. M006: NOP 0;
  5580. NETWORK
  5581. TITLE =
  5582. L DB4.DBD 40;
  5583. L DB4.DBD 44;
  5584. >=R ;
  5585. = M 118.4;
  5586. NETWORK
  5587. TITLE =
  5588. L DB4.DBD 0;
  5589. L DB4.DBD 72;
  5590. <=R ;
  5591. = L 14.0;
  5592. A L 14.0;
  5593. JNB M007;
  5594. L DB4.DBD 152;
  5595. T DB4.DBD 44;
  5596. M007: NOP 0;
  5597. A L 14.0;
  5598. JNB M008;
  5599. L DB4.DBW 232;
  5600. T DB2.DBW 62;
  5601. M008: NOP 0;
  5602. NETWORK
  5603. TITLE =
  5604. A( ;
  5605. L DB4.DBD 0;
  5606. L DB4.DBD 72;
  5607. >R ;
  5608. ) ;
  5609. A( ;
  5610. L DB4.DBD 0;
  5611. L DB4.DBD 76;
  5612. <=R ;
  5613. ) ;
  5614. = L 14.0;
  5615. A L 14.0;
  5616. JNB M009;
  5617. L DB4.DBD 156;
  5618. T DB4.DBD 44;
  5619. M009: NOP 0;
  5620. A L 14.0;
  5621. JNB M00a;
  5622. L DB4.DBW 234;
  5623. T DB2.DBW 62;
  5624. M00a: NOP 0;
  5625. NETWORK
  5626. TITLE =
  5627. A( ;
  5628. L DB4.DBD 0;
  5629. L DB4.DBD 76;
  5630. >R ;
  5631. ) ;
  5632. A( ;
  5633. L DB4.DBD 0;
  5634. L DB4.DBD 80;
  5635. <=R ;
  5636. ) ;
  5637. = L 14.0;
  5638. A L 14.0;
  5639. JNB M00b;
  5640. L DB4.DBD 160;
  5641. T DB4.DBD 44;
  5642. M00b: NOP 0;
  5643. A L 14.0;
  5644. JNB M00c;
  5645. L DB4.DBW 236;
  5646. T DB2.DBW 62;
  5647. M00c: NOP 0;
  5648. NETWORK
  5649. TITLE =
  5650. A( ;
  5651. L DB4.DBD 0;
  5652. L DB4.DBD 80;
  5653. >R ;
  5654. ) ;
  5655. A( ;
  5656. L DB4.DBD 0;
  5657. L DB4.DBD 84;
  5658. <=R ;
  5659. ) ;
  5660. = L 14.0;
  5661. A L 14.0;
  5662. JNB M00d;
  5663. L DB4.DBD 164;
  5664. T DB4.DBD 44;
  5665. M00d: NOP 0;
  5666. A L 14.0;
  5667. JNB M00e;
  5668. L DB4.DBW 238;
  5669. T DB2.DBW 62;
  5670. M00e: NOP 0;
  5671. NETWORK
  5672. TITLE =
  5673. A( ;
  5674. L DB4.DBD 0;
  5675. L DB4.DBD 84;
  5676. >R ;
  5677. ) ;
  5678. A( ;
  5679. L DB4.DBD 0;
  5680. L DB4.DBD 88;
  5681. <=R ;
  5682. ) ;
  5683. = L 14.0;
  5684. A L 14.0;
  5685. JNB M00f;
  5686. L DB4.DBD 168;
  5687. T DB4.DBD 44;
  5688. M00f: NOP 0;
  5689. A L 14.0;
  5690. JNB M010;
  5691. L DB4.DBW 240;
  5692. T DB2.DBW 62;
  5693. M010: NOP 0;
  5694. NETWORK
  5695. TITLE =
  5696. A( ;
  5697. L DB4.DBD 0;
  5698. L DB4.DBD 88;
  5699. >R ;
  5700. ) ;
  5701. A( ;
  5702. L DB4.DBD 0;
  5703. L DB4.DBD 92;
  5704. <=R ;
  5705. ) ;
  5706. = L 14.0;
  5707. A L 14.0;
  5708. JNB M011;
  5709. L DB4.DBD 172;
  5710. T DB4.DBD 44;
  5711. M011: NOP 0;
  5712. A L 14.0;
  5713. JNB M012;
  5714. L DB4.DBW 242;
  5715. T DB2.DBW 62;
  5716. M012: NOP 0;
  5717. NETWORK
  5718. TITLE =
  5719. A( ;
  5720. L DB4.DBD 0;
  5721. L DB4.DBD 92;
  5722. >R ;
  5723. ) ;
  5724. A( ;
  5725. L DB4.DBD 0;
  5726. L DB4.DBD 96;
  5727. <=R ;
  5728. ) ;
  5729. = L 14.0;
  5730. A L 14.0;
  5731. JNB M013;
  5732. L DB4.DBD 176;
  5733. T DB4.DBD 44;
  5734. M013: NOP 0;
  5735. A L 14.0;
  5736. JNB M014;
  5737. L DB4.DBW 244;
  5738. T DB2.DBW 62;
  5739. M014: NOP 0;
  5740. NETWORK
  5741. TITLE =
  5742. A( ;
  5743. L DB4.DBD 0;
  5744. L DB4.DBD 96;
  5745. >R ;
  5746. ) ;
  5747. A( ;
  5748. L DB4.DBD 0;
  5749. L DB4.DBD 100;
  5750. <=R ;
  5751. ) ;
  5752. = L 14.0;
  5753. A L 14.0;
  5754. JNB M015;
  5755. L DB4.DBD 180;
  5756. T DB4.DBD 44;
  5757. M015: NOP 0;
  5758. A L 14.0;
  5759. JNB M016;
  5760. L DB4.DBW 246;
  5761. T DB2.DBW 62;
  5762. M016: NOP 0;
  5763. NETWORK
  5764. TITLE =
  5765. A( ;
  5766. L DB4.DBD 0;
  5767. L DB4.DBD 100;
  5768. >R ;
  5769. ) ;
  5770. A( ;
  5771. L DB4.DBD 0;
  5772. L DB4.DBD 104;
  5773. <=R ;
  5774. ) ;
  5775. = L 14.0;
  5776. A L 14.0;
  5777. JNB M017;
  5778. L DB4.DBD 184;
  5779. T DB4.DBD 44;
  5780. M017: NOP 0;
  5781. A L 14.0;
  5782. JNB M018;
  5783. L DB4.DBW 248;
  5784. T DB2.DBW 62;
  5785. M018: NOP 0;
  5786. NETWORK
  5787. TITLE =
  5788. A( ;
  5789. L DB4.DBD 0;
  5790. L DB4.DBD 104;
  5791. >R ;
  5792. ) ;
  5793. A( ;
  5794. L DB4.DBD 0;
  5795. L DB4.DBD 108;
  5796. <=R ;
  5797. ) ;
  5798. = L 14.0;
  5799. A L 14.0;
  5800. JNB M019;
  5801. L DB4.DBD 188;
  5802. T DB4.DBD 44;
  5803. M019: NOP 0;
  5804. A L 14.0;
  5805. JNB M01a;
  5806. L DB4.DBW 250;
  5807. T DB2.DBW 62;
  5808. M01a: NOP 0;
  5809. NETWORK
  5810. TITLE =
  5811. A( ;
  5812. L DB4.DBD 0;
  5813. L DB4.DBD 108;
  5814. >R ;
  5815. ) ;
  5816. A( ;
  5817. L DB4.DBD 0;
  5818. L DB4.DBD 112;
  5819. <=R ;
  5820. ) ;
  5821. = L 14.0;
  5822. A L 14.0;
  5823. JNB M01b;
  5824. L DB4.DBD 192;
  5825. T DB4.DBD 44;
  5826. M01b: NOP 0;
  5827. A L 14.0;
  5828. JNB M01c;
  5829. L DB4.DBW 252;
  5830. T DB2.DBW 62;
  5831. M01c: NOP 0;
  5832. NETWORK
  5833. TITLE =
  5834. A( ;
  5835. L DB4.DBD 0;
  5836. L DB4.DBD 112;
  5837. >R ;
  5838. ) ;
  5839. A( ;
  5840. L DB4.DBD 0;
  5841. L DB4.DBD 116;
  5842. <=R ;
  5843. ) ;
  5844. = L 14.0;
  5845. A L 14.0;
  5846. JNB M01d;
  5847. L DB4.DBD 196;
  5848. T DB4.DBD 44;
  5849. M01d: NOP 0;
  5850. A L 14.0;
  5851. JNB M01e;
  5852. L DB4.DBW 254;
  5853. T DB2.DBW 62;
  5854. M01e: NOP 0;
  5855. NETWORK
  5856. TITLE =
  5857. A( ;
  5858. L DB4.DBD 0;
  5859. L DB4.DBD 116;
  5860. >R ;
  5861. ) ;
  5862. A( ;
  5863. L DB4.DBD 0;
  5864. L DB4.DBD 120;
  5865. <=R ;
  5866. ) ;
  5867. = L 14.0;
  5868. A L 14.0;
  5869. JNB M01f;
  5870. L DB4.DBD 200;
  5871. T DB4.DBD 44;
  5872. M01f: NOP 0;
  5873. A L 14.0;
  5874. JNB M020;
  5875. L DB4.DBW 256;
  5876. T DB2.DBW 62;
  5877. M020: NOP 0;
  5878. NETWORK
  5879. TITLE =
  5880. A( ;
  5881. L DB4.DBD 0;
  5882. L DB4.DBD 120;
  5883. >R ;
  5884. ) ;
  5885. A( ;
  5886. L DB4.DBD 0;
  5887. L DB4.DBD 124;
  5888. <=R ;
  5889. ) ;
  5890. = L 14.0;
  5891. A L 14.0;
  5892. JNB M021;
  5893. L DB4.DBD 204;
  5894. T DB4.DBD 44;
  5895. M021: NOP 0;
  5896. A L 14.0;
  5897. JNB M022;
  5898. L DB4.DBW 258;
  5899. T DB2.DBW 62;
  5900. M022: NOP 0;
  5901. NETWORK
  5902. TITLE =
  5903. A( ;
  5904. L DB4.DBD 0;
  5905. L DB4.DBD 124;
  5906. >R ;
  5907. ) ;
  5908. A( ;
  5909. L DB4.DBD 0;
  5910. L DB4.DBD 128;
  5911. <=R ;
  5912. ) ;
  5913. = L 14.0;
  5914. A L 14.0;
  5915. JNB M023;
  5916. L DB4.DBD 208;
  5917. T DB4.DBD 44;
  5918. M023: NOP 0;
  5919. A L 14.0;
  5920. JNB M024;
  5921. L DB4.DBW 260;
  5922. T DB2.DBW 62;
  5923. M024: NOP 0;
  5924. NETWORK
  5925. TITLE =
  5926. A( ;
  5927. L DB4.DBD 0;
  5928. L DB4.DBD 128;
  5929. >R ;
  5930. ) ;
  5931. A( ;
  5932. L DB4.DBD 0;
  5933. L DB4.DBD 132;
  5934. <=R ;
  5935. ) ;
  5936. = L 14.0;
  5937. A L 14.0;
  5938. JNB M025;
  5939. L DB4.DBD 212;
  5940. T DB4.DBD 44;
  5941. M025: NOP 0;
  5942. A L 14.0;
  5943. JNB M026;
  5944. L DB4.DBW 262;
  5945. T DB2.DBW 62;
  5946. M026: NOP 0;
  5947. NETWORK
  5948. TITLE =
  5949. A( ;
  5950. L DB4.DBD 0;
  5951. L DB4.DBD 132;
  5952. >R ;
  5953. ) ;
  5954. A( ;
  5955. L DB4.DBD 0;
  5956. L DB4.DBD 136;
  5957. <=R ;
  5958. ) ;
  5959. = L 14.0;
  5960. A L 14.0;
  5961. JNB M027;
  5962. L DB4.DBD 216;
  5963. T DB4.DBD 44;
  5964. M027: NOP 0;
  5965. A L 14.0;
  5966. JNB M028;
  5967. L DB4.DBW 264;
  5968. T DB2.DBW 62;
  5969. M028: NOP 0;
  5970. NETWORK
  5971. TITLE =
  5972. A( ;
  5973. L DB4.DBD 0;
  5974. L DB4.DBD 136;
  5975. >R ;
  5976. ) ;
  5977. A( ;
  5978. L DB4.DBD 0;
  5979. L DB4.DBD 140;
  5980. <=R ;
  5981. ) ;
  5982. = L 14.0;
  5983. A L 14.0;
  5984. JNB M029;
  5985. L DB4.DBD 220;
  5986. T DB4.DBD 44;
  5987. M029: NOP 0;
  5988. A L 14.0;
  5989. JNB M02a;
  5990. L DB4.DBW 266;
  5991. T DB2.DBW 62;
  5992. M02a: NOP 0;
  5993. NETWORK
  5994. TITLE =
  5995. A( ;
  5996. L DB4.DBD 0;
  5997. L DB4.DBD 140;
  5998. >R ;
  5999. ) ;
  6000. A( ;
  6001. L DB4.DBD 0;
  6002. L DB4.DBD 144;
  6003. <=R ;
  6004. ) ;
  6005. = L 14.0;
  6006. A L 14.0;
  6007. JNB M02b;
  6008. L DB4.DBD 224;
  6009. T DB4.DBD 44;
  6010. M02b: NOP 0;
  6011. A L 14.0;
  6012. JNB M02c;
  6013. L DB4.DBW 268;
  6014. T DB2.DBW 62;
  6015. M02c: NOP 0;
  6016. NETWORK
  6017. TITLE =
  6018. A( ;
  6019. L DB4.DBD 0;
  6020. L DB4.DBD 144;
  6021. >R ;
  6022. ) ;
  6023. A( ;
  6024. L DB4.DBD 0;
  6025. L DB4.DBD 148;
  6026. <=R ;
  6027. ) ;
  6028. = L 14.0;
  6029. A L 14.0;
  6030. JNB M02d;
  6031. L DB4.DBD 228;
  6032. T DB4.DBD 44;
  6033. M02d: NOP 0;
  6034. A L 14.0;
  6035. JNB M02e;
  6036. L DB4.DBW 270;
  6037. T DB2.DBW 62;
  6038. M02e: NOP 0;
  6039. NETWORK
  6040. TITLE =
  6041. L DB4.DBD 0;
  6042. L DB4.DBD 148;
  6043. >R ;
  6044. = L 14.0;
  6045. A L 14.0;
  6046. JNB M02f;
  6047. L DB4.DBD 228;
  6048. T DB4.DBD 44;
  6049. M02f: NOP 0;
  6050. A L 14.0;
  6051. JNB M030;
  6052. L DB4.DBW 270;
  6053. T DB2.DBW 62;
  6054. M030: NOP 0;
  6055. NETWORK
  6056. TITLE =
  6057. A M 20.0;
  6058. = L 14.0;
  6059. BLD 103;
  6060. A M 20.0;
  6061. = L 14.1;
  6062. BLD 103;
  6063. A M 20.0;
  6064. = L 14.2;
  6065. BLD 103;
  6066. A M 20.0;
  6067. = L 14.3;
  6068. BLD 103;
  6069. A M 20.0;
  6070. = L 14.4;
  6071. BLD 103;
  6072. A M 20.0;
  6073. = L 14.5;
  6074. BLD 103;
  6075. A M 21.0;
  6076. = L 14.6;
  6077. BLD 103;
  6078. CALL FC 179 (
  6079. IN0 := PIW 272,
  6080. IN1 := 1.000000e+002,
  6081. IN2 := 0.000000e+000,
  6082. IN3 := 0.000000e+000,
  6083. IN4 := DB10.DBD 160,
  6084. IN5 := DB10.DBD 164,
  6085. IN6 := DB10.DBD 168,
  6086. IN7 := DB10.DBD 172,
  6087. IN8 := 1.000000e+002,
  6088. IN9 := L 14.0,
  6089. IN10 := L 14.1,
  6090. IN11 := L 14.2,
  6091. IN12 := L 14.3,
  6092. IN13 := L 14.4,
  6093. IN14 := L 14.5,
  6094. IN15 := L 14.6,
  6095. OUT16 := DB10.DBD 200,
  6096. OUT17 := M 176.0,
  6097. OUT18 := M 176.1,
  6098. OUT19 := M 176.2,
  6099. OUT20 := M 176.3,
  6100. OUT21 := M 176.4,
  6101. OUT22 := M 176.5,
  6102. OUT23 := DB10.DBW 100,
  6103. OUT24 := DB10.DBW 102,
  6104. OUT25 := DB10.DBW 104,
  6105. OUT26 := DB10.DBW 106,
  6106. OUT27 := DB10.DBW 108,
  6107. OUT28 := M 177.0,
  6108. OUT29 := M 177.1,
  6109. OUT30 := M 177.2,
  6110. OUT31 := M 177.3,
  6111. OUT32 := M 177.4,
  6112. IO33 := DB179.DBD 8,
  6113. IO34 := DB179.DBW 202,
  6114. IO35 := DB179.DBW 302);
  6115. NOP 0;
  6116. NETWORK
  6117. TITLE =
  6118. A M 20.0;
  6119. = L 14.0;
  6120. BLD 103;
  6121. CALL FC 171 (
  6122. IN0 := DB10.DBD 200,
  6123. IN1 := 1.000000e+002,
  6124. IN2 := 0.000000e+000,
  6125. IN3 := L 14.0,
  6126. RET_VAL := #TEMP0,
  6127. OUT4 := PQW 256);
  6128. NOP 0;
  6129. NETWORK
  6130. TITLE =
  6131. A M 20.0;
  6132. = L 14.0;
  6133. BLD 103;
  6134. A M 20.0;
  6135. = L 14.1;
  6136. BLD 103;
  6137. A M 20.0;
  6138. = L 14.2;
  6139. BLD 103;
  6140. A M 20.0;
  6141. = L 14.3;
  6142. BLD 103;
  6143. A M 20.0;
  6144. = L 14.4;
  6145. BLD 103;
  6146. A M 20.1;
  6147. = L 14.5;
  6148. BLD 103;
  6149. A M 21.0;
  6150. = L 14.6;
  6151. BLD 103;
  6152. CALL FC 179 (
  6153. IN0 := PIW 274,
  6154. IN1 := 1.000000e+002,
  6155. IN2 := 0.000000e+000,
  6156. IN3 := 0.000000e+000,
  6157. IN4 := DB10.DBD 176,
  6158. IN5 := DB10.DBD 180,
  6159. IN6 := DB10.DBD 184,
  6160. IN7 := DB10.DBD 188,
  6161. IN8 := 1.000000e+002,
  6162. IN9 := L 14.0,
  6163. IN10 := L 14.1,
  6164. IN11 := L 14.2,
  6165. IN12 := L 14.3,
  6166. IN13 := L 14.4,
  6167. IN14 := L 14.5,
  6168. IN15 := L 14.6,
  6169. OUT16 := DB10.DBD 204,
  6170. OUT17 := M 214.0,
  6171. OUT18 := M 214.1,
  6172. OUT19 := M 214.2,
  6173. OUT20 := M 214.3,
  6174. OUT21 := M 214.4,
  6175. OUT22 := M 214.5,
  6176. OUT23 := DB10.DBW 364,
  6177. OUT24 := DB10.DBW 366,
  6178. OUT25 := DB10.DBW 368,
  6179. OUT26 := DB10.DBW 370,
  6180. OUT27 := DB10.DBW 372,
  6181. OUT28 := M 215.0,
  6182. OUT29 := M 215.1,
  6183. OUT30 := M 215.2,
  6184. OUT31 := M 215.3,
  6185. OUT32 := M 215.4,
  6186. IO33 := DB179.DBD 20,
  6187. IO34 := DB179.DBW 208,
  6188. IO35 := DB179.DBW 308);
  6189. NOP 0;
  6190. NETWORK
  6191. TITLE =
  6192. A M 20.0;
  6193. = L 14.0;
  6194. BLD 103;
  6195. CALL FC 171 (
  6196. IN0 := DB4.DBD 60,
  6197. IN1 := 1.000000e+002,
  6198. IN2 := 0.000000e+000,
  6199. IN3 := L 14.0,
  6200. RET_VAL := #TEMP0,
  6201. OUT4 := PQW 260);
  6202. NOP 0;
  6203. END_FUNCTION
  6204. FUNCTION FC 21 : VOID
  6205. AUTHOR :
  6206. FAMILY : DIGITAL
  6207. NAME : DIGITAL
  6208. VERSION : 0.1
  6209. VAR_TEMP
  6210. TEMP0 : WORD ;
  6211. END_VAR
  6212. BEGIN
  6213. NETWORK
  6214. TITLE =
  6215. A M 21.0;
  6216. = L 2.0;
  6217. BLD 103;
  6218. A I 8.0;
  6219. = L 2.1;
  6220. BLD 103;
  6221. A M 20.1;
  6222. = L 2.2;
  6223. BLD 103;
  6224. CALL FC 182 (
  6225. IN0 := L 2.0,
  6226. IN1 := L 2.1,
  6227. IN2 := L 2.2,
  6228. OUT3 := M 155.0,
  6229. OUT4 := M 155.1,
  6230. OUT5 := M 155.2,
  6231. OUT6 := DB10.DBW 76,
  6232. IO7 := DB182.DBW 2);
  6233. NOP 0;
  6234. NETWORK
  6235. TITLE =
  6236. A M 21.0;
  6237. = L 2.0;
  6238. BLD 103;
  6239. AN I 8.1;
  6240. = L 2.1;
  6241. BLD 103;
  6242. AN I 3.4;
  6243. = L 2.2;
  6244. BLD 103;
  6245. CALL FC 182 (
  6246. IN0 := L 2.0,
  6247. IN1 := L 2.1,
  6248. IN2 := L 2.2,
  6249. OUT3 := M 158.0,
  6250. OUT4 := M 158.1,
  6251. OUT5 := M 158.2,
  6252. OUT6 := DB10.DBW 78,
  6253. IO7 := DB182.DBW 4);
  6254. NOP 0;
  6255. NETWORK
  6256. TITLE =
  6257. A M 21.0;
  6258. = L 2.0;
  6259. BLD 103;
  6260. A I 8.2;
  6261. = L 2.1;
  6262. BLD 103;
  6263. A M 20.1;
  6264. = L 2.2;
  6265. BLD 103;
  6266. CALL FC 182 (
  6267. IN0 := L 2.0,
  6268. IN1 := L 2.1,
  6269. IN2 := L 2.2,
  6270. OUT3 := M 166.0,
  6271. OUT4 := M 166.1,
  6272. OUT5 := M 166.2,
  6273. OUT6 := DB10.DBW 80,
  6274. IO7 := DB182.DBW 6);
  6275. NOP 0;
  6276. NETWORK
  6277. TITLE =
  6278. A M 166.0;
  6279. = Q 4.0;
  6280. NETWORK
  6281. TITLE =
  6282. A M 21.0;
  6283. = L 2.0;
  6284. BLD 103;
  6285. A I 10.0;
  6286. = L 2.1;
  6287. BLD 103;
  6288. A M 20.1;
  6289. = L 2.2;
  6290. BLD 103;
  6291. CALL FC 182 (
  6292. IN0 := L 2.0,
  6293. IN1 := L 2.1,
  6294. IN2 := L 2.2,
  6295. OUT3 := M 170.0,
  6296. OUT4 := M 170.1,
  6297. OUT5 := M 170.2,
  6298. OUT6 := DB10.DBW 94,
  6299. IO7 := DB182.DBW 10);
  6300. NOP 0;
  6301. NETWORK
  6302. TITLE =
  6303. A M 21.0;
  6304. = L 2.0;
  6305. BLD 103;
  6306. AN I 10.2;
  6307. = L 2.1;
  6308. BLD 103;
  6309. A M 20.1;
  6310. = L 2.2;
  6311. BLD 103;
  6312. CALL FC 182 (
  6313. IN0 := L 2.0,
  6314. IN1 := L 2.1,
  6315. IN2 := L 2.2,
  6316. OUT3 := M 167.0,
  6317. OUT4 := M 167.1,
  6318. OUT5 := M 167.2,
  6319. OUT6 := DB10.DBW 82,
  6320. IO7 := DB182.DBW 8);
  6321. NOP 0;
  6322. NETWORK
  6323. TITLE =
  6324. A M 21.0;
  6325. = L 2.0;
  6326. BLD 103;
  6327. AN I 10.1;
  6328. = L 2.1;
  6329. BLD 103;
  6330. A M 20.1;
  6331. = L 2.2;
  6332. BLD 103;
  6333. CALL FC 182 (
  6334. IN0 := L 2.0,
  6335. IN1 := L 2.1,
  6336. IN2 := L 2.2,
  6337. OUT3 := M 174.0,
  6338. OUT4 := M 174.1,
  6339. OUT5 := M 174.2,
  6340. OUT6 := DB10.DBW 96,
  6341. IO7 := DB182.DBW 12);
  6342. NOP 0;
  6343. NETWORK
  6344. TITLE =
  6345. A M 21.0;
  6346. = L 2.0;
  6347. BLD 103;
  6348. AN I 9.7;
  6349. = L 2.1;
  6350. BLD 103;
  6351. A M 20.1;
  6352. = L 2.2;
  6353. BLD 103;
  6354. CALL FC 182 (
  6355. IN0 := L 2.0,
  6356. IN1 := L 2.1,
  6357. IN2 := L 2.2,
  6358. OUT3 := M 175.0,
  6359. OUT4 := M 175.1,
  6360. OUT5 := M 175.2,
  6361. OUT6 := DB10.DBW 98,
  6362. IO7 := DB182.DBW 14);
  6363. NOP 0;
  6364. NETWORK
  6365. TITLE =
  6366. A M 21.0;
  6367. = L 2.0;
  6368. BLD 103;
  6369. AN I 8.4;
  6370. = L 2.1;
  6371. BLD 103;
  6372. A M 20.1;
  6373. = L 2.2;
  6374. BLD 103;
  6375. CALL FC 182 (
  6376. IN0 := L 2.0,
  6377. IN1 := L 2.1,
  6378. IN2 := L 2.2,
  6379. OUT3 := M 179.0,
  6380. OUT4 := M 179.1,
  6381. OUT5 := M 179.2,
  6382. OUT6 := DB10.DBW 110,
  6383. IO7 := DB182.DBW 16);
  6384. NOP 0;
  6385. NETWORK
  6386. TITLE =
  6387. A M 21.0;
  6388. = L 2.0;
  6389. BLD 103;
  6390. AN I 8.5;
  6391. = L 2.1;
  6392. BLD 103;
  6393. A( ;
  6394. A Q 6.0;
  6395. AN I 8.5;
  6396. L DB2.DBW 66;
  6397. SD T 33;
  6398. NOP 0;
  6399. NOP 0;
  6400. NOP 0;
  6401. A T 33;
  6402. ) ;
  6403. = L 2.2;
  6404. BLD 103;
  6405. CALL FC 182 (
  6406. IN0 := L 2.0,
  6407. IN1 := L 2.1,
  6408. IN2 := L 2.2,
  6409. OUT3 := M 180.0,
  6410. OUT4 := M 180.1,
  6411. OUT5 := M 180.2,
  6412. OUT6 := DB10.DBW 112,
  6413. IO7 := DB182.DBW 18);
  6414. NOP 0;
  6415. NETWORK
  6416. TITLE =
  6417. A M 21.0;
  6418. = L 2.0;
  6419. BLD 103;
  6420. AN I 8.6;
  6421. = L 2.1;
  6422. BLD 103;
  6423. A( ;
  6424. A I 8.7;
  6425. L DB2.DBW 36;
  6426. SD T 18;
  6427. NOP 0;
  6428. NOP 0;
  6429. NOP 0;
  6430. A T 18;
  6431. ) ;
  6432. = L 2.2;
  6433. BLD 103;
  6434. CALL FC 182 (
  6435. IN0 := L 2.0,
  6436. IN1 := L 2.1,
  6437. IN2 := L 2.2,
  6438. OUT3 := M 181.0,
  6439. OUT4 := M 181.1,
  6440. OUT5 := M 181.2,
  6441. OUT6 := DB10.DBW 310,
  6442. IO7 := DB182.DBW 20);
  6443. NOP 0;
  6444. NETWORK
  6445. TITLE =
  6446. A M 21.0;
  6447. = L 2.0;
  6448. BLD 103;
  6449. A I 9.0;
  6450. = L 2.1;
  6451. BLD 103;
  6452. A M 20.1;
  6453. = L 2.2;
  6454. BLD 103;
  6455. CALL FC 182 (
  6456. IN0 := L 2.0,
  6457. IN1 := L 2.1,
  6458. IN2 := L 2.2,
  6459. OUT3 := M 182.0,
  6460. OUT4 := M 182.1,
  6461. OUT5 := M 182.2,
  6462. OUT6 := DB10.DBW 312,
  6463. IO7 := DB182.DBW 22);
  6464. NOP 0;
  6465. NETWORK
  6466. TITLE =
  6467. A M 21.0;
  6468. = L 2.0;
  6469. BLD 103;
  6470. AN I 9.1;
  6471. A Q 6.3;
  6472. = L 2.1;
  6473. BLD 103;
  6474. A M 20.1;
  6475. = L 2.2;
  6476. BLD 103;
  6477. CALL FC 182 (
  6478. IN0 := L 2.0,
  6479. IN1 := L 2.1,
  6480. IN2 := L 2.2,
  6481. OUT3 := M 183.0,
  6482. OUT4 := M 183.1,
  6483. OUT5 := M 183.2,
  6484. OUT6 := DB10.DBW 314,
  6485. IO7 := DB182.DBW 24);
  6486. NOP 0;
  6487. NETWORK
  6488. TITLE =
  6489. A M 21.0;
  6490. = L 2.0;
  6491. BLD 103;
  6492. A I 9.2;
  6493. = L 2.1;
  6494. BLD 103;
  6495. A M 20.1;
  6496. = L 2.2;
  6497. BLD 103;
  6498. CALL FC 182 (
  6499. IN0 := L 2.0,
  6500. IN1 := L 2.1,
  6501. IN2 := L 2.2,
  6502. OUT3 := M 208.0,
  6503. OUT4 := M 208.1,
  6504. OUT5 := M 208.2,
  6505. OUT6 := DB10.DBW 354,
  6506. IO7 := DB182.DBW 70);
  6507. NOP 0;
  6508. NETWORK
  6509. TITLE =
  6510. A M 21.0;
  6511. = L 2.0;
  6512. BLD 103;
  6513. AN I 9.3;
  6514. = L 2.1;
  6515. BLD 103;
  6516. AN I 3.4;
  6517. = L 2.2;
  6518. BLD 103;
  6519. CALL FC 182 (
  6520. IN0 := L 2.0,
  6521. IN1 := L 2.1,
  6522. IN2 := L 2.2,
  6523. OUT3 := M 212.0,
  6524. OUT4 := M 212.1,
  6525. OUT5 := M 212.2,
  6526. OUT6 := DB10.DBW 356,
  6527. IO7 := DB182.DBW 72);
  6528. NOP 0;
  6529. NETWORK
  6530. TITLE =
  6531. A M 21.0;
  6532. = L 2.0;
  6533. BLD 103;
  6534. AN I 9.4;
  6535. = L 2.1;
  6536. BLD 103;
  6537. A M 20.1;
  6538. = L 2.2;
  6539. BLD 103;
  6540. CALL FC 182 (
  6541. IN0 := L 2.0,
  6542. IN1 := L 2.1,
  6543. IN2 := L 2.2,
  6544. OUT3 := M 209.0,
  6545. OUT4 := M 209.1,
  6546. OUT5 := M 209.2,
  6547. OUT6 := DB10.DBW 358,
  6548. IO7 := DB182.DBW 74);
  6549. NOP 0;
  6550. NETWORK
  6551. TITLE =
  6552. A M 21.0;
  6553. = L 2.0;
  6554. BLD 103;
  6555. AN I 9.5;
  6556. = L 2.1;
  6557. BLD 103;
  6558. A M 20.1;
  6559. = L 2.2;
  6560. BLD 103;
  6561. CALL FC 182 (
  6562. IN0 := L 2.0,
  6563. IN1 := L 2.1,
  6564. IN2 := L 2.2,
  6565. OUT3 := M 210.0,
  6566. OUT4 := M 210.1,
  6567. OUT5 := M 210.2,
  6568. OUT6 := DB10.DBW 360,
  6569. IO7 := DB182.DBW 76);
  6570. NOP 0;
  6571. NETWORK
  6572. TITLE =
  6573. A M 21.0;
  6574. = L 2.0;
  6575. BLD 103;
  6576. A( ;
  6577. AN I 9.6;
  6578. A I 8.7;
  6579. L DB2.DBW 84;
  6580. SD T 42;
  6581. NOP 0;
  6582. NOP 0;
  6583. NOP 0;
  6584. A T 42;
  6585. ) ;
  6586. = L 2.1;
  6587. BLD 103;
  6588. A M 20.1;
  6589. = L 2.2;
  6590. BLD 103;
  6591. CALL FC 182 (
  6592. IN0 := L 2.0,
  6593. IN1 := L 2.1,
  6594. IN2 := L 2.2,
  6595. OUT3 := M 211.0,
  6596. OUT4 := M 211.1,
  6597. OUT5 := M 211.2,
  6598. OUT6 := DB10.DBW 362,
  6599. IO7 := DB182.DBW 78);
  6600. NOP 0;
  6601. NETWORK
  6602. TITLE =
  6603. A M 21.0;
  6604. = L 2.0;
  6605. BLD 103;
  6606. AN I 11.2;
  6607. = L 2.1;
  6608. BLD 103;
  6609. A M 20.1;
  6610. = L 2.2;
  6611. BLD 103;
  6612. CALL FC 182 (
  6613. IN0 := L 2.0,
  6614. IN1 := L 2.1,
  6615. IN2 := L 2.2,
  6616. OUT3 := M 222.0,
  6617. OUT4 := M 222.1,
  6618. OUT5 := M 222.2,
  6619. OUT6 := DB10.DBW 376,
  6620. IO7 := DB182.DBW 84);
  6621. NOP 0;
  6622. NETWORK
  6623. TITLE =
  6624. A M 21.0;
  6625. = L 2.0;
  6626. BLD 103;
  6627. AN I 11.3;
  6628. = L 2.1;
  6629. BLD 103;
  6630. A M 20.1;
  6631. = L 2.2;
  6632. BLD 103;
  6633. CALL FC 182 (
  6634. IN0 := L 2.0,
  6635. IN1 := L 2.1,
  6636. IN2 := L 2.2,
  6637. OUT3 := M 185.0,
  6638. OUT4 := M 185.1,
  6639. OUT5 := M 185.2,
  6640. OUT6 := DB10.DBW 316,
  6641. IO7 := DB182.DBW 26);
  6642. NOP 0;
  6643. NETWORK
  6644. TITLE =
  6645. A M 21.0;
  6646. = L 2.0;
  6647. BLD 103;
  6648. AN I 12.4;
  6649. = L 2.1;
  6650. BLD 103;
  6651. A M 20.1;
  6652. = L 2.2;
  6653. BLD 103;
  6654. CALL FC 182 (
  6655. IN0 := L 2.0,
  6656. IN1 := L 2.1,
  6657. IN2 := L 2.2,
  6658. OUT3 := M 186.0,
  6659. OUT4 := M 186.1,
  6660. OUT5 := M 186.2,
  6661. OUT6 := DB10.DBW 318,
  6662. IO7 := DB182.DBW 28);
  6663. NOP 0;
  6664. NETWORK
  6665. TITLE =
  6666. A M 21.0;
  6667. = L 2.0;
  6668. BLD 103;
  6669. A I 11.5;
  6670. = L 2.1;
  6671. BLD 103;
  6672. A M 20.1;
  6673. = L 2.2;
  6674. BLD 103;
  6675. CALL FC 182 (
  6676. IN0 := L 2.0,
  6677. IN1 := L 2.1,
  6678. IN2 := L 2.2,
  6679. OUT3 := M 187.0,
  6680. OUT4 := M 187.1,
  6681. OUT5 := M 187.2,
  6682. OUT6 := DB10.DBW 320,
  6683. IO7 := DB182.DBW 30);
  6684. NOP 0;
  6685. NETWORK
  6686. TITLE =
  6687. A M 21.0;
  6688. = L 2.0;
  6689. BLD 103;
  6690. AN I 12.0;
  6691. = L 2.1;
  6692. BLD 103;
  6693. A M 20.1;
  6694. = L 2.2;
  6695. BLD 103;
  6696. CALL FC 182 (
  6697. IN0 := L 2.0,
  6698. IN1 := L 2.1,
  6699. IN2 := L 2.2,
  6700. OUT3 := M 188.0,
  6701. OUT4 := M 188.1,
  6702. OUT5 := M 188.2,
  6703. OUT6 := DB10.DBW 322,
  6704. IO7 := DB182.DBW 32);
  6705. NOP 0;
  6706. NETWORK
  6707. TITLE =
  6708. A M 21.0;
  6709. = L 2.0;
  6710. BLD 103;
  6711. AN I 12.1;
  6712. = L 2.1;
  6713. BLD 103;
  6714. A M 20.1;
  6715. = L 2.2;
  6716. BLD 103;
  6717. CALL FC 182 (
  6718. IN0 := L 2.0,
  6719. IN1 := L 2.1,
  6720. IN2 := L 2.2,
  6721. OUT3 := M 189.0,
  6722. OUT4 := M 189.1,
  6723. OUT5 := M 189.2,
  6724. OUT6 := DB10.DBW 324,
  6725. IO7 := DB182.DBW 34);
  6726. NOP 0;
  6727. NETWORK
  6728. TITLE =
  6729. A M 21.0;
  6730. = L 2.0;
  6731. BLD 103;
  6732. AN I 12.2;
  6733. = L 2.1;
  6734. BLD 103;
  6735. A M 20.1;
  6736. = L 2.2;
  6737. BLD 103;
  6738. CALL FC 182 (
  6739. IN0 := L 2.0,
  6740. IN1 := L 2.1,
  6741. IN2 := L 2.2,
  6742. OUT3 := M 190.0,
  6743. OUT4 := M 190.1,
  6744. OUT5 := M 190.2,
  6745. OUT6 := DB10.DBW 326,
  6746. IO7 := DB182.DBW 36);
  6747. NOP 0;
  6748. NETWORK
  6749. TITLE =
  6750. A M 21.0;
  6751. = L 2.0;
  6752. BLD 103;
  6753. A I 12.6;
  6754. = L 2.1;
  6755. BLD 103;
  6756. A M 20.1;
  6757. = L 2.2;
  6758. BLD 103;
  6759. CALL FC 182 (
  6760. IN0 := L 2.0,
  6761. IN1 := L 2.1,
  6762. IN2 := L 2.2,
  6763. OUT3 := M 191.0,
  6764. OUT4 := M 191.1,
  6765. OUT5 := M 191.2,
  6766. OUT6 := DB10.DBW 328,
  6767. IO7 := DB182.DBW 38);
  6768. NOP 0;
  6769. NETWORK
  6770. TITLE =
  6771. A M 21.0;
  6772. = L 2.0;
  6773. BLD 103;
  6774. AN I 13.0;
  6775. = L 2.1;
  6776. BLD 103;
  6777. A M 20.1;
  6778. = L 2.2;
  6779. BLD 103;
  6780. CALL FC 182 (
  6781. IN0 := L 2.0,
  6782. IN1 := L 2.1,
  6783. IN2 := L 2.2,
  6784. OUT3 := M 192.0,
  6785. OUT4 := M 192.1,
  6786. OUT5 := M 192.2,
  6787. OUT6 := DB10.DBW 330,
  6788. IO7 := DB182.DBW 40);
  6789. NOP 0;
  6790. NETWORK
  6791. TITLE =
  6792. A M 21.0;
  6793. = L 2.0;
  6794. BLD 103;
  6795. AN I 13.1;
  6796. = L 2.1;
  6797. BLD 103;
  6798. A M 20.1;
  6799. = L 2.2;
  6800. BLD 103;
  6801. CALL FC 182 (
  6802. IN0 := L 2.0,
  6803. IN1 := L 2.1,
  6804. IN2 := L 2.2,
  6805. OUT3 := M 193.0,
  6806. OUT4 := M 193.1,
  6807. OUT5 := M 193.2,
  6808. OUT6 := DB10.DBW 332,
  6809. IO7 := DB182.DBW 42);
  6810. NOP 0;
  6811. NETWORK
  6812. TITLE =
  6813. A M 21.0;
  6814. = L 2.0;
  6815. BLD 103;
  6816. AN I 13.2;
  6817. = L 2.1;
  6818. BLD 103;
  6819. A M 20.1;
  6820. = L 2.2;
  6821. BLD 103;
  6822. CALL FC 182 (
  6823. IN0 := L 2.0,
  6824. IN1 := L 2.1,
  6825. IN2 := L 2.2,
  6826. OUT3 := M 194.0,
  6827. OUT4 := M 194.1,
  6828. OUT5 := M 194.2,
  6829. OUT6 := DB10.DBW 334,
  6830. IO7 := DB182.DBW 44);
  6831. NOP 0;
  6832. NETWORK
  6833. TITLE =
  6834. A M 21.0;
  6835. = L 2.0;
  6836. BLD 103;
  6837. A I 5.6;
  6838. = L 2.1;
  6839. BLD 103;
  6840. A M 20.1;
  6841. = L 2.2;
  6842. BLD 103;
  6843. CALL FC 182 (
  6844. IN0 := L 2.0,
  6845. IN1 := L 2.1,
  6846. IN2 := L 2.2,
  6847. OUT3 := M 195.0,
  6848. OUT4 := M 195.1,
  6849. OUT5 := M 195.2,
  6850. OUT6 := DB10.DBW 336,
  6851. IO7 := DB182.DBW 46);
  6852. NOP 0;
  6853. NETWORK
  6854. TITLE =
  6855. A M 21.0;
  6856. = L 2.0;
  6857. BLD 103;
  6858. A I 5.7;
  6859. = L 2.1;
  6860. BLD 103;
  6861. A M 20.1;
  6862. = L 2.2;
  6863. BLD 103;
  6864. CALL FC 182 (
  6865. IN0 := L 2.0,
  6866. IN1 := L 2.1,
  6867. IN2 := L 2.2,
  6868. OUT3 := M 196.0,
  6869. OUT4 := M 196.1,
  6870. OUT5 := M 196.2,
  6871. OUT6 := DB10.DBW 338,
  6872. IO7 := DB182.DBW 48);
  6873. NOP 0;
  6874. NETWORK
  6875. TITLE =
  6876. A M 21.0;
  6877. = L 2.0;
  6878. BLD 103;
  6879. A I 7.2;
  6880. = L 2.1;
  6881. BLD 103;
  6882. AN I 3.3;
  6883. = L 2.2;
  6884. BLD 103;
  6885. CALL FC 182 (
  6886. IN0 := L 2.0,
  6887. IN1 := L 2.1,
  6888. IN2 := L 2.2,
  6889. OUT3 := M 198.0,
  6890. OUT4 := M 198.1,
  6891. OUT5 := M 198.2,
  6892. OUT6 := DB10.DBW 340,
  6893. IO7 := DB182.DBW 50);
  6894. NOP 0;
  6895. NETWORK
  6896. TITLE =
  6897. A M 21.0;
  6898. = L 2.0;
  6899. BLD 103;
  6900. A I 7.1;
  6901. = L 2.1;
  6902. BLD 103;
  6903. AN I 3.3;
  6904. = L 2.2;
  6905. BLD 103;
  6906. CALL FC 182 (
  6907. IN0 := L 2.0,
  6908. IN1 := L 2.1,
  6909. IN2 := L 2.2,
  6910. OUT3 := M 197.0,
  6911. OUT4 := M 197.1,
  6912. OUT5 := M 197.2,
  6913. OUT6 := DB10.DBW 342,
  6914. IO7 := DB182.DBW 52);
  6915. NOP 0;
  6916. NETWORK
  6917. TITLE =
  6918. A M 21.0;
  6919. = L 2.0;
  6920. BLD 103;
  6921. AN I 5.3;
  6922. = L 2.1;
  6923. BLD 103;
  6924. A M 20.1;
  6925. = L 2.2;
  6926. BLD 103;
  6927. CALL FC 182 (
  6928. IN0 := L 2.0,
  6929. IN1 := L 2.1,
  6930. IN2 := L 2.2,
  6931. OUT3 := M 204.0,
  6932. OUT4 := M 204.1,
  6933. OUT5 := M 204.2,
  6934. OUT6 := DB10.DBW 346,
  6935. IO7 := DB182.DBW 62);
  6936. NOP 0;
  6937. NETWORK
  6938. TITLE =
  6939. A M 21.0;
  6940. = L 2.0;
  6941. BLD 103;
  6942. A( ;
  6943. A( ;
  6944. O Q 6.0;
  6945. O Q 6.1;
  6946. ) ;
  6947. L DB2.DBW 50;
  6948. SD T 25;
  6949. NOP 0;
  6950. NOP 0;
  6951. NOP 0;
  6952. A T 25;
  6953. ) ;
  6954. A( ;
  6955. ON I 6.0;
  6956. ON I 6.1;
  6957. ) ;
  6958. = M 216.0;
  6959. A M 216.0;
  6960. = L 2.1;
  6961. BLD 103;
  6962. A M 20.1;
  6963. = L 2.2;
  6964. BLD 103;
  6965. CALL FC 182 (
  6966. IN0 := L 2.0,
  6967. IN1 := L 2.1,
  6968. IN2 := L 2.2,
  6969. OUT3 := M 217.0,
  6970. OUT4 := M 217.1,
  6971. OUT5 := M 217.2,
  6972. OUT6 := DB10.DBW 348,
  6973. IO7 := DB182.DBW 82);
  6974. NOP 0;
  6975. END_FUNCTION
  6976. FUNCTION FC 3 : VOID
  6977. AUTHOR :
  6978. FAMILY : Alarm
  6979. NAME : Alarm
  6980. VERSION : 0.1
  6981. BEGIN
  6982. NETWORK
  6983. TITLE =
  6984. A M 206.0;
  6985. = DB3.DBX 1.0;
  6986. NETWORK
  6987. TITLE =
  6988. A M 115.0;
  6989. = DB3.DBX 1.1;
  6990. NETWORK
  6991. TITLE =
  6992. A M 101.0;
  6993. = DB3.DBX 1.2;
  6994. NETWORK
  6995. TITLE =
  6996. A M 114.0;
  6997. = DB3.DBX 1.3;
  6998. NETWORK
  6999. TITLE =
  7000. A DB10.DBX 45.2;
  7001. = DB3.DBX 1.4;
  7002. NETWORK
  7003. TITLE =
  7004. A M 195.0;
  7005. = DB3.DBX 1.5;
  7006. NETWORK
  7007. TITLE =
  7008. A M 196.0;
  7009. = DB3.DBX 1.6;
  7010. NETWORK
  7011. TITLE =
  7012. A M 198.0;
  7013. = DB3.DBX 1.7;
  7014. NETWORK
  7015. TITLE =
  7016. A M 197.0;
  7017. = DB3.DBX 0.0;
  7018. NETWORK
  7019. TITLE =
  7020. A M 20.0;
  7021. = DB3.DBX 0.1;
  7022. NETWORK
  7023. TITLE =
  7024. A M 155.0;
  7025. = DB3.DBX 0.2;
  7026. NETWORK
  7027. TITLE =
  7028. A M 158.0;
  7029. = DB3.DBX 0.3;
  7030. NETWORK
  7031. TITLE =
  7032. A M 166.0;
  7033. = DB3.DBX 0.4;
  7034. NETWORK
  7035. TITLE =
  7036. A DB10.DBX 53.2;
  7037. = DB3.DBX 0.5;
  7038. NETWORK
  7039. TITLE =
  7040. A M 20.0;
  7041. = DB3.DBX 0.6;
  7042. NETWORK
  7043. TITLE =
  7044. A M 20.0;
  7045. = DB3.DBX 0.7;
  7046. NETWORK
  7047. TITLE =
  7048. A M 170.0;
  7049. = DB3.DBX 3.0;
  7050. NETWORK
  7051. TITLE =
  7052. A M 174.0;
  7053. = DB3.DBX 3.1;
  7054. NETWORK
  7055. TITLE =
  7056. A M 167.0;
  7057. = DB3.DBX 3.2;
  7058. NETWORK
  7059. TITLE =
  7060. A M 175.0;
  7061. = DB3.DBX 3.3;
  7062. NETWORK
  7063. TITLE =
  7064. A M 179.0;
  7065. = DB3.DBX 3.4;
  7066. NETWORK
  7067. TITLE =
  7068. A M 180.0;
  7069. = DB3.DBX 3.5;
  7070. NETWORK
  7071. TITLE =
  7072. A M 181.0;
  7073. = DB3.DBX 3.6;
  7074. NETWORK
  7075. TITLE =
  7076. A DB10.DBX 61.2;
  7077. = DB3.DBX 3.7;
  7078. NETWORK
  7079. TITLE =
  7080. A M 182.0;
  7081. = DB3.DBX 2.0;
  7082. NETWORK
  7083. TITLE =
  7084. A M 183.0;
  7085. = DB3.DBX 2.1;
  7086. NETWORK
  7087. TITLE =
  7088. A M 208.0;
  7089. = DB3.DBX 2.2;
  7090. NETWORK
  7091. TITLE =
  7092. A M 212.0;
  7093. = DB3.DBX 2.3;
  7094. NETWORK
  7095. TITLE =
  7096. A M 209.0;
  7097. = DB3.DBX 2.4;
  7098. NETWORK
  7099. TITLE =
  7100. A M 210.0;
  7101. = DB3.DBX 2.5;
  7102. NETWORK
  7103. TITLE =
  7104. A M 211.0;
  7105. = DB3.DBX 2.6;
  7106. NETWORK
  7107. TITLE =
  7108. A M 20.0;
  7109. = DB3.DBX 2.7;
  7110. NETWORK
  7111. TITLE =
  7112. A M 123.0;
  7113. = DB3.DBX 5.0;
  7114. NETWORK
  7115. TITLE =
  7116. A M 20.0;
  7117. = DB3.DBX 5.1;
  7118. NETWORK
  7119. TITLE =
  7120. A M 20.0;
  7121. = DB3.DBX 5.2;
  7122. NETWORK
  7123. TITLE =
  7124. A M 20.0;
  7125. = DB3.DBX 5.3;
  7126. NETWORK
  7127. TITLE =
  7128. A M 20.0;
  7129. = DB3.DBX 5.4;
  7130. NETWORK
  7131. TITLE =
  7132. A DB10.DBX 63.2;
  7133. = DB3.DBX 5.5;
  7134. NETWORK
  7135. TITLE =
  7136. A M 185.0;
  7137. = DB3.DBX 5.6;
  7138. NETWORK
  7139. TITLE =
  7140. A M 187.0;
  7141. = DB3.DBX 5.7;
  7142. NETWORK
  7143. TITLE =
  7144. A M 188.0;
  7145. = DB3.DBX 4.0;
  7146. NETWORK
  7147. TITLE =
  7148. A M 189.0;
  7149. = DB3.DBX 4.1;
  7150. NETWORK
  7151. TITLE =
  7152. A M 190.0;
  7153. = DB3.DBX 4.2;
  7154. NETWORK
  7155. TITLE =
  7156. A DB10.DBX 65.2;
  7157. = DB3.DBX 4.3;
  7158. NETWORK
  7159. TITLE =
  7160. A M 186.0;
  7161. = DB3.DBX 4.4;
  7162. NETWORK
  7163. TITLE =
  7164. A M 191.0;
  7165. = DB3.DBX 4.5;
  7166. NETWORK
  7167. TITLE =
  7168. A M 192.0;
  7169. = DB3.DBX 4.6;
  7170. NETWORK
  7171. TITLE =
  7172. A M 193.0;
  7173. = DB3.DBX 4.7;
  7174. NETWORK
  7175. TITLE =
  7176. A M 194.0;
  7177. = DB3.DBX 7.0;
  7178. NETWORK
  7179. TITLE =
  7180. A M 204.0;
  7181. = DB3.DBX 7.1;
  7182. NETWORK
  7183. TITLE =
  7184. A DB10.DBX 57.2;
  7185. = DB3.DBX 7.2;
  7186. NETWORK
  7187. TITLE =
  7188. A M 207.0;
  7189. = DB3.DBX 7.3;
  7190. NETWORK
  7191. TITLE =
  7192. A M 217.0;
  7193. = DB3.DBX 7.4;
  7194. NETWORK
  7195. TITLE =
  7196. A M 222.0;
  7197. = DB3.DBX 7.5;
  7198. END_FUNCTION
  7199. FUNCTION FC 10 : VOID
  7200. AUTHOR :
  7201. FAMILY : GENERAL
  7202. NAME : GENERAL
  7203. VERSION : 0.0
  7204. VAR_TEMP
  7205. TEMP0 : BOOL ;
  7206. TEMP1 : BOOL ;
  7207. TEMP2 : BOOL ;
  7208. TEMP3 : BOOL ;
  7209. END_VAR
  7210. BEGIN
  7211. NETWORK
  7212. TITLE =
  7213. A I 1.0;
  7214. A I 1.1;
  7215. A M 29.1;
  7216. A M 35.0;
  7217. O ;
  7218. A I 4.1;
  7219. A M 29.2;
  7220. A M 35.0;
  7221. = #TEMP0;
  7222. NETWORK
  7223. TITLE =
  7224. AN I 1.1;
  7225. A M 29.1;
  7226. O ;
  7227. AN I 4.1;
  7228. A M 29.2;
  7229. = #TEMP1;
  7230. NETWORK
  7231. TITLE =
  7232. A M 44.1;
  7233. A M 29.1;
  7234. O I 1.3;
  7235. = Q 0.7;
  7236. NETWORK
  7237. TITLE =
  7238. A( ;
  7239. O M 29.1;
  7240. O M 29.0;
  7241. O ;
  7242. A( ;
  7243. A I 4.6;
  7244. L S5T#2M;
  7245. SF T 46;
  7246. NOP 0;
  7247. NOP 0;
  7248. NOP 0;
  7249. A T 46;
  7250. ) ;
  7251. A M 29.2;
  7252. O I 4.2;
  7253. ) ;
  7254. AN M 114.0;
  7255. AN M 207.0;
  7256. AN M 206.0;
  7257. AN M 167.0;
  7258. AN M 206.0;
  7259. AN M 207.0;
  7260. A I 10.3;
  7261. AN M 209.0;
  7262. AN M 210.0;
  7263. AN M 211.0;
  7264. A M 121.7;
  7265. AN M 122.1;
  7266. AN M 123.0;
  7267. AN M 155.0;
  7268. AN M 158.0;
  7269. AN M 166.0;
  7270. AN M 175.0;
  7271. AN M 179.0;
  7272. AN M 208.0;
  7273. AN M 163.4;
  7274. AN M 212.0;
  7275. A( ;
  7276. A M 0.1;
  7277. AN I 4.3;
  7278. O ;
  7279. A M 0.2;
  7280. AN I 4.4;
  7281. ) ;
  7282. A M 150.5;
  7283. A M 150.6;
  7284. AN M 151.0;
  7285. AN M 180.0;
  7286. A( ;
  7287. A Q 6.0;
  7288. AN I 8.3;
  7289. NOT ;
  7290. ) ;
  7291. = M 35.1;
  7292. NETWORK
  7293. TITLE =
  7294. A M 35.1;
  7295. AN M 174.0;
  7296. = M 35.0;
  7297. NETWORK
  7298. TITLE =
  7299. A M 29.2;
  7300. A M 35.0;
  7301. = Q 3.3;
  7302. NETWORK
  7303. TITLE =
  7304. O M 29.2;
  7305. O M 29.1;
  7306. = Q 7.0;
  7307. NETWORK
  7308. TITLE =
  7309. AN I 8.7;
  7310. AN I 5.5;
  7311. AN I 8.3;
  7312. = M 38.0;
  7313. NETWORK
  7314. TITLE =
  7315. A M 38.0;
  7316. FP M 38.1;
  7317. = M 38.2;
  7318. NETWORK
  7319. TITLE =
  7320. A I 8.7;
  7321. A( ;
  7322. A I 5.5;
  7323. L DB2.DBW 46;
  7324. SF T 23;
  7325. NOP 0;
  7326. NOP 0;
  7327. NOP 0;
  7328. A T 23;
  7329. ) ;
  7330. A I 8.3;
  7331. A I 11.4;
  7332. A I 12.5;
  7333. = L 1.0;
  7334. A L 1.0;
  7335. BLD 102;
  7336. = M 38.3;
  7337. A L 1.0;
  7338. A M 44.1;
  7339. S Q 3.5;
  7340. A( ;
  7341. ON M 44.1;
  7342. O ;
  7343. A I 0.6;
  7344. AN I 1.1;
  7345. O ;
  7346. A I 0.7;
  7347. AN I 4.1;
  7348. ) ;
  7349. R Q 3.5;
  7350. NOP 0;
  7351. NETWORK
  7352. TITLE =
  7353. A( ;
  7354. A M 35.0;
  7355. A #TEMP0;
  7356. AN #TEMP1;
  7357. AN M 38.3;
  7358. FP M 29.5;
  7359. = M 44.0;
  7360. A M 44.0;
  7361. S M 44.1;
  7362. A( ;
  7363. O M 20.7;
  7364. ON M 35.1;
  7365. O M 11.1;
  7366. O M 38.2;
  7367. O #TEMP1;
  7368. O M 114.0;
  7369. ) ;
  7370. R M 44.1;
  7371. A M 44.1;
  7372. ) ;
  7373. A M 38.3;
  7374. O ;
  7375. AN M 38.3;
  7376. A M 44.1;
  7377. A M 10.6;
  7378. O I 1.3;
  7379. = Q 3.1;
  7380. NETWORK
  7381. TITLE =
  7382. A( ;
  7383. O M 29.0;
  7384. O M 29.1;
  7385. ) ;
  7386. FP M 11.2;
  7387. O M 114.0;
  7388. = M 11.1;
  7389. NETWORK
  7390. TITLE =
  7391. O M 155.0;
  7392. O M 158.0;
  7393. O M 166.0;
  7394. O M 170.0;
  7395. O M 167.0;
  7396. O M 174.0;
  7397. O M 175.0;
  7398. O M 179.0;
  7399. O M 180.0;
  7400. O M 181.0;
  7401. O M 182.0;
  7402. O M 183.0;
  7403. O M 208.0;
  7404. O M 212.0;
  7405. O M 209.0;
  7406. O M 210.0;
  7407. O M 211.0;
  7408. O M 185.0;
  7409. O M 186.0;
  7410. O M 187.0;
  7411. O M 188.0;
  7412. O M 189.0;
  7413. O M 190.0;
  7414. O M 191.0;
  7415. O M 192.0;
  7416. O M 193.0;
  7417. O M 194.0;
  7418. O M 195.0;
  7419. O M 196.0;
  7420. O M 198.0;
  7421. O M 197.0;
  7422. O M 204.0;
  7423. O M 151.0;
  7424. O M 157.4;
  7425. O M 161.4;
  7426. O M 160.0;
  7427. O M 163.4;
  7428. O M 164.4;
  7429. O M 165.4;
  7430. O M 123.0;
  7431. O M 217.0;
  7432. O M 222.0;
  7433. = M 24.0;
  7434. NETWORK
  7435. TITLE =
  7436. O M 155.2;
  7437. O M 158.2;
  7438. O M 166.2;
  7439. O M 170.2;
  7440. O M 167.2;
  7441. O M 174.2;
  7442. O M 175.2;
  7443. O M 179.2;
  7444. O M 180.2;
  7445. O M 181.2;
  7446. O M 182.2;
  7447. O M 183.2;
  7448. O M 208.2;
  7449. O M 212.2;
  7450. O M 209.2;
  7451. O M 210.2;
  7452. O M 211.2;
  7453. O M 185.2;
  7454. O M 186.2;
  7455. O M 187.2;
  7456. O M 188.2;
  7457. O M 189.2;
  7458. O M 190.2;
  7459. O M 191.2;
  7460. O M 192.2;
  7461. O M 193.2;
  7462. O M 194.2;
  7463. O M 195.2;
  7464. O M 196.2;
  7465. O M 198.2;
  7466. O M 197.2;
  7467. O M 204.2;
  7468. O M 151.1;
  7469. O M 157.5;
  7470. O M 161.5;
  7471. O M 160.1;
  7472. O M 163.5;
  7473. O M 164.5;
  7474. O M 165.5;
  7475. O M 20.0;
  7476. O M 123.2;
  7477. O M 217.2;
  7478. O M 222.2;
  7479. = M 22.0;
  7480. NETWORK
  7481. TITLE =
  7482. CALL FC 11 ;
  7483. NOP 0;
  7484. NETWORK
  7485. TITLE =
  7486. CALL FC 13 ;
  7487. NOP 0;
  7488. NETWORK
  7489. TITLE =
  7490. CALL FC 14 ;
  7491. NOP 0;
  7492. NETWORK
  7493. TITLE =
  7494. CALL FC 15 ;
  7495. NOP 0;
  7496. NETWORK
  7497. TITLE =
  7498. CALL FC 20 ;
  7499. NOP 0;
  7500. NETWORK
  7501. TITLE =
  7502. CALL FC 21 ;
  7503. NOP 0;
  7504. END_FUNCTION
  7505. FUNCTION FC 191 : VOID
  7506. AUTHOR :
  7507. FAMILY : ZEITEN
  7508. NAME : S_EVERZ
  7509. VERSION : 0.0
  7510. VAR_INPUT
  7511. IN0 : BOOL ;
  7512. IN1 : BOOL ;
  7513. END_VAR
  7514. VAR_IN_OUT
  7515. IO2 : INT ;
  7516. IO3 : INT ;
  7517. IO4 : INT ;
  7518. IO5 : INT ;
  7519. IO6 : INT ;
  7520. IO7 : WORD ;
  7521. END_VAR
  7522. VAR_TEMP
  7523. TEMP8 : BOOL ;
  7524. TEMP9 : BOOL ;
  7525. TEMP10 : BOOL ;
  7526. TEMP11 : BOOL ;
  7527. TEMP12 : BOOL ;
  7528. END_VAR
  7529. BEGIN
  7530. NETWORK
  7531. TITLE =
  7532. L #IO7;
  7533. T LW 0;
  7534. NOP 0;
  7535. NETWORK
  7536. TITLE =
  7537. A #IN0;
  7538. A M 10.5;
  7539. FP #TEMP8;
  7540. JNB M001;
  7541. L #IO6;
  7542. L 1;
  7543. +I ;
  7544. T #IO6;
  7545. M001: NOP 0;
  7546. NETWORK
  7547. TITLE =
  7548. A #IN0;
  7549. A( ;
  7550. L #IO6;
  7551. L 60;
  7552. >=I ;
  7553. ) ;
  7554. FP #TEMP9;
  7555. JNB M002;
  7556. L #IO5;
  7557. L 1;
  7558. +I ;
  7559. T #IO5;
  7560. M002: NOP 0;
  7561. NETWORK
  7562. TITLE =
  7563. A #IN0;
  7564. A( ;
  7565. L #IO5;
  7566. L 60;
  7567. >=I ;
  7568. ) ;
  7569. FP #TEMP10;
  7570. JNB M003;
  7571. L #IO4;
  7572. L 1;
  7573. +I ;
  7574. T #IO4;
  7575. M003: NOP 0;
  7576. NETWORK
  7577. TITLE =
  7578. A #IN0;
  7579. A( ;
  7580. L #IO4;
  7581. L 24;
  7582. >=I ;
  7583. ) ;
  7584. FP #TEMP11;
  7585. JNB M004;
  7586. L #IO3;
  7587. L 1;
  7588. +I ;
  7589. T #IO3;
  7590. M004: NOP 0;
  7591. NETWORK
  7592. TITLE =
  7593. A #IN0;
  7594. A( ;
  7595. L #IO3;
  7596. L 365;
  7597. >=I ;
  7598. ) ;
  7599. FP #TEMP12;
  7600. JNB M005;
  7601. L #IO2;
  7602. L 1;
  7603. +I ;
  7604. T #IO2;
  7605. M005: NOP 0;
  7606. NETWORK
  7607. TITLE =
  7608. A( ;
  7609. O( ;
  7610. L #IO6;
  7611. L 60;
  7612. >=I ;
  7613. ) ;
  7614. O #IN1;
  7615. ) ;
  7616. JNB M006;
  7617. L 0;
  7618. T #IO6;
  7619. M006: NOP 0;
  7620. NETWORK
  7621. TITLE =
  7622. A( ;
  7623. O( ;
  7624. L #IO5;
  7625. L 60;
  7626. >=I ;
  7627. ) ;
  7628. O #IN1;
  7629. ) ;
  7630. JNB M007;
  7631. L 0;
  7632. T #IO5;
  7633. M007: NOP 0;
  7634. NETWORK
  7635. TITLE =
  7636. A( ;
  7637. O( ;
  7638. L #IO4;
  7639. L 24;
  7640. >=I ;
  7641. ) ;
  7642. O #IN1;
  7643. ) ;
  7644. JNB M008;
  7645. L 0;
  7646. T #IO4;
  7647. M008: NOP 0;
  7648. NETWORK
  7649. TITLE =
  7650. A( ;
  7651. O( ;
  7652. L #IO3;
  7653. L 365;
  7654. >=I ;
  7655. ) ;
  7656. O #IN1;
  7657. ) ;
  7658. JNB M009;
  7659. L 0;
  7660. T #IO3;
  7661. M009: NOP 0;
  7662. NETWORK
  7663. TITLE =
  7664. A( ;
  7665. O( ;
  7666. L #IO2;
  7667. L 32767;
  7668. >=I ;
  7669. ) ;
  7670. O #IN1;
  7671. ) ;
  7672. JNB M00a;
  7673. L 0;
  7674. T #IO2;
  7675. M00a: NOP 0;
  7676. NETWORK
  7677. TITLE =
  7678. L LW 0;
  7679. T #IO7;
  7680. NOP 0;
  7681. END_FUNCTION
  7682. FUNCTION FC 1 : VOID
  7683. AUTHOR :
  7684. FAMILY : GENERAL
  7685. NAME : GENERAL
  7686. VERSION : 0.0
  7687. BEGIN
  7688. NETWORK
  7689. TITLE =
  7690. O M 20.1;
  7691. ON M 20.1;
  7692. = M 20.1;
  7693. NETWORK
  7694. TITLE =
  7695. A M 20.0;
  7696. AN M 20.0;
  7697. = M 20.0;
  7698. NETWORK
  7699. TITLE =
  7700. O I 5.1;
  7701. O I 1.3;
  7702. = Q 4.6;
  7703. NETWORK
  7704. TITLE =
  7705. A I 3.4;
  7706. = Q 7.1;
  7707. NETWORK
  7708. TITLE =
  7709. A I 3.3;
  7710. = Q 7.2;
  7711. NETWORK
  7712. TITLE =
  7713. A I 0.5;
  7714. AN I 0.6;
  7715. AN I 0.7;
  7716. = M 29.0;
  7717. A M 29.0;
  7718. O I 1.3;
  7719. = Q 0.4;
  7720. NETWORK
  7721. TITLE =
  7722. AN I 0.5;
  7723. A I 0.6;
  7724. AN I 0.7;
  7725. = M 29.1;
  7726. A M 29.1;
  7727. O I 1.3;
  7728. = Q 0.5;
  7729. NETWORK
  7730. TITLE =
  7731. AN I 0.5;
  7732. AN I 0.6;
  7733. A I 0.7;
  7734. = M 29.2;
  7735. A M 29.2;
  7736. O I 1.3;
  7737. = Q 0.6;
  7738. NETWORK
  7739. TITLE =
  7740. O I 4.2;
  7741. O I 1.3;
  7742. = Q 1.5;
  7743. NETWORK
  7744. TITLE =
  7745. O I 4.5;
  7746. O I 1.3;
  7747. = Q 2.7;
  7748. NETWORK
  7749. TITLE =
  7750. A( ;
  7751. O M 20.5;
  7752. O( ;
  7753. A M 114.0;
  7754. FP M 20.6;
  7755. ) ;
  7756. ) ;
  7757. L DB2.DBW 8;
  7758. SF T 4;
  7759. NOP 0;
  7760. NOP 0;
  7761. NOP 0;
  7762. A T 4;
  7763. = M 20.7;
  7764. NETWORK
  7765. TITLE =
  7766. A( ;
  7767. O M 20.0;
  7768. O M 20.0;
  7769. O M 20.0;
  7770. ) ;
  7771. = L 0.0;
  7772. BLD 103;
  7773. A M 20.0;
  7774. = L 0.1;
  7775. BLD 103;
  7776. CALL FC 191 (
  7777. IN0 := L 0.0,
  7778. IN1 := L 0.1,
  7779. IO2 := DB191.DBW 202,
  7780. IO3 := DB191.DBW 162,
  7781. IO4 := DB191.DBW 122,
  7782. IO5 := DB191.DBW 82,
  7783. IO6 := DB191.DBW 42,
  7784. IO7 := DB191.DBW 2);
  7785. NOP 0;
  7786. NETWORK
  7787. TITLE =
  7788. O I 0.2;
  7789. O I 1.3;
  7790. = Q 4.3;
  7791. NETWORK
  7792. TITLE =
  7793. A I 0.3;
  7794. = L 0.0;
  7795. BLD 103;
  7796. AN I 0.4;
  7797. = L 0.1;
  7798. BLD 103;
  7799. A M 20.1;
  7800. = L 0.2;
  7801. BLD 103;
  7802. CALL FC 182 (
  7803. IN0 := L 0.0,
  7804. IN1 := L 0.1,
  7805. IN2 := L 0.2,
  7806. OUT3 := M 114.0,
  7807. OUT4 := M 114.1,
  7808. OUT5 := M 114.2,
  7809. OUT6 := DB1.DBW 6,
  7810. IO7 := DB182.DBW 58);
  7811. NOP 0;
  7812. NETWORK
  7813. TITLE =
  7814. A M 21.0;
  7815. = L 0.0;
  7816. BLD 103;
  7817. AN I 5.1;
  7818. = L 0.1;
  7819. BLD 103;
  7820. A M 20.1;
  7821. = L 0.2;
  7822. BLD 103;
  7823. CALL FC 182 (
  7824. IN0 := L 0.0,
  7825. IN1 := L 0.1,
  7826. IN2 := L 0.2,
  7827. OUT3 := M 206.0,
  7828. OUT4 := M 206.1,
  7829. OUT5 := M 206.2,
  7830. OUT6 := DB10.DBW 350,
  7831. IO7 := DB182.DBW 66);
  7832. NOP 0;
  7833. NETWORK
  7834. TITLE =
  7835. A M 21.0;
  7836. = L 0.0;
  7837. BLD 103;
  7838. A I 4.0;
  7839. = L 0.1;
  7840. BLD 103;
  7841. A M 20.1;
  7842. = L 0.2;
  7843. BLD 103;
  7844. CALL FC 182 (
  7845. IN0 := L 0.0,
  7846. IN1 := L 0.1,
  7847. IN2 := L 0.2,
  7848. OUT3 := M 207.0,
  7849. OUT4 := M 207.1,
  7850. OUT5 := M 207.2,
  7851. OUT6 := DB10.DBW 352,
  7852. IO7 := DB182.DBW 68);
  7853. NOP 0;
  7854. NETWORK
  7855. TITLE =
  7856. O M 114.0;
  7857. O I 1.3;
  7858. = Q 0.2;
  7859. NETWORK
  7860. TITLE =
  7861. A I 0.3;
  7862. = Q 0.3;
  7863. NETWORK
  7864. TITLE =
  7865. A M 21.0;
  7866. = L 0.0;
  7867. BLD 103;
  7868. AN I 0.0;
  7869. = L 0.1;
  7870. BLD 103;
  7871. A M 20.1;
  7872. = L 0.2;
  7873. BLD 103;
  7874. CALL FC 182 (
  7875. IN0 := L 0.0,
  7876. IN1 := L 0.1,
  7877. IN2 := L 0.2,
  7878. OUT3 := M 115.0,
  7879. OUT4 := M 115.1,
  7880. OUT5 := M 115.2,
  7881. OUT6 := DB1.DBW 8,
  7882. IO7 := DB182.DBW 60);
  7883. NOP 0;
  7884. NETWORK
  7885. TITLE =
  7886. A M 21.0;
  7887. = L 0.0;
  7888. BLD 103;
  7889. A I 0.1;
  7890. = L 0.1;
  7891. BLD 103;
  7892. A M 20.1;
  7893. = L 0.2;
  7894. BLD 103;
  7895. CALL FC 182 (
  7896. IN0 := L 0.0,
  7897. IN1 := L 0.1,
  7898. IN2 := L 0.2,
  7899. OUT3 := M 101.0,
  7900. OUT4 := M 101.1,
  7901. OUT5 := M 101.2,
  7902. OUT6 := DB1.DBW 12,
  7903. IO7 := DB182.DBW 56);
  7904. NOP 0;
  7905. NETWORK
  7906. TITLE =
  7907. O M 114.2;
  7908. O M 115.2;
  7909. O M 101.2;
  7910. O M 22.0;
  7911. O M 206.2;
  7912. O M 207.2;
  7913. = M 23.7;
  7914. NETWORK
  7915. TITLE =
  7916. O M 114.0;
  7917. O M 115.0;
  7918. O M 101.0;
  7919. O M 24.0;
  7920. O M 206.0;
  7921. O M 207.0;
  7922. = L 0.0;
  7923. O L 0.0;
  7924. O I 1.3;
  7925. = Q 1.0;
  7926. A L 0.0;
  7927. BLD 102;
  7928. = Q 3.4;
  7929. NETWORK
  7930. TITLE =
  7931. A M 23.7;
  7932. S Q 1.1;
  7933. A( ;
  7934. O I 1.5;
  7935. O M 20.5;
  7936. ) ;
  7937. R Q 1.1;
  7938. NOP 0;
  7939. NETWORK
  7940. TITLE =
  7941. O M 20.7;
  7942. O I 1.4;
  7943. = M 21.0;
  7944. = Q 5.1;
  7945. NETWORK
  7946. TITLE =
  7947. A( ;
  7948. A M 35.1;
  7949. A M 35.0;
  7950. A M 44.0;
  7951. AN M 38.3;
  7952. FP M 29.3;
  7953. O( ;
  7954. A I 1.2;
  7955. FP M 28.0;
  7956. ) ;
  7957. ) ;
  7958. S M 27.2;
  7959. A( ;
  7960. AN M 44.1;
  7961. FP M 47.0;
  7962. O T 3;
  7963. O M 20.7;
  7964. O( ;
  7965. A M 38.3;
  7966. FP M 38.7;
  7967. ) ;
  7968. O( ;
  7969. A I 1.2;
  7970. FP M 29.4;
  7971. A Q 0.0;
  7972. ) ;
  7973. ) ;
  7974. R M 27.2;
  7975. A M 27.2;
  7976. = L 0.0;
  7977. A L 0.0;
  7978. A M 10.7;
  7979. = Q 0.0;
  7980. A L 0.0;
  7981. BLD 102;
  7982. = Q 0.1;
  7983. NETWORK
  7984. TITLE =
  7985. A M 27.2;
  7986. L DB2.DBW 4;
  7987. SD T 2;
  7988. NOP 0;
  7989. NOP 0;
  7990. NOP 0;
  7991. A T 2;
  7992. = M 27.3;
  7993. NETWORK
  7994. TITLE =
  7995. A( ;
  7996. A M 27.2;
  7997. L DB2.DBW 10;
  7998. SD T 5;
  7999. NOP 0;
  8000. NOP 0;
  8001. NOP 0;
  8002. A T 5;
  8003. ) ;
  8004. L DB2.DBW 6;
  8005. SE T 3;
  8006. NOP 0;
  8007. NOP 0;
  8008. NOP 0;
  8009. NOP 0;
  8010. NETWORK
  8011. TITLE =
  8012. CALL FC 3 ;
  8013. NOP 0;
  8014. NETWORK
  8015. TITLE =
  8016. CALL FC 10 ;
  8017. NOP 0;
  8018. END_FUNCTION
  8019. FUNCTION FC 186 : VOID
  8020. AUTHOR :
  8021. FAMILY : GENERAL
  8022. NAME : BYTECOMP
  8023. VERSION : 0.0
  8024. VAR_INPUT
  8025. IN0 : BYTE ;
  8026. IN1 : BYTE ;
  8027. END_VAR
  8028. VAR_OUTPUT
  8029. OUT2 : BOOL ;
  8030. OUT3 : BOOL ;
  8031. OUT4 : BOOL ;
  8032. OUT5 : BOOL ;
  8033. END_VAR
  8034. VAR_TEMP
  8035. TEMP6 : INT ;
  8036. TEMP7 : INT ;
  8037. END_VAR
  8038. BEGIN
  8039. NETWORK
  8040. TITLE =
  8041. L #IN0;
  8042. T #TEMP6;
  8043. NOP 0;
  8044. NETWORK
  8045. TITLE =
  8046. L #IN1;
  8047. T #TEMP7;
  8048. NOP 0;
  8049. NETWORK
  8050. TITLE =
  8051. L #TEMP6;
  8052. L #TEMP7;
  8053. ==I ;
  8054. = #OUT2;
  8055. NETWORK
  8056. TITLE =
  8057. L #TEMP6;
  8058. L #TEMP7;
  8059. <>I ;
  8060. = #OUT3;
  8061. NETWORK
  8062. TITLE =
  8063. L #TEMP6;
  8064. L #TEMP7;
  8065. >I ;
  8066. = #OUT4;
  8067. NETWORK
  8068. TITLE =
  8069. L #TEMP6;
  8070. L #TEMP7;
  8071. <I ;
  8072. = #OUT5;
  8073. END_FUNCTION
  8074. ORGANIZATION_BLOCK OB 1
  8075. VERSION : 0.1
  8076. VAR_TEMP
  8077. TEMP0 : BYTE ;
  8078. TEMP1 : BYTE ;
  8079. TEMP2 : BYTE ;
  8080. TEMP3 : BYTE ;
  8081. TEMP4 : BYTE ;
  8082. TEMP5 : BYTE ;
  8083. TEMP6 : INT ;
  8084. TEMP7 : INT ;
  8085. TEMP8 : INT ;
  8086. TEMP9 : DATE_AND_TIME ;
  8087. TEMP10 : WORD ;
  8088. END_VAR
  8089. BEGIN
  8090. NETWORK
  8091. TITLE =
  8092. CALL FC 186 (
  8093. IN0 := #TEMP1,
  8094. IN1 := B#16#1,
  8095. OUT2 := M 20.5,
  8096. OUT3 := M 20.2,
  8097. OUT4 := M 20.2,
  8098. OUT5 := M 20.2);
  8099. NOP 0;
  8100. NETWORK
  8101. TITLE =
  8102. CALL FC 1 ;
  8103. NOP 0;
  8104. END_ORGANIZATION_BLOCK
  8105. ORGANIZATION_BLOCK OB 85
  8106. VERSION : 0.0
  8107. VAR_TEMP
  8108. TEMP0 : BYTE ;
  8109. TEMP1 : BYTE ;
  8110. TEMP2 : BYTE ;
  8111. TEMP3 : BYTE ;
  8112. TEMP4 : BYTE ;
  8113. TEMP5 : BYTE ;
  8114. TEMP6 : INT ;
  8115. TEMP7 : BYTE ;
  8116. TEMP8 : BYTE ;
  8117. TEMP9 : BYTE ;
  8118. TEMP10 : BYTE ;
  8119. TEMP11 : DATE_AND_TIME ;
  8120. END_VAR
  8121. BEGIN
  8122. END_ORGANIZATION_BLOCK
  8123. ORGANIZATION_BLOCK OB 86
  8124. VERSION : 0.0
  8125. VAR_TEMP
  8126. TEMP0 : BYTE ;
  8127. TEMP1 : BYTE ;
  8128. TEMP2 : BYTE ;
  8129. TEMP3 : BYTE ;
  8130. TEMP4 : BYTE ;
  8131. TEMP5 : BYTE ;
  8132. TEMP6 : WORD ;
  8133. TEMP7 : ARRAY [0 .. 31 ] OF BOOL ;
  8134. TEMP8 : DATE_AND_TIME ;
  8135. END_VAR
  8136. BEGIN
  8137. END_ORGANIZATION_BLOCK
  8138. ORGANIZATION_BLOCK OB 122
  8139. VERSION : 0.0
  8140. VAR_TEMP
  8141. TEMP0 : BYTE ;
  8142. TEMP1 : BYTE ;
  8143. TEMP2 : BYTE ;
  8144. TEMP3 : BYTE ;
  8145. TEMP4 : BYTE ;
  8146. TEMP5 : BYTE ;
  8147. TEMP6 : WORD ;
  8148. TEMP7 : WORD ;
  8149. TEMP8 : WORD ;
  8150. TEMP9 : DATE_AND_TIME ;
  8151. END_VAR
  8152. BEGIN
  8153. END_ORGANIZATION_BLOCK