acme-006.awl 191 KB

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