ÁÚL„€œ¼|l#H‘BœB°B¼BÄBÐE=GäK,+æL„um_788p_a8.bas06/01/200714:13:15PD= ACK READ NAK READ \ \ NO Y YES S \ \##.## &###\\ EXIT NO OK RECORD RECORDS RETURN STOP U YES ZERO #% %)((-200 to 200)(0-20 chars)(4 DIGITS)(4-20 CHARS)(4-20)(CONTINUE OR RESTART) ?(DDMMYYYY)(HHMM))* TALENT WEIGHING ***INTERNAL PROBLEM**+00 44 (0) 1284 701222+00 44(0)1284701222,---------..REG01 - FOR BURSOM, 2 - FOR LEYCROFT112 DIGITS CODE14 DAYS PERIOD2:< QUIT < ABOUT < SETUP ƒÿÿÿô Dƒÿÿÿè JƒÿÿÿÜ PƒÿÿÿÐ VƒÿÿÿÄ \ƒÿÿÿ¸ bƒì mƒø zƒ „ƒ Žƒ ˜ƒ( £ƒ4 ­ƒÿÿÿô ·ƒÿÿÿè ÁƒÿÿÿÜ Ëƒÿÿÿô Õƒÿÿÿä äƒÿÿÿØ óƒÿÿÿä ƒÿÿÿð ƒÿÿÿä6ƒÿÿÿð Mƒÿÿÿ„ Wƒÿÿÿè dƒÿÿÿÜ qƒÿÿÿÐ ~ƒÿÿÿÄ ‹ƒÿÿÿ¸ ˜ƒÿÿÿ¬ ¥ƒÿÿÿ ²ƒÿÿÿ”Ãÿÿÿô Òƒÿÿÿè ߃ÿÿÿÜ ìƒÿÿÿÐ ùƒÿÿÿÄ ƒÿÿÿ¸ ƒÿÿÿ¬  ƒÿÿÿ -ƒÿÿÿô<ƒÿÿÿäMƒÿÿÿð^ƒÿÿÿØoƒÿÿÿ𠂃ÿÿÿˆ ƒÿÿÿ| ˜ƒÿÿÿh £ƒÿÿÿ\ ®ƒÿÿÿP ¹ƒÿÿÿDăÿÿÿ˜ Ôƒÿÿÿ8 ߃ÿÿÿ, êƒÿÿÿ õƒÿÿÿ ƒÿÿÿ  ƒÿÿþüƒÿÿþð&ƒÿÿÿð6ƒÿÿÿ¤Qƒÿÿÿ°lƒÿÿÿ¼ƒƒÿÿÿÈšƒÿÿÿÔ ±ƒÿÿÿໃÿÿÿô˃ÿÿÿô ݃ÿÿÿô èƒÿÿÿôòƒÿÿÿôƒÿÿÿôƒÿÿÿÜ%ƒÿÿÿè6ƒÿÿÿÜFƒÿÿÿôUƒÿÿÿô gƒÿÿÿØ sƒÿÿÿÀ }ƒÿÿÿè ˆƒÿÿÿô “ƒÿÿÿä žƒÿÿÿô ©ƒ@³ƒL »ƒXǃd σpAPPLICATION.ERRORxàTIME2SECqCHECK.DEMOCHECKREGISTRATIONCHECKWEIGHTFORMAT.OLDCHECKWEIGHTFORMATCLEAR.REPORT.FILECLOSEFILECLOSEREMOTECOMMON.KEYSCOPYRIGHTDATE2DAYSDEBUGDELAY.RESETDELAYDRAW.SCREENENTER.DEALER.DETAILSENTER.TAREFILL.TANKERFLD2VRBLFILEFMENU10FMENU11FMENU12FMENU13FMENU14FMENU15FMENU16FMENU17FMENU18FMENU19FMENU1FMENU20FMENU21FMENU22FMENU23FMENU24FMENU2FMENU3FMENU4FMENU5FMENU6FMENU7FMENU8FMENU9KILLFILEMAINSCREENMENUOPENFILEOPENREMOTEPRINT.LINEREAD.PORTREGISTRATIONSAVE.DATASETTIMEDATESETUPSHOWPERCENTSSPLASHSCREEN.OLDSPLASHSCREENTRANSFER2UPDATE.SCREENUPDATE.SCROLLVRBL2FLDFILEWRITE.PORT QØ W@0=mA—Ö R.Ï [‹? fo« qL„ zh߃pÀ ˆk%“iÙ ˜„_£gŸ ·BY Á‚9 Ì0Ø9Žß9¸æ9âí: ô:6û:`:Š :´:Þ;8$;2+;\2;†9;°@;ÚG8>M8hS8’Y8¼_8æe9k9:q9dw/( ‰ ³*v •Št Ÿ{Ž ©†w ²XÜ ¾< ÇlÖÒqê ×–)ãM" óDd ÿ‹e kO }r "2Æ .‰Ò¼ ‚h ¼ ƒ9 ¼ ' ¼ = ¼ =‚h ¼ D ¼ D‚h ¼ ‚h ¼ * ¼  ¼ ¼ ¼ Mƒ9 ¼ Gƒ9 ¼ + ¼04ƒ9ƒ:ƒ;ƒ< ¼'H4ƒ9ƒ:ƒ;ƒ<‚l‚m ¼'H3ƒ9ƒ:‚j‚k‚l‚m ¼ƒ9ƒ: ¼ , ¼ ,‚h ¼ ‚h ¼ƒ9‚i ¼ ƒ9 ¼ ‚h ¼ ‚h ¼ 5ƒ9 ¼$ƒ9‚i‚j ¼ - ¼ . ¼ .‚h ¼ / ¼ƒ9‚i ¼ 6ƒ9 ¼ F‚h ¼ ‚h ¼ ‚h ¼!‚hƒ: ¼ 0 ¼ $ ¼ % ¼ &ƒ9 ¼ 7‚h [\]&^4_B`Uac5vb‰6—c¥d³eÁ8Ôgç?õ@nCoop‡q•r¨A»sÓtæuùB Cv<wJxXykDyE‘´¤Œ·ÊŽݶõ·¹2€æ¡xÞ: €™&788 APPLICATION FOR -TAL - UREA MASTER €™BASED ON A WALKERS FOR R.CAL €™ €™ €™ €™SECTION COMMON € ™FILE WLK-STP.DAT € àƒ×ƒÖƒÕ € àƒ1‚Iƒ0 € ™FILE WLK-TARE.DAT € àƒßƒÞƒà €à‚Oƒ2‚P €™ €à$‚1‚8‚9‚:‚;‚<‚= €à)‚>‚?‚2‚3‚4‚5‚6‚7 €à‚ €à$‚‚‚‚‚‚‚ €à)‚‚ ‚‚‚‚‚‚ €™ €à3ƒáƒìƒ÷ƒƒ ƒƒƒƒƒâ €à3ƒãƒäƒåƒæƒçƒèƒéƒêƒëƒí €à3ƒîƒïƒðƒñƒòƒóƒôƒõƒöƒø €à3ƒùƒúƒûƒüƒýƒþƒÿƒƒƒ €à3ƒƒƒƒƒƒ ƒ ƒ ƒ ƒ €à‚ €™FADDED VARIABLES AFTER CODE GENERATOR ********************************* €à‚! €à ‚'ƒ €à‚R‚T‚S € à‚‚/‚ €!àƒ4 €"à ƒ/ƒÔ €#à ƒ.ƒÓ €$à ƒ(ƒÉ €%à ƒ)ƒÊ €&à ‚ ‚ €'à‚ €)à‚Y‚X‚. €*à‚W €,™ADECLARATION FOR NETWORK ***************************************** €-àƒ‚(‚* €.àƒƒËƒ* €/à ƒƒ €0™ €1àƒÌ €2à‚ €3àƒ €4à ‚V‚$ €5àƒ3 €6àƒ €7à‚Z ™ -1 0 €8à‚" €9àƒÈƒƒ €:Ÿƒ!,„@€ €;àƒ!„@€‚ €<àƒÝ‚NƒÑƒ,ƒÒƒ- €=à‚+ €A™ €BŸƒ,„@à €Cà ƒ„@à €D™ €E™PLACE1 FOR DIRECT CONNECT €F™4VARIABLES FOR TRUE SIMULATION VIA FILE TO PC SERVER; €G™777 => PC BUFFER.777; €H™ PC => 777 BUFFER.PC; €Ià ƒƒ €Jà ‚&‚% €K™*PACKET STATUS, FILE PACKET.PC, 1 CHAR: Y/N €Là ƒÐƒ+ €Mà‚0 €O™H************************************************************************ €PŸƒ ,„A €Qà ƒ „A €RŸ‚,,„A €Sà ‚,„A €TŸ‚-,„A €Uà ‚-„A €W™ SETUP FILE €Xà ‚HƒÏ €Yà ‚GƒÎ €Zà ‚JƒØ €[à ‚KƒÙ €\à ‚BƒÀ €]à ‚Aƒ¿ €^à ‚MƒÜ €_à ‚LƒÛ €`à ‚CƒÁ €aà ‚FƒÍ €b™ €cà ƒ$ƒÂ €dà ƒ'ƒÆ €eà ƒ&ƒÅ €fà ƒ%ƒÄ €gà ‚DƒÃ €hà ‚EƒÇ €j™COMMON €kàƒ" €m™ €nà‚‚#‚U‚ €oà‚ €pà‚@ €qàƒÚƒ½‚) €ràƒºƒƒ#ƒ¾‚ €sà‚Q €v“‚Q„ €w™T.SAMPLE.TIME = 1 €x“‚U„ €y“‚@„ €z“ƒ&…+ €{“ƒ%…+ €|™1=SECONDS,2=MINUTES,3=HOURS €}“‚„@@ €~™PLACE2 FOR DIRECT CONNECT €“ƒ‹*„@;; €€”Šoƒ,…Œ;;„?• “ƒ…Œ €”ƒ…Œ=•𠀂™*CLEAR FILES FROM LAST NOT FINISHED SESSION €ƒ”Šs‹8 …>;;;;„>•Ë…> €„”Šs‹8 …=;;;;„>•Ë…= €…— €†“‚„@€ €‡™?IF STILL NEEDED IN SMARTWEIGH TO HAVE DIRECT TO PORT CONNECTION €ˆ™4AND THEN DE-211 MAY BE CONNECTED TO SMARTWEIGH COM1! €‰™HARDWARE$ = "777" €Š™ €‹“‚0„¿€ €Œ“‚'„B’ €™ INIT DISPLAY €Žë„DE €“‚„@@ €™CHECK HARDWARE €‘”Ša„A;;„?€<• €’‘„,„ €“™PRINT "NO DIO CARD INSTALLED!" €”£ni…w,„BÈ,„@€,„?€,…@;,,,,, €–£\ˆ„@ ;, €—ä €˜ €™— €›”Ša„A0;;„?€<•‘ €œ‘„,„ €™PRINT "NO DAC CARD INSTALLED!" €ž£mÈ…u,„BÈ,„@€,„?€,…@;,,,,, € £[ç„@ ;, €¡™STOP €¢™END €£— €¥Þ„?€,„?€,„ €§™$READ SETUP: TARE PRESET AND PASSWORD €¨£c‡…„;, €ª™USUAL CHECK SUBS €«£.á; €¬£Hƒ; €­£5Ä…;, €¯„,„,„CŸ€,„Co €°£4; €±„,„,„CŸ€,„Co €²»„ €³ä €´ €·¤«8+;ƒFƒGƒH‚~‚|‚z‚{‚} €¸“‚Y„?€ €¹™CALL CLEAR.SELECTION() €º“ƒF… €»“ƒG… €¼“ƒH… €½“‚W„ €¿™SOME INIT FOR NETWORK VARIABLES €À“ƒ#‹5„@;; €Á“ƒ¾‹5„@@;; €Â“ƒ!„?€;…: €Ã“ƒ!„@;… €Ä“ƒ!„@@;… €Å“ƒ!„@€;… €Æ™'CHANGED TO 7 AS 14 USED BY REGISTRATION €Ç“‚(„A0 €È“ƒ#‹5„@;; €É“ƒ¾‹5„@@;; €Ê™B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! €Ë“ƒº‹5„B‚;; €Ì™B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! €Í“ƒ‹5„Ap;; €Î™NETWROK PACKET SIZE €Ï“‚*„D €Ð™OPEN NIC1 ONCE €Ñ™CALL OPENREMOTE.NET(0) €Ò“‚„@  €Ó™ DATE TIME €Ô™CALL DATE.TIME.SYNCRONIZING() €Õ“‚ „ €×›x‚~„?€œ‚¸„A ‚µ„?€ €Ø“ƒ ‚~;…( €Ù“‚,‚~;„ €Ú“‚-‚~;„ €Ûžÿÿÿ¹‚~‚¸‚µ €Ý“‚„@@ €Þì„?€ €ß“ƒ"‹';; €à™OPEN PORT FOR TEMP CTRL €á£wY„?€;, €ã¬ €ä™BIF MAINMENU <> ASC("P") AND MAINMENU <> ASC("p") THEN MAINMENU = 0 €å“‚!„ €æ™LIST €ç™KEY 2, "FMENU2", " LIST " €è™ZERO €é»„?€,…],… €ê™'KEY 5, "FMENU5", " ZERO/SEMI-AUTO TARE" €ë™PRODUCT €ì™KEY 10,"FMENU10", " PRODUCT" €í™SAVE €î™/IF SELECTION.DONE THEN KEY 9, "FMENU9"," STORE" €ï™TIME €ð™KEY 9, "FMENU9",SPACE$(15) €ñ™MENU €ò™KEY 9, "FMENU9", "MENU" €ó™ 788 AS 778 €ô”ƒ…Œ=•»„Ap,…G,… €õ”ƒ…Œ?•»„A€,…G,… €ö”‚ ~‚@~&• €÷“‚|‚J‚Q- €ø™ €ù™KEY 0 €ú €û™ €ü‘„,„ €ý’…€ €þ¬ €ÿ”‹D ‹';;,„?€;;…+=•° €­ÿÿÿÅ €™ €™KEY 0 € €™ €Ý„A ,T‚|£gN; €“‚ „¿€ €£p:; €£g+; € £n; € — € ¬ € £p; € ”‚!„?•° €­ÿÿÿÒ €™KEY 0 €£;8; €”‚ • €Ý„A ,O €“‚ „ €— €™CALL CLOSEREMOTE() €”‚!Š\…;;=‚!Š\…·;;=|•c € €»„ €ä € €™ELSEIF MAINMENU = 5 THEN €™ IF TARE = 0 THEN DOZERO €˜딂!Š\…k;;=‚!Š\…±;;=|•( €™*IF LTRIM$(RTRIM$(T.PASSWORD$)) <> "0" THEN €™2 TMPSECURE$ = INP$("PASSWORD","(4 DIGITS)","","Q") € ™= IF TMPSECURE$ = LTRIM$(RTRIM$(T.PASSWORD$)) THEN CALL MENU() €!™( IF TMPSECURE$ = "2909" THEN CALL MENU() €"™ELSE €# €$£û; €%™END IF €& €'»„ €(˜”‚!Š\…‚;;=‚!Š\…¸;;=|•Ÿ €) €*»„ €+£bc…C,„BH,„@€,„?€,…@;,,,,, €,»„@À,…a,… €-»„A,…c,… €.“‚!„ €/¬ €0­ÿÿÿö®‚!„? €1”‚!„@À=•Ó €2™RESET DISPLAY DATA €3“ƒ"‹';; €4“‚„ €5“‚U„ €6›x‚~„?€œ‚¸„A ‚µ„?€ €7“ƒ ‚~;…( €8“‚,‚~;„ €9“‚-‚~;„ €:žÿÿÿ¹‚~‚¸‚µ €;— €<“‚!„ €= €>»„ €?˜¾”‚!Š\…W;;=‚!Š\…°;;=|• €@™ €A”‚„?€=• €B“‚„@ €C˜O”‚„@=• €D“‚„@@ €E˜&”‚„@@=• €F“‚„?€ €G— €H˜þ”‚!Š\…{;;=‚!Š\…¶;;=|•Ë €I”‚@„=•i €J„,„CX,„CŸ€,„Co €K“‚@„¿€ €L™ EVENT10 = -1 €M‘„,„C^ €N½…;… €O–E €P„,„CX,„CŸ€,„Co €Q“‚@„ €R™ EVENT10 = 0 €S— €T˜”‚!Š\…Ž;;=‚!Š\…¹;;=|•; €U“‚ „ €V™[TMP.DATA.TEMP.SET = INP("SET TEMP.","(DEGREES XX)",VAL(T.DATA.TEMP.SET$),1,T.T.MIN,T.T.MAX) €W“ƒ&‹@…‰,…,ƒ&,…,„?€,„@€;; €X”‚ ~•ø €Y™2T.DATA.TEMP.SET$ = LTRIM$(STR$(TMP.DATA.TEMP.SET)) €Z™CALCULATE OUTPUT CURRENT €[“‚z‚C‚Fй)ƒ&;;*+ €\™-VALUE2SET = 1024*T.KOEF*VAL(T.DATA.TEMP.SET$) €]“‚{„ €^”‚B‚A<• “‚{‚B €_”‚A‚B<• “‚{‚A €`“‚}Šr‚z‚{-„D€*;; €a‘„,„ €b’…“;й)ƒ&;; €c‘„,„Að €d’…¯;‚} €e‘„,„Bp €f’…µ;‚z €g”Ša„A0;;„>• é„?€,‚} €h‘„,„B´ €i’…– €j£J”„@@;, €k €l— €m™=STRING2WRITE$ = SPACE$(2)+T.DATA.TEMP.SET$+CHR$(13)+CHR$(10) €n™0IF NOT ERRNO THEN CALL WRITE.PORT(STRING2WRITE$) €o˜’”‚!„?€=•B €p €q»„ €r™CALL CREATE.DATA() €s €t»„ €u˜?”‚!„BÆ=•- €v™JUST FAKE EXIT TO CLEAR SCREEN! €w— €x­ÿÿò® €y™CALL CLOSEREMOTE.NET() €z»„ €{ €|¥ÿÿî^ €¤ »(,;ƒI‚ƒJƒK €€¬ € €‚»„ €ƒ™ DSPFONT = 4 €„™ TEXTSIZE = 2 €…™'CALL PRINT.LINE("SETUP MENU",0,4,2,"C") €†µ„?€,„B ,„CŸ,„B €‡µ„?€,„CY,„CŸ,„CY €ˆ“ƒI…Š €‰£YüƒI,„A ,‚,„?€,…@;ƒI,‚,, €‹™ABOUT €Œ»„?€,…],…3 €™TIME €Ž»„@,…^,…4 €™ SEND.DATA €»„@@,…_,…5 €‘™ SEND.DATA €’»„@€,…`,…2 €“™TARE €”™KEY 5, "FMENU5", " RESET " €•™TIME €–»„@À,…a,‹Œ#„Ap;; €—™PASSWORD €˜™KEY 7, "FMENU7", "PASSWORD" €™™ZERO €š»„A,…b,… €›™EXIT €œ»„A,…c,… €™DRAW 0,217,319,217 €ž™PLANT €Ÿ™KEY 14, "FMENU14", "PLANT" € £ô„@@;, €¡“‚Šu„@@;;‚/ €¢£ „@@;, €£“‚„A €¤ì„?€ €¥‘„C ,„B𠀦”‚„?€=• €§’‚;… €¨˜'”‚„?€?• €©’‚;… €ª— €«“‚!„ €¬¬ €­“‚„A €®“‚ „C\ €¯’‹A‹';;,„@ ;; €°™CALL READ.SERVER.DATA("THRU") €±­ÿÿÿ‘®‚!„? €²»„ €³”‚!„?€=•' €´™ABOUT €µ£j…ª;, €¶˜H”‚!„@=• €·£LÆ…R;, €¸˜”‚!„@@=‚„>&•I €¹£eå; €º£f; €»£e„?€;, €¼„,„,„CŸ€,„Co €½˜¸”‚!„@€=• €¾ä €¿ €À˜•”‚!„@ =• €Á™ €˜r”‚!„@À=• €ãFÜ; €ĘN”‚!„@à=•D €Ŭ €Æ“ƒJ‹?…r,…,…,…;; €Ç”‚ •°÷ €È“ƒK‹?…ƒ,…,…,…;; €É”‚ •°· €Ê”ƒJƒK?•N €Ë£TÖ…},„BÈ,„@€,„?€,…@;,,,,, €Ì£Bõ„@@;, €Ͱ] €Ζ‘ €Ï”ƒJ…+?•5 €УTs…s,„BÈ,„@€,„?€,…@;,,,,, €Ñ–2 €Ò£T>…|,„BÈ,„@€,„?€,…@;,,,,, €Ó— €Ô£BX„@@;, €Õ— €ÖÂ…‚,#„Ap,…¢,„A €ׯ#„Ap,„@ ‡ƒÝ,„@€‡ƒÑ,„?€‡ƒÒ €ØÄ#„Ap,„?€ €ÙǃыŒ#„@€;; €ÚǃуJ €ÛÅ#„Ap,„?€ €ÜÃ#„Ap €Ý“ƒ,ƒJ €Þ° €ß­ÿÿýÉ €à˜ù”‚!„A=•% €ᔊ¶&;;„=•Ú €â˜Ô‚!„A`=•o €㬠€䓃-‹@…,…,,ƒ-,…o,„?€,„?€;; €唂 •°_ €攃-…-=ƒ-…0=|•°9 €ç‘„,„ €è’…S €é£@Ÿ„@;, €ê €ë­ÿÿÿU €씂 ~•§ €íÂ…‚,#„Ap,…¢,„A €îÆ#„Ap,„@ ‡ƒÝ,„@€‡ƒÑ,„?€‡ƒÒ €ïÄ#„Ap,„?€ €ðǃҋŒ#„?€;; €ñǃ҃- €òÅ#„Ap,„?€ €óÃ#„Ap €ô— €õ˜C”‚!„A=• €ö°2 €÷˜ ”‚!„BÆ=• €ø° €ù— €ú­ÿÿö €û“‚!„ €ü¥ÿÿöN €ÿ¤Q-‚‹; €™$GENERATION DATE: 25/07/2003 19:21:21 €¾‚Œ‚‹ €¿ðš„?€ €“‚„B8 €“‚‚ €Â…‚,#„?€,…¡,‚ €Æ#„?€,„@À‡ƒÏ €Æ#„?€,„@À‡ƒá,„@À‡ƒÎ €Æ#„?€,„A@‡ƒì,„@‡ƒØ € Æ#„?€,„A`‡ƒ÷,„@‡ƒÙ € Æ#„?€,„A€‡ƒ,„@ ‡ƒÀ € Æ#„?€,„A¨‡ƒ ,„@ ‡ƒ¿ € Æ#„?€,„AЇƒ,„@ ‡ƒÜ € Æ#„?€,„Aø‡ƒ,„@ ‡ƒÛ €Æ#„?€,„B‡ƒ,„@ ‡ƒÁ €Æ#„?€,„B$‡ƒ,„@ ‡ƒÍ €¿M¥„@ €“‚„Aè €“‚‚ €Â…‚,#„@,…£,‚ €Æ#„@,„@@‡ƒß €Æ#„@,„@@‡ƒá,„A ‡ƒÞ €Æ#„@,„A¸‡ƒì,„@À‡ƒà €¿Ÿ„@@ €“‚„B €“‚‚ €Â…‚,#„@@,…Ÿ,‚ €Æ#„@@,„A ‡ƒÂ €Æ#„@@,„A ‡ƒá,„A‡ƒÆ €Æ#„@@,„A‡ƒì,„@ ‡ƒÅ €Æ#„@@,„A¸‡ƒ÷,„@ ‡ƒÄ €Æ#„@@,„Aà‡ƒ,„@À‡ƒÃ € Æ#„@@,„B‡ƒ ,„@À‡ƒÇ €!¿ˆƒ„A` €"“‚„B  €#“‚‚ €$Â…‚,#„A`,… ,‚ €%Æ#„A`,„A ‡ƒÔ,„A ‡ƒÓ,„A ‡ƒÉ,„A ‡ƒÊ €&Á €'¥ÿÿû¸ €*¤Q‚˜; €+™%GENERATION DATE: 25/07/2003 19:21:21 €,Ã#‚˜ €-¥ÿÿÿ¸ €0¤æ*‚ª; €1™%GENERATION DATE: 25/07/2003 19:21:21 €2£ÿÿû‚ª;‚ª €3£ÿÿÿI‚ª;‚ª €4¾‚«‚ª €5¿\„?€ €6Ë…¡ €7¿<„@ €8Ë…£ €9¿„@@ €:Ë…Ÿ €;Á €<¥ÿÿÿ# €?¤¨‚°; €@™$GENERATION DATE: 25/07/2003 19:21:21 €A¾‚±‚° €B¿G„?€ €C“‚Hй)ƒÏ;; €D“‚Gй)ƒÎ;; €E“‚Jй)ƒØ;; €F“‚Kй)ƒÙ;; €G“‚Bй)ƒÀ;; €H“‚Aй)ƒ¿;; €I“‚Mй)ƒÜ;; €J“‚Lй)ƒÛ;; €K“‚Cй)ƒÁ;; €L“‚Fй)ƒÍ;; €M¿-P„@ €N“‚Oй)ƒß;; €O“ƒ2ƒÞ €P“‚Pй)ƒà;; €Q¿Ô}„@@ €R“ƒ$ƒÂ €S“ƒ'ƒÆ €T“ƒ&ƒÅ €U“ƒ%ƒÄ €V“‚Dй)ƒÃ;; €W“‚Eй)ƒÇ;; €X¿NI„A` €Y“ƒ/ƒÔ €Z“ƒ.ƒÓ €[“ƒ(ƒÉ €\“ƒ)ƒÊ €]Á €^¥ÿÿýa €a¤F;‚²; €b™$GENERATION DATE: 25/07/2003 19:21:21 €c¾‚³‚² €d¿åƒ„?€ €eǃϋŒ#„@À;; €fǃϋB‹$‚H;;;; €gǃ΋Œ#„@À;; €hǃ΋B‹$‚G;;;; €iǃ؋Œ#„@;; €jǃ؋B‹$‚J;;;; €kǃًŒ#„@;; €lǃًB‹$‚K;;;; €mǃÀ‹Œ#„@ ;; €nǃÀ‹B‹$‚B;;;; €oǃ¿‹Œ#„@ ;; €pǃ¿‹B‹$‚A;;;; €qǃ܋Œ#„@ ;; €rǃ܋B‹$‚M;;;; €sǃۋŒ#„@ ;; €tǃۋB‹$‚L;;;; €uǃÁ‹Œ#„@ ;; €vǃÁ‹B‹$‚C;;;; €wǃ͋Œ#„@ ;; €xǃ͋B‹$‚F;;;; €y¿Y´„@ €zǃߋŒ#„@@;; €{ǃߋB‹$‚O;;;; €|ǃދŒ#„A ;; €}ǃރ2 €~ǃà‹Œ#„@À;; €ǃà‹B‹$‚P;;;; €€¿œ/„@@ €ǃ‹Œ#„A ;; €‚ǃƒ$ €ƒÇƒÆ‹Œ#„A;; €„ǃƃ' €…ǃŋŒ#„@ ;; €†ÇƒÅƒ& €‡ÇƒÄ‹Œ#„@ ;; €ˆÇƒÄƒ% €‰ÇƒÃ‹Œ#„@À;; €ŠÇƒÃ‹B‹$‚D;;;; €‹ÇƒÇ‹Œ#„@À;; €ŒÇƒÇ‹B‹$‚E;;;; €¿d_„A` €ŽÇƒÔ‹Œ#„A ;; €ǃԃ/ €ǃӋŒ#„A ;; €‘ǃӃ. €’Á €“¥ÿÿúà €–¤"; €—“‚!„?€ €˜¥ÿÿÿç €™¤""; €š“‚!„@ €›¥ÿÿÿç €œ¤"#; €“‚!„@@ €ž¥ÿÿÿç €Ÿ¤"$; € “‚!„@€ €¡¥ÿÿÿç €¢¤"%; €£“‚!„@  €¤¥ÿÿÿç €¥¤"&; €¦“‚!„@À €§¥ÿÿÿç €¨¤"'; €©“‚!„@à €ª¥ÿÿÿç €«¤"(; €¬“‚!„A €­¥ÿÿÿç €®¤"); €¯“‚!„A €°¥ÿÿÿç €±¤"; €²“‚!„A €³¥ÿÿÿç €´¤"; €µ“‚!„A0 €¶¥ÿÿÿç €·¤"; €¸“‚!„A@ €¹¥ÿÿÿç €º¤"; €»“‚!„AP €¼¥ÿÿÿç €½¤"; €¾“‚!„A` €¿¥ÿÿÿç €À¤"; €Á“‚!„Ap €Â¥ÿÿÿç €ä"; €Ä“‚!„A€ €Å¥ÿÿÿç €Ƥ"; €Ç“‚!„Aˆ €È¥ÿÿÿç €ɤ"; €Ê“‚!„A €Ë¥ÿÿÿç €̤"; €Í“‚!„A˜ €Î¥ÿÿÿç €Ϥ"; €Г‚!„A  €Ñ¥ÿÿÿç €Ò¤"; €Ó“‚!„A¨ €Ô¥ÿÿÿç €Õ¤"; €Ö“‚!„A° €×¥ÿÿÿç €ؤ" ; €Ù“‚!„A¸ €Ú¥ÿÿÿç €Û¤"!; €Ü“‚!„AÀ €Ý¥ÿÿÿç €à¤a2;‚€ €á™ALL VARIABLES IN A FILE 3 €Ⓝ$‹C‹6 ;;,„@€,„@;;…'+‹C‹6 ;;,„?€,„@;;+…'+‹C‹6 ;;,„@à,„@€;;+ €㓃'‹';; €ä“‚D‚ €å“‚E‚U €æ£ÿÿ탄@@;, €ç“‚€Šu„@@;;‚/ €è“‚€‚€„?€+ €é£ÿÿõŽ„@@;, €êÅ#„@@,‚€ €ë£ÿÿñv„@@;, €ì¥ÿÿþ¨ €î¤;‚ƒMƒL €ï™SUPPORTING 788P CARD €ð“‚Š´"„?€;; €ñ”‚„@„^?‚„@„?€^?&‚„@„@^?&‚„@„@@^?&‚„@„@€^?&•Ó €ò“ƒM‹Ž%Šs‹B‹$Š_„?€;;;;;;;;,…;; €ó”Šo‹B‹$Šq„?€;;;;;;,…);;„>• €ô“ƒL‹Ž%Šs‹B‹$Šq„?€;;;;;;;;Šo‹B‹$Šq„?€;;;;;;,…);;-,…;; €õ– €ö“ƒL… €÷— €ø”Šo‹$Šq„?€;;;;,…);;„?•“ƒ4ƒM…)+ƒL+ €ù”Šo‹$Šq„?€;;;;,…);;„=• “ƒ4ƒM €ú— €û¥ÿÿýz €ÿ¤M;‚‚ƒOƒN €“‚‚Š´"„?€;; €”‚‚„=•ü €™,******************************************** €“ƒO‹Ž%Šs‹B‹$Š_„?€;;;;;;;;,…;; €“ƒN‹Ž%Šs‹$Šq„?€;;;;;;Šo‹$Šq„?€;;;;,…);;-,…;; €™.********************************************** €”Šo‹$Šq„?€;;;;,…);;„?•“ƒ4ƒO…)+ƒN+ €”Šo‹$Šq„?€;;;;,…);;„=• “ƒ4ƒO €™.********************************************** € — € ¥ÿÿý¼ € ¤;‚ƒ €“‚ „ €“‚ƒŠn…•,…T,‚N,„?€,„,Š^;;;; €”‚ „=•z €“‚T‚ƒ €”‚T„]‚TŠ^;;<&•à €Â…‚,#„Ap,…¢,„A €Æ#„Ap,„@ ‡ƒÝ,„@€‡ƒÑ,„?€‡ƒÒ €Ä#„Ap,„?€ €ǃ݋Œ#„@ ;; €ǃ݋B‹$‚ƒ;;;; €Å#„Ap,„?€ €Ã#„Ap €“‚N‚ƒ €Ù„?€,‚N €–` € €»„ €£7’…”,„BÈ,„@€,„?€,…@;,,,,, € £%±„@@;, €! €"»„ €#— €$— €%»„ €& €'¥ÿÿþ €)¤|7ƒY;ƒQƒRƒSƒTƒUƒVƒWƒX‚„ƒP €*™9PROGRAMM INFORMATION SCREEN" "UREA USAGE TRACKING SYSTEM" €+„,„,„CŸ€,„Co €,“ƒQ…¦ €-“ƒR… €.“ƒS…i €/“ƒT‹B‹E!ƒ/;;;; €0“ƒU‹B‹E!ƒ.;;;; €1“ƒV…7 €2”‹B‹E!ƒ);;;;…=• €3“ƒW…$ €4– €5“ƒWƒ) €6— €7™DSPFONT=CURRENTFONT €8“‚„A €9‘„CŸŠsƒR;;„A@*-„@/,„A@ €:’ƒR €;™ DSPFONT=1 €<‘„CŸŠsƒS;;„A@*-„@/,„BH €=’ƒS €>™ DSPFONT=2 €?‘„CŸŠsƒT;;„A@*-„@/,„B´ €@’ƒT €A™ DSPFONT=2 €B‘„CŸŠsƒU;;„A@*-„@/,„Bð €C’ƒU €Dµ„,„B@„@p*,„Bþ„@ *,„B@„@p* €E™ DSPFONT=1 €F‘„CŸŠsƒV;;„A@*-„@/,„C €G’ƒV €H‘„CŸŠsƒW;;„A@*-„@/,„CC €I’ƒW €J´„,„,„CŸ€,„Co,„ €K™SHOW PLU MASTER FROM €L™ CALL COPYRIGHT(310,15) €M“ƒX… €N›‚„„AМ‚¸„?€‚µ„¿€ €O“ƒP‹CƒQ,‚„,„?€;; €P“ƒXƒPƒX+ €Q“‚„A €R‘„@€,„AP €S’ƒX €Tžÿÿÿ”‚„‚¸‚µ €U“‚‚ €V”ƒY…ª=•ü €W“‚!„ €X”‹B‹E!ƒ/;;;;…¥=‹B‹E!ƒ/;;;;…¥=&•»„@À,…a,…‡ €Y»„A,…c,… €Z¬ €[”‚!„?•° €\­ÿÿÿÜ €]„,„,„CŸ€,„Co €^»„ €_”‚!„@À=• £é„;, €`– €a£Í„@ ;, €b— €c™!IF RUN.MODE$ = "778" THEN DLY = 1 €d™"IF RUN.MODE$ = "SIM" THEN DLY = 20 €e”‚!„@?•Ê €f›­‚„„œ‚¸„C‚µ„@€ €g´„‚„+,„‚„+,„CŸ€‚„-,„Co‚„-,„ €h´„‚„+,„‚„+,„CŸ€‚„-,„Co‚„-,„ €ižÿÿÿ„‚„‚¸‚µ €j›ƒ‚„„œ‚¸„C‚µ„@ €k‚„,„,‚„„?€+,„Co €l„CŸ‚„-,„,„CŸ€‚„-,„Co €mžÿÿÿ®‚„‚¸‚µ €n›}‚„„œ‚¸„B„?€ €o„C,‚„,„C,‚„ €p„C,„Cn‚„-,„C,„Co‚„- €qžÿÿÿ´‚„‚¸‚µ €r— €s„,„,„CŸ€,„Co €t“‚!„ €u¥ÿÿ÷ñ €w¤–‚…‚†; €x“‚„@€ €y‘‚…„@À-,‚†„AP- €z’…x €{“‚„?€ €|‘‚…„@-,‚†„@À- €}’…@ €~“‚‚ €¥ÿÿÿs €¤®d6ƒa;ƒZƒ[ƒ\ƒ]ƒ^ƒ_ƒ`‚‡ €‚“‚„@  €ƒì„?€ €„ €…“ƒZ…§ €†”‹B‹E!ƒ(;;;;…=• €‡“ƒ[…" €ˆ– €‰“ƒ[ƒ( €Š— €‹“ƒ\…i €Œ“ƒ]‹B‹E!ƒ/;;;; €“ƒ^‹B‹E!ƒ.;;;; €Ž“ƒ_…6 €”‹B‹E!ƒ);;;;…=• €“ƒ`…% €‘– €’“ƒ`ƒ) €“— €”´„,„,„CŸ€,„Co,„ €•£,ÃZ,„@ ,„@ ,„?€,…@;ƒZ,,,, €–£,“ƒ[,„B ,„@ ,„?€,…@;ƒ[,,,, €—£,cƒ\,„B‚,„@ ,„?€,…@;ƒ\,,,, €˜£,3ƒ],„B¾,„@ ,„?€,…@;ƒ],,,, €™£,ƒ^,„Bú,„@ ,„?€,…@;ƒ^,,,, €š£+Óƒ_,„C,„@ ,„?€,…@;ƒ_,,,, €›£+£ƒ`,„C9,„@ ,„?€,…@;ƒ`,,,, €œ”ƒa…ª=• €“‚!„ €ž”‹B‹E!ƒ/;;;;…¥=‹B‹E!ƒ/;;;;…¥=&•»„A,…c,…† €Ÿ»„@À,…a,…; € ¬ €¡™CALL READ.SERVER.DATA("THRU") €¢”‚!„?•° €£­ÿÿÿ¶ €¤”‚!„A=•$ €¥£Å„@€;, €¦“‚!„ €§— €¨– €©£•„@@;, €ª— €«›U‚‡„œ‚¸„CŸ€‚µ„?€ €¬‚‡,„,‚‡,„Co €­žÿÿÿÜ‚‡‚¸‚µ €® €¯»„ €°“‚!„ €±¥ÿÿû[ €´¤90;‚‰ƒcƒbƒd‚ˆ‚Š €µ”‹B‹E!ƒ/;;;;…¥=‹B‹E!ƒ.;;;;…¥=&•§ €¶“‚‰„¿€ €·™&RESTORE DATE OF INSTALLATION FROM FILE €¸™IF FILE LENGTH = 0, FIRST RUN €¹“ƒ…9‹B‹$‚';;;;+…*+ €ºÂ…‚,#„Ap,ƒ,„A €»™OPEN "R", #15, "AWM.REG",10 €¼Æ#„Ap,„A ‡ƒc €½”Šu„Ap;;„=•â €¾™ FIRST RUN €¿“ƒb‹C‹6 ;;,„@€,„@;;…'+‹C‹6 ;;,„?€,„@;;+…'+‹C‹6 ;;,„@à,„@€;;+ €Àǃc‹Œ#„A ;; €Áǃcƒb €“ƒdƒc €ÃÅ#„Ap,„?€ €Ä–/ €Å™ €ÆÄ#„Ap,„?€ €Ç“ƒdƒc €È— €ÉÃ#„Ap €Ê™CHECK IF PERIOD EXPIRED OR NOT €Ë“ƒb‹C‹6 ;;,„@€,„@;;…'+‹C‹6 ;;,„?€,„@;;+…'+‹C‹6 ;;,„@à,„@€;;+ €Ì£¸ƒb;ƒb €Í“‚ˆ‚ €Σ•ƒd;ƒd €Ï“‚Š‚ €Й €Ñ”Š[‚ˆ‚Š-;;„A`>•\ €Ò €Ó£%í…O,„,„@€,„?€,…@;,,,,, €Ô£%Á…~,„B,„@€,„?€,…@;,,,,, €Õ£%•…™,„B„,„@€,„?€,…@;,,,,, €Ö“‚!„ €×»„ €Ø»„@À,…a,…… €Ù»„A,…c,…V €Ú¬ €Û”‚!„?•° €Ü­ÿÿÿÜ €Ý”‚!„A=• €Þ €ßä €à €á˜6”‚!„@À=•$ €â£ „@€;, €ã“‚!„ €ä— €å— €æ– €ç“‚‰„ €è— €é¥ÿÿúÐ €ì¤»;‚ƒe €í£ÿÿÓ<„A`;, €î“‚Šu„A`;; €„B =•V €ðÄ#„A`,„?€ €ñ“ƒ/ƒÔ €ò“ƒ.ƒÓ €ó“ƒ(ƒÉ €ô“ƒ)ƒÊ €õ–n €ö“ƒ/‹Œ#„A ;; €÷“ƒ.‹Œ#„A ;; €ø“ƒe‹Œ#„A ;; €ù“ƒ)‹Œ#„A ;; €ú— €ûÃ#„A` €ü”‹B‹E!ƒ/;;;;…=‹B‹E!ƒ.;;;;…=|‚„=|•8 €ý£<„;, €þ”‚„=• €ÿä € €— €— €¥ÿÿþN €¤»1‚;ƒt‚ƒzƒyƒxƒwƒvƒuƒl‚’ƒfƒg‚‘‚Žƒhƒiƒjƒkƒmƒnƒoƒpƒqƒrƒs € €»„ € ™,BLOCK REG. VERSION FOR DEMO VERSION FLAG ... € ”‚„=•8 € “ƒt‹5„AP;;…<+ € “‚„ € ˜F”‚„>•4 €“ƒt‹5„AP;;…œ+ €“‚„A@ €— €¬ €“‚ „ €“‚„ €“ƒz… €“ƒy‹@…p,ƒz,… ,…,‚,„A ;; €‘„,„ €£„?€;, €”‚ „¿€=•° { €“ƒx‹@…Y,ƒz,… ,…,‚,„A ;; €£²„?€;, €”‚ „¿€=•°  €“ƒw‹@…ž,….,…,…,‚,„A@;; €£P„?€;, €”‚ „¿€=•° · €”‹B‹E!ƒy;;;;…=‹B‹E!ƒx;;;;…=&•) € “ƒw‹Ž%„A@,…+;; €!–- €"“ƒy‹B‹E!ƒy;;;; €#“ƒx‹B‹E!ƒx;;;; €$“ƒvƒy €%“ƒuƒx €&“ƒyƒyƒx+ €'“ƒxƒxƒy+ €(“ƒl… €)›9‚’„?€œ‚¸Šsƒy;;‚µ„?€ €*“ƒf‹B‹$Š\‹Cƒy,‚’,„?€;;;;;;;; €+“ƒg‹B‹$Š\‹Cƒx,‚’,„?€;;;;;;;; €,“‚‘й)ƒf;;й)ƒg;;‚’+* €-“ƒlƒl‹B‹$Š[‚‘;;;;;;+ €.žÿÿÿ‚’‚¸‚µ €/“‚Ž„ €0›{‚’„?€œ‚¸Šsƒl;;‚µ„?€ €1“‚Ž‚ŽŠ¹)‹Cƒl,‚’,„?€;;;;+ €2žÿÿÿÁ‚’‚¸‚µ €3 €4“ƒf‹C‹B‹E!ƒy;;;;,„?€,„?€;; €5“ƒg‹C‹B‹E!ƒy;;;;,„@@,„?€;; €6“ƒh‹C‹B‹E!ƒy;;;;,„@€,„?€;; €7“ƒi‹C‹B‹E!ƒx;;;;,„@,„?€;; €8“ƒj‹C‹B‹E!ƒx;;;;,„@@,„?€;; €9“ƒk‹C‹B‹E!ƒx;;;;,„@€,„?€;; €:“ƒm‹B‹$‚ŽŠ[‚'„A@+Š\ƒf;;-;;*;;;; €;“ƒn‹B‹$‚ŽŠ[‚'„AÀ+Š\ƒg;;-;;*;;;; €<“ƒo‹B‹$‚ŽŠ[‚'„A0+Š\ƒh;;-;;*;;;; €=“ƒp‹B‹$‚ŽŠ[‚'„A+Š\ƒi;;-;;*;;;; €>“ƒq‹B‹$‚ŽŠ[‚'„A¨+Š\ƒj;;-;;*;;;; €?“ƒr‹B‹$‚ŽŠ[‚'„A¨+Š\ƒk;;-;;*;;;; €@“ƒsƒmƒn+ƒo+ƒp+ƒq+ƒr+ €A”Šsƒs;;„A@>•+ €B“ƒs‹Cƒs,„?€,„A@;; €C— €D— €E”ƒwƒs=•j €F“‚„¿€ €G™ DSPFONT = 2 €H™ TEXTSIZE = 4 €I£ì…f,„,„A ,„?€,…@;,,,,, €J£À…¤,„Bp,„@€,„?€,…@;,,,,, €K£”…8,„BÈ,„@€,„?€,…@;,,,,, €L™ €M£ÿÿÇG„A`;, €N“ƒ/ƒv €O“ƒ.ƒu €PǃԋŒ#„A ;; €QǃӋŒ#„A ;; €Rǃԃ/ €SǃӃ. €TÅ#„A`,„?€ €UÃ#„A` €V˜Ú”ƒw‹Ž%„A@,…+;;=•f €W“‚„¿€ €X €Y™ DSPFONT = 2 €Z™ TEXTSIZE = 2 €[£[…P,„A ,„@€,„?€,…@;,,,,, €\£/…/,„Bp,„@€,„?€,…@;,,,,, €]£…8,„BÈ,„@€,„?€,…@;,,,,, €^£ÿÿÅ¿„A`;, €_“ƒ/…¥ €`“ƒ.…¥ €aǃԋŒ#„A ;; €bǃӋŒ#„A ;; €cǃԃ/ €dǃӃ. €eÅ#„A`,„?€ €fÃ#„A` €g–R €h €i™ DSPFONT = 2 €j™ TEXTSIZE = 4 €k‘„,„ €l£ô…©,„BÈ,„@€,„?€,…@;,,,,, €m™ LOCATE 0,0 €n™PRINT OLD.REGISTRATION.NAME$ €o™PRINT OLD.REGISTRATION.FIRM$ €p™PRINT REGISTRATION.CODE$ €q™PRINT FINAL.CODE$ €r™CALL DELAY(10) €s£ÿÿÄ„A`;, €t£ÿÿÈJ„A`;, €uË…  €vä €w €x— €y“‚!„ €z»„A,…c,…z €{µ„,„CY,„CŸ€,„CY €|¬ €}”‚!„?•° €~­ÿÿÿÜ €„,„,„CŸ€,„Co €€»„ €”ƒwƒs=•£R; €‚° €ƒ­ÿÿòæ €„”‚ „¿€=• €… €†»„ €‡ä €ˆ €‰— €Š¥ÿÿñN €¤8; €Ž“‚ „ €¬ €“ƒ(‹@…M,…,…,…,„,„A ;; €‘”‚ „¿€=•°K €’“ƒ)‹@…N,…,…,…,„,„A ;; €“° €”­ÿÿÿc €•”‚ „=•` €–£ÿÿÁû„A`;, €—Ä#„A`,„?€ €˜ÇƒÉƒ( €™ÇƒÊƒ) €šÅ#„A`,„?€ €›Ã#„A` €œ— €¥ÿÿþÑ € ¤ò ƒ{;‚“‚”‚• €¡“‚“й)‹Cƒ{,„?€,„@;;;; €¢“‚”й)‹Cƒ{,„@€,„@;;;;„?€-„Aô* €£“‚•й)‹Cƒ{,„@à,„@€;;;;„C¶žú* €¤“‚Šr‚“‚”+‚•+;; €¥¥ÿÿÿ €¨¤D ‚–;‚— €©™BLOCK VERSION 1.1 €ª“‚„ €«”Š`;;„?•Z €¬™7XX €­Ý„?€,T‚–£Î; €®¬ €¯”‚•° €°­ÿÿÿâ €±Ý„?€,O €²˜Š”Š`;;„=•r €³™ SIMULATOR €´›S‚—„?€œ‚¸„C¥‚–*‚µ„?€ €µ”‚•¯ €¶žÿÿÿä‚—‚¸‚µ €·— €¸¥ÿÿþÅ €»¤" ; €¼“‚„¿€ €½¥ÿÿÿç €¿¤ 9;ƒ| €À“‚RŠg;; €Á“‚Tж&;; €“‚SŠw;; €ÔŠv;;• €Ä“ƒ|…n €Ř”Š];;• €Æ“ƒ|…? €ǘg”Šb;;• €È“ƒ|…H €ɘ>”Šy;;• €Ê“ƒ|…y €Ë– €Ì“ƒ|… €Í— €ΔŠy;;~•5 €Ï‘„C4,„ €н…¬ƒ4+;…g;‚R €Ñ–" €Ò„,„,„CŸ€,„BT €Ó— €Ô¥ÿÿþŠ €פÍ 3;ƒ} €Ø“‚ „ €Ù¬ €Ú¬ €Û“ƒ}‹A‹';;,„@;;‹C‹';;,„@€,„@;;+ €Ü“ƒ}‹@…—,… ,ƒ},…o,„@€,„@€;; €Ý­ÿÿÿu®Š¹)ƒ};;„Ep[ €Þ”‚ •°è €ß”‚ „=•4Ö‹Aƒ},„@;;…1+‹D ƒ},„@;;+ €ଠ€ᓃ}‹C‹6 ;;,„@€,„@;;‹C‹6 ;;,„?€,„@;;+‹C‹6 ;;,„@à,„@€;;+ €Ⓝ}‹@…L,…,ƒ},…o,„A,„A;; €ã­ÿÿÿL®Š¹)‹Cƒ},„?€,„@;;;;„B<й)‹Cƒ},„@@,„@;;;;„AP<& €䔂 „=•c׋Cƒ},„@@,„@;;…'+‹Cƒ},„?€,„@;;+…'+‹Cƒ},„@ ,„@€;;+ €å° €æ­ÿÿý^ €ç¥ÿÿý< €ê¤ ƒ~; €딊sƒ~;;„?€=•c €ì™ USUAL KEYBOARD, ENTER, SPACE ... €í“‚!Š\‹Cƒ~,„?€,„?€;;;; €î˜s”Šsƒ~;;„@=•V €ï™ESC OR ARROWS ... €ð“‚!„Š\‹Cƒ~,„@,„?€;;;;- €ñ— €ò¥ÿÿþü €õ¤G ƒ; €öÂ…E›‡#„AP €÷’#„AP,ƒ €øÃ#„AP €ù¥ÿÿÿ €ü¦Ó ƒ7; €ý™TIME LIKE 13:00 €þ™RETURNS SECONDS FROM MIDNIGHT €ÿ™(TO BE COMPARED WITH TIMER) €“‚fй)‹Aƒ7,„@;;;;„Ea*й)‹D ƒ7,„@;;;;„Bp*+ €§ÿÿÿ6 €¤î$4ƒ€;ƒ‚ƒ €”ƒ€…R=• €¬ €¬ € “‚HŠn…m,…š,‚H,Šp;;,Šp;;,Š^;;;; € ”‚ •°2 € “‚GŠn…l,…›,‚G,Šp;;,Šp;;,Š^;;;; € ”‚ •°Ô € “‚JŠn…‹,…e,‚J,„?€,„@ ,„Bp;; €”‚ •°ˆ €“‚KŠn…Q,…d,‚K,„?€,„?€,„A ;; €”‚ •°< €”‚H‚G<‚H„?&‚G„?&•° €­ÿÿþp €¬ €™SETUP MATHEMATICAL VALUES €“‚BŠn…³,…,‚B,„?€,„,„A ;; €”‚ •°™ €“‚AŠn…²,…,‚A,„?€,„,„A ;; €”‚ •°M €“ƒ‚‹@…,…,‹B‹$‚M;;;;,…,„?€,„@€;; €”‚ •°ë €“ƒ‹@…,…,‹B‹$‚L;;;;,…,„?€,„@€;; €”‚ •°‰ €“‚Mй)ƒ‚;; €“‚Lй)ƒ;; €™CALCULATE T.A.NUL AND T.KOEF € “‚F‚A‚B-‚L‚M-/ €!“‚C‚A‚F‚L*- €"™CFINALLY IT'LL BE: A=T.A.NUL+T.KOEF*T,WHERE T IS NEEDED TEMPERATURE! €# €$‘„,„ €%’…I;‚F €&‘„,„A  €'’…´;‚C €(£ÿÿór„@@;, €)°J €*™7IF T.T.MIN < T.T.MAX AND T.A.MIN < T.A.MAX THEN EXIT DO €+­ÿÿüù €,° €-­ÿÿûN €.”‚ ~•F €/£ÿÿ³‹„?€;, €0£ÿÿ»Ë„?€;, €1Å#„?€,„?€ €2£ÿÿ·³„?€;, €3— €4˜””ƒ€…„=•‚ €5£ÿÿ³+„?€;, €6”Šu„?€;;‚?• €7£ÿÿ·T„?€;, €8£ÿÿ·„?€;, €9£ÿÿ²Û„?€;, €:“‚H„? €;“‚G„@ €<“‚J„@  €=“‚K„A €>“‚B„A  €?“‚A„@€ €@“‚M„ €A“‚L„BH €B™ €C“‚F‚A‚B-‚L‚M-/ €D“‚C‚A‚F‚L*- €E™ €F£ÿÿºU„?€;, €GÅ#„?€,„?€ €H— €IÄ#„?€,„?€ €J£ÿÿ·n„?€;, €K£ÿÿ¶„?€;, €L— €M €N»„ €O¥ÿÿù €R: €S €T£š…#,„,„@€,„?€,…@;,,,,, €U“ƒ»…U‹B‹$Šd ;;;;;;+ €V£=ƒ»,„B ,„@€,„?€,…@;ƒ»,,,, €W“ƒ¼…j‹B‹$Šc ;;;;;;+ €X£܃¼,„B ,„@€,„?€,…@;ƒ¼,,,, €Y£¬…,„Bð,„@€,„?€,…@;,,,,, €Z»„@À,…a,…º €[»„A,…c,…» €\“‚!„ €]¬ €^”ŠrŠ·(;;„@/;;Š·(;;„@/-„=•5 €_£…#,„,„@€,„?€,…@;,,,,, €`–= €a£Í‹Œ#„BH;;,„,„@€,„?€,…@;,,,,, €b— €c­ÿÿÿG®‚!„? €d €e”‚!„A=• €fä €g €h— €i“‚!„ €j“‚„@€ €kì„@ €l»„@À,…,… €m»„A,…,… €n¢ €q¤Ü0/ƒ„‚ž‚œ‚ƒƒ;‚™‚š‚› €r™SAVE OLD SETTINGS €s“‚™‚ €t™OLD.T = TEXTSIZE €u“‚š‚ €v“‚›‚ €w“‚‚œ €xì‚ €y”ƒƒ…@=•(“‚„C Še ƒ„;;‚*„@/- €z”ƒƒ…h=• “‚„ €{”ƒƒ…‚=•"“‚„C Še ƒ„;;‚*- €|”‚„<• “‚„ €}“‚ ‚ž €~’ƒ„ €™ RESTORE ALL €€“‚‚™ €™TEXTSIZE = OLD.T €‚“‚‚š €ƒ“‚ ‚› €„¥ÿÿþ- €‡¤¿:;‚ ‚Ÿ €ˆ™TURN TIMER OFF €‰”‚ • €ŠÝ„A ,O €‹“‚ „ €Œ— €™ X.CUR = DSPX €Ž™ Y.CUR = DSPY €™IF SYSTEM.PAUSED = 0 THEN €™"STORE FIRST INCOMING VALUE IN FILE €‘™1MOVE ARRAY ONE UP BY DELETING FIRST ITEM IN ARRAY €’™CALL SAVE.DATA() €“™SCROLL.ARRAY$ 10 ELEMENTS €”›œ‚ „Aœ‚¸„?€‚µ„¿€ €•“ƒ ‚ „?€+;ƒ ‚ ; €–“‚,‚ „?€+;‚,‚ ; €—“‚-‚ „?€+;‚-‚ ; €˜žÿÿÿ•‚ ‚¸‚µ €™™ €š™TMP.NETWEIGHT = NET(1) €›™CALL UPDATE.SCREEN() €œ‘„C4,„ €“‚SŠx„?€;; €ž½…¬ƒ4+;…q;‚S €Ÿ”‚S‚H<•£4; € “‚‚#‚S- €¡”‚„<• “‚„ €¢“‚U‚U‚+ €£“ƒ „?€;‹';; €¤“‚-„?€;‚U €¥™ €¦“‚#‚S €§”‚„?€=•“‚,„?€;‚‚J/ €¨”‚„@=•“‚,„?€;‚‚J/„Bp* €©”‚„@@=•“‚,„?€;‚‚J/„Ea* €ª™ €«›ƒ‚ „?€œ‚¸‚K‚µ„?€ €¬‘„,‚ „A€*„B+ €­½…«;ƒ ‚ ;;‚,‚ ;;‚-‚ ; €®žÿÿÿ®‚ ‚¸‚µ €¯£ÿÿº?; €°™ TURN TIMER ON €±”‚ ~•@ €²“‚Ÿ‚J‚Q- €³Ý„A ,T‚Ÿ£ÿÿû[; €´“‚ „¿€ €µ— €¶¥ÿÿûJ €¹¤;‚¡ €º”‚ • €»Ý„A ,O €¼“‚ „ €½— €¾„,„CX,„CŸ€,„Co €¿”Ša„A;;„>•Þ„?€,„?€,„?€ €À¬ €Á”Šx„?€;;‚G]•@ €”Ša„A;;„>•Þ„?€,„?€,„ €ðs €Ä— €Å£ÿÿè; €Æ‘„,„C^ €ǽ…;…X;‚G;…;ŠrŠx„?€;;‚G/„BÈ*;;;… €È­ÿÿÿ2 €É„,„CX,„CŸ€,„Co €Ê”Ša„A;;„>•Þ„?€,„?€,„ €Ë”‚ ~•J €Ì“‚¡‚J‚Q- €ÍÝ„A ,T‚¡£ÿÿùN; €Γ‚ „¿€ €Ï£ÿÿù5; €З €Ñ“‚!„ €Ò¥ÿÿýë €Õ¤ ; €Öµ„,„B8,„CŸ€,„B8 €×µ„,„A¸,„CŸ€,„A¸ €ص„,„CW,„CŸ€,„CW €Ù‘„,„C^ €Ú½…­;…’;й)ƒ&;;;… ;…‘;й)ƒ%;; €Û‘„,„ €Ü’ƒ" €Ý”‚„?€=•V €Þ“‚,„?€;‚‚J/ €ß‘„,„AÈ €ཅ®;…˜;‚J;…!;…\ €á˜×”‚„@=•\ €â“‚,„?€;‚‚J/„Bp* €ã‘„,„AÈ €ä½…®;…˜;‚J;…!;…[ €å˜j”‚„@@=•X €æ“‚,„?€;‚‚J/„Ea* €ç‘„,„AÈ €è½…®;…˜;‚J;…!;…Z €é— €ê¥ÿÿýù €í¤S0;‚¢‚£ €î™CHECK TEMPERATURE DEVICE €ï™SUPPOSE PORT IS OPENED €ñ™ €ò‘„C4,„ €ó“‚SŠx„?€;; €ô½…¬ƒ4+;…q;‚S €ö”Št‚(;;„>•‡ €÷“ƒ%… €ø“ƒ½… €ù¬ €ú™ €û‘„C4,„ €ü“‚SŠx„?€;; €ý½…¬ƒ4+;…q;‚S €ÿ”Št‚(;;„>•𠀓‚¢Š·(;; €Ä#‚( €“ƒ½ƒ½ƒÚ+ €”‹D ƒ½,„?€;;‹5„A ;;=•… €“‚£Šoƒ½,‹5„;;;; €“ƒ%‹B‹E!‹Cƒ½,‚£„?€+,„@ ;;;;;; €£ÿÿû³; €°… €— € — € ”Š·(;;‚¢-„@ >•6 € “ƒ½… € “ƒ%…+ € £ÿÿûW; €°) €— €”‚!„?•° €­ÿÿþ& €™ MAINMENU = 0 €™THROW OUT UNNEEDED BYTES €¬ €”Št‚(;;„>• €Ä#‚( €– €° €— €­ÿÿÿ´ €— €¥ÿÿü¶ €¤š<ƒ…;‚¤ € ›u‚¤„?€œ‚¸Šsƒ…;;‚µ„?€ €!ǃڋCƒ…,‚¤,„?€;; €"Å#‚( €#žÿÿÿÇ‚¤‚¸‚µ €$¥ÿÿÿo €'¤Ã.‚¥; €(”‚¥„?€=•L €)“‚)„?€ €*Â…‚,#‚(,…D,‚) €+Æ#‚(,‚)‡ƒÚ €,˜K”‚¥„@=•9 €-Â…‚,#‚(,…F,‚) €.Æ#‚(,‚)‡ƒÚ €/— €0¥ÿÿÿF €3¤; €4Ã#‚( €5¥ÿÿÿë €8¤ ¼@8;ƒ‰ƒˆ‚©ƒ†‚§‚¨‚¦ƒ‡ €9™0***************** TRANSFER ********************* €:“‚ „ €;„,„,„CŸ€,„Co €<»„ €>£ÿÿžd„@@;, €?“‚$Šu„@@;;‚/ €A™FIELD #3,10 AS F.DATA.DATE$ €B™)FIELD #3,10 AS F.TEMP1$,8 AS F.DATA.TIME$ €C™-FIELD #3,18 AS F.TEMP2$,5 AS F.DATA.TEMP.SET$ €D™-FIELD #3,23 AS F.TEMP3$,5 AS F.DATA.TEMP.ACT$ €E™-FIELD #3,28 AS F.TEMP4$,6 AS F.DATA.FLOWRATE$ €F™*FIELD #3,34 AS F.TEMP5$,6 AS F.DATA.USAGE$ €H£ÿÿ¡b„@@;, €J”‚$„?•ï €K“ƒ‰‹5„AP;;‹5„A ;;+ €L“ƒˆ…ˆ €M£ÿÿ탈,„BÈ,‚,„?€,…@;ƒˆ,‚,, €N»„A,…c,… €O“‚!„ €P“‚©„?€ €Q£ÿÿœB„@@;, €R“‚$Šu„@@;;‚/ €S£Å‚©,‚$;‚©‚$ €T™ €U›Y‚©„?€œ‚¸‚$‚µ„?€ €WÄ#„@@,‚© €X“ƒ†ƒ#ƒÂ+…&+ƒÆ+…&+ƒÅ+…&+ƒÄ+…&+ƒÃ+…&+ƒÇ+…&+ƒ¾+ €Y“‚)Šsƒ†;; €Z£ÿÿû7„@;, €[ǃڋŒ#‚);; €\ǃڃ† €]Å#‚( €^£¨‚©,‚$;‚©‚$ €_™CALL DELAY(0.1) €`£ÿÿû‡; €a‘„,„ €b“‚„@ €c’…¨ €d“‚)„?€ €e£ÿÿúz„@;, €f™CALL DELAY(0.5) €g“‚§Š·(;; €h“‚¨„@  €i™GET ACK OR NAK OR NOTHING €j™ERRNO = 0 - TRANSFER OK! €k™ERRNO = -1 - NO ANSWER! €l™ERRNO = -2 - TRANSFER FAULT! €m“‚ „ €n¬ €o”‚!„?• €p“‚ „À€ €q°” €r— €s™SSS = TIMER - STTIME €t”Š·(;;‚¨-‚§>•@ €u“‚ „À@ €v™LSET F.REMOTE.CHAR$ = ACK$ €w° €x— €y”Št‚(;;„>•‰ €zÄ#‚( €{”ƒÚƒº=•! €|“‚ „ €}°¹ €~˜/”ƒÚƒ=• €“‚ „À €€°‡ €— €‚“‚§Š·(;; €ƒ— €„”‚¨Š·(;;‚§--„>•7 €…‘„BŒ,„ €†½…;‚¨Š·(;;‚§-- €‡— €ˆ­ÿÿþ? €‰£ÿÿø–; €Š”‚ „=•2 €‹‘„,„ €Œ’… €“‚¦„?€ €Ž˜Ü”‚ „À@=• €¯Ú €˜¹”‚ „À=•ˆ €‘‘„,„ €’’… €“™ANALYZE RESULT OF ANSWER €”“‚¦‚¦„?€+ €•”‚¦„@@>•¯V €–“‚©‚©„?€- €—˜ ”‚ „À€=• €˜¯ €™— €šžÿÿúØ‚©‚¸‚µ €›£ÿÿšâ„@@;, €œ„,„,„CŸ€,„Co €»„ €ž£ÿÿÕ¶„?€;, €Ÿ“‚„?€ € ™ LOCATE 0,0 €¡“ƒ‡… €¢”‚ „=• “ƒ‡…K €£”‚ „À@=• “ƒ‡…t €¤”‚ „À=• “ƒ‡…J €¥”‚ „À€=• “ƒ‡…A €¦“ƒˆƒ‡ €§£ÿÿ曃ˆ,„BÈ,‚,„?€,…@;ƒˆ,‚,, €¨£ÿÿÔ²„@@;, €ª”‚ „=•£Ž; €«„,„,„A˜,„@@ €¬»„ €­–¥ €®„,„,„CŸ€,„Co €¯»„ €°“ƒˆ…v €±£ÿÿåØƒˆ,„BÈ,‚,„?€,…@;ƒˆ,‚,, €²£ÿÿÓï„@@;, €³„,„,„CŸ€,„Co €´»„ €µ— €¶¥ÿÿõM €¹¤¥5‚¯‚®;‚¬‚­ƒŠ €º”‚®„?•5 €»“‚¬‚¯‚®/ €¼“‚­‚¯„?€-‚®/ €½— €¾”‚¬„?€>• “‚¬„?€ €¿”‚¬„<• “‚¬„ €À”‚­„?€>• “‚­„?€ €Á”‚­„<• “‚­„ €“ƒŠ‹$Šr‚¬„BÈ*;;;;…+ €ãÿÿä:ƒŠ,„CH,‚,„?€,…@;ƒŠ,‚,, €Ä´„@€,„C%,„C€,„C9,„ €Å´„@À,„C',„Cœ€‚¬*,„C7,„?€ €Æ¥ÿÿþd €ɤÁ ;ƒ‹ €Ê„,„,„CŸ€,„Co €Ë»„ €Ì“ƒ‹…B €Í£ÿÿãgƒ‹,„BÈ,‚,„?€,…@;ƒ‹,‚,, €λ„@À,…a,… €Ï»„A,…c,… €Г‚!„ €Ѭ €Ò”‚!„?•° €Ó­ÿÿÿÜ €Ô»„ €Õ„,„,„CŸ€,„Co €Ö»„ €×”‚!„A=•˜ €Ø„,„,„CŸ€,„Co €Ù»„ €Ú£ÿÿ•ÿ„@@;, €Û“‚!„ €Ü»„A,…c,… €ݬ €Þ­ÿÿÿö®‚!„? €ß“‚!„ €à“‚ „ €á— €â¥ÿÿþH ªU